------------------------
Constants
AttackKey = V
AttackDelay = 450
AttackLoop = 1
LootKey = B
LootLoop = 0
LootDelay = 50
Rotate = 1
AttackCount = 0 /
LootCount = 0
BotCount = 0
CurrentStatus = 0
Face = 0
Temp = 0
Temp2 = 0
End
Procedure Attack
KeyDown $AttackKey 50
Delay $AttackDelay
Compute BotCount = $BotCount + 1
End
Procedure Loot
Keydown $LootKey 30
Delay $LootDelay
Compute BotCount = $BotCount + 1
End
Procedure Bot
If $CurrentStatus = 0
If $AttackCount > $AttackLoop
SetConst CurrentStatus = 1
SetConst AttackCount = 0
Else
Call Attack
Compute AttackCount = $AttackCount + 1
End
End
If $CurrentStatus = 1
If $LootCount > $LootLoop
SetConst CurrentStatus = 2
SetConst LootCount = 0
Else
Call Loot
Compute LootCount = $LootCount + 1
End
End
If $CurrentStatus = 2
If $Rotate = 1
If $Face = 0
SetConst Face = 1
Delay 5
Keydown {RIGHT} 50
Delay 5
Else
SetConst Face = 0
Delay 5
Keydown {LEFT} 50
Delay 5
End
End
SetConst CurrentStatus = 0
End
End
Procedure InitializeCount
SetConst AttackLoop = 0
SetConst LootLoop = 0
SetConst BotCount = 0
SetConst CurrentStatus = 0
End
// My brain bruur, yeah ^^..
SetActiveWindow Ghost Online
Delay 1
While 1=1
Call Bot
End