vitreous and ganon fixes for damage table

Fixes graphical issues with sanctuary and swamp hub lobbies
Major fix for decoupled doors landing area
Fix for multiworld absorbables

.gitignore

@@ -1,3 +1,5 @@
 tournament.asm
 /build
 /.idea
+/__pycache__
+/.vscode

LTTP_RND_GeneralBugfixes.asm

@@ -3,67 +3,112 @@
 ;================================================================================
 lorom
 
-;===================================================================================================
-
-; THIS NEEDS TO BE THE FIRST INCLUDE BECAUSE IT CHANGES THINGS EVERYWHERE
-; If this were to be included later, it would almost certainly overwrite other changes
-incsrc "fastrom.asm"
-
 ;================================================================================
 
-;org $80FFC0 ; <- 7FC0 - Bank00.asm : 9173 (db "THE LEGEND OF ZELDA  " ; 21 bytes)
-;db $23, $4E
+;org $00FFC0 ; <- 7FC0 - Bank00.asm : 9173 (db "THE LEGEND OF ZELDA  " ; 21 bytes)
+;db #$23, $4E
 
-org $80FFD5 ; <- 7FD5 - Bank00.asm : 9175 (db $20   ; rom layout)
-db $30 ; set fast lorom
+org $00FFD5 ; <- 7FD5 - Bank00.asm : 9175 (db $20   ; rom layout)
+db #$30 ; set fast lorom
 
-;org $80FFD6 ; <- 7FD6 - Bank00.asm : 9176 (db $02   ; cartridge type)
-;db $55 ; enable S-RTC
+;org $00FFD6 ; <- 7FD6 - Bank00.asm : 9176 (db $02   ; cartridge type)
+;db #$55 ; enable S-RTC
 
-org $80FFD7 ; <- 7FD7 - Bank00.asm : 9177 (db $0A   ; rom size)
-db $0B ; mark rom as 16mbit
+org $00FFD7 ; <- 7FD7 - Bank00.asm : 9177 (db $0A   ; rom size)
+db #$0B ; mark rom as 16mbit
 
-org $80FFD8 ; <- 7FD8 - Bank00.asm : 9178 (db $03   ; ram size (sram size))
-db $05 ; mark sram as 32k
+org $00FFD8 ; <- 7FD8 - Bank00.asm : 9178 (db $03   ; ram size (sram size))
+db #$05 ; mark sram as 32k
 
-org $BFFFFF ; <- 1FFFFF
-db $00 ; expand file to 2mb
+org $3FFFFF ; <- 1FFFFF
+db #$00 ; expand file to 2mb
 
-org $9FFFF8 ; <- FFFF8 timestamp rom
-db $20, $19, $08, $31 ; year/month/day
+org $1FFFF8 ; <- FFFF8 timestamp rom
+db #$20, #$19, #$08, #$31 ; year/month/day
 
 ;================================================================================
 !ROM_VERSION_LOW ?= 1  ; ROM version (two 16-bit integers)
-!ROM_VERSION_HIGH ?= 4 ;
+!ROM_VERSION_HIGH ?= 2 ;
 
-org $80FFE0 ; Unused hardware vector
+org $00FFE0 ; Unused hardware vector
 RomVersion:
 dw !ROM_VERSION_LOW
 dw !ROM_VERSION_HIGH
 
 ;================================================================================
+
 !ADD = "CLC : ADC"
 !SUB = "SEC : SBC"
 !BLT = "BCC"
 !BGE = "BCS"
 
+!MS_GOT = "$7F5031"
+
+!REDRAW = "$7F5000"
+!GANON_WARP_CHAIN = "$7F5032";
+
+!TILE_UPLOAD_BUFFER = "$7EA180";
+
+!FORCE_HEART_SPAWN = "$7F5033";
+!SKIP_HEART_SAVE = "$7F5034";
+
+; MSU-1
+!REG_MSU_FALLBACK_TABLE = $7F50A0   ; 8 bytes
+!REG_MSU_DELAYED_COMMAND = $7F50A9
+!REG_MSU_PACK_COUNT = $7F50AA
+!REG_MSU_PACK_CURRENT = $7F50AB
+!REG_MSU_PACK_REQUEST = $7F50AC
+!REG_MSU_LOADED_TRACK = $7F50AD     ; 2 bytes
+!REG_SPC_LOADING = $7F50AF
+!MSU_LOADED_TRACK = $7F5400
+!MSU_RESUME_TRACK = $7F5401
+!MSU_RESUME_TIME = $7F5402          ; 4 bytes
+!MSU_RESUME_CONTROL = $7F5406
+!REG_MUSIC_CONTROL = $012B
+;!REG_MUSIC_CONTROL = $012C
+!REG_MUSIC_CONTROL_REQUEST = $012C
+
+!ONEMIND_ID = $7F5072
+!ONEMIND_TIMER = $7F5073
+
 function hexto555(h) = ((((h&$FF)/8)<<10)|(((h>>8&$FF)/8)<<5)|(((h>>16&$FF)/8)<<0))
 
 ; Feature flags, run asar with -DFEATURE_X=1 to enable
+!FEATURE_NEW_TEXT ?= 0
 
 ;================================================================================
 
+!MULTIWORLD_ITEM = "$7EF4D2"
+!MULTIWORLD_ITEM_FROM = "$7EF4D3"
+!MULTIWORLD_ROOMID = "$7EF4D4"
+!MULTIWORLD_ROOMDATA = "$7EF4D6"
+!MULTIWORLD_SCOUT_LOCATION = "$7EF4D7"
+!MULTIWORLD_SCOUTREPLY_LOCATION = "$7EF4D8"
+!MULTIWORLD_SCOUTREPLY_ITEM = "$7EF4D9"
+!MULTIWORLD_SCOUTREPLY_PLAYER = "$7EF4DA"
+!MULTIWORLD_RECEIVING_ITEM = "$7EC057" ; 0 = default | 1 = receiving
+!MULTIWORLD_HUD_CHARACTER_DATA = "$7EC058" ; 0x40 bytes
+!MULTIWORLD_ITEM_PLAYER_ID = "$7EC098" ; 0 = disabled
+!MULTIWORLD_SPRITEITEM_PLAYER_ID = "$7EC099"
+!MULTIWORLD_HUD_TIMER = "$7EC09A"
+!MULTIWORLD_HUD_DELAY = "#120"
+!MULTIWORLD_ITEM_ID = "$7EC09B" ; for lua scripts?
+!Dungeon_ChestData = "$01E96C"
+
+!FLAG_OW_MIXED = $04
+!FLAG_OW_CROSSED = $02
+
 incsrc hooks.asm
+incsrc treekid.asm
 incsrc spriteswap.asm
 incsrc hashalphabethooks.asm
 incsrc sharedplayerpalettefix.asm
 incsrc ram.asm
 incsrc sram.asm
-incsrc registers.asm
-incsrc vanillalabels.asm
-incsrc overworldmap.asm ; Overwrites some code in bank $8A
 
-org $A08000 ; bank $20
+;org $208000 ; bank #$20
+org $A08000 ; bank #$A0
+incsrc newitems.asm ; LEAVE THIS AS FIRST
 incsrc itemdowngrade.asm
 incsrc bugfixes.asm
 incsrc darkworldspawn.asm
@@ -71,6 +116,7 @@ incsrc lampmantlecone.asm
 incsrc floodgatesoftlock.asm
 incsrc heartpieces.asm
 incsrc npcitems.asm
+incsrc utilities.asm
 incsrc flipperkill.asm
 incsrc pendantcrystalhud.asm
 incsrc potions.asm
@@ -81,28 +127,30 @@ incsrc tablets.asm
 incsrc fairyfixes.asm
 incsrc rngfixes.asm
 incsrc medallions.asm
+incsrc inventory.asm
+incsrc ganonfixes.asm
 incsrc zelda.asm
 incsrc maidencrystals.asm
+incsrc zoraking.asm
+incsrc catfish.asm
 incsrc flute.asm
 incsrc dungeondrops.asm
 incsrc halfmagicbat.asm
+incsrc mantle.asm
 incsrc swordswap.asm
-incsrc stats.asm
+incsrc scratchpad.asm
+incsrc map.asm
 incsrc dialog.asm
 incsrc entrances.asm
+incsrc clock.asm
 incsrc accessibility.asm
 incsrc heartbeep.asm
 incsrc capacityupgrades.asm
-incsrc timer.asm
-incsrc doorframefixes.asm
-incsrc music.asm
-incsrc roomloading.asm
-incsrc icepalacegraphics.asm
 warnpc $A18000
 
-org $9C8000 ; text tables for translation
-incbin "data/i18n_en.bin"
-warnpc $9CF356
+org $1C8000 ; text tables for translation
+incbin i18n_en.bin
+warnpc $1CF356
 
 org $A18000 ; static mapping area
 incsrc framehook.asm
@@ -113,7 +161,7 @@ incsrc hud.asm
 warnpc $A18800
 
 org $A18800 ; static mapping area
-
+incsrc zsnes.asm
 warnpc $A19000
 
 org $A1A000 ; static mapping area. Referenced by front end. Do not move.
@@ -129,11 +177,19 @@ org $A1FF00 ; static mapping area
 incsrc init.asm
 
 org $A48000 ; code bank - PUT NEW CODE HERE
+incsrc timer.asm
+incsrc doorframefixes.asm
+incsrc music.asm
+incsrc roomloading.asm
+incsrc icepalacegraphics.asm
+incsrc firebarlayer.asm
 incsrc glitched.asm
 incsrc hardmode.asm
 incsrc goalitem.asm
 incsrc quickswap.asm
+incsrc endingsequence.asm
 incsrc cuccostorm.asm
+incsrc compression.asm
 incsrc retro.asm
 incsrc controllerjank.asm
 incsrc boots.asm
@@ -144,156 +200,166 @@ incsrc decryption.asm
 incsrc hashalphabet.asm
 incsrc inverted.asm
 incsrc invertedmaps.asm
+incsrc bonktreemaps.asm
 incsrc newhud.asm
+incsrc compasses.asm
 incsrc save.asm
 incsrc password.asm
 incsrc enemy_adjustments.asm
-incsrc hudtext.asm
+incsrc stats.asm
+;incsrc hudtext.asm
 incsrc servicerequest.asm
 incsrc elder.asm
 incsrc toast.asm
+incsrc darkroomitems.asm
 incsrc fastcredits.asm
 incsrc msu.asm
 incsrc dungeonmap.asm
-incsrc special_weapons.asm
-incsrc variable_ganon_vulnerability.asm
-incsrc item_on_b.asm
-incsrc hextodec.asm
-incsrc textrenderer.asm
+incsrc multiworld.asm
+incsrc terrorpin.asm
+if !FEATURE_NEW_TEXT
+    incsrc textrenderer.asm
+endif
 warnpc $A58000
 
-org $A28000
-ItemReceiptGraphicsROM:
-; we need some empty space here so that 0000 can mean nothing
-fillbyte $00 : fill 32
-incbin "data/customitems.4bpp"
-warnpc $A2B000
-org $A2B000
-incsrc itemdatatables.asm ; Statically mapped
-incsrc decompresseditemgraphics.asm
-incsrc newitems.asm
-incsrc utilities.asm
-incsrc inventory.asm
+;org $228000 ; contrib area
+org $A28000 ; contrib area
+incsrc contrib.asm
+incsrc special_weapons.asm
+incsrc variable_ganon_vulnerability.asm
+incsrc trolls.asm
+warnpc $A38000
 
 org $A38000
-incsrc stats/credits.asm ; Statically mapped
 incsrc stats/main.asm
-incsrc stats/statConfig.asm
-FontTable:
-incsrc stats/fonttable.asm
 
-org $B08000 ; bank $30
+incsrc menu/overworldmap.asm ; overwrites some code in bank 0A
+incsrc doorrando/doorrando.asm ; bank 27 likely A7 in the future
+;bank 28/A8 for keydropshuffle / standing items
+incsrc keydrop/standing_items.asm
+incsrc owrando.asm ; bank AA
+incsrc enemizer/main.asm ; this is originally in bank 36, but is currently in migratory status in bank 37
+
+org $308000 ; bank #$30
 incsrc tables.asm
+warnpc $318000
 
-org $B48000
+org $348000
 incsrc spc.asm
 
-org $B18000 ; bank $31
+; uncomment for inverted adjustments
+;incsrc sandbox.asm
+
+org $318000 ; bank #$31
 GFX_Mire_Bombos:
-incbin "data/99ff1_bombos.gfx"
-warnpc $B18800
+incbin 99ff1_bombos.gfx
+warnpc $318800
 
-org $B18800
+org $318800
 GFX_Mire_Quake:
-incbin "data/99ff1_quake.gfx"
-warnpc $B19000
+incbin 99ff1_quake.gfx
+warnpc $319000
 
-org $B19000
+org $319000
 GFX_TRock_Bombos:
-incbin "data/a6fc4_bombos.gfx"
-warnpc $B19800
+incbin a6fc4_bombos.gfx
+warnpc $319800
 
-org $B19800
+org $319800
 GFX_TRock_Ether:
-incbin "data/a6fc4_ether.gfx"
-warnpc $B1A000
+incbin a6fc4_ether.gfx
+warnpc $31A000
 
-org $B1A000
+org $31A000
 GFX_HUD_Items:
-incbin "data/c2807_v4.gfx"
-warnpc $B1A800
+incbin c2807_v4.gfx
+warnpc $31A800
 
-org $B1A800
+org $31A800
+GFX_New_Items:
+incbin newitems.gfx
+;incbin eventitems.gfx ; *EVENT*
+warnpc $31B000
 
-warnpc $B1B000
-
-org $B1B000
+org $31B000
 GFX_HUD_Main:
-incbin "data/c2e3e.gfx"
-warnpc $B1B800
+incbin c2e3e.gfx
+warnpc $31B800
 
-org $B1C000
+org $31C000
 IcePalaceFloorGfx:
-incbin "data/ice_palace_floor.bin"
-warnpc $B1C801
+incbin ice_palace_floor.bin
+warnpc $31C801
 
-org $B1C800
+org $31C800
 Damage_Table:
-incbin "data/damage_table.bin"
-warnpc $B1D001
+incbin damage_table.bin
+warnpc $31D001
 
-org $B1D000
+org $31D000
 FileSelectNewGraphics:
-incbin "data/fileselectgfx.2bpp"
-warnpc $B1E001
+incbin fileselect.chr.gfx
+warnpc $31E001
 
-org $B1E000
+org $31E000
 InvertedCastleHole: ;address used by front end. DO NOT MOVE!
-incbin "data/sheet73.gfx"
-warnpc $B1E501
+incbin sheet73.gfx
+warnpc $31E501
 
-org $B1E800
+org $31E800
 Damage_Table_Bombs:
-incbin "data/damage_table_sword_bombs.bin"
-warnpc $B1F000
+incbin damage_table_sword_bombs.bin
+warnpc $31F000
 
-org $B1F000
+org $31F000
 Damage_Table_Pseudo:
-incbin "data/damage_table_pseudo_sword.bin"
-warnpc $B1F800
+incbin damage_table_pseudo_sword.bin
+warnpc $31F800
 
-org $B38000
+org $338000
 GFX_HUD_Palette:
-incbin "data/hudpalette.pal"
-warnpc $B38041
+incbin hudpalette.pal
+warnpc $338041
 
-org $B39000
-ExpandedTrinexx:
-incbin "data/sheet178.gfx"
-warnpc $B39600
+org $339000
+incbin sheet178.gfx
+warnpc $339600
 
-org $B39600
+org $339600
 BossMapIconGFX:
-incbin "data/bossicons.4bpp"
+incbin bossicons.4bpp
 
-org $B39C00
-NewFont:
-incbin "data/newfont.bin"
-NewFontInverted:
-incbin "data/newfont_inverted.bin"
-SmallCharacters:
-incbin "data/smallchars.2bpp"
-org $8CD7DF
-incsrc data/playernamecharmap.asm
-org $8CE73D
-incbin data/playernamestripes_1.bin
-org $8CE911
-incbin data/playernamestripes_2.bin
-incsrc data/kanjireplacements.asm ; Overwrites text gfx data and masks in bank $8E
+if !FEATURE_NEW_TEXT
+    org $339C00
+    NewFont:
+    incbin newfont.bin
+    NewFontInverted:
+    incbin newfont_inverted.bin
 
-org $B28000
+    org $0CD7DF
+    incbin text_unscramble1.bin
+    org $0CE4D5
+    incbin text_unscramble2.bin
+endif
+
+org $328000
 Extra_Text_Table:
-incsrc itemtext.asm
+if !FEATURE_NEW_TEXT
+    incsrc itemtext_lower.asm
+else
+    incsrc itemtext.asm
+endif
+warnpc $32E000
+
+org $32DFD0	; PC 0x195FD0
+incsrc multiworldplayernames.asm
+warnpc $330000
 
 incsrc externalhooks.asm
 ;================================================================================
-org $919100 ; PC 0x89100
-incbin "data/map_icons.gfx"
-warnpc $919401
-;================================================================================
-org $9BB1E0
-incsrc custompalettes.asm
-warnpc $9BB880
+org $119100 ; PC 0x89100
+incbin map_icons.gfx
+warnpc $119401
 ;================================================================================
 org $AF8000 ; PC 0x178000
 Static_RNG: ; each line below is 512 bytes of rng
@@ -308,10 +374,14 @@ warnpc $B08000
 ;Bank Map
 ;$20 Code Bank
 ;$21 Reserved (Frame Hook & Init)
-;$22 Unused
+;$22 Contrib Code
 ;$23 Stats & Credits
 ;$24 Code Bank
+;$27 DR Code Bank
+;$28 Keydrop / Standing Items Code bank
 ;$29 External hooks (rest of bank not used)
+;$2A Reserved for OWR
+;$2B Room Data migration
 ;$2E Reserved for Tournament Use
 ;$2F Static RNG (rest is reserved for tournament use)
 ;$30 Main Configuration Table
@@ -324,18 +394,18 @@ warnpc $B08000
 ;$3F reserved for internal debugging
 ;================================================================================
 ;RAM
-;See ram.asm for label assignments
-;$7EC900[0x1F00]: BigRAM buffer
+;$7E021B[0x1]: Used by race game instead of $0ABF to avoid witch item conflict
+;$7EC900[0x1F00]: BIGRAM buffer
 ;$7EF000[0x500]: SRAM mirror First 0x500 bytes of SRAM
 ;   See sram.asm for labels and assignments
 ;$7F5000[0x800]: Rando's main free ram region
-;   See ram.asm for specific assignments
+;   See tables.asm for specific assignments
 ;$7F6000[0x1000]: SRAM buffer mapped to vanilla save slots 1 and 2
 ;   See sram.asm for labels and assignments
 ;$7F7667[0x6719] - free ram
 ;================================================================================
 ;SRAM Map
-;See sram.asm for label assignments and documentation
+;See sram.asm for rando-specific assignments
 ;$70:0000 (5K) Game state
 ;  0000-04FF Vanilla Slot 1 (mirrored at $7EF000)
 ;  0500-14FF Ext Slot 1 (mirrored at $7F6000)
@@ -343,19 +413,423 @@ warnpc $B08000
 ;$70:3000 (0x16) Password
 ;$70:6000 (8K) Scratch buffers
 ;================================================================================
+;org $0080DC ; <- 0xDC - Bank00.asm:179 - Kill Music
+;db #$A9, #$00, #$EA
+;LDA.b #$00 : NOP
+;================================================================================
+;org $0AC53E ; <- 5453E - Bank0A.asm:1103 - (LDA $0AC51F, X) - i have no idea what this is for anymore
+;LDA.b #$7F
+;NOP #2
+;================================================================================
+;org $05DF8B ; <- 2DF8B - Bank05.asm : 2483
+;AND.w #$0100 ; allow Sprite_DrawMultiple to access lower half of sprite tiles
+;================================================================================
+;org $0DF8F1 ; this is required for the X-indicator in the HUD except not anymore obviously
+;
+;;red pendant
+;db $2B, $31, $2C, $31, $3D, $31, $2E, $31
+;db $2B, $25, $2C, $25, $2D, $25, $2E, $25
+;
+;;blue pendant
+;db $2B, $31, $2C, $31, $3D, $31, $2E, $31
+;db $2B, $2D, $2C, $2D, $2D, $2D, $2E, $2D
+;
+;;green pendant
+;db $2B, $31, $2C, $31, $3D, $31, $2E, $31
+;db $2B, $3D, $2C, $3D, $2D, $3D, $2E, $3D
+;================================================================================
+;org $00CFF2 ; 0x4FF2 - Mire H
+;db GFX_Mire_Bombos>>16
+;org $00D0D1 ; 0x50D1 - Mire M
+;db GFX_Mire_Bombos>>8
+;org $00D1B0 ; 0x51B0 - Mire L
+;db GFX_Mire_Bombos
 
-org $80D09C ; 0x509C - HUD Items H
+;org $00D020 ; 0x5020 - Trock H
+;db GFX_TRock_Bombos>>16
+;org $00D0FF ; 0x50FF - Trock M
+;db GFX_TRock_Bombos>>8
+;org $00D1DE ; 0x51DE - Trock L
+;db GFX_TRock_Bombos
+
+org $00D09C ; 0x509C - HUD Items H
 db GFX_HUD_Items>>16
-org $80D17B ; 0x517B - HUD Items M
+org $00D17B ; 0x517B - HUD Items M
 db GFX_HUD_Items>>8
-org $80D25A ; 0x525A - HUD Items L
+org $00D25A ; 0x525A - HUD Items L
 db GFX_HUD_Items
 
-org $80D09D ; 0x509D - HUD Main H
-db GFX_HUD_Main>>16
-org $80D17C ; 0x517C - HUD Main M
-db GFX_HUD_Main>>8
-org $80D25B ; 0x525B - HUD Main L
-db GFX_HUD_Main
+; this used to be a pointer to a dummy file
+org $00D065 ; 005065 - New Items H
+db GFX_New_Items>>16
+org $00D144 ; 005114 - New Items M
+db GFX_New_Items>>8
+org $00D223 ; 005223 - New Items L
+db GFX_New_Items
 
+org $00D09D ; 0x509D - HUD Main H
+db GFX_HUD_Main>>16
+org $00D17C ; 0x517C - HUD Main M
+db GFX_HUD_Main>>8
+org $00D25B ; 0x525B - HUD Main L
+db GFX_HUD_Main
+;================================================================================
+org $008781
+UseImplicitRegIndexedLocalJumpTable:
+
+org $00879c
+UseImplicitRegIndexedLongJumpTable:
+
+org $008333
+Vram_EraseTilemaps_triforce:
+
+org $008913
+Sound_LoadLightWorldSongBank:
+org $00891D
+    .do_load
+
+org $00893D
+EnableForceBlank:
+
+DungeonMask = $0098C0
+
+org $00D308
+DecompSwordGfx:
+
+org $00D348
+DecompShieldGfx:
+
+org $00D463
+Tagalong_LoadGfx:
+
+org $00D51B
+GetAnimatedSpriteTile:
+
+org $00D52D
+GetAnimatedSpriteTile_variable:
+
+org $00D84E
+Attract_DecompressStoryGfx:
+
+org $00E529
+LoadSelectScreenGfx:
+
+org $00F945
+PrepDungeonExit:
+
+org $00FDEE
+Mirror_InitHdmaSettings:
+
+org $01873A
+Dungeon_LoadRoom:
+
+org $02821E
+Module_PreDungeon:
+org $028296
+    .setAmbientSfx
+
+org $02A0A8
+Dungeon_SaveRoomData:
+
+org $02A0BE
+Dungeon_SaveRoomData_justKeys:
+
+org $02A4E3
+Overworld_ActualScreenID:
+
+org $02B861
+Dungeon_SaveRoomQuadrantData:
+
+org $02C11D
+CalculateTransitionLanding:
+
+org $02C176
+Overworld_FinalizeEntryOntoScreen_Data:
+
+org $02D9B9
+Underworld_LoadSpawnEntrance:
+
+org $02E99D
+FluteMenu_LoadTransport:
+
+org $02FD8A ; 17D8A - Bank0E.asm: 3732 Note: Different bank
+LoadGearPalettes_bunny:
+
+org $02FD95 ; 17D95 - Bank0E.asm: 3742 Note: Different bank
+LoadGearPalettes_variable:
+
+org $02FEAB
+Filter_Majorly_Whiten_Color:
+
+org $04E780
+Overworld_MemorizeMap16Change:
+
+org $04E879
+Overworld_CheckForSpecialOverworldTrigger_Direction:
+
+org $05A51D
+Sprite_SpawnFallingItem:
+
+org $05AFF1
+Sprite_6C_MirrorPortal_dont_do_warp:
+
+org $05DF6C ; 02DF6C - Bank05.asm : 2445
+Sprite_DrawMultiple:
+
+org $05DF70 ; 02DF70 - Bank05.asm : 2454
+Sprite_DrawMultiple_quantity_preset:
+
+org $05DF75 ; 02DF75 - Bank05.asm : 2461
+Sprite_DrawMultiple_player_deferred:
+
+org $05E1A7 ; 02E1A7 - Bank05.asm : 2592
+Sprite_ShowSolicitedMessageIfPlayerFacing:
+
+org $05E1F0
+Sprite_ShowMessageFromPlayerContact:
+
+org $05E219
+Sprite_ShowMessageUnconditional:
+
+org $05EC96
+Sprite_ZeldaLong:
+
+org $0680FA
+Player_ApplyRumbleToSprites:
+
+org $0683E6
+Utility_CheckIfHitBoxesOverlapLong:
+
+org $06A7DB
+Chicken_SpawnAvengerChicken: ; returns short
+
+org $06AD58
+Sprite_TransmuteToBomb:
+
+org $06DC5C
+Sprite_DrawShadowLong:
+
+org $06DD40
+DashKey_Draw:
+
+org $06DBF8
+Sprite_PrepAndDrawSingleLargeLong:
+
+org $06DC00
+Sprite_PrepAndDrawSingleSmallLong:
+
+org $06EA18
+Sprite_ApplySpeedTowardsPlayerLong:
+
+org $06EAA6
+Sprite_DirectionToFacePlayerLong:
+
+org $06F12F
+Sprite_CheckDamageToPlayerSameLayerLong:
+
+org $06F86A
+OAM_AllocateDeferToPlayerLong:
+
+org $0791B3
+Player_HaltDashAttackLong:
+
+org $07999D
+Link_ReceiveItem:
+
+org $079F82
+Link_UseHammer:
+
+org $07A985
+SetGameModeLikeMirror:
+
+org $07E68F
+Unknown_Method_0: ; In US version disassembly simply called "$3E6A6 IN ROM"
+
+org $07F413
+Link_CheckForEdgeScreenTransition:
+
+org $07F4AA
+Sprite_CheckIfPlayerPreoccupied:
+
+org $08C3AE
+Ancilla_ReceiveItem:
+
+org $08C505
+Ancilla_ReceiveItem_objectFinished:
+
+org $08CE93
+Ancilla_BreakTowerSeal_draw_single_crystal:
+
+org $08CEC3
+Ancilla_BreakTowerSeal_stop_spawning_sparkles:
+
+org $08CF59
+BreakTowerSeal_ExecuteSparkles:
+
+org $08F710
+Ancilla_SetOam_XY_Long:
+
+org $0985E2 ; (break on $0985E4)
+AddReceivedItem:
+
+org $098605
+AddReceivedItem_notCrystal:
+
+org $098766
+AddReceivedItem_gfxHandling:
+
+org $098BAD
+AddPendantOrCrystal:
+
+org $098CFD
+AddWeathervaneExplosion:
+
+org $0993DF
+AddDashTremor:
+
+org $099D04
+AddAncillaLong:
+
+org $099D1A
+Ancilla_CheckIfAlreadyExistsLong:
+
+org $09AC57
+Ancilla_TerminateSelectInteractives:
+
+org $09AE64
+Sprite_SetSpawnedCoords:
+
+org $09AD58
+GiveRupeeGift:
+
+org $0AB7BD
+FluteMenu_HandleSelection_NoSelection:
+
+org $0ABA4F
+OverworldMap_InitGfx:
+
+org $0ABA99
+OverworldMap_DarkWorldTilemap:
+
+org $0ABAB9
+OverworldMap_LoadSprGfx:
+
+org $8AE817
+DungeonMapBossRooms:
+
+org $0CD7D1
+NameFile_MakeScreenVisible:
+org $0CDB3E
+InitializeSaveFile:
+org $0CDBC0
+InitializeSaveFile_build_checksum:
+
+org $0DBA71
+GetRandomInt:
+
+org $0DBA80
+OAM_AllocateFromRegionA:
+org $0DBA84
+OAM_AllocateFromRegionB:
+org $0DBA88
+OAM_AllocateFromRegionC:
+org $0DBA8C
+OAM_AllocateFromRegionD:
+org $0DBA90
+OAM_AllocateFromRegionE:
+org $0DBA94
+OAM_AllocateFromRegionF:
+
+org $0DBB67
+Sound_SetSfxPanWithPlayerCoords:
+
+org $0DBB6E
+Sound_SetSfx1PanLong:
+
+org $0DBB7C
+Sound_SetSfx2PanLong:
+
+org $0DBB8A
+Sound_SetSfx3PanLong:
+
+org $0DDB7F
+HUD_RefreshIconLong:
+
+org $0DDD32
+Equipment_UpdateEquippedItemLong:
+
+org $0DE01E ; 6E10E - equipment.asm : 787
+BottleMenu_movingOn:
+
+org $0DE346
+RestoreNormalMenu:
+
+org $0DE395
+Equipment_SearchForEquippedItemLong:
+
+org $0DE9C8
+DrawProgressIcons: ; this returns short
+
+org $0DED29
+DrawEquipment: ; this returns short
+
+org $0DFA78
+HUD_RebuildLong:
+
+org $0DFA88
+HUD_RebuildIndoor_Palace:
+
+org $0DFA88
+HUD_RebuildLong2:
+
+org $0EEE10
+Messaging_Text:
+
+org $0FFD94
+Overworld_TileAttr:
+
+org $1BC97C
+Overworld_DrawPersistentMap16:
+
+org $1BED03
+Palette_Sword:
+
+org $1BED29
+Palette_Shield:
+
+org $1BEDF9
+Palette_ArmorAndGloves:
+
+org $1BEE52
+Palette_Hud:
+
+org $1BEF96
+Palette_SelectScreen:
+
+org $1CFAAA
+ShopKeeper_RapidTerminateReceiveItem:
+
+org $1CF500
+Sprite_NullifyHookshotDrag:
+
+org $1CF537
+Ancilla_CheckForAvailableSlot:
+
+org $1DE9B6
+Filter_MajorWhitenMain:
+
+org $1DF65D
+Sprite_SpawnDynamically:
+
+org $1DF65F
+Sprite_SpawnDynamically_arbitrary:
+
+org $1DFD4B
+DiggingGameGuy_AttemptPrizeSpawn:
+
+org $1EDE28
+Sprite_GetEmptyBottleIndex: ; this is totally in sprite_bees.asm
+
+org $1EF4E7
+Sprite_PlayerCantPassThrough:
 ;================================================================================

README.md

@@ -0,0 +1,15 @@
+# z3randomizer
+Zelda 3 Randomizer Template ASM
+
+How to create the bps patch:
+
+* Assemble the ROM with asar (recommend to use a copy of original rom)
+
+`asar LTTP_RND_GeneralBugfixes.asm copy_original_rom.sfc`
+(copy_orignal_rom.sfc is now assembled_rom.sfc)
+
+* Use flips to create a bps file
+
+`flips original_rom.sfc assembled_rom.sfc  base2current.bps`
+
+* Update RANDOMIZERBASEHASH in DR with the md5 sum of assembled_rom.sfc. And put base2current.bps in the data directory.

accessibility.asm

@@ -1,118 +1,127 @@
 ;================================================================================
 ; Accessibility Fixes
 ;================================================================================
+FlipGreenPendant:
+	LDA $0C : CMP #$38 : BNE + ; check if we have green pendant
+		ORA #$40 : STA $0C ; flip it
+	+
+	
+    LDA $0D : STA $0802, X ; stuff we wrote over "Set CHR, palette, and priority of the sprite"
+    LDA $0C : STA $0803, X
+RTL
+;================================================================================
 ConditionalLightning:
         CMP.b #$05 : BEQ ++
         CMP.b #$2C : BEQ ++
         CMP.b #$5A : BEQ ++
             LDA.l DisableFlashing : BNE ++
-                LDA.b #$32 : STA.w CGADSUBQ
+                LDA.b #$32 : STA.w $9A
                 RTL
         ++
                 LDA.b #$72
-        STA.b CGADSUBQ
+        STA $9A
 RTL
 ;================================================================================
 ConditionalWhitenBg:
         LDX.b #$00
         LDA.l DisableFlashing : REP #$20 : BNE +
-            LDA.b Scrap00,X
+            LDA $00,X
             JSR WhitenLoopReal
             RTL
         +
-            LDA.b Scrap00
+            LDA $00
             JSR WhitenLoopDummy
             RTL
 ;================================================================================
 WhitenLoopReal:
         -
-            LDA.l PaletteBufferAux+$40, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$40, X
-            LDA.l PaletteBufferAux+$50, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$50, X
-            LDA.l PaletteBufferAux+$60, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$60, X
-            LDA.l PaletteBufferAux+$70, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$70, X
-            LDA.l PaletteBufferAux+$80, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$80, X
-            LDA.l PaletteBufferAux+$90, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$90, X
-            LDA.l PaletteBufferAux+$A0, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$A0, X
-            LDA.l PaletteBufferAux+$B0, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$B0, X
-            LDA.l PaletteBufferAux+$C0, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$C0, X
-            LDA.l PaletteBufferAux+$D0, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$D0, X
-            LDA.l PaletteBufferAux+$E0, X : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$E0, X
+            LDA $7EC340, X : JSL Filter_Majorly_Whiten_Color : STA $7EC540, X
+            LDA $7EC350, X : JSL Filter_Majorly_Whiten_Color : STA $7EC550, X
+            LDA $7EC360, X : JSL Filter_Majorly_Whiten_Color : STA $7EC560, X
+            LDA $7EC370, X : JSL Filter_Majorly_Whiten_Color : STA $7EC570, X
+            LDA $7EC380, X : JSL Filter_Majorly_Whiten_Color : STA $7EC580, X
+            LDA $7EC390, X : JSL Filter_Majorly_Whiten_Color : STA $7EC590, X
+            LDA $7EC3A0, X : JSL Filter_Majorly_Whiten_Color : STA $7EC5A0, X
+            LDA $7EC3B0, X : JSL Filter_Majorly_Whiten_Color : STA $7EC5B0, X
+            LDA $7EC3C0, X : JSL Filter_Majorly_Whiten_Color : STA $7EC5C0, X
+            LDA $7EC3D0, X : JSL Filter_Majorly_Whiten_Color : STA $7EC5D0, X
+            LDA $7EC3E0, X : JSL Filter_Majorly_Whiten_Color : STA $7EC5E0, X
             INX #2 : CPX.b #$10 : BEQ +
                 JMP -
         +
-            LDA.l PaletteBufferAux+$F0 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F0
-            LDA.l PaletteBufferAux+$F2 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F2
-            LDA.l PaletteBufferAux+$F4 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F4
-            LDA.b GameMode : CMP.w #$0007 : BNE +
-            LDA.b RoomIndex
-            CMP.w #$003C : BEQ ++
-            CMP.w #$009D : BEQ ++
-            CMP.w #$009C : BEQ ++
-            CMP.w #$00A5 : BEQ ++
+            LDA $7EC3F0 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F0
+            LDA $7EC3F2 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F2
+            LDA $7EC3F4 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F4
+            LDA $10 : CMP.w #$07 : BNE +
+            LDA $048E
+            CMP.w #$3C : BEQ ++
+            CMP.w #$9D : BEQ ++
+            CMP.w #$9C : BEQ ++
+            CMP.w #$A5 : BEQ ++
             +
-                LDA.l PaletteBufferAux+$F6 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F6
-                LDA.l PaletteBufferAux+$F8 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F8
+                LDA $7EC3F6 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F6
+                LDA $7EC3F8 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F8
                 BRA +++
             ++
-                LDA.l PaletteBuffer+$F6 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F6
-                LDA.l PaletteBuffer+$F8 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F8
+                LDA $7EC3F6 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F6
+                LDA $7EC3F8 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F8
                 BRA +++
             +++
-            LDA.l PaletteBufferAux+$FA : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$FA
-            LDA.l PaletteBufferAux+$FC : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$FC
-            LDA.l PaletteBufferAux+$FE : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$FE
+            LDA $7EC3FA : JSL Filter_Majorly_Whiten_Color : STA $7EC5FA
+            LDA $7EC3FC : JSL Filter_Majorly_Whiten_Color : STA $7EC5FC
+            LDA $7EC3FE : JSL Filter_Majorly_Whiten_Color : STA $7EC5FE
             REP #$10
-            LDA.l PaletteBuffer+$40 : TAY
-            LDA.l PaletteBufferAux : BNE +
+            LDA $7EC540 : TAY
+            LDA $7EC300 : BNE +
                 TAY
         +
-            TYA : STA.l PaletteBuffer
+            TYA : STA $7EC500
             SEP #$30
 RTS
 ;================================================================================
 WhitenLoopDummy:
         -
-            LDA.l PaletteBufferAux+$40, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$40, X
-            LDA.l PaletteBufferAux+$50, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$50, X
-            LDA.l PaletteBufferAux+$60, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$60, X
-            LDA.l PaletteBufferAux+$70, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$70, X
-            LDA.l PaletteBufferAux+$80, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$80, X
-            LDA.l PaletteBufferAux+$90, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$90, X
-            LDA.l PaletteBufferAux+$A0, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$A0, X
-            LDA.l PaletteBufferAux+$B0, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$B0, X
-            LDA.l PaletteBufferAux+$C0, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$C0, X
-            LDA.l PaletteBufferAux+$D0, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$D0, X
-            LDA.l PaletteBufferAux+$E0, X : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$E0, X
+            LDA $7EC340, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC540, X
+            LDA $7EC350, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC550, X
+            LDA $7EC360, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC560, X
+            LDA $7EC370, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC570, X
+            LDA $7EC380, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC580, X
+            LDA $7EC390, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC590, X
+            LDA $7EC3A0, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC5A0, X
+            LDA $7EC3B0, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC5B0, X
+            LDA $7EC3C0, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC5C0, X
+            LDA $7EC3D0, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC5D0, X
+            LDA $7EC3E0, X : JSL Filter_Majorly_Whiten_Color : LDA $7EC5E0, X
             INX #2 : CPX.b #$10 : BEQ +
                 JMP -
         +
-            LDA.l PaletteBufferAux+$F0 : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$F0
-            LDA.l PaletteBufferAux+$F2 : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$F2
-            LDA.l PaletteBufferAux+$F4 : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$F4
-            LDA.b GameMode : CMP.w #$0007 : BNE + ; only light invisifloor if we're in dungeon submodule
-            LDA.b RoomIndex
-            CMP.w #$003C : BEQ ++ ; hookshot cave
-            CMP.w #$009D : BEQ ++ ; gt right
-            CMP.w #$009C : BEQ ++ ; gt big room
-            CMP.w #$00A5 : BEQ ++ ; wizzrobes 1
+            LDA $7EC3F0 : JSL Filter_Majorly_Whiten_Color : LDA $7EC5F0
+            LDA $7EC3F2 : JSL Filter_Majorly_Whiten_Color : LDA $7EC5F2
+            LDA $7EC3F4 : JSL Filter_Majorly_Whiten_Color : LDA $7EC5F4
+            LDA $10 : CMP.w #$07 : BNE + ; only light invisifloor if we're in dungeon submodule
+            LDA $048E
+            CMP.w #$3C : BEQ ++ ; hookshot cave
+            CMP.w #$9D : BEQ ++ ; gt right
+            CMP.w #$9C : BEQ ++ ; gt big room
+            CMP.w #$A5 : BEQ ++ ; wizzrobes 1
             +
-                LDA.l PaletteBufferAux+$F6 : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$F6
-                LDA.l PaletteBufferAux+$F8 : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$F8
+                LDA $7EC3F6 : JSL Filter_Majorly_Whiten_Color : LDA $7EC5F6
+                LDA $7EC3F8 : JSL Filter_Majorly_Whiten_Color : LDA $7EC5F8
                 BRA +++
             ++
-                LDA.l PaletteBufferAux+$F6 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F6
-                LDA.l PaletteBufferAux+$F8 : JSL Filter_Majorly_Whiten_Color : STA.l PaletteBuffer+$F8
+                LDA $7EC3F6 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F6
+                LDA $7EC3F8 : JSL Filter_Majorly_Whiten_Color : STA $7EC5F8
                 BRA +++
             +++
-            LDA.l PaletteBufferAux+$FA : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$FA
-            LDA.l PaletteBufferAux+$FC : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$FC
-            LDA.l PaletteBufferAux+$FE : JSL Filter_Majorly_Whiten_Color : LDA.l PaletteBuffer+$FE
+            LDA $7EC3FA : JSL Filter_Majorly_Whiten_Color : LDA $7EC5FA
+            LDA $7EC3FC : JSL Filter_Majorly_Whiten_Color : LDA $7EC5FC
+            LDA $7EC3FE : JSL Filter_Majorly_Whiten_Color : LDA $7EC5FE
             REP #$10
-            LDA.l PaletteBuffer+$40 : TAY
-            LDA.l PaletteBufferAux : BNE +
+            LDA $7EC540 : TAY
+            LDA $7EC300 : BNE +
                 TAY
         +
-            TYA : STA.l PaletteBuffer
+            TYA : STA $7EC500
             SEP #$30
 RTS
 ;================================================================================
@@ -120,144 +129,144 @@ RestoreBgEther:
         LDX.b #$00
         LDA.l DisableFlashing : REP #$20 : BNE +
         -
-            LDA.b Scrap00,X
-            LDA.l PaletteBufferAux+$40, X : STA.l PaletteBuffer+$40, X
-            LDA.l PaletteBufferAux+$50, X : STA.l PaletteBuffer+$50, X
-            LDA.l PaletteBufferAux+$60, X : STA.l PaletteBuffer+$60, X
-            LDA.l PaletteBufferAux+$70, X : STA.l PaletteBuffer+$70, X
-            LDA.l PaletteBufferAux+$80, X : STA.l PaletteBuffer+$80, X
-            LDA.l PaletteBufferAux+$90, X : STA.l PaletteBuffer+$90, X
-            LDA.l PaletteBufferAux+$A0, X : STA.l PaletteBuffer+$A0, X
-            LDA.l PaletteBufferAux+$B0, X : STA.l PaletteBuffer+$B0, X
-            LDA.l PaletteBufferAux+$C0, X : STA.l PaletteBuffer+$C0, X
-            LDA.l PaletteBufferAux+$D0, X : STA.l PaletteBuffer+$D0, X
-            LDA.l PaletteBufferAux+$E0, X : STA.l PaletteBuffer+$E0, X
-            LDA.l PaletteBufferAux+$F0, X : STA.l PaletteBuffer+$F0, X
+            LDA $00,X
+            LDA $7EC340, X : STA $7EC540, X
+            LDA $7EC350, X : STA $7EC550, X
+            LDA $7EC360, X : STA $7EC560, X
+            LDA $7EC370, X : STA $7EC570, X
+            LDA $7EC380, X : STA $7EC580, X
+            LDA $7EC390, X : STA $7EC590, X
+            LDA $7EC3A0, X : STA $7EC5A0, X
+            LDA $7EC3B0, X : STA $7EC5B0, X
+            LDA $7EC3C0, X : STA $7EC5C0, X
+            LDA $7EC3D0, X : STA $7EC5D0, X
+            LDA $7EC3E0, X : STA $7EC5E0, X
+            LDA $7EC3F0, X : STA $7EC5F0, X
             INX #2 : CPX.b #$10 : BNE -
             BRA ++
         +
         -
-            LDA.b Scrap00
-            LDA.l PaletteBufferAux+$40, X : LDA.l PaletteBuffer+$40, X
-            LDA.l PaletteBufferAux+$50, X : LDA.l PaletteBuffer+$50, X
-            LDA.l PaletteBufferAux+$60, X : LDA.l PaletteBuffer+$60, X
-            LDA.l PaletteBufferAux+$70, X : LDA.l PaletteBuffer+$70, X
-            LDA.l PaletteBufferAux+$80, X : LDA.l PaletteBuffer+$80, X
-            LDA.l PaletteBufferAux+$90, X : LDA.l PaletteBuffer+$90, X
-            LDA.l PaletteBufferAux+$A0, X : LDA.l PaletteBuffer+$A0, X
-            LDA.l PaletteBufferAux+$B0, X : LDA.l PaletteBuffer+$B0, X
-            LDA.l PaletteBufferAux+$C0, X : LDA.l PaletteBuffer+$C0, X
-            LDA.l PaletteBufferAux+$D0, X : LDA.l PaletteBuffer+$D0, X
-            LDA.l PaletteBufferAux+$E0, X : LDA.l PaletteBuffer+$E0, X
-            LDA.l PaletteBufferAux+$F0, X : LDA.l PaletteBuffer+$F0, X
+            LDA $00
+            LDA $7EC340, X : LDA $7EC540, X
+            LDA $7EC350, X : LDA $7EC550, X
+            LDA $7EC360, X : LDA $7EC560, X
+            LDA $7EC370, X : LDA $7EC570, X
+            LDA $7EC380, X : LDA $7EC580, X
+            LDA $7EC390, X : LDA $7EC590, X
+            LDA $7EC3A0, X : LDA $7EC5A0, X
+            LDA $7EC3B0, X : LDA $7EC5B0, X
+            LDA $7EC3C0, X : LDA $7EC5C0, X
+            LDA $7EC3D0, X : LDA $7EC5D0, X
+            LDA $7EC3E0, X : LDA $7EC5E0, X
+            LDA $7EC3F0, X : LDA $7EC5F0, X
             INX #2 : CPX.b #$10 : BNE -
             BRA ++
         ++
-JML $82FF51 ; Bank0E.asm : 3936 vanilla restore routine after loop which RTLs
+JML $02FF51 ; Bank0E.asm : 3936 vanilla restore routine after loop which RTLs
 ;================================================================================
 DDMConditionalLightning:
         LDA.l DisableFlashing 
         REP #$20
         BNE +
-            LDA.w Scrap
+            LDA.w $0000
             LDX.b #$02
-            JML $87FA7F ; Bank0E.asm : 4738 vanilla loop equivalent to below beginning at LDY #$00
+            JML $07FA7F ; Bank0E.asm : 4738 vanilla loop equivalent to below beginning at LDY #$00
         +
-            LDA.b Scrap00 : LDX.b #$02 : LDY.b #$00
+            LDA.b $00 : LDX.b #$02 : LDY #$00
         -
-            LDA.w $F4EB, Y : LDA.l PaletteBuffer+$60, X
-            LDA.w $F4F9, Y : LDA.l PaletteBuffer+$70, X
-            LDA.w $F507, Y : LDA.l PaletteBuffer+$90, X
-            LDA.w $F515, Y : LDA.l PaletteBuffer+$E0, X
-            LDA.w $F523, Y : LDA.l PaletteBuffer+$F0, X
+            LDA $F4EB, Y : LDA $7EC560, X
+            LDA $F4F9, Y : LDA $7EC570, X
+            LDA $F507, Y : LDA $7EC590, X
+            LDA $F515, Y : LDA $7EC5E0, X
+            LDA $F523, Y : LDA $7EC5F0, X
             INY #2
             INX #2 : CPX.b #$10 : BNE -
-            JML $87FAAC ; Bank0E.asm : 4754 both branches converge here
+            JML $07FAAC ; Bank0E.asm : 4754 both branches converge here
 ;================================================================================
 ConditionalGTFlash:
         LDA.l DisableFlashing : REP #$20 : BNE +
-            LDA.w Scrap
+            LDA $0000
         -
-            LDA.w $F9C1, Y : STA.l PaletteBuffer+$D0, X
+            LDA $F9C1, Y : STA $7EC5D0, X
             INY #2
             INX #2 : CPX.b #$10 : BNE -
             RTL
         +
-            LDA.b Scrap00
+            LDA $00
         -
-            LDA.w $F9C1, Y : LDA.l PaletteBuffer+$D0, X
+            LDA $F9C1, Y : LDA $7EC5D0, X
             INY #2
             INX #2 : CPX.b #$10 : BNE -
             RTL
 ;================================================================================
 ConditionalRedFlash:
         LDA.l DisableFlashing : REP #$20 : BNE +
-            LDA.b Scrap,X
-            LDA.w #$1D59 : STA.l PaletteBuffer+$DA
-            LDA.w #$25FF : STA.l PaletteBuffer+$DC
+            LDA $00,X
+            LDA.w #$1D59 : STA $7EC5DA
+            LDA.w #$25FF : STA $7EC5DC
             LDA.w #$001A
             RTL
         +
-            LDA.b Scrap00
-            LDA.w #$1D59 : LDA.l PaletteBuffer+$DA
-            LDA.w #$25FF : LDA.l PaletteBuffer+$DC
+            LDA $00
+            LDA.w #$1D59 : LDA $7EC5DA
+            LDA.w #$25FF : LDA $7EC5DC
             LDA.w #$0000
             RTL
 ;================================================================================
 ConditionalPedAncilla:
         LDA.l DisableFlashing : REP #$20 : BNE +
-            LDA.b Scrap,X
-            LDA.b Scrap00 : STA.b Scrap04
-            LDA.b Scrap02 : STA.b Scrap06
+            LDA $00,X
+            LDA $00 : STA $04
+            LDA $02 : STA $06
             RTL
         +
-            LDA.b Scrap
-            LDA.b Scrap00 : LDA.b Scrap04
-            LDA.b Scrap02 : LDA.b Scrap06
+            LDA $00
+            LDA $00 : LDA $04
+            LDA $02 : LDA $06
             RTL
 ;================================================================================
 LoadElectroPalette:
         REP #$20
-        LDA.w #$0202 : STA.b Scrap0C
-        LDA.w #$0404 : STA.b Scrap0E
-        LDA.w #$001B : STA.b Scrap02
+        LDA.w #$0202 : STA $0C
+        LDA.w #$0404 : STA $0E
+        LDA.w #$001B : STA $02
         SEP #$10
-        LDX.b Scrap0C : LDA.l $9BEBB4, X : AND.w #$00FF : ADC.w #$D630
+        LDX $0C : LDA $1BEBB4, X : AND.w #$00FF : ADC #$D630
         REP #$10 : LDX.w #$01B2 : LDY.w #$0002
         JSR ConditionalLoadGearPalette
         SEP #$10
-        LDX.b Scrap0D
-        LDA.l $9BEBC1, X : AND.w #$00FF : ADC.w #$D648
+        LDX $0D
+        LDA $1BEBC1, X : AND.w #$00FF : ADC #$D648
         REP #$10 : LDX.w #$01B8 : LDY.w #$0003
         JSR ConditionalLoadGearPalette
         SEP #$10
-        LDX.b Scrap0E
-        LDA.l $9BEC06, X : AND.w #$00FF : ASL A : ADC.w #$D308
+        LDX $0E
+        LDA $1BEC06, X : AND.w #$00FF : ASL A : ADC #$D308
         REP #$10 : LDX.w #$01E2 : LDY.w #$000E
         JSR ConditionalLoadGearPalette
         SEP #$30
-        INC.b NMICGRAM
+        INC $15
 RTL
 ;================================================================================
 ConditionalLoadGearPalette:
-        STA.b Scrap00
+        STA $00
         SEP #$20
         LDA.l DisableFlashing : REP #$20 : BNE +
-                LDA.b Scrap,X
+                LDA $00,X
         -
-                LDA.b [Scrap00]
-                STA.l PaletteBuffer, X
-                INC.b Scrap00 : INC.b Scrap00
+                LDA [$00]
+                STA $7EC500, X
+                INC $00 : INC $00
                 INX #2
                 DEY
                 BPL -
         RTS
         +
-                LDA.b Scrap
+                LDA $00
         -
-                LDA.b [Scrap00]
-                LDA.l PaletteBuffer, X
-                INC.b Scrap00 : INC.b Scrap00
+                LDA [$00]
+                LDA $7EC500, X
+                INC $00 : INC $00
                 INX #2
                 DEY
                 BPL -
@@ -272,13 +281,13 @@ RestoreElectroPalette:
         LDX.w #$01E2 : LDY.w #$000E
         JSR FillPaletteBufferFromAux
         SEP #$30
-        INC.b NMICGRAM
+        INC $15
 RTL
 ;================================================================================
 FillPaletteBufferFromAux:
         -
-            LDA.l PaletteBufferAux, X
-            STA.l PaletteBuffer, X
+            LDA $7EC300, X
+            STA $7EC500, X
             INX #2
             DEY
             BPL -

asar.py

@@ -0,0 +1,421 @@
+#!/usr/bin/env python3
+"""
+python interface for asar.dll
+by randomdude999
+
+Usage: import asar, call asar.init, call asar.patch, then use the various
+functions to get info about the patch
+"""
+
+import ctypes
+import enum
+import sys
+from ctypes import c_int, c_char_p, POINTER
+c_int_ptr = POINTER(c_int)
+
+__all__ = ["errordata", "writtenblockdata", "mappertype", "version",
+           "apiversion", "init", "reset", "patch", "maxromsize", "close",
+           "geterrors", "getwarnings", "getprints", "getalllabels",
+           "getlabelval", "getdefine", "getalldefines", "resolvedefines",
+           "math", "getwrittenblocks", "getmapper", "getsymbolsfile"]
+_target_api_ver = 303
+_asar = None
+
+
+class AsarArithmeticError(ArithmeticError):
+    pass
+
+
+class errordata(ctypes.Structure):
+    _fields_ = [("fullerrdata", c_char_p),
+                ("rawerrdata", c_char_p),
+                ("block", c_char_p),
+                ("filename", c_char_p),
+                ("line", c_int),
+                ("callerfilename", c_char_p),
+                ("callerline", c_int),
+                ("errid", c_int)]
+
+    def __repr__(self):
+        return "<asar error: {!r}>".format(self.fullerrdata.decode())
+
+
+# for internal use only. getalllabels() returns a dict.
+class _labeldata(ctypes.Structure):
+    _fields_ = [("name", c_char_p),
+                ("location", c_int)]
+
+
+# for internal use only. getalldefines() returns a dict.
+class _definedata(ctypes.Structure):
+    _fields_ = [("name", c_char_p),
+                ("contents", c_char_p)]
+
+
+class writtenblockdata(ctypes.Structure):
+    _fields_ = [("pcoffset", c_int),
+                ("snesoffset", c_int),
+                ("numbytes", c_int)]
+
+    def __repr__(self):
+        return "<written block ${:06x} 0x{:x} size:{}>".format(
+            self.snesoffset, self.pcoffset, self.numbytes)
+
+
+# internal use only. patch() accepts a dict.
+class _memoryfile(ctypes.Structure):
+    _fields_ = [("path", c_char_p),
+                ("buffer", c_char_p),
+                ("length", ctypes.c_size_t)]
+
+
+# internal use only. patch() accepts a dict.
+class _warnsetting(ctypes.Structure):
+    _fields_ = [("warnid", c_char_p),
+                ("enabled", ctypes.c_bool)]
+
+
+# For internal use only.
+class _patchparams(ctypes.Structure):
+    _fields_ = [("structsize", c_int),
+                ("patchloc", c_char_p),
+                ("romdata", c_char_p),
+                ("buflen", c_int),
+                ("romlen", c_int_ptr),
+                ("includepaths", POINTER(c_char_p)),
+                ("numincludepaths", c_int),
+                ("should_reset", ctypes.c_bool),
+                ("additional_defines", POINTER(_definedata)),
+                ("additional_define_count", c_int),
+                ("stdincludesfile", c_char_p),
+                ("stddefinesfile", c_char_p),
+                ("warning_settings", POINTER(_warnsetting)),
+                ("warning_setting_count", c_int),
+                ("memory_files", POINTER(_memoryfile)),
+                ("memory_file_count", c_int),
+                ("override_checksum_gen", ctypes.c_bool),
+                ("generate_checksum", ctypes.c_bool)]
+
+
+class mappertype(enum.Enum):
+    invalid_mapper = 0
+    lorom = 1
+    hirom = 2
+    sa1rom = 3
+    bigsa1rom = 4
+    sfxrom = 5
+    exlorom = 6
+    exhirom = 7
+    norom = 8
+
+
+def _getall(func):
+    """Helper that does the work common to all the getall* functions."""
+    count = c_int()
+    raw_errs = func(ctypes.byref(count))
+    errs = []
+    for i in range(count.value):
+        errs.append(raw_errs[i])
+    return errs
+
+
+class _AsarDLL:
+    def __init__(self, dllname):
+        dll = ctypes.CDLL(dllname)
+        self.dll = dll
+        self.funcs = {}
+        try:
+            # argument/return type setup
+            # (also verifies that those functions are exported from the DLL)
+            # this is directly from asardll.h
+            # setup_func(name, argtypes, returntype)
+            self.setup_func("version", (), c_int)
+            self.setup_func("apiversion", (), c_int)
+            self.setup_func("init", (), ctypes.c_bool)
+            self.setup_func("reset", (), ctypes.c_bool)
+            self.setup_func("patch", (c_char_p, c_char_p, c_int, c_int_ptr),
+                            ctypes.c_bool)
+            self.setup_func("patch_ex", (POINTER(_patchparams),), ctypes.c_bool)
+            self.setup_func("maxromsize", (), c_int)
+            self.setup_func("close", (), None)
+            self.setup_func("geterrors", (c_int_ptr,), POINTER(errordata))
+            self.setup_func("getwarnings", (c_int_ptr,), POINTER(errordata))
+            self.setup_func("getprints", (c_int_ptr,), POINTER(c_char_p))
+            self.setup_func("getalllabels", (c_int_ptr,), POINTER(_labeldata))
+            self.setup_func("getlabelval", (c_char_p,), c_int)
+            self.setup_func("getdefine", (c_char_p,), c_char_p)
+            self.setup_func("getalldefines", (c_int_ptr,), POINTER(_definedata))
+            self.setup_func("resolvedefines", (c_char_p, ctypes.c_bool),
+                            c_char_p)
+            self.setup_func("math", (c_char_p, POINTER(c_char_p)),
+                            ctypes.c_double)
+            self.setup_func("getwrittenblocks", (c_int_ptr,),
+                            POINTER(writtenblockdata))
+            self.setup_func("getmapper", (), c_int)
+            self.setup_func("getsymbolsfile", (c_char_p,), c_char_p)
+
+        except AttributeError:
+            raise OSError("Asar DLL is missing some functions")
+        api_ver = dll.asar_apiversion()
+        if api_ver < _target_api_ver or \
+                (api_ver // 100) > (_target_api_ver // 100):
+            raise OSError("Asar DLL version "+str(api_ver)+" unsupported")
+
+    def setup_func(self, name, argtypes, restype):
+        """Setup argument and return types for a function.
+
+        name: name of the function in the DLL. "asar_" is added automatically
+        argtypes and restype: see ctypes documentation
+        """
+        func = getattr(self.dll, "asar_" + name)
+        func.argtypes = argtypes
+        func.restype = restype
+
+
+def init(dll_path=None):
+    """Load the Asar DLL.
+
+    You must call this before calling any other Asar functions. Raises OSError
+    if there was something wrong with the DLL (not found, wrong version,
+    doesn't have all necessary functions).
+    You can pass a custom DLL path if you want. If you don't, some common names
+    for the asar dll are tried.
+    """
+    global _asar
+    if _asar is not None:
+        return
+
+    if dll_path is not None:
+        _asar = _AsarDLL(dll_path)
+    else:
+        if sys.platform == "win32":
+            libnames = ["./asar.dll", "asar", "./asar-x64.dll", "asar-x64"]
+        elif sys.platform == "darwin":
+            libnames = ["./libasar.dylib", "libasar"]
+        else:
+            libnames = ["./libasar.so", "libasar"]
+
+        for x in libnames:
+            try:
+                _asar = _AsarDLL(x)
+            except OSError:
+                continue
+                
+        if _asar is None:
+            # Nothing in the search path is valid
+            raise OSError("Could not find asar DLL")
+
+    if not _asar.dll.asar_init():
+        _asar = None
+        return False
+    else:
+        return True
+
+
+def close():
+    """Free all of Asar's structures and unload the module.
+
+    Only asar.init() may be called after calling this.
+    """
+    global _asar
+    if _asar is None:
+        return
+    _asar.dll.asar_close()
+    _asar = None
+
+
+def version():
+    """Return the version, in the format major*10000+minor*100+bugfix*1.
+
+    This means that 1.2.34 would be returned as 10234.
+    """
+    return _asar.dll.asar_version()
+
+
+def apiversion():
+    """Return the API version, in the format major*100+minor.
+
+    Minor is incremented on backwards compatible changes; major is incremented
+    on incompatible changes. Does not have any correlation with the Asar
+    version. It's not very useful directly, since asar.init() verifies this
+    automatically.
+    """
+    return _asar.dll.asar_apiversion()
+
+
+def reset():
+    """Clear out errors, warnings, printed statements and the file cache.
+
+    Not really useful, since asar.patch() already does this.
+    """
+    return _asar.dll.asar_reset()
+
+
+def patch(patch_name, rom_data, includepaths=[], should_reset=True,
+          additional_defines={}, std_include_file=None, std_define_file=None,
+          warning_overrides={}, memory_files={}, override_checksum=None):
+    """Applies a patch.
+
+    Returns (success, new_rom_data). If success is False you should call
+    geterrors() to see what went wrong. rom_data is assumed to be headerless.
+
+    If includepaths is specified, it lists additional include paths for asar
+    to search.
+
+    should_reset specifies whether asar should clear out all defines, labels,
+    etc from the last inserted file. Setting it to False will make Asar act
+    like the currently patched file was directly appended to the previous one.
+
+    additional_defines specifies extra defines to give to the patch
+    (similar to the -D option).
+
+    std_include_file and std_define_file specify files where to look for extra
+    include paths and defines, respectively.
+
+    warning_overrides is a dict of str (warning ID) -> bool. It overrides
+    enabling/disabling specific warnings.
+
+    memory_files is a dict of str (file name) -> bytes (file contents). It
+    specifies memory files to use.
+
+    override_checksum specifies whether to override checksum generation. True
+    forces Asar to update the ROM's checksum, False forces Asar to not update
+    it.
+    """
+    romlen = c_int(len(rom_data))
+    rom_ptr = ctypes.create_string_buffer(bytes(rom_data), maxromsize())
+    pp = _patchparams()
+    pp.structsize = ctypes.sizeof(_patchparams)
+    pp.patchloc = patch_name.encode()
+    pp.romdata = ctypes.cast(rom_ptr, c_char_p)
+    pp.buflen = maxromsize()
+    pp.romlen = ctypes.pointer(romlen)
+
+    # construct an array type of len(includepaths) elements and initialize
+    # it with elements from includepaths
+    pp.includepaths = (c_char_p*len(includepaths))(*includepaths)
+    pp.numincludepaths = len(includepaths)
+
+    defines = (_definedata * len(additional_defines))()
+    for i, (k, v) in enumerate(additional_defines.items()):
+        defines[i].name = k.encode()
+        defines[i].contents = v.encode()
+    pp.additional_defines = defines
+    pp.additional_define_count = len(additional_defines)
+
+    pp.should_reset = should_reset
+
+    pp.stdincludesfile = std_include_file.encode() if std_include_file else None
+    pp.stddefinesfile = std_define_file.encode() if std_define_file else None
+
+    warnsettings = (_warnsetting * len(warning_overrides))()
+    for i, (k, v) in enumerate(warning_overrides.items()):
+        warnsettings[i].warnid = k.encode()
+        warnsettings[i].enabled = v
+    pp.warning_settings = warnsettings
+    pp.warning_setting_count = len(warnsettings)
+
+    memoryfiles = (_memoryfile * len(memory_files))()
+    for i, (k, v) in enumerate(memory_files.items()):
+        memoryfiles[i].path = k.encode()
+        memoryfiles[i].buffer = v
+        memoryfiles[i].length = len(v)
+    pp.memory_files = memoryfiles
+    pp.memory_file_count = len(memory_files)
+
+    if override_checksum is not None:
+        pp.override_checksum_gen = True
+        pp.generate_checksum = override_checksum
+    else:
+        pp.override_checksum_gen = False
+        pp.generate_checksum = False
+
+    result = _asar.dll.asar_patch_ex(ctypes.byref(pp))
+    return result, rom_ptr.raw[:romlen.value]
+
+
+def maxromsize():
+    """Return the maximum possible size of the output ROM."""
+    return _asar.dll.asar_maxromsize()
+
+
+def geterrors():
+    """Get a list of all errors."""
+    return _getall(_asar.dll.asar_geterrors)
+
+
+def getwarnings():
+    """Get a list of all warnings."""
+    return _getall(_asar.dll.asar_getwarnings)
+
+
+def getprints():
+    """Get a list of all printed data."""
+    return [x.decode() for x in _getall(_asar.dll.asar_getprints)]
+
+
+def getalllabels():
+    """Get a dictionary of label name -> SNES address."""
+    labeldatas = _getall(_asar.dll.asar_getalllabels)
+    return {x.name.decode(): x.location for x in labeldatas}
+
+
+def getlabelval(name):
+    """Get the ROM location of one label. None means "not found"."""
+    val = _asar.dll.asar_getlabelval(name.encode())
+    return None if (val == -1) else val
+
+
+def getdefine(name):
+    """Get the value of a define."""
+    return _asar.dll.asar_getdefine(name.encode()).decode()
+
+
+def getalldefines():
+    """Get the names and values of all defines."""
+    definedatas = _getall(_asar.dll.asar_getalldefines)
+    return {x.name.decode(): x.contents.decode() for x in definedatas}
+
+
+def resolvedefines(data, learnnew):
+    """Parse all defines in the given data.
+
+    Returns the data with all defines evaluated.
+    learnnew controls whether it'll learn new defines in this string if it
+    finds any. Note that it may emit errors.
+    """
+    return _asar.dll.asar_resolvedefines(data, learnnew)
+
+
+def math(to_calculate):
+    """Parse a string containing math.
+
+    It automatically assumes global scope (no namespaces), and has access to
+    all functions and labels from the last call to asar.patch(). If there was
+    an error, ArithmeticError is raised with the message returned by Asar.
+    """
+    error = ctypes.c_char_p()
+    result = _asar.dll.asar_math(to_calculate.encode(), ctypes.byref(error))
+    if not bool(error):
+        # Null pointer, means no error
+        return result
+    else:
+        raise AsarArithmeticError(error.value.decode())
+
+
+def getwrittenblocks():
+    """Get a list of all the blocks written to the ROM."""
+    return _getall(_asar.dll.asar_getwrittenblocks)
+
+
+def getmapper():
+    """Get the ROM mapper currently used by Asar."""
+    return mappertype(_asar.dll.asar_getmapper())
+
+def getsymbolsfile(fmt="wla"):
+    """Generates the contents of a symbols file for in a specific format.
+
+    Returns the textual contents of the symbols file.
+    format specified the format of the symbols file that gets generated.
+    """
+    return _asar.dll.asar_getsymbolsfile(fmt.encode()).decode()

bookofmudora.asm

@@ -2,23 +2,22 @@
 ; Randomize Book of Mudora
 ;--------------------------------------------------------------------------------
 LoadLibraryItemGFX:
-        %GetPossiblyEncryptedItem(LibraryItem, SpriteItemValues)
-        JSL.l AttemptItemSubstitution
-        JSL.l ResolveLootIDLong
-        STA.w SpriteID, X
-        JSL.l PrepDynamicTile_loot_resolved
+	LDA.l LibraryItem_Player : STA !MULTIWORLD_SPRITEITEM_PLAYER_ID
+	%GetPossiblyEncryptedItem(LibraryItem, SpriteItemValues)
+	STA $0E80, X ; Store item type
+	JSL.l PrepDynamicTile
 RTL
 ;--------------------------------------------------------------------------------
 DrawLibraryItemGFX:
-        PHA
-        LDA.w SpriteID, X
-        JSL.l DrawDynamicTile
-        PLA
+	PHA
+    LDA $0E80, X ; Retrieve stored item type
+	JSL.l DrawDynamicTile
+	PLA
 RTL
 ;--------------------------------------------------------------------------------
 SetLibraryItem:
-        LDY.w SpriteID, X
-        JSL.l ItemSet_Library ; contains thing we wrote over
+	LDY $0E80, X ; Retrieve stored item type
+	JSL.l ItemSet_Library ; contains thing we wrote over
 RTL
 ;--------------------------------------------------------------------------------
 
@@ -26,44 +25,39 @@ RTL
 ;================================================================================
 ; Randomize Bonk Keys
 ;--------------------------------------------------------------------------------
+!REDRAW = "$7F5000"
+;--------------------------------------------------------------------------------
 LoadBonkItemGFX:
-	LDA.b #$08 : STA.w SpriteOAMProp, X ; thing we wrote over
+	LDA.b #$08 : STA $0F50, X ; thing we wrote over
 LoadBonkItemGFX_inner:
-	LDA.b #$00 : STA.l RedrawFlag
+	LDA.b #$00 : STA !REDRAW
+	JSR LoadBonkItem_Player : STA !MULTIWORLD_SPRITEITEM_PLAYER_ID
 	JSR LoadBonkItem
-        JSL.l AttemptItemSubstitution
-        JSL.l ResolveLootIDLong
-        STA.w SpriteItemType, X
-        STA.w SpriteID, X
 	JSL.l PrepDynamicTile
-        PHA : PHX
-        LDA.w SpriteID,X : TAX
-        LDA.l SpriteProperties_standing_width,X : BNE +
-                LDA.b #$00 : STA.l SpriteOAM : STA.l SpriteOAM+8
-        +
-        PLX : PLA
 RTL
 ;--------------------------------------------------------------------------------
 DrawBonkItemGFX: 
-        PHA
-        LDA.l RedrawFlag : BEQ .skipInit
-        JSL.l LoadBonkItemGFX_inner
-        BRA .done ; don't draw on the init frame
-        
+	PHA
+	LDA !REDRAW : BEQ .skipInit ; skip init if already ready
+	JSL.l LoadBonkItemGFX_inner
+	BRA .done ; don't draw on the init frame
+	
 	.skipInit
-        LDA.w SpriteID,X
-        JSL.l DrawDynamicTileNoShadow
-
-        .done
-        PLA
+	
+    JSR LoadBonkItem
+	JSL.l DrawDynamicTileNoShadow
+	
+	.done
+	PLA
 RTL
 ;--------------------------------------------------------------------------------
 GiveBonkItem:
+	JSR LoadBonkItem_Player : STA !MULTIWORLD_ITEM_PLAYER_ID
 	JSR LoadBonkItem
-        JSR.w AbsorbKeyCheck : BCC .notKey
+	CMP #$24 : BNE .notKey
 	.key
 		PHY : LDY.b #$24 : JSL.l AddInventory : PLY ; do inventory processing for a small key
-		LDA.l CurrentSmallKeys : INC A : STA.l CurrentSmallKeys
+		LDA CurrentSmallKeys : INC A : STA CurrentSmallKeys
 		LDA.b #$2F : JSL.l Sound_SetSfx3PanLong
 		JSL CountBonkItem
 RTL
@@ -73,30 +67,27 @@ RTL
 RTL
 ;--------------------------------------------------------------------------------
 LoadBonkItem:
-	LDA.b RoomIndex ; check room ID - only bonk keys in 2 rooms so we're just checking the lower byte
-	CMP.b #115 : BNE + ; Desert Bonk Key
+	LDA $A0 ; check room ID - only bonk keys in 2 rooms so we're just checking the lower byte
+	CMP #115 : BNE + ; Desert Bonk Key
     	LDA.l BonkKey_Desert
 		BRA ++
-	+ : CMP.b #140 : BNE + ; GTower Bonk Key
-    	LDA.l BonkKey_GTower
+	+ : CMP #140 : BNE + ; GTower Bonk Key
+		LDA.l BonkKey_GTower
 		BRA ++
 	+
 		LDA.b #$24 ; default to small key
 	++
 RTS
 ;--------------------------------------------------------------------------------
-AbsorbKeyCheck:
-        PHA
-	CMP.b #$24 : BEQ .key
-        CMP.b #$A0 : BCC .not_key
-        CMP.b #$B0 : BCS .not_key
-                AND.b #$0F : ASL
-                CMP.w DungeonID : BNE .not_key
-                        .key
-                        PLA
-                        SEC
-                        RTS
-        .not_key
-        PLA
-        CLC
+LoadBonkItem_Player:
+	LDA $A0 ; check room ID - only bonk keys in 2 rooms so we're just checking the lower byte
+	CMP #115 : BNE + ; Desert Bonk Key
+		LDA.l BonkKey_Desert_Player
+		BRA ++
+	+ : CMP #140 : BNE + ; GTower Bonk Key
+    	LDA.l BonkKey_GTower_Player
+		BRA ++
+	+
+		LDA.b #$00
+	++
 RTS

boots.asm

@@ -1,27 +1,32 @@
 ;================================================================================
 ; Boots State Modifier
 ;--------------------------------------------------------------------------------
+!BOOTS_MODIFIER = "$7F50CE"
 ModifyBoots:
     PHA
-        LDA.l BootsModifier : CMP.b #$01 : BNE +
-            PLA : AND.l AbilityFlags : ORA.b #$04 : RTL ; yes boots
+        LDA.b $A0 : CMP.b #$06 : BNE +
+        LDA.b $A1 : CMP.b #$00 : BEQ .no_boots
+        +
+        LDA !BOOTS_MODIFIER : CMP.b #$01 : BNE +
+            PLA : AND AbilityFlags : ORA.b #$04 : RTL ; yes boots
         + : CMP.b #$02 : BNE +
-            PLA : AND.l AbilityFlags : AND.b #$FB : RTL ; no boots
-        + : LDA.l FakeBoots : CMP.b #$01 : BNE +
-            LDA.b LinkSlipping : BEQ ++ : LDA.b $59 : BNE + ; hover check
-                ++ : PLA : AND.l AbilityFlags : ORA.b #$04 : RTL ; yes boots, not hovering
+            .no_boots
+            PLA : AND AbilityFlags : AND.b #$FB : RTL ; no boots
+        + : LDA FakeBoots : CMP.b #$01 : BNE +
+            LDA $5B : BEQ ++ : LDA $59 : BNE + ; hover check
+                ++ : PLA : AND AbilityFlags : ORA.b #$04 : RTL ; yes boots, not hovering
         +
     PLA
-    AND.l AbilityFlags ; regular boots
+    AND AbilityFlags ; regular boots
 RTL
 ;--------------------------------------------------------------------------------
 AddBonkTremors:
     PHA
-        LDA.b $46 : BNE + ; Check for incapacitated Link
+        LDA $46 : BNE + ; Check for incapacitated Link
             JSL.l IncrementBonkCounter
         +
-        LDA.l BootsModifier : CMP.b #$01 : BEQ +
-        LDA.l BootsEquipment : BNE + ; Check for Boots
+        LDA !BOOTS_MODIFIER : CMP.b #$01 : BEQ +
+        LDA BootsEquipment : BNE + ; Check for Boots
             PLA : RTL
         +
     PLA
@@ -31,46 +36,46 @@ RTL
 BonkBreakableWall:
     PHX : PHP
         SEP #$30 ; set 8-bit accumulator and index registers
-        LDA.l BootsModifier : CMP.b #$01 : BEQ +
-        LDA.l BootsEquipment : BNE + ; Check for Boots
+        LDA !BOOTS_MODIFIER : CMP.b #$01 : BEQ +
+        LDA BootsEquipment : BNE + ; Check for Boots
             PLP : PLX : LDA.w #$0000 : RTL
         +
     PLP : PLX
-    LDA.w $0372 : AND.w #$00FF ; things we wrote over
+    LDA $0372 : AND.w #$00FF ; things we wrote over
 RTL
 ;--------------------------------------------------------------------------------
 BonkRockPile:
-    LDA.l BootsModifier : CMP.b #$01 : BEQ +
-    LDA.l BootsEquipment : BNE + ; Check for Boots
+    LDA !BOOTS_MODIFIER : CMP.b #$01 : BEQ +
+    LDA BootsEquipment : BNE + ; Check for Boots
         LDA.b #$00 : RTL
     +
-    LDA.w TileActBE : AND.b #$70 ; things we wrote over
+    LDA $02EF : AND.b #$70 ; things we wrote over
 RTL
 ;--------------------------------------------------------------------------------
 GravestoneHook:
-    LDA.l BootsModifier : CMP.b #$01 : BEQ +
-    LDA.l BootsEquipment : BEQ .done ; Check for Boots
+    LDA !BOOTS_MODIFIER : CMP.b #$01 : BEQ +
+    LDA BootsEquipment : BEQ .done ; Check for Boots
     +
-    LDA.w $0372 : BEQ .done ; things we wrote over
+    LDA $0372 : BEQ .done ; things we wrote over
         JML.l moveGravestone
     .done
     JML.l GravestoneHook_continue
 ;--------------------------------------------------------------------------------
 JumpDownLedge:
-    LDA.l BootsModifier : CMP.b #$01 : BEQ +
-    LDA.l BootsEquipment : BNE + ; Check for Boots
+    LDA !BOOTS_MODIFIER : CMP.b #$01 : BEQ +
+    LDA BootsEquipment : BNE + ; Check for Boots
         ; Disarm Waterwalk
-        LDA.b LinkSlipping : CMP.b #$01 : BNE +
-            STZ.b LinkSlipping
+        LDA $5B : CMP.b #$01 : BNE +
+            STZ $5B
     +
-    LDA.b IndoorsFlag : BNE .done : LDA.b #$02 : STA.b LinkLayer ; things we wrote over
+    LDA $1B : BNE .done : LDA.b #$02 : STA $EE ; things we wrote over
     .done
 RTL
 ;--------------------------------------------------------------------------------
 BonkRecoil:
-    LDA.l BootsModifier : CMP.b #$01 : BEQ +
-    LDA.l BootsEquipment : BNE + ; Check for Boots
-        LDA.b #$16 : STA.b LinkRecoilZ : RTL
+    LDA !BOOTS_MODIFIER : CMP.b #$01 : BEQ +
+    LDA BootsEquipment : BNE + ; Check for Boots
+        LDA.b #$16 : STA $29 : RTL
     +
-    LDA.b #$24 : STA.b LinkRecoilZ ; things we wrote over
+    LDA.b #$24 : STA $29 ; things we wrote over
 RTL

bugfixes.asm

@@ -2,8 +2,8 @@
 
 ;--------------------------------------------------------------------------------
 AssignKiki:
-    LDA.b #$00 : STA.l FollowerDropped ; defuse bomb
-    LDA.b #$0A : STA.l FollowerIndicator ; assign kiki as follower
+    LDA.b #$00 : STA FollowerDropped ; defuse bomb
+    LDA.b #$0A : STA FollowerIndicator ; assign kiki as follower
 RTL
 ;--------------------------------------------------------------------------------
 
@@ -11,9 +11,10 @@ RTL
 ; Name: AllowSQ
 ; Returns: Accumulator = 0 if S&Q is disallowed, 1 if allowed
 ;--------------------------------------------------------------------------------
+!ITEM_BUSY = "$7F5091"
 AllowSQ:
-	LDA.l ProgressIndicator : BEQ .done ; thing we overwrote - check if link is in his bed
-	LDA.l BusyItem : EOR.b #$01
+	LDA ProgressIndicator : BEQ .done ; thing we overwrote - check if link is in his bed
+	LDA !ITEM_BUSY : EOR #$01
 	.done
 RTL
 ;--------------------------------------------------------------------------------
@@ -22,8 +23,8 @@ RTL
 ;0 = Reset Music
 ;1 = Don't Reset Music
 MSMusicReset:
-	LDA.b OverworldIndex : CMP.b #$80 : BNE +
-		LDA.b LinkPosX+1
+	LDA $8A : CMP.b #$80 : BNE +
+		LDA $23
 	+
 RTL
 ;--------------------------------------------------------------------------------
@@ -31,11 +32,11 @@ RTL
 ;--------------------------------------------------------------------------------
 ;0 = Become (Perma)bunny
 DecideIfBunny:
-	LDA.l MoonPearlEquipment : BNE .done
-	LDA.l CurrentWorld : AND.b #$40
+	LDA MoonPearlEquipment : BNE .done
+	LDA CurrentWorld : AND.b #$40
 	PHA : LDA.l InvertedMode : BNE .inverted
 	.normal
-		PLA : EOR.b #$40
+		PLA : EOR #$40
 		BRA .done
 	.inverted
 		PLA
@@ -46,9 +47,9 @@ RTL
 DecideIfBunnyByScreenIndex:
 	; If indoors we don't have a screen index. Return non-bunny to make mirror-based
 	; superbunny work
-	LDA.b IndoorsFlag : BNE .done
-	LDA.l MoonPearlEquipment : BNE .done
-	LDA.b OverworldIndex : AND.b #$40 : PHA
+	LDA $1B : BNE .done
+	LDA MoonPearlEquipment : BNE .done
+	PHX : LDX $8A : LDA.l OWTileWorldAssoc, X : PLX : PHA
 	LDA.l InvertedMode : BNE .inverted
 	.normal
 		PLA : EOR #$40
@@ -57,14 +58,23 @@ DecideIfBunnyByScreenIndex:
 		PLA
 	.done
 RTL
+;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+;ReadInventoryPond:
+;	CPX.b #$1B : BNE + : LDA.b #$01 : RTL : +
+;	LDA EquipmentWRAM, X
+;RTL
+;--------------------------------------------------------------------------------
+
 ;--------------------------------------------------------------------------------
 FixBunnyOnExitToLightWorld:
-    LDA.w BunnyFlag : BEQ +
+    LDA.w $02E0 : BEQ +
         JSL.l DecideIfBunny : BEQ +
-        STZ.b LinkState ; set player mode to Normal
-        STZ.w BunnyFlag : STZ.b BunnyFlagDP ; return player graphics to normal
+        STZ $5D ; set player mode to Normal
+        STZ $02E0 : STZ $56 ; return player graphics to normal
     +
-RTL
+RTS
 ;--------------------------------------------------------------------------------
 
 ;--------------------------------------------------------------------------------
@@ -73,17 +83,17 @@ RTL
 FixAga2Bunny:
     LDA.l FixFakeWorld :  BEQ + ; Only use this fix is fakeworld fix is in use
         LDA.l InvertedMode : BEQ +++
-            LDA.b #$00 : STA.l CurrentWorld ; Switch to light world
+            LDA.b #$00 : STA CurrentWorld ; Switch to light world
             BRA ++
         +++
-        LDA.b #$40 : STA.l CurrentWorld ; Switch to dark world
+        LDA.b #$40 : STA CurrentWorld ; Switch to dark world
     ++
 	JSL DecideIfBunny : BNE +
 		JSR MakeBunny
-		LDA.b #$04 : STA.w MusicControlRequest ; play bunny music
+		LDA.b #$04 : STA.w $012C ; play bunny music
 		BRA .done
 	+
-	LDA.b #$09 : STA.w MusicControlRequest ; what we wrote over
+	LDA.b #$09 : STA.w $012C ; what we wrote over
 	.done
 RTL
 ;--------------------------------------------------------------------------------
@@ -91,8 +101,8 @@ RTL
 ;--------------------------------------------------------------------------------
 MakeBunny:
     PHX : PHY
-	LDA.b #$17 : STA.b LinkState ; set player mode to permabunny
-	LDA.b #$01 : STA.w BunnyFlag : STA.b BunnyFlagDP ; make player look like bunny
+	LDA.b #$17 : STA $5D ; set player mode to permabunny
+	LDA.b #$01 : STA $02E0 : STA $56 ; make player look like bunny
 	JSL LoadGearPalettes_bunny
     PLY : PLX
 RTS
@@ -113,34 +123,34 @@ FixFrogSmith:
 		STA.l FollowerIndicator
 		JSL Tagalong_LoadGfx
 	.done
-RTS
+RTL
 ;--------------------------------------------------------------------------------
 
 ;--------------------------------------------------------------------------------
 ; Fix for SQ jumping causing accidental Exploration Glitch
 SQEGFix:
 	LDA.l Bugfix_PodEG : BEQ ++
-	STZ.w LayerAdjustment ; disarm exploration glitch
+	STZ.w $047A ; disarm exploration glitch
 ++	RTL
 
 ;--------------------------------------------------------------------------------
 ; Fix crystal not spawning when using somaria vs boss
 TryToSpawnCrystalUntilSuccess:
-	STX.w ItemReceiptID ; what we overwrote
+	STX $02D8 ; what we overwrote
 	JSL AddAncillaLong : BCS .failed ; a clear carry flag indicates success
 .spawned
-	STZ.b RoomTag ; the "trying to spawn crystal" flag
-	STZ.b RoomTag+1 ; the "trying to spawn pendant" flag
+	STZ $AE ; the "trying to spawn crystal" flag
+	STZ $AF ; the "trying to spawn pendant" flag
 .failed
 RTL
 
 ;--------------------------------------------------------------------------------
 ; Fix crystal not spawning when using somaria vs boss
 WallmasterCameraFix:
-	STZ.b CameraBoundV    ; disable vertical camera scrolling for current room
+	STZ $A7    ; disable vertical camera scrolling for current room
 	REP #$20
-	STZ.w CameraScrollN  ; something about scrolling, setting these to 0 tricks the game 
-	STZ.w CameraScrollS  ; into thinking we're at the edge of the room so it doesn't scroll.
+	STZ $0618  ; something about scrolling, setting these to 0 tricks the game 
+	STZ $061A  ; into thinking we're at the edge of the room so it doesn't scroll.
 	SEP #$20
 	JML Sound_SetSfx3PanLong ; what we wrote over, also this will RTL
 
@@ -148,8 +158,8 @@ WallmasterCameraFix:
 ; Fix losing glove colors
 LoadActualGearPalettesWithGloves:
 REP #$20
-LDA.l SwordEquipment : STA.b Scrap0C
-LDA.l ArmorEquipment : AND.w #$00FF
+LDA SwordEquipment : STA $0C
+LDA ArmorEquipment : AND.w #$00FF
 JSL LoadGearPalettes_variable
 JSL SpriteSwap_Palette_ArmorAndGloves_part_two
 RTL
@@ -157,24 +167,24 @@ RTL
 ;--------------------------------------------------------------------------------
 ; Fix Bunny Palette Map Bug
 LoadGearPalette_safe_for_bunny:
-LDA.b GameMode 
+LDA $10 
 CMP.w #$030E : BEQ .new ; opening dungeon map
 CMP.w #$070E : BEQ .new ; opening overworld map
 .original
 -
-	LDA.b [Scrap00]
-	STA.l PaletteBufferAux, X
-	STA.l PaletteBuffer, X
-	INC.b Scrap00 : INC.b Scrap00
+	LDA [$00]
+	STA $7EC300, X
+	STA $7EC500, X
+	INC $00 : INC $00
 	INX #2
 	DEY
 	BPL -
 RTL
 .new
 -
-	LDA.b [Scrap00]
-	STA.l PaletteBuffer, X
-	INC.b Scrap00 : INC.b Scrap00
+	LDA [$00]
+	STA $7EC500, X
+	INC $00 : INC $00
 	INX #2
 	DEY
 	BPL -
@@ -183,16 +193,16 @@ RTL
 ;--------------------------------------------------------------------------------
 ; Fix pedestal pull overlay
 PedestalPullOverlayFix:
-LDA.b #$09 : STA.w AncillaGeneral, X ; the thing we wrote over
-LDA.b IndoorsFlag : BNE +
-        LDA.b OverworldIndex : CMP.b #$80 : BNE +
-                LDA.b OverlayID : CMP.b #$97
+LDA.b #$09 : STA $039F, X	; the thing we wrote over
+LDA $1B : BNE +
+	LDA $8A : CMP.b #$80 : BNE +
+		LDA $8C : CMP.b #$97
 +
 RTL
 
 ;--------------------------------------------------------------------------------
 FixJingleGlitch:
-	LDA.b GameSubMode
+	LDA.b $11
 	BEQ .set_doors
 
 	LDA.l AllowAccidentalMajorGlitch
@@ -200,7 +210,7 @@ FixJingleGlitch:
 
 .set_doors
 	LDA.b #$05
-	STA.b GameSubMode
+	STA.b $11
 
 .exit
 	RTL
@@ -212,43 +222,7 @@ pushpc
 pullpc
 ;--------------------------------------------------------------------------------
 SetOverworldTransitionFlags:
-	LDA.b #$01
-	STA.w OWTransitionFlag
-	STA.w RaceGameFlag
+	LDA #$01
+	STA $0ABF ; used by witch
+	STA $021B ; used by race game
 	RTL
-;--------------------------------------------------------------------------------
-ParadoxCaveGfxFix:
-    ; Always upload line unless you're moving into paradox cave (0x0FF) from above (0x0EF)
-    LDA.b IndoorsFlag  : BEQ .uploadLine
-    LDX.b RoomIndex    : CPX.w #$00FF : BNE .uploadLine
-    LDX.b PreviousRoom : CPX.w #$00EF : BNE .uploadLine
-
-    ;Ignore uploading four specific lines of tiles to VRAM
-    LDX.w VRAMUploadAddress
-    ; Line 1
-    CPX.w #$1800 : BEQ .skipMostOfLine
-    ; Line 2
-    CPX.w #$1A00 : BEQ .skipMostOfLine
-    ; Line 3
-    CPX.w #$1C00 : BEQ .uploadLine
-    ; Line 4
-    CPX.w #$1E00 : BEQ .uploadLine
-
-.uploadLine
-    LDA.b #$01 : STA.w MDMAEN
-
-.skipLine
-    RTL
-
-.skipMostOfLine
-    ; Set line length to 192 bytes (the first 6 8x8 tiles in the line)
-    LDX.w #$00C0 : STX.w DAS0L
-    BRA .uploadLine
-;--------------------------------------------------------------------------------
-SetItemRiseTimer:
-        LDA.w ItemReceiptMethod : CMP #$01 : BNE .not_from_chest
-                LDA.b #$38 : STA.w AncillaTimer, X
-                RTL
-        .not_from_chest
-        TYA : STA.w AncillaTimer, X ; What we wrote over
-RTL

build.bat

@@ -1,4 +1,2 @@
-del ..\working.sfc
-copy ..\alttp.sfc ..\working.sfc
-%~dp0bin\windows\asar.exe LTTP_RND_GeneralBugfixes.asm ..\working.sfc
-cmd /k
+py -3 build.py
+@echo %cmdcmdline%|find /i """%~f0""">nul && cmd /k

build.py

@@ -0,0 +1,115 @@
+import os
+import sys
+import hashlib
+
+from asar import init as asar_init, close as asar_close, patch as asar_patch, geterrors as asar_errors, getprints as asar_prints, getwarnings as asar_warnings
+
+JAP10HASH = '03a63945398191337e896e5771f77173'
+
+try:
+    from yaml import CLoader as Loader
+except ImportError:
+    from yaml import Loader
+
+
+def int16_as_bytes(value):
+    value = value & 0xFFFF
+    return [value & 0xFF, (value >> 8) & 0xFF]
+
+
+def int32_as_bytes(value):
+    value = value & 0xFFFFFFFF
+    return [value & 0xFF, (value >> 8) & 0xFF, (value >> 16) & 0xFF, (value >> 24) & 0xFF]
+
+
+def is_bundled():
+    return getattr(sys, 'frozen', False)
+
+
+def local_path(path):
+    if local_path.cached_path:
+        return os.path.join(local_path.cached_path, path)
+
+    elif is_bundled():
+        if hasattr(sys, "_MEIPASS"):
+            # we are running in a PyInstaller bundle
+            local_path.cached_path = sys._MEIPASS  # pylint: disable=protected-access,no-member
+        else:
+            # cx_Freeze
+            local_path.cached_path = os.path.dirname(os.path.abspath(sys.argv[0]))
+    else:
+        # we are running in a normal Python environment
+        import __main__
+        local_path.cached_path = os.path.dirname(os.path.abspath(__main__.__file__))
+
+    return os.path.join(local_path.cached_path, path)
+
+
+local_path.cached_path = None
+
+
+def make_new_base2current(old_rom_data, new_rom_data):
+    from collections import OrderedDict
+    import json
+    # extend to 2 mb
+    old_rom_data.extend(bytearray([0x00]) * (2097152 - len(old_rom_data)))
+
+    out_data = OrderedDict()
+    for idx, old in enumerate(old_rom_data):
+        new = new_rom_data[idx]
+        if old != new:
+            out_data[idx] = [int(new)]
+    for offset in reversed(list(out_data.keys())):
+        if offset - 1 in out_data:
+            out_data[offset-1].extend(out_data.pop(offset))
+    with open('../base2current.json', 'wt') as outfile:
+        json.dump([{key: value} for key, value in out_data.items()], outfile, separators=(",", ":"))
+
+    basemd5 = hashlib.md5()
+    basemd5.update(new_rom_data)
+    return "New Rom Hash: " + basemd5.hexdigest()
+
+
+if __name__ == '__main__':
+    try:
+        asar_init()
+        print("Asar DLL initialized")
+        
+        print("Opening Base rom")
+        with open('../alttp.sfc', 'rb') as stream:
+            old_rom_data = bytearray(stream.read())
+            
+        if len(old_rom_data) % 0x400 == 0x200:
+            old_rom_data = old_rom_data[0x200:]
+            
+        basemd5 = hashlib.md5()
+        basemd5.update(old_rom_data)
+        if JAP10HASH != basemd5.hexdigest():
+            raise Exception("Base rom is not 'Zelda no Densetsu - Kamigami no Triforce (J) (V1.0)'")
+            
+        print("Patching Base Rom")
+        result, new_rom_data = asar_patch(os.path.abspath('LTTP_RND_GeneralBugfixes.asm'), old_rom_data)
+        
+        if result:
+            with open('../working.sfc', 'wb') as stream:
+                stream.write(new_rom_data)
+            print("Success\n")
+            print(make_new_base2current(old_rom_data, new_rom_data))
+            prints = asar_prints()
+            for p in prints:
+                print(p)
+        else:
+            errors = asar_errors()
+            print("\nErrors: " + str(len(errors)))
+            for error in errors:
+                print (error)
+        warnings = asar_warnings()
+        print("\nWarnings: " + str(len(warnings)))
+        for w in warnings:
+            print(w)
+        
+        asar_close()
+    except:
+        import traceback
+        traceback.print_exc()
+

build.sh

@@ -2,4 +2,4 @@
 
 rm ../working.sfc
 cp ../alttp.sfc ../working.sfc
-./bin/macos/asar LTTP_RND_GeneralBugfixes.asm ../working.sfc
+./asar LTTP_RND_GeneralBugfixes.asm ../working.sfc

build_linux.sh

@@ -2,4 +2,4 @@
 
 rm ../working.sfc
 cp ../alttp.sfc ../working.sfc
-./bin/linux/asar LTTP_RND_GeneralBugfixes.asm ../working.sfc
+asar LTTP_RND_GeneralBugfixes.asm ../working.sfc

capacityupgrades.asm

@@ -2,26 +2,36 @@
 ; Capacity Logic
 ;================================================================================
 IncrementBombs:
-        LDA.l BombCapacity : BEQ + ; Skip if we can't have bombs
-                DEC
-                CMP.l BombsEquipment : !BLT +
-                        LDA.l BombsEquipment
-                        CMP.b #99 : !BGE +
-                                INC : STA.l BombsEquipment
-        +
+    LDA BombCapacityUpgrades ; get bomb upgrades
+	!ADD.l StartingMaxBombs : BEQ + ; Skip if we can't have bombs
+	DEC
+
+    CMP BombsEquipment
+	
+	!BLT +
+    	LDA BombsEquipment
+		CMP.b #99 : !BGE +
+		INC : STA BombsEquipment
+	+
 RTL
 ;--------------------------------------------------------------------------------
 IncrementArrows:
-        LDA.l ArrowCapacity : DEC
-        CMP.l CurrentArrows : !BLT +
-                LDA.l CurrentArrows
-                        CMP.b #99 : !BGE +
-                        INC : STA.l CurrentArrows
-        +
+    LDA ArrowCapacityUpgrades ; get arrow upgrades
+	!ADD.l StartingMaxArrows : DEC
+
+    CMP CurrentArrows
+	
+	!BLT +    
+    	LDA CurrentArrows
+		CMP.b #99 : !BGE +
+		INC : STA CurrentArrows
+	+
 RTL
 ;--------------------------------------------------------------------------------
 CompareBombsToMax:
-        LDA.l BombCapacity
-        CMP.l BombsEquipment
+    LDA BombCapacityUpgrades ; get bomb upgrades
+	!ADD.l StartingMaxBombs
+
+    CMP BombsEquipment
 RTL
 ;--------------------------------------------------------------------------------

catfish.asm

@@ -0,0 +1,42 @@
+;================================================================================
+; Randomize Catfish
+;--------------------------------------------------------------------------------
+!HEART_REDRAW = "$7F5000"
+LoadCatfishItemGFX:
+	LDA.l CatfishItem_Player : STA !MULTIWORLD_SPRITEITEM_PLAYER_ID
+    LDA.l $1DE185 ; location randomizer writes catfish item to
+	JML PrepDynamicTile
+;--------------------------------------------------------------------------------
+DrawThrownItem:
+	LDA $8A : CMP.b #$81 : BNE .catfish
+	
+	.zora
+	LDA.b #$01 : STA !HEART_REDRAW
+    LDA.l $1DE1C3 ; location randomizer writes zora item to
+	BRA .draw
+	
+	.catfish
+    LDA.l $1DE185 ; location randomizer writes catfish item to
+	
+	.draw
+	JML DrawDynamicTile
+;--------------------------------------------------------------------------------
+MarkThrownItem:
+	PHA
+
+	LDA $8A : CMP.b #$81 : BNE .catfish
+
+	.zora
+    JSL.l ItemSet_ZoraKing
+	LDA ZoraItem_Player : STA !MULTIWORLD_ITEM_PLAYER_ID
+	BRA .done
+
+	.catfish
+    JSL.l ItemSet_Catfish
+	LDA CatfishItem_Player : STA !MULTIWORLD_ITEM_PLAYER_ID
+
+	.done
+	PLA
+	JSL Link_ReceiveItem ; thing we wrote over
+RTL
+;--------------------------------------------------------------------------------

clock.asm

@@ -0,0 +1,248 @@
+;--------------------------------------------------------------------------------
+; http://problemkaputt.de/fullsnes.htm
+; 2800h-2801h  S-RTC Real Time Clock I/O Ports
+; cartridge type change from #$02 to #$55 to enable S-RTC
+; SNES Cart S-RTC (Realtime Clock) (1 game)
+;
+; PCB "SHVC-LJ3R-01" with 24pin "Sharp S-RTC" chip. Used only by one japanese game:
+;   Dai Kaiju Monogatari 2 (1996) Birthday/Hudson Soft (JP)
+; 
+; S-RTC I/O Ports
+;   002800h S-RTC Read  (R)
+;   002801h S-RTC Write (W)
+; Both registers are 4bits wide. When writing: Upper 4bit should be zero. When reading: Upper 4bit should be masked-off (they do possibly contain garbage, eg. open-bus).
+; 
+; S-RTC Communication
+; The sequence for setting, and then reading the time is:
+;   Send <0Eh,04h,0Dh,0Eh,00h,Timestamp(12 digits),0Dh> to [002801h]
+;   If ([002800h] AND 0F)=0Fh then read <Timestamp(13 digits)>
+;   If ([002800h] AND 0F)=0Fh then read <Timestamp(13 digits)>
+;   If ([002800h] AND 0F)=0Fh then read <Timestamp(13 digits)>
+;   If ([002800h] AND 0F)=0Fh then read <Timestamp(13 digits)>
+;   etc.
+; The exact meaning of the bytes is unknown. 0Eh/0Dh seems to invoke/terminate commands, 04h might be some configuration stuff (like setting 24-hour mode). 00h is apparently the set-time command. There might be further commands (such like setting interrupts, alarm, 12-hour mode, reading battery low & error flags, etc.). When reading, 0Fh seems to indicate sth like "time available".
+; The 12/13-digit "SSMMHHDDMYYY(D)" Timestamps are having the following format:
+;   Seconds.lo  (BCD, 0..9)
+;   Seconds.hi  (BCD, 0..5)
+;   Minutes.lo  (BCD, 0..9)
+;   Minutes.hi  (BCD, 0..5)
+;   Hours.lo    (BCD, 0..9)
+;   Hours.hi    (BCD, 0..2)
+;   Day.lo      (BCD, 0..9)
+;   Day.hi      (BCD, 0..3)
+;   Month       (HEX, 01h..0Ch)
+;   Year.lo     (BCD, 0..9)
+;   Year.hi     (BCD, 0..9)
+;   Century     (HEX, 09h..0Ah for 19xx..20xx)
+; When READING the time, there is one final extra digit (the existing software doesn't transmit that extra digit on WRITING, though maybe it's possible to do writing, too):
+;   Day of Week? (0..6) (unknown if RTC assigns sth like 0=Sunday or 0=Monday)
+;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+macro A_x10()
+	ASL #1 : PHA
+	ASL #2 : !ADD 1,s
+	STA 1,s : PLA
+endmacro
+;--------------------------------------------------------------------------------
+macro A_x24()
+	ASL #3 : PHA
+	ASL #1 : !ADD 1,s
+	STA 1,s : PLA
+endmacro
+;--------------------------------------------------------------------------------
+macro A_x60()
+	ASL #2 : PHA
+	ASL #4 : !SUB 1,s
+	STA 1,s : PLA
+endmacro
+;--------------------------------------------------------------------------------
+macro Clock_ReadBCD()
+	LDA $002800 : PHA
+	LDA $002800 : %A_x10() : !ADD 1,s
+	STA 1,s : PLA
+endmacro
+;--------------------------------------------------------------------------------
+
+Clock_Test:
+	JSL.l Clock_Init
+	JML.l Clock_IsSupported
+
+;--------------------------------------------------------------------------------
+; Clock_Init
+;--------------------------------------------------------------------------------
+Clock_Init:
+	LDA.b #$0E : STA $002801
+	LDA.b #$04 : STA $002801
+	LDA.b #$0D : STA $002801
+	LDA.b #$0E : STA $002801
+	LDA.b #$00 : STA $002801
+	
+	LDA.b #$00 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$01 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$01 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$00 : STA $002801
+	LDA.b #$0A : STA $002801
+	
+	LDA.b #$0D : STA $002801
+RTL
+;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+; Clock_IsSupported
+;--------------------------------------------------------------------------------
+; Input: None (8-bit accumulator)
+;--------------------------------------------------------------------------------
+; Output:
+; Carry - unset if unsupported, set if supported
+; Zero - Undefined
+;--------------------------------------------------------------------------------
+; Side Effects:
+; S-RTC is ready for reading upon exit if supported
+;--------------------------------------------------------------------------------
+Clock_IsSupported:
+	PHA : PHX
+		LDX #$00;
+		-
+			LDA $002800 : AND.b #$0F : CMP #$0F : BEQ .done ; check for clock chip ready signal
+			CPX.b #$0E : BCC ++ : CLC : BRA .done ; if we've read 14 bytes with no success, unset carry and exit
+		++	INX
+		BRA -
+	.done
+	PLX : PLA
+RTL
+;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+; Clock_QuickStamp
+;--------------------------------------------------------------------------------
+; Input: None
+;--------------------------------------------------------------------------------
+; Output:
+; $00.b - 24-bit timestamp (low)
+; $01.b - 24-bit timestamp (mid)
+; $02.b - 24-bit timestamp (high)
+; $03.b - zero
+; Carry - Unset if error, Set if success
+; Zero - Undefined
+;--------------------------------------------------------------------------------
+; Side Effects:
+; Requires Mode-7 Matrix Registers
+;--------------------------------------------------------------------------------
+Clock_QuickStamp:
+	PHA : PHX : PHP
+		SEP #$30 ; set 8-bit accumulator and index registers
+		LDX #$00;
+		-
+			LDA $002800 : AND.b #$0F : CMP #$0F : BEQ .ready ; check for clock chip ready signal
+			CPX.b #$0E : !BLT ++ : CLC : JMP .done : ++ ; if we've read 14 bytes with no success, unset carry and exit
+			INX
+		BRA -
+		SEC ; indicate success
+		
+		.ready
+		%Clock_ReadBCD() : STA $00 ; seconds
+		%Clock_ReadBCD() : STA $01 ; minutes
+		%Clock_ReadBCD() : STA $02 ; hours
+		%Clock_ReadBCD() : STA $03 ; days
+		
+		REP $20 ; set 16-bit accumulator
+		LDA $01 : AND #$00FF : %A_x60() ; convert minutes to seconds
+		STZ $01 : !ADD $00 : STA $00 ; store running total seconds to $00
+
+		LDA $03 : AND #$00FF : %A_x24() ; convert days to hours
+		STZ $03 : !ADD $02 ; get total hours
+		%A_x60() ; get total minutes
+		
+		LDY #$60
+		JSL.l Multiply_A16Y8
+		STY $02 : STZ $03
+		!ADD $00 : BCC + : INC $02 : +
+		
+	.done
+	PLP : PLX : PLA
+RTL
+;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+; Multiply_A16Y8:
+;--------------------------------------------------------------------------------
+; Expects:
+; Accumulator - 16-bit
+; Index Registers - 8-bit
+;--------------------------------------------------------------------------------
+; Notes:
+; Found a (wrong) version of this on wikibooks. This is cleaned up and fixed.
+;--------------------------------------------------------------------------------
+Multiply_A16Y8:
+	SEP #$20 ; set 8-bit accumulator
+	STY $4202
+	STA $4203
+	NOP #4
+	LDA $4216
+	LDY $4217
+	XBA
+	STA $4203
+	NOP #2
+	TYA
+	CLC
+	ADC $4216
+	LDY $4217
+	BCC .carry_bit
+	INY
+.carry_bit:
+	XBA
+	REP #$20 ; set 16-bit accumulator
+RTL
+;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+; Clock_GetTime
+;--------------------------------------------------------------------------------
+; Input: None
+;--------------------------------------------------------------------------------
+; Output:
+; $00.b - Seconds
+; $01.b - Minutes
+; $02.b - Hours
+; $03.b - Days
+; $04.b - Months
+; $05.w - Years
+; Carry - Unset if error, Set if success
+; Zero - Undefined
+;--------------------------------------------------------------------------------
+Clock_GetTime:
+	PHA : PHX : PHY : PHP
+		SEP #$30 ; set 8-bit accumulator and index registers
+		LDX #$00;
+		-
+			LDA $002800 : AND.b #$0F : CMP #$0F : BEQ .ready ; check for clock chip ready signal
+			CPX.b #$0E : !BLT ++ : CLC : JMP .done : ++ ; if we've read 14 bytes with no success, unset carry and exit
+			INX
+		BRA -
+		SEC ; indicate success
+		
+		.ready
+		%Clock_ReadBCD() : STA $00 ; seconds
+		%Clock_ReadBCD() : STA $01 ; minutes
+		%Clock_ReadBCD() : STA $02 ; hours
+		%Clock_ReadBCD() : STA $03 ; days
+		LDA $002800 : STA $04 ; months
+		%Clock_ReadBCD() : STA $05 ; years
+		LDA $002800 : STA $06 ; century
+		
+		REP $20 ; set 16-bit accumulator
+		STA $06 : AND #$00FF : %A_x10() : %A_x10() : !ADD #1000 ; multiply century digit by 100 and add 1000
+		STZ $06 : !ADD $05 : STA $05 ; add lower 2 digits of the year and store
+		
+	.done
+	PLP : PLY : PLX : PLA
+RTL
+;--------------------------------------------------------------------------------

compasses.asm

@@ -0,0 +1,72 @@
+;--------------------------------------------------------------------------------
+; $7F5010 - Scratch Space
+;--------------------------------------------------------------------------------
+
+DrawDungeonCompassCounts:
+        SEP #$10
+	LDX $1B : BNE + : RTL : + ; Skip if outdoors
+
+	; extra hard safeties for getting dungeon ID to prevent crashes
+	PHA
+	LDA.w $040C : AND.w #$00FE : TAX ; force dungeon ID to be multiple of 2
+	PLA
+
+	CPX.b #$1B : BCC + ; Skip if not in a valid dungeon ID
+		JMP .done
+	+
+	BIT.w #$0002 : BNE ++ ; if CompassMode==2, we don't check for the compass
+		TXY : TXA : LSR : TAX : LDA.l ExistsTransfer, X : TAX : LDA CompassExists, X : BEQ ++
+		TYX : LDA CompassField : AND.l DungeonItemMasks, X ; Load compass values to A, mask with dungeon item masks
+		BNE ++
+			JMP .done ; skip if we don't have compass
+	++
+
+	LDA $040C : LSR
+	BNE +
+		INC
+	+ TAX : LDA.l CompassTotalsWRAM, X : AND #$00FF
+	PHX
+		PHA
+			JSL HexToDec_fast
+		PLA : CMP.w #100 : !BLT .two_digit
+			LDX.b $05 : TXA : ORA #$2490 : STA $7EC79A
+			LDX.b $06 : TXA : ORA #$2490 : STA $7EC79C
+			LDX.b $07 : TXA : ORA #$2490 : STA $7EC79E
+			BRA .end_total
+		.two_digit
+		LDX.b $06 : TXA : ORA #$2490 : STA $7EC79A
+		LDX.b $07 : TXA : ORA #$2490 : STA $7EC79C
+	.end_total
+	PLX
+
+	LDA DungeonLocationsChecked, X : AND #$00FF
+	PHA
+		JSL HexToDec_fast
+	PLA : CMP.w #100 : !BLT +
+		LDX.b $05 : TXA : ORA #$2490 : STA $7EC792 ; Draw the 100's digit
+	+
+	LDX.b $06 : TXA : ORA #$2490 : STA $7EC794 ; Draw the item count
+	LDX.b $07 : TXA : ORA #$2490 : STA $7EC796
+	LDA.w #$2830 : STA $7EC798 ; draw the slash
+
+	.done
+RTL
+
+DungeonItemMasks: ; these are dungeon correlations to $7EF364 - $7EF369 so it knows where to store compasses, etc
+    dw $8000, $4000, $2000, $1000, $0800, $0400, $0200, $0100
+    dw $0080, $0040, $0020, $0010, $0008, $0004
+
+; maps from $040C to the odd order used in overworld map
+ExistsTransfer:
+db $0C, $0C, $00, $02, $0B, $09, $03, $07, $04, $08, $01, $06, $05, $0A
+
+;--------------------------------------------------------------------------------
+; $7EF4C0-7EF4CF - item locations checked indexed by $040C >> 1
+;--------------------------------------------------------------------------------
+InitCompassTotalsRAM:
+        LDX #$00
+        -
+                LDA CompassTotalsROM, X : STA CompassTotalsWRAM, X
+                INX
+                CPX #$0F : !BLT -
+RTL

compression.asm

@@ -0,0 +1,29 @@
+;--------------------------------------------------------------------------------
+ParadoxCaveGfxFix:
+    ; Always upload line unless you're moving into paradox cave (0x0FF) from above (0x0EF)
+    LDA $1B : BEQ .uploadLine
+    LDX $A0 : CPX #$00FF : BNE .uploadLine
+    LDX $A2 : CPX #$00EF : BNE .uploadLine
+
+    ;Ignore uploading four specific lines of tiles to VRAM
+    LDX $0118
+    ; Line 1
+    CPX #$1800 : BEQ .skipMostOfLine
+    ; Line 2
+    CPX #$1A00 : BEQ .skipMostOfLine
+    ; Line 3
+    CPX #$1C00 : BEQ .uploadLine
+    ; Line 4
+    CPX #$1E00 : BEQ .uploadLine
+
+.uploadLine
+    LDA.b #$01 : STA $420B
+
+.skipLine
+    RTL
+
+.skipMostOfLine
+    ; Set line length to 192 bytes (the first 6 8x8 tiles in the line)
+    LDX.w #$00C0 : STX $4305
+    BRA .uploadLine
+;--------------------------------------------------------------------------------

contrib.asm

@@ -0,0 +1,185 @@
+;================================================================
+; Contributor: Myramong
+;================================================================
+;Sprite_ShowMessageFromPlayerContact_Edit:
+;{
+;	STZ $1CE8
+;	JSL.l Sprite_CheckDamageToPlayerSameLayerLong : BCC .dont_show
+;
+;	LDA $4D : CMP.b #$02 : BEQ .dont_show
+;
+;	JSL.l Sprite_DirectionToFacePlayerLong : TYA : EOR.b #$03
+;	SEC
+;RTL
+;.dont_show
+;	LDA $0DE0, X
+;	CLC
+;RTL
+;}
+;================================================================
+;Sprite_ShowSolicitedMessageIfPlayerFacing_Edit:
+;{
+;	JSL.l Sprite_CheckDamageToPlayerSameLayerLong : BCC .alpha
+;	JSL.l Sprite_CheckIfPlayerPreoccupied : BCS .alpha
+;	LDA $F6 : BPL .alpha
+;	LDA $0F10, X : BNE .alpha
+;
+;	LDA $4D : CMP.b #$02 : BEQ .alpha
+;
+;	STZ $1CE8 ; set text choice to 1st option (usually yes/confirm/etc)
+;	JSL.l Sprite_DirectionToFacePlayerLong : PHX : TYX
+;
+;	; Make sure that the sprite is facing towards the player, otherwise
+;	; talking can't happen. (What sprites actually use this???)
+;	LDA $05E1A3, X : PLX : CMP $2F : BNE .not_facing_each_other
+;	PHY
+;	LDA.b #$40 : STA $0F10, X
+;	PLA : EOR.b #$03
+;	SEC
+;RTL
+;.not_facing_each_other
+;.alpha
+;	LDA $0DE0, X
+;	CLC
+;RTL
+;}
+;================================================================
+;OldMountainMan_TransitionFromTagalong_Edit:
+;{
+;	PHA
+;
+;        LDA.b #$AD : JSL Sprite_SpawnDynamically
+;
+;        PLA : PHX : TAX
+;
+;        LDA $1A64, X : AND.b #$03 : STA $0EB0, Y
+;                                    STA $0DE0, Y
+;
+;        LDA $1A00, X : CLC : ADC.b #$02 : STA $0D00, Y
+;        LDA $1A14, X : ADC.b #$00 : STA $0D20, Y
+;
+;        LDA $1A28, X : CLC : ADC.b #$02 : STA $0D10, Y
+;        LDA $1A3C, X : ADC.b #$00 : STA $0D30, Y
+;
+;        LDA $EE : STA $0F20, Y
+;
+;        LDA.b #$01 : STA $0BA0, Y
+;                     STA $0E80, Y
+;
+;        LDA.b #$01 : STA $02E4 ; OldMountainMan_FreezePlayer
+;					 STA $037B ; ^
+;
+;        PLX
+;
+;        LDA.b #$00 : STA FollowerIndicator
+;
+;        STZ $5E
+;
+;        JML $09A6B6 ; <- 4A6B6 tagalong.asm:1194 (SEP #$30 : RTS)
+;}
+;================================================================
+Sprite_ShowSolicitedMessageIfPlayerFacing_Alt:
+{
+	STA $1CF0
+	STY $1CF1
+
+	JSL Sprite_CheckDamageToPlayerSameLayerLong : BCC .alpha
+	JSL Sprite_CheckIfPlayerPreoccupied : BCS .alpha
+
+	LDA $F6 : BPL .alpha
+	LDA $0F10, X : BNE .alpha
+	LDA $4D : CMP.b #$02 : BEQ .alpha
+
+	JSL Sprite_DirectionToFacePlayerLong : PHX : TYX
+
+	; Make sure that the sprite is facing towards the player, otherwise
+	; talking can't happen. (What sprites actually use this???)
+	LDA $05E1A3, X : PLX : CMP $2F : BNE .not_facing_each_other
+
+	PHY
+
+	LDA $1CF0
+	LDY $1CF1
+
+	; Check what room we're in so we know which npc we're talking to
+	LDA.b $A0 :	CMP #$05 : BEQ .SahasrahlaDialogs
+				CMP #$1C : BEQ .BombShopGuyDialog
+						   BRA .SayNothing
+
+	.SahasrahlaDialogs
+		REP #$20 : LDA.l MapReveal_Sahasrahla : ORA MapOverlay : STA MapOverlay : SEP #$20
+		JSL DialogSahasrahla : BRA .SayNothing
+
+	.BombShopGuyDialog
+		REP #$20 : LDA.l MapReveal_BombShop : ORA MapOverlay : STA MapOverlay : SEP #$20
+		JSL DialogBombShopGuy
+
+	.SayNothing
+
+	LDA.b #$40 : STA $0F10, X
+
+	PLA : EOR.b #$03
+
+	SEC
+
+	RTL
+
+.not_facing_each_other
+.alpha
+
+	LDA $0DE0, X
+
+	CLC
+
+	RTL
+}
+;================================================================
+Sprite_ShowSolicitedMessageIfPlayerFacing_PreserveMessage:
+{
+	PHY
+	PHA
+
+	JSL Sprite_CheckDamageToPlayerSameLayerLong : BCC .alpha
+	JSL Sprite_CheckIfPlayerPreoccupied : BCS .alpha
+
+	LDA $F6 : BPL .alpha
+	LDA $0F10, X : BNE .alpha
+	LDA $4D : CMP.b #$02 : BEQ .alpha
+
+	JSL Sprite_DirectionToFacePlayerLong : PHX : TYX
+
+	; Make sure that the sprite is facing towards the player, otherwise
+	; talking can't happen. (What sprites actually use this???)
+	LDA $05E1A3, X : PLX : CMP $2F : BNE .not_facing_each_other
+
+	PLA : XBA : PLA
+
+	PHY
+
+	TAY : XBA
+	
+	JSL Sprite_ShowMessageUnconditional
+
+	LDA.b #$40 : STA $0F10, X
+
+	PLA : EOR.b #$03
+
+	SEC
+
+	RTL
+
+.not_facing_each_other
+.alpha
+	PLY
+	PLA
+
+	LDA $0DE0, X
+
+	CLC
+
+	RTL
+}
+;================================================================
+
+incsrc menu/hudalpha.asm
+incsrc util/utils.asm

controllerjank.asm

@@ -4,78 +4,109 @@
 ;--------------------------------------------------------------------------------
 ; Filtered Joypad 1 Register: [AXLR | ????]
 ; Filtered Joypad 1 Register: [BYST | udlr] [AXLR | ????]
+!INVERT_DPAD = "$7F50CB"
+
+
+InvertDPad_DPadOnly:
+	LDA $4218 : STA $00
+	LDA $4219 
+		BIT.b #$0C : BEQ + : EOR.b #$0C : + ; swap up/down
+		BIT.b #$03 : BEQ + : EOR.b #$03 : + ; swap left/right
+	STA $01
+JML.l InvertDPadReturn
+
+InvertDPad_ButtonsOnly:
+	REP #$20 ; set 16-bit accumulator
+	LDA $4218
+		BIT.w #$8040 : BEQ + : EOR.w #$8040 : + ; swap X/B
+		BIT.w #$4080 : BEQ + : EOR.w #$4080 : + ; swap Y/A
+	STA $00
+	SEP #$20 ; set 8-bit accumulator
+JML.l InvertDPadReturn
+
+InvertDPad_Both:
+	REP #$20 ; set 16-bit accumulator
+	LDA $4218
+		BIT.w #$8040 : BEQ + : EOR.w #$8040 : + ; swap X/B
+		BIT.w #$4080 : BEQ + : EOR.w #$4080 : + ; swap Y/A
+		BIT.w #$0C00 : BEQ + : EOR.w #$0C00 : + ; swap up/down
+		BIT.w #$0300 : BEQ + : EOR.w #$0300 : + ; swap left/right
+	STA $00
+	SEP #$20 ; set 8-bit accumulator
+JML.l InvertDPadReturn
+
+InvertDPad_SwapSides:
+	REP #$20 ; set 16-bit accumulator
+	LDA $4218
+		BIT.w #$0840 : BEQ + : EOR.w #$0840 : + ; swap X/up
+		BIT.w #$0180 : BEQ + : EOR.w #$0180 : + ; swap A/right
+		BIT.w #$4200 : BEQ + : EOR.w #$4200 : + ; swap Y/left
+		BIT.w #$8400 : BEQ + : EOR.w #$8400 : + ; swap B/down
+	STA $00
+	SEP #$20 ; set 8-bit accumulator
+JML.l InvertDPadReturn
+
+InvertDPad_DPadLROnly:
+	LDA $4218 : STA $00
+	LDA $4219
+		BIT.b #$03 : BEQ + : EOR.b #$03 : + ; swap left/right
+	STA $01
+JML.l InvertDPadReturn
+
+InvertDPad_DPadUDOnly:
+	LDA $4218 : STA $00
+	LDA $4219
+		BIT.b #$0C : BEQ + : EOR.b #$0C : + ; swap up/down
+	STA $01
+JML.l InvertDPadReturn
+
 
 InvertDPad:
 	LDA.l OneMindPlayerCount : BEQ .crowd_control
 
-	LDA.l OneMindId
+	LDA.l !ONEMIND_ID
 	AND.b #$03
 	TAX
 	LDA.l .onemind_controller_offset, X
 	TAX
 
-	LDA.w JOY1L,X : STA.w Scrap00
-	LDA.w JOY1H,X : STA.w Scrap01
+	LDA.w $4218,X : STA.w $00
+	LDA.w $4219,X : STA.w $01
 
-	LDA.b #$80 : STA.w WRIO ; reset this so latch can read it, otherwise RNG breaks
+	LDA #$80 : STA $4201 ; reset this so latch can read it, otherwise RNG breaks
 
 	JML.l InvertDPadReturn
 
 .crowd_control
-	LDA.l ControllerInverter : BNE +
+	LDA !INVERT_DPAD : BNE +
+	LDA.b $A0 : CMP.b #$DE : BNE .off
+	LDA.b #$01 : BRA +
 
-	LDA.w JOY1L : STA.b Scrap00
-	LDA.w JOY1H : STA.b Scrap01
+	.off
+	LDA $4218 : STA $00
+	LDA $4219 : STA $01
 	JML.l InvertDPadReturn
 
-+	DEC : BEQ .dpadOnly
-	DEC : BEQ .buttonsOnly
-	DEC : BEQ .invertBoth
-	.swapSides
-	REP #$20 ; set 16-bit accumulator
-	LDA.w JOY1L
-		BIT.w #$0840 : BEQ + : EOR.w #$0840 : + ; swap X/up
-		BIT.w #$0180 : BEQ + : EOR.w #$0180 : + ; swap A/right
-		BIT.w #$4200 : BEQ + : EOR.w #$4200 : + ; swap Y/left
-		BIT.w #$8400 : BEQ + : EOR.w #$8400 : + ; swap B/down
-	STA.b Scrap00
-	SEP #$20 ; set 8-bit accumulator
-JML.l InvertDPadReturn
-	.invertBoth
-	REP #$20 ; set 16-bit accumulator
-	LDA.w JOY1L
-		BIT.w #$8040 : BEQ + : EOR.w #$8040 : + ; swap X/B
-		BIT.w #$4080 : BEQ + : EOR.w #$4080 : + ; swap Y/A
-		BIT.w #$0C00 : BEQ + : EOR.w #$0C00 : + ; swap up/down
-		BIT.w #$0300 : BEQ + : EOR.w #$0300 : + ; swap left/right
-	STA.b Scrap00
-	SEP #$20 ; set 8-bit accumulator
-JML.l InvertDPadReturn
-	.buttonsOnly
-	REP #$20 ; set 16-bit accumulator
-	LDA.w JOY1L
-		BIT.w #$8040 : BEQ + : EOR.w #$8040 : + ; swap X/B
-		BIT.w #$4080 : BEQ + : EOR.w #$4080 : + ; swap Y/A
-	STA.b Scrap00
-	SEP #$20 ; set 8-bit accumulator
-JML.l InvertDPadReturn
-	.dpadOnly
-	LDA.w JOY1L : STA.b Scrap00
-	LDA.w JOY1H 
-		BIT.b #$0C : BEQ + : EOR.b #$0C : + ; swap up/down
-		BIT.b #$03 : BEQ + : EOR.b #$03 : + ; swap left/right
-	STA.b Scrap01
-JML.l InvertDPadReturn
+	+ DEC : BNE +
+		JMP.w InvertDPad_DPadOnly
+	+ DEC : BNE +
+		JMP.w InvertDPad_ButtonsOnly
+	+ DEC : BNE +
+		JMP.w InvertDPad_Both
+	+ DEC : BNE +
+		JMP.w InvertDPad_SwapSides
+	+ DEC : BNE +
+		JMP.w InvertDPad_DPadLROnly
+	+ JMP.w InvertDPad_DPadUDOnly
+
 
 .onemind_controller_offset
-	db 0 ; player 0 - JOY1L - joy1d1
-	db 0 ; player 1 - JOY1L - joy1d1
-	db 2 ; player 2 - JOY2L - joy2d1
-	db 6 ; player 3 - JOY4L - joy2d2
-	db 2 ; player 4 - JOY2L - joy2d1
-	db 6 ; player 5 - JOY4L - joy2d2
-
-
+	db 0 ; player 0 - $4218 - joy1d1
+	db 0 ; player 1 - $4218 - joy1d1
+	db 2 ; player 2 - $421A - joy2d1
+	db 6 ; player 3 - $421E - joy2d2
+	db 2 ; player 4 - $421A - joy2d1
+	db 6 ; player 5 - $421E - joy2d2
 
 ;--------------------------------------------------------------------------------
 
@@ -85,12 +116,12 @@ HandleOneMindController:
 
 	REP #$20
 
-	LDA.l OneMindTimerRAM
+	LDA.l !ONEMIND_TIMER
 	DEC
 	BPL .no_switch
 
 	SEP #$20
-	LDA.l OneMindId
+	LDA.l !ONEMIND_ID
 	INC
 	CMP.l OneMindPlayerCount
 	BCC .no_wrap
@@ -98,26 +129,29 @@ HandleOneMindController:
 	LDA.b #$01 ; reset to player 1
 
 .no_wrap
-	STA.l OneMindId
+	STA.l !ONEMIND_ID
 
 	REP #$20
-	LDA.l OneMindTimerInit
+	LDA.l OneMindTimer
 
 .no_switch
-	STA.l OneMindTimerRAM
+	STA.l !ONEMIND_TIMER
 
 	SEP #$20
-	LDA.l OneMindId
+	LDA.l !ONEMIND_ID
 
 	CMP.b #$04 ; is it player 4 or 5?
 	BCC .no_multitap_switch
 
-	STZ.w WRIO
+	STZ.w $4201
 
 .no_multitap_switch
 
 .no_onemind
-	STZ.b NMIDoneFlag
+	STZ.b $12
+
+	JML $008034 ; reset frame loop
+
+
 
-	JML $808034 ; reset frame loop
 

creditscharmapbighi.txt

@@ -0,0 +1,42 @@
+ =9F
+0=53
+1=54
+2=55
+3=56
+4=57
+5=58
+6=59
+7=5A
+8=5B
+9=5C
+A=5D
+B=5E
+C=5F
+D=60
+E=61
+F=62
+G=63
+H=64
+I=65
+J=66
+K=67
+L=68
+M=69
+N=6A
+O=6B
+P=6C
+Q=6D
+R=6E
+S=6F
+T=70
+U=71
+V=72
+W=73
+X=74
+Y=75
+Z=76
+'=77
+.=A0
+/=A2
+:=A3
+_=A6

creditscharmapbiglo.txt

@@ -0,0 +1,42 @@
+ =9F
+0=79
+1=7A
+2=7B
+3=7C
+4=7D
+5=7E
+6=7F
+7=80
+8=81
+9=82
+A=83
+B=84
+C=85
+D=86
+E=87
+F=88
+G=89
+H=8A
+I=8B
+J=8C
+K=8D
+L=8E
+M=8F
+N=90
+O=91
+P=92
+Q=93
+R=94
+S=95
+T=96
+U=97
+V=98
+W=99
+X=9A
+Y=9B
+Z=9C
+'=9d
+.=C0
+/=C2
+:=C3
+_=C6

creditscharmapsmall_green.txt

@@ -24,5 +24,4 @@ V=4D
 W=4E
 X=4F
 Y=50
-Z=51
-.=52
+Z=51

creditscharmapsmall_yellow.txt

@@ -24,8 +24,4 @@ V=2F
 W=30
 X=31
 Y=32
-Z=33
-,=34
-'=35
--=36
-.=37
+Z=33

crypto.asm

@@ -1,6 +1,21 @@
-; Scrap04 used for n
-; Scrap06 used for rounds
-; Scrap08 use for dpScratch/MXResult (lower 32 of dpScratch)
+; $7F50D0 - $7F50FF - Block Cypher Parameters
+; $7F5100 - $7F51FF - Block Cypher Buffer
+!v = "$7F5100"
+!n = "$04"
+!MXResult = "$08" ; an alternate name for the lower 32 bits of dpScratch
+!dpScratch = "$08"
+!keyBase = "$7F50D0"
+
+
+!y = "$7F50E0"
+!z = "$7F50E4"
+!sum = "$7F50E8"
+
+!p = "$7F50EC"
+!rounds = "$06"
+!e = "$7F50F0"
+
+!upperScratch = "$7F50F2"
 
 CryptoDelta:
 dd #$9e3779b9
@@ -20,144 +35,164 @@ macro ASL32Single(value)
 	; ROL handles the carry from the lower byte for us
 endmacro
 
+;macro LSR32(value,k)
+;	LDX.b <k>
+;	?loop:
+;	%LSR32Single(<value>,<k>)
+;	DEX : CPX.b #$00 : BNE ?loop
+;endmacro
+
+;macro ASL32(value,k)
+;	LDX.b <k>
+;	?loop:
+;	%LSR32Single(<value>,<k>)
+;	DEX : CPX.b #$00 : BNE ?loop
+;endmacro
+
 CryptoMX:
 	PHX
 
 	; upperScratch = (z>>5 ^ y <<2)
-	LDA.w z : STA.b Scrap08
-	LDA.w z+2 : STA.b Scrap08+2
-	%LSR32Single(Scrap08)
-	%LSR32Single(Scrap08)
-	%LSR32Single(Scrap08)
-	%LSR32Single(Scrap08)
-	%LSR32Single(Scrap08)
-	;%LSR32(Scrap08,#$05)
+	LDA.w !z : STA.b !dpScratch
+	LDA.w !z+2 : STA.b !dpScratch+2
+	%LSR32Single(!dpScratch)
+	%LSR32Single(!dpScratch)
+	%LSR32Single(!dpScratch)
+	%LSR32Single(!dpScratch)
+	%LSR32Single(!dpScratch)
+	;%LSR32(!dpScratch,#$05)
 
-	LDA.w y : STA.b Scrap08+4
-	LDA.w y+2 : STA.b Scrap08+6
-	%ASL32Single(Scrap08+4)
-	%ASL32Single(Scrap08+4)
-	;%ASL32(Scrap08+4,#$02)
+	LDA.w !y : STA.b !dpScratch+4
+	LDA.w !y+2 : STA.b !dpScratch+6
+	%ASL32Single(!dpScratch+4)
+	%ASL32Single(!dpScratch+4)
+	;%ASL32(!dpScratch+4,#$02)
 
-	LDA.b Scrap08 : EOR.b Scrap08+4 : STA.w CryptoScratch
-	LDA.b Scrap08+2 : EOR.b Scrap08+6 : STA.w CryptoScratch+2
+	LDA.b !dpScratch : EOR.b !dpScratch+4 : STA.w !upperScratch
+	LDA.b !dpScratch+2 : EOR.b !dpScratch+6 : STA.w !upperScratch+2
 
 	;================================
 	; upperscratch2 = (y>>3^z<<4)
 
-	LDA.w z : STA.b Scrap08
-	LDA.w z+2 : STA.b Scrap08+2
-	%ASL32Single(Scrap08)
-	%ASL32Single(Scrap08)
-	%ASL32Single(Scrap08)
-	%ASL32Single(Scrap08)
-	;%ASL32(Scrap08,#$04)
+	LDA.w !z : STA.b !dpScratch
+	LDA.w !z+2 : STA.b !dpScratch+2
+	%ASL32Single(!dpScratch)
+	%ASL32Single(!dpScratch)
+	%ASL32Single(!dpScratch)
+	%ASL32Single(!dpScratch)
+	;%ASL32(!dpScratch,#$04)
 
-	LDA.w y : STA.b Scrap08+4
-	LDA.w y+2 : STA.b Scrap08+6
-	%LSR32Single(Scrap08+4)
-	%LSR32Single(Scrap08+4)
-	%LSR32Single(Scrap08+4)
-	;%LSR32(Scrap08+4,#$03)
+	LDA.w !y : STA.b !dpScratch+4
+	LDA.w !y+2 : STA.b !dpScratch+6
+	%LSR32Single(!dpScratch+4)
+	%LSR32Single(!dpScratch+4)
+	%LSR32Single(!dpScratch+4)
+	;%LSR32(!dpScratch+4,#$03)
 
-	LDA.b Scrap08 : EOR.b Scrap08+4 : STA.w CryptoScratch+4
-	LDA.b Scrap08+2 : EOR.b Scrap08+6 : STA.w CryptoScratch+6
+	LDA.b !dpScratch : EOR.b !dpScratch+4 : STA.w !upperScratch+4
+	LDA.b !dpScratch+2 : EOR.b !dpScratch+6 : STA.w !upperScratch+6
 
 	;================================
 	; upperscratch = upperscratch + upperscratch2 ( == (z>>5^y<<2) + (y>>3^z<<4) )
 
-	LDA.w CryptoScratch : !ADD.w CryptoScratch+4 : STA.w CryptoScratch
-	LDA.w CryptoScratch+2 : ADC.w CryptoScratch+6 : STA.w CryptoScratch+2
+	LDA.w !upperScratch : !ADD.w !upperScratch+4 : STA.w !upperScratch
+	LDA.w !upperScratch+2 : ADC.w !upperScratch+6 : STA.w !upperScratch+2
 
 	;================================
 	; dpscratch = sum^y
 
-	LDA.w Sum : EOR.w y : STA.b Scrap08
-	LDA.w Sum+2 : EOR.w y+2 : STA.b Scrap08+2
+	LDA.w !sum : EOR.w !y : STA.b !dpScratch
+	LDA.w !sum+2 : EOR.w !y+2 : STA.b !dpScratch+2
 
 	;================================
 	; dpscratch2 =  (k[p&3^e]^z)
 
-	LDA.w p : AND.w #$0003 : EOR.w e : ASL #2 : TAX ; put (p&3)^e into X
-	LDA.w KeyBase, X : EOR.w z : STA.b Scrap08+4
-	LDA.w KeyBase+2, X : EOR.w z+2 : STA.b Scrap08+6
+	LDA.w !p : AND.w #$0003 : EOR.w !e : ASL #2 : TAX ; put (p&3)^e into X
+	LDA.w !keyBase, X : EOR.w !z : STA.b !dpScratch+4
+	LDA.w !keyBase+2, X : EOR.w !z+2 : STA.b !dpScratch+6
 
 	;================================
 	; upperscratch2 =  dpscratch + dpscratch2 (== (sum^y) + (k[p&3^e]^z))
-	LDA.b Scrap08 : !ADD.b Scrap08+4 : STA.w CryptoScratch+4
-	LDA.b Scrap08+2 : ADC.b Scrap08+6 : STA.w CryptoScratch+6
+	LDA.b !dpScratch : !ADD.b !dpScratch+4 : STA.w !upperScratch+4
+	LDA.b !dpScratch+2 : ADC.b !dpScratch+6 : STA.w !upperScratch+6
 
 	;================================
 	; MXResult = uppserscratch ^ upperscratch2
 
-	LDA.w CryptoScratch : EOR.w CryptoScratch+4 : STA.b Scrap08
-	LDA.w CryptoScratch+2 : EOR.w CryptoScratch+6 : STA.b Scrap08+2
+	LDA.w !upperScratch : EOR.w !upperScratch+4 : STA.b !MXResult
+	LDA.w !upperScratch+2 : EOR.w !upperScratch+6 : STA.b !MXResult+2
 	PLX
 RTS
 
+;!DIVIDEND_LOW = $4204
+;!DIVIDEND_HIGH = $4205
+;!DIVISOR = $4206
+;!QUOTIENT_LOW = $4214
+;!QUOTIENT_HIGH = $4215
+
 XXTEA_Decode:
 	PHP : PHB
 		SEP #$30 ; set 8-bit accumulator and index
 
 		LDA.b #$7F : PHA : PLB
 
-		STZ.b Scrap04+1 ; set upper byte of n to be zero, so it can safely be accessed in 16-bit mode
+		STZ.b !n+1 ; set upper byte of n to be zero, so it can safely be accessed in 16-bit mode
 
 		; search for lookup table index to avoid division and multiplication
 		LDX.b #0
 		-
 			LDA.l .n_lookup, X
-			CMP.b Scrap04 : !BLT +
+			CMP.b !n : !BLT +
 			INX
 			BRA -
 		+
 		; rounds = 6 + 52/n;
-		LDA.l .round_counts, X : STA.b Scrap06 : STZ.b Scrap06+1
+		LDA.l .round_counts, X : STA.b !rounds : STZ.b !rounds+1
 
 		REP #$20 ; set 16-bit accumulator
 
 		; sum = rounds*DELTA;
 		TXA : ASL #2 : TAX
-		LDA.l .initial_sums, X : STA.w Sum
-		LDA.l .initial_sums+2, X : STA.w Sum+2
+		LDA.l .initial_sums, X : STA.w !sum
+		LDA.l .initial_sums+2, X : STA.w !sum+2
 
 		; y = v[0];
-		LDA.w v : STA.w y
-		LDA.w v+2 : STA.w y+2
+		LDA.w !v : STA.w !y
+		LDA.w !v+2 : STA.w !y+2
 		---
-			LDA.w Sum : LSR #2 : AND.w #$0003 : STA.w e ; e = (sum >> 2) & 3;
+			LDA.w !sum : LSR #2 : AND.w #$0003 : STA.w !e ; e = (sum >> 2) & 3;
 
-			LDA.b Scrap04 : DEC : STA.w p
+			LDA.b !n : DEC : STA.w !p
 			-- BEQ + ; for (p=n-1; p>0; p--) {
 				; z = v[p-1];
 				ASL #2 : TAX
-				LDA.w v-4, X : STA.w z
-				LDA.w v-4+2, X : STA.w z+2
+				LDA.w !v-4, X : STA.w !z
+				LDA.w !v-4+2, X : STA.w !z+2
 
 				; y = v[p] -= MX;
 				JSR CryptoMX
-				LDA.w p : ASL #2 : TAX
-				LDA.w v, X : !SUB.b Scrap08 : STA.w v, X : STA.w y
-				LDA.w v+2, X : SBC.b Scrap08+2 : STA.w v+2, X : STA.w y+2
+				LDA.w !p : ASL #2 : TAX
+				LDA.w !v, X : !SUB.b !MXResult : STA.w !v, X : STA.w !y
+				LDA.w !v+2, X : SBC.b !MXResult+2 : STA.w !v+2, X : STA.w !y+2
 
-			LDA.w p : DEC : STA.w p : BRA -- ; }
+			LDA.w !p : DEC : STA.w !p : BRA -- ; }
 			+
 
 			; z = v[n-1];
-			LDA.b Scrap04 : DEC : ASL #2 : TAX
-			LDA.w v, X : STA.w z
-			LDA.w v+2, X : STA.w z+2
+			LDA.b !n : DEC : ASL #2 : TAX
+			LDA.w !v, X : STA.w !z
+			LDA.w !v+2, X : STA.w !z+2
 
 			; y = v[0] -= MX;
 			JSR CryptoMX
-			LDA.w v : !SUB.b Scrap08 : STA.w v : STA.w y
-			LDA.w v+2 : SBC.b Scrap08+2 : STA.w v+2 : STA.w y+2
+			LDA.w !v : !SUB.b !MXResult : STA.w !v : STA.w !y
+			LDA.w !v+2 : SBC.b !MXResult+2 : STA.w !v+2 : STA.w !y+2
 
 			; sum -= DELTA;
-			LDA.w Sum : !SUB.l CryptoDelta : STA.w Sum
-			LDA.w Sum+2 : SBC.l CryptoDelta+2 : STA.w Sum+2
+			LDA.w !sum : !SUB.l CryptoDelta : STA.w !sum
+			LDA.w !sum+2 : SBC.l CryptoDelta+2 : STA.w !sum+2
 
-		DEC.b Scrap06 : BEQ + : JMP --- : + ; } while (--rounds);
+		DEC !rounds : BEQ + : JMP --- : + ; } while (--rounds);
 	PLB : PLP
 RTL
 
@@ -208,3 +243,69 @@ db 32 ; n is 2
 ;dd (23*$9e3779b9)&$ffffffff ; n is 3
 dd (32*$9e3779b9)&$ffffffff	; n is 2
 
+;void btea(uint32_t *v, int n, uint32_t const key[4]) {
+;  uint32_t y, z, sum;
+;  unsigned p, rounds, e;
+
+;  } else if (n < -1) {  /* Decoding Part */
+;    n = -n;
+;    rounds = 6 + 52/n;
+;    sum = rounds*DELTA;
+;    y = v[0];
+;    do {
+;      e = (sum >> 2) & 3;
+;      for (p=n-1; p>0; p--) {
+;        z = v[p-1];
+;        y = v[p] -= MX;
+;      }
+;      z = v[n-1];
+;      y = v[0] -= MX;
+;      sum -= DELTA;
+;    } while (--rounds);
+;  }
+
+;BTEA will encode or decode n words as a single block where n > 1
+;
+;v is the n word data vector
+;k is the 4 word key
+;n is negative for decoding
+;if n is zero result is 1 and no coding or decoding takes place, otherwise the result is zero
+;assumes 32 bit 'long' and same endian coding and decoding
+;#include <stdint.h>
+;#define DELTA 0x9e3779b9
+;#define MX ((((z>>5)^(y<<2)) + ((y>>3)^(z<<4))) ^ ((sum^y) + (key[(p&3)^e] ^ z)))
+;
+;void btea(uint32_t *v, int n, uint32_t const key[4]) {
+;  uint32_t y, z, sum;
+;  unsigned p, rounds, e;
+;  if (n > 1) {          /* Coding Part */
+;    rounds = 6 + 52/n;
+;    sum = 0;
+;    z = v[n-1];
+;    do {
+;      sum += DELTA;
+;      e = (sum >> 2) & 3;
+;      for (p=0; p<n-1; p++) {
+;        y = v[p+1];
+;        z = v[p] += MX;
+;      }
+;      y = v[0];
+;      z = v[n-1] += MX;
+;    } while (--rounds);
+;  } else if (n < -1) {  /* Decoding Part */
+;    n = -n;
+;    rounds = 6 + 52/n;
+;    sum = rounds*DELTA;
+;    y = v[0];
+;    do {
+;      e = (sum >> 2) & 3;
+;      for (p=n-1; p>0; p--) {
+;        z = v[p-1];
+;        y = v[p] -= MX;
+;      }
+;      z = v[n-1];
+;      y = v[0] -= MX;
+;      sum -= DELTA;
+;    } while (--rounds);
+;  }
+;}

cuccostorm.asm

@@ -1,60 +1,78 @@
 ;================================================================================
-!CUCCO = $0B
-!INERT = $00
-!INIT = $08
-!ALIVE = $09
-!CUCCO_ENRAGED = $23
-
+!CUCCO_STORM = "$7F50C5"
+!IS_INDOORS = "$7E001B"
+!ENEMY_STATE_TABLE = "$7E0DD0"
+!ENEMY_TYPE_TABLE = "$7E0E20"
+!ENEMY_AUX1_TABLE = "$7E0DA0"
+!ENEMY_AUX2_TABLE = "$7E0DB0"
+!ENEMY_DIRECTION_TABLE = "$7E0EB0"
+!CUCCO = "#$0B"
+!INERT = "#$00"
+!INIT = "#$08"
+!ALIVE = "#$09"
+!CUCCO_ENRAGED = "#$23"
+!LINK_POS_Y_LOW = "$20"
+!LINK_POS_Y_HIGH = "$21"
+!LINK_POS_X_LOW = "$22"
+!LINK_POS_X_HIGH = "$23"
+!ENEMY_POS_Y_LOW = "$7E0D00"
+!ENEMY_POS_X_LOW = "$7E0D10"
+!ENEMY_POS_Y_HIGH = "$7E0D20"
+!ENEMY_POS_X_HIGH = "$7E0D30"
 CuccoStorm:
-
+	
 	SEP #$30 ; set 8-bit accumulator index registers
-	LDA.l CuccoStormer : BEQ + ; only if storm is on
-	LDA.b GameMode : CMP.b #$09 : BNE + ; only if outdoors
+	LDA.l !CUCCO_STORM : BEQ + ; only if storm is on
+	LDA.b $10 : CMP.b #$09 : BEQ .check ; only if outdoors
+	.indoors
+		LDA.b #$00 : STA.l !CUCCO_STORM
+		BRA +
+	.check
 	LDA.l LoopFrames : AND.b #$7F : BNE + ; check every 128 frames
-
+	
 	-
 		;==== Find a Cucco
-
+		
 		LDY.b #$FF : PHY ; push "cucco not found"
-
+	
 		LDX.b #$00 : -- : CPX.b #$10 : !BGE .ldone
-			LDA.w SpriteAITable, X : CMP.b #!ALIVE : BEQ +++
+			LDA.w !ENEMY_STATE_TABLE, X : CMP.b !ALIVE : BEQ +++
 				; enemy not found
-				CMP.b #!INERT : BNE ++
+				CMP.b !INERT : BNE ++
 					; log inert enemy slot
 					PLA : PHX
 					BRA ++
 			+++
 			; found an enemy
-			LDA.l SpriteTypeTable, X : CMP.b #!CUCCO : BNE ++
+			LDA.l !ENEMY_TYPE_TABLE, X : CMP.b !CUCCO : BNE ++
 				; it's a cucco
 				TXY ; record where we found the living cucco in case we don't find any angry ones
-				LDA.w SpriteAuxTable, X : CMP.b #!CUCCO_ENRAGED : !BLT ++
+				LDA.w !ENEMY_AUX1_TABLE, X : CMP.b !CUCCO_ENRAGED : !BLT ++
 					PLA : BRA + ; we found an angry cucco, done
 		++ : INX : BRA -- : .ldone
-
+		
 		;==== Create a Cucco
-
+	
 		CPY.b #$FF : BNE ++
 			; we didn't find a cucco, so try to create one
 			PLY
 			CPY.b #$FF : BEQ + ; fail if no slots found
-			LDA.b #!CUCCO : STA.w SpriteTypeTable, Y
-			LDA.b #!INIT : STA.w SpriteAITable, Y
-			LDA.b LinkPosY : STA.w SpritePosYLow, Y
-			LDA.b LinkPosY+1 : STA.w SpritePosYHigh, Y
-			LDA.b LinkPosX : STA.w SpritePosXLow, Y
-			LDA.b LinkPosX+1 : STA.w SpritePosXHigh, Y
+			LDA.b !CUCCO : STA.w !ENEMY_TYPE_TABLE, Y
+			LDA.b !INIT : STA.w !ENEMY_STATE_TABLE, Y
+			LDA.b !LINK_POS_Y_LOW : STA.w !ENEMY_POS_Y_LOW, Y
+			LDA.b !LINK_POS_Y_HIGH : STA.w !ENEMY_POS_Y_HIGH, Y
+			LDA.b !LINK_POS_X_LOW : STA.w !ENEMY_POS_X_LOW, Y
+			LDA.b !LINK_POS_X_HIGH : STA.w !ENEMY_POS_X_HIGH, Y
 			BRA +++
 		++
 			PLA
 		+++
-
+		
 		;==== Enrage a Cucco
-
-		LDA.b #!CUCCO_ENRAGED : STA.w SpriteAuxTable, Y ; enrage the cucco
-		LDA.b #$00 : STA.w SpriteAuxTable+$10, Y : STA.w SpriteDirectionTable, Y
-
+		
+		LDA.b !CUCCO_ENRAGED : STA.w !ENEMY_AUX1_TABLE, Y ; enrage the cucco
+		LDA.b #$00 : STA.w !ENEMY_AUX2_TABLE, Y : STA.w !ENEMY_DIRECTION_TABLE, Y
+		
 		;====
 	+
 RTL

custompalettes.asm

@@ -1,19 +0,0 @@
-PalettesCustom:
-.master_sword
-dw $0000, $7E4E, $6FF4, $1CF5, $7FFF, $1CE7, $7A10, $64A5
-.tempered_sword
-dw $7FFF, $093B, $169F, $7E8D, $7FFF, $1CE7, $7A10, $64A5
-.golden_sword
-dw $0000, $033F, $7FFF, $2640, $7FFF, $1CE7, $7A10, $64A5
-.golden_bombs
-dw $0000, $7FFF, $27FF, $02BC, $4F5F, $1CE7, $2E9C, $14B6
-.fighter_shield
-dw $0000, $7FFF, $27FF, $5E2D, $7FFF, $1CE7, $7A10, $64A5
-.red_shield
-dw $0000, $7FFF, $27FF, $5E2D, $4F5F, $1CE7, $2E9C, $14B6
-.mirror_shield
-dw $0000, $7E4E, $6F44, $1CF5, $7399, $1CE7, $02F9, $0233
-.crystal
-dw $7FFF, $7FFF, $0000, $5907, $6E0E, $0000, $7FBB, $7672
-.off_black
-dw $0000, $14A5, $14A5, $14A5, $14A5, $14A5, $14A5, $14A5

darkroomitems.asm

@@ -0,0 +1,27 @@
+CheckReceivedItemPropertiesBeforeLoad:
+    LDA $A0 : BEQ .normalCode
+    LDA $7EC005 : BNE .lightOff
+.normalCode
+    JSL LoadReceivedItemExpandedProperties ; get palette
+    RTL
+
+.lightOff
+    PHX : PHY : PHB
+    JSL LoadReceivedItemExpandedProperties ; get palette
+
+    REP #$30
+    AND #$0007 ; mask out palette
+    ASL #5 ; multiply by 32
+    ADC #$C610 ; offset to latter half
+
+    TAX ; give to destination
+    LDY #$C610 ; target palette SP0 colors 8-F
+
+    LDA #$000F ; 16 bytes
+    MVN $7E, $7E ; move palette
+
+    SEP #$30
+    PLB : PLY : PLX
+    INC $15
+    LDA #$00
+    RTL

darkworldspawn.asm

@@ -7,77 +7,89 @@ DarkWorldSaveFix:
 	JML.l StatSaveCounter
 ;--------------------------------------------------------------------------------
 DoWorldFix:
-	LDA.l InvertedMode : BEQ +
+	LDA InvertedMode : BEQ +
 		JMP DoWorldFix_Inverted
 	+
+	LDA FollowerIndicator : CMP #$04 : BEQ .aga1Alive ; if old man following, skip mirror/aga check
 	LDA.l Bugfix_MirrorlessSQToLW : BEQ .skip_mirror_check
-                LDA.l FollowerIndicator : CMP.b #$04 : BEQ .setLightWorld ; check if old man is following
-		LDA.l MirrorEquipment : BEQ .noMirror ; check if we have the mirror
+		LDA MirrorEquipment : AND #$02 : BEQ .noMirror ; check if we have the mirror
 	.skip_mirror_check ; alt entrance point
-	LDA.l ProgressIndicator : CMP.b #$03 : BCS .done ; check if agahnim 1 is alive
-        .setLightWorld
-	LDA.b #$00
+	LDA ProgressIndicator : CMP.b #$03 : BCS .done ; check if agahnim 1 is alive
+	.aga1Alive
+	LDA #$00
 	.noMirror
-	STA.l CurrentWorld ; set flag to light world
-	LDA.l FollowerIndicator : CMP.b #$07 : BNE .done : INC : STA.l FollowerIndicator ; convert frog to dwarf
+	STA CurrentWorld ; set flag to light world
+	LDA.l SmithDeleteOnSave : BEQ .transform
+		LDA FollowerIndicator
+		CMP #$07 : BEQ .clear ; clear frog
+		CMP #$08 : BEQ .clear ; clear dwarf - consider flute implications
+		BRA .done
+		.clear
+		LDA.b #$00 : STA FollowerIndicator : BRA .done ; clear follower
+	.transform
+	LDA FollowerIndicator : CMP #$07 : BNE .done : INC : STA FollowerIndicator ; convert frog to dwarf
 	.done
 RTL
 ;--------------------------------------------------------------------------------
 SetDeathWorldChecked:
-	LDA.l InvertedMode : BEQ +
+	LDA InvertedMode : BEQ +
 		JMP SetDeathWorldChecked_Inverted
 	+
-	LDA.b IndoorsFlag : BEQ .outdoors
-		LDA.w DungeonID : CMP.b #$FF : BNE .dungeon
-		LDA.b RoomIndex : ORA.b RoomIndex+1 : BNE ++
-			LDA.l GanonPyramidRespawn : BNE .pyramid ; if flag is set, force respawn at pyramid on death to ganon
+	LDA $1B : BEQ .outdoors
+		LDA $040C : CMP #$FF : BNE .dungeon
+		LDA $A0 : ORA $A1 : BNE ++
+			LDA GanonPyramidRespawn : BNE .pyramid ; if flag is set, force respawn at pyramid on death to ganon
 	    ++
 	.outdoors
 JMP DoWorldFix
 
 	.dungeon
-	LDA.l Bugfix_PreAgaDWDungeonDeathToFakeDW : BNE .done ; if the bugfix is enabled, we do nothing on death in dungeon
+	LDA Bugfix_PreAgaDWDungeonDeathToFakeDW : BNE .done ; if the bugfix is enabled, we do nothing on death in dungeon
 JMP DoWorldFix_skip_mirror_check
 
 	.pyramid
-	LDA.b #$40 : STA.l CurrentWorld ; set flag to dark world
-	LDA.l FollowerIndicator : CMP.b #$08 : BNE .done : DEC : STA.l FollowerIndicator : + ; convert dwarf to frog
+	LDA #$40 : STA CurrentWorld ; set flag to dark world
+	LDA FollowerIndicator : CMP #$08 : BNE .done : DEC : STA FollowerIndicator : + ; convert dwarf to frog
 	.done
 RTL
 ;================================================================================
 DoWorldFix_Inverted:
+	LDA FollowerIndicator : CMP #$04 : BEQ .aga1Alive ; if old man following, skip mirror/aga check
 	LDA.l Bugfix_MirrorlessSQToLW : BEQ .skip_mirror_check
-                LDA.l FollowerIndicator : CMP.b #$04 : BEQ .setDarkWorld ; check if old man is following
-		LDA.l MirrorEquipment : BEQ .setDarkWorld ; check if we have the mirror
+            LDA.l MirrorEquipment : AND #$02 : BEQ .noMirror ; check if we have the mirror
 	.skip_mirror_check ; alt entrance point
-	LDA.l ProgressIndicator : CMP.b #$03 : BCS .done ; check if agahnim 1 is alive
-        .setDarkWorld
-	LDA.b #$40 : STA.l CurrentWorld ; set flag to dark world
-	LDA.l FollowerIndicator
-	CMP.b #$07 : BEQ .clear ; clear frog
-	CMP.b #$08 : BEQ .clear ; clear dwarf - consider flute implications
-	BRA .done
-	.clear
-	LDA.b #$00 : STA.l FollowerIndicator ; clear follower
+	LDA ProgressIndicator : CMP.b #$03 : BCS .done ; check if agahnim 1 is alive
+	.noMirror
+	.aga1Alive
+	LDA #$40 : STA CurrentWorld ; set flag to dark world
+	LDA.l SmithDeleteOnSave : BEQ .transform
+		LDA FollowerIndicator
+		CMP #$07 : BEQ .clear ; clear frog
+		CMP #$08 : BEQ .clear ; clear dwarf - consider flute implications
+		BRA .done
+		.clear
+		LDA.b #$00 : STA FollowerIndicator : BRA .done ; clear follower
+	.transform
+	LDA FollowerIndicator : CMP #$07 : BNE .done : INC : STA FollowerIndicator ; convert frog to dwarf
 	.done
 RTL
 ;--------------------------------------------------------------------------------
 SetDeathWorldChecked_Inverted:
-	LDA.b IndoorsFlag : BEQ .outdoors
-		LDA.w DungeonID : CMP.b #$FF : BNE .dungeon
-		LDA.b RoomIndex : ORA.b RoomIndex+1 : BNE ++
-			LDA.l GanonPyramidRespawn : BNE .castle ; if flag is set, force respawn at pyramid on death to ganon
+	LDA $1B : BEQ .outdoors
+		LDA $040C : CMP #$FF : BNE .dungeon
+		LDA $A0 : ORA $A1 : BNE ++
+			LDA GanonPyramidRespawn : BNE .castle ; if flag is set, force respawn at pyramid on death to ganon
 		++
 	.outdoors
-JMP DoWorldFix
+JMP DoWorldFix_Inverted
 
 	.dungeon
-	LDA.l Bugfix_PreAgaDWDungeonDeathToFakeDW : BNE .done ; if the bugfix is enabled, we do nothing on death in dungeon
+	LDA Bugfix_PreAgaDWDungeonDeathToFakeDW : BNE .done ; if the bugfix is enabled, we do nothing on death in dungeon
 JMP DoWorldFix_Inverted_skip_mirror_check
 
 	.castle
-	LDA.b #$00 : STA.l CurrentWorld ; set flag to dark world
-	LDA.l FollowerIndicator : CMP.b #$07 : BNE + : LDA.b #$08 : STA.l FollowerIndicator : + ; convert frog to dwarf
+	LDA #$00 : STA CurrentWorld ; set flag to dark world
+	LDA FollowerIndicator : CMP #$07 : BNE + : LDA.b #$08 : STA FollowerIndicator : + ; convert frog to dwarf
 	.done
 RTL
 ;================================================================================
@@ -85,20 +97,22 @@ RTL
 
 ;--------------------------------------------------------------------------------
 FakeWorldFix:
-	LDA.l FixFakeWorld : BEQ +
-		LDA.b OverworldIndex : AND.b #$40 : STA.l CurrentWorld
+	LDA FixFakeWorld : BEQ +
+		PHX
+			LDX $8A : LDA.l OWTileWorldAssoc, X : STA CurrentWorld
+		PLX
 	+
 RTL
 ;--------------------------------------------------------------------------------
 MasterSwordFollowerClear:
-	LDA.l FollowerIndicator
-	CMP.b #$0E : BNE .exit ; clear master sword follower
-	LDA.b #$00 : STA.l FollowerIndicator ; clear follower
+	LDA FollowerIndicator
+	CMP #$0E : BNE .exit ; clear master sword follower
+	LDA.b #$00 : STA FollowerIndicator ; clear follower
 .exit
 	RTL
 ;--------------------------------------------------------------------------------
 FixAgahnimFollowers:
-	LDA.b #$00 : STA.l FollowerIndicator ; clear follower
+	LDA.b #$00 : STA FollowerIndicator ; clear follower
 	JML PrepDungeonExit ; thing we wrote over
 
 ;--------------------------------------------------------------------------------
@@ -108,10 +122,10 @@ macro SetMinimum(base,filler,compare)
 	?done:
 endmacro
 RefreshRainAmmo:
-	LDA.l ProgressIndicator : CMP.b #$01 : BEQ .rain ; check if we're in rain state
+	LDA ProgressIndicator : CMP.b #$01 : BEQ .rain ; check if we're in rain state
 	RTL
 	.rain
-		LDA.l StartingEntrance
+		LDA StartingEntrance
 		+ CMP.b #$03 : BNE + ; Uncle
 			%SetMinimum(CurrentMagic,MagicFiller,RainDeathRefillMagic_Uncle)
 			%SetMinimum(BombsEquipment,BombsFiller,RainDeathRefillBombs_Uncle)
@@ -131,29 +145,30 @@ RefreshRainAmmo:
 RTL
 ;--------------------------------------------------------------------------------
 SetEscapeAssist:
-	LDA.l ProgressIndicator : CMP.b #$01 : BNE .no_train ; check if we're in rain state
+	LDA ProgressIndicator : CMP.b #$01 : BNE .no_train ; check if we're in rain state
 	.rain
 		LDA.l EscapeAssist
-		BIT.b #$04 : BEQ + : STA.l InfiniteArrows : +
-		BIT.b #$02 : BEQ + : STA.l InfiniteBombs : +
-		BIT.b #$01 : BEQ + : STA.l InfiniteArrows : +
+		BIT.b #$04 : BEQ + : STA InfiniteMagicModifier : +
+		BIT.b #$02 : BEQ + : STA InfiniteBombsModifier : +
+		BIT.b #$01 : BEQ + : STA InfiniteArrowsModifier : +
 		BRA ++
 	.no_train ; choo choo
-		LDA.l EscapeAssist : BIT.b #$04 : BEQ + : LDA.b #$00 : STA.l InfiniteMagic : +
-		LDA.l EscapeAssist : BIT.b #$02 : BEQ + : LDA.b #$00 : STA.l InfiniteBombs : +
-		LDA.l EscapeAssist : BIT.b #$01 : BEQ + : LDA.b #$00 : STA.l InfiniteArrows : +
+		LDA.l EscapeAssist
+		BIT.b #$40 : BEQ + : STA InfiniteMagicModifier : +
+		BIT.b #$20 : BEQ + : STA InfiniteBombsModifier : +
+		BIT.b #$10 : BEQ + : STA InfiniteArrowsModifier : +
 	++
 
-	LDA.l SpecialWeapons : AND.b #$7F : CMP #$01 : BNE +
+	LDA.l SpecialWeapons : CMP #$01 : BNE +
 	LDA.l SpecialWeaponLevel : BEQ +
-	LDA #$01 : STA InfiniteBombs
+	LDA #$01 : STA InfiniteBombsModifier
 	+
 RTL
 ;--------------------------------------------------------------------------------
 SetSilverBowMode:
-	LDA.l SilverArrowsUseRestriction : BEQ + ; fix bow type for restricted arrow mode
-		LDA.l BowEquipment : CMP.b #$3 : BCC +
-		SBC.b #$02 : STA.l BowEquipment
+	LDA SilverArrowsUseRestriction : BEQ + ; fix bow type for restricted arrow mode
+		LDA BowEquipment : CMP.b #$3 : BCC +
+		SBC.b #$02 : STA BowEquipment
 	+
 RTL
 ;================================================================================

data/creditscharmapbighi.txt

@@ -1,79 +0,0 @@
- =9F
-0=53
-1=54
-2=55
-3=56
-4=57
-5=58
-6=59
-7=5A
-8=5B
-9=5C
-A=5D
-B=5E
-C=5F
-D=60
-E=61
-F=62
-G=63
-H=64
-I=65
-J=66
-K=67
-L=68
-M=69
-N=6A
-O=6B
-P=6C
-Q=6D
-R=6E
-S=6F
-T=70
-U=71
-V=72
-W=73
-X=74
-Y=75
-Z=76
-a=A0
-b=A1
-c=A2
-d=A3
-e=A4
-f=A5
-g=A6
-h=A7
-i=A8
-j=A9
-k=AA
-l=AB
-m=AC
-n=AD
-o=AE
-p=AF
-q=B0
-r=B1
-s=B2
-t=B3
-u=B4
-v=B5
-w=B6
-x=B7
-y=B8
-z=B9
-'=D9
-"=DA
-/=DB
-.=DC
-:=DD
-_=DE
-^=DF
-&=E0
-#=E1
-@=E2
->=E3
-?=E4
-!=E5
-~=E6
-,=E7
--=E8

data/creditscharmapbiglo.txt

@@ -1,79 +0,0 @@
- =9F
-0=79
-1=7A
-2=7B
-3=7C
-4=7D
-5=7E
-6=7F
-7=80
-8=81
-9=82
-A=83
-B=84
-C=85
-D=86
-E=87
-F=88
-G=89
-H=8A
-I=8B
-J=8C
-K=8D
-L=8E
-M=8F
-N=90
-O=91
-P=92
-Q=93
-R=94
-S=95
-T=96
-U=97
-V=98
-W=99
-X=9A
-Y=9B
-Z=9C
-a=BB
-b=BC
-c=BD
-d=BE
-e=BF
-f=C0
-g=C1
-h=C2
-i=C3
-j=C4
-k=C5
-l=C6
-m=C7
-n=C8
-o=C9
-p=CA
-q=CB
-r=CC
-s=CD
-t=CE
-u=CF
-v=D0
-w=D1
-x=D2
-y=D3
-z=D4
-'=EC
-"=ED
-/=EE
-.=EF
-:=F0
-_=F1
-^=F2
-&=F3
-#=F4
-@=F5
->=F6
-?=F7
-!=F8
-~=F9
-,=FA
--=FB

data/kanjireplacements.asm

@@ -1,55 +0,0 @@
-; Kanji replacement characters
-
-org $8E9AC9
-;.charDD ; 𓄿
-db $FB, $8C, $73, $CB, $30, $4B, $30, $54
-db $2B, $5B, $24, $2D, $12, $13, $61, $1E
-db $36, $09, $1B, $04, $14, $0B, $15, $0A
-db $15, $0A, $21, $1E, $1E, $48, $30, $38
-;.charDE ; ☥
-db $1E, $33, $0C, $2D, $12, $2D, $12, $2D
-db $12, $F3, $0C, $01, $01, $BF, $40, $C0
-db $3F, $BF, $40, $F2, $0C, $12, $0C, $12
-db $0C, $12, $0C, $1E, $50, $A0, $F0
-;.charDF ; ≈
-db $01, $3B, $6E, $11, $C4, $3B, $91, $6E
-db $BB, $44, $26, $18, $3C, $E7, $3B, $6E
-db $11, $C4, $3B, $91, $6E, $BB, $44, $EE
-db $98, $60, $F0
-;.charE0 ; 🡅
-db $0C, $12, $0C, $21, $1E, $40, $3F, $80
-db $7F, $02, $01, $01, $E1, $1E, $21, $1E
-db $21, $1E, $21, $1E, $21, $1E, $21, $1E
-db $21, $1E, $3F, $80, $80
-;.charE1 ; 🡇
-db $3F, $21, $1E, $21, $1E, $21, $1E, $21
-db $1E, $21, $1E, $21, $1E, $E1, $1E, $80
-db $7F, $40, $3F, $21, $1E, $12, $0C, $0C
-db $28, $10, $30
-;.charE2 ; 🡆
-db $18, $14, $08, $12, $0C, $F1, $0E, $80
-db $7F, $01, $80, $7F, $80, $7F, $80, $7F
-db $F1, $0E, $12, $0C, $14, $08, $18, $20
-db $C0, $C0
-;.charE3 ; 🡄
-db $06, $0A, $04, $12, $0C, $23, $1C, $40
-db $3F, $02, $01, $03, $80, $7F, $80, $7F
-db $40, $3F, $23, $1C, $12, $0C, $0A, $04
-db $06, $10, $E0, $F0
-
-
-org $8EBD94
-;.charDD ; 𓄿
-db $BF, $FE, $3F, $FF, $B8 ; 10111111 11111110 00111111 11111111 10111000
-;.charDE ; ☥
-db $BF, $FA, $3F, $FF, $B8 ; 10111111 11111010 00111111 11111111 10111000
-;.charDF ; ≈
-db $AF, $FE, $2B, $FE, $38 ; 10101111 11111110 00101011 11111110 00111000
-;.charE0 ; 🡅
-db $2F, $FE, $3F, $FF, $A8 ; 00101111 11111110 00111111 11111111 10101000
-;.charE1 ; 🡇
-db $2F, $F0, $3F, $FF, $B8 ; 00101111 11110000 00111111 11111111 10111000
-;.charE2 ; 🡆
-db $2F, $F8, $3F, $FE, $38 ; 00101111 11111000 00111111 11111110 00111000
-;.charE3 ; 🡄
-db $2F, $FE, $3F, $FE, $38 ; 00101111 11111110 00111111 11111110 00111000

data/playernamecharmap.asm

@@ -1,59 +0,0 @@
-db $00, $01, $02, $03, $04, $CC, $CC   ; あ い う え お ⎵ ⎵
-db $15, $16, $17, $1D, $1E, $CC        ; が ぎ ぐ げ ご ⎵
-db $50, $51, $52, $53, $54, $CC, $CC   ; ア イ ウ エ オ ⎵ ⎵
-db $D0, $D1, $D2, $D3, $D4, $CC        ; a b c d e ⎵
-db $AA, $AB, $AC, $AD, $CC, $CC        ; A B C D ⎵ ⎵
-
-db $08, $09, $0A, $0B, $0C, $CC, $CC   ; か き く け こ ⎵ ⎵
-db $1F, $25, $26, $27, $2D, $CC        ; ざ じ ず ぜ ぞ ⎵
-db $58, $59, $5A, $5B, $5C, $CC, $CC   ; カ キ ク ケ コ ⎵ ⎵
-db $D5, $D6, $D7, $D8, $D9, $CC        ; ザ ジ ズ ゼ ゾ ⎵
-db $AE, $AF, $B0, $B1, $CC, $CC        ; E F G H ⎵ ⎵
-
-db $10, $11, $12, $13, $14, $CC, $CC   ; さ し す せ そ ⎵ ⎵
-db $2E, $2F, $35, $36, $37, $CC        ; だ ぢ づ で ど ⎵
-db $60, $61, $62, $63, $64, $CC, $CC   ; サ シ ス セ ソ ⎵ ⎵
-db $DA, $DB, $DC, $DD, $DE, $CC        ; ダ ヂ ヅ デ ド ⎵
-db $B2, $B3, $B4, $B5, $CC, $CC        ; I J K L ⎵ ⎵
-
-db $18, $19, $1A, $1B, $1C, $CC, $CC   ; た ち つ て と ⎵ ⎵
-db $3D, $3E, $3F, $40, $41, $CC        ; ば び ぶ べ ぼ ⎵
-db $68, $69, $6A, $6B, $6C, $CC, $CC   ; タ チ ツ テ ト ⎵ ⎵
-db $DF, $E0, $E1, $E2, $E3, $CC        ; バ ビ ブ ベ ボ ⎵
-db $B6, $B7, $B8, $B9, $CC, $CC        ; M N O P ⎵ ⎵
-
-db $20, $21, $22, $23, $24, $CC, $CC   ; な に ぬ ね の ⎵ ⎵
-db $42, $43, $44, $45, $46, $CC        ; ぱ ぴ ぷ ぺ ぽ ⎵
-db $70, $71, $72, $73, $74, $CC, $CC   ; ナ ニ ヌ ネ ノ ⎵ ⎵
-db $E4, $E5, $E6, $E7, $E8, $CC        ; パ ピ プ ペ ポ ⎵
-db $BA, $BB, $BC, $BD, $CC, $CC        ; Q R S T ⎵ ⎵
-
-db $28, $29, $2A, $2B, $2C, $CC, $CC   ; は ひ ふ へ ほ ⎵ ⎵
-db $65, $66, $67, $6D, $6E, $CC
-db $78, $79, $7A, $7B, $7C, $CC, $CC   ; ハ ヒ フ ヘ ホ ⎵ ⎵
-db $E9, $EA, $EB, $EC, $C6, $CC        ; ァ ィ ゥ ェ ォ ⎵
-db $BE, $BF, $C0, $C1, $CC, $CC        ; U V W X ⎵ ⎵
-
-db $30, $31, $32, $33, $34, $CC, $CC   ; ま み む め も ⎵ ⎵
-db $6F, $75, $76, $77, $7D, $CC        ; ザ ジ ズ ゼ ゾ ⎵
-db $80, $81, $82, $83, $84, $CC, $CC   ; マ ミ ム メ モ ⎵ ⎵
-db $CC, $CC, $CC, $CC, $9A, $CC        ; ャ ュ ョ ⎵ ッ ⎵
-db $C2, $C3, $C9, $CE, $CC, $CC        ; Y Z － 〜 ⎵ ⎵
-
-db $05, $CC, $06, $CC, $07, $CC, $CC   ; や ⎵ ゆ ⎵ よ ⎵ ⎵
-db $7E, $7F, $85, $86, $87, $CC        ; ダ ヂ ヅ デ ド ⎵
-db $55, $CC, $56, $CC, $57, $CC, $CC   ; ヤ ⎵ ユ ⎵ ヨ ⎵ ⎵
-db $A0, $A1, $A2, $A3, $A4, $CC        ; ⎵ ⎵ ⎵ ⎵ ⎵ ⎵
-db $CC, $CC, $CC, $CC, $CC, $CC        ; ⎵ ⎵ ⎵ ⎵ ⎵ ⎵
-
-db $38, $39, $3A, $3B, $3C, $CC, $CC   ; ら り る れ ろ ⎵ ⎵
-db $8D, $8E, $8F, $90, $91, $CC        ; バ ビ ブ ベ ボ ⎵
-db $88, $89, $8A, $8B, $8C, $CC, $CC   ; ラ リ ル レ ロ ⎵ ⎵
-db $A5, $A6, $A7, $A8, $A9, $CC        ; ⎵ ⎵ ⎵ ⎵ ⎵ ⎵
-db $CA, $CB, $CD, $CD, $CC, $CC        ; 🡄 🡆 END ⎵ ⎵
-
-db $0D, $0E, $0F, $CC, $C9, $CC, $CC   ; わ を ん ⎵ － ⎵ ⎵
-db $92, $93, $94, $95, $96, $CC        ; パ ピ プ ペ ポ ⎵
-db $5D, $5E, $5F, $CC, $C9, $CC, $CC   ; ワ ヲ ン ⎵ － ⎵ ⎵
-db $CC, $CC, $CC, $CC, $CC, $CC        ; ⎵ ⎵ ⎵ ⎵ ⎵ ⎵
-db $CC, $CC, $CC, $CC, $CC, $CC        ; ⎵ ⎵ ⎵ ⎵ ⎵ ⎵

data/playernamestripes_2.asm

@@ -1,72 +0,0 @@
-dw $E164, $3900 ; VRAM $C9C2 | 58 bytes | Horizontal
-dw $1CA2, $0188, $1CA3, $0188, $1CA4, $0188, $0188, $0188
-dw $0188, $0188, $1DA0, $0188, $1DA1, $0188, $1DA2, $0188
-dw $1DA3, $0188, $1DA4, $0188, $0188, $0188, $1D4A, $0188
-dw $1D4B, $0188, $1D4C, $0188, $1D4D
-
-dw $0165, $3900 ; VRAM $CA02 | 58 bytes | Horizontal
-dw $1CB2, $0188, $1CB3, $0188, $1CB4, $0188, $0188, $0188
-dw $0188, $0188, $1DB0, $0188, $1DB1, $0188, $1DB2, $0188
-dw $1DB3, $0188, $1DB4, $0188, $0188, $0188, $1D5A, $0188
-dw $1D5B, $0188, $1D5C, $0188, $1D5D
-
-dw $2165, $3900 ; VRAM $CA42 | 58 bytes | Horizontal
-dw $1CAA, $0188, $1CAB, $0188, $1CAC, $0188, $0188, $0188
-dw $0188, $0188, $1DA5, $0188, $1DA6, $0188, $1DA7, $0188
-dw $1DA8, $0188, $1DA9, $0188, $0188, $0188, $1D4E, $0188
-dw $1D4F, $0188, $1D60, $0188, $1D61
-
-dw $4165, $3900 ; VRAM $CA82 | 58 bytes | Horizontal
-dw $1CBA, $0188, $1CBB, $0188, $1CBC, $0188, $0188, $0188
-dw $0188, $0188, $1DB5, $0188, $1DB6, $0188, $1DB7, $0188
-dw $1DB8, $0188, $1DB9, $0188, $0188, $0188, $1D5E, $0188
-dw $1D5F, $0188, $1D70, $0188, $1D71
-
-dw $6165, $3900 ; VRAM $CAC2 | 58 bytes | Horizontal
-dw $1CC2, $0188, $1CC3, $0188, $1CC4, $0188, $0188, $0188
-dw $0188, $0188, $1DAA, $0188, $1DAB, $0188, $1DAC, $0188
-dw $1DAD, $0188, $1DAE, $0188, $0188, $0188, $1D62, $0188
-dw $1D63, $0188, $1D64, $0188, $1D65
-
-dw $8165, $3900 ; VRAM $CB02 | 58 bytes | Horizontal
-dw $1CD2, $0188, $1CD3, $0188, $1CD4, $0188, $0188, $0188
-dw $0188, $0188, $1DBA, $0188, $1DBB, $0188, $1DBC, $0188
-dw $1DBD, $0188, $1DBE, $0188, $0188, $0188, $1D72, $0188
-dw $1D73, $0188, $1D74, $0188, $1D75
-
-dw $A165, $3900 ; VRAM $CB42 | 58 bytes | Horizontal
-dw $1CCA, $0188, $1CCB, $0188, $1CCC, $0188, $0188, $0188
-dw $0188, $0188, $1DAF, $0188, $1DC0, $0188, $1DC1, $0188
-dw $1DC2, $0188, $1DC3, $0188, $0188, $0188, $1D66, $0188
-dw $1D67, $0188, $1D68, $0188, $1D69
-
-dw $C165, $3900 ; VRAM $CB82 | 58 bytes | Horizontal
-dw $1CDA, $0188, $1CDB, $0188, $1CDC, $0188, $0188, $0188
-dw $0188, $0188, $1DBF, $0188, $1DD0, $0188, $1DD1, $0188
-dw $1DD2, $0188, $1DD3, $0188, $0188, $0188, $1D76, $0188
-dw $1D77, $0188, $1D78, $0188, $1D79
-
-dw $E165, $3900 ; VRAM $CBC2 | 58 bytes | Horizontal
-dw $1CE2, $0188, $1CE3, $0188, $1CE4, $0188, $0188, $0188
-dw $0188, $0188, $1DC4, $0188, $1DC5, $0188, $1DC6, $0188
-dw $1DC7, $0188, $1DC8, $0188, $0188, $0188, $1D6A, $0188
-dw $1D6B, $0188, $1D6C, $0188, $1D6D
-
-dw $0166, $3900 ; VRAM $CC02 | 58 bytes | Horizontal
-dw $1CF2, $0188, $1CF3, $0188, $1CF4, $0188, $0188, $0188
-dw $0188, $0188, $1DD4, $0188, $1DD5, $0188, $1DD6, $0188
-dw $1DD7, $0188, $1DD8, $0188, $0188, $0188, $1D7A, $0188
-dw $1D7B, $0188, $1D7C, $0188, $1D7D
-
-; dw $2166, $3900 ; VRAM $CC42 | 58 bytes | Horizontal
-; dw $1CEA, $0188, $1CEB, $0188, $1CEC, $0188, $0188, $0188
-; dw $0188, $0188, $1DC9, $0188, $1DCA, $0188, $1DCB, $0188
-; dw $1DCC, $0188, $1D86, $0188, $0188, $0188, $1D6E, $0188
-; dw $1D6F, $0188, $1D80, $0188, $1D81
-; 
-; dw $4166, $3900 ; VRAM $CC82 | 58 bytes | Horizontal
-; dw $1CFA, $0188, $1CFB, $0188, $1CFC, $0188, $0188, $0188
-; dw $0188, $0188, $1DD9, $0188, $1DDA, $0188, $1DDB, $0188
-; dw $1DDC, $0188, $1D96, $0188, $0188, $0188, $1D7E, $0188
-; dw $1D7F, $0188, $1D90, $0188, $1D91
-

data/playernamestripes_3.asm

@@ -1,72 +0,0 @@
-dw $E164, $3900 ; VRAM $C9C2 | 58 bytes | Horizontal
-dw $1CA2, $0188, $1CA3, $0188, $1CA4, $0188, $0188, $0188
-dw $0188, $0188, $1DA0, $0188, $1DA1, $0188, $1DA2, $0188
-dw $1DA3, $0188, $1DA4, $0188, $0188, $0188, $1D4A, $0188
-dw $1D4B, $0188, $1D4C, $0188, $1D4D
-
-dw $0165, $3900 ; VRAM $CA02 | 58 bytes | Horizontal
-dw $1CB2, $0188, $1CB3, $0188, $1CB4, $0188, $0188, $0188
-dw $0188, $0188, $1DB0, $0188, $1DB1, $0188, $1DB2, $0188
-dw $1DB3, $0188, $1DB4, $0188, $0188, $0188, $1D5A, $0188
-dw $1D5B, $0188, $1D5C, $0188, $1D5D
-
-dw $2165, $3900 ; VRAM $CA42 | 58 bytes | Horizontal
-dw $1CAA, $0188, $1CAB, $0188, $1CAC, $0188, $0188, $0188
-dw $0188, $0188, $1DA5, $0188, $1DA6, $0188, $1DA7, $0188
-dw $1DA8, $0188, $1DA9, $0188, $0188, $0188, $1D4E, $0188
-dw $1D4F, $0188, $1D60, $0188, $1D61
-
-dw $4165, $3900 ; VRAM $CA82 | 58 bytes | Horizontal
-dw $1CBA, $0188, $1CBB, $0188, $1CBC, $0188, $0188, $0188
-dw $0188, $0188, $1DB5, $0188, $1DB6, $0188, $1DB7, $0188
-dw $1DB8, $0188, $1DB9, $0188, $0188, $0188, $1D5E, $0188
-dw $1D5F, $0188, $1D70, $0188, $1D71
-
-dw $6165, $3900 ; VRAM $CAC2 | 58 bytes | Horizontal
-dw $1CC2, $0188, $1CC3, $0188, $1CC4, $0188, $0188, $0188
-dw $0188, $0188, $1DAA, $0188, $1DAB, $0188, $1DAC, $0188
-dw $1DAD, $0188, $1DAE, $0188, $0188, $0188, $1D62, $0188
-dw $1D63, $0188, $1D64, $0188, $1D65
-
-dw $8165, $3900 ; VRAM $CB02 | 58 bytes | Horizontal
-dw $1CD2, $0188, $1CD3, $0188, $1CD4, $0188, $0188, $0188
-dw $0188, $0188, $1DBA, $0188, $1DBB, $0188, $1DBC, $0188
-dw $1DBD, $0188, $1DBE, $0188, $0188, $0188, $1D72, $0188
-dw $1D73, $0188, $1D74, $0188, $1D75
-
-dw $A165, $3900 ; VRAM $CB42 | 58 bytes | Horizontal
-dw $1CCA, $0188, $1CCB, $0188, $1CCC, $0188, $0188, $0188
-dw $0188, $0188, $1DAF, $0188, $1DC0, $0188, $1DC1, $0188
-dw $1DC2, $0188, $1DC3, $0188, $0188, $0188, $1D66, $0188
-dw $1D67, $0188, $1D68, $0188, $1D69
-
-dw $C165, $3900 ; VRAM $CB82 | 58 bytes | Horizontal
-dw $1CDA, $0188, $1CDB, $0188, $1CDC, $0188, $0188, $0188
-dw $0188, $0188, $1DBF, $0188, $1DD0, $0188, $1DD1, $0188
-dw $1DD2, $0188, $1DD3, $0188, $0188, $0188, $1D76, $0188
-dw $1D77, $0188, $1D78, $0188, $1D79
-
-dw $E165, $3900 ; VRAM $CBC2 | 58 bytes | Horizontal
-dw $1CE2, $0188, $1CE3, $0188, $1CE4, $0188, $0188, $0188
-dw $0188, $0188, $1DC4, $0188, $1DC5, $0188, $1DC6, $0188
-dw $1DC7, $0188, $1DC8, $0188, $0188, $0188, $1D6A, $0188
-dw $1D6B, $0188, $1D6C, $0188, $1D6D
-
-dw $0166, $3900 ; VRAM $CC02 | 58 bytes | Horizontal
-dw $1CF2, $0188, $1CF3, $0188, $1CF4, $0188, $0188, $0188
-dw $0188, $0188, $1DD4, $0188, $1DD5, $0188, $1DD6, $0188
-dw $1DD7, $0188, $1DD8, $0188, $0188, $0188, $1D7A, $0188
-dw $1D7B, $0188, $1D7C, $0188, $1D7D
-
-dw $2166, $3900 ; VRAM $CC42 | 58 bytes | Horizontal
-dw $1CEA, $0188, $1CEB, $0188, $1CEC, $0188, $0188, $0188
-dw $0188, $0188, $1DC9, $0188, $1DCA, $0188, $1DCB, $0188
-dw $1DCC, $0188, $1D86, $0188, $0188, $0188, $1D6E, $0188
-dw $1D6F, $0188, $1D80, $0188, $1D81
-
-dw $4166, $3900 ; VRAM $CC82 | 58 bytes | Horizontal
-dw $1CFA, $0188, $1CFB, $0188, $1CFC, $0188, $0188, $0188
-dw $0188, $0188, $1DD9, $0188, $1DDA, $0188, $1DDB, $0188
-dw $1DDC, $0188, $1D96, $0188, $0188, $0188, $1D7E, $0188
-dw $1D7F, $0188, $1D90, $0188, $1D91
-

data/playernamestripes_4.asm

@@ -1,25 +0,0 @@
-dw $2362, $3900 ; VRAM $C446 | 58 bytes | Horizontal
-dw $1C48, $0188, $1C49, $0188, $1C4A, $0188, $1C4B, $0188
-dw $1C4C, $0188, $0188, $0188, $0188, $0188, $1CC5, $0188
-dw $1CC6, $0188, $1CC7, $0188, $1CCD, $0188, $1CCE, $0188
-dw $0188, $0188, $1CE8, $0188, $1CE9
-
-dw $4362, $3900 ; VRAM $C486 | 58 bytes | Horizontal
-dw $1C58, $0188, $1C59, $0188, $1C5A, $0188, $1C5B, $0188
-dw $1C5C, $0188, $0188, $0188, $0188, $0188, $1CD5, $0188
-dw $1CD6, $0188, $1CD7, $0188, $1CDD, $0188, $1CDE, $0188
-dw $0188, $0188, $1CF8, $0188, $1CF9
-
-dw $6362, $3900 ; VRAM $C4C6 | 58 bytes | Horizontal
-dw $1C60, $0188, $1C61, $0188, $1C62, $0188, $1C63, $0188
-dw $1C64, $0188, $0188, $0188, $0188, $0188, $1CCF, $0188
-dw $1CE5, $0188, $1CE6, $0188, $1CE7, $0188, $1CED, $0188
-dw $0188, $0188, $1D00, $0188, $1D01
-
-
-dw $8362, $3900 ; VRAM $C506 | 58 bytes | Horizontal
-dw $1C70, $0188, $1C71, $0188, $1C72, $0188, $1C73, $0188
-dw $1C74, $0188, $0188, $0188, $0188, $0188, $1CDF, $0188
-dw $1CF5, $0188, $1CF6, $0188, $1CF7, $0188, $1CFD, $0188
-dw $0188, $0188, $1D10, $0188, $1D11
-

decompresseditemgraphics.asm

@@ -1,539 +0,0 @@
-;===================================================================================================
-; Get the item's graphic from WRAM/ROM
-; Bit 7 set indicates an explicit WRAM address
-; Bit 7 reset indicates an offset into the ROM buffer
-;===================================================================================================
-;---------------------------------------------------------------------------------------------------
-; Enters with A for parameter
-;---------------------------------------------------------------------------------------------------
-TransferItemReceiptToBuffer_using_GraphicsID:
-	PHP
-	PHB
-
-	REP #$30
-	PHX
-	PHY
-
-	SEP #$30
-	LDX.b #$00
-
-.find_reverse
-	CMP.l ItemReceipts_graphics,X
-	BEQ .found
-
-	INX
-	BNE .find_reverse
-
-.found
-	TXA
-	REP #$30
-	BRA ++
-
-;===================================================================================================
-
-TransferRupeesProperly:
-	PHP
-	PHB
-
-	REP #$31
-	PHX
-	PHY
-
-	AND.w #$00FF
-	SBC.w #$0023
-
-	XBA
-	LSR
-	LSR
-	LSR
-	ADC.w #BigDecompressionBuffer+$800
-
-	BRA TransferItemReceiptToBuffer_using_ExplicitBufferAddress
-
-;===================================================================================================
-
-TransferItemReceiptToBuffer_using_ReceiptID:
-	PHP : PHB
-
-	REP #$30
-	PHX : PHY
-
-++	AND.w #$00FF
-	ASL : TAX
-
-        LDA.l BusyItem : BNE +
-        LDA.l StandingItemGraphicsOffsets,X
-        BRA .have_address
-+
-	LDA.l ItemReceiptGraphicsOffsets,X
-.have_address
-	BMI TransferItemReceiptToBuffer_using_ExplicitBufferAddress
-
-.rom_address
-	ADC.w #ItemReceiptGraphicsROM
-	PHK
-	BRA .continue
-
-#TransferItemReceiptToBuffer_using_ExplicitBufferAddress:
-	PEA.w $7F7F
-	PLB
-
-.continue
-	PLB
-	TAY
-	LDX.w #62
-
-.next_write
-	LDA.w $003E,Y
-	STA.l ItemGetGFX+$00,X
-
-	LDA.w $023E,Y
-	STA.l ItemGetGFX+$40,X
-
-	DEY
-	DEY
-	DEX
-	DEX
-	BPL .next_write
-
-
-	REP #$30
-	PLY
-	PLX
-	PLB
-	PLP
-	RTL
-
-;===================================================================================================
-
-TransferItemToVRAM:
-	REP #$21
-	SEP #$10
-
-	LDA.w ItemGFXPtr
-	BEQ .exit
-	BMI .wram_address
-
-.rom_address
-	ADC.w #ItemReceiptGraphicsROM
-
-	LDX.b #ItemReceiptGraphicsROM>>16
-
-.set_address
-	STA.w $4302
-	ADC.w #$0200
-	STA.w $4312
-
-	STX.w $4304
-	STX.w $4314
-
-	LDX.b #$80
-	STX.w $2115
-
-	LDA.w #$1801
-	STA.w $4300
-	STA.w $4310
-
-	LDA.w #$0040
-	STA.w $4305
-	STA.w $4315
-
-	LDA.w ItemGFXTarget
-	STA.w $2116
-
-	LDX.b #$01
-	STX.w $420B
-
-	ADC.w #$0100
-	STA.w $2116
-
-	INX
-	STX.w $420B
-
-	STZ.w ItemGFXPtr
-	STZ.w ItemGFXTarget
-
-.exit
-	RTL
-
-.wram_address
-	LDX.b #$7F
-	BRA .set_address
-
-;===================================================================================================
-; Decompress everything at the start of the game
-;===================================================================================================
-DecompBufferOffset = $18
-DecompTestByte = $04
-DecompCommand = $02
-DecompSize = $00
-DecompTileCount = $1A
-DecompSaveY = $1A
-Decomp3BPPScratch = $20
-
-;===================================================================================================
-
-DecompressAllItemGraphics:
-	PHP
-	PHB
-	PHD
-
-	REP #$38
-
-	; Stack change for safety
-	TSX
-
-	LDA.w #$1400
-	TCS
-
-	PHX
-
-	; direct page change for speed
-	LDA.w #$1200
-	TCD
-
-	STZ.b DecompBufferOffset
-
-	SEP #$34
-
-	STA.l $4200 ; already 0 from the LDA above
-
-	LDX.b #$5D+$73 : JSR FastSpriteDecomp
-	LDX.b #$5C+$73 : JSR FastSpriteDecomp
-	LDX.b #$5B+$73 : JSR FastSpriteDecomp
-	LDX.b #$5A+$73 : JSR FastSpriteDecomp
-
-	REP #$30
-	PLX
-	TXS
-
-	SEP #$20
-
-	LDA.b #$81
-	STA.l $4200
-
-
-	PLD
-	PLB
-	PLP
-
-	RTL
-
-;===================================================================================================
-; I normally hate macros like this... but I don't feel like constantly rewriting this
-;===================================================================================================
-macro GetNextByte()
-	LDA.w $0000,Y
-	INY
-	BNE ?++
-
-	; Y pulls more than it needs, but that's fine
-	; the high byte should only be affected if we somehow have FF as our bank
-	; and if that happens, we have other problems
-	PHB
-	PLY
-	INY
-	PHY
-	PLB
-
-	LDY.w #$8000
-
-?++
-endmacro
-
-;===================================================================================================
-; There's no long vanilla routine, and we're going to make heavy use of this
-; so might as well rewrite it to be fast
-;===================================================================================================
-FastSpriteDecomp:
-	SEP #$30
-
-	LDA.l $80CFC0,X : PHA : PLB ; bank
-	LDA.l $80D09F,X : XBA ; high
-	LDA.l $80D17E,X ; low
-
-	REP #$10
-
-	TAY
-
-	LDX.w #$0000
-
-.next_command
-	%GetNextByte()
-
-	CMP.b #$FF
-	BNE .continue
-
-;---------------------------------------------------------------------------------------------------
-
-	JMP Unrolled3BPPConvert
-
-;---------------------------------------------------------------------------------------------------
-
-.continue
-	CMP.b #$E0
-	BCS .expanded
-
-	STA.b DecompTestByte
-
-	REP #$20
-
-	AND.w #$001F
-
-	BRA .normal
-
-;---------------------------------------------------------------------------------------------------
-; Putting some commands up here for branch distance
-;---------------------------------------------------------------------------------------------------
-.nonrepeating
-	REP #$21
-	TYA
-	ADC.b DecompSize
-	ORA.w #$8000
-	STA.b DecompSize
-
-	SEP #$20
-
-.next_nonrepeating
-	%GetNextByte()
-
-	STA.l DecompBuffer2,X
-
-	INX
-
-	CPY.b DecompSize
-	BNE .next_nonrepeating
-
-	BRA .next_command
-
-;---------------------------------------------------------------------------------------------------
-
-.repeating
-	%GetNextByte()
-
-	STY.b DecompSaveY
-
-	LDY.b DecompSize
-
-.next_repeating
-	STA.l DecompBuffer2,X
-
-	INX
-	DEY
-	BNE .next_repeating
-
-	LDY.b DecompSaveY
-	BRA .next_command
-
-;---------------------------------------------------------------------------------------------------
-; Rest of command handling
-;---------------------------------------------------------------------------------------------------
-.expanded
-	STA.b DecompCommand
-
-	ASL
-	ASL
-	ASL
-	STA.b DecompTestByte
-
-	LDA.b DecompCommand
-	AND.b #$03
-	XBA
-
-	%GetNextByte()
-
-	REP #$20
-
-;---------------------------------------------------------------------------------------------------
-
-.normal
-	INC
-	STA.b DecompSize
-
-	SEP #$20
-
-	LDA.b DecompTestByte
-
-	AND.b #$E0
-	BEQ .nonrepeating
-	BMI .copy
-
-	ASL
-	BPL .repeating
-
-	ASL
-	BPL .repeating_word
-
-;---------------------------------------------------------------------------------------------------
-
-.incremental
-	%GetNextByte()
-
-	STY.b DecompSaveY
-
-	LDY.b DecompSize
-
-.next_incremental
-	STA.l DecompBuffer2,X
-
-	INC
-	INX
-
-	DEY
-	BNE .next_incremental
-
-	LDY.b DecompSaveY
-	JMP .next_command
-
-;---------------------------------------------------------------------------------------------------
-
-.repeating_word
-	JSR .get_next_word
-	REP #$20
-
-	STY.b DecompSaveY
-
-	LDY.b DecompSize
-	DEY
-
-.next_word
-	STA.l DecompBuffer2,X
-
-	INX
-	INX
-
-	DEY
-	DEY
-	BPL .next_word
-
-	INY
-	BEQ .not_too_far
-
-	DEX
-
-.not_too_far
-	SEP #$20
-
-	LDY.b DecompSaveY
-
-	JMP .next_command
-
-;---------------------------------------------------------------------------------------------------
-
-.copy
-	JSR .get_next_word
-
-	STY.b DecompSaveY
-
-	TAY
-
-	LDA.b DecompSize
-	BNE ++
-
-	DEC.b DecompSize+1
-
-++	PHB
-	LDA.b #$7F
-	PHA
-	PLB
-
-.next_copy
-	LDA.w DecompBuffer2,Y
-	STA.w DecompBuffer2,X
-
-	INX
-	INY
-
-	DEC.b DecompSize+0
-	BNE .next_copy
-
-	DEC.b DecompSize+1
-	BPL .next_copy
-
-	PLB
-
-	LDY.b DecompSaveY
-
-	JMP .next_command
-
-;---------------------------------------------------------------------------------------------------
-; These are only used once per command, so I'm fine with letting them be a JSR I guess
-;---------------------------------------------------------------------------------------------------
-.get_next_word
-	%GetNextByte()
-	XBA
-
-	%GetNextByte()
-	XBA
-
-	RTS
-
-;===================================================================================================
-; More macros, because lazy
-;===================================================================================================
-
-macro DoPlanesA(offset)
-	LDA.w DecompBuffer2+<offset>+<offset>,Y
-	STA.w BigDecompressionBuffer+<offset>+<offset>,X
-
-	ORA.w DecompBuffer2+<offset>+<offset>-1,Y
-	AND.w #$FF00
-	STA.b Decomp3BPPScratch
-
-	LDA.w DecompBuffer2+$10+<offset>,Y
-	AND.w #$00FF
-	TSB.b Decomp3BPPScratch
-
-	XBA
-	ORA.b Decomp3BPPScratch
-	STA.w BigDecompressionBuffer+$10+<offset>+<offset>,X
-
-endmacro
-
-;===================================================================================================
-
-Unrolled3BPPConvert:
-	LDA.b #$7F
-	PHA
-	PLB
-
-	REP #$21
-
-	LDY.w #$0000
-	LDX.b DecompBufferOffset
-
-.next_3bpp_tile
-	%DoPlanesA(0) ; 8 times
-	%DoPlanesA(1)
-	%DoPlanesA(2)
-	%DoPlanesA(3)
-	%DoPlanesA(4)
-	%DoPlanesA(5)
-	%DoPlanesA(6)
-	%DoPlanesA(7)
-
-	; carry will always be clear
-	; don't worry
-	TXA
-	ADC.w #32
-	TAX
-
-	; just trust me
-	TYA
-	ADC.w #24
-	TAY
-
-	CMP.w #24*64
-	BCS .done
-
-	JMP .next_3bpp_tile
-
-.done
-	STX.b DecompBufferOffset
-	SEP #$30
-
-	RTS
-
-;===================================================================================================
-
-

decryption.asm

@@ -1,10 +1,13 @@
 
+!CryptoBuffer = "$7F5100"
+;!keyBase = "$7F50D0"
+
 ;--------------------------------------------------------------------------------
 LoadStaticDecryptionKey:
 	PHB : PHA : PHX : PHY : PHP
 	REP #$30 ; set 16-bit accumulator & index registers
 	LDX.w #StaticDecryptionKey  ; Source
-	LDY.w #KeyBase             ; Target
+	LDY.w #!keyBase             ; Target
 	LDA.w #$000F                ; Length
 	MVN $307F
 
@@ -20,63 +23,65 @@ RetrieveValueFromEncryptedTable:
 ;Returns result in A
 	PHX : PHY
 		PHA
-			LDY.b Scrap04 : PHY : LDY.b Scrap06 : PHY : LDY.b Scrap08 : PHY
-			LDY.b Scrap0A : PHY : LDY.b Scrap0C : PHY : LDY.b Scrap0E : PHY
+			LDY $04 : PHY : LDY $06 : PHY : LDY $08 : PHY
+			LDY $0A : PHY : LDY $0C : PHY : LDY $0E : PHY
 
 				AND.w #$FFF8 : TAY
-				LDA.b [$00], Y : STA.l CryptoBuffer : INY #2
-				LDA.b [$00], Y : STA.l CryptoBuffer+2 : INY #2
-				LDA.b [$00], Y : STA.l CryptoBuffer+4 : INY #2
-				LDA.b [$00], Y : STA.l CryptoBuffer+6
+				LDA [$00], Y : STA.l !CryptoBuffer : INY #2
+				LDA [$00], Y : STA.l !CryptoBuffer+2 : INY #2
+				LDA [$00], Y : STA.l !CryptoBuffer+4 : INY #2
+				LDA [$00], Y : STA.l !CryptoBuffer+6
 
-				LDA.w #$0002 : STA.b Scrap04 ;set block size
+				LDA.w #$0002 : STA $04 ;set block size
 
 				JSL.l XXTEA_Decode
 
-			PLA : STA.b Scrap0E : PLA : STA.b Scrap0C : PLA : STA.b Scrap0A
-			PLA : STA.b Scrap08 : PLA : STA.b Scrap06 : PLA : STA.b Scrap04
+			PLA : STA $0E : PLA : STA $0C : PLA : STA $0A
+			PLA : STA $08 : PLA : STA $06 : PLA : STA $04
 		PLA : AND.w #$0007 : TAX
-		LDA.l CryptoBuffer, X
+		LDA.l !CryptoBuffer, X
 		PHA
 			LDA.w #$0000
-			STA.l CryptoBuffer
-			STA.l CryptoBuffer+2
-			STA.l CryptoBuffer+4
-			STA.l CryptoBuffer+6
+			STA.l !CryptoBuffer
+			STA.l !CryptoBuffer+2
+			STA.l !CryptoBuffer+4
+			STA.l !CryptoBuffer+6
 		PLA
 	PLY : PLX
 RTL
 ;--------------------------------------------------------------------------------
-ChestData = $01E96C
-ChestDataPayload = $01EABC ; ChestData+$0150
+
+!ChestData = "$01E96C"
+!ChestData_Payload = "$1EABC" ; !ChestData+$0150
+
 ;--------------------------------------------------------------------------------
 GetChestData:
 	LDA.l IsEncrypted : BNE .encrypted
-		INC.b Scrap0E : LDX.w #$FFFD ; what we wrote over
+		INC $0E : LDX.w #$FFFD ; what we wrote over
 JML.l Dungeon_OpenKeyedObject_nextChest
 
 .encrypted
-		INC.b Scrap0E : LDX.w #$FFFE
+		INC $0E : LDX.w #$FFFE
 
 	.nextChest
 
 	INX #2 : CPX.w #$0150 : BEQ .couldntFindChest
-	LDA.l ChestData, X : AND.w #$7FFF : CMP.b RoomIndex : BNE .nextChest
+	LDA !ChestData, X : AND.w #$7FFF : CMP $A0 : BNE .nextChest
 
-	DEC.b Scrap0E : BNE .nextChest
+	DEC $0E : BNE .nextChest
 
-	LDA.b Scrap00 : PHA : LDA.b Scrap02 : PHA
+	LDA $00 : PHA : LDA $02 : PHA
 
-		LDA.w #ChestDataPayload : STA.b Scrap00
-		LDA.w #ChestDataPayload>>16 : STA.b Scrap02
+		LDA.w #!ChestData_Payload : STA $00
+		LDA.w #!ChestData_Payload>>16 : STA $02
 
 		TXA : LSR
 		JSL RetrieveValueFromEncryptedTable
-		STA.b Scrap0C
+		STA $0C
 
-	PLA : STA.b Scrap02 : PLA : STA.b Scrap00
+	PLA : STA $02 : PLA : STA $00
 
-	LDA.l ChestData, X : ASL A : BCC .smallChest
+	LDA !ChestData, X : ASL A : BCC .smallChest
 
 JML.l Dungeon_OpenKeyedObject_bigChest ;(bank01.asm line #13783)
 

dialog.asm

@@ -2,157 +2,200 @@
 ; Dialog Pointer Override
 ;--------------------------------------------------------------------------------
 DialogOverride:
-	LDA.l AltTextFlag : BEQ .skip
-	LDA.l DialogBuffer, X ; use alternate buffer
+	LDA $7F5035 : BEQ .skip
+	LDA $7F5700, X ; use alternate buffer
 RTL
 	.skip
-    LDA.l DecompressionBuffer+$1200, X
+    LDA $7F1200, X
 RTL
-
+;--------------------------------------------------------------------------------
+; $7F5035 - Alternate Text Pointer Flag ; 0=Disable
+; $7F5036 - Padding Byte (Must be Zero)
+; $7F5700 - $7F57FF - Dialog Buffer
+;--------------------------------------------------------------------------------
 ResetDialogPointer:
-	STZ.w TextID : STZ.w TextID+1 ; reset decompression buffer
-	LDA.b #$00 : STA.l AltTextFlag ; zero out the alternate flag
-	LDA.b #$1C : STA.w DelayTimer ; thing we wrote over
+	STZ $1CF0 : STZ $1CF1 ; reset decompression buffer
+	LDA.b #$00 : STA $7F5035 ; zero out the alternate flag
+	LDA.b #$1C : STA $1CE9 ; thing we wrote over
 RTL
-
+;--------------------------------------------------------------------------------
+;macro LoadDialog(index,table)
+;	PHA : PHX : PHY
+;	PHB : PHK : PLB
+;	LDA $00 : PHA
+;	LDA $01 : PHA
+;	LDA $02 : PHA
+;		LDA.b #$01 : STA $7F5035 ; set flag
+;
+;		LDA <index> : ASL : !ADD.l <index> : TAX ; get quote offset *3, move to X
+;		LDA <table>, X : STA $00 ; write pointer to direct page
+;		LDA <table>+1, X : STA $01
+;		LDA <table>+2, X : STA $02
+;
+;		LDX.b #$00 : LDY.b #$00
+;		-
+;			LDA [$00], Y ; load the next character from the pointer
+;			STA $7F5700, X ; write to the buffer
+;			INX : INY
+;		CMP.b #$7F : BNE -
+;	PLA : STA $02
+;	PLA : STA $01
+;	PLA : STA $00
+;	PLB
+;	PLY : PLX : PLA
+;endmacro
+;--------------------------------------------------------------------------------
+;macro LoadDialogAddress(address)
+;	PHA : PHX : PHY
+;	PHP
+;	PHB : PHK : PLB
+;		SEP #$30 ; set 8-bit accumulator and index registers
+;		LDA $00 : PHA
+;		LDA $01 : PHA
+;		LDA $02 : PHA
+;			LDA.b #$01 : STA $7F5035 ; set flag
+;
+;			LDA.b #<address> : STA $00 ; write pointer to direct page
+;			LDA.b #<address>>>8 : STA $01
+;			LDA.b #<address>>>16 : STA $02
+;
+;			LDX.b #$00 : LDY.b #$00
+;			-
+;				LDA [$00], Y ; load the next character from the pointer
+;				STA $7F5700, X ; write to the buffer
+;				INX : INY
+;			CMP.b #$7F : BNE -
+;		PLA : STA $02
+;		PLA : STA $01
+;		PLA : STA $00
+;	PLB
+;	PLP
+;	PLY : PLX : PLA
+;endmacro
+;--------------------------------------------------------------------------------
+!OFFSET_POINTER = "$7F5094"
+!OFFSET_RETURN = "$7F5096"
+!DIALOG_BUFFER = "$7F5700"
 macro LoadDialogAddress(address)
 	PHA : PHX : PHY
 	PHP
 	PHB : PHK : PLB
 		SEP #$20 ; set 8-bit accumulator
 		REP #$10 ; set 16-bit index registers
-		PEI.b ($00)
-		LDA.b Scrap02 : PHA
-			STZ.w TextID : STZ.w TextID+1 ; reset decompression buffer
-			LDA.b #$01 : STA.l AltTextFlag ; set flag
+		PEI ($00)
+		LDA $02 : PHA
+			STZ $1CF0 : STZ $1CF1 ; reset decompression buffer
+			LDA.b #$01 : STA $7F5035 ; set flag
 			%CopyDialog(<address>)
-		PLA : STA.b Scrap02
+		PLA : STA $02
 		REP #$20
-		PLA : STA.b Scrap00
+		PLA : STA $00
 	PLB
 	PLP
 	PLY : PLX : PLA
 endmacro
 ;--------------------------------------------------------------------------------
 macro CopyDialog(address)
-	LDA.b #<address> : STA.b Scrap00 ; write pointer to direct page
-	LDA.b #<address>>>8 : STA.b Scrap01
-	LDA.b #<address>>>16 : STA.b Scrap02
+	LDA.b #<address> : STA $00 ; write pointer to direct page
+	LDA.b #<address>>>8 : STA $01
+	LDA.b #<address>>>16 : STA $02
 	%CopyDialogIndirect()
 endmacro
 ;--------------------------------------------------------------------------------
 macro CopyDialogIndirect()
-	REP #$20 : LDA.l DialogOffsetPointer : TAX : LDY.w #$0000 : SEP #$20 ; copy 2-byte offset pointer to X and set Y to 0
+	REP #$20 : LDA !OFFSET_POINTER : TAX : LDY.w #$0000 : SEP #$20 ; copy 2-byte offset pointer to X and set Y to 0
 	?loop:
-		LDA.b [$00], Y ; load the next character from the pointer
-		STA.l DialogBuffer, X ; write to the buffer
+		LDA [$00], Y ; load the next character from the pointer
+		STA !DIALOG_BUFFER, X ; write to the buffer
 		INX : INY
 	CMP.b #$7F : BNE ?loop
 	REP #$20 ; set 16-bit accumulator
-	TXA : INC : STA.l DialogReturnPointer ; copy out X into
-	LDA.w #$0000 : STA.l DialogOffsetPointer
+	TXA : INC : STA !OFFSET_RETURN ; copy out X into
+	LDA.w #$0000 : STA !OFFSET_POINTER
 	SEP #$20 ; set 8-bit accumulator
 endmacro
 ;--------------------------------------------------------------------------------
 LoadDialogAddressIndirect:
-	STZ.w TextID : STZ.w TextID+1 ; reset decompression buffer
-	LDA.b #$01 : STA.l AltTextFlag ; set flag
+	STZ $1CF0 : STZ $1CF1 ; reset decompression buffer
+	LDA.b #$01 : STA $7F5035 ; set flag
 	%CopyDialogIndirect()
+	;%LoadDialogAddress(UncleText)
 RTL
 ;--------------------------------------------------------------------------------
+!ITEM_TEMPORARY = "$7F5040"
 FreeDungeonItemNotice:
-        STA.w ScratchBufferV
+	STA !ITEM_TEMPORARY
 
-        PHA : PHX : PHY
-        PHP
-        PHB : PHK : PLB
-        SEP #$20 ; set 8-bit accumulator
-        REP #$10 ; set 16-bit index registers
-        PEI.b (Scrap00)
-        LDA.b Scrap02 : PHA
-        LDA.w ScratchBufferNV : PHA
-        LDA.w ScratchBufferNV+1 : PHA
+	PHA : PHX : PHY
+	PHP
+	PHB : PHK : PLB
+		SEP #$20 ; set 8-bit accumulator
+		REP #$10 ; set 16-bit index registers
+		PEI ($00)
+		LDA $02 : PHA
 	;--------------------------------
 
 	LDA.l FreeItemText : BNE + : JMP .skip : +
 
-	LDA.b #$00 : STA.w ScratchBufferNV ; initialize scratch
+	LDA #$00 : STA $7F5010 ; initialize scratch
 	LDA.l FreeItemText : AND.b #$01 : BEQ + ; show message for general small key
-	LDA.w ScratchBufferV : CMP.b #$24 : BNE + ; general small key
+	LDA !ITEM_TEMPORARY : CMP.b #$24 : BNE + ; general small key
 		%CopyDialog(Notice_SmallKeyOf)
-		LDA.l DialogReturnPointer : DEC #2 : STA.l DialogOffsetPointer
+		LDA !OFFSET_RETURN : DEC #2 : STA !OFFSET_POINTER
 		%CopyDialog(Notice_Self)
 		JMP .done
 	+ : LDA.l FreeItemText : AND.b #$02 : BEQ + ; show message for general compass
-	LDA.w ScratchBufferV : CMP.b #$25 : BNE + ; general compass
+	LDA !ITEM_TEMPORARY : CMP.b #$25 : BNE + ; general compass
 		%CopyDialog(Notice_CompassOf)
-		LDA.l DialogReturnPointer : DEC #2 : STA.l DialogOffsetPointer
+		LDA !OFFSET_RETURN : DEC #2 : STA !OFFSET_POINTER
 		%CopyDialog(Notice_Self)
 		JMP .done
 	+ : LDA.l FreeItemText : AND.b #$04 : BEQ + ; show message for general map
-	LDA.w ScratchBufferV : CMP.b #$33 : BNE + ; general map
+	LDA !ITEM_TEMPORARY : CMP.b #$33 : BNE + ; general map
 		%CopyDialog(Notice_MapOf)
-		LDA.l DialogReturnPointer : DEC #2 : STA.l DialogOffsetPointer
+		LDA !OFFSET_RETURN : DEC #2 : STA !OFFSET_POINTER
 		%CopyDialog(Notice_Self)
 		JMP .done
 	+ : LDA.l FreeItemText : AND.b #$08 : BEQ + ; show message for general big key
-	LDA.w ScratchBufferV : CMP.b #$32 : BNE + ; general big key
+	LDA !ITEM_TEMPORARY : CMP.b #$32 : BNE + ; general big key
 		%CopyDialog(Notice_BigKeyOf)
-		LDA.l DialogReturnPointer : DEC #2 : STA.l DialogOffsetPointer
+		LDA !OFFSET_RETURN : DEC #2 : STA !OFFSET_POINTER
 		%CopyDialog(Notice_Self)
 		JMP .done
 	+
 	LDA.l FreeItemText : AND.b #$04 : BEQ + ; show message for dungeon map
-	LDA.w ScratchBufferV : AND.b #$F0 ; looking at high bits only
+	LDA !ITEM_TEMPORARY : AND.b #$F0 ; looking at high bits only
 	CMP.b #$70 : BNE + ; map of...
 		%CopyDialog(Notice_MapOf)
 		JMP .dungeon
 	+ : LDA.l FreeItemText : AND.b #$02 : BEQ + ; show message for dungeon compass
-	LDA.w ScratchBufferV : AND.b #$F0 : CMP.b #$80 : BNE + ; compass of...
+	LDA !ITEM_TEMPORARY : AND.b #$F0 : CMP.b #$80 : BNE + ; compass of...
 		%CopyDialog(Notice_CompassOf)
 		JMP .dungeon
 	+ : LDA.l FreeItemText : AND.b #$08 : BEQ + ; show message for dungeon big key
-	LDA.w ScratchBufferV : AND.b #$F0 : CMP.b #$90 : BNE + ; big key of...
+	LDA !ITEM_TEMPORARY : AND.b #$F0 : CMP.b #$90 : BNE + ; big key of...
 		%CopyDialog(Notice_BigKeyOf)
-		JMP .dungeon
-	+ : LDA.l FreeItemText : AND.b #$01 : BEQ + ; show message for dungeon small key
-	LDA.w ScratchBufferV : AND.b #$F0 : CMP.b #$A0 : BNE + ; small key of...
-		LDA.w ScratchBufferV : CMP.b #$AF : BNE ++ : JMP .skip : ++
-		%CopyDialog(Notice_SmallKeyOf)
-		LDA.b #$01 : STA.w ScratchBufferNV ; set up a flip for small keys
 		BRA .dungeon
-	+ : LDA.l FreeItemText : AND.b #$20 : BEQ + ; show message for crystal
-	LDA.w ScratchBufferV : CMP.b #$B0 : !BLT + ;  crystal #
-                               CMP.b #$B7 : !BGE +
-		%CopyDialog(Notice_Crystal)
-		JMP .crystal
-        +
+	+ : LDA.l FreeItemText : AND.b #$01 : BEQ + ; show message for dungeon small key
+	LDA !ITEM_TEMPORARY : AND.b #$F0 : CMP.b #$A0 : BNE + ; small key of...
+		LDA !ITEM_TEMPORARY : CMP.b #$AF : BNE ++ : JMP .skip : ++
+		%CopyDialog(Notice_SmallKeyOf)
+		PLA : AND.b #$0F : STA $7F5020 : LDA.b #$0F : !SUB $7F5020 : PHA
+		LDA #$01 : STA $7F5010 ; set up a flip for small keys
+		BRA .dungeon
+	+
 	JMP .skip ; it's not something we are going to give a notice for
 
 	.dungeon
-	LDA.l DialogReturnPointer : DEC #2 : STA.l DialogOffsetPointer
-	LDA.w ScratchBufferV
-	AND.b #$0F
-	STA.w ScratchBufferNV+1
-	LDA.w ScratchBufferNV : BEQ +
-		LDA.w ScratchBufferNV
-		LDA.b #$0F : !SUB.w ScratchBufferNV+1 : STA.w ScratchBufferNV+1 ; flip the values for small keys
+	LDA !OFFSET_RETURN : DEC #2 : STA !OFFSET_POINTER
+	LDA !ITEM_TEMPORARY
+	AND.b #$0F ; looking at low bits only
+	STA $7F5011
+	LDA $7F5010 : BEQ +
+		LDA $7F5010
+		LDA #$0F : !SUB $7F5011 : STA $7F5011 ; flip the values for small keys
 	+
-	LDA.w ScratchBufferNV+1
-        ASL : TAX
-        REP #$20
-        LDA.l DungeonItemIDMap,X : CMP.w #$0003 : BCC .hc_sewers
-                                   CMP.w DungeonID : BNE +
-                BRA .self_notice
-                .hc_sewers
-                LDA.w DungeonID : CMP.w #$0003 : BCS +
-                        .self_notice
-                        SEP #$20
-		        %CopyDialog(Notice_Self)
-                        JMP.w .done
-        +
-        SEP #$20
-	LDA.w ScratchBufferNV+1
+	LDA $7F5011
 	CMP.b #$00 : BNE + ; ...light world
 		%CopyDialog(Notice_LightWorld) : JMP .done
 	+ : CMP.b #$01 : BNE + ; ...dark world
@@ -180,61 +223,38 @@ FreeDungeonItemNotice:
 	+ : CMP.b #$0C : BNE + ; ...desert palace
 		%CopyDialog(Notice_Desert) : JMP .done
 	+ : CMP.b #$0D : BNE + ; ...eastern palace
-		%CopyDialog(Notice_Eastern) : JMP .done
+		%CopyDialog(Notice_Eastern) : BRA .done
 	+ : CMP.b #$0E : BNE + ; ...hyrule castle
-		%CopyDialog(Notice_Castle) : JMP .done
+		%CopyDialog(Notice_Castle) : BRA .done
 	+ : CMP.b #$0F : BNE + ; ...sewers
 		%CopyDialog(Notice_Sewers)
 	+
-        JMP .done
-
-        .crystal
-	LDA.l DialogReturnPointer : DEC #2 : STA.l DialogOffsetPointer
-	LDA.w ScratchBufferV
-	AND.b #$0F ; looking at low bits only
-	CMP.b #$00 : BNE +
-		%CopyDialog(Notice_Six) : JMP .done
-	+ : CMP.b #$01 : BNE +
-		%CopyDialog(Notice_One) : JMP .done
-	+ : CMP.b #$02 : BNE +
-		%CopyDialog(Notice_Five) : JMP .done
-	+ : CMP.b #$03 : BNE +
-		%CopyDialog(Notice_Seven) : JMP .done
-	+ : CMP.b #$04 : BNE +
-		%CopyDialog(Notice_Two) : JMP .done
-	+ : CMP.b #$05 : BNE +
-		%CopyDialog(Notice_Four) : JMP .done
-	+ : CMP.b #$06 : BNE +
-		%CopyDialog(Notice_Three) : JMP .done
-        +
-
 	.done
 
-	STZ.w TextID : STZ.w TextID+1 ; reset decompression buffer
-	LDA.b #$01 : STA.l AltTextFlag ; set alternate dialog flag
-	STA.l TextBoxDefer
+	STZ $1CF0 : STZ $1CF1 ; reset decompression buffer
+	LDA.b #$01 : STA $7F5035 ; set alternate dialog flag
+	STA $7F509F
 
 	;--------------------------------
 	.skip
-        PLA : STA.w ScratchBufferNV+1
-        PLA : STA.w ScratchBufferNV
-        PLA : STA.b Scrap02
-        REP #$20
-        PLA : STA.b Scrap00
-        PLB
-        PLP
-        PLY : PLX : PLA
+		PLA : STA $02
+		REP #$20
+		PLA : STA $00
+	PLB
+	PLP
+	PLY : PLX : PLA
+	;JSL.l Main_ShowTextMessage_Alt ; .skip can be here so long as this line remains commented out
 RTL
 
 ;--------------------------------------------------------------------------------
 DialogResetSelectionIndex:
     JSL.l Attract_DecompressStoryGfx ; what we wrote over
-    STZ.w MessageCursor
+    STZ $1CE8
 RTL
 ;--------------------------------------------------------------------------------
 DialogItemReceive:
 	BCS .nomessage ; if doubling the item value overflowed it must be a rando item
-	CPY.b #$98 : BCC ++ ;if the item is $4C or greater it must be a rando item
+	CPY #$98 : BCC ++ ;if the item is $4C or greater it must be a rando item
 .nomessage
 	LDA.w #$FFFF
 
@@ -247,14 +267,10 @@ RTL
 ;--------------------------------------------------------------------------------
 DialogFairyThrow:
 	LDA.l Restrict_Ponds : BEQ .normal
-	LDA.l BottleContentsOne
-	ORA.l BottleContentsTwo
-	ORA.l BottleContentsThree
-	ORA.l BottleContentsFour
-	BNE .normal
-
+	LDA BottleContentsOne
+		ORA BottleContentsTwo : ORA BottleContentsThree : ORA BottleContentsFour : BNE .normal
 	.noInventory
-	LDA.w SpriteActivity, X : !ADD #$08 : STA.w SpriteActivity, X
+	LDA $0D80, X : !ADD #$08 : STA $0D80, X
 	LDA.b #$51
 	LDY.b #$01
 RTL
@@ -268,8 +284,11 @@ DialogGanon1:
 	REP #$20
 	LDA.w #$018C
 	BCC +
+	JSL CheckMushroom
 	LDA.w #$016D
-+	STA.w TextID
+	BCC +
+	LDA.w #$0197
++	STA $1CF0
 	SEP #$20
 	JSL.l Sprite_ShowMessageMinimal_Alt
 RTL
@@ -288,9 +307,13 @@ DialogGanon2:
 	REP #$20
 	BCS +
 		LDA.w #$018D : JMP .done
+	+
+		JSL CheckMushroom
+		BCC +
+		LDA.w #$0198 : JMP .done
 	+
 		LDA.l GanonVulnerabilityItem : AND #$00FF : BNE .special_item
-		LDA.l SpecialWeapons : AND.w #$007F
+		LDA.l SpecialWeapons : AND.w #$00FF
 		CMP.w #$0001 : BEQ .bombs ; bombs if special bomb mode
 	.silver_arrows
 		LDA.l BowTracking
@@ -320,7 +343,7 @@ DialogGanon2:
 		LDA.w #$0195 : BRA .done
 	.bombs
 		LDA.l BombsEquipment : AND #$00FF : BNE +
-		LDA.l InfiniteBombs : AND #$00FF : BNE + ; check for infinite bombs
+		LDA.l InfiniteBombsModifier : AND #$00FF : BNE + ; check for infinite bombs
 		LDA.w #$0192 : BRA .done
 	+
 		LDA.w #$0195 : BRA .done
@@ -338,18 +361,18 @@ DialogGanon2:
 	+
 		LDA.w #$0195 : BRA .done
 	.done
-	STA.w TextID
+	STA $1CF0
 	SEP #$20
 	JSL.l Sprite_ShowMessageMinimal_Alt
 RTL
 ;--------------------------------------------------------------------------------
 DialogEtherTablet:
 	PHA
-	LDA.w ItemCursor : CMP.b #$0F : BEQ + ; Show normal text if book is not equipped
+	LDA $0202 : CMP.b #$0F : BEQ + ; Show normal text if book is not equipped
 	-
 	PLA : JML Sprite_ShowMessageUnconditional ; Wacky Hylian Text
 	+
-	BIT.b Joy1A_New : BVC - ; Show normal text if Y is not pressed
+	BIT $F4 : BVC - ; Show normal text if Y is not pressed
 	JSL CheckTabletSword : BMI .yesText
 	CMP.b #$02 : !BGE .noText
 	.yesText
@@ -364,11 +387,11 @@ RTL
 ;--------------------------------------------------------------------------------
 DialogBombosTablet:
 	PHA
-	LDA.w ItemCursor : CMP.b #$0F : BEQ + ; Show normal text if book is not equipped
+	LDA $0202 : CMP.b #$0F : BEQ + ; Show normal text if book is not equipped
 	-
 	PLA : JML Sprite_ShowMessageUnconditional ; Wacky Hylian Text
 	+
-	BIT.b Joy1A_New : BVC - ; Show normal text if Y is not pressed
+	BIT $F4 : BVC - ; Show normal text if Y is not pressed
 	JSL CheckTabletSword : BMI .yesText
 	CMP.b #$02 : !BGE .noText
 	.yesText
@@ -382,7 +405,7 @@ DialogBombosTablet:
 RTL
 ;--------------------------------------------------------------------------------
 DialogSahasrahla:
-	LDA.l PendantsField : AND.b #$04 : BEQ + ;Check if player has green pendant
+	LDA.l PendantsField : AND #$04 : BEQ + ;Check if player has green pendant
 		LDA.b #$2F
 		LDY.b #$00
 		JML Sprite_ShowMessageUnconditional
@@ -391,7 +414,7 @@ RTL
 ;--------------------------------------------------------------------------------
 DialogBombShopGuy:
 	LDY.b #$15
-	LDA.l CrystalsField : AND.b #$05 : CMP.b #$05 : BNE + ;Check if player has crystals 5 & 6
+	LDA.l CrystalsField : AND #$05 : CMP #$05 : BNE + ;Check if player has crystals 5 & 6
 		INY ; from 15 to 16
 	+
 	TYA
@@ -401,7 +424,7 @@ RTL
 
 ;---------------------------------------------------------------------------------------------------
 AgahnimAsksAboutPed:
-	LDA.l GanonVulnerableMode
+	LDA.l InvincibleGanon
 	CMP.b #$06 : BNE .vanilla
 
 	LDA.l OverworldEventDataWRAM+$80 ; check ped flag
@@ -409,188 +432,82 @@ AgahnimAsksAboutPed:
 	BNE .vanilla
 
 	LDA.b #$8C ; message 018C for no ped
-	STA.w TextID
+	STA.w $1CF0
 
 .vanilla
-	JML $85FA8E ; Sprite_ShowMessageMinimal
+	JML $05FA8E ; Sprite_ShowMessageMinimal
 ;--------------------------------------------------------------------------------
 Main_ShowTextMessage_Alt:
 	; Are we in text mode? If so then end the routine.
-	LDA.b GameMode : CMP.b #$0E : BEQ .already_in_text_mode
+	LDA $10 : CMP.b #$0E : BEQ .already_in_text_mode
 Sprite_ShowMessageMinimal_Alt:
-	STZ.b GameSubMode
+	STZ $11
 
 	PHX : PHY
-	PEI.b (Scrap00)
-	LDA.b Scrap02 : PHA
+	PEI ($00)
+	LDA.b $02 : PHA
 
-	LDA.b #$1C : STA.b Scrap02
+	LDA.b #$1C : STA.b $02
 	REP #$30
-		LDA.w TextID : ASL : TAX
+		LDA.w $1CF0 : ASL : TAX
 		LDA.l $7F71C0, X
-		STA.b Scrap00
+		STA.b $00
 	SEP #$30
 
 	LDY.b #$00
-	      LDA.b [Scrap00], Y : CMP.b #$FE : BNE +
-	INY : LDA.b [Scrap00], Y : CMP.b #$6E : BNE +
-	INY : LDA.b [Scrap00], Y :            : BNE +
-	INY : LDA.b [Scrap00], Y : CMP.b #$FE : BNE +
-	INY : LDA.b [Scrap00], Y : CMP.b #$6B : BNE +
-	INY : LDA.b [Scrap00], Y : CMP.b #$04 : BNE +
-		STZ.w MessageCursor
+	      LDA [$00], Y : CMP.b #$FE : BNE +
+	INY : LDA [$00], Y : CMP.b #$6E : BNE +
+	INY : LDA [$00], Y :            : BNE +
+	INY : LDA [$00], Y : CMP.b #$FE : BNE +
+	INY : LDA [$00], Y : CMP.b #$6B : BNE +
+	INY : LDA [$00], Y : CMP.b #$04 : BNE +
+		STZ $1CE8
 		JMP .end
 	+
 
-	STZ.w MessageJunk   ; Otherwise set it so we are in text mode.
-	STZ.w MessageSubModule
+	STZ $0223   ; Otherwise set it so we are in text mode.
+	STZ $1CD8   ; Initialize the step in the submodule
 
 	; Go to text display mode (as opposed to maps, etc)
-	LDA.b #$02 : STA.b GameSubMode
+	LDA.b #$02 : STA $11
 
 	; Store the current module in the temporary location.
-	LDA.b GameMode : STA.w GameModeCache
+	LDA $10 : STA $010C
 
 	; Switch the main module ($10) to text mode.
-	LDA.b #$0E : STA.b GameMode
+	LDA.b #$0E : STA $10
 	.end
-	PLA : STA.b Scrap02
-	PLA : STA.b Scrap01
-	PLA : STA.b Scrap00
+	PLA : STA.b $02
+	PLA : STA.b $01
+	PLA : STA.b $00
 	PLY : PLX
 
 Main_ShowTextMessage_Alt_already_in_text_mode:
 RTL
 
 CalculateSignIndex:
-; for the big 1024x1024 screens we are calculating link's effective
-; screen area, as though the screen was 4 different 512x512 screens.
-; And we do this in a way that will likely give the right value even
-; with major glitches.
+  ; for the big 1024x1024 screens we are calculating link's effective
+  ; screen area, as though the screen was 4 different 512x512 screens.
+  ; And we do this in a way that will likely give the right value even
+  ; with major glitches.
 
-LDA.b OverworldIndex : ASL A : TAY ;what we wrote over
+  LDA $8A : ASL A : TAY ;what we wrote over
 
-LDA.w OWScreenSize : BEQ .done ; If a small map, we can skip these calculations.
+  LDA $0712 : BEQ .done ; If a small map, we can skip these calculations.
 
-LDA.b LinkPosY+1 : AND.w #$0002 : ASL #2 : EOR.b OverworldIndex : AND.w #$0008 : BEQ +
-TYA : !ADD.w #$0010 : TAY  ;add 16 if we are in lower half of big screen.
-+
+  LDA $21 : AND.w #$0002 : ASL #2 : EOR $8A : AND.w #$0008 : BEQ +
+  	TYA : !ADD.w #$0010 : TAY  ;add 16 if we are in lower half of big screen.
+  +
 
-LDA.b LinkPosX+1 : AND.w #$0002 : LSR : EOR.b OverworldIndex : AND.w #$0001 : BEQ +
-TYA : INC #2 : TAY  ;add 16 if we are in lower half of big screen.
-+
-; ensure even if things go horribly wrong, we don't read the sign out of bounds and crash:
-TYA : AND.w #$00FF : TAY
+  LDA $23 : AND.w #$0002 : LSR : EOR $8A : AND.w #$0001 : BEQ +
+  TYA : INC #2 : TAY  ;add 16 if we are in lower half of big screen.
+  +
+  ; ensure even if things go horribly wrong, we don't read the sign out of bounds and crash:
+  TYA : AND.w #$00FF : TAY
 
 .done
 RTL
 
-;================================================================
-; Contributor: Myramong
-;================================================================
-Sprite_ShowSolicitedMessageIfPlayerFacing_Alt:
-{
-	STA.w TextID
-	STY.w TextID+1
-
-	JSL Sprite_CheckDamageToPlayerSameLayerLong : BCC .alpha
-	JSL Sprite_CheckIfPlayerPreoccupied : BCS .alpha
-
-	LDA.b Joy1B_New : BPL .alpha
-	LDA.w SpriteTimerE, X : BNE .alpha
-	LDA.b LinkJumping : CMP.b #$02 : BEQ .alpha
-
-	JSL Sprite_DirectionToFacePlayerLong : PHX : TYX
-
-	; Make sure that the sprite is facing towards the player, otherwise
-	; talking can't happen. (What sprites actually use this???)
-	LDA.l $85E1A3, X : PLX : CMP.b LinkDirection : BNE .not_facing_each_other
-
-	PHY
-
-	LDA.w TextID
-	LDY.w TextID+1
-
-	; Check what room we're in so we know which npc we're talking to
-	LDA.b RoomIndex
-	CMP.b #$05 : BEQ .SahasrahlaDialogs
-	CMP.b #$1C : BEQ .BombShopGuyDialog
-	BRA .SayNothing
-
-	.SahasrahlaDialogs
-		REP #$20 : LDA.l MapReveal_Sahasrahla : ORA.l MapOverlay : STA.l MapOverlay : SEP #$20
-		JSL DialogSahasrahla : BRA .SayNothing
-
-	.BombShopGuyDialog
-		REP #$20 : LDA.l MapReveal_BombShop : ORA.l MapOverlay : STA.l MapOverlay : SEP #$20
-		JSL DialogBombShopGuy
-
-	.SayNothing
-
-	LDA.b #$40 : STA.w SpriteTimerE, X
-
-	PLA : EOR.b #$03
-
-	SEC
-
-	RTL
-
-.not_facing_each_other
-.alpha
-
-	LDA.w SpriteMoveDirection, X
-
-	CLC
-
-	RTL
-}
-;================================================================
-Sprite_ShowSolicitedMessageIfPlayerFacing_PreserveMessage:
-{
-	PHY
-	PHA
-
-	JSL Sprite_CheckDamageToPlayerSameLayerLong : BCC .alpha
-	JSL Sprite_CheckIfPlayerPreoccupied : BCS .alpha
-
-	LDA.b Joy1B_New : BPL .alpha
-	LDA.w SpriteTimerE, X : BNE .alpha
-	LDA.b LinkJumping : CMP.b #$02 : BEQ .alpha
-
-	JSL Sprite_DirectionToFacePlayerLong : PHX : TYX
-
-	; Make sure that the sprite is facing towards the player, otherwise
-	; talking can't happen. (What sprites actually use this???)
-	LDA.l $85E1A3, X : PLX : CMP.b LinkDirection : BNE .not_facing_each_other
-
-	PLA : XBA : PLA
-
-	PHY
-
-	TAY : XBA
-	
-	JSL Sprite_ShowMessageUnconditional
-
-	LDA.b #$40 : STA.w SpriteTimerE, X
-
-	PLA : EOR.b #$03
-
-	SEC
-
-	RTL
-
-.not_facing_each_other
-.alpha
-	PLY
-	PLA
-
-	LDA.w SpriteMoveDirection, X
-
-	CLC
-
-	RTL
-}
-
 ;--------------------------------------------------------------------------------
 ; A0 - A9 - 0 - 9
 ; AA - C3 - A - Z

doorframefixes.asm

@@ -7,8 +7,8 @@
 ;--------------------------------------------------------------------------------
 StoreLastOverworldDoorID:
 	TXA : INC
-	STA.l PreviousOverworldDoor
-	LDA.l $9BBB73, X : STA.w EntranceIndex
+	STA $7F5099
+	LDA $1BBB73, X : STA $010E
 RTL
 ;--------------------------------------------------------------------------------
 
@@ -16,14 +16,14 @@ RTL
 ; CacheDoorFrameData
 ;--------------------------------------------------------------------------------
 CacheDoorFrameData:
-	LDA.l PreviousOverworldDoor : BEQ .originalBehaviour
+	LDA $7F5099 : BEQ .originalBehaviour
 	DEC : ASL : TAX
-	LDA.l EntranceDoorFrameTable, X : STA.w TileMapEntranceDoors
-	LDA.l EntranceAltDoorFrameTable, X : STA.w TileMapTile32
+	LDA EntranceDoorFrameTable, X : STA $0696
+	LDA EntranceAltDoorFrameTable, X : STA $0698
 	BRA .done
 	.originalBehaviour
-		LDA.w $D724, X : STA.w TileMapEntranceDoors
-		STZ.w TileMapTile32
+		LDA $D724, X : STA $0696
+		STZ $0698
 	.done
 RTL
 ;--------------------------------------------------------------------------------
@@ -32,8 +32,46 @@ RTL
 ; WalkDownIntoTavern
 ;--------------------------------------------------------------------------------
 WalkDownIntoTavern:
-	LDA.l PreviousOverworldDoor
+	LDA $7F5099
 	; tavern door has index 0x42 (saved off value is incremented by one)
-	CMP.b #$43
+	CMP #$43
 RTL
 ;--------------------------------------------------------------------------------
+
+;--------------------------------------------------------------------------------
+; TurnAroundOnUnderworld
+;--------------------------------------------------------------------------------
+TurnAroundOnUnderworld:
+	LDA $26 : BEQ .done
+		; turn around if ($010E == #$43) != ($7F5099 == #$43)
+		LDX #$00
+		LDA #$43 : CMP $010E : BEQ +
+			INX
+		+
+		CMP $7F5099 : BEQ +
+			DEX
+		+
+		CPX #$00 : BEQ .done
+			LDA $26 : EOR #$0C : STA $26
+.done
+JML $0FFD65 ; what we overwrote
+
+;--------------------------------------------------------------------------------
+; TurnUpOnOverworld
+;--------------------------------------------------------------------------------
+TurnUpOnOverworld:
+	LDA.l EntranceTavernBack : CMP #$43 : BEQ .done
+		LDA #$08 : STA $26 ; only fix this glitch if exit not vanilla
+.done
+JML $07E68F ; what we overwrote
+
+;--------------------------------------------------------------------------------
+; WalkUpOnOverworld
+;--------------------------------------------------------------------------------
+WalkUpOnOverworld:
+	LDA $20 : CMP #$091B : BNE .normal ; hardcoded Y coordinate
+		STZ $2F
+		RTL
+	.normal
+	LDA #$0002 : STA $2F ; what we overwrote
+RTL

doorrando/doorrando.asm

@@ -0,0 +1,59 @@
+!add = "clc : adc"
+!addl = "clc : adc.l"
+!sub = "sec : sbc"
+!bge = "bcs"
+!blt = "bcc"
+
+; Free RAM notes
+; Normal doors use $AB-AC for scrolling indicator
+; Normal doors use $FE to store the trap door indicator
+; Normal doors use $045e to store Y coordinate when transitioning to in-room stairs
+; Normal doors use $045f to determine the order in which supertile quadrants are drawn
+; Straight stairs use $046d to store X coordinate on animation start
+; Spiral doors use $045e to store stair type
+; Gfx uses $b1 to for sub-sub-sub-module thing
+
+; Hooks into various routines
+incsrc drhooks.asm
+
+;Main Code
+org $A78000 ;138000
+db $44, $52 ;DR
+DRMode:
+dw 0
+; xxpg rmse
+; xxxx xBDM
+; x - unused
+
+; p - use the original palette for the dungeon rooms instead of the DR table
+; g - fix the EG glitch in more places (should be off for no logic)
+; r - The collection rate flag
+; m - Whether to display keys Map Info
+; s - Start with Mirror Scroll
+; e - GT minibosses marked as defeated instead of spawning heart container in all dungeons
+
+; B - Big Key doors can displayed and be opened on the "south" side in addition
+; D - Enabled spawning as a bunny in the Dark World underworld
+; M - hides the total number in the collection rate
+DRFlags:
+dw 0
+DRScroll:
+db 0
+OffsetTable:
+dw -8, 8
+
+incsrc normal.asm
+incsrc scroll.asm
+incsrc spiral.asm
+incsrc gfx.asm
+incsrc keydoors.asm
+incsrc overrides.asm
+incsrc edges.asm
+incsrc math.asm
+incsrc hudadditions.asm
+incsrc dr_lobby.asm
+incsrc entrance_fixes.asm
+warnpc $A79C00
+
+incsrc doortables.asm
+warnpc $A88000

doorrando/doortables.asm

@@ -0,0 +1,696 @@
+org $A79C00
+KeyDoorOffset:
+;      0     1     2     3     4     5     6     7     8     9     a     b     c     d     e     f --Offset Ruler
+dw $0000,$0001,$0003,$0000,$0006,$0000,$000b,$0000,$0000,$0000,$000c,$000d,$0010,$0011,$0012,$0000
+dw $0000,$0015,$0018,$001c,$001e,$0025,$0027,$0000,$0000,$002b,$002d,$0033,$0035,$0038,$0039,$003d
+dw $003f,$0040,$0043,$0045,$0047,$0000,$004f,$0000,$0053,$0000,$0055,$005b,$0000,$0000,$005f,$0000
+dw $0060,$0062,$0064,$0065,$0066,$0068,$006e,$0074,$007a,$007c,$007e,$0081,$0000,$0082,$0086,$0088
+dw $0089,$008a,$0000,$008b,$008e,$0092,$0096,$0000,$0000,$0099,$009d,$00a2,$00a5,$00a6,$00a8,$00aa
+dw $00ab,$00ad,$00af,$00b2,$0000,$0000,$00b5,$00b9,$00bf,$00c5,$00c9,$00ca,$00cc,$00ce,$00d1,$00d5
+dw $00d6,$00dc,$00e3,$00e9,$00ec,$00ed,$00ee,$00f2,$00f5,$0000,$00f7,$00f8,$00fc,$00ff,$0102,$0000
+dw $0000,$0103,$0106,$0107,$010a,$010c,$010e,$0112,$0000,$0000,$0000,$0114,$0117,$011b,$011e,$0121
+dw $0000,$0123,$0000,$0124,$0127,$0128,$0000,$012c,$0000,$0000,$0000,$012e,$0133,$0139,$013e,$0000
+dw $013f,$0140,$0141,$0146,$0000,$0149,$014b,$014d,$014f,$0150,$0000,$0153,$0156,$015a,$015d,$0161
+dw $0163,$0164,$0166,$016a,$016c,$016d,$0000,$0000,$0170,$0176,$017c,$0182,$0184,$0000,$0185,$0186
+dw $0188,$018b,$018f,$0197,$019c,$019d,$019e,$01a3,$01a4,$01a6,$01aa,$01ad,$01b3,$0000,$01bb,$01be
+dw $01bf,$01c2,$01ca,$01d2,$01d9,$01da,$01dd,$01e3,$01e6,$01e7,$0000,$01ec,$01ed,$0000,$01f0,$0000
+dw $01f1,$01f3,$01f7,$0000,$0000,$01f8,$01fa,$0000,$01fd,$0200,$0203,$0204,$0206,$0000,$0000,$0000
+dw $0207
+
+
+org $A79E00
+SpiralOffset:
+;    0   1   2   3   4   5   6   7   8   9   a   b   c   d   e   f --Offset Ruler
+db $00,$01,$02,$00,$03,$00,$00,$04,$00,$05,$07,$00,$08,$00,$0b,$00
+db $00,$0c,$00,$00,$00,$0d,$0e,$0f,$00,$00,$11,$00,$13,$14,$15,$00
+db $00,$00,$00,$00,$00,$00,$16,$19,$1b,$00,$00,$00,$00,$00,$00,$00
+db $00,$1c,$00,$00,$1f,$00,$00,$00,$20,$00,$21,$00,$00,$00,$00,$22
+db $23,$24,$25,$00,$00,$26,$00,$00,$00,$00,$27,$00,$29,$2a,$2b,$00
+db $00,$00,$00,$2c,$2d,$00,$00,$00,$00,$00,$00,$00,$2e,$2f,$00,$30
+db $00,$00,$00,$35,$36,$00,$37,$00,$00,$00,$38,$3a,$3b,$00,$3c,$00
+db $3d,$40,$41,$00,$00,$00,$42,$45,$00,$00,$00,$00,$00,$00,$00,$49
+db $4a,$00,$00,$00,$00,$00,$00,$4b,$00,$00,$00,$00,$4f,$00,$53,$00
+db $00,$54,$00,$55,$00,$00,$00,$56,$57,$58,$00,$00,$00,$00,$59,$00
+db $5a,$00,$5b,$00,$00,$5c,$5d,$00,$00,$00,$00,$5e,$00,$00,$5f,$00
+db $60,$00,$00,$00,$00,$63,$64,$00,$00,$00,$00,$00,$65,$00,$66,$00
+db $67,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $6a,$6d,$6e,$00,$00,$00,$00,$00,$00,$00,$6f,$00,$00,$00,$00,$00
+db $70
+
+org $A79F00
+DoorOffset:
+db $00,$01,$02,$00,$03,$00,$04,$00,$00,$00,$00,$00,$9A,$05,$99,$00
+db $00,$06,$07,$08,$09,$0A,$0B,$00,$00,$0C,$0D,$0E,$00,$0F,$10,$11
+db $12,$13,$14,$15,$16,$00,$17,$00,$98,$00,$18,$19,$00,$00,$1A,$00
+db $1B,$00,$1C,$1D,$1E,$1F,$20,$21,$22,$23,$24,$25,$00,$26,$27,$00
+db $96,$28,$97,$29,$2A,$2B,$2C,$00,$00,$2D,$2E,$2F,$30,$31,$32,$00
+db $33,$34,$35,$36,$00,$00,$37,$38,$39,$3A,$3B,$3C,$3D,$3E,$3F,$40
+db $41,$42,$43,$A0,$00,$00,$44,$45,$46,$00,$47,$48,$49,$4A,$4B,$00
+;    0   1   2   3   4   5   6   7   8   9   a   b   c   d   e   f --Offset Ruler
+db $00,$4C,$00,$00,$00,$4D,$4E,$9E,$00,$00,$00,$4F,$50,$51,$52,$53
+db $00,$54,$00,$9C,$9D,$55,$00,$00,$00,$00,$00,$56,$57,$58,$59,$00
+db $5A,$5B,$5C,$5D,$00,$5E,$5F,$00,$9B,$60,$00,$61,$62,$63,$64,$65
+db $66,$67,$68,$69,$6A,$6B,$00,$00,$6C,$6D,$6E,$6F,$70,$00,$71,$72
+db $00,$73,$74,$75,$76,$77,$78,$79,$7A,$7B,$7C,$7D,$7E,$00,$7F,$80
+db $00,$81,$82,$83,$84,$85,$86,$87,$88,$89,$00,$8A,$8B,$00,$8C,$00
+db $00,$8D,$8E,$00,$00,$8F,$90,$00,$91,$92,$93,$94,$95,$00,$00,$00
+db $9f
+
+org $A7A000
+DoorTable:
+;; NW 00  N  01  NE 02  WN 00  W  01  WS 02  SW 00  S  01  SE 02  EN 00  E  01  ES 02 - Door ruler
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Default/Garbage row
+dw $0003, $0003, $0003, $0450, $0003, $0003, $0003, $0003, $0003, $0452, $0003, $0003 ; HC Back Hall (x01)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sewer Switches (x02)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Crystaroller
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Arghus
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Aga 2
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sewer Secret Room
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sanc
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Pokey
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Lava Pipe
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Pipes n Ledge
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swap Canal
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod dark Maze
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod Bridge
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod Eye Statue
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Pre Aga
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Cross
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice BK
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x20 Aga1
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sewer Key Rat
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sewer Waters
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Eye Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Chest Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp Statue
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; PoD Arena (x2a)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; PoD Statue (x2b)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Compass
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x30 Aga's Altar
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Dark Cross
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Lanmolas
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp West Wing
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Flooded Key
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp Main Hub (x36)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp Hammer Time
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp First Basement
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Drop to the Moth
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod 3 Catwalks
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod Conveyor
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Minihelma
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Conveyor
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sewers
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert Torches
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT Big Chest
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT Cellblock
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp Compass Loop
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Skull3 Torches
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Pod Mimics 1
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Conveyor Ice
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Moldorm
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; IPBJ
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0401, $0003, $0003 ; HC West Hall (x50)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC Throne Room (x51)
+dw $0003, $0003, $0003, $0401, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC East Hall (x52)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert Tiles 1
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Skull 2 Left Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Skull 2 Right Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Skull 1 Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Skull 3 Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Helmasaur
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Spike Switch
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Cannonball
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Gauntlet 1
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Choice Cross
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Iced U
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC West Lobby (x60)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC Main Lobby (x61)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC East Lobby (x62)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x66 Swamp Waterfall
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x67 Skull 1 Left Drop
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x68 Skull 1 Pinball
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x6a Pod Rupees
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x6b GT Mimics
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x6c GT Lanmolas
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x6d Gauntlet 2
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; x6e Ice Gators
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC Armory
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert BK Chest
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp Flooded Chests
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT DM's Tile
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Randoroom
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Warp Maze
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Freezors
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Hookpit
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; HC Catawalk
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert Right Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Left
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Hopeful Torch
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Right
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Lonely Freezor
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Vitreous (x90)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Rain
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Dark Crystals
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Blockswitch
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Fallbridge
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Torch Cross
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Darkness
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Warp Maze 2
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Invis Bridge
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Compass Room
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Big Chests
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Icy Pots
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Pre-Vitreous (xa0)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Fishbone
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Bridges
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Corner
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Trinexx (xa4)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Wizzrobes
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Compass (xa8)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Courtyard (xa9)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Map (xaa)
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT Switch
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Blind
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Iced T
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Slipway
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Warpzone
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire ????
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Spikes
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Refill
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Dark Maze
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Chainchomp
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Rollers
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Big Key
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Easter Cannonball
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Dark Circle
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT Hellway
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT Bossway
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Blockswitch
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Backtracker
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Tiles
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Main Hub
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Big Chest
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Switch Maze
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Narrow
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Early Hub
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Floating Torches
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Armos
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT NW Quad
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT NE Quad
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Boss Drop
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire BK
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire 2
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Laser Bridge
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TR Main Entrance
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Eyegores
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Attic Switches
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Eastern Attic Start
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT Entrance Quad
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; TT SE Quad
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Aga 6F
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Sewers Rope
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Swamp Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Ice Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; GT Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Mire Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert West Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert Main Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Hera Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Tower Lobby
+dw $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003, $0003 ; Desert Back Lobby
+; this should end at 27AF18 about (160 * 24 bytes =  3840 or F18)
+; some values you can hardcode for spirals
+;dw $0070, $36a0 ; ->HC Stairwell
+;dw $0072, $4ff8 ; ->HC Map Room
+;dw $0080, $1f50 ; ->zelda's cellblock
+
+org $A7B000
+SpiralTable: ;113 4 byte entries - should end at 27B1C4
+dw $0203, $8080 ;null row
+dw $0203, $8080 ;HC Backhallway
+dw $0203, $8080 ;Sewer Pull
+dw $0203, $8080 ;Crystaroller
+dw $0203, $8080 ;Moldorm
+dw $0203, $8080, $0203, $8080 ;Pod Basement
+dw $0203, $8080 ;Pod Stalfos
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;GT Entrance
+dw $0203, $8080 ;Ice Entrance
+dw $0203, $8080 ;Escape
+dw $0203, $8080 ;TR Pipe Ledge
+dw $0203, $8080 ;Swamp Way
+dw $0203, $8080, $0203, $8080 ;Hera Fallplace
+dw $0203, $8080, $0203, $8080 ;PoD Bridge
+dw $0203, $8080 ;GT Ice
+dw $0203, $8080 ;GT F8
+dw $0203, $8080 ;Ice Cross
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;Swamp Statue
+dw $0203, $8080, $0203, $8080 ;Hera Big
+dw $0203, $8080 ;Swamp Ent
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;Hera Startiles (middle value unused)
+dw $0203, $8080 ;West Swamp
+dw $0203, $8080 ;Swamp Basement
+dw $0203, $8080 ;Pod Drops
+dw $0203, $8080 ;Ice Hammer
+dw $0203, $8080 ;Aga Guards
+dw $0203, $8080 ;Sewer Begin
+dw $0203, $8080 ;Sewer Rope
+dw $0203, $8080 ;TT Cellblock
+dw $0203, $8080, $0203, $8080 ;Pod Entrance
+dw $0203, $8080 ;GT Icespike
+dw $0203, $8080 ;GT Moldorm
+dw $0203, $8080 ;IPBJ
+dw $0203, $8080 ;Desert Prep
+dw $0203, $8080 ;Swamp Attic
+dw $0203, $8080 ;GT Cannonball
+dw $0203, $8080 ;GT Gauntlet1
+dw $0203, $8080, $0203, $8080, $0203, $8080, $0203, $8080, $0203, $8080 ;Ice U (1st three values unused)
+dw $0203, $8080 ;Desert Back
+dw $0203, $8080 ;TT Attic L
+dw $0203, $8080 ;Swamp Waterf
+dw $0203, $8080 ;Pod Rupees
+dw $0203, $8080 ;Pod Rupees
+dw $0203, $8080 ;GT Mimics
+dw $0203, $8080 ;GT Lanmo
+dw $0203, $8080 ;Ice Gators
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;HC Tiny (first value placeholder)
+dw $0203, $8080 ;HC Boomer
+dw $0203, $8080 ;HC Pits1
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;Swamp Sunken
+dw $0203, $8080, $0203, $8080, $0203, $8080, $0203, $8080 ;Hera Entrance (first value unused)
+dw $0203, $8080 ;Ice Hookshot
+dw $0203, $8080 ;HC Cellblock
+dw $0203, $8080, $0203, $8080, $0203, $8080, $0203, $8080 ;Hera Basement (first and third values unused)
+dw $0203, $8080, $0203, $8080, $0203, $8080, $0203, $8080 ;GT Circle (third value unused)
+dw $0203, $8080 ;Ice Last Freeze
+dw $0203, $8080 ;Mire Drops
+dw $0203, $8080 ;Mire Block
+dw $0203, $8080 ;Mire Attic
+dw $0203, $8080 ;Mire Entrance
+dw $0203, $8080 ;East Dark
+dw $0203, $8080 ;Ice Big
+dw $0203, $8080 ;Mire Previtreous
+dw $0203, $8080 ;Mire Bridges
+dw $0203, $8080 ;GT Wizzrobes
+dw $0203, $8080 ;GT Spikepit
+dw $0203, $8080 ;TT Switch
+dw $0203, $8080 ;Ice T
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;Tower Usains (2nd value unused)
+dw $0203, $8080 ;TR PlatMaze
+dw $0203, $8080 ;TR Chainchomp
+dw $0203, $8080 ;TT Bossway
+dw $0203, $8080 ;Ice FallZone
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;Tower Dark2 (2nd value unused)
+dw $0203, $8080, $0203, $8080, $0203, $8080 ;Tower Dark1 (2nd value unused)
+dw $0203, $8080 ;Mire BK Thang
+dw $0203, $8080 ;Mire2
+dw $0203, $8080 ;East Attic Start
+dw $0203, $8080 ;Tower Entrance
+
+
+org $A7C000 ;ends around 27C418
+PairedDoorTable:
+dw $0000 ; the bad template
+dw $0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000
+dw $0000
+dw $0000
+dw $0000,$0000,$0000
+dw $0000
+dw $0000
+dw $0000,$0000,$0000
+
+dw $0000,$0000,$8021
+dw $0000,$0000,$0000,$0000
+dw $4014,$0000
+dw $8024,$8013,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000
+dw $0000,$0000,$0000,$0000
+dw $201a,$401a
+dw $0000,$4019,$8019,$402a,$0000,$0000
+dw $0000,$0000
+dw $0000,$0000,$0000
+dw $0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000
+
+dw $0000
+dw $2011,$0000,$0000
+dw $8032,$0000
+dw $0000,$0000
+dw $8014,$0000,$0000,$0000,$0000,$0000,$0000,$0000
+dw $4036,$0000,$0000,$0000
+dw $0000,$0000
+dw $0000,$101a,$402b,$0000,$0000,$0000
+dw $0000,$202a,$0000,$0000
+dw $0000
+
+dw $0000,$0000
+dw $0000,$0000
+dw $8022
+dw $0000
+dw $0000,$0000
+dw $2036,$0000,$0000,$0000,$0000,$0000
+dw $8037,$8026,$8035,$0000,$0000,$0000
+dw $8036,$8038,$0000,$4038,$0000,$0000
+dw $4037,$1037
+dw $0000,$0000
+dw $204a,$0000,$0000
+dw $0000
+dw $0000,$0000,$804d,$0000
+dw $0000,$404e
+dw $0000
+
+dw $0000
+dw $0000
+dw $0000,$0000,$2053
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$8059,$0000
+dw $0000,$0000,$803a,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000
+dw $203d,$0000
+dw $0000,$403e
+dw $0000 ; this is the odd extra room - shouldn't be used
+
+dw $0000,$0000
+dw $0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$2043
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000,$4058,$0000,$0000,$0000
+dw $0000,$2057,$4068,$0000,$0000,$0000
+dw $2049,$0000,$0000,$0000
+dw $0000
+dw $806b,$0000
+dw $0000,$0000
+dw $0000,$0000,$0000
+dw $805f,$0000,$0000,$0000
+dw $805e
+
+dw $0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000
+dw $0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$2058
+dw $0000
+dw $805b,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000
+
+dw $0000,$0000,$0000
+dw $0000
+dw $0000,$0000,$0000
+dw $0000,$0000
+dw $0000,$0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000
+dw $0000,$207c,$0000
+dw $0000,$407d,$407b,$0000
+dw $0000,$407c,$0000
+dw $808e,$0000,$0000
+dw $0000,$0000
+
+dw $0000
+dw $0000,$0000,$0000
+dw $0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000
+dw $0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000
+dw $807e
+
+dw $0000
+dw $0000
+dw $0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000
+dw $0000,$0000
+dw $0000,$0000
+dw $0000
+dw $0000,$20a9,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$0000,$0000
+dw $0000,$0000
+
+dw $0000
+dw $40b1,$0000
+dw $80b2,$0000,$0000,$0000
+dw $0000,$0000
+dw $0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$80b8,$0000,$0000,$0000
+dw $0000,$0000,$4099,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000
+dw $0000
+dw $0000
+dw $0000,$0000
+
+dw $0000,$0000,$0000
+dw $0000,$80a1,$0000,$0000
+dw $80a2,$0000,$0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000
+dw $0000
+dw $0000
+dw $0000,$0000,$80c6,$0000,$0000
+dw $0000
+dw $20a8,$0000
+dw $80ba,$0000,$0000,$0000
+dw $80b9,$0000,$0000
+dw $0000,$0000,$0000,$0000,$0000,$0000
+dw $0000,$80cc,$0000,$40cc,$0000,$0000,$0000,$0000
+dw $0000,$80bf,$0000
+dw $40be
+
+dw $0000,$0000,$0000
+dw $0000,$40c2,$0000,$0000,$0000,$0000,$0000,$0000
+dw $80c3,$40c1,$0000,$0000,$0000,$0000,$0000,$0000
+dw $80c2,$0000,$0000,$0000,$0000,$0000,$0000
+dw $80c5
+dw $80c4,$0000,$0000
+dw $20b6,$0000,$0000,$0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000
+dw $0000,$0000,$0000,$0000,$0000
+dw $20cc
+dw $40bc,$10bc,$80cb
+dw $0000
+
+dw $0000,$0000
+dw $0000,$0000,$0000,$0000
+dw $0000
+dw $0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000,$0000,$0000
+dw $0000
+dw $0000,$0000
+dw $0000
+dw $0000,$0000,$0000,$0000
+dw $ffff ; indicates the end - we can drop this
+
+; Edge Transition Table (Target Room, Flags, MultiDiv ratio for edges)
+org $A7C500 ;ends around 27C5F(9) 4 bytes would be 27C649
+;I kind of want to split the 3rd byte into two
+NorthOpenEdge:
+db $00,$80,$11, $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+SouthOpenEdge:
+db $00,$80,$11, $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+WestOpenEdge:
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+EastOpenEdge:
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+db $00,$80,$11, $00,$80,$11, $00,$80,$11
+; Edge Info Table (Midpoint, Width, Min Coord)
+; I kind of want to add a fourth byte to help indicate quadrant info on min coord
+NorthEdgeInfo:
+db $a8,$10,$a0, $2c,$08,$28 ;HC
+db $b8,$20,$a8 ; DP West Wing
+db $38,$20,$28, $f8,$a0,$a8, $b8,$20,$a8 ; DP Main
+db $78,$20,$68 ; DP East Wing
+db $f8,$10,$f0, $7c,$18,$70 ; TT Lobby
+db $74,$18,$68, $f8,$10,$f0 ; TT Compass
+SouthEdgeInfo:
+db $a8,$10,$a0, $2c,$08,$28 ; HC
+db $b8,$20,$a8 ; DP Sandworm
+db $38,$20,$28, $f8,$a0,$a8, $b8,$20,$a8 ; DP North Hall & Dead End
+db $78,$20,$68 ; DP Arrow Pot
+db $f8,$10,$f0, $7c,$18,$70 ; TT Ambush
+db $74,$18,$68, $f8,$10,$f0 ; TT BK Corner
+WestEdgeInfo:
+db $78,$30,$60 ; TT Attic
+db $40,$20,$30 ; DP North Hall
+db $40,$20,$30 ; DP Arrow Pot
+db $84,$18,$78, $68,$10,$60 ; HC South
+db $a0,$a0,$50 ; DP East Wing
+db $58,$50,$30, $98,$50,$70 ; TT BK Corner
+db $58,$50,$30 ; TT Compass
+EastEdgeInfo:
+db $78,$30,$60 ; TT Attic
+db $40,$20,$30 ; DP Sandworm
+db $40,$20,$30 ; DP North Hall
+db $68,$10,$60, $84,$18,$78 ; HC Guards
+db $a0,$a0,$50 ; DP Main Lobby
+db $58,$50,$30, $98,$50,$70 ; TT Ambush
+db $58,$50,$30 ; TT Nook
+MultDivInfo: ; (1, 2, 3, 4, 5, 6, 10, 20)
+db $01, $02, $03, $04, $05, $06, $0a, $14
+; indices: 0-7
+
+; In-room stairs in North/South pairs. From left to right:
+; PoD, IP right side, IP Freezor chest and GT
+org $A7C700
+InroomStairsTable:
+dw $0003,$0003, $0003,$0003, $0003,$0003, $0003,$0003
+
+org $A7C720
+InroomStairsRoom:
+db $0B,$1B, $3F,$1F, $7E,$5E, $96,$3D
+InroomStairsX:
+dw $0190, $0160, $0040, $0178
+InroomStairsY:
+dw $0058, $0148, $0198, $0190
+
+
+org $A7E000
+CutoffRooms:
+; TT Alcove, Mire Bridge Left & Right, Mire Bent Bridge, Mire Hub
+; Pod Falling & Harmless, SW Star Pits, TR Lava Escape & TR Dual Pipes, Bob's Room & GT Big Chest
+dw $00bc, $00a2, $00a3, $00c2, $001a, $0049, $0014, $008c
+; Ice Many Pots, Swamp Waterfall, GT Gauntlet 3, Eastern Push Block, Eastern Courtyard, Eastern Map Valley
+; Eastern Cannonball, HC East Hall
+dw $009f, $0066, $005d, $00a8, $00a9, $00aa, $00b9, $0052
+; HC West Hall, TR Dash Bridge, TR Hub, Pod Arena, GT Petting Zoo, Ice Spike Cross
+dw $0050, $00c5, $00c6, $0009, $0003, $002a, $007d, $005e
+; Sewer Drop, Mire Cross, GT Crystal Circles
+dw $0011, $00b2, $003d
+dw $ffff
+
+; dungeon tables
+;   HC   HC   EP   DP   AT   SP   PD   MM   SW   IP   TH   TT   TR   GT
+org $A7f000
+CompassBossIndicator:
+dw $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000, $0000
+TotalKeys: ;27f020
+db $04, $04, $02, $04, $04, $06, $06, $06, $05, $06, $01, $03, $06, $08, $00, $00
+ChestKeys: ;27f030
+db $01, $01, $00, $01, $02, $01, $06, $03, $03, $02, $01, $01, $04, $04, $00, $00
+BigKeyStatus: ;27f040 (status 2 indicate BnC guard)
+dw $0002, $0002, $0001, $0001, $0000, $0001, $0001, $0001, $0001, $0001, $0001, $0001, $0001, $0001, $0000, $0000
+DungeonReminderTable: ;27f060
+dw $2D50, $2D50, $2D51, $2D52, $2D54, $2D56, $2D55, $2D5A, $2D57, $2D59, $2D53, $2D58, $2D5B, $2D5C, $0000, $0000
+TotalLocationsLow: ;27f080
+db $08, $08, $06, $06, $02, $00, $04, $08, $08, $08, $06, $08, $02, $07, $00, $00
+TotalLocationsHigh: ;27f090
+db $00, $00, $00, $00, $00, $01, $01, $00, $00, $00, $00, $00, $01, $02, $00, $00
+org $A7f0a0
+TotalLocations:
+db $08, $08, $06, $06, $02, $0a, $0e, $08, $08, $08, $06, $08, $0c, $1b, $00, $00
+; no more room here
+
+; Vert 0,6,0 Horz 2,0,8
+org $A7f0b0
+CoordIndex: ; Horizontal 1st
+db 2, 0 ; Coordinate Index $20-$23
+OppCoordIndex:
+db 0, 2 ; Swapped coordinate Index $20-$23 (minor optimization)
+CameraIndex: ; Horizontal 1st
+db 0, 6 ; Camera Index $e2-$ea
+CamQuadIndex: ; Horizontal 1st
+db 8, 0 ; Camera quadrants $600-$60f
+ShiftQuadIndex:
+db 2, 1 ; see ShiftQuad func (relates to $a9,$aa)
+CamBoundIndex: ; Horizontal 1st
+db 0, 4 ; Camera Bounds $0618-$61f
+OppCamBoundIndex: ; Horizontal 1st
+db 4, 0 ; Camera Bounds $0618-$61f
+CamBoundBaseLine: ; X camera stuff is 1st column todo Y camera needs more testing
+dw $007f, $0077 ; Left/Top camera bounds when at edge or layout frozen
+dw $0007, $000b ; Left/Top camera bounds when not frozen + appropriate low byte $22/$20 (preadj. by #$78/#$6c)
+dw $00ff, $010b ; Right/Bot camera bounds when not frozen + appropriate low byte $20/$22
+dw $017f, $0187 ; Right/Bot camera bound when at edge or layout frozen
+;27f0ce next free byte
+
+org $A7f0f0
+RemoveRainDoorsRoom:
+dw $0060, $0062, $ffff ; ffff indicates end of list
+RainDoorMatch: ; org $A7f0f6 and f8 for now
+dw $0081, $0061 ; not xba'd
+BlockSanctuaryDoorInRain: ;27f0fa
+dw $0000
+
+
+org $A7f100
+TilesetTable:
+;    0   1   2   3   4   5   6   7   8   9   a   b   c   d   e   f --Offset Ruler
+db $13,$04,$04,$06,$0d,$ff,$08,$05,$06,$07,$07,$07,$0e,$0e,$0b,$ff
+db $13,$04,$04,$0d,$0d,$0d,$08,$05,$06,$07,$07,$07,$0e,$0e,$0b,$0b
+db $04,$04,$04,$0d,$0d,$ff,$08,$05,$08,$09,$07,$07,$06,$ff,$0b,$06
+db $04,$05,$04,$12,$08,$08,$08,$08,$08,$09,$07,$07,$06,$0e,$0b,$0b
+db $04,$04,$04,$12,$0a,$0a,$08,$ff,$ff,$09,$07,$07,$0e,$0e,$0b,$0b
+db $04,$04,$04,$12,$08,$01,$09,$09,$09,$09,$07,$0e,$0e,$0e,$0b,$0b
+db $04,$04,$04,$12,$0a,$0a,$08,$09,$09,$ff,$07,$0e,$0e,$0e,$0b,$ff
+db $04,$04,$04,$12,$12,$12,$08,$05,$ff,$ff,$ff,$0e,$0e,$0e,$0b,$0b
+db $04,$04,$04,$12,$12,$12,$ff,$05,$ff,$05,$ff,$0e,$0e,$0e,$0b,$ff
+db $0c,$0c,$0c,$0c,$ff,$0e,$0e,$0c,$0c,$05,$ff,$0e,$0e,$0e,$0b,$0b
+db $0c,$0c,$0c,$0c,$0d,$0e,$0e,$05,$05,$05,$05,$0a,$0a,$ff,$0b,$0b
+db $04,$0c,$0c,$0c,$0d,$0d,$0d,$0d,$05,$05,$05,$0a,$0a,$ff,$0b,$0b
+db $04,$0c,$0c,$0c,$0d,$0d,$0d,$0d,$05,$05,$ff,$0a,$0a,$ff,$0b,$ff
+db $04,$0c,$0c,$ff,$ff,$0d,$0d,$ff,$05,$05,$05,$0a,$0a,$ff,$0b,$06
+db $04,$06,$06,$06,$06,$06,$06,$06,$06,$ff,$06,$06,$ff,$06,$06,$06
+db $06,$06,$03,$03,$03,$03,$ff,$ff,$06,$06,$06,$06,$ff,$06,$06,$06
+
+;27f200
+PaletteTable:
+db $21,$00,$00,$07,$00,$08,$00,$00,$07,$00,$00,$00,$00,$00,$00,$21
+db $21,$00,$00,$00,$00,$00,$00,$00,$07,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$0e,$00,$00,$07,$00,$00,$07
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$07,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$13
+db $00,$00,$00,$00,$00,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+;    0   1   2   3   4   5   6   7   8   9   a   b   c   d   e   f --Offset Ruler
+db $00,$00,$00,$00,$00,$00,$00,$06,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
+db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$14,$20
+db $00,$07,$20,$20,$07,$07,$07,$07,$07,$20,$20,$07,$20,$20,$20,$20
+db $07,$07,$02,$02,$02,$02,$07,$07,$07,$20,$20,$07,$20,$20,$20,$07
+
+;A7f300
+DungeonTilesets:
+db $04,$04,$05,$12,$04,$08,$07,$0C,$09,$0B,$05,$0A,$0D,$0E,$06,$06
+
+;
+;org $A7ff00
+
+org $A7fff0
+LinksHouseDarkWorld:
+dw $ffff
+SanctuaryDarkWorld:
+dw $ffff
+OldManDarkWorld:
+dw $ffff

doorrando/dr_lobby.asm

@@ -0,0 +1,19 @@
+CheckDarkWorldSpawn:
+PHP
+	STA $A0 : STA $048E ; what we wrote over
+	JSL SetDefaultWorld
+	LDA.l LinksHouseDarkWorld : CMP.b $A0 : BEQ ++
+	LDA.l SanctuaryDarkWorld : CMP.b $A0 : BEQ ++
+	LDA.l OldManDarkWorld : CMP.b $A0 : BNE +
+		++ SEP #$20 : LDA CurrentWorld : EOR.b #$40 : STA CurrentWorld
+		LDA.l DRFlags+1 : AND #$02 : BEQ + ; skip if the flag isn't set
+		LDA.l MoonPearlEquipment : BNE + ; moon pearl?
+			LDA #$17 : STA $5D : INC $02E0
++ PLP : RTL
+
+SetDefaultWorld:
+PHP : SEP #$20
+LDA.l InvertedMode : BEQ +
+	LDA.b #$40
++ STA CurrentWorld
+PLP : RTL

doorrando/drhooks.asm

@@ -0,0 +1,220 @@
+org $82b5c4 ; -- moving right routine 135c4
+jsl WarpRight
+org $82b665 ; -- moving left routine
+jsl WarpLeft
+org $82b713 ; -- moving down routine
+jsl WarpDown
+org $82b7b4 ; -- moving up routine
+jsl WarpUp
+org $82bd80
+jsl AdjustTransition
+nop
+
+;turn off linking doors -- see .notRoomLinkDoor label in Bank02.asm
+org $82b5a8 ; <- 135a8 - Bank02.asm : 8368 (LDA $7EC004 : STA $A0)
+jsl CheckLinkDoorR
+bcc NotLinkDoor1
+org $82b5b6
+NotLinkDoor1:
+org $82b649 ; <- 135a8 - Bank02.asm : 8482 (LDA $7EC004 : STA $A0)
+jsl CheckLinkDoorL
+bcc NotLinkDoor2
+org $82b657
+NotLinkDoor2:
+
+
+; Staircase routine
+org $81c3d4 ; <- c3d4 - Bank01.asm : 9762-4 (Dungeon_DetectStaircase-> STA $A0 : LDA $063D, X)
+jsl RecordStairType : nop
+org $82a1e7 ;(PC: 121e7)
+jsl SpiralWarp
+
+org $8291b3 ; <- Bank02.asm : 3303 (LDA $0462 : AND.b #$04)
+jsl SpiralPriorityHack : nop
+org $8290f9 ; <- Bank02.asm : 3188 (LDA $0462 : AND.b #$04)
+jsl SpiralPriorityHack : nop
+
+org $829369 ; <- 11369 - Bank02.asm : 3610 (STX $0464 :  STY $012E)
+jsl StraightStairsAdj : nop #2
+org $829383 ; <- 11384 - Bank02.asm : 3629 (.walkingDownStaircase-> ADD $20 : STA $20)
+jsl StraightStairsFix : nop
+org $8293aa ; <- 113aa - Bank02.asm : 3653 (ADD $20 : STA $20)
+jsl StraightStairsFix : nop
+org $8293d1 ; <- 113d1 - Bank02.asm : 3683 (ADD $20 : STA $20 BRANCH_IOTA)
+jsl StraightStairsFix : nop
+org $829396 ; <- 11396 - Bank02.asm : 3641 (LDA $01C322, X)
+jsl StraightStairLayerFix
+org $82c092 ; STA $0020, Y : LDX #$00
+jsl DoorToInroom : nop
+org $82c0f8 ; CMP $02C034, X
+jsl DoorToInroomEnd
+org $82941a ; <- Bank02.asm : 3748 module 7.12.11 (LDA $0464 : BNE BRANCH_$11513 : INC $B0 : RTS)
+jsl StraightStairsTrapDoor : rts
+org $828b54 ; <- Bank02.asm : 2200 (JSL UseImplicitRegIndexedLocalJumpTable)
+jsl InroomStairsTrapDoor
+org $82c146
+jsl HandleSpecialDoorLanding
+
+org $8289a0 ; JSL $0091C4
+jsl QuadrantLoadOrderBeforeScroll
+org $82bd9c ; JSL $0091C4
+jsl QuadrantLoadOrderAfterScroll
+
+
+; Graphics fix
+org $82895d ; Bank 02 line 1812 (JSL Dungeon_LoadRoom : JSL Dungeon_InitStarTileChr : JSL $00D6F9 : INC $B0)
+Splicer:
+jsl GfxFixer
+lda $b1 : beq .done
+rts
+nop #5
+.done
+
+org $81b618 ; Bank01.asm : 7963 Dungeon_LoadHeader (REP #$20 : INY : LDA [$0D], Y)
+nop : jsl OverridePaletteHeader
+
+org $82817e ; Bank02.asm : 414 (LDA $02811E, X)
+jsl FixAnimatedTiles
+
+org $8aef43 ; UnderworldMap_RecoverGFX
+jsl FixCloseDungeonMap
+
+org $828a06 ; Bank02.asm : 1941 Dungeon_ResetTorchBackgroundAndPlayer
+JSL FixWallmasterLamp
+
+org $80d377 ;Bank 00 line 3185
+DecompDungAnimatedTiles:
+org $80fda4 ;Bank 00 line 8882
+Dungeon_InitStarTileCh:
+org $80d6ae ;(PC: 56ae)
+LoadTransAuxGfx:
+org $80d739 ;
+LoadTransAuxGfx_Alt:
+org $80df5a ;(PC: 5f5a)
+PrepTransAuxGfx:
+org $8ffd65 ;(PC: 07fd65)
+Dungeon_LoadCustomTileAttr:
+org $81feb0
+Dungeon_ApproachFixedColor:
+;org $01fec1
+;Dungeon_ApproachFixedColor_variable:
+;org $a0f972 ; Rando version
+;LoadRoomHook:
+org $9bee74 ;(PC: 0dee74)
+Palette_DungBgMain:
+org $9bec77
+Palette_SpriteAux3:
+org $9becc5
+Palette_SpriteAux2:
+org $9bece4
+Palette_SpriteAux1:
+
+
+org $828046 ; <- 10046 - Bank02.asm : 217 (JSL EnableForceBlank) (Start of Module_LoadFile)
+jsl OnFileLoadOverride
+org $87A93F  ; < 3A93F - Bank07.asm 6548 (LDA $8A : AND.b #$40 - Mirror checks)
+jsl MirrorCheckOverride
+
+org $85ef47
+Sprite_HeartContainer_Override: ;sprite_heart_upgrades.asm : 96-100 (LDA $040C : CMP.b #$1A : BNE .not_in_ganons_tower)
+jsl GtBossHeartCheckOverride : bcs .not_in_ganons_tower
+nop : stz $0dd0, X : rts
+.not_in_ganons_tower
+
+
+org $87a955 ; <- Bank07.asm : around 6564 (JP is a bit different) (STZ $05FC : STZ $05FD)
+jsl BlockEraseFix
+nop #2
+
+org $82A0A8
+Mirror_SaveRoomData:
+org $87A95B ; < bank_07.asm ; #_07A95B: JSL Mirror_SaveRoomData
+jsl EGFixOnMirror
+
+org $82b82a
+jsl FixShopCode
+
+org $9ddeea ; <- Bank1D.asm : 286 (JSL Sprite_LoadProperties)
+jsl VitreousKeyReset
+
+org $9ed024 ;  f5024 sprite_guruguru_bar.asm : 27 (LDA $040C : CMP.b #$12 : INY #2
+jsl GuruguruFix : bra .next
+nop #3
+.next
+
+org $828fc9
+nop #2 : jsl BlindAtticFix
+
+org $828409
+jsl SuctionOverworldFix
+
+org $8ded04 ; <- rando's hooks.asm line 2192 - 6ED04 - equipment.asm : 1963 (REP #$30)
+jsl DrHudDungeonItemsAdditions
+;org $098638 ; rando's hooks.asm line 2192
+;jsl CountChestKeys
+org $86D192 ; rando's hooks.asm line 457
+jsl CountAbsorbedKeys
+; rando's hooks.asm line 1020
+;org $05FC7E ; <- 2FC7E - sprite_dash_item.asm : 118 (LDA $7EF36F : INC A : STA $7EF36F)
+;jsl CountBonkItem
+
+org $819dbd ; <- Bank01.asm : 4465 of Object_Draw8xN (LDA $9B52, Y : STA $7E2000, X)
+jsl CutoffEntranceRug : bra .nextTile : nop
+.nextTile
+
+;maybe set 02e2 to 0
+
+org $8799de ; <- Bank07.asm : 4088 (LDA.b #$15 : STA $5D)
+JSL StoreTempBunnyState
+;
+org $88c450 ; <- ancilla_receive_item.asm : 146-148 (STY $5D : STZ $02D8)
+JSL RetrieveBunnyState : NOP
+
+org $82d9ce ; <- Bank02.asm : Dungeon_LoadEntrance 10829 (STA $A0 : STA $048E)
+JSL CheckDarkWorldSpawn : NOP
+
+org $9edabf ; <- sprite_energy_ball.asm : 86-7 Sprite_EnergyBall (LDA.b #$10 : LDX.b #$00)
+JSL StandardAgaDmg
+
+org $89F7B2 ; 09F7B2 Module17_01 S&Q
+JSL StandardSaveAndQuit
+
+org $89a681 ; < - similar to talalong.asm : 1157 (JSL Main_ShowTextMessage)
+JSL BlindsAtticHint : NOP #2
+org $9cfd69
+Main_ShowTextMessage:
+
+; Conditionally disable UW music changes in Door Rando
+org $828ADB ; <- Bank02.asm:2088-2095 (LDX.b #$14 : LDA $A0 ...)
+JSL.l Underworld_DoorDown_Entry : CPX #$FF
+BEQ + : db $80, $1C ; BRA $028B04
+NOP #6 : +
+
+org $82C3F2 ; <- Bank02.asm:10521 Unused call
+Underworld_DoorDown_Call:
+org $82C3F3
+dw $8AD9 ; address of Bank02.asm:2085
+
+org $81AA90
+JSL BigKeyDoorCheck : NOP
+
+org $81AAA2
+RoomDraw_OneSidedShutters_South_onesided_shutter_or_big_key_door:
+
+;Enable south facing bk graphic
+org $80CE24
+dw $2ac8
+
+org $81b714 ; PC: b714
+OpenableDoors:
+jsl CheckIfDoorsOpen
+bcs .normal
+rts
+.normal
+
+; fixes an issue with edges -> normal doors (bombable, dashable, keydoor)
+org $82C06A
+JSL TransitionCalculateLanding_Fix : NOP #2
+
+org $82C157
+JSL AlwaysPushThroughFDoors

doorrando/edges.asm

@@ -0,0 +1,325 @@
+; defines
+; Ram usage
+EdgeToNormalFlag = $7E1200
+
+HorzEdge:
+	LDA.b #$00 : STA.l EdgeToNormalFlag
+    cpy #$ff : beq +
+        jsr DetectWestEdge : ldy #$02 : bra ++
+    + jsr DetectEastEdge
+    ++ cmp #$ff : beq +
+        sta $00 : asl : !add $00 : tax
+        cpy #$ff : beq ++
+            jsr LoadWestData : bra .main
+        ++ jsr LoadEastData
+        .main
+        jsr LoadEdgeRoomHorz
+        sec : rts
+    + clc : rts
+
+VertEdge:
+	LDA.b #$00 : STA.l EdgeToNormalFlag
+    cpy #$ff : beq +
+        jsr DetectNorthEdge : bra ++
+    + jsr DetectSouthEdge
+    ++ cmp #$ff : beq +
+        sta $00 : asl : !add $00 : tax
+        cpy #$ff : beq ++
+            jsr LoadNorthData : bra .main
+        ++ jsr LoadSouthData
+        .main
+        jsr LoadEdgeRoomVert
+        sec : rts
+    + clc : rts
+
+LoadEdgeRoomHorz:
+    lda $03 : sta $a0
+    sty $06
+    and.b #$0f : asl a : !sub $23 : !add $06 : sta $02
+    ldy #$00 : jsr ShiftVariablesMainDir
+
+    lda $04 : and #$80 : bne .edge
+    lda $04 : sta $01 ; load up flags in $01
+    jsr PrepScrollToNormal
+    bra .scroll
+
+    .edge
+    lda $04 : and #$10 : beq +
+       lda #$01
+    + sta $ee ; layer stuff
+
+    jsr MathHorz
+
+    .scroll
+    jsr ScrollY
+    rts
+
+LoadEdgeRoomVert:
+    lda $03 : sta $a0
+    sty $06
+    and.b #$f0 : lsr #3 : !sub $21 : !add $06 : sta $02
+
+    lda $04 : and #$80 : bne .edge
+    lda $04 : sta $01 ; load up flags in $01
+    and #$03 : cmp #$03 : beq .inroom
+    LDA.b #$01 : STA.l EdgeToNormalFlag
+    ldy #$01 : jsr ShiftVariablesMainDir
+    jsr PrepScrollToNormal
+    bra .scroll
+
+    .inroom
+    jsr ScrollToInroomStairs
+    rts
+
+    .edge
+    ldy #$01 : jsr ShiftVariablesMainDir
+    lda $04 : and #$10 : beq +
+       lda #$01
+    + sta $ee ; layer stuff
+
+    jsr MathVert
+    lda $03
+
+    .scroll
+    jsr ScrollX
+    rts
+
+
+MathHorz:
+    jsr MathStart : lda $20
+    jsr MathMid : and #$0040
+    jsr MathEnd
+    rts
+
+MathVert:
+    jsr MathStart : lda $22
+    jsr MathMid : and #$0020
+    jsr MathEnd
+    rts
+
+MathStart:
+    rep #$30
+    lda $08 : and #$00ff : sta $00
+    rts
+
+MathMid:
+    and #$01ff : !sub $00 : and #$00ff : sta $00
+    ; nothing should be bigger than $a0 at this point
+
+    lda $05 : and #$00f0 : lsr #4 : tax
+    lda MultDivInfo, x : and #$00ff : tay
+    lda $00 : jsr MultiplyByY : sta $02
+
+    lda $07 : and #$00ff : jsr MultiplyByY : tax
+
+    lda $05 : and #$000f : tay
+    lda MultDivInfo, y : and #$00ff : tay
+    lda $02 : jsr DivideByY : sta $00
+    lda $0c : and #$00ff : sta $02
+    lda $04
+    rts
+
+MathEnd:
+     beq +
+        lda #$0100
+    + !add $02 : !add $00
+    sta $04
+    sep #$30
+    rts
+
+; don't need midpoint of edge Link is leaving (formerly in $06 - used by dir indicator)
+; don't need width of edge Link is going to (currently in $0b)
+LoadNorthData:
+    lda NorthOpenEdge, x : sta $03 : inx ; target room
+    lda NorthEdgeInfo, x : sta $07 ; needed for maths - (divide by 2 anyway)
+    lda NorthOpenEdge, x : sta $04 : inx ; bit field
+    lda NorthEdgeInfo, x : sta $08 ; needed for maths
+    lda NorthOpenEdge, x : sta $05 ; ratio
+    lda $04 : jsr LoadSouthMidpoint : inx ; needed now, and for nrml transition
+    lda SouthEdgeInfo, x : sta $0b : inx ; probably not needed todo: remove
+    lda SouthEdgeInfo, x : sta $0c ; needed for maths
+    rts
+
+LoadSouthMidpoint:
+    and #$0f : sta $00 : asl : !add $00 : tax
+    lda SouthEdgeInfo, x : sta $0a ; needed now, and for nrml transition
+    rts
+
+LoadSouthData:
+    lda SouthOpenEdge, x : sta $03 : inx
+    lda SouthEdgeInfo, x : sta $07
+    lda SouthOpenEdge, x : sta $04 : inx
+    lda SouthEdgeInfo, x : sta $08
+    lda SouthOpenEdge, x : sta $05
+    lda $04 : jsr LoadNorthMidpoint : inx
+    lda NorthEdgeInfo, x : sta $0b : inx
+    lda NorthEdgeInfo, x : sta $0c
+    rts
+
+LoadNorthMidpoint:
+    and #$0f : sta $00 : asl : !add $00 : tax
+    lda NorthEdgeInfo, x : sta $0a ; needed now, and for nrml transition
+    rts
+
+LoadWestData:
+    lda WestOpenEdge, x : sta $03 : inx
+    lda WestEdgeInfo, x : sta $07
+    lda WestOpenEdge, x : sta $04 : inx
+    lda WestEdgeInfo, x : sta $08
+    lda WestOpenEdge, x : sta $05
+    lda $04 : jsr LoadEastMidpoint : inx
+    lda EastEdgeInfo, x : sta $0b : inx
+    lda EastEdgeInfo, x : sta $0c
+    rts
+
+LoadEastMidpoint:
+    and #$0f : sta $00 : asl : !add $00 : tax
+    lda EastEdgeInfo, x : sta $0a ; needed now, and for nrml transition
+    rts
+
+LoadEastData:
+    lda EastOpenEdge, x : sta $03 : inx
+    lda EastEdgeInfo, x : sta $07
+    lda EastOpenEdge, x : sta $04 : inx
+    lda EastEdgeInfo, x : sta $08
+    lda EastOpenEdge, x : sta $05
+    lda $04 : jsr LoadWestMidpoint : inx
+    lda WestEdgeInfo, x : sta $0b : inx
+    lda WestEdgeInfo, x : sta $0c
+
+
+LoadWestMidpoint:
+    and #$0f : sta $00 : asl : !add $00 : tax
+    lda WestEdgeInfo, x : sta $0a ; needed now, and for nrml transition
+    rts
+
+
+DetectNorthEdge:
+    ldx #$ff
+    lda $a2
+    cmp #$82 : bne +
+        lda $22 : cmp #$50 : bcs ++
+            ldx #$01 : bra .end
+        ++ ldx #$00 : bra .end
+    + cmp #$83 : bne +
+        ldx #$02 : bra .end
+    + cmp #$84 : bne +
+        lda $a9 : beq ++
+            lda $22 : cmp #$78 : bcs +++
+                ldx #$04 : bra .end
+            +++ ldx #$05 : bra .end
+        ++ lda $22 : cmp #$78 : bcs ++
+            ldx #$03 : bra .end
+        ++ ldx #$04 : bra .end
+    + cmp #$85 : bne +
+        ldx #$06 : bra .end
+    + cmp #$db : bne +
+        lda $a9 : beq ++
+            lda $22 : beq ++
+                ldx #$08 : bra .end
+        ++ ldx #$07 : bra .end
+    + cmp #$dc : bne .end
+        lda $a9 : bne ++
+            lda $22 : cmp #$b0 : bcs ++
+                ldx #$09 : bra .end
+        ++ ldx #$0a
+    .end txa : rts
+
+DetectSouthEdge:
+    ldx #$ff
+    lda $a2
+    cmp #$72 : bne +
+        lda $22 : cmp #$50 : bcs ++
+            ldx #$01 : bra .end
+        ++ ldx #$00 : bra .end
+    + cmp #$73 : bne +
+        ldx #$02 : bra .end
+    + cmp #$74 : bne +
+        lda $a9 : beq ++
+            lda $22 : cmp #$78 : bcs +++
+                ldx #$04 : bra .end
+            +++ ldx #$05 : bra .end
+        ++ lda $22 : cmp #$78 : bcs ++
+            ldx #$03 : bra .end
+        ++ ldx #$04 : bra .end
+    + cmp #$75 : bne +
+        ldx #$06 : bra .end
+    + cmp #$cb : bne +
+        lda $a9 : beq ++
+            lda $22 : beq ++
+                ldx #$08 : bra .end
+        ++ ldx #$07 : bra .end
+    + cmp #$cc : bne .end
+        lda $a9 : bne ++
+            lda $22 : cmp #$b0 : bcs ++
+                ldx #$09 : bra .end
+        ++ ldx #$0a
+    .end txa : rts
+
+DetectWestEdge:
+    ldx #$ff
+    lda $a2
+    cmp #$65 : bne +
+        ldx #$00 : bra .end
+    + cmp #$74 : bne +
+        ldx #$01 : bra .end
+    + cmp #$75 : bne +
+        ldx #$02 : bra .end
+    + cmp #$82 : bne +
+        lda $aa : beq ++
+           ldx #$03 : bra .end
+        ++ ldx #$04 : bra .end
+    + cmp #$85 : bne +
+            ldx #$05 : bra .end
+    + cmp #$cc : bne +
+        lda $aa : beq ++
+            ldx #$06 : bra .end
+        ++ ldx #$07 : bra .end
+    + cmp #$dc : bne .end
+        ldx #$08
+    .end txa : rts
+
+DetectEastEdge:
+    ldx #$ff
+    lda $a2
+    cmp #$64 : bne +
+        ldx #$00 : bra .end
+    + cmp #$73 : bne +
+        ldx #$01 : bra .end
+    + cmp #$74 : bne +
+        ldx #$02 : bra .end
+    + cmp #$81 : bne +
+        lda $aa : beq ++
+           ldx #$04 : bra .end
+        ++ ldx #$03 : bra .end
+    + cmp #$84 : bne +
+        ldx #$05 : bra .end
+    + cmp #$cb : bne +
+        lda $aa : beq ++
+            ldx #$06 : bra .end
+        ++ ldx #$07 : bra .end
+    + cmp #$db : bne .end
+        ldx #$08
+    .end txa : rts
+
+
+TransitionCalculateLanding_Fix:
+	LDA.l EdgeToNormalFlag : BEQ +
+	LDX.w $0418 : CPX.b #$01 : BNE +
+		LDA.b $20 : SBC #$08 : STA.b $20
+	+ PHK : PEA.w .jslrtsreturn-1
+	PEA.w $02802C
+    JML CalculateTransitionLanding
+    .jslrtsreturn
+    LDX.w $0418 : CPX.b #$01 : BNE .zero  ; the LDX is vanilla and needs to always run
+    LDA.l EdgeToNormalFlag : BEQ +
+    	LDA.b $20 : ADC #$08 : STA.b $20
+    .zero LDA.b #$00 : STA.l EdgeToNormalFlag
+    + JSL DoorToStraight
+RTL
+
+AlwaysPushThroughFDoors:
+	PHA : AND.b #$F0 : CMP.b #$F0 : BNE +
+		PLA : RTL
+	+ PLA : AND.b #$8E : CMP.b #$80
+	RTL

doorrando/entrance_fixes.asm

@@ -0,0 +1,274 @@
+;===================================================================================================
+; The only specific concern to keep in mind with this code is that your databank will be $00
+; Actually, it should be $80, if you're using my fastrom changes.
+;
+; Leave all your door data vanilla
+; Do not try to adjust doors as I previously suggested (not worth the effort)
+; We need a few hooks and some light hardcoding either way
+; Might as well just do it in a brute, but reliable, way
+;
+; In brief, this is the hack we're making:
+;  1) Let vanilla routines draw the door normally
+;  2) Draw over what vanilla just drew
+;  3) Hijack the door tile type routine
+;     and replace the vanilla value with that of solid collision
+;===================================================================================================
+pushpc
+
+org $01892F
+DoorDrawJankMove:
+	JML PrepDoorDraw
+
+.return
+	JSL AdjustEscapeDoorGraphics
+	RTS
+
+; we don't want to overwrite the JMP ($000E) that's already there
+; Well, we could, but we don't need to
+warnpc $018939
+
+org $01BF43
+	JSL AdjustEscapeDoorCollision
+
+pullpc
+
+;===================================================================================================
+
+PrepDoorDraw:
+	; first off, we need this routine to return to our jank hook
+	; otherwise, finding a reliable place to put the graphics change check will be a pin
+	; so push the address to return to the routine
+
+	; It's a lot to explain why this is necessary
+	; Much easier to just tell you to look at $01890D in the disassembly
+	; and you should understand the vanilla program flow we need to reject
+	PEA.w DoorDrawJankMove_return-1
+
+	; copy vanilla code (but fast rom)
+	LDA.l $8186F0,X
+	STA.b $0E
+
+	LDX.b $02
+	LDA.b $04
+
+	; and to execute the jump, we'll use the JMP ($000E) we carefully avoided overwriting
+	JML.l $818939
+
+;===================================================================================================
+
+; Adjustment stage 1: graphics
+AdjustEscapeDoorGraphics:
+	JSR IdentifyBlockedEntrance
+	BCS .replace_graphics
+	JSR IdentifySancEntrance
+	BCS .fix_sanctuary_entrance
+	JSR IdentifySwampEntrance
+	BCS .fix_swamp_entrance
+	; Do nothing
+	RTL
+
+;---------------------------------------------------------------------------------------------------
+
+.replace_graphics  ; for blocked doors
+	; using the value in $19A0 should be fine for finding the graphics
+	; the only caveat is that this appears to locate the tile just above the north-west corner
+	; so below, I've indicated that offset with a +$xxx after the base tilemap buffer
+	; The only odd thing I notice with this position is that some bad hardcoded adjust for
+	; exploding walls that shouldn't affect how we use this value at all!
+	LDY.w $0460 ; get door index
+
+	LDX.w $19A0-2,Y ; get tilemap index
+
+	; hardcoded shutter door graphics tile replacement
+
+	; the horizontal flips could easily be explicit LDAs
+	; but it's probably best the door is symmetrical
+	; using ORA makes your intent more clear
+	; and gives you fewer values to change if you experiment with other graphics
+
+	; row 1
+	LDA.w #$8838
+	STA.l $7E2000+$080,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$086,X
+
+	; row 2
+	LDA.w #$8828
+	STA.l $7E2000+$100,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$106,X
+
+	LDA.w #$8829
+	STA.l $7E2000+$102,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$104,X
+
+	; the state of the A, X, and Y registers is irrelevant when we exit
+	; they're all subsequently loaded with new values
+	RTL
+
+.fix_sanctuary_entrance
+	LDY.w $0460 ; get door index
+	LDX.w $19A0-2,Y ; get tilemap index
+
+	; row 0
+	LDA.w #$14C4
+	STA.l $7E2000+$000,X  ; sanity check = should calculate to 7e3bbc
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$006,X
+
+	LDA.w #$14C5
+	STA.l $7E2000+$002,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$004,X
+
+	; row 1
+	LDA.w #$14E8
+	STA.l $7E2000+$082,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$084,X
+
+	; row 2
+	LDA.w #$14F8
+	STA.l $7E2000+$102,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$104,X
+
+.fix_swamp_entrance
+	LDY.w $0460 ; get door index
+	LDX.w $19A0-2,Y ; get tilemap index
+
+	; row 0
+	LDA.w #$9DfC
+	STA.l $7E2000+$000,X
+	STA.l $7E2000+$002,X
+	STA.l $7E2000+$004,X
+	STA.l $7E2000+$006,X
+
+	; row 1
+	LDA.w #$0908
+	STA.l $7E2000+$080,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$086,X
+
+	LDA.w #$14E8
+	STA.l $7E2000+$082,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$084,X
+
+	; row 2
+	LDA.w #$0918
+	STA.l $7E2000+$100,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$106,X
+
+	LDA.w #$14F8
+	STA.l $7E2000+$102,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$104,X
+
+	; row 3
+	LDA.w #$A82C
+	STA.l $7E2000+$180,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$186,X
+
+	LDA.w #$A82D
+	STA.l $7E2000+$182,X
+	ORA.w #$4000 ; horizontally flip
+	STA.l $7E2000+$184,X
+	RTL
+
+IdentifySancEntrance:
+	LDA.b $A0 : CMP.w #$0012 : BNE +
+	LDA.b $0A : CMP.w #$0010 : BNE +
+		SEC : RTS
+	+ CLC : RTS
+
+IdentifySwampEntrance:
+	LDA.b $A0 : CMP.w #$0036 : BNE +
+	LDA.b $0A : CMP.w #$0010 : BNE +
+		SEC : RTS
+	+ CLC : RTS
+
+;===================================================================================================
+
+; Leaving this here in case you desire a fully custom door later
+; For now, we'll just hardcode the tiles, as I did above
+; I put these in column order because that's how they're expected for the vanilla draw routines
+; but I changed my mind on redefining things
+; and am too lazy to change it to a row-wise listing
+BlockedEntrance:
+	dw $8838, $8828, $A888 ; column 0
+	dw $14E8, $8829, $C888 ; column 1
+	dw $14E8, $8829, $A888 ; column 2
+	dw $C838, $C828, $C888 ; column 3
+
+;===================================================================================================
+
+; Adjustment stage 2: collision
+AdjustEscapeDoorCollision:
+	LSR ; vanilla shift
+
+	; save our parameters
+	; but one or both of these may not be necessary depending on how you detect these doors
+	; all that matters is that after identifying blockage, we have:
+	;   Y is the same as what we entered with
+	;   X has A>>1, for whatever A entered with
+	PHA
+	LDA.w $1980, Y  ; grab door info (type)
+	AND.w #$00FF
+	STA.b $0A       ; store in temporary variable
+	JSR IdentifyBlockedEntrance
+
+	PLX ; this is a TAX in vanilla, just have X pull A instead
+
+	BCS .block_entrance
+
+	; vanilla value
+	LDA.b $00
+
+	RTL
+
+.block_entrance
+	LDA.w #$0101 ; load tile type for solid collision
+
+	RTL
+
+;===================================================================================================
+
+; Enter with:
+;	$0A containing the door information: position and type bytes
+;       which should be from $1980, Y or [$B7], Y depending on where in the door process we are
+; Exit with:
+;   carry clear - leave door alone
+;   carry set   - block door
+IdentifyBlockedEntrance:
+	LDA.l ProgressIndicator : AND.w #$00FF : CMP.w #$0002 : BCS .leave_alone ; only in rain states (0 or 1)
+	LDA.l ProgressFlags : AND.w #$0004 : BNE .leave_alone ; zelda's been rescued
+	LDA.l BlockSanctuaryDoorInRain : BEQ + ;flagged
+	LDA.b $A0 : CMP.w #$0012 : BNE +
+		; we're in the sanctuary
+		; 	this code could be removed because you can't reach sanc without zelda currently
+		; 	but that's enforced in the logic, so this is to catch that case in case some mode allows it
+		LDA.l FollowerIndicator : AND.w #$00FF : CMP.w #$0001 : BEQ .leave_alone ; zelda is following
+		LDA.b $0A
+		CMP.w #$000A : BCC .leave_alone
+		CMP.w #$0014 : BCS .leave_alone
+			.block_door
+			SEC : RTS
+	+ LDA.l BlockCastleDoorsInRain : AND.w #$00FF : BEQ .leave_alone
+	LDX #$FFFE
+	- INX #2
+	LDA.l RemoveRainDoorsRoom, X : CMP.w #$FFFF : BEQ .leave_alone
+	CMP $A0 : BNE -
+	LDA.b $0A
+	CMP.w #$000A : BCC .continue
+	CMP.w #$0014 : BCS .continue
+	BRA .block_door
+	.continue
+	BRA -
+	.leave_alone
+	CLC : RTS
+
+;===================================================================================================

doorrando/gfx.asm

@@ -0,0 +1,95 @@
+GfxFixer:
+{
+    lda.l DRMode : bne +
+        jsl LoadRoomHook ;this is the code we overwrote
+        jsl Dungeon_InitStarTileCh
+        jsl LoadTransAuxGfx_Alt
+        inc $b0
+        rtl
+    + lda $b1 : bne .stage2
+    jsl LoadRoomHook ; this is the rando version - let's only call this guy once - may fix star tiles and slower loads
+    jsl Dungeon_InitStarTileCh
+    jsl LoadTransAuxGfx
+    jsl Dungeon_LoadCustomTileAttr
+    jsl PrepTransAuxGfx
+    lda.l DRMode : cmp #$02 : bne + ; only do this in crossed mode
+        ldx $a0 : lda.l TilesetTable, x
+        cmp $0aa1 : beq + ; already eq no need to decomp
+            sta $0aa1
+            tax : lda $02802e, x : tay
+            jsl DecompDungAnimatedTiles
+    +
+    lda #$09 : sta $17 : sta $0710
+    jsl Palette_SpriteAux3
+    jsl Palette_SpriteAux2
+    jsl Palette_SpriteAux1
+    jsl Palette_DungBgMain
+    jsr CgramAuxToMain
+    inc $b1
+    rtl
+    .stage2
+    lda #$0a : sta $17 : sta $0710
+    stz $b1 : inc $b0
+    rtl
+}
+
+FixAnimatedTiles:
+	LDA.L DRMode : CMP #$02 : BNE +
+	LDA $040C : CMP.b #$FF : BEQ +
+		PHX
+			LDX $A0 : LDA.l TilesetTable, x
+			CMP $0AA1 : beq ++
+				TAX : PLA : BRA +
+			++
+		PLX
+	+ LDA $02802E, X ; what we wrote over
+	RTL
+
+FixCloseDungeonMap:
+    LDA.l DRMode : CMP #$02 : BNE .vanilla
+	LDA $040C : BMI .vanilla
+        LSR : TAX
+        LDA.l DungeonTilesets,x
+        RTL
+    .vanilla
+    LDA $7EC20E
+    RTL
+
+FixWallmasterLamp:
+ORA $0458
+STY $1C : STA $1D : RTL ; what we wrote over
+
+
+CgramAuxToMain: ; ripped this from bank02 because it ended with rts
+{
+    rep #$20
+    ldx.b #$00
+
+    .loop
+    lda $7EC300, X : sta $7EC500, x
+    lda $7EC340, x : sta $7EC540, x
+    lda $7EC380, x : sta $7EC580, x
+    lda $7EC3C0, x : sta $7EC5C0, x
+    lda $7EC400, x : sta $7EC600, x
+    lda $7EC440, x : sta $7EC640, x
+    lda $7EC480, x : sta $7EC680, x
+    lda $7EC4C0, x : sta $7EC6C0, x
+
+    inx #2 : cpx.b #$40 : bne .loop
+    sep #$20
+
+    ; tell NMI to upload new CGRAM data
+    inc $15
+    rts
+}
+
+OverridePaletteHeader:
+	lda.l DRMode : cmp #$02 : bne +
+	lda.l DRFlags : and #$20 : bne +
+	cpx #$01c2 : !bge +
+		rep #$20
+		txa : lsr : tax
+		lda.l PaletteTable, x
+		iny : rtl
+	+ rep #$20 : iny : lda [$0D], Y ; what we wrote over
+rtl

doorrando/hudadditions.asm

@@ -0,0 +1,299 @@
+DrHudOverride:
+{
+	jsl.l NewDrawHud
+	jsr HudAdditions
+	rtl
+}
+
+HudAdditions:
+{
+    SEP #$10
+    LDA.l DRFlags : AND #$0008 : BNE + : JMP .end_item_count : +
+		LDA.l TotalItemCounter : PHA : CMP #1000 : !BLT +
+			JSL HexToDec4Digit_fast
+			LDX.b $04 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS ; draw 1000's digit
+			BRA .skip
+        + JSL HexToDec_fast
+        .skip
+        LDA #$207F : STA !GOAL_DRAW_ADDRESS+2 : STA !GOAL_DRAW_ADDRESS+4
+		PLA : PHA : CMP.w #100 : !BLT +
+			LDX.b $05 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+2 ; draw 100's digit
+		+ PLA : CMP.w #10 : !BLT +
+		 	LDX.b $06 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+4 ; draw 10's digit
+		+ LDX.b $07 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+6 ; draw 1's digit
+		LDA.w #$2830 : STA !GOAL_DRAW_ADDRESS+8 ; draw slash
+		LDA.l DRFlags : AND #$0100 : BNE +
+        	LDA.l MultiClientFlagsWRAM+1 : CMP #1000 : !BLT .three_digit_goal
+				JSL HexToDec4Digit_fast
+				LDX.b $04 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+10 ; draw 1000's digit
+				LDX.b $05 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+12 ; draw 100's digit
+				LDX.b $06 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+14 ; draw 10's digit
+				LDX.b $07 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+16 ; draw 1's digit
+				BRA .end_item_count
+			.three_digit_goal
+			JSL HexToDec_fast
+			LDX.b $05 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+10 ; draw 100's digit
+			LDX.b $06 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+12 ; draw 10's digit
+			LDX.b $07 : TXA : ORA.w #$2490 : STA !GOAL_DRAW_ADDRESS+14 ; draw 1's digit
+			BRA .end_item_count
+		+ LDA.w #$2405 : STA !GOAL_DRAW_ADDRESS+10 : STA !GOAL_DRAW_ADDRESS+12
+		                 STA !GOAL_DRAW_ADDRESS+14 : STA !GOAL_DRAW_ADDRESS+16
+    .end_item_count
+
+	LDX $1B : BNE + ; if outdoors
+        lda.l OWMode : and.w #((!FLAG_OW_CROSSED+!FLAG_OW_MIXED)<<8)+$ff : bne ++ : rts ; Skip if vanilla ow rando
+        ++ lda CurrentHealth : and #$00ff : beq ++
+            lda CurrentWorld : and #$00ff : beq +++
+                lda #$2d60 : bra .owdisplay
+            +++ lda #$2d68 : bra .owdisplay
+        ++ lda #$207f
+        .owdisplay sta $7ec702 : rts
+	+ ldx $040c : cpx #$ff : bne + : rts : + ; Skip if not in dungeon
+	lda.l DRMode : bne + : rts : + ; Skip if not door rando
+        phb : phk : plb
+        lda CompassField : and.l $0098c0, x : beq +
+            lda.w CompassBossIndicator, x : and #$00ff : cmp $a0 : bne +
+                lda $1a : and #$0010 : beq +
+                    lda #$345e : sta $7ec790 : bra .next
+        + lda #$207f : sta $7ec790
+    .next lda.w DRMode : and #$0002 : bne + : plb : rts : +
+            lda CurrentHealth : and #$00ff : beq +
+                lda.w DungeonReminderTable, x : bra .reminder
+            + lda #$207f
+            .reminder sta $7ec702
+            + lda.w DRFlags : and #$0004 : beq .restore
+            ; lda MapField : and.l $0098c0, x : beq .restore
+                txa : lsr : tax
+
+				lda.l GenericKeys : and #$00ff : bne +
+                	lda DungeonCollectedKeys, x : jsr ConvertToDisplay : sta $7ec7a2
+                	lda #$2830 : sta $7ec7a4
+                +
+                lda.w ChestKeys, x : jsr ConvertToDisplay : sta $7ec7a6
+                ; todo 4b0 no longer in use
+
+    .restore
+    plb : rts
+}
+
+;column distance for BK/Smalls
+HudOffsets:
+;   none  hc     east   desert aga    swamp  pod    mire   skull  ice    hera   tt     tr     gt
+dw $fffe, $0000, $0006, $0008, $0002, $0010, $000e, $0018, $0012, $0016, $000a, $0014, $001a, $001e
+
+; offset from 1644
+RowOffsets:
+dw $0000, $0000, $0040, $0080, $0000, $0080, $0040, $0080, $00c0, $0040, $00c0, $0000, $00c0, $0000
+
+ColumnOffsets:
+dw $0000, $0000, $0000, $0000, $000a, $000a, $000a, $0014, $000a, $0014, $0000, $0014, $0014, $001e
+
+
+DrHudDungeonItemsAdditions:
+{
+    jsl DrawHUDDungeonItems
+    lda.l HUDDungeonItems : and #$ff : bne + : rtl : +
+    lda.l DRMode : cmp #$02 : beq + : rtl : +
+
+    phx : phy : php
+    rep #$30
+
+    lda.w #$24f5 : sta $1606 : sta $1610 : sta $161a : sta $1624
+    sta $1644 : sta $164a : sta $1652 : sta $1662 : sta $1684 : sta $16c4
+    ldx #$0000
+    - sta $1704, x : sta $170e, x : sta $1718, x
+    inx #2 : cpx #$0008 : !blt -
+
+    lda HudFlag : and.w #$0020 : beq + : JMP ++ : +
+    lda HUDDungeonItems : and.w #$0007 : bne + : JMP ++ : +
+    	; bk symbols
+		lda.w #$2811 : sta $1606 : sta $1610 : sta $161a : sta $1624
+		; sm symbols
+		lda.w #$2810 : sta $160a : sta $1614 : sta $161e : sta $16e4
+    	; blank out stuff
+    	lda.w #$24f5 : sta $1724
+
+        ldx #$0002
+        	- lda #$0000 : !addl RowOffsets,x : !addl ColumnOffsets, x : tay
+        	lda.l DungeonReminderTable, x : sta $1644, y : iny #2
+        	lda.w #$24f5 : sta $1644, y
+        	lda MapField : and.l $0098c0, x : beq + ; must have map
+        		jsr BkStatus : sta $1644, y : bra .smallKey ; big key status
+        	+ lda BigKeyField : and.l $0098c0, x : beq .smallKey
+        		lda.w #$2826 : sta $1644, y
+        	.smallKey
+        	+ iny #2
+			cpx #$001a : bne +
+				tya : !add #$003c : tay
+        	+ stx $00
+        		txa : lsr : tax
+        		lda.w #$24f5 : sta $1644, y
+        		lda.l GenericKeys : and #$00FF : bne +
+        		lda.l DungeonKeys, x : and #$00FF : beq +
+        			jsr ConvertToDisplay2 : sta $1644, y
+        		+ iny #2 : lda.w #$24f5 : sta $1644, y
+        		phx : ldx $00
+        			; lda MapField : and.l $0098c0, x : beq + ; must have map
+        				plx : sep #$30 : lda.l ChestKeys, x : sta $02
+        				lda.l GenericKeys : bne +++
+        					lda $02 : !sub DungeonCollectedKeys, x : sta $02
+        				+++ lda $02
+        				rep #$30
+        				jsr ConvertToDisplay2 : sta $1644, y ; small key totals
+        				bra .skipStack
+        		+ plx
+        		.skipStack iny #2
+        		cpx #$000d : beq +
+        			lda.w #$24f5 : sta $1644, y
+        		+
+        	ldx $00
+            + inx #2 : cpx #$001b : bcs ++ : JMP -
+    ++
+    lda HudFlag : and.w #$0020 : bne + : JMP ++ : +
+    lda HUDDungeonItems : and.w #$000c : bne + : JMP ++ : +
+        ; map symbols (do I want these) ; note compass symbol is 2c20
+        lda.w #$2821 : sta $1606 : sta $1610 : sta $161a : sta $1624
+        ; blank out a couple thing from old hud
+        lda.w #$24f5 : sta $16e4 : sta $1724
+        sta $160a : sta $1614 : sta $161e ; blank out sm key indicators
+        ldx #$0002
+        	- lda #$0000 ; start of hud area
+        	!addl RowOffsets, x : !addl ColumnOffsets, x : tay
+        	lda.l DungeonReminderTable, x : sta $1644, y
+        	iny #2
+        	lda.w #$24f5 : sta $1644, y ; blank out map spot
+        	lda MapField : and.l $0098c0, x : beq + ; must have map
+        		JSR MapIndicatorShort : STA $1644, Y
+			+ iny #2
+            cpx #$001a : bne +
+				tya : !add #$003c : tay
+			+ lda CompassField : and.l $0098c0, x : beq + ; must have compass
+                phx ; total chest counts
+                    txa : lsr : tax
+                    sep #$30
+                    lda.l TotalLocations, x : !sub DungeonLocationsChecked, x : JSR HudHexToDec2DigitCopy
+                    rep #$30
+                    lda $06 : jsr ConvertToDisplay2 : sta $1644, y : iny #2
+                    lda $07 : jsr ConvertToDisplay2 : sta $1644, y
+                plx
+                bra .skipBlanks
+			+ lda.w #$24f5 : sta $1644, y : iny #2 : sta $1644, y
+            .skipBlanks iny #2
+            cpx #$001a : beq +
+				lda.w #$24f5 : sta $1644, y ; blank out spot
+            + inx #2 : cpx #$001b : !bge ++ : JMP -
+    ++
+    plp : ply : plx : rtl
+}
+
+MapIndicatorLong:
+	PHX
+		LDA.l OldHudToNewHudTable, X : TAX
+		JSR MapIndicator
+	PLX
+RTL
+
+MapIndicatorShort:
+	PHX
+		TXA : LSR : TAX
+		JSR MapIndicator
+	PLX
+RTS
+
+OldHudToNewHudTable:
+	dw 1, 2, 3, 10, 4, 6, 5, 8, 11, 9, 7, 12, 13
+
+IndicatorCharacters:
+	;  check      1      2      3      4      5      6      7      G      B      R
+	dw $2426, $2817, $2818, $2819, $281A, $281B, $281C, $281D, $2590, $258B, $259B
+
+MapIndicator:
+	LDA.l CrystalPendantFlags_3, X : AND #$00FF
+	PHX
+		ASL : TAX : LDA.l IndicatorCharacters, X
+	PLX
+RTS
+
+BkStatus:
+    lda BigKeyField : and.l $0098c0, x : bne +++ ; has the bk already
+         lda.l BigKeyStatus, x : bne ++
+            lda #$2827 : rts ; 0/O for no BK
+         ++ cmp #$0002 : bne +
+            lda #$2420 : rts ; symbol for BnC
+    + lda #$24f5 : rts ; black otherwise
+    +++ lda #$2826 : rts ; check mark
+
+ConvertToDisplay:
+    and.w #$00ff : cmp #$000a : !blt +
+        !add #$2553 : rts
+    + !add #$2490 : rts
+
+ConvertToDisplay2:
+    and.w #$00ff : beq ++
+        cmp #$000a : !blt +
+            !add #$2553 : rts ; 2580 with 258A as "A" for non transparent digits
+        + !add #$2816 : rts
+    ++ lda #$2827 : rts ; 0/O for 0 or placeholder digit ;2483
+
+CountAbsorbedKeys:
+    jsl IncrementSmallKeysNoPrimary : phx
+    lda $040c : cmp #$ff : beq +
+        lsr : tax
+        lda DungeonAbsorbedKeys, x : inc : sta DungeonAbsorbedKeys, x
+    + plx : rtl
+
+;================================================================================
+; 16-bit A, 8-bit X
+; in:	A(b) - Byte to Convert
+; out:	$04 - $07 (high - low)
+;================================================================================
+HudHexToDec4DigitCopy:
+    LDY.b #$90
+    -
+        CMP.w #1000 : !BLT +
+        INY
+        SBC.w #1000 : BRA -
+    +
+    STY $04 : LDY #$90 ; Store 1000s digit & reset Y
+    -
+        CMP.w #100 : !BLT +
+        INY
+        SBC.w #100 : BRA -
+    +
+    STY $05 : LDY #$90 ; Store 100s digit & reset Y
+    -
+        CMP.w #10 : !BLT +
+        INY
+        SBC.w #10 : BRA -
+    +
+    STY $06 : LDY #$90 ; Store 10s digit & reset Y
+    CMP.w #1 : !BLT +
+    -
+        INY
+        DEC : BNE -
+    +
+    STY $07 ; Store 1s digit
+RTS
+
+;================================================================================
+; 8-bit registers
+; in:	A(b) - Byte to Convert
+; out:	$06 - $07 (high - low)
+;================================================================================
+HudHexToDec2DigitCopy: ; modified
+	PHY
+		LDY.b #$00
+		-
+			CMP.b #10 : !BLT +
+			INY
+			SBC.b #10 : BRA -
+		+
+		STY $06 : LDY #$00 ; Store 10s digit and reset Y
+		CMP.b #1 : !BLT +
+		-
+			INY
+			DEC : BNE -
+		+
+		STY $07	; Store 1s digit
+	PLY
+RTS

doorrando/keydoors.asm

@@ -0,0 +1,42 @@
+; code to un-pair or re-pair doors
+
+; doorlist is loaded into 19A0 but no terminator
+; new room is in A0
+; for "each" door do the following: (each could mean the first four doors?)
+; in lookup table, grab room and corresponding position
+; find the info at 7ef000, x where x is twice the paired room
+; check the corresponding bit (there are only 4)
+; set the bit in 068C
+
+; Note the carry bit is used to indicate if we should aborted (set) or not
+CheckIfDoorsOpen: {
+    jsr TrapDoorFixer ; see normal.asm
+    ; note we are 16bit mode right now
+    lda.l DRMode : beq +
+        lda $040c : cmp #$00ff : bne .gtg
+    + lda $a0 : dec : tax : and #$000f ; hijacked code
+    sec : rtl ; set carry to indicate normal behavior
+
+    .gtg
+    phb : phk : plb
+    stx $00 : ldy #$0000
+    .nextDoor
+    lda $a0 : asl : tax
+    lda.w KeyDoorOffset, x : beq .skipDoor
+    asl : sty $05 : !add $05 : tax
+    lda.w PairedDoorTable, x : beq .skipDoor
+    sta $02 : and #$00ff : asl a : tax
+    lda $02 : and #$ff00 : sta $03
+    lda RoomDataWRAM.l, X : and #$f000 : and $03 : beq .skipDoor
+    tyx : lda $068c : ora $0098c0,x  : sta $068c
+    .skipDoor
+    iny #2 : cpy $00 : bne .nextDoor
+    plb : clc : rtl
+}
+
+; outstanding issues
+; how to indicate opening for other (non-first four doors?)
+; Bank01 Door Register stores the 4 bits in 068c to 400 (depending on type)
+; Key collision and others depend on F0-F3 attribute not sure if extendable to other numbers
+; Dungeon_ProcessTorchAndDoorInteractives.isOpenableDoor is the likely culprit for collision problems
+; Saving open status to other unused rooms is tricky -- Bank 2 13947 (line 8888)

doorrando/math.asm

@@ -0,0 +1,66 @@
+;divide by 2 example
+;    0   1   2   3   4   5   6   7   8   9   a   b   c   d   e   f  10--Offset Ruler
+;v  00  01  01  02  02  03  03  04  04  04  05  05  06  06  07  07  08
+
+;divide by 3 example
+; 0  1  2  3  4  5  6  7  8  9  a  b  c  d  e  f 10 11 12 13 14 15 16 17 18
+;00 00 01 01 01 02 02 02 03 03 03 04 04 04 05 05 05 06 06 06 07 07 07 08 08
+
+MultiplyByY:
+.loop cpy #$0001 : beq .done
+cpy #$0003 : bne ++
+    jsr MultiBy3 : bra .done
+++ cpy #$0005 : bne ++
+    jsr MultiBy5 : bra .done
+++ asl : sta $00 : tya : lsr : tay : lda $00 : bra .loop
+.done rts
+
+;Divisor in Y. Width of division is in X for rounding toward middle
+DivideByY:
+.loop
+cpy #$0000 : beq .done
+cpy #$0001 : beq .done
+cpy #$0003 : bne ++
+    jsr DivideBy3 : bra .done
+++ cpy #$0005 : bne ++
+    jsr DivideBy5 : bra .done
+++ jsr DivideBy2 : sta $00
+tya : lsr : tay
+txa : lsr : tax
+lda $00 : bra .loop
+.done rts
+
+MultiBy3:
+sta $00 : asl : !add $00
+rts
+
+MultiBy5:
+sta $00 : asl #2 : !add $00
+rts
+
+;width of divison in x: rounds toward X/2
+DivideBy2:
+sta $00
+lsr : bcc .done
+sta $02 : txa : lsr : cmp $00 : !blt +
+    lda $02 : inc : bra .done
++ lda $02
+.done rts
+
+DivideBy3:
+sta $00
+ldx #$0000
+lda #$0002
+.loop cmp $00 : !bge .store
+    inx : !add #$0003 : bra .loop
+.store txa
+rts
+
+DivideBy5:
+sta $00
+ldx #$0000
+lda #$0003
+.loop cmp $00 : !bge .store
+    inx : !add #$0005 : bra .loop
+.store txa
+rts

doorrando/normal.asm

@@ -0,0 +1,440 @@
+WarpLeft:
+    lda.l DRMode : beq .end
+	lda $040c : cmp.b #$ff : beq .end
+	lda $20 : ldx $aa
+	jsr CalcIndex
+	!add #$06 : ldy #$01 ; offsets in A, Y
+	jsr LoadRoomHorz
+.end
+	jsr Cleanup
+	rtl
+
+WarpRight:
+    lda.l DRMode : beq .end
+	lda $040c : cmp.b #$ff : beq .end
+	lda $20 : ldx $aa
+	jsr CalcIndex
+	!add #$12 : ldy #$ff ; offsets in A, Y
+	jsr LoadRoomHorz
+.end
+	jsr Cleanup
+	rtl
+
+WarpUp:
+    lda.l DRMode : beq .end
+	lda $040c : cmp.b #$ff : beq .end
+	lda $22 : ldx $a9
+	jsr CalcIndex
+	ldy #$02 ; offsets in A, Y
+	jsr LoadRoomVert
+.end
+	jsr Cleanup
+	rtl
+
+; Checks if $a0 is equal to <Room>. If it is, opens its stonewall if it's there
+macro StonewallCheck(Room)
+    lda $a0 : cmp.b #<Room> : bne ?end
+        lda.l <Room>*2+$7ef000 : ora #$80 : sta.l <Room>*2+$7ef000
+    ?end
+endmacro
+
+WarpDown:
+    lda.l DRMode : beq .end
+	lda $040c : cmp.b #$ff : beq .end
+	lda $22 : ldx $a9
+	jsr CalcIndex
+	!add #$0c : ldy #$ff ; offsets in A, Y
+	jsr LoadRoomVert
+    %StonewallCheck($43)
+.end
+	jsr Cleanup
+	rtl
+
+; carry set = use link door like normal
+; carry clear = we are in dr mode, never use linking doors
+CheckLinkDoorR:
+    lda.l DRMode : bne +
+        lda $7ec004 : sta $a0 ; what we wrote over
+        sec : rtl
+    + clc : rtl
+
+CheckLinkDoorL:
+    lda.l DRMode : bne +
+        lda $7ec003 : sta $a0 ; what we wrote over
+        sec : rtl
+    + clc : rtl
+
+TrapDoorFixer:
+    lda $fe : and #$0038 : beq .end
+    xba : asl #2 : sta $00
+    stz $0468 : lda $068c : ora $00 : sta $068c
+    .end
+    stz $fe ; clear our fe here because we don't need it anymore
+    rts
+
+Cleanup:
+	lda.l DRFlags : and #$10 : beq +
+    	stz $047a
+	+ inc $11
+	lda $ef
+	rts
+
+;A needs be to the low coordinate, x needs to be either 0 for left,upper or non-zero for right,down
+; This sets A (00,02,04) and stores half that at $04 for later use, (src door)
+CalcIndex: ; A->low byte of Link's Coord, X-> Link's quadrant, DoorOffset x 2 -> A, DoorOffset -> $04 (vert/horz agnostic)
+	cpx.b #00 : bne .largeDoor
+	cmp.b #$d0 : bcc .smallDoor
+	lda #$01 : bra .done ; Middle Door
+	.smallDoor lda #$00 : bra .done
+	.largeDoor lda #$02
+	.done
+	sta $04
+	asl
+	rts
+
+; Y is an adjustment for main direction of travel
+; A is a door table row offset
+LoadRoomHorz:
+{
+    phb : phk : plb
+	sty $06 : sta $07 : lda $a0 : pha ; Store normal room on stack
+	lda $07 : jsr LookupNewRoom ; New room is in A, Room Data is in $00-$01
+	lda $00 : cmp #$03 : bne .gtg
+	jsr HorzEdge : pla : bcs .end
+	sta $a0 : bra .end ; Restore normal room, abort (straight staircases and open edges can get in this routine)
+
+	.gtg ;Good to Go!
+	pla ; Throw away normal room (don't fill up the stack)
+	lda $a0 : and.b #$0F : asl a : !sub $23 : !add $06 : sta $02
+	ldy #$00 : jsr ShiftVariablesMainDir
+
+    lda $01 : and #$80 : beq .normal
+    ldy $06 : cpy #$ff : beq +
+        lda $01 : jsr LoadEastMidpoint : bra ++
+    + lda $01 : jsr LoadWestMidpoint
+    ++ jsr PrepScrollToEdge : bra .scroll
+
+    .normal
+    jsr PrepScrollToNormal
+	.scroll
+	lda $01 : and #$40 : pha
+	jsr ScrollY
+	pla : beq .end
+	    ldy #$06 : jsr ApplyScroll
+	.end
+	plb ; restore db register
+    rts
+}
+
+; Y is an adjustment for main direction of travel (stored at $06)
+; A is a door table row offset (stored a $07)
+LoadRoomVert:
+{
+    phb : phk : plb
+	sty $06 : sta $07 : lda $a0 : pha ; Store normal room on stack
+	lda $07 : jsr LookupNewRoom ; New room is in A, Room Data is in $00-$01
+	lda $00 : cmp #$03 : bne .gtg
+	jsr VertEdge : pla : bcs .end
+	sta $a0 : bra .end ; Restore normal room, abort (straight staircases and open edges can get in this routine)
+	.gtg ;Good to Go!
+	pla ; Throw away normal room (don't fill up the stack)
+	lda $a0 : and.b #$F0 : lsr #3 : !sub $21 : !add $06 : sta $02
+
+	lda $01 : and #$80 : beq .notEdge
+	    ldy #$01 : jsr ShiftVariablesMainDir
+        ldy $06 : cpy #$ff : beq +
+            lda $01 : jsr LoadSouthMidpoint : bra ++
+        + lda $01 : jsr LoadNorthMidpoint
+	++ jsr PrepScrollToEdge : bra .scroll
+
+    .notEdge
+    lda $01 : and #$03 : cmp #$03 : bne .normal
+        jsr ScrollToInroomStairs
+        stz $046d
+        bra .end
+    .normal
+	ldy #$01 : jsr ShiftVariablesMainDir
+    jsr PrepScrollToNormal
+    .scroll
+    lda $01 : and #$40 : sta $046d
+    jsr ScrollX
+    .end
+    plb ; restore db register
+    rts
+}
+
+LookupNewRoom: ; expects data offset to be in A
+{
+    rep #$30 : and #$00FF ;sanitize A reg (who knows what is in the high byte)
+	sta $00 ; offset in 00
+	lda $a2 : tax ; probably okay loading $a3 in the high byte
+	lda.w DoorOffset,x : and #$00FF ;we only want the low byte
+	asl #3 : sta $02 : !add $02 : !add $02 ;multiply by 24 (data size)
+	!add $00 ; should now have the offset of the address I want to load
+	tax : lda.w DoorTable,x : sta $00
+	and #$00FF : sta $a0 ; assign new room
+	sep #$30
+	rts
+}
+
+; INPUTS-- Y: Direction Index , $02:  Shift Value
+; Sets high bytes of various registers
+ShiftVariablesMainDir:
+{
+	lda.w CoordIndex,y : tax
+	lda $21,x : !add $02 : sta $21,x ; coordinate update
+	lda.w CameraIndex,y : tax
+	lda $e3,x : !add $02 : sta $e3,x ; scroll register high byte
+	lda.w CamQuadIndex,y : tax
+	lda $0605,x : !add $02 : sta $0605,x ; high bytes of these guys
+	lda $0607,x : !add $02 : sta $0607,x
+	lda $0601,x : !add $02 : sta $0601,x
+	lda $0603,x : !add $02 : sta $0603,x
+	rts
+}
+
+; Normal Flags should be in $01
+ScrollToInroomStairs:
+{
+    jsr PrepScrollToInroomStairs
+    ldy #$01 : jsr ShiftVariablesMainDir
+    jsr ScrollX
+    ldy #$00 : jsr ApplyScroll
+    lda $a0 : and #$0f : cmp #$0f : bne +
+        stz $e0 : stz $e2 ; special case camera fix
+        lda #$1f : sta $e1 : sta $e3
+    +
+    rts
+}
+
+; Direction should be in $06, Shift Value (see above) in $02 and other info in $01
+; Sets $02, $04, $05, $ee, $045e, $045f and things related to Y coordinate
+PrepScrollToInroomStairs:
+{
+    lda $01 : and #$30 : lsr #3 : tay
+    lda.w InroomStairsX,y : sta $04
+    lda.w InroomStairsX+1,y : sta $05
+    lda $06 : cmp #$ff : beq .south
+        lda.w InroomStairsY+1,y : bne +
+            inc $045f ; flag indicating special screen transition
+            dec $02 ; shift variables further
+            stz $aa
+            lda $a8 : and #%11111101 : sta $a8
+            stz $0613 ; North scroll target
+            inc $0603 : inc $0607
+            dec $0619 : dec $061b
+        +
+        lda.w InroomStairsY,y : !add #$20 : sta $20
+        !sub #$38 : sta $045e
+        lda $01 : and #$40 : beq +
+            lda $20 : !add #$20 : sta $20
+            stz $045f
+        +
+        dec $21
+        %StonewallCheck($1b)
+        bra ++
+    .south
+        lda.w InroomStairsY+1,y : beq +
+            inc $045f ; flag indicating special screen transition
+            inc $02 ; shift variables further
+            lda #$02 : sta $aa
+            lda $a8 : ora #%00000010 : sta $a8
+            inc $0611 ; South scroll target
+            dec $0603 : dec $0607
+            inc $0619 : inc $061b
+        +
+        lda.w InroomStairsY,y : !sub #$20 : sta $20
+        !add #$38 : sta $045e
+        lda $01 : and #$40 : beq +
+            lda $20 : !sub #$20 : sta $20
+            stz $045f
+        +
+        inc $21
+    ++
+    lda $01 : and #$04 : lsr #2 : sta $ee : bne +
+    	stz $0476
+    + rts
+}
+
+; Target pixel should be in A, other info in $01
+; Sets $04 $05 and $ee
+PrepScrollToEdge:
+{
+    sta $04 : lda $01 : and #$20 : beq +
+        lda #01
+    + sta $05
+    lda $01 : and #$10 : beq +
+        lda #01
+    + sta $ee : bne +
+    	stz $0476
+    + rts
+}
+
+; Normal Flags should be in $01
+; Sets $04 $05 and $ee, and $fe
+PrepScrollToNormal:
+{
+    lda $01 : sta $fe : and #$04 : lsr #2 : sta $ee ; trap door and layer
+    bne +
+    	stz $0476
+    + stz $05 : lda #$78 : sta $04
+    lda $01 : and #$03 : beq .end
+        cmp #$02 : !bge +
+            lda #$f8 : sta $04 : bra .end
+        + inc $05
+    .end rts
+}
+
+StraightStairsAdj:
+{
+    stx $0464 : sty $012e ; what we wrote over
+    lda.l DRMode : beq +
+        lda $045e : bne .toInroom
+        lda $046d : beq .noScroll
+            sta $22
+            ldy #$00 : jsr ApplyScroll
+            stz $046d
+        .noScroll
+        jsr GetTileAttribute : tax
+        lda $11 : cmp #$12 : beq .goingNorth
+            lda $a2 : cmp #$51 : bne ++
+                rep #$20 : lda #$0018 : !add $20 : sta $20 : sep #$20 ; special fix for throne room
+                jsr GetTileAttribute : tax
+            ++ lda.l StepAdjustmentDown, X : bra .end
+;            lda $ee : beq .end
+;                rep #$20 : lda #$ffe0 : !add $20 : sta $20 : sep #$20
+        .goingNorth
+            cpx #$00 : bne ++
+            lda $a0 : cmp #$51 : bne ++
+                lda #$36 : bra .end ; special fix for throne room
+            ++ ldy $ee : cpy #$00 : beq ++
+                inx
+            ++ lda.l StepAdjustmentUp, X
+        .end
+        pha : lda $0462 : and #$04 : bne ++
+            pla : !add #$f6 : pha
+        ++ pla : !add $0464 : sta $0464
+    + rtl
+    .toInroom
+    lda #$32 : sta $0464 : stz $045e
+    rtl
+}
+
+GetTileAttribute:
+{
+    phk : pea.w .jslrtsreturn-1
+    pea.w $02802c
+    jml CalculateTransitionLanding ; mucks with x/y sets a to Tile Attribute, I think
+    .jslrtsreturn
+    rts
+}
+
+; 0 open edge
+; 1 nrm door high
+; 2 straight str
+; 3 nrm door low
+; 4 trap door high
+; 5 trap door low   (none of these exist on North direction)
+StepAdjustmentUp: ; really North Stairs
+db $00, $f6, $1a, $18, $16, $38
+StepAdjustmentDown: ; really South Stairs
+db $d0, $f6, $10, $1a, $f0, $00
+
+StraightStairsFix:
+{
+    pha
+    lda.l DRMode : bne +
+        pla : !add $20 : sta $20 : rtl ;what we wrote over
+    + pla : rtl
+}
+
+StraightStairLayerFix:
+{
+    lda.l DRMode : beq +
+        lda $ee : rtl
+    + lda $01c322, x : rtl ; what we wrote over
+}
+
+DoorToStraight:
+{
+    pha
+    lda.l DRMode : beq .skip
+        pla : bne .end
+        pha
+        lda $a0 : cmp #$51 : bne .skip
+        lda #$04 : sta $4e
+    .skip pla
+    ; the ldx $0418 is now taken care of by TransitionCalculateLanding_Fix
+    .end cmp #$02 ;what we wrote over
+    rtl
+}
+
+DoorToInroom:
+{
+    ldx $045e : bne .end
+        sta $0020, y ; what we wrote over
+    .end
+    ldx #$00 ; what we wrote over
+    rtl
+}
+
+DoorToInroomEnd:
+{
+    ldy $045e : beq .vanilla
+    cmp $045e : bne .return
+        stz $045e ; clear
+    .return
+    rtl
+    .vanilla
+    cmp $02c034, x ; what we wrote over
+    rtl
+}
+
+StraightStairsTrapDoor:
+{
+    lda $0464 : bne +
+        ; reset function
+        .reset phk : pea.w .jslrtsreturn-1
+        pea.w $02802c
+        jml $028c73 ; $10D71 .reset label of Bank02
+        .jslrtsreturn
+        lda $0468 : bne ++
+        lda $a0 : cmp.b #$ac : bne .animateTraps
+        lda $0403 : and.b #$20 : bne .animateTraps
+        lda $0403 : and.b #$10 : beq ++
+            .animateTraps
+            lda #$05 : sta $11
+            inc $0468 : stz $068e : stz $0690
+        ++ JSL Underworld_DoorDown_Call : rtl
+    + JML Dungeon_ApproachFixedColor ; what we wrote over
+}
+
+InroomStairsTrapDoor:
+{
+    lda $0200 : cmp #$05 : beq .reset
+    lda $b0 : jml $008781 ; what we wrote over (essentially)
+    .reset
+    pla : pla : pla
+    jsl StraightStairsTrapDoor_reset
+    jml $028b15 ; just some RTS in bank 02
+}
+
+HandleSpecialDoorLanding: {
+    LDA.l $7F2000,X ; what we wrote over
+    SEP #$30
+    ; A = tiletype
+    HandleIncomingDoorState:
+    PHA
+        LDA.l DRMode : BEQ .noDoor
+        PLA : PHA : AND.b #$FA : CMP.b #$80 : bne .noDoor
+
+        .setDoorState
+        LDA.w $0418 : AND.b #$02 : BNE + : INC
+        + STA.b $6C
+
+        .noDoor
+	PLA
+    CMP #$34 : bne + ; inroom stairs
+        PHA : LDA #$26 : STA $045E : PLA
+    + RTL
+}

doorrando/overrides.asm

@@ -0,0 +1,131 @@
+GtBossHeartCheckOverride:
+    lda $a0 : cmp #$1c : beq ++
+    cmp #$6c : beq ++
+    cmp #$4d : bne +
+    ++ lda.l DRFlags : and #$01 : bne ++ ;skip if flag on
+        lda $403 : ora #$80 : sta $403
+    ++ clc
+rtl
+    + sec
+rtl
+
+OnFileLoadOverride:
+    jsl OnFileLoad ; what I wrote over
+    + lda.l DRFlags : and #$02 : beq + ; Mirror Scroll
+        lda MirrorEquipment : bne +
+            lda #$01 : sta MirrorEquipment
++ rtl
+
+MirrorCheckOverride:
+    lda.l DRFlags : and #$02 : beq ++
+        lda MirrorEquipment : cmp #$01 : beq +
+    ;++ lda $8A : and #$40 ; what I wrote over
+    ++ phx : ldx $8A : lda.l OWTileWorldAssoc,x : plx : and.b #$ff
+    rtl
+    + lda.l DRScroll : rtl
+
+EGFixOnMirror:
+	lda.l DRFlags : and #$10 : beq +
+		stz $047a
+	+ jsl Mirror_SaveRoomData
+	rtl
+
+BlockEraseFix:
+    lda MirrorEquipment : and #$02 : beq +
+        stz $05fc : stz $05fd
+    + rtl
+
+FixShopCode:
+    cpx #$300 : !bge +
+        sta RoomDataWRAM[$00].l, x
+    + rtl
+
+VitreousKeyReset:
+    lda.l DRMode : beq +
+        stz $0cba, x
+    + JML $0db818 ;restore old code
+
+GuruguruFix:
+    lda $a0 : cmp #$df : !bge +
+        and #$0f : cmp #$0e : !blt +
+            iny #2
+    + rtl
+
+BlindAtticFix:
+    lda.l DRMode : beq +
+        lda #$01 : rtl
+    + lda FollowerIndicator : cmp.b #$06
+    rtl
+
+SuctionOverworldFix:
+    stz $50 : stz $5e
+    lda.l DRMode : beq +
+        stz $49
+    + rtl
+
+!CutoffTable = "$27E000"
+
+CutoffEntranceRug:
+    PHA : PHX
+    LDA.l DRMode : BEQ .norm
+        LDA $04 : cmp #$000A : BEQ + ; only affect A & C objects
+        cmp #$000C : BNE .norm
+          + LDX #$0000 : LDA !CutoffTable, x
+          	- CMP.W $A0 : BEQ .check
+           	INX #2 : LDA !CutoffTable, x : CMP.w #$FFFF : BNE -
+    .norm PLX : PLA : LDA $9B52, y : STA $7E2000, x ; what we wrote over
+RTL
+     .check
+		  LDA $0c : CMP #$0004 : !BGE .skip
+		  LDA $0e : CMP #$0008 : !BGE .skip
+		  CMP.l #$0004 : !BLT .skip
+      BRA .norm
+.skip PLX : PLA : RTL
+
+StoreTempBunnyState:
+	LDA $5D : CMP #$1C : BNE +
+		STA $5F
+	+ LDA #$15 : STA $5D ; what we wrote over
+RTL
+
+RetrieveBunnyState:
+	STY $5D : STZ $02D8 ; what we wrote over
+	LDA $5F : BEQ +
+		STA $5D
++ RTL
+
+; A should be how much dmg to do to Aga when leaving this function
+StandardAgaDmg:
+	LDX.b #$00 ; part of what we wrote over
+	LDA.l ProgressFlags : AND #$04 : BEQ + ; zelda's not been rescued
+		LDA.b #$10 ; hurt him!
+	+ RTL ; A is zero if the AND results in zero and then Agahnim's invincible!
+
+StandardSaveAndQuit:
+	LDA.b #$0F : STA.b $95 ; what we wrote over
+	LDA.l ProgressFlags : AND #$04 : BNE +
+	LDA.l DRMode : BEQ +
+	LDA.l StartingEntrance : CMP.b #$02 : BCC +
+		LDA.b #$03 : STA.l StartingEntrance  ; set spawn to uncle if >=
++ RTL
+
+; note: this skips both maiden dialog triggers if the hole is open
+BlindsAtticHint:
+	REP #$20
+	CMP.w #$0122 : BNE +
+	LDA RoomDataWRAM[$65].low : AND.w #$0100 : BEQ +
+		SEP #$20 : RTL ; skip the dialog box if the hole is already open
+	+ SEP #$20 : JML Main_ShowTextMessage
+
+BlindZeldaDespawnFix:
+	CMP.b #06 : BEQ +
+	LDA.w $0D00,X : BEQ + ; don't despawn follower if maiden isn't "present"
+		PLA : PLA : PEA.w SpritePrep_BlindMaiden_despawn_follower-1 : RTL
+	+ PLA : PLA : PEA.w SpritePrep_BlindMaiden_kill_the_girl-1 : RTL
+
+
+BigKeyDoorCheck:
+	CPY.w #$001E : BNE + ; skip if it isn't a BK door
+	LDA.l DRFlags : AND #$0400 : BNE + ; skip if the flag is set - bk doors can be double-sided
+		 PLA : PEA.w RoomDraw_OneSidedShutters_South_onesided_shutter_or_big_key_door-1
++ LDA.w #$0000 : RTL

doorrando/scroll.asm

@@ -0,0 +1,222 @@
+AdjustTransition:
+{
+	lda $ab : and #$01ff : beq .reset
+	phy : ldy #$06 ; operating on vertical registers during horizontal trans
+	cpx.b #$02 : bcs .horizontalScrolling
+	ldy #$00  ; operate on horizontal regs during vert trans
+	.horizontalScrolling
+	cmp #$0008 : bcs +
+	    pha : lda $ab : and #$0200 : beq ++
+	        pla : bra .add
+	    ++ pla : eor #$ffff : inc ; convert to negative
+	    .add jsr AdjustCamAdd : ply : bra .reset
+	+ lda $ab : and #$0200 : xba : tax
+	lda.l OffsetTable,x : jsr AdjustCamAdd
+	lda $ab : !sub #$0008 : sta $ab
+	ply : bra .done
+	.reset ; clear the $ab variable so to not disturb intra-tile doors
+	stz $ab
+	.done
+	lda $00 : and #$01fc
+	rtl
+}
+
+AdjustCamAdd:
+    !add $00E2,y : pha
+    and #$01ff : cmp #$0111 : !blt +
+        cmp #$01f8 : !bge ++
+            pla : and #$ff10 : pha : bra +
+        ++ pla : and #$ff00 : !add #$0100 : pha
+    + pla : sta $00E2,y : sta $00E0,y : rts
+
+; expects target quad in $05 (either 0 or 1) and target pixel in $04, target room should be in $a0
+; $06 is either $ff or $01/02
+; uses $00-$03 and $0e for calculation
+; also set up $ac
+ScrollY: ;change the Y offset variables
+    lda $a0 : and.b #$f0 : lsr #3 : sta $0603 : inc : sta $0607
+
+    lda $05 : bne +
+        lda $603 : sta $00 : stz $01 : bra ++
+    +   lda $607 : sta $00 : lda #$02 : sta $01
+    ++ ; $01 now contains 0 or 2 and $00 contains the correct lat
+
+    stz $0e
+    rep #$30
+    lda $00 : pha
+
+    lda $e8 : and #$01ff : sta $02
+    lda $04 : jsr LimitYCamera : sta $00
+    jsr CheckRoomLayoutY : bcc +
+        lda $00 : cmp #$0080 : !bge ++
+            cmp #$0010 : !blt .cmpSrll
+                lda #$0010 : bra .cmpSrll
+        ++ cmp #$0100 : !bge .cmpSrll
+            lda #$0100
+    .cmpSrll sta $00
+
+    ; figures out scroll amt
+    + lda $00 : cmp $02 : bne +
+        lda #$0000 : bra .next
+    + !blt +
+        !sub $02 : inc $0e : bra .next
+    + lda $02 : !sub $00
+
+    .next
+    sta $ab
+    jsr AdjustCameraBoundsY
+
+    pla : sta $00
+    sep #$30
+    lda $04 : sta $20
+    lda $00 : sta $21 : sta $0601 : sta $0605
+    lda $01 : sta $aa
+    lda $0e : asl : ora $ac : sta $ac
+    lda $e9 : and #$01 : asl #2 : tax : lda $0603, x : sta $e9
+    rts
+
+LimitYCamera:
+    cmp #$006c : !bge +
+        lda #$0000 : bra .end
+    + cmp #$017d : !blt +
+        lda #$0110 : bra .end
+    + !sub #$006c
+    .end rts
+
+CheckRoomLayoutY:
+    jsr LoadRoomLayout ;switches to 8-bit
+    cmp #$00 : beq .lock
+    cmp #$07 : beq .free
+    cmp #$01 : beq .free
+    cmp #$04 : !bge .lock
+    cmp #$02 : bne +
+        lda $06 : cmp #$ff : beq .lock
+    + cmp #$03 : bne .free
+        lda $06 : cmp #$ff : bne .lock
+    .free rep #$30 : clc : rts
+    .lock rep #$30 : sec : rts
+
+AdjustCameraBoundsY:
+    jsr CheckRoomLayoutY : bcc .free
+
+    ; layouts that are camera locked (quads only)
+    lda $04 : and #$00ff : cmp #$007d : !blt +
+        lda #$0088 : bra ++
+    + cmp #$006d : !bge +
+        lda #$0078 : bra ++
+    + !add #$000b
+
+    ; I think we no longer need the $02 variable
+    ++ sta $02 : lda $04 : and #$0100 : !add $02 : bra .setBounds
+
+    ; layouts where the camera is free
+    .free lda $04 : cmp #$006c : !bge +
+        lda #$0077 : bra .setBounds
+    + cmp #$017c : !blt +
+        lda #$0187 : bra .setBounds
+    + !add #$000b
+    .setBounds sta $0618 : inc #2 : sta $061a
+    rts
+
+LoadRoomLayout:
+    lda $a0 : asl : !add $a0 : tax
+    lda $1f8001, x : sta $b8
+    lda $1f8000, x : sta $b7
+    sep #$30
+    ldy #$01 : lda [$b7], y : and #$1c : lsr #2
+    rts
+
+; expects target quad in $05 (either 0 or 1) and target pixel in $04, target room should be in $a0
+; uses $00-$03 and $0e for calculation
+; also set up $ac
+ScrollX: ;change the X offset variables
+    lda $a0 : and.b #$0f : asl : sta $060b : inc : sta $060f
+
+    lda $05 : bne +
+        lda $60b : sta $00 : stz $01 : bra ++
+    +   lda $60f : sta $00 : lda #$01 : sta $01
+    ++ ; $01 now contains 0 or 1 and $00 contains the correct long
+
+    stz $0e ; pos/neg indicator
+    rep #$30
+    lda $00 : pha
+
+    lda $e2 : and #$01ff : sta $02
+    lda $04 : jsr LimitXCamera : sta $00
+    jsr CheckRoomLayoutX : bcc +
+        lda $00 : cmp #$0080 : !bge ++
+            lda #$0000 : bra .cmpSrll
+        ++ lda #$0100
+    .cmpSrll sta $00
+
+    ;figures out scroll amt
+    + lda $00 : cmp $02 : bne +
+        lda #$0000 : bra .next
+    + !blt +
+        !sub $02 : inc $0e : bra .next
+    + lda $02 : !sub $00
+
+    .next
+    sta $ab : lda $04
+
+    cmp #$0078 : !bge +
+        lda #$007f : bra ++
+    + cmp #$0178 : !blt +
+        lda #$017f : bra ++
+    + !add #$0007
+    ++ sta $061c : inc #2 : sta $061e
+
+    pla : sta $00
+    sep #$30
+    lda $04 : ldx $046d : bne .straight
+        sta $22 : bra +
+    .straight
+        sta $046d ; set X position later
+    +
+    lda $00 : sta $23 : sta $0609 : sta $060d
+    lda $01 : sta $a9
+    lda $0e : asl : ora $ac : sta $ac
+    lda $e3 : and #$01 : asl #2 : tax : lda $060b, x : sta $e3
+
+    rts
+
+LimitXCamera:
+    cmp #$0079 : !bge +
+        lda #$0000 : bra .end
+    + cmp #$0178 : !blt +
+        lda #$0178
+    + !sub #$0078
+    .end rts
+
+CheckRoomLayoutX:
+    jsr LoadRoomLayout ;switches to 8-bit
+    cmp #$04 : !blt .lock
+    cmp #$05 : bne +
+        lda $06 : cmp #$ff : beq .lock
+    + cmp #$06 : bne .free
+        lda $06 : cmp #$ff : bne .lock
+    .free rep #$30 : clc : rts
+    .lock rep #$30 : sec : rts
+
+ApplyScroll:
+    rep #$30
+    lda $ab : and #$01ff : sta $00
+    lda $ab : and #$0200 : beq +
+        lda $00e2, y : !add $00 : bra .end
+    + lda $00e2, y : !sub $00
+    .end
+    sta $00e2, y
+    sta $00e0, y
+    stz $ab : sep #$30 : rts
+
+QuadrantLoadOrderBeforeScroll:
+    lda $045f : beq .end
+    lda #$08 : sta $045c ; start with opposite quadrant row
+    .end
+    JML $0091c4 ; what we overwrote
+
+QuadrantLoadOrderAfterScroll:
+    lda $045f : beq .end
+    stz $045c : stz $045f ; draw other row and clear flag
+    .end
+    JML $0091c4 ; what we overwrote

doorrando/spiral.asm

@@ -0,0 +1,329 @@
+RecordStairType: {
+    pha
+    lda.l DRMode : beq .norm
+    lda $040c : cmp #$ff : beq .norm
+        lda $0e
+        cmp #$25 : bcc ++ ; don't record straight staircases
+            sta $045e
+        ++ pla : bra +
+    .norm pla : sta $a0
+    + lda $063d, x
+    rtl
+}
+
+SpiralWarp: {
+    lda.l DRMode : beq .abort ; abort if not DR
+    lda $040c : cmp.b #$ff : beq .abort ; abort if not in dungeon
+    lda $045e : cmp #$5e : beq .gtg ; abort if not spiral - intended room is in A!
+    cmp #$5f : beq .gtg
+    cmp #$26 : beq .inroom
+    .abort
+    stz $045e : lda $a2 : and #$0f : rtl ; clear,run hijacked code and get out
+    .inroom
+    jsr InroomStairsWarp
+    lda $a2 : and #$0f ; this is the code we are hijacking
+    rtl
+
+    .gtg
+    phb : phk : plb : phx : phy ; push stuff
+    jsr LookupSpiralOffset
+    rep #$30 : and #$00FF : asl #2 : tax
+    lda.w SpiralTable, x : sta $00
+    lda.w SpiralTable+2, x : sta $02
+    sep #$30
+    lda $00 : sta $a0
+    ; shift quadrant if necessary
+    stz $07 ; this is a x quad adjuster for those blasted staircase on the edges
+    lda $01 : and #$01 : !sub $a9
+    bne .xQuad
+    lda $0462 : and #$04 : bne .xqCont
+    inc $07
+    .xqCont lda $22 : bne .skipXQuad ; this is an edge case
+    dec $23 : bra .skipXQuad ; need to -1 if $22 is 0
+    .xQuad sta $06 : !add $a9 : sta $a9
+    lda $0462 : and #$04 : bne .xCont
+    inc $07 ; up stairs are going to -1 the quad anyway during transition, need to add this back
+    .xCont ldy #$00 : jsr ShiftQuadSimple
+
+    .skipXQuad
+    lda $aa : lsr : sta $06 : lda $01 : and #$02 : lsr : !sub $06
+    beq .skipYQuad
+    sta $06 : asl : !add $aa : sta $aa
+    ldy #$01 : jsr ShiftQuadSimple
+
+    .skipYQuad
+    lda $01 : and #$04 : lsr : sta $048a ;fix layer calc 0->0 2->1
+    lda $01 : and #$08 : lsr #2 : sta $0492 ;fix from layer calc 0->0 2->1
+    ; shift lower coordinates
+    lda $02 : sta $22 : bne .adjY : lda $23 : !add $07 : sta $23
+    .adjY lda $03 : sta $20 : bne .upDownAdj : inc $21
+    .upDownAdj ldx #$08
+    lda $0462 : and #$04 : beq .upStairs
+    ldx #$fd
+    lda $01 : and #$80 : bne .set53
+    ; if target is also down adjust by (6,-15)
+    lda #$06 : !add $20 : sta $20 : lda #$eb : !add $22 : sta $22 : bra .set53
+    .upStairs
+    lda $01 : and #$80 : beq .set53
+    ; if target is also up adjust by (-6, 14)
+    lda #$fa : !add $20 : sta $20 : lda #$14 : !add $22 : sta $22
+    bne .set53 : inc $23
+    .set53
+    txa : !add $22 : sta $53
+
+    lda $01 : and #$10 : sta $07 ; zeroHzCam check
+    ldy #$00 : jsr SetCamera
+    lda $01 : and #$20 : sta $07 ; zeroVtCam check
+    ldy #$01 : jsr SetCamera
+
+    jsr StairCleanup
+    ply : plx : plb ; pull the stuff we pushed
+    lda $a2 : and #$0f ; this is the code we are hijacking
+    rtl
+}
+
+StairCleanup: {
+    stz $045e ; clear the staircase flag
+
+    ; animated tiles fix
+    lda.l DRMode : cmp #$02 : bne + ; only do this in crossed mode
+        ldx $a0 : lda.l TilesetTable, x
+        cmp $0aa1 : beq + ; already eq no need to decomp
+            sta $0aa1
+            tax : lda $02802e, x : tay
+            jsl DecompDungAnimatedTiles
+    +
+    stz $047a
+    rts
+}
+
+;Sets the offset in A
+LookupSpiralOffset: {
+    ;where link currently is in $a2: quad in a8 & #$03
+    ;count doors
+    stz $00 : ldx #$00 : stz $01
+
+    .loop
+    lda $047e, x : cmp $00 : bcc .continue
+    sta $00
+    .continue inx #2
+    cpx #$08 : bcc .loop
+
+    lda $00 : lsr
+    cmp #$01 : beq .done
+
+    ; look up the quad
+    lda $a9 : ora $aa : and #$03 : beq .quad0
+    cmp #$01 : beq .quad1
+    cmp #$02 : beq .quad2
+    bra .quad3
+    .quad0
+    inc $01 : lda $a2
+    cmp #$0c : beq .q0diff ;gt ent
+    cmp #$70 : bne .done   ;hc stairwell
+    .q0diff lda $22 : cmp #$00 : beq .secondDoor
+    cmp #$98 : bcc .done ;gt ent and hc stairwell
+    .secondDoor inc $01 : bra .done
+    .quad1
+    lda $a2
+    cmp #$1a : beq .q1diff ;pod compass
+    cmp #$26 : beq .q1diff ;swamp elbows
+    cmp #$6a : beq .q1diff ;pod dark basement
+    cmp #$76 : bne .done   ;swamp drain
+    .q1diff lda $22 : cmp #$98 : bcc .done
+    inc $01 : bra .done
+    .quad2
+    lda #$03 : sta $01 : lda $a2
+    cmp #$5f : beq .iceu ;ice u room
+    cmp #$3f : bne .done ;hammer ice exception
+    stz $01 : bra .done
+    .iceu lda $22 : cmp #$78 : bcc .done
+    inc $01 : bra .done
+    .quad3
+    lda $a2 : cmp #$40 : beq .done ; top of aga exception
+    lda #$02 : sta $01 ; always 2
+
+    .done
+    lda $a2 : tax : lda.w SpiralOffset,x
+    !add $01 ;add a thing (0 in easy case)
+    rts
+}
+
+InroomStairsWarp: {
+    phb : phk : plb : phx : phy ; push stuff
+    ; find stairs by room and store index in X
+    lda $a0 : ldx #$07
+    .loop
+        cmp.w InroomStairsRoom,x
+        beq .found
+        dex
+        bne .loop
+    .found
+    rep #$30
+    txa : and #$00ff : asl : tay
+    lda.w InroomStairsTable,y : sta $00
+	sep #$30
+    sta $a0
+
+    ; set position and everything else based on target door type
+    txa : and #$01 : eor #$01 : sta $07
+    ; should be the same as lda $0462 : and #$04 : lsr #2 : eor #$01 : sta $07
+    lda $01 : and #$80 : beq .notEdge
+        lda $07 : sta $03 : beq +
+            lda $01 : jsr LoadSouthMidpoint : sta $22 : lda #$f4
+            bra ++
+        +
+            lda $01 : jsr LoadNorthMidpoint : sta $22 : dec $21 : lda #$f7
+        ++
+        sta $20
+        lda $01 : and #$20 : beq +
+            lda #$01
+        +
+        sta $02
+        stz $07
+        lda $01 : and #$10 : lsr #4
+        JMP .layer
+    .notEdge
+    lda $01 : and #$03 : cmp #$03 : bne .normal
+        txa : and #$06 : sta $07
+        lda $01 : and #$30 : lsr #3 : tay
+        lda.w InroomStairsX+1,y : sta $02
+        lda.w InroomStairsY+1,y : sta $03
+        cpy $07 : beq .vanillaTransition
+            lda.w InroomStairsX,y : sta $22
+            lda.w InroomStairsY,y
+            ldy $07 : beq +
+                !add #$07
+            +
+            sta $20
+            inc $07
+            bra ++
+        .vanillaTransition
+            lda #$c0 : sta $07 ; leave camera
+        ++
+        %StonewallCheck($1b)
+        lda $01 : and #$04 : lsr #2
+        bra .layer
+    .normal
+        lda $01 : sta $fe ; trap door
+        lda $07 : sta $03 : beq +
+            lda $01 : and #$04 : bne .specialFix
+            lda #$e0 : bra ++
+            .specialFix
+            lda #$c8 : bra ++
+        +
+            %StonewallCheck($43)
+            lda $01 : and #$04 : bne +
+            lda #$1b : bra ++
+            + lda #$33
+        ++ sta $20
+        inc $07 : stz $02 : lda #$78 : sta $22
+        lda $01 : and #$03 : beq ++
+            cmp #$02 : !bge +
+                lda #$f8 : sta $22 : stz $07 : bra ++
+            + inc $02
+        ++
+        lda $01 : and #$04 : lsr #2
+
+    .layer
+    sta $ee
+    bne +
+    	stz $0476
+    +
+
+    lda $02 : !sub $a9
+    beq .skipXQuad
+        sta $06 : !add $a9 : sta $a9
+        ldy #$00 : jsr ShiftQuadSimple
+    .skipXQuad
+    lda $aa : lsr : sta $06 : lda $03 : !sub $06
+    beq .skipYQuad
+        sta $06 : asl : !add $aa : sta $aa
+        ldy #$01 : jsr ShiftQuadSimple
+    .skipYQuad
+
+    lda $07 : bmi .skipCamera
+    ldy #$00 : jsr SetCamera ; horizontal camera
+    ldy #$01 : sty $07 : jsr SetCamera ; vertical camera
+    lda $20 : cmp #$e0 : bcc +
+    lda $e8 : bne +
+        lda #$10 : sta $e8 ; adjust vertical camera at bottom
+    +
+    .skipCamera
+
+    jsr StairCleanup
+    ply : plx : plb ; pull the stuff we pushed
+    rts
+}
+
+ShiftQuadSimple: {
+	lda.w CoordIndex,y : tax
+	lda $20,x : beq .skip
+	lda $21,x : !add $06 : sta $21,x ; coordinate update
+	.skip
+	lda.w CamQuadIndex,y : tax
+	lda $0601,x : !add $06 : sta $0601,x
+	lda $0605,x : !add $06 : sta $0605,x ; high bytes of these guys
+	rts
+}
+
+SetCamera: {
+    stz $04
+    tyx : lda $a9,x : bne .nonZeroHalf
+    lda.w CamQuadIndex,y : tax : lda $607,x : pha
+    lda.w CameraIndex,y : tax : pla : cmp $e3, x : bne .noQuadAdj
+    dec $e3,x
+
+    .noQuadAdj
+    lda $07 : bne .adj0
+    lda.w CoordIndex,y : tax
+    lda $20,x : beq .oddQuad
+    cmp #$79 : bcc .adj0
+    !sub #$78 : sta $04
+    tya : asl : !add #$04 : tax : jsr AdjCamBounds : bra .done
+    .oddQuad
+    lda #$80 : sta $04 : bra .adj1 ; this is such a weird case - quad cross boundary
+    .adj0
+    tya : asl : tax : jsr AdjCamBounds : bra .done
+
+    .nonZeroHalf ;meaning either right half or bottom half
+    lda $07 : bne .setQuad
+    lda.w CoordIndex,y : tax
+    lda $20,x : cmp #$78 : bcs .setQuad
+    !add #$78 : sta $04
+    lda.w CamQuadIndex,y : tax : lda $0603, x : pha
+    lda.w CameraIndex,y : tax : pla : sta $e3, x
+    .adj1
+    tya : asl : !add #$08 : tax : jsr AdjCamBounds : bra .done
+
+    .setQuad
+    lda.w CamQuadIndex,y : tax : lda $0607, x : pha
+    lda.w CameraIndex,y : tax : pla : sta $e3, x
+    tya : asl : !add #$0c : tax : jsr AdjCamBounds : bra .done
+
+    .done
+    lda.w CameraIndex,y : tax
+    lda $04 : sta $e2, x
+    rts
+}
+
+; input, expects X to be an appropriate offset into the CamBoundBaseLine table
+; when $04 is 0 no coordinate are added
+AdjCamBounds: {
+    rep #$20 : lda.w CamBoundBaseLine, x : sta $05
+    lda $04 : and #$00ff : beq .common
+    lda.w CoordIndex,y : tax
+    lda $20, x : and #$00ff : !add $05 : sta $05
+    .common
+    lda.w OppCamBoundIndex,y : tax
+    lda $05 : sta $0618, x
+    inc #2 : sta $061A, x : sep #$20
+    rts
+}
+
+SpiralPriorityHack: {
+    lda.l DRMode : beq +
+        lda #$01 : rtl ; always skip the priority code - until I figure out how to fix it
+    + lda $0462 : and #$04 ; what we wrote over
+    rtl
+}

dungeondrops.asm

@@ -1,325 +1,9 @@
 ;================================================================================
 ; Dungeon & Boss Drop Fixes
 ;--------------------------------------------------------------------------------
-SpawnDungeonPrize:
-        PHX : PHB
-        JSL.l AttemptItemSubstitution
-        JSL.l ResolveLootIDLong
-        STA.w ItemReceiptID
-        TAX
-        LDA.b #$29 : LDY.b #$06
-
-        JSL.l AddAncillaLong
-        BCS .failed_spawn
-                LDA.w ItemReceiptID
-                STA.w AncillaGet,X : STA.w SpriteID,X
-                JSR.w AddDungeonPrizeAncilla
-        .failed_spawn
-        PLB : PLX
+DropSafeDungeon:
+	LDA $040C : CMP #$08 : BEQ +
+		LDA $01C6FC, X : JML Sprite_SpawnFallingItem
+	+
 RTL
-
-AddDungeonPrizeAncilla:
-        LDY.w ItemReceiptID
-        STZ.w AncillaVelocityY,X
-        STZ.w AncillaVelocityX,X
-        STZ.w AncillaGeneral,X
-        STZ.w $0385,X
-        STZ.w $0C54,X
-
-        LDA.b #$D0 : STA.w AncillaVelocityZ,X
-        LDA.b #$80 : STA.w AncillaZCoord,X
-        LDA.b #$09 : STA.w AncillaTimer,X
-        LDA.b #$00 : STA.w $0394,X
-        LDA.w AncillaGet,X : STA.w ItemReceiptID
-        LDA.w DungeonID : CMP.b #$14 : BNE .not_hera
-                LDA.b LinkAbsoluteY+1 : AND.b #$FE
-                INC A
-                STA.b Scrap01
-                STZ.b Scrap00
-                LDA.b LinkAbsoluteX+1 : AND.b #$FE
-                INC A
-                STA.b Scrap03
-                STZ.b Scrap02
-                BRA .set_coords_exit
-        .not_hera
-        TYA : ASL : TAY
-        REP #$20
-        LDA.w #$0078
-        CLC : ADC.b BG2V
-        STA.b Scrap00
-        LDA.w #$0078
-        CLC : ADC.b BG2H
-        STA.b Scrap02
-        SEP #$20
-
-        .set_coords_exit
-        LDA.b Scrap00 : STA.w AncillaCoordYLow,X
-        LDA.b Scrap01 : STA.w AncillaCoordYHigh,X
-        LDA.b Scrap02 : STA.w AncillaCoordXLow,X
-        LDA.b Scrap03 : STA.w AncillaCoordXHigh,X
-RTS
-
-PrepPrizeTile:
-        PHA : PHX : PHY
-        LDA.w AncillaGet, X
-        JSL.l AttemptItemSubstitution
-        JSL.l ResolveLootIDLong
-        STA.w SpriteID,X
-        JSL.l TransferItemReceiptToBuffer_using_ReceiptID
-        PLY : PLX : PLA
-RTL
-
-SetItemPose:
-        PHA
-        LDA.w DungeonID : BMI .one_handed
-        LDA.w RoomItemsTaken : BIT.b #$80 : BNE +
-                .one_handed
-                PLA
-                JML $8799F2
-        +
-        JSR.w CrystalOrPendantBehavior : BCC .one_handed
-        .two_handed
-        PLA
-JML $8799EE ; cool pose
-
-SetPrizeCoords:
-        PHX : PHY
-        STZ.b Scrap03
-        LDA.w ItemReceiptMethod : CMP.b #$03 : BEQ +
-                .regular_coords
-                PLY : PLX
-                LDY.w AncillaGet,X
-                RTL
-        +
-        JSR.w CrystalOrPendantBehavior : BCC .regular_coords
-        PLY : PLX
-        LDY.b #$20 ; Treat as crystal
-RTL
-
-SetCutsceneFlag:
-; Out: c - Cutscene flag $02 if set, $01 if unset.
-        PHX
-        LDY.b #$01 ; wrote over
-        LDA.w DungeonID : BMI .no_cutscene
-        LDA.w RoomItemsTaken : BIT #$80 : BNE .dungeon_prize
-                .no_cutscene
-                SEP #$30
-                PLX
-                CLC
-                RTL
-        .dungeon_prize
-        LDA.w ItemReceiptMethod : CMP.b #$03 : BCC .no_cutscene
-                JSR.w SetDungeonCompleted
-                LDA.w ItemReceiptID
-                REP #$30
-                AND.w #$00FF : ASL : TAX
-                LDA.l InventoryTable_properties,X : BIT.w #$0080 : BEQ .no_cutscene
-                        SEP #$31
-                        PLX
-RTL
-
-AnimatePrizeCutscene:
-        LDA.w ItemReceiptMethod : CMP.b #$03 : BNE +
-                JSR.w CrystalOrPendantBehavior : BCC +
-                        LDA.w DungeonID : BMI +
-                        LDA.w RoomItemsTaken : BIT #$80 : BEQ +
-                                SEC
-                                RTL
-        +
-        CLC
-RTL
-
-PrizeDropSparkle:
-        LDA.w AncillaID,X : CMP.b #$29 : BNE .no_sparkle
-                JSR.w CrystalOrPendantBehavior : BCC .no_sparkle
-                        SEC
-                        RTL
-        .no_sparkle
-        CLC
-RTL
-
-HandleDropSFX:
-        LDA.w RoomItemsTaken : BIT #$80 : BEQ .no_sound
-                JSR.w CrystalOrPendantBehavior : BCC .no_sound
-                        SEC
-                        RTL
-        .no_sound
-        CLC
-RTL
-
-HandleCrystalsField:
-        TAX
-        LDA.w ItemReceiptID : CMP.b #$20 : BNE .not_crystal
-                TXA
-                STA.l CrystalsField
-                RTL
-        .not_crystal
-RTL
-
-MaybeKeepLootID:
-        PHA
-        LDA.w DungeonID : BMI .no_prize
-        LDA.w RoomItemsTaken : BIT #$80 : BNE .prize
-                .no_prize
-                STZ.w ItemReceiptID
-                STZ.w ItemReceiptPose
-                PLA
-                RTL
-        .prize
-        STZ.w ItemReceiptPose
-        PLA
-RTL
-
-CheckSpawnPrize:
-; In: A - DungeonID
-; Out: c - Spawn prize if set
-        REP #$20
-        LDX.w DungeonID
-        LDA.l DungeonItemMasks,X : AND.l DungeonsCompleted : BEQ .spawn
-                SEP #$20
-                CLC
-                RTL
-        .spawn
-        SEP #$21
-RTL
-
-CheckDungeonCompletion:
-        LDX.w DungeonID
-        REP #$20
-        LDA.l DungeonItemMasks,X : AND.l DungeonsCompleted
-        SEP #$20
-RTL
-
-PendantMusicCheck:
-; In: A - Item receipt ID
-        PHX
-        TAY
-        LDA.w ItemReceiptMethod : CMP.b #$03 : BNE .dont_wait
-                TYA
-                REP #$30
-                AND.w #$00FF : ASL : TAX
-                LDA.l InventoryTable_properties,X : BIT.w #$0080 : BNE .dont_wait
-                        SEP #$31
-                        PLX
-                        RTL
-        .dont_wait
-        SEP #$30
-        PLX
-        CLC
-RTL
-
-PrepPrizeOAMCoordinates:
-        PHX : PHY
-        LDY.w AncillaLayer,X
-
-        LDA.w $F67F,Y : STA.b $65
-        STZ.b $64
-
-        LDA.w AncillaCoordYLow,X : STA.b Scrap00
-        LDA.w AncillaCoordYHigh,X : STA.b Scrap01
-        LDA.w AncillaCoordXLow,X : STA.b Scrap02
-        LDA.w AncillaCoordXHigh,X : STA.b Scrap03
-
-        REP #$20
-        LDA.b Scrap00
-        SEC : SBC.w $0122
-        STA.b Scrap00
-
-        LDA.b Scrap02
-        SEC : SBC.w $011E
-        STA.b Scrap02
-        STA.b Scrap04
-
-        REP #$20
-        LDA.w $029E,X
-        AND.w #$00FF
-        STA.b $72
-
-        LDA.b $00
-        STA.b $06
-        SEC
-        SBC.b $72
-        STA.b $00
-
-        SEP #$20
-        TXY
-        LDA.w AncillaGet,X : TAX
-        LDA.l SpriteProperties_chest_width,X : BNE .wide
-                TYX
-                LDA.w AncillaID,X : CMP.b #$3E : BEQ .rising_crystal
-                        REP #$20
-                        LDA.b Scrap00
-                        CLC : ADC.w #$0008
-                        STA.b Scrap08
-                        LDA.b Scrap02
-                        CLC : ADC.w #$0004
-                        STA.b Scrap02 : STA.b Scrap0A
-                        BRA .wide
-                .rising_crystal
-                REP #$20
-                LDA.b Scrap00
-                CLC : ADC.w #$0008 : STA.b Scrap08
-                LDA.b Scrap02 : STA.b Scrap0A
-        .wide
-        SEP #$20
-        PLY : PLX
-RTL
-
-PrepPrizeShadow:
-        PHX
-        LDA.w ItemReceiptID : TAX
-        LDA.l SpriteProperties_standing_width,X : BNE .wide
-                LDA.b Scrap02
-                SEC : SBC.b #$04
-                STA.b Scrap02
-        .wide
-        LDA.b #$20 : STA.b Scrap04 ; What we wrote over
-        PLX
-RTL
-
-CheckPoseItemCoordinates:
-        PHX
-        LDA.w ItemReceiptPose : BEQ .done
-                   BIT.b #$02 : BEQ .done
-                LDA.w AncillaGet,X : TAX
-                LDA.l SpriteProperties_chest_width,X : BNE .done
-                        LDA.b Scrap02
-                        CLC : ADC.b #$04
-                        STA.b Scrap02
-        .done
-        PLX
-        LDA.w AncillaGet,X
-        TAX
-RTL
-
-CrystalOrPendantBehavior:
-; Out: c - Crystal Behavior if set, pendant if unset
-        PHA : PHX
-        LDA.w AncillaGet,X
-        REP #$31
-        AND.w #$00FF : ASL : TAX
-        LDA.l InventoryTable_properties,X : BIT.w #$0080 : BNE .crystal_behavior
-                SEP #$30
-                PLX : PLA
-                RTS
-        .crystal_behavior
-        SEP #$31
-        PLX : PLA
-RTS
-
-CheckDungeonWorld:
-; Maintain vanilla door opening behavior with dungeon prizes
-        TXA : CMP.b #$05 : BCS .dark_world
-                REP #$02
-                RTL
-        .dark_world
-        SEP #$02
-RTL
-
-SetDungeonCompleted:
-        LDX.w DungeonID : BMI +
-                REP #$20
-                LDA.l DungeonItemMasks, X : ORA.l DungeonsCompleted : STA.l DungeonsCompleted
-                SEP #$20
-        +
-RTS
+;--------------------------------------------------------------------------------

dungeonmap.asm

@@ -1,19 +1,27 @@
 DoDungeonMapBossIcon:
-	LDA.b NMISTRIPES
+	LDA.b $14
 	CMP.b #$09
 	BEQ .dungeonmap
 
 .cave
+	CMP.b #$01
 	RTL
 
 .dungeonmap
 
-	LDX.w DungeonID
+	LDX.w $040C
 	BMI .cave
 
+;	LDA.l DungeonMapIcons
+;	AND.b #$01
+;	BNE ++
+;
+;	INC ; so it's not equal to $01
+;	BRA .cave
+
 	; get dungeon boss room
 ++	REP #$30
-	LDA.l $8AE817,X
+	LDA.l DungeonMapBossRooms, X
 	ASL
 	TAX
 
@@ -49,7 +57,7 @@ DoDungeonMapBossIcon:
 
 .match
 	LDA.b #$80
-	STA.w CGADD
+	STA.w $2121
 
 	REP #$30
 
@@ -66,14 +74,14 @@ DoDungeonMapBossIcon:
 	ASL ; x128 for graphics
 	ASL
 	ADC.w #BossMapIconGFX
-	STA.w A1T1L
+	STA.w $4312
 
 	PHY
 	LDY.w #32
 
 	SEP #$20
 --	LDA.l .boss_palettes,X
-	STA.w CGDATA
+	STA.w $2122
 	INX
 	DEY
 	BNE --
@@ -86,24 +94,24 @@ DoDungeonMapBossIcon:
 	SEP #$10
 
 	LDA.w #$1801
-	STA.w DMAP1
+	STA.w $4310
 
 	LDX.b #BossMapIconGFX>>16
-	STX.w A1B1
+	STX.w $4314
 
 	LDA.w #$A060>>1
-	STA.w VMADDL
+	STA.w $2116
 	LDA.w #$0040
-	STA.w DAS1L
+	STA.w $4315
 
 	LDX.b #$02
-	STX.w MDMAEN
+	STX.w $420B
 
-	STA.w DAS1L
+	STA.w $4315
 	LDA.w #$A260>>1
-	STA.w VMADDL
+	STA.w $2116
 
-	STX.w MDMAEN
+	STX.w $420B
 
 	; done
 	SEP #$30

elder.asm

@@ -1,11 +1,11 @@
 NewElderCode:
 {
-LDA.b OverworldIndex : CMP.b #$1B : BEQ .newCodeContinue
+LDA $8A : CMP #$1B : BEQ .newCodeContinue
 ;Restore Jump we can keep the RTL so JML
-JML $85F0CD
+JML $05F0CD
 .newCodeContinue
 PHB : PHK : PLB
-LDA.b #$07 : STA.w SpriteOAMProp, X ; Palette 
+LDA.b #$07 : STA $0F50, X ;Palette 
 JSR Elder_Draw
 JSL Sprite_PlayerCantPassThrough
 JSR Elder_Code
@@ -17,12 +17,12 @@ RTL
     Elder_Draw:
     {
 
-        LDA.b #$02 : STA.b Scrap06 : STZ.b Scrap07 ;Number of Tiles
+        LDA.b #$02 : STA $06 : STZ $07 ;Number of Tiles
         
-        LDA.w SpriteGFXControl, X : ASL #04
+        LDA $0DC0, X : ASL #04
         
-        ADC.b #.animation_states : STA.b Scrap08
-        LDA.b #.animation_states>>8 : ADC.b #$00 : STA.b Scrap09
+        ADC.b #.animation_states : STA $08
+        LDA.b #.animation_states>>8 : ADC.b #$00 : STA $09
         
         JSL Sprite_DrawMultiple_player_deferred
         JSL Sprite_DrawShadowLong
@@ -42,15 +42,15 @@ RTL
     {
         REP #$20
         LDA.l GoalItemRequirement : BEQ .despawn
-        LDA.l GanonVulnerableMode : AND.w #$00FF : CMP.w #$0005 : BEQ .despawn
+        LDA.l InvincibleGanon : AND.w #$00FF : CMP.w #$0005 : BEQ .despawn
         LDA.l TurnInGoalItems : AND.w #$00FF : BNE +
             .despawn
             SEP #$20
-            STZ.w SpriteAITable, X ; despawn self
+            STZ $0DD0, X ; despawn self
             RTS
         +
         SEP #$20
-        LDA.b GameSubMode
+        LDA.b $11
         BNE .done
         LDA.b #$96
         LDY.b #$01
@@ -66,6 +66,6 @@ RTL
         
         .done
         SEP #$20
-        LDA.b FrameCounter : LSR #5 : AND.b #$01 : STA.w SpriteGFXControl, X
+        LDA.b $1A : LSR #5 : AND.b #$01 : STA.w $0DC0, X
         RTS
     }

endingsequence.asm

@@ -0,0 +1,22 @@
+;================================================================================
+; Dialog Pointer Override
+;--------------------------------------------------------------------------------
+EndingSequenceTableOverride:
+	PHY
+	PHX
+	TYX
+	LDA.l EndingSequenceText, X
+	PLX
+	STA $1008, X
+	PLY
+RTL
+;--------------------------------------------------------------------------------
+EndingSequenceTableLookupOverride:
+	PHY
+	PHX
+	TYX
+	LDA.l EndingSequenceText, X : AND #$00FF
+	PLX
+	PLY
+RTL
+;--------------------------------------------------------------------------------

enemizer/blindboss.asm

@@ -0,0 +1,13 @@
+;================================================================================
+; Blind Boss fight
+;--------------------------------------------------------------------------------
+
+print "Blind Spawn Code Check: ", pc
+check_blind_boss_room:
+	LDA $A0                             ; load room index (low byte)
+	CMP #172 : BNE +                    ; Is is Thieve Town Boss Room
+	LDA $09DE81 : BEQ +        			; Blind maiden does not need rescuing
+
+	LDA FollowerIndicator : JML Check_for_Blind_Fight
+	+
+	JML Initialize_Blind_Fight

enemizer/blindboss_hooks.asm

@@ -0,0 +1,13 @@
+
+;================================================================================
+; Blind Boss fight
+;--------------------------------------------------------------------------------
+
+org $9DA081					; Original Code
+	JML check_blind_boss_room
+Check_for_Blind_Fight:
+
+
+
+org $9DA090
+Initialize_Blind_Fight:

enemizer/hooks.asm

@@ -0,0 +1 @@
+incsrc blindboss_hooks.asm

enemizer/main.asm

@@ -0,0 +1,35 @@
+; Intended to be a migration of code generated by enemizer
+
+lorom
+
+;================================================================================
+
+!ADD = "CLC : ADC"
+!SUB = "SEC : SBC"
+!BLT = "BCC"
+!BGE = "BCS"
+
+;=Constants======================================================================
+
+!BUSHES_FLAG = "$368100"
+!BLIND_DOOR_FLAG = "$368101"
+!MOLDORM_EYES_FLAG = "$368102"
+!RANDOM_SPRITE_FLAG = "$368103"
+!AGAHNIM_FUN_BALLS = "$368104"
+!ENABLE_MIMIC_OVERRIDE = "$368105"
+!ENABLE_TERRORPIN_AI_FIX = "$368106"
+
+; Enemizer reserved memory
+; $7F50B0 - $7F50BF - Downstream Reserved (Enemizer)
+!SHELL_DMA_FLAG = "$7F50B0"
+!SOUNDFX_LOADED = "$7F50B1"
+;================================================================================
+
+incsrc hooks.asm
+
+org $B78000 ; the original org is 368000, but I'm putting this here for migration purposes, and I think B6 is the same bank but fastrom
+EnemizerTablesStart:
+;none migrated yet
+
+EnemizerCodeStart:
+incsrc blindboss.asm

enemy_adjustments.asm

@@ -3,25 +3,21 @@
 ; make sure bats always load LW stats
 ;--------------------------------------------------------------------------------
 NewBatInit:
-	CPY.b #$00 : BEQ .light_world
+	CPY #$00 : BEQ .light_world
 	;check if map id == 240 or 241
-	LDA.b RoomIndex : CMP.b #$F0 : BEQ .light_world ;oldman cave1
-	CMP.b #$F1 : BEQ .light_world ;oldman cave2
-	CMP.b #$B0 : BEQ .light_world ;agahnim statue keese
-	CMP.b #$D0 : BEQ .light_world ;agahnim darkmaze
+	LDA $A0 : CMP #$F0 : BEQ .light_world ;oldman cave1
+	CMP #$F1 : BEQ .light_world ;oldman cave2
+	CMP #$B0 : BEQ .light_world ;agahnim statue keese
+	CMP #$D0 : BEQ .light_world ;agahnim darkmaze
 
 	
-	LDA.b #$85 : STA.w SpriteBump, X
-	LDA.b #$04 : STA.w SpriteHitPoints, X
+	LDA.b #$85 : STA $0CD2, X
+	LDA.b #$04 : STA $0E50, X
 RTL
+
 	.light_world
-		LDA.b #$80 : STA.w SpriteBump, X
-		LDA.b #$01 : STA.w SpriteHitPoints, X
+		LDA.b #$80 : STA $0CD2, X
+		LDA.b #$01 : STA $0E50, X
 RTL
 ;--------------------------------------------------------------------------------
-NewFireBarDamage:
-        LDA.b LinkLayer : CMP.w SpriteLayer, X : BNE .NotSameLayer
-                JSL Sprite_AttemptDamageToPlayerPlusRecoilLong
-                RTL
-.NotSameLayer
-RTL
+

entrances.asm

@@ -8,30 +8,30 @@ LockAgahnimDoors:
 		;#$0 = Never Locked
 		LDA.w #$0000 : RTL
 	+ : CMP.w #$0001 : BNE +
-		LDA.l ProgressIndicator : AND.w #$000F : CMP.w #$0002 : !BGE .unlock ; if we rescued zelda, skip
+		LDA ProgressIndicator : AND.w #$000F : CMP.w #$0002 : !BGE .unlock ; if we rescued zelda, skip
 			JSR.w LockAgahnimDoorsCore : RTL
 	+ : CMP.w #$0002 : BNE +
 		JSR.w LockAgahnimDoorsCore : BEQ .unlock
 		PHX : PHY
 		SEP #$30
-		JSL.l CheckTowerOpen
+		JSL.l CheckEnoughCrystalsForTower
 		REP #$30
 		PLY : PLX
 		!BGE .crystalOrUnlock
-		LDA.w #$0001 : RTL
+		LDA #$0001 : RTL
 		.crystalOrUnlock
-		LDA.l InvertedMode : AND.w #$00FF : BEQ .unlock
+		LDA SwapAgaGanonsTower : AND.w #$00FF : BEQ .unlock
 
-		LDA.l OverworldEventDataWRAM+$43 : AND.w #$0020 : BNE .unlock ; Check if GT overlay is already on or not
-		LDA.w AButtonAct : AND.w #$0080 : BEQ ++ ;If we are holding an item
+		LDA OverworldEventDataWRAM+$43 : AND.w #$0020 : BNE .unlock ; Check if GT overlay is already on or not
+		LDA $0308 : AND.w #$0080 : BEQ ++ ;If we are holding an item
 
 	.locked
-			LDA.w #$0001 : RTL ;Keep the door locked
+			LDA #$0001 : RTL ;Keep the door locked
 		++
 		SEP #$30
-		JSL $899B6F ;Add tower break seal
+		JSL $099B6F ;Add tower break seal
 		REP #$30
-		LDA.w #$0001 ;Prevent door from opening that frame otherwise it glitchy
+		LDA #$0001 ;Prevent door from opening that frame otherwise it glitchy
 		RTL
 
 	+
@@ -42,20 +42,20 @@ LockAgahnimDoors:
 RTL
 ;---------------------------------------------------------------------------------
 FlagAgahnimDoor:
-	LDA.l InvertedMode : BEQ .vanilla
+	LDA.l SwapAgaGanonsTower : BEQ .vanilla
 
-	LDA.l OverworldEventDataWRAM+$43 : ORA.b #$20 : STA.l OverworldEventDataWRAM+$43 ; activate GT overlay
+	LDA OverworldEventDataWRAM+$43 : ORA #$20 : STA OverworldEventDataWRAM+$43 ; activate GT overlay
 
 .vanilla
-	LDA.b #$28 : STA.b ScrapBuffer72
+	LDA.b #$28 : STA.b $72
 	RTL
 
 
 ;--------------------------------------------------------------------------------
 LockAgahnimDoorsCore:
-	LDA.b LinkPosX : CMP.w #1992 : !BLT + ; door too far left, skip
+	LDA $22 : CMP.w #1992 : !BLT + ; door too far left, skip
 			  CMP.w #2088 : !BGE + ; door too rat right, skip
-	LDA.b LinkPosY : CMP.w #1720 : !BGE + ; door too low, skip
+	LDA $20 : CMP.w #1720 : !BGE + ; door too low, skip
 		LDA.w #$0001
 RTS
 	+
@@ -77,56 +77,57 @@ JML.l Overworld_Entrance_BRANCH_RHO
 AllowStartFromSingleEntranceCave:
 ; 16 Bit A, 16 bit XY
 ; do not need to preserve A or X or Y
-	LDA.l StartingEntrance : AND.w #$00FF ; What we wrote over
+	LDA StartingEntrance : AND.w #$00FF ; What we wrote over
 	PHA
 		TAX
-		LDA.l StartingAreaExitOffset, X
-                AND.w #$00FF
+		LDA.l StartingAreaExitOffset, X : AND.w #$00FF
 
 		BNE +
 			JMP .done
 		+
+
 		DEC
-		STA.b Scrap00
-		ASL #2 : !ADD Scrap00 : ASL #2 ; mult by 20
+		STA $00
+		ASL #2 : !ADD $00 : ASL #2 ; mult by 20
 		TAX
 
-		LDA.w #$0016 : STA.l EN_MAINDESQ ; Cache the main screen designation
-		LDA.l StartingAreaExitTable+$05, X : STA.l EN_BG2VERT ; Cache BG1 V scroll
-		LDA.l StartingAreaExitTable+$07, X : STA.l EN_BG2HORZ ; Cache BG1 H scroll
-		LDA.l StartingAreaExitTable+$09, X : !ADD.w #$0010 : STA.l EN_POSY ; Cache Link's Y coordinate
-		LDA.l StartingAreaExitTable+$0B, X : STA.l EN_POSX ; Cache Link's X coordinate
-		LDA.l StartingAreaExitTable+$0D, X : STA.l EN_SCROLLATN ; Cache Camera Y coord lower bound.
-		LDA.l StartingAreaExitTable+$0F, X : STA.l EN_SCROLLATW ; Cache Camera X coord lower bound.
-		LDA.l StartingAreaExitTable+$03, X : STA.l EN_OWTMAPI ; Cache Link VRAM Location
+		LDA #$0016 : STA $7EC142 ; Cache the main screen designation
+		LDA.l StartingAreaExitTable+$05, X : STA $7EC144 ; Cache BG1 V scroll
+		LDA.l StartingAreaExitTable+$07, X : STA $7EC146 ; Cache BG1 H scroll
+		LDA.l StartingAreaExitTable+$09, X : !ADD.w #$0010 : STA $7EC148 ; Cache Link's Y coordinate
+		LDA.l StartingAreaExitTable+$0B, X : STA $7EC14A ; Cache Link's X coordinate
+		LDA.l StartingAreaExitTable+$0D, X : STA $7EC150 ; Cache Camera Y coord lower bound.
+		LDA.l StartingAreaExitTable+$0F, X : STA $7EC152 ; Cache Camera X coord lower bound.
+		LDA.l StartingAreaExitTable+$03, X : STA $7EC14E ; Cache Link VRAM Location
 
 		; Handle the 2 "unknown" bytes, which control what area of the backgound
 		; relative to the camera? gets loaded with new tile data as the player moves around
 		; (because some overworld areas like Kak are too big for a single VRAM tilemap)
 
 		LDA.l StartingAreaExitTable+$11, X : AND.w #$00FF
-		BIT.w #$0080 : BEQ + : ORA.w #$FF00 : + ; Sign extend
-		STA.l EN_SCRMODYA
+		BIT.w #$0080 : BEQ + : ORA #$FF00 : + ; Sign extend
+		STA.l $7EC16A
 
 		LDA.l StartingAreaExitTable+$12, X  : AND.w #$00FF
-		BIT.w #$0080 : BEQ + : ORA.w #$FF00 : + ; Sign extend
-		STA.l EN_SCRMODXA
+		BIT.w #$0080 : BEQ + : ORA #$FF00 : + ; Sign extend
+		STA.l $7EC16E
 
-		LDA.w #$0000 : !SUB.l EN_SCRMODYA : STA.l EN_SCRMODYB
-		LDA.w #$0000 : !SUB.l EN_SCRMODXA : STA.l EN_SCRMODXB
+		LDA.w #$0000 : !SUB.l $7EC16A : STA $7EC16C
+		LDA.w #$0000 : !SUB.l $7EC16E : STA $7EC170
 
 		LDA.l StartingAreaExitTable+$02, X : AND.w #$00FF
-		STA.l EN_OWSCR ; Cache the overworld area number
-		STA.l EN_OWSCR2 ; Cache the aux overworld area number
+		STA $7EC14C ; Cache the overworld area number
+		STA $7EC140 ; Cache the aux overworld area number
 
-		STZ.w TileMapTile32 ;zero out door overlays in case starting overworld door is not set
-		STZ.w TileMapTile32+1 ;zero out door overlays in case starting overworld door is not set
+		STZ $0698 ;zero out door overlays in case starting overworld door is not set
+		STZ $0699 ;zero out door overlays in case starting overworld door is not set
 
 		SEP #$20 ; set 8-bit accumulator
-		LDA.l StartingEntrance : TAX
-		LDA.l StartingAreaOverworldDoor, X : STA.l PreviousOverworldDoor ;Load overworld door
+		LDA StartingEntrance : TAX
+		LDA.l StartingAreaOverworldDoor, X : STA.l $7F5099 ;Load overworld door
+
 		REP #$20 ; reset 16-bit accumulator
-                JSL.l CacheDoorFrameData
+		JSL.l CacheDoorFrameData
 
 		.done
 	PLA
@@ -134,7 +135,7 @@ RTL
 ;--------------------------------------------------------------------------------
 AllowStartFromExit:
 
-	LDX.w MessageCursor
+	LDX $1CE8
 	LDA.l ShouldStartatExit, X : BNE .doStart
 
 	LDA.l StartingEntrance ; what we wrote over
@@ -142,42 +143,42 @@ JML.l AllowStartFromExitReturn
 
 	.doStart
 
-	LDA.l $828481, X ;Module_LocationMenu_starting_points
+	LDA.l $028481, X ;Module_LocationMenu_starting_points
 	ASL : TAX
 
-	LDA.l $82D8D2, X : STA.b RoomIndex
-	LDA.l $82D8D3, X : STA.b RoomIndex+1
+	LDA.l $02D8D2, X : STA $A0
+	LDA.l $02D8D3, X : STA $A1
 
 	; Go to pre-overworld mode
-	LDA.b #$08 : STA.b GameMode
+	LDA.b #$08 : STA $10
 
-	STZ.b GameSubMode
-	STZ.b SubSubModule
-	STZ.w DeathReloadFlag
-	STZ.w RespawnFlag
-        INC.w UpdateHUDFlag
+	STZ $11
+	STZ $B0
 
+	STZ $010A
+
+	STZ $04AA
 	JSL Equipment_SearchForEquippedItemLong
 	JSL HUD_RebuildLong2
-	JSL Equipment_UpdateEquippedItemLong
+	JSL $0DDD32 ; Equipment_UpdateEquippedItemLong
 RTL
 
 ;--------------------------------------------------------------------------------
 CheckHole:
 	LDX.w #$0024
 	.nextHoleClassic
-		LDA.b Scrap00   : CMP.l $9BB800, X
+		LDA.b $00   : CMP.l $1BB800, X
 		BNE .wrongMap16Classic
-		LDA.b OverworldIndex : CMP.l $9BB826, X
+		LDA.w $040A : CMP.l $1BB826, X
 		BEQ .matchedHoleClassic
 	.wrongMap16Classic
 		DEX #2 : BPL .nextHoleClassic
 
 	LDX.w #$001E
 	.nextHoleExtra
-		LDA.b Scrap00   : CMP.l ExtraHole_Map16, X
+		LDA.b $00   : CMP.l ExtraHole_Map16, X
 		BNE .wrongMap16Extra
-		LDA.b OverworldIndex : CMP.l ExtraHole_Area, X
+		LDA.w $040A : CMP.l ExtraHole_Area, X
 		BEQ .matchedHoleExtra
 	.wrongMap16Extra
 		DEX #2 : BPL .nextHoleExtra
@@ -188,14 +189,14 @@ CheckHole:
 	.matchedHoleExtra
 		SEP #$30
 		TXA : LSR A : TAX
-		LDA.l ExtraHole_Entrance, X : STA.w EntranceIndex : STZ.w EntranceIndex+1
+		LDA.l ExtraHole_Entrance, X : STA.w $010E : STZ.w $010F
 JML Overworld_Hole_End
 ;--------------------------------------------------------------------------------
 PreventEnterOnBonk:
-	STA.b Scrap00 ; part of what we wrote over
-	LDA.l InvertedMode : AND.w #$00FF : BEQ .done
-	LDA.b LinkState : AND.w #$00FF : CMP.w #$0014 : BNE .done ;in mirror mode?
-	LDA.b OverworldIndex : AND.w #$0040 : CMP.b WorldCache : BEQ .done ; Are we bonking, or doing the superbunny glitch?
+	STA $00 ; part of what we wrote over
+	LDA.b $8A : TAX : LDA.l OWTileMapAlt, X : AND.w #$0001 : BEQ .done
+	LDA.l $5D : AND.w #$00FF : CMP.w #$0014 : BNE .done ;in mirror mode?
+	LDA.b $8A : TAX : LDA.l OWTileWorldAssoc, X : AND.w #$00FF : CMP $7B : BEQ .done ; Are we bonking, or doing the superbunny glitch?
 
 		; If in inverted, are in mirror mode, and are bonking then do not enter
 		JML.l PreventEnterOnBonk_BRANCH_IX
@@ -205,24 +206,25 @@ PreventEnterOnBonk:
 JML.l PreventEnterOnBonk_return
 ;--------------------------------------------------------------------------------
 TurtleRockEntranceFix:
-	LDA.l TurtleRockAutoOpenFix : BEQ .done
-	LDA.b OverworldIndex : CMP.b #$47 : BNE .done
+	LDA TurtleRockAutoOpenFix : BEQ .done
+	LDA $8A : CMP.b #$47 : BNE .done
 		;If exiting to turtle rock ensure the entrance is open
 		LDA.l OverworldEventDataWRAM+$47 : ORA.b #$20 : STA.l OverworldEventDataWRAM+$47
 .done
 RTL
 ;--------------------------------------------------------------------------------
 AnimatedEntranceFix: ;when an entrance animation tries to start
-	PHA
+	PHA : PHX
 	LDA.l InvertedMode : BEQ + ;If we are in inverted mode
-	LDA.b OverworldIndex : AND.b #$40 : BNE + ;and in the light world
-		PLA
-		STZ.w OWEntranceCutscene ; skip it.
-		LDA.b #$00
+		LDA.l OWMode+1 : AND.b #!FLAG_OW_MIXED : BNE + ;If we are in Mixed OW shuffle mode
+	LDA $8A : AND #$40 : BNE + ;and in the light world
+		PLX : PLA
+		STZ $04C6 ; skip it.
+		LDA #$00
 		RTL
 	+
-	PLA
-	STA.w CutsceneFlag ;what we wrote over
-	STA.w FreezeSprites ;what we wrote over
-	STA.w SkipOAM ;what we wrote over
+	PLX : PLA
+	STA $02E4 ;what we wrote over
+	STA $0FC1 ;what we wrote over
+	STA $0710 ;what we wrote over
 RTL

events.asm

@@ -1,18 +1,21 @@
+;--------------------------------------------------------------------------------
+; OnLoadOW
+;--------------------------------------------------------------------------------
+;OnLoadMap:
+;	LDA OverworldEventDataWRAM+$5B ; thing we wrote over
+;RTL
+;--------------------------------------------------------------------------------
 OnPrepFileSelect:
-        LDA.b GameSubMode : CMP.b #$03 : BNE +
-                LDA.b #$06 : STA.b NMISTRIPES ; thing we wrote over
-                RTL
-        +
-        PHA : PHX
-        REP #$10
-        JSL.l LoadAlphabetTilemap
-        JSL.l LoadFullItemTiles
-        SEP #$10
-        PLX : PLA
-RTL
+	LDA $11 : CMP.b #$03 : BNE +
+		LDA.b #$06 : STA $14 ; thing we wrote over
+		RTL
+	+
+	JSL.l LoadAlphabetTilemap
+	JML.l LoadFullItemTiles
 ;--------------------------------------------------------------------------------
 OnDrawHud:
 	JSL.l DrawChallengeTimer ; this has to come before NewDrawHud because the timer overwrites the compass counter
+	JSL.l DrHudOverride
 	JSL.l NewDrawHud
 	JSL.l SwapSpriteIfNecessary
 	JSL.l CuccoStorm
@@ -20,13 +23,8 @@ OnDrawHud:
 JML.l ReturnFromOnDrawHud
 ;--------------------------------------------------------------------------------
 OnDungeonEntrance:
-	STA.l PegColor ; thing we wrote over
-        JSL MaybeFlagDungeonTotalsEntrance
-        INC.w UpdateHUDFlag
-RTL
-;--------------------------------------------------------------------------------
-OnDungeonBossExit:
-        JSL.l StatTransitionCounter
+	STA $7EC172 ; thing we wrote over
+        JSL MaybeFlagCompassTotalEntrance
 RTL
 ;--------------------------------------------------------------------------------
 OnPlayerDead:
@@ -38,123 +36,110 @@ OnPlayerDead:
 RTL
 ;--------------------------------------------------------------------------------
 OnDungeonExit:
-        PHA : PHP
-        SEP #$20 ; set 8-bit accumulator
-        JSL.l SQEGFix
-        PLP : PLA
+	PHA : PHP
+		SEP #$20 ; set 8-bit accumulator
+		JSL.l SQEGFix
+	PLP : PLA
 
-        STA.w DungeonID : STZ.w Map16ChangeIndex ; thing we wrote over
+	STA $040C : STZ $04AC ; thing we wrote over
 
-        PHA : PHP
-        INC.w UpdateHUDFlag
-        JSL.l HUD_RebuildLong
-        JSL.l FloodGateResetInner
-        JSL.l SetSilverBowMode
-        PLP : PLA
+	PHA : PHP
+		JSL.l HUD_RebuildLong
+		JSL.l FloodGateResetInner
+		JSL.l SetSilverBowMode
+	PLP : PLA
 RTL
 ;--------------------------------------------------------------------------------
 OnQuit:
 	JSL.l SQEGFix
-	LDA.b #$00 : STA.l AltTextFlag ; bandaid patch bug with mirroring away from text
-	LDA.b #$10 : STA.b MAINDESQ ; thing we wrote over
+	LDA.b #$00 : STA $7F5035 ; bandaid patch bug with mirroring away from text
+	LDA.b #$10 : STA $1C ; thing we wrote over
 RTL
 ;--------------------------------------------------------------------------------
 OnUncleItemGet:
 	PHA
+		LDA.l EscapeAssist
+		BIT.b #$04 : BEQ + : STA InfiniteMagicModifier : +
+		BIT.b #$02 : BEQ + : STA InfiniteBombsModifier : +
+		BIT.b #$01 : BEQ + : STA InfiniteArrowsModifier : +
 
-	LDA.l EscapeAssist
-	BIT.b #$04 : BEQ + : STA.l InfiniteMagic : +
-	BIT.b #$02 : BEQ + : STA.l InfiniteBombs : +
-	BIT.b #$01 : BEQ + : STA.l InfiniteArrows : +
-
+		LDA UncleItem_Player : STA !MULTIWORLD_ITEM_PLAYER_ID
 	PLA
 	JSL.l Link_ReceiveItem
 
 	LDA.l UncleRefill : BIT.b #$04 : BEQ + : LDA.b #$80 : STA.l MagicFiller : + ; refill magic
 	LDA.l UncleRefill : BIT.b #$02 : BEQ + : LDA.b #50 : STA.l BombsFiller : + ; refill bombs
 	LDA.l UncleRefill : BIT.b #$01 : BEQ + ; refill arrows
-		LDA.b #70 : STA.l ArrowsFiller
+	LDA.b #70 : STA.l ArrowsFiller
 
-		LDA.l ArrowMode : BEQ +
-			LDA.l BowTracking : ORA.b #$80 : STA.l BowTracking ; enable bow toggle
-			REP #$20 ; set 16-bit accumulator
-			LDA.l CurrentRupees : !ADD.l FreeUncleItemAmount : STA.l CurrentRupees ; rupee arrows, so also give the player some money to start
-			SEP #$20 ; set 8-bit accumulator
+	LDA.l ArrowMode : BEQ +
+		LDA.l BowTracking : ORA #$80 : STA.l BowTracking ; enable bow toggle
+		REP #$20 ; set 16-bit accumulator
+		LDA.l CurrentRupees : !ADD.l FreeUncleItemAmount : STA.l CurrentRupees ; rupee arrows, so also give the player some money to start
+		SEP #$20 ; set 8-bit accumulator
+	+
+	LDA.l ProgressIndicator : BNE +
+		LDA.b #$01 : STA.l ProgressIndicator ; handle rain state
 	+
-        LDA.l ProgressIndicator : BNE +
-                LDA.b #$01 : STA.l ProgressIndicator ; handle rain state
-        +
-RTL
-;--------------------------------------------------------------------------------
-OnAga1Defeated:
-        STA.l ProgressIndicator ; vanilla game state stuff we overwrote
-        LDA.l GanonVulnerableMode
-        CMP.b #$06 : BNE +
-                .light_speed
-                REP #$20
-                LDA.w #$0019 : STA.b GameMode
-                SEP #$20
-        +
-        LDA.b #$08 : CMP.w DungeonID : BNE +
-                ORA.l DungeonsCompleted+1 : STA.l DungeonsCompleted+1
-        +
-.exit
 RTL
 ;--------------------------------------------------------------------------------
 OnAga2Defeated:
-        JSL.l Dungeon_SaveRoomData_justKeys ; thing we wrote over, make sure this is first
-        LDA.b #$01 : STA.l Aga2Duck
-        LDA.w DungeonID : CMP.b #$1A : BNE +
-                LDA.l DungeonsCompleted : ORA.b #$04 : STA.l DungeonsCompleted
-        +
-        LDA.b #$FF : STA.w DungeonID
-        JML.l IncrementAgahnim2Sword
+	JSL.l Dungeon_SaveRoomData_justKeys ; thing we wrote over, make sure this is first
+	LDA.b #$01 : STA.l Aga2Duck
+	JML.l IncrementAgahnim2Sword
 ;--------------------------------------------------------------------------------
 OnFileCreation:
-        PHB
-        LDA.w #$03D7
-        LDX.w #$B000
-        LDY.w #$0000
-        MVN CartridgeSRAM>>16, InitSRAMTable>>16
-        ; Skip file name and validity value
-        LDA.w #$010C
-        LDX.w #$B3E3
-        LDY.w #$03E3
-        MVN CartridgeSRAM>>16, InitSRAMTable>>16 
-        PLB
+	; Copy initial SRAM state from ROM to cart SRAM
+	PHB
+	LDA.w #$03D7 ; \
+	LDX.w #$B000 ;  | Copies from beginning of inital sram table up to file name
+	LDY.w #$0000 ;  | (exclusively)
+	MVN $70, $30 ; /
+	             ; Skip file name and validity value
+	LDA.w #$010C ; \
+	LDX.w #$B3E3 ;  | Rando-Specific Assignments & Game Stats block
+	LDY.w #$03E3 ;  |
+	MVN $70, $30 ; /
+	PLB
 
-        ; Resolve instant post-aga if standard
-        SEP #$20
-        LDA.l InitProgressIndicator : BIT #$80 : BEQ +
-                LDA.b #$00 : STA.l ProgressIndicatorSRAM  ; set post-aga after zelda rescue
-                LDA.b #$00 : STA.l OverworldEventDataSRAM+$02 ; keep rain state vanilla
-        +
-        REP #$20
+	; resolve instant post-aga if standard
+	SEP #$20
+	LDA.l InitProgressIndicator : BIT #$80 : BEQ +
+		LDA.b #$00 : STA.l ProgressIndicatorSRAM  ; set post-aga after zelda rescue
+		LDA.b #$00 : STA.l OverworldEventDataSRAM+$02 ; keep rain state vanilla
+	+
+	REP #$20
 
-        ; Set validity value and do some cleanup. Jump to checksum done.
-        LDA.w #$55AA : STA.l FileValiditySRAM
-        JSL.l WriteSaveChecksumAndBackup
-        STZ.b Scrap00
-        STZ.b Scrap01
+	; Set validity value and do some cleanup. Jump to checksum.
+	LDA.w #$55AA : STA.l $7003E1
+	STZ $00
+	STZ $01
+	LDX.b $00
+	LDY.w #$0000
+	TYA
 
-JML.l InitializeSaveFile_checksum_done
+JML.l InitializeSaveFile_build_checksum
 ;--------------------------------------------------------------------------------
+!RNG_ITEM_LOCK_IN = "$7F5090"
 OnFileLoad:
 	REP #$10 ; set 16 bit index registers
 	JSL.l EnableForceBlank ; what we wrote over
+	REP #$20 : LDA.l $30F010 : STA.l MultiClientFlagsWRAM+1 : SEP #$20
+	LDA MultiClientFlagsROM : STA.l MultiClientFlagsWRAM
 
-	LDA.b #$07 : STA.w BG34NBA ; Restore screen 3 to normal tile area
+	LDA.b #$07 : STA $210C ; Restore screen 3 to normal tile area
 
 	LDA.l FileMarker : BNE +
 		JSL.l OnNewFile
 		LDA.b #$FF : STA.l FileMarker
 	+
-	LDA.w DeathReloadFlag : BNE + ; don't adjust the worlds for "continue" or "save-continue"
-	LDA.l MosaicLevel : BNE + ; don't adjust worlds if mosiac is enabled (Read: mirroring in dungeon)
+	LDA.w $010A : BNE + ; don't adjust the worlds for "continue" or "save-continue"
+	LDA.l $7EC011 : BNE + ; don't adjust worlds if mosiac is enabled (Read: mirroring in dungeon)
 		JSL.l DoWorldFix
 	+
 	JSL.l MasterSwordFollowerClear
-	LDA.b #$FF : STA.l RNGLockIn ; reset rng item lock-in
+	LDA.b #$FF : STA !RNG_ITEM_LOCK_IN ; reset rng item lock-in
+	LDA.b #$00 : STA $7F5001 ; mark fake flipper softlock as impossible
 	LDA.l GenericKeys : BEQ +
 		LDA.l CurrentGenericKeys : STA.l CurrentSmallKeys ; copy generic keys to key counter
 	+
@@ -169,128 +154,117 @@ OnFileLoad:
 	SEP #$10 ; restore 8 bit index registers
 RTL
 ;--------------------------------------------------------------------------------
+!RNG_ITEM_LOCK_IN = "$7F5090"
 OnNewFile:
 	PHX : PHP
 		; reset some values on new file that are otherwise only reset on hard reset
 		SEP #$20 ; set 8-bit accumulator
-		STZ.w AncillaSearch
-		STZ.w LayerAdjustment ; EG
-		STZ.w ArcVariable : STZ.w ArcVariable+1
-		STZ.w TreePullKills
-		STZ.w TreePullHits
-		STZ.w PrizePackIndexes
-                STZ.w PrizePackIndexes+1
-                STZ.w PrizePackIndexes+2
-                STZ.w PrizePackIndexes+3
-                STZ.w PrizePackIndexes+4
-                STZ.w PrizePackIndexes+5
-                STZ.w PrizePackIndexes+6
-		LDA.b #$00 : STA.l MosaicLevel
-		JSL InitRNGPointerTable
+		STZ $03C4 ; ancilla slot index
+		STZ $047A ; EG
+		STZ $0B08 : STZ $0B09 ; arc variable
+		STZ $0CFB ; enemies killed (pull trees)
+		STZ $0CFC ; times taken damage (pull trees)
+		STZ $0FC7 : STZ $0FC8 : STZ $0FC9 : STZ $0FCA : STZ $0FCB : STZ $0FCC : STZ $0FCD ; prize packs
+		LDA #$00 : STA $7EC011 ; mosaic
+		JSL InitRNGPointerTable ; boss RNG
 	PLP : PLX
 RTL
 ;--------------------------------------------------------------------------------
 OnInitFileSelect:
-	LDA.b #$51 : STA.w $0AA2 ;<-- Line missing from JP1.0, needed to ensure "extra" copy of naming screen graphics are loaded.
+	; LDA.b #$10 : STA $BC ; init sprite pointer - does nothing unless spriteswap.asm is included
+	; JSL.l SpriteSwap_SetSprite
+	LDA.b #$51 : STA $0AA2 ;<-- Line missing from JP1.0, needed to ensure "extra" copy of naming screen graphics are loaded.
 	JSL.l EnableForceBlank
 RTL
 ;--------------------------------------------------------------------------------
 OnLinkDamaged:
 	JSL.l IncrementDamageTakenCounter_Arb
+	;JSL.l FlipperKill
 	JML.l OHKOTimer
+
 ;--------------------------------------------------------------------------------
-;OnEnterWater:
-;       JSL.l UnequipCapeQuiet ; what we wrote over
-;RTL
+OnEnterWater:
+	JSL.l RegisterWaterEntryScreen
+
+	JSL.l MysteryWaterFunction
+	LDX.b #$04
+RTL
 ;--------------------------------------------------------------------------------
 OnLinkDamagedFromPit:
 	JSL.l OHKOTimer
 
 	LDA.l AllowAccidentalMajorGlitch
 	BEQ ++
---	LDA.b #$14 : STA.b GameSubMode ; thing we wrote over
+--	LDA.b #$14 : STA $11 ; thing we wrote over
 
 	RTL
 
-++	LDA.b GameMode : CMP.b #$12 : BNE --
+++	LDA.b $10 : CMP.b #$12 : BNE --
 
-	STZ.b GameSubMode
+	STZ.b $11
 	RTL
 ;--------------------------------------------------------------------------------
 OnLinkDamagedFromPitOutdoors:
 	JML.l OHKOTimer ; make sure this is last
+
 ;--------------------------------------------------------------------------------
+!RNG_ITEM_LOCK_IN = "$7F5090"
 OnOWTransition:
-        JSL.l FloodGateReset
-        JSL.l StatTransitionCounter
-        PHP
-        SEP #$20 ; set 8-bit accumulator
-        LDA.b #$FF : STA.l RNGLockIn ; clear lock-in
-        INC.w UpdateHUDFlag
-        PLP
+	JSL.l FloodGateReset
+	JSL.l FlipperFlag
+	JSL.l StatTransitionCounter
+	PHP
+	SEP #$20 ; set 8-bit accumulator
+	LDA.b #$FF : STA !RNG_ITEM_LOCK_IN ; clear lock-in
+	PLP
 RTL
 ;--------------------------------------------------------------------------------
+!DARK_DUCK_TEMP = "$7F509C"
 OnLoadDuckMap:
-	LDA.l DuckMapFlag
+	LDA !DARK_DUCK_TEMP
 	BNE +
-		INC : STA.l DuckMapFlag
-		JSL OverworldMap_InitGfx : DEC.w SubModuleInterface
+		INC : STA !DARK_DUCK_TEMP
+		JSL OverworldMap_InitGfx : DEC $0200
+
 		RTL
 	+
-	LDA.b #$00 : STA.l DuckMapFlag
+	LDA.b #$00 : STA !DARK_DUCK_TEMP
 	JML OverworldMap_DarkWorldTilemap
+
 ;--------------------------------------------------------------------------------
 PreItemGet:
-	LDA.b #$01 : STA.l BusyItem ; mark item as busy
+	LDA.b #$01 : STA !ITEM_BUSY ; mark item as busy
 RTL
 ;--------------------------------------------------------------------------------
 PostItemGet:
-        STZ.w ShopPurchaseFlag
-        LDA.w ItemReceiptMethod : CMP.b #$01 : BEQ +
-                LDX.w CurrentSpriteSlot
-                STZ.w SpriteMetaData,X
-        +
+
 RTL
 ;--------------------------------------------------------------------------------
 PostItemAnimation:
-        PHB
-        LDA.b #$00 : STA.l BusyItem ; mark item as finished
-        LDA.l TextBoxDefer : BEQ +
-                STZ.w TextID : STZ.w TextID+1 ; reset decompression buffer
-                JSL.l Main_ShowTextMessage_Alt
-                LDA.b #$00 : STA.l TextBoxDefer
-        +
-        LDA.w ItemReceiptMethod : CMP.b #$01 : BNE +
-                LDA.b LinkDirection : BEQ +
-                        JSL.l IncrementChestTurnCounter
-        +
-        REP #$20
-        PEA.w $7E00
-        PLB : PLB
-        LDA.w TransparencyFlag : BNE .SP05
-                LDA.l PalettesCustom_off_black+$00 : STA.w PaletteBuffer+$0170 : STA.w PaletteBufferAux+$0170
-                LDA.l PalettesCustom_off_black+$02 : STA.w PaletteBuffer+$0172 : STA.w PaletteBufferAux+$0172
-                STA.w PaletteBuffer+$0174 : STA.w PaletteBufferAux+$0174
-                STA.w PaletteBuffer+$0176 : STA.w PaletteBufferAux+$0176
-                STA.w PaletteBuffer+$0178 : STA.w PaletteBufferAux+$0178
-                STA.w PaletteBuffer+$017A : STA.w PaletteBufferAux+$017A
-                STA.w PaletteBuffer+$017C : STA.w PaletteBufferAux+$017C
-                STA.w PaletteBuffer+$017E : STA.w PaletteBufferAux+$017E
-                BRA .done
-        .SP05
-        LDA.l PalettesCustom_off_black+$00 : STA.w PaletteBuffer+$01B0 : STA.w PaletteBufferAux+$01B0
-        LDA.l PalettesCustom_off_black+$02 : STA.w PaletteBuffer+$01B2 : STA.w PaletteBufferAux+$01B2
-        STA.w PaletteBuffer+$01B4 : STA.w PaletteBufferAux+$01B4
-        STA.w PaletteBuffer+$01B6 : STA.w PaletteBufferAux+$01B6
-        STA.w PaletteBuffer+$01B8 : STA.w PaletteBufferAux+$01B8
-        STA.w PaletteBuffer+$01BA : STA.w PaletteBufferAux+$01BA
-        STA.w PaletteBuffer+$01BC : STA.w PaletteBufferAux+$01BC
-        STA.w PaletteBuffer+$01BE : STA.w PaletteBufferAux+$01BE
-        .done
-        INC.b NMICGRAM
-        SEP #$20
+	LDA.b #$00 : STA !ITEM_BUSY ; mark item as finished
 
-        STZ.w ItemReceiptMethod : LDA.w AncillaGet, X ; thing we wrote over to get here
-        PLB
-RTL
+	LDA $7F509F : BEQ +
+		STZ $1CF0 : STZ $1CF1 ; reset decompression buffer
+		JSL.l Main_ShowTextMessage_Alt
+		LDA.b #$00 : STA $7F509F
+	+
+
+	LDA $1B : BEQ +
+		REP #$20 : LDA $A0 : STA !MULTIWORLD_ROOMID : SEP #$20
+		LDA $0403 : STA !MULTIWORLD_ROOMDATA
+	+
+
+	LDA.w $02E9 : CMP.b #$01 : BNE +
+		LDA.b $2F : BEQ +
+			JSL.l IncrementChestTurnCounter
+	+
+
+	LDA !MULTIWORLD_ITEM_PLAYER_ID : BEQ +
+		STZ $02E9
+		LDA #$00 : STA !MULTIWORLD_ITEM_PLAYER_ID
+		JML.l Ancilla_ReceiveItem_objectFinished
+	+
+
+	STZ $02E9 : LDA $0C5E, X ; thing we wrote over to get here
+	JML.l Ancilla_ReceiveItem_optimus+6
 ;--------------------------------------------------------------------------------