TC官方合作论坛

标题: 做连发键的脚本，改键连发。Z键改数字1，X键改数字2。 [打印本页]

作者: 剑仙十号 时间: 2015-7-22 09:54
标题: 做连发键的脚本，改键连发。Z键改数字1，X键改数字2。

关键字：TC做连发键的脚本。按键精灵做连发键的脚本。 DNF连发键。

TC有hook回调函数，做连发键的脚本比较方便。
按键精灵没有hook回调函数，做连发键的脚本比较难。

//做连发键的脚本，改键连发。Z键改数字1，X键改数字2。
//新建立一个脚本，代码全部粘贴，覆盖原来的代码就可以了。
var hThread,hThread1,hThread2 //设置全局变量.相当于按键精灵的环境变量.

function 启动_热键()
  //按热键F8,开户线程1 线程2,并返回线程句柄.
  hThread=threadbegin("主程序","")
  sleep(30)
  hThread1=threadbegin("连发键1","")
  sleep(30)
  threadsuspend(hThread1)//暂停线程1.
  hThread2=threadbegin("连发键2","")
  sleep(30)
  threadsuspend(hThread2)//暂停线程2.
End

function 主程序() //主线程函数.
  var QQ1,QQ2,mykey1=49,mykey2=50  //连发键,是主键盘上的1和2.
  while(true)//循环1开始.
QQ1 = dllcall("user32.dll","long", "GetAsyncKeyState","long",mykey1)//调用Win32 的API函数,读取按键状态.
QQ2 = dllcall("user32.dll","long", "GetAsyncKeyState","long",mykey2)//调用Win32 的API函数,读取按键状态.

if(QQ1!=0)
   traceprint("恢复线程1.")
   threadresume(hThread1)//恢复线程2.
   sleep(10)//下面开始用GetAsyncKeyState,判断数字1,有无弹起.

   while(QQ1!=0)  //小循环开始.
      QQ1 = dllcall("user32.dll","long", "GetAsyncKeyState","long",mykey1)//调用Win32 的API函数,读取按键状态.
      sleep(50)  //等待50毫秒会一直循环,直到放开数字"1".
   end //小循环结束.
   traceprint("暂停线程1.")
   threadsuspend(hThread1)//暂停线程2.
   sleep(10)
end

if(QQ2!=0)
   traceprint("恢复线程2.")
   threadresume(hThread2)//恢复线程2.
   sleep(10)//下面开始用GetAsyncKeyState,判断数字2,有无弹起.

   while(QQ2!=0)  //小循环开始.
      QQ2 = dllcall("user32.dll","long", "GetAsyncKeyState","long",mykey2)//调用Win32 的API函数,读取按键状态.
      sleep(50)  //等待50毫秒会一直循环,直到放开数字"2".
   end //小循环结束.
   traceprint("暂停线程2.")
   threadsuspend(hThread2)//暂停线程2.
   sleep(10)
end

  end//循环1结束.
end

function 连发键1()//线程1函数.
  while(true)
keypress(90)
sleep(10)
  end
end

function 连发键2()//线程2函数.
  while(true)
keypress(88)
sleep(10)
  end
end

function 终止_热键()
  //按热键F9,关闭主线程,线程1,线程2.
  threadclose(hThread)
  threadclose(hThread1)
  threadclose(hThread2)
end

作者: 言术 时间: 2015-7-22 10:03
启动热键的end是大写了

作者: qwe1063422121 时间: 2015-7-23 17:38
就不能英转中发布一下吗？欺负我们这些英语不懂的吧......

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