Merge https://github.com/libjet/pokegold

1 files changed, 145 insertions, 0 deletions

diff --git a/macros/scripts/text.asm b/macros/scripts/text.asm
new file mode 100755
index 00000000..bb1701f8
--- /dev/null
+++ b/macros/scripts/text.asm
@@ -0,0 +1,145 @@
+text   EQUS "db TX_START,"    ; Start writing text.
+next   EQUS "db \"<NEXT>\","  ; Move a line down.
+line   EQUS "db \"<LINE>\","  ; Start writing at the bottom line.
+page   EQUS "db \"@\","       ; Start a new Pokédex page.
+para   EQUS "db \"<PARA>\","  ; Start a new paragraph.
+cont   EQUS "db \"<CONT>\","  ; Scroll to the next line.
+done   EQUS "db \"<DONE>\""   ; End a text box.
+prompt EQUS "db \"<PROMPT>\"" ; Prompt the player to end a text box (initiating some other event).
+
+; TextCommands indexes (see home/text.asm)
+	enum_start
+
+	enum TX_START ; $00
+text_start: MACRO
+	db TX_START
+ENDM
+
+	enum TX_RAM ; $01
+text_ram: MACRO
+	db TX_RAM
+	dw \1
+ENDM
+
+	enum TX_BCD ; $02
+text_bcd: MACRO
+	db TX_BCD
+	dw \1
+	db \2
+ENDM
+
+	enum TX_MOVE ; $03
+text_move: MACRO
+	db TX_MOVE
+	dw \1
+ENDM
+
+	enum TX_BOX ; $04
+text_box: MACRO
+	db TX_BOX
+	dw \1
+	db \2, \3
+ENDM
+
+	enum TX_LOW ; $05
+text_low: MACRO
+	db TX_LOW
+ENDM
+
+	enum TX_PROMPT_BUTTON ; $06
+text_promptbutton: MACRO
+	db TX_PROMPT_BUTTON
+ENDM
+
+	enum TX_SCROLL ; $07
+text_scroll: MACRO
+	db TX_SCROLL
+ENDM
+
+	enum TX_START_ASM ; $08
+text_asm: MACRO
+	db TX_START_ASM
+ENDM
+
+	enum TX_NUM ; $09
+text_decimal: MACRO
+	db TX_NUM
+	dw \1 ; address
+	dn \2, \3 ; bytes, digits
+ENDM
+
+	enum TX_PAUSE ; $0a
+text_pause: MACRO
+	db TX_PAUSE
+ENDM
+
+	enum TX_SOUND_DEX_FANFARE_50_79 ; $0b
+sound_dex_fanfare_50_79: MACRO
+	db TX_SOUND_DEX_FANFARE_50_79
+ENDM
+
+	enum TX_DOTS ; $0c
+text_dots: MACRO
+	db TX_DOTS
+	db \1
+ENDM
+
+	enum TX_LINK_PROMPT_BUTTON ; $0d
+text_linkpromptbutton: MACRO
+	db TX_LINK_PROMPT_BUTTON
+ENDM
+
+	enum TX_SOUND_DEX_FANFARE_20_49 ; $0e
+sound_dex_fanfare_20_49: MACRO
+	db TX_SOUND_DEX_FANFARE_20_49
+ENDM
+
+	enum TX_SOUND_ITEM ; $0f
+sound_item: MACRO
+	db TX_SOUND_ITEM
+ENDM
+
+	enum TX_SOUND_CAUGHT_MON ; $10
+sound_caught_mon: MACRO
+	db TX_SOUND_CAUGHT_MON
+ENDM
+
+	enum TX_SOUND_DEX_FANFARE_80_109 ; $11
+sound_dex_fanfare_80_109: MACRO
+	db TX_SOUND_DEX_FANFARE_80_109
+ENDM
+
+	enum TX_SOUND_FANFARE ; $12
+sound_fanfare: MACRO
+	db TX_SOUND_FANFARE
+ENDM
+
+	enum TX_SOUND_SLOT_MACHINE_START ; $13
+sound_slot_machine_start: MACRO
+	db TX_SOUND_SLOT_MACHINE_START
+ENDM
+
+	enum TX_STRINGBUFFER ; $14
+text_buffer: MACRO
+	db TX_STRINGBUFFER
+	db \1
+ENDM
+
+	enum TX_DAY ; $15
+text_today: MACRO
+	db TX_DAY
+ENDM
+
+	enum TX_FAR ; $16
+text_far: MACRO
+	db TX_FAR
+	dw \1
+	db BANK(\1)
+ENDM
+
+	enum_set $50
+
+	enum TX_END ; $50
+text_end: MACRO
+	db TX_END
+ENDM