刚学易几天的新手做的最最简单按键--源代码

gaohui4444

才学易几天哈.做的最简单地按键工具哈.
像我一样才学几天的新手看看还行,老手们还是不要看了.我怕板砖啊..版本 2
.支持库 eAPI

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

' 时钟1.时钟周期 ＝ 100
' 时钟2.时钟周期 ＝ 100
' 时钟3.时钟周期 ＝ 100
' 时钟4.时钟周期 ＝ 100
' 时钟5.时钟周期 ＝ 100
' 时钟6.时钟周期 ＝ 100
' 时钟7.时钟周期 ＝ 100

.子程序 _按钮1_被单击

编辑框8.内容 ＝ “”
' 时钟1.时钟周期 ＝ 500
' 时钟2.时钟周期 ＝ 500
' 时钟3.时钟周期 ＝ 500
' 时钟4.时钟周期 ＝ 500
' 时钟5.时钟周期 ＝ 500
' 时钟6.时钟周期 ＝ 500
' 时钟7.时钟周期 ＝ 500

时钟1.时钟周期 ＝ 到整数 (编辑框1.内容) × 1000
时钟2.时钟周期 ＝ 到整数 (编辑框2.内容) × 1000
时钟3.时钟周期 ＝ 到整数 (编辑框3.内容) × 1000
时钟4.时钟周期 ＝ 到整数 (编辑框4.内容) × 1000
时钟5.时钟周期 ＝ 到整数 (编辑框5.内容) × 1000
时钟6.时钟周期 ＝ 到整数 (编辑框6.内容) × 1000
时钟7.时钟周期 ＝ 到整数 (编辑框7.内容) × 1000
模拟按键 (#键1, #键2, #键3)
模拟按键 (#键4, #键5, #键6)
模拟按键 (#键7, , )

编辑框8.获取焦点 ()


.子程序 _时钟1_周期事件

模拟按键 (#键1, , )
编辑框8.获取焦点 ()

.子程序 _时钟2_周期事件

模拟按键 (#键2, , )
编辑框8.获取焦点 ()

.子程序 _时钟3_周期事件

模拟按键 (#键3, , )
编辑框8.获取焦点 ()

.子程序 _时钟4_周期事件

模拟按键 (#键4, , )
编辑框8.获取焦点 ()

.子程序 _时钟5_周期事件

模拟按键 (#键5, , )
编辑框8.获取焦点 ()

.子程序 _时钟6_周期事件

模拟按键 (#键6, , )
编辑框8.获取焦点 ()

.子程序 _时钟7_周期事件

模拟按键 (#键7, , )
编辑框8.获取焦点 ()

.子程序 _按钮2_被单击

时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
时钟3.时钟周期 ＝ 0
时钟4.时钟周期 ＝ 0
时钟5.时钟周期 ＝ 0
时钟6.时钟周期 ＝ 0
时钟7.时钟周期 ＝ 0


.子程序 _按钮3_被单击

时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
时钟3.时钟周期 ＝ 0
时钟4.时钟周期 ＝ 0
时钟5.时钟周期 ＝ 0
时钟6.时钟周期 ＝ 0
时钟7.时钟周期 ＝ 0

编辑框8.内容 ＝ “感觉如何啊?小伙,  ” ＋ #换行符 ＋ “点开始后先按一次1-7.  ” ＋ #换行符 ＋ “然后每到一个延迟时间再按一个键” ＋ #换行符 ＋ “按暂停后可以先停下来” ＋ #换行符

dzxhpc

看起来，好麻烦哦，你应该加几个程序集变量，可能就要简单了吧

raw001

我是初学者  有个程序不会编啊 有高手教我么

gaohui4444

要不说是新手呢.还不知道程序集的用法呢.今天在研究注册热键和投递消息呢.

cidao1021

可以呀 比我强  能编这样多的了

wqwsz

O(∩_∩)O谢谢分享

navy1977

我也想学习，等高手指点

aspd199

其实其实。只需要一个时钟。