- UID
- 6283
- 帖子
- 20
- 积分
- 19
- 紫菀
- 0 朵
- 花瓣
- 28 片
- 花蕊
- 8 朵
- 野草莓
- 0 个
- 蒲公英
- 0 朵
- 社区等级
- 2 级
- 在线时间
- 6 小时
- 注册时间
- 2007-2-7
- 登录状态
-
当前离线
|
楼主
发表于 2007-2-26 02:17
| 只看该作者
新春英雄会全自动投票脚本
N=20
KeyPress 117 1
Delay 1000
MoveTo 763 506
LeftClick 1
MoveTo 428 300
LeftClick 1
MoveTo 535 380
LeftDoubleClick 1
//说明:下面这句的10=10Y代表收购金猪的价格,双击下面的语句更改。
SayString 6
MoveTo 515 404
LeftDoubleClick 1
//说明:下面这句的20表示一次收购金猪的数量,双击下面的语句更改。
SayString 20
MoveTo 453 445
LeftClick 1
MoveTo 428 488
LeftClick 1
//说明:下面这句表示开店时的店名看个人喜好更改,双击下面的语句更改。
SayString 全自动收购金猪谢谢大家支持颠峰之族
MoveTo 348 510
LeftClick 1
Delay 3000
Rem 收购金猪
IfColor 508 281 ffffff 0
Goto 收购金猪
Else
Delay 8
Goto 金猪以满
EndIf
Rem 金猪以满
//说明:开始收购
If N=1
Gosub 1
Goto 工作结束
EndIf
If N=2
Gosub 2
Goto 工作结束
EndIf
If N=3
Gosub 3
Goto 工作结束
EndIf
If N=4
Gosub 4
Goto 工作结束
EndIf
If N=5
Gosub 5
Goto 工作结束
EndIf
If N=6
Gosub 6
Goto 工作结束
EndIf
If N=7
Gosub 7
Goto 工作结束
EndIf
If N=8
Gosub 8
Goto 工作结束
EndIf
If N=9
Gosub 9
Goto 工作结束
EndIf
If N=10
Gosub 10
Goto 工作结束
EndIf
If N=11
Gosub 11
Goto 工作结束
EndIf
If N=12
Gosub 12
Goto 工作结束
EndIf
If N=13
Gosub 13
Goto 工作结束
EndIf
If N=14
Gosub 14
Goto 工作结束
EndIf
If N=15
Gosub 15
Goto 工作结束
EndIf
If N=16
Gosub 16
Goto 工作结束
EndIf
If N=17
Gosub 17
Goto 工作结束
EndIf
If N=18
Gosub 18
Goto 工作结束
EndIf
If N=19
Gosub 19
Goto 工作结束
EndIf
If N=20
Gosub 20
Goto 工作结束
EndIf
If N=21
Gosub 21
Goto 工作结束
EndIf
If N=22
Gosub 22
Goto 工作结束
EndIf
If N=23
Gosub 23
Goto 工作结束
EndIf
If N=24
Gosub 24
Goto 工作结束
EndIf
If N=25
Gosub 25
Goto 工作结束
EndIf
Rem 工作结束
EndScript Sub 25
MoveTo 883 506
LeftDoubleClick 1
Delay 8
Sub 24
MoveTo 843 506
LeftDoubleClick 1
Delay 8
Sub 23
MoveTo 803 506
LeftDoubleClick 1
Delay 8
Sub 22
MoveTo 763 506
LeftDoubleClick 1
Delay 8
Sub 21
MoveTo 723 506
LeftDoubleClick 1
Delay 8
Sub 20
MoveTo 883 466
LeftDoubleClick 1
Delay 8
Sub 19
MoveTo 843 466
LeftDoubleClick 1
Delay 8
Sub 18
MoveTo 803 466
LeftDoubleClick 1
Delay 8
Sub 17
MoveTo 763 466
LeftDoubleClick 1
Delay 8
Sub 16
MoveTo 723 466
LeftDoubleClick 1
Delay 8
Sub 15
MoveTo 883 426
LeftDoubleClick 1
Delay 8
Sub 14
MoveTo 843 426
LeftDoubleClick 1
Delay 8
Sub 13
MoveTo 803 426
LeftDoubleClick 1
Delay 8
Sub 12
MoveTo 763 426
LeftDoubleClick 1
Delay 8
Sub 11
MoveTo 723 426
LeftDoubleClick 1
Delay 8
Sub 10
MoveTo 883 386
LeftDoubleClick 1
Delay 8
Sub 9
MoveTo 843 386
LeftDoubleClick 1
Delay 8
Sub 8
MoveTo 803 386
LeftDoubleClick 1
Delay 8
Sub 7
MoveTo 763 386
LeftDoubleClick 1
Delay 8
Sub 6
MoveTo 723 386
LeftDoubleClick 1
Delay 8
Sub 5
MoveTo 883 346
LeftDoubleClick 1
Delay 8
Sub 4
MoveTo 843 346
LeftDoubleClick 1
Delay 8
Sub 3
MoveTo 803 346
LeftDoubleClick 1
Delay 8
Sub 2
MoveTo 763 346
LeftDoubleClick 1
Delay 8
Sub 1
MoveTo 723 346
LeftDoubleClick 1
Delay 8
Return
谁可以把它做出来,谢谢 |
|