ref: 97c511cd2f271252cbc9e9746668081422231ca5
dir: /engine/events/catch_tutorial.asm/
CatchTutorial:: ; 4e554 ld a, [wBattleType] dec a ld c, a ld hl, .dw ld b, 0 add hl, bc add hl, bc ld a, [hli] ld h, [hl] ld l, a jp hl .dw ; 4e564 (13:6564) dw .DudeTutorial dw .DudeTutorial dw .DudeTutorial .DudeTutorial: ; 4e56a (13:656a) ; Back up your name to your Mom's name. ld hl, wPlayerName ld de, wMomsName ld bc, NAME_LENGTH call CopyBytes ; Copy Dude's name to your name ld hl, .Dude ld de, wPlayerName ld bc, NAME_LENGTH call CopyBytes call .LoadDudeData xor a ld [hJoyDown], a ld [hJoyPressed], a ld a, [wOptions] push af and $f8 add $3 ld [wOptions], a ld hl, .AutoInput ld a, BANK(.AutoInput) call StartAutoInput callfar StartBattle call StopAutoInput pop af ld [wOptions], a ld hl, wMomsName ld de, wPlayerName ld bc, NAME_LENGTH call CopyBytes ret .LoadDudeData: ; 4e5b7 (13:65b7) ld hl, wDudeNumItems ld [hl], 1 inc hl ld [hl], POTION inc hl ld [hl], 1 inc hl ld [hl], -1 ld hl, wDudeNumKeyItems ld [hl], 0 inc hl ld [hl], -1 ld hl, wDudeNumBalls ld a, 1 ld [hli], a ld a, POKE_BALL ; 5 ld [hli], a ld [hli], a ld [hl], -1 ret .Dude: ; 4e5da db "DUDE@" .AutoInput: ; 4e5df db NO_INPUT, $ff ; end