TC官方合作论坛

 找回密码
 立即注册
查看: 1403|回复: 0

[其他] 会ahk写代码的进来

[复制链接]
发表于 2015-11-10 05:49:13 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
大侠们帮我修改下 下面的按键连发 代码  把2rf  那一块 修改下 暴拳正拳 取删除 添加 12个跟f回天胶一样取色的 模拟按键   12个 不同 的按键 不同 取色让每个按键都通过取色进行连发  求各位大侠帮帮忙





;全局应用
#Persistent


;跳过对话框并自动替换旧脚本


#SingleInstance force


Menu, Tray, Tip, 抽筋宏v3.0.0


; 创建自定义菜单项.
Menu, tray, add, 关于, Menu_Tray_About
Menu, tray, add, 重启, Menu_Tray_Reload  
Menu, tray, add, 退出, Menu_Tray_Exit
; 清空系统菜单项.
menu, tray, NoStandard




;从文本数据读取记录 开始
dataname = AutoHotkey.ini


;3rf开关默认关
IniRead, _OP, %dataname%, 开关, op
if (_OP = "ERROR")
_OP = 0


;2rf开关默认关
IniRead, _OP1, %dataname%, 开关, op1
if (_OP1 = "ERROR")
_OP1 = 1

;启用/禁用所有热键
IniRead, _suspend, %dataname%, 键值, suspend
if (_suspend = "ERROR")
_suspend = s

;重新启动程序的热键
IniRead, _reload, %dataname%, 键值, reload
if (_reload = "ERROR")
_reload = z


;默认3rf键值
IniRead, _3RFK, %dataname%, 键值, 3rf
if (_3RFK = "ERROR")
_3RFK = ```

;默认2rf键值
IniRead, _2RFK, %dataname%, 键值, 2rf
if (_2RFK = "ERROR")
_2RFK = 2

;默认弹腿键值
IniRead, _3K, %dataname%, 键值, 3k
if (_3K = "ERROR")
_3K = 3

;默认暴拳键值
IniRead, _2K, %dataname%, 键值, 2k
if (_2K = "ERROR")
_2K = 2

;默认正拳键值
IniRead, _RK, %dataname%, 键值, rk
if (_RK = "ERROR")
_RK = r

;默认回天脚键值
IniRead, _FK, %dataname%, 键值, fk
if (_FK = "ERROR")
_FK = f

;3rf延时
IniRead, _3K_D, %dataname%, 3rf延时, 3kd
if (_3K_D = "ERROR")
_3K_D = 80

IniRead, _3K_U, %dataname%, 3rf延时, 3ku
if (_3K_U = "ERROR")
_3K_U = 190

IniRead, _RK_D, %dataname%, 3rf延时, rkd
if (_RK_D = "ERROR")
_RK_D = 80

IniRead, _RK_U, %dataname%, 3rf延时, rku
if (_RK_U = "ERROR")
_RK_U = 190

IniRead, _FK_D, %dataname%, 3rf延时, fkd
if (_FK_D = "ERROR")
_FK_D = 80

IniRead, _FK_U, %dataname%, 3rf延时, fku
if (_FK_U = "ERROR")
_FK_U = 190


;2rf延时
IniRead, _2K_D, %dataname%, 2rf延时, 2kd
if (_2K_D = "ERROR")
_2K_D = 80

IniRead, _2K_U, %dataname%, 2rf延时, 2ku
if (_2K_U = "ERROR")
_2K_U = 190

IniRead, _2RF_RK_D, %dataname%, 2rf延时, 2rkd
if (_2RF_RK_D = "ERROR")
_2RF_RK_D = 80

IniRead, _2RF_RK_U, %dataname%, 2rf延时, 2rku
if (_2RF_RK_U = "ERROR")
_2RF_RK_U = 190

IniRead, _2RF_FK_D, %dataname%, 2rf延时, 2fkd
if (_2RF_FK_D = "ERROR")
_2RF_FK_D = 80

IniRead, _2RF_FK_U, %dataname%, 2rf延时, 2fku
if (_2RF_FK_U = "ERROR")
_2RF_FK_U = 190





;回天脚X坐标
IniRead, _HTJ_X, %dataname%, 坐标, htjx
if (_HTJ_X = "ERROR")
_HTJ_X = 1

;回天脚Y坐标
IniRead, _HTJ_Y, %dataname%, 坐标, htjy
if (_HTJ_Y = "ERROR")
_HTJ_Y = 1

;回天脚 取色值
IniRead, _HTJ_C, %dataname%, 坐标, htjc
if (_HTJ_C = "ERROR")
_HTJ_C = FFFFFF

;从文本读取记录 结束


;抓取整个屏幕指定坐标的颜色函数。
GetColor(x,y)
{
CoordMode, Pixel, Screen
PixelGetColor, color, x, y, RGB
StringRight color,color,6
return color
}


;GUI界面绘制开始


Gui, -MinimizeBox


Gui, Color,ECF6EE


Gui, Add, Tab2,X10 -Background Center W350 Butt**, 功能开关||键值设置|坐标颜色|3RF延时|2RF*延时|部分键值


Gui, Add, Text,, -----------
Gui, Add, Checkbox, vOP, 开启3RF`n
Gui, Add, Text,, -----------
Gui, Add, Radio, vOP1, 不开启以下功能`n
Gui, Add, Radio, , 开启2R`n
Gui, Add, Radio, , 开启2RF`n
Gui, Add, Radio, , 开启2R2RF`n

Gui, Tab, 2


Gui, Add, Text, section, 启用/禁用所有热键Win+:
Gui, Add, Text,, 重新启动程序的热键Win+:
Gui, Add, Text,, 3rf热键值:
Gui, Add, Text,, 2r/2rf/2r2rf热键值:
Gui, Add, Text,, 弹腿键值:
Gui, Add, Text,, 暴拳键值:
Gui, Add, Text,, 正拳键值:
Gui, Add, Text,, 回天脚键值:

Gui, Add, Edit, w180 ys vsuspend, %_suspend%
Gui, Add, Edit, w180 vreload, %_reload%
Gui, Add, Edit, w180 v3rf, %_3RFK%
Gui, Add, Edit, w180 v2rf, %_2RFK%
Gui, Add, Edit, w180 v3k, %_3K%
Gui, Add, Edit, w180 v2k, %_2K%
Gui, Add, Edit, w180 vrk, %_RK%
Gui, Add, Edit, w180 vfk, %_FK%

Gui, Tab, 3


Gui, Add, Text, section, 回天脚X坐标:
Gui, Add, Text,, 回天脚Y坐标:
Gui, Add, Text,, 回天脚取色:
Gui, Add, Edit, w240 ys vhtj_x, %_HTJ_X%
Gui, Add, Edit, w240 vhtj_y, %_HTJ_Y%
Gui, Add, Edit, w240 vhtj_c, %_HTJ_C%

Gui, Tab, 4


Gui, Add, Text, section, 弹腿按下等待(毫秒):
Gui, Add, Text,, 弹腿弹起等待(毫秒):
Gui, Add, Text,, 正拳按下等待(毫秒):
Gui, Add, Text,, 正拳弹起等待(毫秒):
Gui, Add, Text,, 回天脚按下等待(毫秒):
Gui, Add, Text,, 回天脚弹起等待(毫秒):

Gui, Add, Edit, Limit4 w190 ys v3kd , %_3K_D%
Gui, Add, Edit, Limit4 w190 v3ku, %_3K_U%
Gui, Add, Edit, Limit4 w190 vrkd, %_RK_D%
Gui, Add, Edit, Limit4 w190 vrku, %_RK_U%
Gui, Add, Edit, Limit4 w190 vfkd, %_FK_D%
Gui, Add, Edit, Limit4 w190 vfku, %_FK_U%

Gui, Tab, 5


Gui, Add, Text, section, 暴拳按下等待(毫秒):
Gui, Add, Text,, 暴拳弹起等待(毫秒):
Gui, Add, Text,, 正拳按下等待(毫秒):
Gui, Add, Text,, 正拳弹起等待(毫秒):
Gui, Add, Text,, 回天脚按下等待(毫秒):
Gui, Add, Text,, 回天脚弹起等待(毫秒):

Gui, Add, Edit, Limit4 w190 ys, v2kd, %_2K_D%
Gui, Add, Edit, Limit4 w190 v2ku, %_2K_U%
Gui, Add, Edit, Limit4 w190 v2rkd, %_2RF_RK_D%
Gui, Add, Edit, Limit4 w190 v2rku, %_2RF_RK_U%
Gui, Add, Edit, Limit4 w190 v2fkd, %_2RF_FK_D%
Gui, Add, Edit, Limit4 w190 v2fku, %_2RF_FK_U%

Gui, Tab, 6
Gui, Add, Text,, ---(部分鼠标按键可能不支持按住连发)---`n`n不支持组合键,不区分大小写。避免出错,不要设置重复热键。
Gui, Add, Text, section, 鼠标左键:
Gui, Add, Text,, 鼠标右键:
Gui, Add, Text,, 鼠标中键或滚轮:
Gui, Add, Text,, 鼠标的第四个按钮(侧键):
Gui, Add, Text,, 鼠标的第五个按钮(侧键):
Gui, Add, Text,, CapsLock(大小写切换键)

Gui, Add, Edit, w170 ReadOnly ys, LButton
Gui, Add, Edit, w170 ReadOnly, RButton
Gui, Add, Edit, w170 ReadOnly, MButton
Gui, Add, Edit, w170 ReadOnly, XButton1
Gui, Add, Edit, w170 ReadOnly, XButton2
Gui, Add, Edit, w170 ReadOnly, CapsLock



Gui, Tab  


Gui, Add, Button, default W170 section xm, 立即应用  


Gui, Add, Button, -default W170 ys, 退出程序
;GUI界面绘制结束

;检查记录中是否开启3rf        并赋予状态
if (_OP = 1)
GuiControl,, OP, 1


;检查记录中是否开启2rf        并赋予状态
if (_OP1 = 1)


GuiControl,, 不开启以下功能, 1
else if (_OP1 = 2)


GuiControl,, 开启2R, 1
else if (_OP1 = 3)


GuiControl,, 开启2RF, 1
else if (_OP1 = 4)


GuiControl,, 开启2R2RF, 1

;显示界面
Gui, Show, W370 H320, 抽筋宏v3.0.0


return
;用户右上角点击x时退出脚本
GuiClose:


ExitApp

;触发按时执行
Button退出程序:


{
ExitApp
}

Button立即应用:


{


GuiEscape:


Gui, Submit ,


;存入变量


IniWrite, %OP%, %dataname%,开关, op


IniWrite, %OP1%, %dataname%,开关, op1




IniWrite, %suspend%, %dataname%,键值, suspend


IniWrite, %reload%, %dataname%,键值, reload


IniWrite, %3rf%, %dataname%,键值, 3rf


IniWrite, %2rf%, %dataname%,键值, 2rf


IniWrite, %3k%, %dataname%,键值, 3k


IniWrite, %2k%, %dataname%,键值, 2k


IniWrite, %rk%, %dataname%,键值, rk


IniWrite, %fk%, %dataname%,键值, fk




IniWrite, %3kd%, %dataname%,3rf延时, 3kd


IniWrite, %3ku%, %dataname%,3rf延时, 3ku


IniWrite, %rkd%, %dataname%,3rf延时, rkd


IniWrite, %rku%, %dataname%,3rf延时, rku


IniWrite, %fkd%, %dataname%,3rf延时, fkd


IniWrite, %fku%, %dataname%,3rf延时, fku




IniWrite, %2kd%, %dataname%,2rf延时, 2kd


IniWrite, %2ku%, %dataname%,2rf延时, 2ku


IniWrite, %2rkd%, %dataname%,2rf延时, 2rkd


IniWrite, %2rku%, %dataname%,2rf延时, 2rku


IniWrite, %2fkd%, %dataname%,2rf延时, 2fkd


IniWrite, %2fku%, %dataname%,2rf延时, 2fku




IniWrite, %htj_x%, %dataname%,坐标, htjx


IniWrite, %htj_y%, %dataname%,坐标, htjy


IniWrite, %htj_c%, %dataname%,坐标, htjc




;判断是否开启开关从而设置键值


if (OP)
Hotkey, $%3rf%, My3rf

if (OP1 = 2)
Hotkey, $%2rf%, My2r

else if (OP1 = 3)


Hotkey, $%2rf%, My2rf

else if (OP1 = 4)


Hotkey, $%2rf%, My2r2rf


;win+*启用/禁用所有热键
Hotkey, #%suspend%, mysuspend


;win+*重启脚本


Hotkey, #%reload%, myreload

;3rf方法

My3rf:


loop{


if Not GetKeyState(3rf,"P")
break

Send {%3k% down}
Sleep %3kd%
Send {%3k% up}
Sleep %3ku%


if Not GetKeyState(3rf,"P")
break

Send {%rk% down}
Sleep %rkd%
Send {%rk% up}
Sleep %rku%


if Not GetKeyState(3rf,"P")
break

Send {%fk% down}
Sleep %fkd%
Send {%fk% up}
Sleep %fku%


}


return


;2r方法
My2r:


loop{


if Not GetKeyState(2rf,"P")
break

Send {%2k% down}
Sleep %2kd%
Send {%2k% up}
Sleep %2ku%


if Not GetKeyState(2rf,"P")
break

Send {%rk% down}
Sleep %2rkd%
Send {%rk% up}
Sleep %2rku%


}


return


;2rf方法
My2rf:


loop{


if Not GetKeyState(2rf,"P")
break

Send {%2k% down}
Sleep %2kd%
Send {%2k% up}
Sleep %2ku%


if Not GetKeyState(2rf,"P")
break

Send {%rk% down}
Sleep %2rkd%
Send {%rk% up}
Sleep %2rku%

if Not GetKeyState(2rf,"P")
break

;通过确认颜色决定按键
if (GetColor(htj_x,htj_y) = htj_c){
Send {%fk% down}
Sleep %2fkd%
Send {%fk% up}
Sleep %2fku%
}


}


return


;2r2rf方法
My2r2rf:


loop{


loop, 2{

if Not GetKeyState(2rf,"P")
break

Send {%2k% down}
Sleep %2kd%
Send {%2k% up}
Sleep %2ku%


if Not GetKeyState(2rf,"P")
break

Send {%rk% down}
Sleep %2rkd%
Send {%rk% up}
Sleep %2rku%

}

if Not GetKeyState(2rf,"P")
break


;通过确认颜色决定按键
if (GetColor(htj_x,htj_y) = htj_c){
Send {%fk% down}
Sleep %2fkd%
Send {%fk% up}
Sleep %2fku%
}


}


return


;启用/禁用热键方法


mysuspend:


Suspend
return


;重启程序方法


myreload:


Reload
return

}


;点击关于的方法
Menu_Tray_About:


MsgBox 版本:3.0.0`n`nID:King话神闲`n`nE-Mail:thengod@qq.com`n`n
return


;点击重启的方法
Menu_Tray_Reload:


Reload
return

;点击退出的方法
Menu_Tray_Exit:
ExitApp
return


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-5-16 09:10 , Processed in 0.041018 second(s), 23 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表