- 注释: Plugin.BGKM6.KeyClick hwndEEa,119
- 注释: End If
- 注释: Delay 100
- 注释: Wend
- 调用 bgkms5.FakeWindowState(hwndEEa,1)
- BGKM6.LClick(hwndEEa,380,447)
- 延时 100 毫秒
- BGKM6.LClick(hwndEEa,204,446)
- 延时 100 毫秒
- 循环当 EE开关 = 1 时
- 调用 Bkgnd.SendString(hwndEEa,"/C01【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C02【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C03【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C04【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C05【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C06【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C07【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C08【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C09【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 调用 Bkgnd.SendString(hwndEEa,"/C10【The use of permanent free】" & 内容EE)
- BGKM6.KeyClick(hwndEEa,13)
- 循环结束
- 子程序结束
- Event(Form1.EE开始.Click)
- 如果 hwndEEa > 0 则
- 令 Form1.EE开始.Visible = 0
- 令 Form1.EE停止.Visible = 1
- 令 EE开关 = 1
- 令 内容AA = Form1.角色EE内容.Text
- 启动线程 EE开始刷喇叭
- 否则
- MsgBox("请输入飞车昵称")
- 条件结束
- (语句无法识别,可能有错误): End Event
- Event(Form1.EE停止.Click)
- 令 Form1.EE开始.Visible = 1
- 令 Form1.EE停止.Visible = 0
- 令 EE开关 = 0
- (语句无法识别,可能有错误): End Event
- 子程序 FF开始刷喇叭()
- 注释: Call Plugin.Window.Restore(hwndFFa)
- 注释: FFckdx = 0
- 注释: While FFckdx = 0
- 注释: WinRectFF = Plugin.WndEx6.GetWindowInfo(hwndFFa,3)
- 注释: FF宽 = WinRectFF(2) - WinRectFF(0)
- 注释: FF高 = WinRectFF(3) - WinRectFF(1)
- 注释: // If FF宽 = 800 and FF高 = 600 Then
- 注释: FFckdx = 1
- 注释: Else
- 注释: FFckdx = 0
- 延时 1000 毫秒
- 注释: Plugin.BGKM6.KeyClick hwndFFa,119
- 注释: End If
- 注释: Delay 100
- 注释: Wend
- 调用 bgkms5.FakeWindowState(hwndFFa,1)
- BGKM6.LClick(hwndFFa,380,447)
- 延时 100 毫秒
- BGKM6.LClick(hwndFFa,204,446)
- 延时 100 毫秒
- 循环当 FF开关 = 1 时
- 调用 Bkgnd.SendString(hwndFFa,"/C01【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C02【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C03【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C04【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C05【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C06【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C07【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C08【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C09【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 调用 Bkgnd.SendString(hwndFFa,"/C10【The use of permanent free】" & 内容FF)
- BGKM6.KeyClick(hwndFFa,13)
- 循环结束
- 子程序结束
- Event(Form1.FF开始.Click)
- 如果 hwndFFa > 0 则
- 令 Form1.FF开始.Visible = 0
- 令 Form1.FF停止.Visible = 1
- 令 FF开关 = 1
- 令 内容FF = Form1.角色FF内容.Text
- 启动线程 FF开始刷喇叭
- 否则