脚本制作教程:按键精灵加速游戏

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

精心整理脚本制作教程:按键精灵加速游戏

来源:按键学院【按键精灵】植物大战僵尸这款游戏,想必大家都不陌生

讲述的是一场植物与僵尸之间刻骨铭心的撕逼大战

是一款老少皆宜和善可爱的游戏……此处省略一万字……

『4』快和慢这两个蓝色的按钮,也是用于调整速度的,与滑块的区别在于:滑块可以一次性拉动很大的范围,而按钮是精确调整的,每一次点击增/减一个单位的速度。

『5』恢复"按钮",用于将速度归零。

变速命令

变速命令是官方新插件里的 SysEx系统插件增强版下的命令:Speed

注意:速度的倍数,范围:-256~256,保留小数点后3位,可以实现1.001、1.002倍速度。

我们要实现,拖动滑块图片,往左右移动的时候,滑块图片会跟随着鼠标移动。

步骤:

『1』当我们点住滑块这张图片时,获取当前鼠标位置。

『2』启动计时器,计时器的时间间隔设置为50毫秒。

『3』在计时器的Timer事件里再次获取当前鼠标位置,对比两次获取鼠标位置之间横坐标的差值。『4』将滑块图片的横坐标加上两次鼠标位置之间的横坐标差值。

『5』检测鼠标左键是否弹起,如果弹起则将计时器的Enabled属性设置为假。

整体代码

//调试运行事件子程序

//SubOnScriptLoad()

//Form1.Show

//EndSub

Form1.Show

EndScript

//《》

当前句柄=0

CallForm1.

EndEvent

//《》

EventForm1.

Form1.

Form1.滑块

Form1.

Call(

EndEvent

Form1.

EndEvent

//《》

EventForm1.

Form1.滑块

IfForm1.滑块

Form1.

//

Call(

EndEvent

//《》

EventForm1.快.Click

Form1.滑块.Left=Form1.滑块.Left+1

IfForm1.滑块.Left>=296ThenForm1.滑块.Left=296

Form1.速度值.Caption=Form1.滑块.Left-196&"倍数"

//设置指定窗口(Hwnd)加速到100倍

Call(当前句柄,Form1.滑块.Left-196)

EndEvent

//《》-------------滑块变速

EventForm1.滑块.Click

GetCursorPosqx,qy

hx=Form1.滑块.Left

EndEvent

GetCursorPosx,y

dx=x-qx

Ifhx+dx<=16Then

Form1.滑块.Left=16

ElseIfhx+dx>=296Then

Form1.滑块.Left=296

Else

Form1.滑块.Left=hx+dx

EndIf

Form1.速度值.Caption=Form1.滑块.Left-196&"倍数" //设置指定窗口(Hwnd)加速到100倍

Call(

=False

EndIf

EndEvent

//《》

EventForm1.

CallForm1.

Form1.

s="0-空|"

当前句柄=0

EndEvent

er

Do

Form1.

Form1.

ExitDo

Else

IfsT ext<>""Thens=s&Hwnd1&"-"&sText&"|"

EndIf

EndIf

Loop

EndEvent

//《》-------------选择窗口标题

EventForm1.窗口标题.SelectChange

CallForm1.恢复速度.Click

Dim索引

索引=Split(Form1.窗口标题.List,"|")

当前句柄=split(索引(Form1.窗口标题.ListIndex),"-")(0) Call(当前句柄,Form1.滑块.Left-196)

EndEvent

//《》-------------界面关闭后停止变速

EventForm1.UnLoad

CallForm1.恢复速度.Click

EndEvent

注意:变速命令,并不是说对所有的网游都无效的,变速游戏会影响到游戏的这些地方:

1、过场景时的速度快慢

相关文档
最新文档