macros/text.asm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136

text   EQUS "db $00,"          ; Start writing text.
next   EQUS "db \"<NEXT>\","   ; Move a line down.
line   EQUS "db \"<LINE>\","   ; Start writing at the bottom line.
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)
	const_def 1

	const TX_RAM ; $01
text_from_ram: MACRO
	db TX_RAM
	dw \1    ; address
endm

	const TX_BCD ; $02
text_bcd: macro
	db TX_BCD
	dw \1    ; address
	db \2    ; flags + digits, see PrintBCDNumber
endm

	const TX_MOVE ; $03
text_move: macro
	db TX_MOVE
	dw \1     ; address
endm

	const TX_BOX ; $04
text_box: macro
	db TX_BOX
	dw \1     ; address
	db \2, \3 ; width, height
endm

	const TX_LOW ; $05
text_low: macro
	db TX_LOW
endm

	const WAIT_BUTTON ; $06
text_waitbutton: macro
	db WAIT_BUTTON
endm

	const TX_SCROLL ; $07
text_scroll: macro
	db TX_SCROLL
endm

	const START_ASM ; $08
start_asm: macro
	db START_ASM
endm

	const TX_NUM ; $09
deciram: macro
	db TX_NUM
	dw \1     ; address
	dn \2, \3 ; bytes, flags + digits
endm

	const TX_EXIT ; $0a
text_exit: macro
	db TX_EXIT
endm

	const TX_SOUND_0B ; $0b
sound_dex_fanfare_50_79: macro
	db TX_SOUND_0B
endm

	const TX_DOTS ; $0c
text_dots: macro
	db TX_DOTS
	db \1
endm

	const TX_LINK_WAIT_BUTTON ; $0d
link_wait_button: macro
	db TX_LINK_WAIT_BUTTON
endm

	const TX_SOUND_0E ; $0e
sound_dex_fanfare_20_49: macro
	db TX_SOUND_0E
endm

	const TX_SOUND_0F ; $0f
sound_item: macro
	db TX_SOUND_0F
endm

	const TX_SOUND_10 ; $10
sound_caught_mon: macro
	db TX_SOUND_10
endm

	const TX_SOUND_11 ; $11
sound_dex_fanfare_80_109: macro
	db TX_SOUND_11
endm

	const TX_SOUND_12 ; $12
sound_fanfare: macro
	db TX_SOUND_12
endm

	const TX_SOUND_13 ; $13
sound_slot_machine_start: macro
	db TX_SOUND_13
endm

	const TX_CRY_14 ; $14
cry_nidorina: macro
	db TX_CRY_14
endm

	const TX_CRY_15 ; $15
cry_pidgeot: macro
	db TX_CRY_15
endm

	const TX_CRY_16 ; $16
cry_dewgong: macro
	db TX_CRY_16
endm

	const_next $50

	const TX_END ; $50
text_end: macro
	db TX_END
endm