按键精灵自我介绍10版.doc

GeneralDescription=动作教程：按键自我介绍1.1版BeginHotkey=57BeginHotkeyMod=2PauseHotkey=0PauseHotkeyMod=0StopHotkey=123StopHotkeyMod=0RunOnce=0EnableWindow=Enable=0AutoRun=0RepeatType=0Number=1RelativeSetupOCXFile=CommentContent=通用脚本=.【功能说明】.介绍按键精灵最基本的功能，包括打开一个程序、模拟按键、延时、鼠标移动、鼠标点击、鼠标相对移动、保存/恢复鼠标位置、if判断语句、等待按键功能.【使用说明】.按下热键即可启动脚本，之后请按照脚本提示进行操作.【制作日期】.05年05月05日Script/点击编辑界面的注释按钮，即可看到比较详细的脚本说明VBSCall RunApp(notepad)Delay 2000StringDelay=1000/最大化写字板KeyDown 18,1KeyPress 70,1KeyUp 18,1Delay 500KeyPress 37,1Delay 500KeyPress 88,1SayString hi，你好，我是按键精灵，我是个很有趣的软件，如果你愿意花5分钟的时间来了解我，你一定会喜欢上我的。 :-)KeyPress 13,1Delay StringDelaySayString 愿意了解我吗？如果愿意，请你按下键盘上的Y键，如果不喜欢我，那就按下键盘上的N键（等待按键.）KeyPress 13,1Rem 等待按键1WaitKey keyKeyPress 13,1TracePrint 用户按下的键是： & keyIf key=78 Gosub GuanBiChuangKou /按下n不保存，直接关闭 Delay 1000 KeyPress 78,1 Delay 1000 Goto 脚本结束ElseIf key=89 Goto 结束等待1Else SayString 请按Y或者N，不要按其他键(等待按键.) KeyPress 13,1 Goto 等待按键1EndIf Rem 结束等待1SayString 哈哈，我太高兴了，又多了一个喜欢我的朋友，那我先来一个自我介绍吧。KeyPress 13,1Delay StringDelaySayString 我叫“按键精灵”，我的爸爸是伟大的兄弟工作组，我在网上有个家，地址是，欢迎来做客哦KeyPress 13,1Delay StringDelaySayString 嗯，好像废话多了些，如果不希望我继续废话，请按一下键盘，随便哪个键都可以啦（等待按键.）KeyPress 13,1WaitKey keyKeyPress 13,1SayString 嘿嘿，按键了吧。其实我的本领就是让你按一下键盘，就可以作很多动作。不过你好像还有点不太理解哦KeyPress 13,1Delay StringDelaySayString 嗯For 6 SayString . Delay 500EndFor SayString 让我想想怎么解释给你For 6 SayString . Delay 500EndFor KeyPress 13,1SayString 哈，有了，我把一些好朋友使用我的例子介绍给你吧，想听的话就再按一下键盘吧（等待按键.）KeyPress 13,1WaitKey keyKeyPress 13,1SayString 呵呵，其实我最多的朋友是玩游戏的朋友，特别是玩网络游戏的朋友。KeyPress 13,1Delay StringDelaySayString 在游戏里，经常要做一些重复的动作，比如反复按鼠标和键盘，有了我就轻松啦，我可以代替你按键盘和鼠标。KeyPress 13,1Delay StringDelaySayString 我还很聪明的，只要你稍微熟悉我一些，就可以让我作出很多聪明的动作，比如在游戏里面自动找怪物打怪物。KeyPress 13,1Delay StringDelaySayString 由于我只是模仿人们双手的操作，所以我和那些万恶的外挂是坚决划清界限的，大家一定要支持我啊KeyPress 13,1Delay StringDelaySayString 除了玩家之外，我还有很多朋友，比如有的把我当作日常办公的小助手，减轻了很多工作，可惜不给我发工资。KeyPress 13,1Delay StringDelaySayString 总之，我很有用啦，双手可以做到的事情，我都可以代劳，如果你发现有些事情双手做起来很累，就交给我吧！KeyPress 13,1KeyPress 13,1Delay StringDelaySayString 啊，罗嗦了很多啦，下面我还是手把手的告诉你一些我的具体能力吧。KeyPress 13,1Delay StringDelaySayString 先把我的废话都清空，嘻嘻，随便按一个键看我本事吧（等待按键.）KeyPress 13,1WaitKey keyKeyPress 13,1SayString 注意看哦，我接下来会自动按下alt+e进入写字板的编辑菜单，然后再按下a全选我的废话，再按del清空KeyPress 13,1Delay StringDelayDelay StringDelaySayString 倒计时，3、Delay StringDelaySayString 2、Delay StringDelaySayString 1Delay StringDelayKeyDown 18,1KeyPress 69,1KeyUp 18,1Delay StringDelayKeyPress 65,1Delay StringDelayKeyPress 46,1Delay StringDelay/第二步KeyPress 13,1SayString 呼. 整个世界清净了，下面我先介绍一下我的基本能力：模拟键盘和鼠标KeyPress 13,1Delay StringDelaySayString 先按下一下a键，注意了，这可不是我说出来的a，是我模拟按出来的哦KeyPress 13,1Delay StringDelayKeyPress 13,1KeyPress 65,1KeyPress 13,1KeyPress 13,1SayString 看明白了吗？好像不是很明显，那我按3下a键KeyPress 13,1Delay StringDelayKeyPress 13,1KeyPress 65,3KeyPress 13,1KeyPress 13,1SayString 这下是不是更清楚了呢？我再多按一些KeyPress 13,1Delay StringDelayKeyPress 13,1KeyPress 65,1KeyPress 66,1KeyPress 67,1KeyPress 68,1KeyPress 69,1KeyPress 70,1KeyPress 71,1KeyPress 72,1KeyPress 13,1KeyPress 13,1SayString 哈，这下看清了吧？上面这些字母都是我模拟键盘按下去的。KeyPress 13,1Delay StringDelaySayString 我还会按 组合键 呢，我现在按一下ctrl+a，这样可以把我的废话全部选中KeyPress 13,1Delay StringDelayKeyDown 17,1KeyPress 65,1KeyUp 17,1Delay StringDelayKeyPress 35,1SayString 哈哈，看到了吧？我厉害吧？下面介绍一下模拟鼠标，这个动作可复杂了，是套组合动作KeyPress 13,1Delay StringDelaySayString 想让我演示的话就按一下键盘吧（等待按键.）KeyPress 13,1Delay StringDelayWaitKey keyKeyPress 13,1SayString 我先用鼠标画一个圆，然后把鼠标移动到屏幕中间，保存一下鼠标的位置，然后按下右键，KeyPress 13,1SayString 再向左平移一些，再按下左键，然后再把鼠标恢复到中间的位置KeyPress 13,1Delay StringDelaySayString 是不是看起来很复杂？我用慢动作表演一下，注意开始喽KeyPress 13,1KeyPress 13,1Delay StringDelay/第三步Gosub 画圆Delay 1000Call GetScreenResolution(intX,intY)MoveTo 0,0Delay StringDelayMoveTo intX/2,intY/2SaveMousePos Delay StringDelayRightClick 1Delay StringDelayMoveR -20,0Delay StringDelayLeftClick 1Delay StringDelayRestoreMousePos Delay StringDelayKeyDown 17,1KeyPress 35,1KeyUp 17,1SayString 有没有看晕呢？呵呵。其实我演示了我模拟鼠标的基本能力，那就是KeyPress 13,1SayString 鼠标点击、鼠标移动、鼠标相对移动和保存/恢复鼠标位置，当然中间还加了一些延时Delay StringDelayKeyPress 13,1KeyPress 13,1SayString 好了，基本的本领介绍完了，你可以使用我的编辑功能制作这些动作，全是界面操作，非常非常简单，快去试试吧！Delay StringDelayRem 脚本结束MessageBox 脚本演示结束，最好的脚本永远是您自己制作的。 :-)EndScript /例子:关闭当前窗口/说明:Windows里面按下alt+f4即可关闭当前窗口,模拟这个操作Sub GuanBiChuangKou KeyDown 18,1 KeyPress 115,1 KeyUp 18,1Return GuanBiChuangKou/例子:用鼠标画一个圆Sub 画圆 r=300:x0=512:y0=384:x=0:y=0:n=0 While n3.1415926*2 x=x0+r*cos(n) y=y0-r*sin(n) MoveTo x,y Delay 20 n=n+0.03 EndWhile Return 画圆