TC官方合作论坛

标题: 把这么简单的按键精灵改成tc 不会告诉我不会吧 [打印本页]

作者: ssnever 时间: 2014-8-7 11:09
标题: 把这么简单的按键精灵改成tc 不会告诉我不会吧
MoveTo 121, 104
LeftClick 1

Delay 150
IfColor 1306+4,610+1,"A8DFF4",0 Then

MoveTo 567,168
Hwnd = Plugin.Window.MousePoint()
Else
End If

//Delay 200

MoveTo 319, 103
LeftClick 1

Delay 150
IfColor 1306+4,610+1,"A8DFF4",0 Then

MoveTo 567,168
Hwnd2 = Plugin.Window.MousePoint()
Else
End If
//Delay 200

MoveTo 520, 104
LeftClick 1

Delay 150
IfColor 1306+4,610+1,"A8DFF4",0 Then
MoveTo 567,168
Hwnd3 = Plugin.Window.MousePoint()
Else
End If
//Delay 200

MoveTo 721, 105
LeftClick 1

Delay 150
IfColor 1306+4,610+1,"A8DFF4",0 Then
MoveTo 567,168
Hwnd4 = Plugin.Window.MousePoint()
Else
End If
//Delay 200

MoveTo 920, 104
LeftClick 1
Delay 150
IfColor 1306+4,610+1,"A8DFF4",0 Then
MoveTo 567,168
Hwnd5 = Plugin.Window.MousePoint()
Else
End If
//Delay 200

For 100000000000000000000000000
Call Plugin.Bkgnd.LeftClick(Hwnd, 1392 - 159 + 4, 631 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd2, 1392 - 159 + 4, 631 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd3, 1392 - 159 + 4, 631 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd4, 1392 - 159 + 4, 631 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd5, 1392 - 159+4, 631 - 151+1)
Delay 50
Call Plugin.Bkgnd.LeftClick(Hwnd, 1287 - 159+4, 699 - 151+1)
Call Plugin.Bkgnd.LeftClick(Hwnd2, 1287 - 159 + 4, 699 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd3, 1287 - 159 + 4, 699 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd4, 1287 - 159 + 4, 699 - 151 + 1)
Call Plugin.Bkgnd.LeftClick(Hwnd5, 1287 - 159+4, 699 - 151+1)
delay 302000

Next
//////////////////////////////////////////没有了

改好我复制过来顺便学习下
别出错其实很短的很简单麻烦弄好

作者: 江风影 时间: 2014-8-7 11:47
这简单的程序，太好改了，才几十行，我一写都上千行
。。。。。。。。。。。。。。。不过我不会按键，所以完全是看天书

作者: 78213505 时间: 2014-8-7 11:54
替换关键字就好了被，再加括号

Call是调用功能

作者: xcxzj 时间: 2014-8-7 12:04
既然这么简单，那自己简单化好了，不懂的飘过

作者: 如此美丽。 时间: 2014-8-7 13:16
我不会谢谢。

作者: ssnever 时间: 2014-8-7 13:41
鼠标.移动(121, 104)

鼠标.左键单击(1)
  辅助.等待(150)



  图像值=图像.坐标点取色(1306+4,610+1)
  如果 (图像值 == #A8DFF4)
   鼠标.移动(567,168)
   鼠标窗口1=窗口.鼠标所在窗口句柄()
  否则
   辅助.消息框("这是消息框")
  如果结束

辅助.等待(200)
  鼠标.移动(319, 103)

鼠标.左键单击(1)
  辅助.等待(150)



  图像值=图像.坐标点取色(1306+4,610+1)
  如果 (图像值 == #A8DFF4)
   鼠标.移动(567,168)
   鼠标窗口2=窗口.鼠标所在窗口句柄()
  否则

  如果结束


  辅助.等待(200)
  鼠标.移动(520, 104)

鼠标.左键单击(1)
  辅助.等待(150)



  图像值=图像.坐标点取色(1306+4,610+1)
  如果 (图像值 == #A8DFF4)
   鼠标.移动(567,168)
   鼠标窗口3=窗口.鼠标所在窗口句柄()
  否则

  如果结束


  辅助.等待(200)
  鼠标.移动(721, 105)

鼠标.左键单击(1)
  辅助.等待(150)



  图像值=图像.坐标点取色(1306+4,610+1)
  如果 (图像值 == #A8DFF4)
   鼠标.移动(567,168)
   鼠标窗口4=窗口.鼠标所在窗口句柄()
  否则

  如果结束


  辅助.等待(200)
  鼠标.移动(920, 104)

鼠标.左键单击(1)
  辅助.等待(150)



  图像值=图像.坐标点取色(1306+4,610+1)
  如果 (图像值 == #A8DFF4)
   鼠标.移动(567,168)
   鼠标窗口5=窗口.鼠标所在窗口句柄()
  否则

  如果结束

  辅助.等待(200)




窗口1.鼠标左键按下(窗口句柄,1392 - 159 + 4, 631 - 151 + 1)
窗口2.鼠标左键按下(窗口句柄,1392 - 159 + 4, 631 - 151 + 1)
  窗口3.鼠标左键按下(窗口句柄,1392 - 159 + 4, 631 - 151 + 1)
  窗口4.鼠标左键按下(窗口句柄,1392 - 159 + 4, 631 - 151 + 1)
  窗口5.鼠标左键按下(窗口句柄,1392 - 159 + 4, 631 - 151 + 1)
辅助.等待(50)
  窗口1.鼠标左键按下(窗口句柄,1287 - 159+4, 699 - 151+1)
窗口2.鼠标左键按下(窗口句柄,1287 - 159+4, 699 - 151+1)
窗口3.鼠标左键按下(窗口句柄,1287 - 159+4, 699 - 151+1)
窗口4.鼠标左键按下(窗口句柄,1287 - 159+4, 699 - 151+1)
窗口5.鼠标左键按下(窗口句柄,1287 - 159+4, 699 - 151+1)

辅助.等待(302000)

作者: chenxiaoman 时间: 2014-8-7 14:19
表示没学过按键没学过TC。。专业酱油。

作者: b44412545 时间: 2014-8-7 20:48
CTRL+F 全部替换

作者: 学习者爱学习 时间: 2014-8-9 08:31
不错的东东学学习一下

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)