编程帝请进!
dnf鬼泣吧
全部回复
仅看楼主
level 6
第7中断 楼主
这是什么代码?具体在哪编译?话说我只会VB,不知是不是C,不过我在VC里怎么都报错…纠结~求编程帝鉴定。谢谢哈!#Region ;**** 参数创建于 ACNWrapper_GUI ****#AutoIt3Wrapper_icon=..\My Documents\ico\25.ico#AutoIt3Wrapper_Res_Description=DNF XKey#AutoIt3Wrapper_Res_Fileversion=1.0.0.1#AutoIt3Wrapper_Res_LegalCopyright=小强#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****Opt("TrayAutoPause",0)Opt("TrayMenuMode",1)$Key=IniRead(@ScriptDir&"/Xkey.ini","Set","KEY","x") ;默认是按下X连续发送X,可以通过Xkey.ini来修改$KeyNum=IniRead(@ScriptDir&"/Xkey.ini","Set","KeyNum","58")MsgBox(0,"",$Key&":"&$KeyNum)$aboutitem = TrayCreateItem("关于")TrayCreateItem("")$T_exit = TrayCreateItem("退出")TraySetState()While 1 start() Sleep(10) $msg = TrayGetMsg() Switch $msg Case $T_exit Exit Case $aboutitem Msgbox(64,"关于","版权:版权没有,随意传播") EndSwitchWEndFunc start() If IsPressed($KeyNum) Then While 1 Send($Key) if IsUped($KeyNum) Then ExitLoop sleep(10) WEnd EndIfEndFuncFunc IsPressed($sHexKey, $vDLL = 'user32.dll');判断按键是否按下 Local $a_R = DllCall($vDLL, "int", "GetAsyncKeyState", "int", '0x' & $sHexKey) If Not @error And BitAND($a_R[0], 0x8000) = 0x8000 Then Return 1 Return 0EndFuncFunc IsUped($sHexKey, $vDLL = 'user32.dll');判断按键是否松开 Local $a_R = DllCall($vDLL, "int", "GetAsyncKeyState", "int", '0x' & $sHexKey) If Not @error And BitAND($a_R[0], 0x8000) = 0x0000 Then Return 1 Return 0EndFunc 
2009年09月29日 13点09分 1
level 1
[瀑布汗~]
2009年09月29日 13点09分 2
level 6
第7中断 楼主
晕,手机发的,乱了…这有原版:ht tp:/ /b bs.houdao.co m/r537585/谢谢
2009年09月29日 13点09分 3
level 0
X键连发,发的太乱看不出来
2009年09月29日 13点09分 4
level 6
第7中断 楼主
回4L嗯是的,什么环境编的?这的不乱,htt百p://bbs.houdao.co度m/r537585/
2009年09月29日 14点09分 5
level 6
第7中断 楼主
~>_<~
2009年09月29日 14点09分 6
level 8
不知所云....
2009年09月29日 14点09分 7
level 6
第7中断 楼主
求编程帝鉴定
2009年09月29日 14点09分 8
level 6
第7中断 楼主
AU3源码,鉴定完毕、沉了!
2009年09月29日 14点09分 9
1