diff options
| author | Ash Ketchum <no-reply@sl0p.foo> | 2026-07-15 02:24:35 +0200 |
|---|---|---|
| committer | Ash Ketchum <no-reply@sl0p.foo> | 2026-07-15 02:24:35 +0200 |
| commit | 99b560dee13e368193db4581fd68cafaac1bf8a1 (patch) | |
| tree | cb1fb516e0b9073a66632c7580e254b0a78be41d /engine/slop_menu.asm | |
| parent | menu: COINS cheat + expand ITEMS with evolution stones (12 items) (diff) | |
| download | pokeyellow-99b560dee13e368193db4581fd68cafaac1bf8a1.tar.gz pokeyellow-99b560dee13e368193db4581fd68cafaac1bf8a1.tar.xz pokeyellow-99b560dee13e368193db4581fd68cafaac1bf8a1.zip | |
menu: TEACH - give the whole party an OP coverage moveset
Sets every party member's 4 moves to Hyper Beam / Earthquake / Ice Beam /
Thunderbolt with 31 PP each. SL0P MENU now 11 entries.
Diffstat (limited to 'engine/slop_menu.asm')
| -rw-r--r-- | engine/slop_menu.asm | 49 |
1 files changed, 46 insertions, 3 deletions
diff --git a/engine/slop_menu.asm b/engine/slop_menu.asm index 4ec7b1e8..df9e3f08 100644 --- a/engine/slop_menu.asm +++ b/engine/slop_menu.asm @@ -8,7 +8,7 @@ ; To add an entry: add a "NAME" line to SlopMenuText, a `dw Handler` to ; SlopMenuHandlers, and bump SLOP_MENU_COUNT. -DEF SLOP_MENU_COUNT EQU 10 +DEF SLOP_MENU_COUNT EQU 11 SECTION "Slop Menu", ROMX @@ -32,11 +32,11 @@ SlopMenu:: hlcoord 6, 3 ld de, SlopMenuText call PlaceString -; ON marker for the NOWILD toggle (item 8 -> row 11) +; ON marker for the NOWILD toggle (item 9 -> row 12) ld a, [wSlopNoWild] and a jr z, .nowildOff - hlcoord 13, 11 + hlcoord 13, 12 ld de, SlopOnText call PlaceString .nowildOff @@ -111,6 +111,7 @@ SlopMenuText: next "BADGES" next "DEX" next "MAXTEAM" + next "TEACH" next "ITEMS" next "NOWILD" next "REPEL@" @@ -124,6 +125,7 @@ SlopMenuHandlers: dw SlopAllBadges dw SlopDex dw SlopMaxTeam + dw SlopTeach dw GiveItemSubmenu dw SlopToggleNoWild dw SlopRepel @@ -310,6 +312,47 @@ SlopHealParty: and a ret +; TEACH: give every party member an OP coverage moveset + PP +; (Hyper Beam / Earthquake / Ice Beam / Thunderbolt) +SlopTeach: + ld a, [wPartyCount] + and a + jr z, .done + ld c, a + ld hl, wPartyMon1 +.loop + push bc + push hl + ld de, $08 ; -> moves + add hl, de + ld a, $3F ; Hyper Beam + ld [hli], a + ld a, $59 ; Earthquake + ld [hli], a + ld a, $3A ; Ice Beam + ld [hli], a + ld a, $55 ; Thunderbolt + ld [hli], a + pop hl + push hl + ld de, $1D ; -> PP + add hl, de + ld b, 4 +.pp + ld a, $1F ; 31 PP each + ld [hli], a + dec b + jr nz, .pp + pop hl + ld de, $2C + add hl, de + pop bc + dec c + jr nz, .loop +.done + and a + ret + ; MONEY: 999999 (BCD) SlopMaxCash: ld a, $99 |