Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #Include C:\Program Files\AutoHotkey\lib\FindText.ahk
- t1:=A_TickCount, Text:=X:=Y:=""
- Text:="|<TwentyOne>**100$44.00000007zzzU7zt0008102E0020E0Y000U4090008102E001wE0bzzz17s8000EE22000440UU00110883zzkE220U0040UU80010882000E220U0040Ubs0010891zzzk22EE0000UY40000891000022EE0000UY40000891000022EE0000UY40000891zzzk22E00040UY00010890000E22E00040UY0001089zzzzk3y00000008"
- F9:: ; START
- {
- ; Be sure to start behind the
- ; scientist and have the game and text at 2x speed
- ; Chosen Coromon must be head of party
- found := false ; updates when a level 21 coromon is obtained
- while !found
- {
- Send "{space down}" ; initiate convo
- Send "{space up}"
- Sleep 2000
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Send "{space down}"
- Sleep 2000
- Send "{space up}" ; To coromon select
- Send "{w down}" ; to enable the reticle
- Sleep 1000
- Send "{w up}"
- Send "{space down}" ; Selects FIRST coromon in party
- Send "{space up}"
- Sleep 2000
- Send "{space down}"
- Send "{space up}"
- Sleep 1500
- Send "{space down}"
- Send "{space up}"
- Sleep 2000
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Send "{space down}"
- Sleep 1500
- Send "{space up}"
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Send "{x down}"
- Send "{s down}"
- Sleep 250
- Send "{s up}" ; Goes down to the wall we're using
- Loop 50 ; Left to Right perfectly
- {
- Send "{a down}"
- Sleep 1700
- Send "{a up}"
- Send "{d down}"
- Sleep 1700
- Send "{d up}"
- }
- Send "{x up}"
- Sleep 275
- Send "{x down}"
- Send "{a down}" ; Go back to scientist
- Sleep 225
- Send "{a up}"
- Send "{w down}"
- Sleep 275
- Send "{w up}"
- Send "{x up}"
- Sleep 2000
- Send "{space down}"
- Sleep 300
- Send "{space up}"
- Sleep 500
- Send "{space down}"
- Sleep 300
- Send "{space up}"
- Sleep 2750
- ; check coromon new value
- if (ok:=FindText(&X, &Y, 1642-150000, 949-150000, 1642+150000, 949+150000, 0, 0,Text))
- {
- Msgbox "PERFECTION ACHIEVED"
- found := true
- Send "{x up}"
- Send "{d up}"
- Send "{s up}"
- Send "{a up}"
- Send "{w up}"
- break
- }
- else
- {
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Sleep 2250
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Sleep 2250
- Send "{s down}" ; These 3 inputs are in case the coromon gains
- Sleep 2000 ; more stats due to increasing to a higher potential level.
- Send "{s up}"
- Sleep 2000
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- sleep 2250
- Send "{escape down}" ; inventory
- Sleep 2000
- Send "{escape up}"
- Send "{w down}" ; leave game
- Sleep 2000
- Send "{w up}"
- Send "{w down}"
- Sleep 2000
- Send "{w up}"
- Send "{space down}"
- Sleep 2250
- Send "{space up}"
- Send "{a down}"
- Sleep 2000
- Send "{a up}"
- Send "{a down}"
- Sleep 2000
- Send "{a up}"
- Send "{space down}"
- Sleep 3750
- Send "{space up}"
- Sleep 3250
- ; wait for main menu to load
- Send "{space down}"
- Sleep 2250
- Send "{space up}"
- Sleep 3250
- Send "{s down}"
- Sleep 2000
- Send "{s up}"
- Sleep 2250
- Send "{space down}"
- Sleep 2000
- Send "{space up}"
- Sleep 1500
- Send "{space down}"
- Sleep 750
- Send "{space up}"
- Sleep 2750
- Sleep 2750
- }
- Sleep 3250
- Send "{x up}"
- Send "{d up}"
- Send "{s up}"
- Send "{a up}"
- Send "{w up}"
- }
- }
- F10:: ; STOP
- {
- Send "{x up}"
- Send "{d up}"
- Send "{s up}"
- Send "{a up}"
- Send "{w up}"
- Reload
- Return
- }
- +F10:: ExitApp ;E-stop to shut app down fully (Shift+F10)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement