From 278e4286581263ace61d96d9bd09d2488e8906d1 Mon Sep 17 00:00:00 2001
From: Kara Alexandra <ardnaxelarak@gmail.com>
Date: Fri, 9 Jan 2026 13:45:00 -0600
Subject: [PATCH] First steps

---
 dungeon_map/blink_loot.asm             |  11 +
 dungeon_map/current_room_map.asm       | 397 +++++++++++++++++++++++++
 dungeon_map/data/doors_connections.asm |  22 ++
 dungeon_map/data/doors_display.asm     | 127 ++++++++
 dungeon_map/data/supertile_shapes.asm  |   4 +-
 dungeon_map/draw_rooms.asm             |   8 +-
 dungeon_map/dungeon_switch.asm         |  18 +-
 dungeon_map/hooks.asm                  |  58 +++-
 dungeon_map/main.asm                   |   2 +
 dungeon_map/map_bg3.asm                | 146 ++++++++-
 dungeon_map/settings.asm               |   7 +-
 menu/door_connectors.3bpp              | Bin 1536 -> 1536 bytes
 menu/door_connectors.3bppc             | Bin 792 -> 826 bytes
 menu/map_icons.3bpp                    | Bin 4608 -> 4608 bytes
 menu/map_icons_1.3bppc                 | Bin 650 -> 662 bytes
 menu/map_icons_4.3bppc                 | Bin 1050 -> 1042 bytes
 menu/map_icons_b.3bpp                  | Bin 4608 -> 4608 bytes
 ram.asm                                |   3 +
 18 files changed, 780 insertions(+), 23 deletions(-)
 create mode 100644 dungeon_map/current_room_map.asm
 create mode 100644 dungeon_map/data/doors_display.asm

diff --git a/dungeon_map/blink_loot.asm b/dungeon_map/blink_loot.asm
index db8f671..8df3f0f 100644
--- a/dungeon_map/blink_loot.asm
+++ b/dungeon_map/blink_loot.asm
@@ -20,6 +20,17 @@ BlinkLoot:
 
 StartDoubleWrite:
 	; what we wrote over
+	LDA.l DRMode
+	BEQ .draw
+	LDA.l DungeonMapMode
+	BNE .draw
+
+	INC.w $020D ; next subsubmode
+	PLA : PLA : PLA ; pull our jump to here off the stack
+	PLB
+	RTL
+
+.draw
 	REP #$30
 	STZ.w GFXStripes
 
diff --git a/dungeon_map/current_room_map.asm b/dungeon_map/current_room_map.asm
new file mode 100644
index 0000000..de4755f
--- /dev/null
+++ b/dungeon_map/current_room_map.asm
@@ -0,0 +1,397 @@
+!CenterTile = $036A
+!ConnectorPalette = $0800
+
+DrawWackyDoorRandoStuff:
+	JSL DrawBorder
+
+	LDA.b RoomIndex
+	AND.w #$00FF
+	STA.l CurrentDisplayedRoom
+	STA.b $CA
+	LDX.w #!CenterTile
+	JSL DrawFullRoomTile
+
+	; multiply room id by 24 to get index in doors table
+	LDA.l CurrentDisplayedRoom
+	TAX
+	LDA.l DoorOffset, X
+	AND.w #$00FF
+	STA.l DisplayedRoomDoorIndex
+	ASL A
+	CLC : ADC.l DisplayedRoomDoorIndex
+	ASL A : ASL A : ASL A
+	STA.l DisplayedRoomDoorIndex
+
+	JSL DrawConnectedRooms
+	RTL
+
+DrawFullRoomTile:
+	LDA.b $CA
+	PHX
+	ASL A
+	TAX
+	LDA.l SaveDataWRAM, X
+	STA.b $0E
+	PLX
+	PHY
+	JSL DrawDungeonMapRoom
+	PLY
+	RTL
+
+DrawConnectedRooms:
+	PHB : PHK : PLB
+	LDA.l DisplayedRoomDoorIndex
+	TAX
+	STZ.b $00
+
+.next_side
+	JSR DrawSide
+	INC.b $00
+	LDA.b $00
+	CMP.w #$0004
+	BCC .next_side
+
+	PLB
+	RTL
+
+print "DrawSide: ", pc
+; $00 - Side
+; $02 - Door position number on side
+; $04 - Target door position
+; $06 - Number of doors on side
+; $08 - Room Drawn Address
+; $0A - Door Index on side
+DrawSide:
+	STZ.b $06
+	LDY.w #$0002
+
+-
+	LDA.l DoorTable, X
+	AND.w #$00FF
+	CMP.w #$0003
+	BEQ +
+	INC.b $06
++	INX : INX
+	DEY
+	BPL -
+
+	LDY.b $06
+	LDA.w DoorsCurrentRoomOffsets_offsets, Y
+	AND.w #$00FF
+	STA.b $02
+
+	LDY.b $00
+	LDA.w DoorsCurrentRoomOffsets_index, Y
+	AND.w #$00FF
+	CLC : ADC.b $02
+	TAY
+
+	DEX #6
+	STZ.b $02
+	STZ.b $0A
+
+-
+	LDA.l DoorTable, X
+	AND.w #$00FF
+	CMP.w #$0003
+	BEQ +
+	JSR DrawSingleConnectedRoom
++
+	INX : INX
+	INC.b $02
+	LDA.b $02
+	CMP.w #$0003
+	BCC -
+
+	LDA.b $06
+	CMP.w #$0002
+	BEQ .two
+	BCS .three
+
+.other
+	RTS
+
+.two
+	PHX
+	JSR DrawDoubleConnector
+	PLX
+	RTS
+
+.three
+	PHX
+	JSR DrawTripleConnector
+	PLX
+	RTS
+
+DrawSingleConnectedRoom:
+	STA.b $CA
+	PHX
+	LDA.w DoorsCurrentRoomOffsets, Y
+	CLC : ADC.w #!CenterTile
+	STA.b $08
+	TAX
+	JSL DrawFullRoomTile
+	INY : INY
+	PLX
+
+	PHY
+
+	LDA.b $06
+	BEQ ++
+	CMP.w #$0001
+	BEQ .single
+
+	JSR GetWhichDoorPosition
+	STA.b $04
+	BRA .draw
+
+.single
+	LDA.b $02
+	ASL A
+	CLC : ADC.b $02
+	STA.b $04
+
+	JSR GetWhichDoorPosition
+	CLC : ADC.b $04
+	STA.b $04
+	ASL A
+	CLC : ADC.b $04
+	ASL A : ASL A
+	TAY
+
+.draw
+	LDA.b $00
+	BNE + : JSR DrawNorthConnectors : BRA ++ : +
+	DEC A : BNE + : JSR DrawWestConnectors : BRA ++ : +
+	DEC A : BNE + : JSR DrawSouthConnectors : BRA ++ : +
+	DEC A : BNE + : JSR DrawEastConnectors : BRA ++ : +
+++
+
+	PLY
+.done
+	INC.b $0A
+	RTS
+
+GetWhichDoorPosition:
+	LDA.l DoorTable, X
+	BMI .edge
+	AND.w #$0300
+	XBA
+	RTS
+
+.edge
+	AND.w #$0F00
+	XBA
+	PHX
+	PHA
+
+	LDA.b $00
+	BIT.w #$0001
+	BEQ .north_south
+
+.east_west
+	PLX
+	LDA.l EdgePositions_east_west, X
+	AND.w #$00FF
+	PLX
+	RTS
+
+.north_south
+	PLX
+	LDA.l EdgePositions_north_south, X
+	AND.w #$00FF
+	PLX
+	RTS
+
+macro Draw3x2Connector(offset, label)
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+0, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$00
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+2, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$02
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+4, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$04
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+6, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$40
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+8, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$42
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+10, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$44
+endmacro
+
+macro Draw2x3Connector(offset, label)
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+0, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$00
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+2, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$02
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+4, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$40
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+6, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$42
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+8, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$80
+	LDA.w SingleEdgeCurrentRoomConnectors_<label>+10, Y
+	EOR.w #!ConnectorPalette
+	STA.l $7F0000+!CenterTile+<offset>+$82
+endmacro
+
+macro Draw2TileConnector(offset1, offset2, flip, sublabel)
+	LDX.b $08
+	LDA.w DoorConnectionTiles_<sublabel>, Y
+	BEQ ?+
+	ORA.w #!ConnectorPalette
+	EOR.w #<flip>
+	STA.l $7F0000+<offset1>, X
+?+
+
+	LDA.w DoorConnectionTiles_<sublabel>+2, Y
+	BEQ ?+
+	ORA.w #!ConnectorPalette
+	EOR.w #<flip>
+	STA.l $7F0000+<offset2>, X
+?+
+endmacro
+
+GetConnectorIndex:
++	LDY.b $0A
+	LDA.b $06
+	CMP.w #$0002
+	BEQ +
+	INY : INY
++	LDA.w MultiConnectorMapping, Y
+	AND.w #$00FF
+	INC A
+	CLC : ADC.b $04 : ADC.b $04 : ADC.b $04
+	ASL A : ASL A
+	TAY
+	RTS
+
+DrawEastConnectors:
+	LDA.b $06 : DEC A
+	BNE +
+	%Draw3x2Connector($04, east)
+	RTS
+
++	JSR GetConnectorIndex
+	PHX
+	%Draw2TileConnector(-$02, $3E, $4000, horizontal)
+	PLX
+	RTS
+	RTS
+
+DrawWestConnectors:
+	LDA.b $06 : DEC A
+	BNE +
+	%Draw3x2Connector(-$06, west)
+	RTS
+
++	JSR GetConnectorIndex
+	PHX
+	%Draw2TileConnector($04, $44, $0000, horizontal)
+	PLX
+	RTS
+	RTS
+
+DrawNorthConnectors:
+	LDA.b $06 : DEC A
+	BNE +
+	%Draw2x3Connector(-$C0, north)
+	RTS
+
++	JSR GetConnectorIndex
+	PHX
+	%Draw2TileConnector($80, $82, $0000, vertical)
+	PLX
+	RTS
+
+DrawSouthConnectors:
+	LDA.b $06 : DEC A
+	BNE +
+	%Draw2x3Connector($80, south)
+	RTS
+
++	JSR GetConnectorIndex
+	PHX
+	%Draw2TileConnector(-$40, -$3E, $8000, vertical)
+	PLX
+	RTS
+
+DrawBorder:
+	LDA.w #$0F19
+	STA.l $7F01DE
+	LDA.w #$4F19
+	STA.l $7F01F8
+	LDA.w #$8F19
+	STA.l $7F051E
+	LDA.w #$CF19
+	STA.l $7F0538
+
+	LDX.w #$0016
+-
+	LDA.w #$0F1A
+	STA.l $7F01E0, X
+	LDA.w #$8F1A
+	STA.l $7F0520, X
+	DEX : DEX
+	BPL -
+
+	LDX.w #$02C0
+-
+	LDA.w #$0F1B
+	STA.l $7F021E, X
+	LDA.w #$4F1B
+	STA.l $7F0238, X
+	TXA
+	SEC : SBC.w #$0040
+	TAX
+	BPL -
+
+	RTL
+
+DrawDoubleConnector:
+	LDA.b $00
+	AND.w #$0001
+	TAY
+	LDA.w MultiConnectorTiles_increment, Y
+	AND.w #$00FF
+	STA.b $0C
+
+	LDA.b $00
+	ASL A
+	TAY
+	LDA.w MultiConnectorTiles_start_offset, Y
+	CLC : ADC.w #!CenterTile
+	TAX
+
+	LDY.b $00
+	LDA.w MultiConnectorTiles_direction_index, Y
+	AND.w #$00FF
+	TAY
+
+	LDA.w #$0003
+	STA.b $0E
+-
+	LDA.w MultiConnectorTiles, Y
+	ORA.w #!ConnectorPalette
+	STA.l $7F0000, X
+	TXA
+	CLC : ADC.b $0C
+	TAX
+	INY : INY
+	DEC.b $0E
+	BPL -
+
+	RTS
+
+DrawTripleConnector:
+	RTS
diff --git a/dungeon_map/data/doors_connections.asm b/dungeon_map/data/doors_connections.asm
index a2e41f9..60405c3 100644
--- a/dungeon_map/data/doors_connections.asm
+++ b/dungeon_map/data/doors_connections.asm
@@ -1,4 +1,5 @@
 DoorConnectionTiles:
+.vertical
 	dw $0000, $0000 ; $00
 	dw $01C0, $0000 ; $01 left -> left
 	dw $01D0, $01D1 ; $02 left -> middle
@@ -19,3 +20,24 @@ DoorConnectionTiles:
 	dw $81D0, $C1D2 ; $11 middle-right -> left-right
 	dw $01C1, $01C2 ; $12 middle-right -> middle-right
 	dw $41C2, $01C2 ; $13 triple -> triple
+.horizontal
+	dw $0300, $0300 ; $00
+	dw $01C4, $0300 ; $01 top -> top
+	dw $C1D5, $C1D4 ; $02 top -> middle
+	dw $81C7, $41C7 ; $03 top -> bottom
+	dw $81D4, $81D5 ; $04 middle -> top
+	dw $01C5, $41C5 ; $05 middle -> middle
+	dw $01D5, $01D4 ; $06 middle -> bottom
+	dw $C1C7, $01C7 ; $07 bottom -> top
+	dw $41D5, $41D4 ; $08 bottom -> middle
+	dw $0300, $01C4 ; $09 bottom -> bottom
+	dw $41C6, $41C5 ; $0A top-middle -> top-middle
+	dw $81D6, $81D4 ; $0B top-middle -> top-bottom
+	dw $41D7, $81D7 ; $0C top-middle -> middle-bottom
+	dw $01D6, $01D4 ; $0D top-bottom -> top-middle
+	dw $01C4, $01C4 ; $0E top-bottom -> top-bottom
+	dw $01D4, $41D6 ; $0F top-bottom -> middle-bottom
+	dw $C1D7, $01D7 ; $10 middle-bottom -> top-middle
+	dw $81D4, $C1D6 ; $11 middle-bottom -> top-bottom
+	dw $01C5, $01C6 ; $12 middle-bottom -> middle-bottom
+	dw $41C6, $01C6 ; $13 triple -> triple
diff --git a/dungeon_map/data/doors_display.asm b/dungeon_map/data/doors_display.asm
new file mode 100644
index 0000000..ffcd4f9
--- /dev/null
+++ b/dungeon_map/data/doors_display.asm
@@ -0,0 +1,127 @@
+DoorsCurrentRoomOffsets:
+.north
+..3
+	dw $FEBA, $FEC0, $FEC6
+..2
+	dw $FEBC, $FEC4
+..1
+	dw $FEC0
+.west
+..3
+	dw $FF36, $FFF6, $00B6
+..2
+	dw $FF76, $0076
+..1
+	dw $FFF6
+.south
+..3
+	dw $013A, $0140, $0146
+..2
+	dw $013C, $0144
+..1
+	dw $0140
+.east
+..3
+	dw $FF4A, $000A, $00CA
+..2
+	dw $FF8A, $008A
+..1
+	dw $000A
+.index
+	db $00, $0C, $18, $24
+.offsets
+	db $00, $0A, $06, $00
+
+SingleEdgeCurrentRoomConnectors:
+.north
+	dw $01C0, $0300, $01C0, $0300, $01C0, $0300 ; left -> left
+	dw $01C1, $41C1, $81D0, $81D1, $01C0, $0300 ; left -> middle
+	dw $41D1, $41D0, $01C1, $41C1, $81D0, $81D1 ; left -> right
+	dw $01C0, $0300, $01D0, $01D1, $01C1, $41C1 ; middle -> left
+	dw $01C1, $41C1, $01C1, $41C1, $01C1, $41C1 ; middle -> middle
+	dw $0300, $01C0, $41D1, $41D0, $01C1, $41C1 ; middle -> right
+	dw $01D0, $01D1, $01C1, $41C1, $C1D1, $C1D0 ; right -> left
+	dw $01C1, $41C1, $C1D1, $C1D0, $0300, $01C0 ; right -> middle
+	dw $0300, $01C0, $0300, $01C0, $0300, $01C0 ; right -> right
+.west
+	dw $01C4, $01C4, $01C4, $0300, $0300, $0300 ; top -> top
+	dw $01C5, $81D4, $01C4, $C1C5, $81D5, $0300 ; top -> middle
+	dw $41D5, $01C5, $81D4, $41D4, $C1C5, $81D5 ; top -> bottom
+	dw $01C4, $C1D4, $01C5, $0300, $C1D5, $C1C5 ; middle -> top
+	dw $01C5, $01C5, $01C5, $C1C5, $C1C5, $C1C5 ; middle -> middle
+	dw $0300, $41D5, $01C5, $01C4, $41D4, $C1C5 ; middle -> bottom
+	dw $C1D4, $01C5, $01D5, $C1D5, $C1C5, $01D4 ; bottom -> top
+	dw $01C5, $01D5, $0300, $C1C5, $01D4, $01C4 ; bottom -> middle
+	dw $0300, $0300, $0300, $01C4, $01C4, $01C4 ; bottom -> bottom
+.south
+	dw $01C0, $0300, $01C0, $0300, $01C0, $0300 ; left -> left
+	dw $01C0, $0300, $01D0, $01D1, $01C1, $41C1 ; left -> middle
+	dw $01D0, $01D1, $01C1, $41C1, $C1D1, $C1D0 ; left -> right
+	dw $01C1, $41C1, $81D0, $81D1, $01C0, $0300 ; middle -> left
+	dw $01C1, $41C1, $01C1, $41C1, $01C1, $41C1 ; middle -> middle
+	dw $01C1, $41C1, $C1D1, $C1D0, $0300, $01C0 ; middle -> right
+	dw $41D1, $41D0, $01C1, $41C1, $81D0, $81D1 ; right -> left
+	dw $0300, $01C0, $41D1, $41D0, $01C1, $41C1 ; right -> middle
+	dw $0300, $01C0, $0300, $01C0, $0300, $01C0 ; right -> right
+.east
+	dw $01C4, $01C4, $01C4, $0300, $0300, $0300 ; top -> top
+	dw $01C4, $C1D4, $01C5, $0300, $C1D5, $81C5 ; top -> middle
+	dw $C1D4, $01C5, $01D5, $C1D5, $81C5, $01D4 ; top -> bottom
+	dw $01C5, $81D4, $01C4, $81C5, $81D5, $0300 ; middle -> top
+	dw $01C5, $01C5, $01C5, $81C5, $81C5, $81C5 ; middle -> middle
+	dw $01C5, $01D5, $0300, $81C5, $01D4, $01C4 ; middle -> bottom
+	dw $41D5, $01C5, $81D4, $41D4, $81C5, $81D5 ; bottom -> top
+	dw $0300, $41D5, $01C5, $01C4, $41D4, $81C5 ; bottom -> middle
+	dw $0300, $0300, $0300, $01C4, $01C4, $01C4 ; bottom -> bottom
+
+MultiConnectorMapping:
+.two
+	db $02, $00
+.three
+	db $02, $01, $00
+
+MultiConnectorTiles:
+.north
+..two
+	dw $41CF, $81CF, $C1CF, $01CF
+..three
+	dw $41CF, $01C4, $81EF, $C1EF, $01C4, $01CF
+.west
+..two
+	dw $81CF, $41CF, $C1CF, $01CF
+..three
+	dw $81CF, $01C0, $41DF, $C1DF, $01C0, $01CF
+.south
+..two
+	dw $C1CF, $01CF, $41CF, $81CF
+..three
+	dw $C1CF, $01C4, $01EF, $41EF, $01C4, $81CF
+.east
+..two
+	dw $C1CF, $01CF, $81CF, $41CF
+..three
+	dw $C1CF, $01C0, $01DF, $81DF, $01C0, $41CF
+.direction_index
+	db $00, $14, $28, $3C
+.start_offset
+..two
+	dw $FF7E, $FFBC, $00BE, $FFC6
+..three
+.increment
+	db $02, $40
+
+EdgePositions:
+.north_south
+	db $01, $00 ; HC Basement
+	db $02 ; Desert West Wing
+	db $00, $01, $02 ; Desert Lobby
+	db $00 ; Desert East Wing
+	db $01, $02 ; TT
+	db $00, $01 ; different TT
+.east_west
+	db $02 ; TT Attic
+	db $02, $02 ; Desert North Hall
+	db $02, $00 ; HC Basement
+	db $00 ; Desert East Wing
+	db $00, $02 ; TT Triple
+	db $02 ; TT Big Key Chest
diff --git a/dungeon_map/data/supertile_shapes.asm b/dungeon_map/data/supertile_shapes.asm
index 923dee1..31f41f4 100644
--- a/dungeon_map/data/supertile_shapes.asm
+++ b/dungeon_map/data/supertile_shapes.asm
@@ -98,8 +98,8 @@ dw $FFFF, $8379, $FFFF, $036A ; 60
 dw $C387, $8385, $4356, $0356 ; 61
 dw $C346, $8354, $4352, $0340 ; 62
 dw $039A, $FFFF, $0361, $FFFF ; 63
-dw $FFFF, $FFFF, $8399, $C3B1 ; 64
-dw $FFFF, $FFFF, $83B1, $0381 ; 65
+dw $FFFF, $FFFF, $8399, $0367 ; 64
+dw $FFFF, $FFFF, $0367, $0381 ; 65
 dw $038F, $039A, $0362, $83B2 ; 66
 dw $83B4, $83B5, $03B7, $039F ; 67
 dw $C340, $8350, $4341, $0340 ; 68
diff --git a/dungeon_map/draw_rooms.asm b/dungeon_map/draw_rooms.asm
index f6d6b57..11caaef 100644
--- a/dungeon_map/draw_rooms.asm
+++ b/dungeon_map/draw_rooms.asm
@@ -14,7 +14,13 @@ FinishRoom:
 	TAX
 	JML $8AE7F6
 
+NormalDrawDungeonMapRoom:
+	JSL DrawDungeonMapRoom
+	JMP FinishRoom
+
 ; $CA has room_id
+; $0E has quadrant flags
+; X has address to draw at
 DrawDungeonMapRoom:
 	REP #$20
 	PHB : PHK : PLB ; need to keep this in same bank as data, or else specify bank
@@ -136,7 +142,7 @@ DrawDungeonMapRoom:
 .done
 	PLA : STA.b $0A
 	PLB
-	JMP FinishRoom
+	RTL
 
 DrawEntrances:
 	REP #$30
diff --git a/dungeon_map/dungeon_switch.asm b/dungeon_map/dungeon_switch.asm
index bf88de3..aa9e55f 100644
--- a/dungeon_map/dungeon_switch.asm
+++ b/dungeon_map/dungeon_switch.asm
@@ -1,4 +1,14 @@
 CheckSwitchMap:
+	LDA.l DRMode
+	BEQ +
+	LDA.l DungeonMapMode
+	BNE +
+
+	; fancy door map, will figure out later
+	LDA.w #$0002 ; ignore input! nothing to see here!
+	RTL
+
++
 	SEP #$20
 	LDA.b $F6
 	AND.b #$30
@@ -6,7 +16,7 @@ CheckSwitchMap:
 
 	; what we wrote over
 	REP #$20
-	LDA.w $8AF5E9, X
+	LDA.w DungeonMapFloorCountData, X
 	AND.w #$000F
 	CLC : ADC.b $00
 	RTL
@@ -99,7 +109,11 @@ SkipMapSprites:
 
 	LDA.l DRMode
 	BEQ +
-		JML $8AEAEE
+	LDA.l DungeonMapMode
+	BEQ .draw_none
+		JML $8AEADE
+	.draw_none
+		JML $8AEAFC
 +
 
 	LDA.l CachedDungeonID
diff --git a/dungeon_map/hooks.asm b/dungeon_map/hooks.asm
index 6aeb4b6..d0fc624 100644
--- a/dungeon_map/hooks.asm
+++ b/dungeon_map/hooks.asm
@@ -38,13 +38,13 @@ db $61, $56, $57, $62
 
 ; unused chest data
 org $81E9A5
-dw $00F0 ; freezor room, second chest (only one chest in supertile)
+dw $000F ; freezor room, second chest (only one chest in supertile)
 
 org $81EA6E
-dw $00F0 ; mire spike room, second chest (only one chest in supertile)
+dw $000F ; mire spike room, second chest (only one chest in supertile)
 
 org $81EAF8
-dw $00F0 ; GT button/switch/bladetrap room (no chest in supertile)
+dw $000F ; GT button/switch/bladetrap room (no chest in supertile)
 
 ; Dungeon Map Palettes 2-5 left half
 org $9BE544
@@ -75,7 +75,7 @@ org $8AEE2B
 ;--------------------------------------------------------------------------------
 org $8AE64D
 	PLX
-	JML DrawDungeonMapRoom
+	JML NormalDrawDungeonMapRoom
 
 org $8AE606
 	PLX
@@ -221,3 +221,53 @@ org $8AE8F9
 org $8AEBC6
 	JSL GetLocationMarkerLeft
 	NOP
+
+;================================================================================
+; Draw Wacky Door Rando Layouts
+;--------------------------------------------------------------------------------
+org $8AE3D7
+	LDA.l DungeonMapMode
+	BNE .normal
+	LDA.l DRMode
+	BEQ .normal
+
+	JSL DrawWackyDoorRandoStuff
+	JMP.w $8AE422
+	NOP
+
+	.normal
+warnpc $8AE3EB
+
+org $8AE439
+	dw $0F19, $4F19, $8F19, $CF19
+
+org $8AE449
+	dw $0F1A, $8F1A
+
+org $8AE451
+	dw $0F1B, $4F1B
+
+org $8AE473
+	NOP #2
+
+org $8AE4A4
+	NOP #2
+
+org $8AE4DC
+	NOP #2
+
+org $8AE4F9
+	dw $0F1E, $0F1F, $0F20, $0F21
+	dw $0F22, $0F23, $0F24, $0F25
+
+org $8AE539
+	LDA.w #$0F1C
+
+org $8AE573
+	LDA.w #$0F1D
+
+org $8AE555
+	NOP #2
+
+org $8AE576
+	NOP #2
diff --git a/dungeon_map/main.asm b/dungeon_map/main.asm
index 60d256f..a133897 100644
--- a/dungeon_map/main.asm
+++ b/dungeon_map/main.asm
@@ -27,9 +27,11 @@ endmacro
 pullpc
 
 incsrc mappable_doors.asm
+incsrc current_room_map.asm
 incsrc draw_rooms.asm
 incsrc map_bg3.asm
 incsrc dungeon_switch.asm
 incsrc draw_loot.asm
 incsrc check_loot.asm
 incsrc blink_loot.asm
+incsrc data/doors_display.asm
diff --git a/dungeon_map/map_bg3.asm b/dungeon_map/map_bg3.asm
index 41b8d17..231474d 100644
--- a/dungeon_map/map_bg3.asm
+++ b/dungeon_map/map_bg3.asm
@@ -12,23 +12,34 @@ LoadStripes:
 
 .dungeon_map
 	LDA.l DungeonMapMode
-	BNE .doors
+	BNE .4x3
+	LDA.l DRMode
+	BNE .6x6
 
-.not_doors
-	LDA.b #BG3DungeonMapStripes>>0
+.5x5
+	LDA.b #BG3DungeonMap5x5Stripes>>0
 	STA.b $00
-	LDA.b #BG3DungeonMapStripes>>8
+	LDA.b #BG3DungeonMap5x5Stripes>>8
 	STA.b $01
-	LDA.b #BG3DungeonMapStripes>>16
+	LDA.b #BG3DungeonMap5x5Stripes>>16
 	STA.b $02
 	RTL
 
-.doors
-	LDA.b #BG3DungeonMapDoorStripes>>0
+.4x3
+	LDA.b #BG3DungeonMap4x3Stripes>>0
 	STA.b $00
-	LDA.b #BG3DungeonMapDoorStripes>>8
+	LDA.b #BG3DungeonMap4x3Stripes>>8
 	STA.b $01
-	LDA.b #BG3DungeonMapDoorStripes>>16
+	LDA.b #BG3DungeonMap4x3Stripes>>16
+	STA.b $02
+	RTL
+
+.6x6
+	LDA.b #BG3DungeonMap6x6Stripes>>0
+	STA.b $00
+	LDA.b #BG3DungeonMap6x6Stripes>>8
+	STA.b $01
+	LDA.b #BG3DungeonMap6x6Stripes>>16
 	STA.b $02
 	RTL
 
@@ -71,7 +82,7 @@ macro VanillaCommonMapStripes()
 endmacro
 
 
-BG3DungeonMapStripes:
+BG3DungeonMap5x5Stripes:
 %VanillaCommonMapStripes()
 ; left edge of map border, from vanilla
 dw $4E60, $0100, $2100
@@ -122,7 +133,7 @@ endmacro
 
 db $FF
 
-BG3DungeonMapDoorStripes:
+BG3DungeonMap4x3Stripes:
 %VanillaCommonMapStripes()
 ; left edge of map border, adjusted from vanilla
 dw $4D60, $0100, $2100
@@ -174,3 +185,116 @@ endmacro
 %FullDoorRow($6311)
 
 db $FF
+
+BG3DungeonMap6x6Stripes:
+; vanilla
+dw $4260, $0100, $2100
+dw $4360, $0E40, $2101
+dw $4B60, $0100, $6100
+dw $8460, $0B00, $2102, $2103, $2104, $2105, $2106, $2107
+dw $A460, $0B00, $2112, $2113, $2114, $2115, $2116, $2117
+dw $0060, $7E40, $2111
+dw $8063, $3E41, $2111
+dw $0060, $3EC0, $2111
+dw $0160, $3EC0, $2111
+dw $0C60, $3EC0, $2111
+dw $0D60, $3EC0, $2111
+dw $1E60, $3EC0, $2111
+dw $1F60, $3EC0, $2111
+
+; left side border
+dw $6260, $2AC0, $2110
+dw $6B60, $2AC0, $6110
+dw $2263, $0100, $A100
+dw $2363, $0E40, $A101
+dw $2B63, $0100, $E100
+
+; right side border
+dw $CE60, $0100, $2100
+dw $CF60, $1A40, $2101
+dw $DD60, $0100, $6100
+dw $EE60, $1AC0, $2110
+dw $FD60, $1AC0, $6110
+dw $AE62, $0100, $A100
+dw $AF62, $1A40, $A101
+dw $BD62, $0100, $E100
+
+; blank above and below
+dw $4E60, $1E40, $2111
+dw $6E60, $1E40, $2111
+dw $8E60, $1E40, $2111
+dw $AE60, $1E40, $2111
+
+dw $CE62, $1E40, $2111
+dw $EE62, $1E40, $2111
+dw $0E63, $1E40, $2111
+dw $2E63, $1E40, $2111
+
+dw $4063, $4640, $2111
+dw $6063, $4640, $2111
+
+; horizontal borders
+dw $EF60, $1A40, $1D11
+dw $0F61, $1A40, $1D11
+dw $2F61, $1A40, $1D11
+dw $4F61, $1A40, $1D11
+dw $6F61, $1A40, $1D11
+dw $8F61, $1A40, $1D11
+dw $AF61, $1A40, $1D11
+dw $CF61, $1A40, $1D11
+dw $EF61, $1A40, $1D11
+dw $0F62, $1A40, $1D11
+dw $2F62, $1A40, $1D11
+dw $4F62, $1A40, $1D11
+dw $6F62, $1A40, $1D11
+dw $8F62, $1A40, $1D11
+
+dw $B561, $0300
+dw $5D4C, $1D4C
+
+dw $D561, $0300
+dw $DD4C, $9D4C
+
+; ; horizontal borders
+; dw $B160, $1440, $1D11
+; dw $1161, $1440, $1D11
+; dw $7161, $1440, $1D11
+; dw $D161, $1440, $1D11
+; dw $3162, $1440, $1D11
+; dw $9162, $1440, $1D11
+; dw $F162, $1440, $1D11
+; dw $5163, $1440, $1D11
+; 
+; ; vertical borders
+; dw $B060, $12C0, $1D11
+; dw $BC60, $12C0, $1D11
+; dw $3062, $12C0, $1D11
+; dw $3C62, $12C0, $1D11
+; 
+; macro TopOfDoorSquares(start)
+; 	; silly Big Endian
+; 	db <start>>>8, <start>, $00, $15
+; 	dw $5D4C, $1D4C, $1D11, $5D4C, $1D4C, $1D11, $5D4C, $1D4C, $1D11, $5D4C, $1D4C
+; endmacro
+; 
+; macro BottomOfDoorSquares(start)
+; 	; silly Big Endian
+; 	db <start>>>8, <start>, $00, $15
+; 	dw $DD4C, $9D4C, $1D11, $DD4C, $9D4C, $1D11, $DD4C, $9D4C, $1D11, $DD4C, $9D4C
+; endmacro
+; 
+; macro FullDoorRow(start)
+; 	%TopOfDoorSquares(<start>)
+; 	%BottomOfDoorSquares(<start>+$20)
+; endmacro
+; 
+; ; top grid
+; %FullDoorRow($60D1)
+; %FullDoorRow($6131)
+; %FullDoorRow($6191)
+; 
+; %FullDoorRow($6251)
+; %FullDoorRow($62B1)
+; %FullDoorRow($6311)
+
+db $FF
diff --git a/dungeon_map/settings.asm b/dungeon_map/settings.asm
index e099939..bd7484a 100644
--- a/dungeon_map/settings.asm
+++ b/dungeon_map/settings.asm
@@ -197,11 +197,12 @@ org $B9FF10
 ItemSources:
 	db $09
 
+; $B9FF11
 AlwaysShowCompass:
 	db $01
 
-; $00 - vanilla 5x5 maps
-; $01 - special DR 4x3 maps
+; $B9FF12
+; $0000 - vanilla 5x5 maps
+; $0001 - special DR 4x3 maps
 DungeonMapMode:
 	dw $0000
-
diff --git a/menu/door_connectors.3bpp b/menu/door_connectors.3bpp
index ce86c7c89d231c75be030c7e1516f293eb2707d6..ea4836962ca0f5679de978035d28dc785b4d1a1f 100644
GIT binary patch
delta 144
zcmZqRY2cZ}>?6X+z|6qTz|SDhV8_6~z{teHA*eJl!9%Qu;RnM9h6fA>7#e`$3=A$E
z0tyZd6ZfscA+x!TF^f?gS=WDt|4?23H~(kKWR$39_|5Q{;W5KuhGw9p%nWW_LP}0e
LOiY^_SQ;1sB5Wt@

delta 84
zcmZqRY2caQCC13W&tMOQHVh1m{1yrd>M9cxJjCi4Y8d_i;SV4L0XLT;JRCnJ?prna
X0jtF32F46V5MvWFgx=i1(!dA+SZx=}

diff --git a/menu/door_connectors.3bppc b/menu/door_connectors.3bppc
index 34812992c87ec53da02494b974c583f56106245e..6becac22fa7543cd34c31166ab8404767c370ddf 100644
GIT binary patch
delta 268
zcmWNLKT5+;9LK-E_mU<AX`+(|(wIatI0@2%1}ml*i$XdGb`;DYf>4|s3W_g5(J7>$
z;044J6sLlN#mOTG_5cAL1cjIbeE!^5o-2Ey2iFNXTo(SpjcjNH4h1@DSQl+bOj4&U
z8$p3Zpon`|!tD`u3M3~;PNDVjgB%|i;lhE`x;D&>G@La`^pJ>4zM_(Dh;DkeTmy++
zl!ZK3)$hsN;CQ?uR*9>V!MK6D$Mm&6b@c>3LKMYA$XS&vS#*%}vO4vhhc5YLby!|>
z;N@!uf+l>gd_~hVUB}6TgY1ohYSISCR~YGXypL>w+4Bu(=lI1JKJfz40#~+fW~|Li
L#!5l9&EEe3Pyt20

delta 261
zcmWNLJxjw-7)GD><~F(7;*H=SMNDWafp&241CfA2qOFL;(LoS2gA_#RTy#hxqEkr+
ze}|)!gF^=g7tzrnKj01y9SSkqna(+{`m=r)dT^Ve2A73XxDf{kvWuM=uOzu;+iufA
zr@#tOBsXZ|=@N$p(krBWuv-iQO#KNQ@crPuCej!9u(YZrEx#g#0ay!WeO5F|+Xa!v
zeM2y5;v9@|9)Azx)-oePQlJW@g!s$rquzKu-X=}tqjA1E{Mel56Da%!c&kNG@L<}z
z*&H==W<cIwXB#wFRP7T|d*wVHj{q+|(Bf05?pgLl9Wz-f!{i%`WF`KAmbI9})!H#-
HJ@)wzi4s5#

diff --git a/menu/map_icons.3bpp b/menu/map_icons.3bpp
index c336a28839dd3edfd5d11a1c43281243e3c80e44..95ba022e6d5928dd2658051cb0b81bd6cbe65e1a 100644
GIT binary patch
delta 31
fcmZorX;9g)hFR!80|YXF!G8vZ|C{$QJMjSkvHc2o

delta 16
XcmZorX;9g)hIz6pquAy{%yxVLF}ej?

diff --git a/menu/map_icons_1.3bppc b/menu/map_icons_1.3bppc
index 4920ce208faa3b6d550ddddf3b5fa1253fca0589..91536f269a92f684424b483e7d6bb277b4789d46 100644
GIT binary patch
delta 27
jcmeBToyNLh2_wHUgZqC5RR)ItEjyT-4=_w#&iEJrdY}os

delta 15
XcmbQn+QqtI2_y4tKgP+M86N`xDb@v-

diff --git a/menu/map_icons_4.3bppc b/menu/map_icons_4.3bppc
index 72ffcb523be5c54624a9e27176562b5bdf4a3b0b..0e7ed430e869e8274708fac57fbef64ed3fe3e64 100644
GIT binary patch
delta 245
zcmWN~u}Z^G6b9h`+>?5Xg`!Y9DM-C8j-3=Q*m@(xK^%lmx~7ARV-YzCB-yQZ>#KAL
zRqEy|xby)!7KhZV-}23xAI<mAmUR%ATd~Sae~xT1f!o>8@;ui>vgrL~npjZTu<8I#
zIvP@SyNl5%n}Ec+*sxeZc26h%jGlwyk=W1Z;nYH;7pv>otS_2`D}y4U{D~Bnwk`^#
z2;vXayuY{6LW;t-FRi~5W~hk7DcWUDhQk_445Bn~gH)I0Hchvs54gV{v?0MbM1pb7
hs?mP+As@FID`Qv2WNX~`7d{M%dh}DiBlusw{0H?|MUemi

delta 229
zcmWN}u}Z^G6b9h`oZIHMr~$VY3`n`4qliPmi?&UNI5@e9bBp)}A}4{H3f-y~9DJ27
zp-SDvNe9<Ffm2bi`aQsR-*{|HpVnFl1m;96<L)(TyD!i$l3+=T*lA)ppLf2C3t~?c
zH3P8%3mCscSM@?uP5c9$?Y1D&8B%{(?O_rVjt#~sX&{8u7V&>KW~T7khdevjSZX1r
z!OgSQFPU;vfKw991f{ZG&%G-y(M|KL+09Xwt2|%%AKnk$8)Gy;hSBXOD}SW6*MrK~
Z${1U0a^f%5R=tQ=&HY5368R5x_y>J-K#>3d

diff --git a/menu/map_icons_b.3bpp b/menu/map_icons_b.3bpp
index b5268235cf2897ddfc66760bf9bf00f30cf638f8..e5801b88fe9e0932e531defe0e17f3a43e24ef18 100644
GIT binary patch
delta 107
zcmZorX;7K)LC}Vwj-gJa&ISfmHZwBTGI9Zh>(bKFoYGV#3$hq&-od26Xu!<C#8?M~
tOpHv7%*^$Uj`hsU2N)b0>Y>n~!J*;6f&UE+{|_9P%*f`kIe=vYF94r&A~^s6

delta 106
zcmZorX;7K)K~RFBj-gJa&ISe<HZwBTGI9ci>(bKFoYE!>vKVgO!KA=wz`(%Fz{FSw
sg-nbL%*^$Uj`hq83<nq-8tS3Yp@HGRf&UE+{|`)NWb@b@z_NiC05{YiBLDyZ

diff --git a/ram.asm b/ram.asm
index 9c579b0..e1aa0bb 100644
--- a/ram.asm
+++ b/ram.asm
@@ -566,6 +566,9 @@ GameOverSongCache = $7EC227       ;
 CachedDungeonID = $7EC22A         ; Cached while opening dungeon map
 CachedCurrentFloor = $7EC22B      ; to restore when closing
                                   ;
+CurrentDisplayedRoom = $7EC22C    ; 2 bytes, used by dungeon map
+DisplayedRoomDoorIndex = $7EC22E  ; 2 bytes, used by dungeon map
+                                  ;
 LastBGSet = $7EC2F8               ; Lists loaded sheets to check for decompression. 4 bytes.
                                   ;
 PaletteBufferAux = $7EC300        ; Secondary and main palette buffer. See symbols_wram.asm