冻结以后7.01能用的脚本··上传不了·自己开个记事本复制进去就行了·_综合游戏交流

ZxID：5347901

等级: 下士

举报只看楼主使用道具楼主发表于: 2009-05-20 0

[content too large, truncated for display]

[General]
Description=SD~
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=27
StopHotkeyMod=0
RunOnce=1
EnableWindow=Gundam Online
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1943232333
[Relative]
SetupOCXFile=
[Comment]
Content=

[Script]
Rem Begin
KeyUpS 87,1
KeyUpS 83,1
KeyUpS 65,1
KeyUpS 68,1
KeyUpS 32,1
LeftUpS 1
B=0
Chance=0
Turn=0
IfColor 13,17,5b3913,2
B=B+1
EndIf
IfColor 1015,10,5a370f,2
B=B+1
EndIf
IfColor 16,745,291306,2
B=B+1
EndIf
IfColor 1004,745,9a8207,0
B=B+1
EndIf
If B=4
LostG=0
LostTF=0
Goto Room
Else
Ready=0
Goto OSmain
EndIf
//
Rem Room
Gosub Error
Gosub Ps
Gosub Map
IfColor 15,340,000027,0
Goto 1
LostTF=0
EndIf
IfColor 15,340,000703,0
Goto 1
LostTF=0
EndIf
IfColor 15,340,060400,0
Goto 1
LostTF=0
EndIf
IfColor 140,320,000027,0
Goto 2
LostTF=0
EndIf
IfColor 140,320,000703,0
Goto 2
LostTF=0
EndIf
IfColor 140,320,060400,0
Goto 2
LostTF=0
EndIf
IfColor 265,300,000027,0
Goto 3
LostTF=0
EndIf
IfColor 265,300,000703,0
Goto 3
LostTF=0
EndIf
IfColor 265,300,060400,0
Goto 3
LostTF=0
EndIf
IfColor 390,280,000027,0
Goto 4
LostTF=0
EndIf
IfColor 390,280,000703,0
Goto 4
LostTF=0
EndIf
IfColor 390,280,060400,0
Goto 4
LostTF=0
EndIf
IfColor 524,280,000027,0
Goto 5
LostTF=0
EndIf
IfColor 524,280,000703,0
Goto 5
LostTF=0
EndIf
IfColor 524,280,060400,0
Goto 5
LostTF=0
EndIf
IfColor 649,300,000027,0
Goto 6
LostTF=0
EndIf
IfColor 649,300,000703,0
Goto 6
LostTF=0
EndIf
IfColor 649,300,060400,0
Goto 6
LostTF=0
EndIf
IfColor 774,320,000027,0
Goto 7
LostTF=0
EndIf
IfColor 774,320,000703,0
Goto 7
LostTF=0
EndIf
IfColor 774,320,060400,0
Goto 7
LostTF=0
EndIf
IfColor 900,340,000027,0
Goto 8
LostTF=0
EndIf
IfColor 900,340,000703,0
Goto 8
LostTF=0
EndIf
IfColor 900,340,060400,0
Goto 8
LostTF=0
EndIf
LostTF=LostTF+1
Delay 1000
If LostTF>600
VBSCall RunApp("shutdown -s -t 1 -f")
EndIf
Goto Begin
Rem 1
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 75,457
Delay 800
RightClickS 1
Delay 800
MoveToS 128,497
Gosub Charge
EndIf
EndIf
EndIf
IfColor 77,538,00FFC5,0
Goto Master
EndIf
IfColor 77,538,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 2
IfColor 190,697,E56E00,1
IfColor 221,697,5A00C9,1
IfColor 181,697,BBB2A9,0
MoveToS 199,435
Delay 800
RightClickS 1
Delay 800
MoveToS 252,481
Gosub Charge
EndIf
EndIf
EndIf
IfColor 201,517,00FFC5,0
Goto Master
EndIf
IfColor 201,517,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 3
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 323,416
Delay 800
RightClickS 1
Delay 800
MoveToS 377,456
Gosub Charge
EndIf
EndIf
EndIf
IfColor 327,498,00FFC5,0
Goto Master
EndIf
IfColor 327,498,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 4
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 448,396
Delay 800
RightClickS 1
Delay 800
MoveToS 502,439
Gosub Charge
EndIf
EndIf
EndIf
IfColor 449,477,00FFC5,0
Goto Master
EndIf
IfColor 449,477,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 5
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 586,395
Delay 800
RightClickS 1
Delay 800
MoveToS 644,439
Gosub Charge
EndIf
EndIf
EndIf
IfColor 582,478,00FFC5,0
Goto Master
EndIf
IfColor 582,478,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 6
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 708,415
Delay 800
RightClickS 1
Delay 800
MoveToS 769,456
Gosub Charge
EndIf
EndIf
EndIf
IfColor 705,498,00FFC5,0
Goto Master
EndIf
IfColor 705,498,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 7
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 833,435
Delay 800
RightClickS 1
Delay 800
MoveToS 894,481
Gosub Charge
EndIf
EndIf
EndIf
IfColor 833,518,00FFC5,0
Goto Master
EndIf
IfColor 833,518,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem 8
IfColor 190,697,E56E00,1
IfColor 181,697,BBB2A9,0
IfColor 221,697,5A00C9,1
MoveToS 957,459
Delay 800
RightClickS 1
Delay 800
MoveToS 957,507
Gosub Charge
EndIf
EndIf
EndIf
IfColor 957,537,00FFC5,0
Goto Master
EndIf
IfColor 957,537,FFFFFF,1
UnReady=UnReady+1
If UnReady>2
If Wait=0
KeyPressS 116,1
UnReady=0
Delay 1000
EndIf
EndIf
Delay 1000
Else
UnReady=0
EndIf
Goto Begin
Rem Master
Delay 1000
If Wait=1
Delay 1000
MoveToS 181,23
Delay 1000
LeftClickS 1
Delay 1000
MoveToS 359,488
Delay 1000
LeftClickS 1
Delay 1000
MoveToS 514,566
LeftClickS 1
Goto Begin
Else
For 30
Delay 1000
Gosub Time
If R=2
KeyPressS 116,1
Goto Begin
EndIf
Gosub Players
Gosub PNPR
If PN<>0
If PN = PR
KeyPressS 116,1
Delay 6000
Goto Begin
EndIf
EndIf
Gosub Error
EndFor
If PN=0
Goto Begin
EndIf
KeyPressS 13,1
Delay 500
KeyPressS 90,1
Delay 500
KeyPressS 66,1
Delay 500
KeyPressS 32,1
Delay 500
KeyPressS 32,1
Delay 500
KeyPressS 13,1
Delay 500
KeyDownS 44,1
Delay 500
KeyUpS 44,1
Delay 4500
KeyPressS 116,1
Delay 500
Gosub Error
Delay 1000
Gosub Players
If P1=2
IfColor 77,538,FFFFFF,1
MoveToS 126,284
Delay 500
LeftClickS 1
EndIf
EndIf
If P2=2
IfColor 201,517,FFFFFF,1
MoveToS 251,264
Delay 500
LeftClickS 1
EndIf
EndIf
If P3=2
IfColor 327,498,FFFFFF,1
MoveToS 376,244
Delay 500
LeftClickS 1
EndIf
EndIf
If P4=2
IfColor 449,477,FFFFFF,1
MoveToS 503,224
Delay 500
LeftClickS 1
EndIf
EndIf
If P5=2
IfColor 582,478,FFFFFF,1
MoveToS 521,224
Delay 500
LeftClickS 1
EndIf
EndIf
If P6=2
IfColor 705,498,FFFFFF,1
MoveToS 649,244
Delay 500
LeftClickS 1
EndIf
EndIf
If P7=2
IfColor 833,518,FFFFFF,1
MoveToS 774,264
Delay 500
LeftClickS 1
EndIf
EndIf
If P8=2
IfColor 957,537,FFFFFF,1
MoveToS 899,284
Delay 500
LeftClickS 1
EndIf
EndIf
Delay 500
KeyPressS 116,1
Goto Begin
EndIf
//
Sub Error
IfColor 516,391,000000,0
Ready=0
MoveToS 550,357
Delay 800
LeftClickS 1
EndIf
Return
Sub Ps
M1=0
M2=0
M3=0
M4=0
M5=0
M6=0
IfColor 648,622,6E5432,0
M1=1
EndIf
IfColor 648,649,6E5432,0
M2=1
EndIf
If M2=1
If M1=1
If M11=1
KeyDownS 44,1
M11=0
Delay 500
KeyUpS 44,1
EndIf
Else
If M22=1
KeyDownS 44,1
M22=0
Delay 500
KeyUpS 44,1
EndIf
EndIf
EndIf
IfColor 649,647,0000FF,0
M6=1
EndIf
IfColor 649,634,0000FF,0
M5=1
EndIf
IfColor 649,621,0000FF,0
M4=1
EndIf
IfColor 649,608,0000FF,0
M3=1
EndIf
If M3=1
If M4=1
If M5=1
If M6=1
If M66=0
KeyDownS 44,1
M66=0
Delay 500
KeyUpS 44,1
EndIf
Else
If M55=1
KeyDownS 44,1
M55=0
Delay 500
KeyUpS 44,1
EndIf
EndIf
Else
If M44=1
KeyDownS 44,1
M44=0
Delay 500
KeyUpS 44,1
EndIf
EndIf
Else
If M33=1
KeyDownS 44,1
M33=0
Delay 500
KeyUpS 44,1
EndIf
EndIf
EndIf
Return
Sub Map
IfColor 512,182,38180B,0
Wait=1
Else
Wait=0
EndIf
Return
Sub Charge
Delay 800
LeftClickS 1
Delay 800
MoveToS 546,387
Delay 800
LeftClickS 1
Delay 800
MoveToS 593,357
Delay 800
LeftClickS 1
Return
Sub Players
P1=0
P2=0
P3=0
P4=0
P5=0
P6=0
P7=0
P8=0
PN=0
PR=0
IfColor 130,288,FFFFFF,0
P1=P1+1
EndIf
IfColor 122,280,FFFFFF,0
P1=P1+1
EndIf
IfColor 247,260,FFFFFF,0
P2=P2+1
EndIf
IfColor 255,268,FFFFFF,0
P2=P2+1
EndIf
IfColor 380,248,FFFFFF,0
P3=P3+1
EndIf
IfColor 372,240,FFFFFF,0
P3=P3+1
EndIf
IfColor 499,220,FFFFFF,0
P4=P4+1
EndIf
IfColor 507,228,FFFFFF,0
P4=P4+1
EndIf
IfColor 517,228,FFFFFF,0
P5=P5+1
EndIf
IfColor 525,220,FFFFFF,0
P5=P5+1
EndIf
IfColor 645,248,FFFFFF,0
P6=P6+1
EndIf
IfColor 653,240,FFFFFF,0
P6=P6+1
EndIf
IfColor 778,260,FFFFFF,0
P7=P7+1
EndIf
IfColor 770,268,FFFFFF,0
P7=P7+1
EndIf
IfColor 895,288,FFFFFF,0
P8=P8+1
EndIf
IfColor 903,280,FFFFFF,0
P8=P8+1
EndIf
Return
Sub PNPR
If P1=2
PN=PN+1
EndIf
If P2=2
PN=PN+1
EndIf
If P3=2
PN=PN+1
EndIf
If P4=2
PN=PN+1
EndIf
If P5=2
PN=PN+1
EndIf
If P6=2
PN=PN+1
EndIf
If P7=2
PN=PN+1
EndIf
If P8=2
PN=PN+1
EndIf
IfColor 77,538,FFFFFF,0
PR=PR+1
EndIf
IfColor 201,517,FFFFFF,0
PR=PR+1
EndIf
IfColor 327,498,FFFFFF,0
PR=PR+1
EndIf
IfColor 449,477,FFFFFF,0
PR=PR+1
EndIf
IfColor 582,478,FFFFFF,0
PR=PR+1
EndIf
IfColor 705,498,FFFFFF,0
PR=PR+1
EndIf
IfColor 833,518,FFFFFF,0
PR=PR+1
EndIf
IfColor 957,537,FFFFFF,0
PR=PR+1
EndIf
Return
Sub Time
R=0
IfColor 527,496,FFFFFF,0
R=R+1
EndIf
IfColor 527,573,FFFFFF,0
R=R+1
EndIf
Return
//
Rem OSmain
UnReady=0
Gosub Lost
IfColor 63,52,FCFF00,0
LostG=0
M11=1
M22=1
M33=1
M44=1
M55=1
M66=1
VBSCall GetCursorPos(x,y)
colorl=GetPixelColor(490,415)
colorr=GetPixelColor(574,395)
colort=GetPixelColor(500,350)
IfColor 278,51,FCFF00,0
If KK=0
K=K+1
KK=1
EndIf
EndIf
RightDownS 1
While Chance>-1
KeyPressS 50,1
Delay 100
Random=0
If Special<0
IfColor 647,725,000040,2
Else
Gosub Half
EndIf
EndIf
If Random=1
Goto OSsub
EndIf
IfColor 497,687,0000FE,2
IfColor 779,725,080840,2
Goto OSmelee
Else
Goto OSsa
EndIf
Else
IfColor 779,725,080840,2
Else
IfColor 153,52,FCFF00,1
Goto OSsa
EndIf
EndIf
Gosub Lock
If P>3
Special=Special-1
KeyPressS 87,1
LeftDownS 1
Delay 300
KeyUpS 87,1
Delay 300
LeftUpS 1
Chance=1
Gosub Half
If Random=0
Gosub MoveA
Else
Gosub MoveB
EndIf
Else
Chance=Chance-1
EndIf
EndIf
EndWhile
RightUpS 1
Delay 50
While Turn<3
Gosub Half
If Random=0
Gosub SearchB
Else
Gosub SearchA
EndIf
EndWhile
Turn=0
Gosub Rush
Else
KeyUpS 87,1
KeyUpS 83,1
KeyUpS 65,1
KeyUpS 68,1
KeyUpS 32,1
LeftUpS 1
RightUpS 1
KK=0
Delay 50
LostG=LostG+1
If LostG>600
VBSCall RunApp("shutdown -s -t 1 -f")
EndIf
Goto Speek
EndIf
Goto Beg
//
Rem OSmelee
Gosub Color
MouseWheel 1
Delay 100
RightDownS 1
Delay 200
KeyPressS 87,1
KeyPressS 49,1
Delay 100
KeyDownS 87,1
Chance=9
Long=1
While Chance>-1
Gosub Lock
If P>5
Delay 500
Rem Combo
IfColor 779,725,080840,2
Chance=Chance-5
KeyUpS 87,1
LeftClickS 1
If Long=1
Delay 1200
EndIf
Long=Long-1
Gosub Lock
Else
Goto OSsa
EndIf
If P>3
Goto Combo
EndIf
Else
Chance=Chance-1
EndIf
EndWhile
RightUpS 1
Chance=0
Gosub Search
Goto OSmain
//
Rem OSsub
Gosub Color
Delay 100
KeyDownS 32,1
Delay 100
MouseWheel -1
Delay 100
KeyPressS 51,1
Delay 200
Gosub Lock
If P>3
KeyUpS 32,1
LeftDownS 1
Delay 400
LeftUpS 1
Else
Gosub Lock
If P>3
KeyUpS 32,1
LeftDownS 1
Delay 400
LeftUpS 1
Else
KeyUpS 32,1
Delay 400
EndIf
EndIf
Chance=2
Special=2
KeyPressS 50,1
Goto Begin
//
Rem OSsa
MouseWheel -1
RightDownS 1
Delay 100
MouseWheel -1
Delay 100
MouseWheel -1
Delay 100
KeyPressS 52,1
KeyPressS 87,1
Delay 75
KeyDownS 87,1
KeyDownS 32,1
For 12
IfColor 779,725,080840,2
RightUpS 1
KeyUpS 87,1
Chance=0
Goto Begin
EndIf
Gosub Lock
KeyUpS 32,1
If P>5
Delay 200
LeftClickS 1
KeyUpS 87,1
RightUpS 1
Delay 100
MoveRS 0,-20
Chance=2
Gosub Half
If Random=0
KeyPressS 118
Else
KeyPressS 119
EndIf
Delay 100
MoveRS 0,-5
Delay 200
MoveRS 0,-10
Delay 300
MoveRS 0,-15
Delay 400
MoveRS 0,-20
Delay 400
Goto Begin
EndIf
EndFor
RightUpS 1
KeyUpS 87,1
MoveRS 400,0
RightDownS 1
Delay 200
RightUpS 0
Delay 100
MoveRS 400,0
RightDownS 1
Delay 200
RightUpS 1
EndIf
Goto Begin
//
Sub Half
IfColor 844,53,FFFFFF,2
Random=1
Else
Random=0
EndIf
Return
Sub Lock
P=0
Delay 300
IfColor 512,275,70dcad,2
P = P + 1
EndIf
IfColor 610,384,70dcad,2
P = P + 1
EndIf
IfColor 416,384,70dcad,2
P = P + 1
EndIf
IfColor 512,495,70dcad,2
P = P + 1
EndIf
IfColor 427,300,64f09f,2
P = P + 1
EndIf
IfColor 599,300,64f09f,2
P = P + 1
EndIf
IfColor 599,470,64f09f,2
P = P + 1
EndIf
IfColor 427,470,64f09f,2
P = P + 1
EndIf
IfColor 512,321,70dcad,2
P = P + 1
EndIf
IfColor 569,384,70dcad,2
P = P + 1
EndIf
IfColor 455,384,70dcad,2
P = P + 1
EndIf
IfColor 512,446,70dcad,2
P = P + 1
EndIf
IfColor 459,331,64f09f,2
P = P + 1
EndIf
IfColor 565,331,64f09f,2
P = P + 1
EndIf
IfColor 565,437,64f09f,2
P = P + 1
EndIf
IfColor 459,437,64f09f,2
P = P + 1
EndIf
Return
Sub SearchA
RightDownS 1
KeyPressS 65,1
Delay 100
KeyDownS 65,1
Delay 200
RightUpS 1
Delay 50
MoveRS 600,0
RightDownS 1
Delay 250
KeyUpS 65,1
Delay 200
Gosub Lock
If P>4
IfColor 779,725,080840,2
LeftClickS 1
RightUpS 1
Chance=2
&nb