ref: 94722aa8f08ceaef8233d73a87f534b6c3f0475f
dir: /event/whiteout.asm/
Script_BattleWhiteout:: ; 0x124c1 callasm BattleBGMap jump Script_Whiteout ; 0x124c8 Script_OverworldWhiteout:: ; 0x124c8 refreshscreen $0 callasm OverworldBGMap Script_Whiteout: ; 0x124ce writetext .WhitedOutText waitbutton special FadeOutPalettes pause 40 special HealParty checkflag ENGINE_BUG_CONTEST_TIMER iftrue .bug_contest callasm HalveMoney callasm GetWhiteoutSpawn farscall Script_AbortBugContest special WarpToSpawnPoint newloadmap MAPSETUP_WARP end_all .bug_contest jumpstd bugcontestresultswarp ; 0x124f5 .WhitedOutText: ; 0x124f5 ; is out of useable #MON! whited out! text_jump UnknownText_0x1c0a4e db "@" ; 0x124fa OverworldBGMap: ; 124fa call ClearPalettes call ClearScreen call WaitBGMap2 call HideSprites call RotateThreePalettesLeft ret ; 1250a BattleBGMap: ; 1250a ld b, SCGB_BATTLE_GRAYSCALE call GetSGBLayout call SetPalettes ret ; 12513 HalveMoney: ; 12513 callba TrainerRankings_WhiteOuts ; Halve the player's money. ld hl, Money ld a, [hl] srl a ld [hli], a ld a, [hl] rra ld [hli], a ld a, [hl] rra ld [hl], a ret ; 12527 GetWhiteoutSpawn: ; 12527 ld a, [wLastSpawnMapGroup] ld d, a ld a, [wLastSpawnMapNumber] ld e, a callba IsSpawnPoint ld a, c jr c, .yes xor a ; SPAWN_HOME .yes ld [DefaultSpawnpoint], a ret ; 1253d