TC官方合作论坛
标题:
【有源码】发个扫雷小助手，源码奉上。TC蛋蛋【原创】
[打印本页]
作者:
lyf1314
时间:
2012-1-31 20:57
标题:
【有源码】发个扫雷小助手，源码奉上。TC蛋蛋【原创】
[attach]2255[/attach]
奉上源码：
namespace winme
DM=com("dm.dmsoft")
function start_click()
list.deleteall("list0")
hwnd,a,id,x,b,i
xy,yy
i=0
x=#01005361
hwnd=window.findwindow("扫雷")
id=combo.getcursel("ComboBox0")
if(id==0)
a=9
b=9
endif
if(id==1)
a=16
b=16
endif
if(id==2)
a=30
b=16
endif
if(id==3)
a=convert.strtoint(edit.gettext("edit0"),0)
b=convert.strtoint(edit.gettext("edit1"),0)
endif
while(i<b)
xy=DM.ReadData(hwnd,str.format("%x",x),a)
yy=str.replace(str.replace(str.replace(str.replace(str.replace(str.replace(str.replace(str.replace(str.replace(str.replace(str.replace(xy,"8F","雷"),"41","无"),"42","无"),"43","无"),"44","无"),"45","无"),"46","无"),"47","无"),"48","无"),"49","无"),"0F","无")
list.addstring("list0",yy)
x=x+#20
i=i+1
endwhile
return true
endfunction
function exit_click()
help.exit()
return true
endfunction
function button0_click()
help.confirmationbox("选择正确的模式，开局点击任意一个开始计时后，扫描雷区,自定义模式选手动输入宽，高。","扫雷助手",1,true)
return true
endfunction
function init()
combo.setcursel("ComboBox0",0)
control.show("edit0",false)
control.show("edit1",false)
control.show("Static10",false)
control.show("Static11",false)
return true
endfunction
function timer0_ontime()
id
id=combo.getcursel("ComboBox0")
if(id==3)
control.show("edit0",true)
control.show("edit1",true)
control.show("Static10",true)
control.show("Static11",true)
else
control.show("edit0",false)
control.show("edit1",false)
control.show("Static10",false)
control.show("Static11",false)
endif
return true
endfunction
endnamespace
作者:
xuhuanqi
时间:
2012-1-31 20:58
顶顶，沙发
作者:
小丶笨笨
时间:
2012-1-31 21:13
好家伙 火星人
作者:
yy1314
时间:
2012-1-31 21:26
不认识英文。。。。
作者:
Guard
时间:
2012-1-31 21:42
:*英文版的，我喜欢。
作者:
hui1165103041
时间:
2012-1-31 21:46
支持啊！~:-o
作者:
TC
时间:
2012-1-31 21:59
牛B人士
作者:
陌上青衣。
时间:
2012-1-31 22:04
蛋蛋。。。写点2D游戏代码吧
作者:
ltsi001
时间:
2012-1-31 22:18
好东西，顶起
作者:
ldongh
时间:
2012-1-31 23:51
顶。。。。。
作者:
zuoyunduan
时间:
2012-2-1 01:22
看到英文就头疼，根本看不懂
作者:
jclei0
时间:
2012-2-1 09:41
学习下
作者:
tcmade888
时间:
2012-2-1 10:05
楼主你也太牛了吧
作者:
qq380267575
时间:
2012-2-1 11:55
哪位高手翻译一下！谢谢了
作者:
li69471
时间:
2012-2-2 11:47
顶顶
作者:
chunjie008
时间:
2012-2-2 23:12
残酷的验证码
作者:
bobjones
时间:
2012-2-3 11:03
不错！
作者:
570157677
时间:
2012-2-3 23:12
看看
作者:
k2fire
时间:
2012-2-4 12:33
自动扫雷的?
作者:
luojiawne77
时间:
2012-2-8 14:12
王启文
作者:
道亦盗
时间:
2012-2-8 22:07
谢谢楼主发源代码
作者:
qq1188
时间:
2012-2-8 23:21
感谢楼主分享...
作者:
reabhtiz
时间:
2012-2-8 23:44
这么给力。。。我无语
作者:
jkjksxl
时间:
2012-2-9 09:43
顶顶:D
作者:
tozmud
时间:
2012-4-20 20:54
hehe 这个是好东西要看看
作者:
夏之岚
时间:
2012-4-23 11:23
坏东西啊哈哈
作者:
wwwzjd0632
时间:
2012-4-23 16:36
文明看帖 试下好玩！
作者:
z0230226
时间:
2012-4-23 18:13
这个好啊 喜欢
作者:
w415184047
时间:
2012-5-6 09:21
人才辈出啊。
作者:
qianfeng752
时间:
2012-5-6 18:04
人才呀，期待已久。我的第１个单机游戏。
作者:
有夕阳相伴
时间:
2012-5-6 22:20
一定要看看
作者:
081323
时间:
2012-5-6 23:41
我还不能下载，呜呜
作者:
落兮
时间:
2012-5-7 17:14
看不懂！！！！
作者:
无语的拉
时间:
2012-5-18 02:07
路过
作者:
scleeb
时间:
2012-5-18 09:57
我来看看了
作者:
thischild
时间:
2012-5-21 16:16
真的可以用么？
作者:
如此繁华
时间:
2012-5-26 10:12
玩玩扫雷去
作者:
e0zs
时间:
2012-7-8 09:34
456102123
作者:
1192576065
时间:
2012-7-8 20:31
woyao!
作者:
wutao2361
时间:
2012-7-8 22:00
yyyyyyyyyyyyyyyyyyy
作者:
sazx
时间:
2012-7-19 10:53
嘿嘿不错啊，上班的时候可以玩玩了！！！
作者:
6zq555
时间:
2012-7-20 16:11
提示:
作者被禁止或删除 内容自动屏蔽
作者:
6zq555
时间:
2012-7-20 16:21
提示:
作者被禁止或删除 内容自动屏蔽
作者:
6zq555
时间:
2012-7-21 13:39
提示:
作者被禁止或删除 内容自动屏蔽
作者:
TCkancanzi
时间:
2012-8-16 19:13
回复
1楼
lyf1314
的帖子
小白初到，膜拜大神
作者:
kshz2164723
时间:
2012-8-17 10:29
强人啊
作者:
w3325182
时间:
2012-8-18 11:02
学习下，看看
作者:
TC==
时间:
2012-8-22 09:57
ddddddddddddddddddddddddddddsf
作者:
ASCSN
时间:
2012-9-16 22:46
我靠，又一个大神
作者:
373087528
时间:
2012-10-5 06:31
支持........
作者:
290088012
时间:
2012-10-5 17:07
小白，学习下。
作者:
尛情哥
时间:
2012-10-19 17:30
....nb
作者:
从来没赢过
时间:
2012-10-22 13:57
打发士大夫
作者:
hover4u
时间:
2012-10-24 10:00
看看，学习一下啊
作者:
wyf0931
时间:
2012-11-5 23:32
积极回帖
作者:
kunkun9876
时间:
2012-11-12 14:57
ding ding
作者:
a787469348
时间:
2012-11-12 15:32
回复
1楼
lyf1314
的帖子
顶顶，沙发
作者:
ro897321
时间:
2012-11-12 16:06
厉害
作者:
cqsys
时间:
2012-11-24 20:18
都是妞妞啊···
作者:
艹Top灬疯子丨
时间:
2012-11-28 10:34
借鉴下
作者:
121360309
时间:
2012-11-28 23:24
学习、、、
作者:
loveluo
时间:
2012-12-1 18:27
逆天了
作者:
errol0405
时间:
2012-12-4 08:38
可以试试 学习了·
作者:
zsergb61327
时间:
2012-12-4 14:17
挣钱
作者:
972391983a
时间:
2012-12-4 14:54
.. 无疑
作者:
sbmwl2010
时间:
2012-12-6 19:48
看啦
作者:
swalet
时间:
2012-12-7 16:48
好东东雪雪
作者:
gaoruipeng139
时间:
2012-12-7 17:48
英文的， 来看看
作者:
pxgzs001
时间:
2012-12-7 20:48
小鸟来学习
作者:
零点
时间:
2012-12-13 16:38
顶。。。。。
作者:
qianc
时间:
2012-12-19 09:08
扫雷也有辅助啊
作者:
不知为好
时间:
2012-12-31 20:40
kanxia
作者:
13622024163
时间:
2012-12-31 23:44
试试我能做吗
作者:
357996943
时间:
2013-1-1 17:52
ddddddddd
作者:
gyqtest
时间:
2013-1-2 18:58
回复
1楼
lyf1314
的帖子
11111111111111111
作者:
qebabe
时间:
2013-1-2 22:37
试试
作者:
1173497013
时间:
2013-1-3 20:31
牛人啊 我佩服
还有 你英语几级啊
作者:
qisi2012
时间:
2013-1-3 21:09
哈哈哈哈
作者:
wobuup
时间:
2013-1-5 14:09
作者:
wobuup
时间:
2013-1-5 14:10
ffffffffffff
作者:
newspay
时间:
2013-2-21 10:17
看不懂！求中文版的
作者:
wblove1989
时间:
2013-2-22 11:29
哈哈哈哈哈哈
作者:
930929110
时间:
2013-2-22 23:21
好好好好好好好好好好好好好好好好好好好好好好好好好好好
作者:
armlin
时间:
2013-2-23 17:05
这个好玩
作者:
nxjclement
时间:
2013-3-3 23:08
牛人啊
作者:
feelcool
时间:
2013-3-9 12:32
学习 学习
作者:
as128214121
时间:
2013-3-10 07:51
额。。。。。。
作者:
我是冰冻的番茄
时间:
2013-3-10 20:41
空间 TC多开测试
Ts=array[5]//一个Ts对象对应一个窗口,数组大小定义比窗口数量大一些,以免越界
功能 主线程()
var 返回值,数组大小,i
句柄数组=array[1]
返回值=系统.枚举("找CALL练习",0)
//严格来讲 这里需要对,返回值是否为空,来判断是否有开窗口,查找分割符 来判断是否为单开,
//判断数组大小来判断开启的窗口数量,为了精简易懂,上面都略过.多开的时候记得写上
字符串.分割(返回值,"|",句柄数组)
数组空间.大小(句柄数组,数组大小)//判断数组大小
for(i=0;i<数组大小;i++)
var 参数=句柄数组
&","&i//合并参数 窗口句柄和i的值,i的值是为了传递给Ts
这个对象,每开启一次i+1
//有的朋友就在这里就绑定窗口,其实也是可以的,但我不太喜欢这种做法.
线程.开启("TC多开测试.子线程",参数)//开启分线程
辅助.等待(1000)//等待一下,避免多个线程同时绑定窗口,导致绑定失败
endfor
功能结束
功能 子线程(参数)//接受参数 var 参数=句柄数组
&","&i
var i,窗口句柄,绑定返回值
参数数组=array[1]
字符串.分割(参数,",",参数数组)//分割出传过来的参数 i和窗口句柄的值
窗口句柄=参数数组[0]
i=参数数组[1]
Ts
=com("ts.tssoft")//创建天使对象
绑定返回值=Ts
.BindWindow(窗口句柄,"dx","dx","dx",101)//绑定
辅助.等待(1000)
if(绑定返回值==0)
help.messagebox("绑定失败")
返回 假
else
//这里表示绑定成功,这后面想干嘛,你干嘛..
Ts
.LockInput(1) //对象记得用Ts
,多个线程相互控制窗口就靠这个对象
Ts
.MoveTo(359,239)
窗口.激活(窗口句柄)
Ts
.SendString(窗口句柄,"123456")
辅助.消息框("绑定成功"&i)
endif
功能结束
功能 开始_点击()
线程.开启("TC多开测试.主线程","")
功能结束
空间结束
作者:
赵大高手
时间:
2013-3-14 01:38
下载了研究研究
作者:
13755281481
时间:
2013-3-27 15:27
看看 看看
作者:
htzliubin
时间:
2013-3-27 16:25
KK是什么
作者:
gao24758652
时间:
2013-3-27 17:09
怎么都是英文的呢？？
作者:
engravesoul
时间:
2013-3-27 17:09
回复
2楼
xuhuanqi
的帖子
楼主你好 这个英文的方法名、关键字之类的东西哪里能找到
我下载的工具里的TC库全是中文...
作者:
yy_hhb
时间:
2013-3-31 14:31
bzxbgh
作者:
laowantong
时间:
2013-4-5 13:29
学习
作者:
wawawahahaha
时间:
2013-4-8 18:16
看看
作者:
Pinkbeen
时间:
2013-4-13 21:15
扫雷安安
作者:
wyatte
时间:
2013-4-14 17:50
回复
1楼
lyf1314
的帖子
aaaaaaaaaaaaaaaaaaaaaaaaaaaa
作者:
cc913
时间:
2013-4-25 11:20
看一下......
作者:
muyongji1997
时间:
2013-4-27 19:36
英文代码完全看不懂。以后能换中文的多好。
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1
路过
ffffffffffff