pokecrystal/engine/events/mom_phone.asm

NUM_MOM_ITEMS_1 EQUS "((MomItems_1.End - MomItems_1) / 8)"
NUM_MOM_ITEMS_2 EQUS "((MomItems_2.End - MomItems_2) / 8)"

	const_def 1
	const MOM_ITEM
	const MOM_DOLL

MomTriesToBuySomething::
	ld a, [wMapReentryScriptQueueFlag]
	and a
	ret nz
	call GetMapPhoneService
	and a
	ret nz
	xor a
	ld [wWhichMomItemSet], a
	call CheckBalance_MomItem2
	ret nc
	call Mom_GiveItemOrDoll
	ret nc
	ld b, BANK(.Script)
	ld de, .Script
	farcall LoadScriptBDE
	scf
	ret

.Script:
	callasm .ASMFunction
	farsjump Script_ReceivePhoneCall

.ASMFunction:
	call MomBuysItem_DeductFunds
	call Mom_GetScriptPointer
	ld a, [wWhichMomItemSet]
	and a
	jr nz, .ok
	ld hl, wWhichMomItem
	inc [hl]
.ok
	ld a, PHONE_MOM
	ld [wCurCaller], a
	ld bc, wCallerContact
	ld hl, PHONE_CONTACT_TRAINER_CLASS
	add hl, bc
	ld [hl], TRAINER_NONE
	inc hl
	ld [hl], PHONE_MOM
	ld hl, PHONE_CONTACT_SCRIPT2_BANK
	add hl, bc
	ld a, BANK(Mom_GetScriptPointer)
	ld [hli], a
	ld a, e
	ld [hli], a
	ld a, d
	ld [hl], a
	ret

CheckBalance_MomItem2:
	ld a, [wWhichMomItem]
	cp NUM_MOM_ITEMS_2
	jr nc, .nope
	call GetItemFromMom
	ld a, [hli]
	ldh [hMoneyTemp], a
	ld a, [hli]
	ldh [hMoneyTemp + 1], a
	ld a, [hli]
	ldh [hMoneyTemp + 2], a
	ld de, wMomsMoney
	ld bc, hMoneyTemp
	farcall CompareMoney
	jr nc, .have_enough_money

.nope
	jr .check_have_2300

.have_enough_money
	scf
	ret

.check_have_2300
	ld hl, hMoneyTemp
	ld [hl], HIGH(MOM_MONEY >> 8)
	inc hl
	ld [hl], HIGH(MOM_MONEY) ; mid
	inc hl
	ld [hl], LOW(MOM_MONEY)
.loop
	ld de, wMomItemTriggerBalance
	ld bc, wMomsMoney
	farcall CompareMoney
	jr z, .exact
	jr nc, .less_than
	call .AddMoney
	jr .loop

.less_than
	xor a
	ret

.exact
	call .AddMoney
	ld a, NUM_MOM_ITEMS_1
	call RandomRange
	inc a
	ld [wWhichMomItemSet], a
	scf
	ret

.AddMoney:
	ld de, wMomItemTriggerBalance
	ld bc, hMoneyTemp
	farcall AddMoney
	ret

MomBuysItem_DeductFunds:
	call GetItemFromMom
	ld de, 3 ; cost
	add hl, de
	ld a, [hli]
	ldh [hMoneyTemp], a
	ld a, [hli]
	ldh [hMoneyTemp + 1], a
	ld a, [hli]
	ldh [hMoneyTemp + 2], a
	ld de, wMomsMoney
	ld bc, hMoneyTemp
	farcall TakeMoney
	ret

Mom_GiveItemOrDoll:
	call GetItemFromMom
	ld de, 6 ; item type
	add hl, de
	ld a, [hli]
	cp MOM_ITEM
	jr z, .not_doll
	ld a, [hl]
	ld c, a
	ld b, 1
	farcall DecorationFlagAction_c
	scf
	ret

.not_doll
	ld a, [hl]
	ld [wCurItem], a
	ld a, 1
	ld [wItemQuantityChangeBuffer], a
	ld hl, wNumPCItems
	call ReceiveItem
	ret

Mom_GetScriptPointer:
	call GetItemFromMom
	ld de, 6 ; item type
	add hl, de
	ld a, [hli]
	ld de, .ItemScript
	cp MOM_ITEM
	ret z
	ld de, .DollScript
	ret

.ItemScript:
	writetext MomHiHowAreYouText
	writetext MomFoundAnItemText
	writetext MomBoughtWithYourMoneyText
	writetext MomItsInPCText
	end

.DollScript:
	writetext MomHiHowAreYouText
	writetext MomFoundADollText
	writetext MomBoughtWithYourMoneyText
	writetext MomItsInYourRoomText
	end

GetItemFromMom:
	ld a, [wWhichMomItemSet]
	and a
	jr z, .zero
	dec a
	ld de, MomItems_1
	jr .GetFromList1

.zero
	ld a, [wWhichMomItem]
	cp NUM_MOM_ITEMS_2
	jr c, .ok
	xor a

.ok
	ld de, MomItems_2

.GetFromList1:
	ld l, a
	ld h, 0
rept 3 ; multiply hl by 8
	add hl, hl
endr
	add hl, de
	ret

INCLUDE "data/items/mom_phone.asm"

MomHiHowAreYouText:
	text_far _MomHiHowAreYouText
	text_end

MomFoundAnItemText:
	text_far _MomFoundAnItemText
	text_end

MomBoughtWithYourMoneyText:
	text_far _MomBoughtWithYourMoneyText
	text_end

MomItsInPCText:
	text_far _MomItsInPCText
	text_end

MomFoundADollText:
	text_far _MomFoundADollText
	text_end

MomItsInYourRoomText:
	text_far _MomItsInYourRoomText
	text_end

	db 0 ; unused

DummyPredef3A:
	ret

	ret ; unused
wUnlockedUnowns engine flag constants Use local labels for "End"ings 2018-01-22 18:00:35 +00:00			`NUM_MOM_ITEMS_1 EQUS "((MomItems_1.End - MomItems_1) / 8)"`
			`NUM_MOM_ITEMS_2 EQUS "((MomItems_2.End - MomItems_2) / 8)"`
Move NUM_BUENA_PRIZES to event/buena.asm (still hard-coded) Buena_PrizeMenu has "rept NUM_BUENA_PRIZES", which needs NUM_BUENA_PRIZES to be already defined. BuenaPrizeItems and BuenaPrizeItemsEnd are needed to define NUM_BUENA_PRIZES; but BuenaPrizeItems is defined after Buena_PrizeMenu. I don't see a way to avoid hard-coding its value of 9. Contrast that with the NUM_MOM_ITEMS constants, which are not used as "rept" arguments and so can be defined within their code file. 2017-12-23 05:31:04 +00:00
Fix some constants Glass ting SFX were added in crystal. PicAnimations and UnownAnimations are expected to be in the same bank as their pointers, because the pointers are not BANK()-referenced separately. 2019-01-15 12:06:16 +00:00			`const_def 1`
Document constants with comments, actual names, and more thorough usage 2017-12-09 05:50:59 +00:00			`const MOM_ITEM`
			`const MOM_DOLL`

Remove all address comments 2018-06-24 14:09:41 +00:00			`MomTriesToBuySomething::`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld a, [wMapReentryScriptQueueFlag]`
			`and a`
			`ret nz`
map_header → map_def; map_header_2 → map_data 2018-01-17 03:57:19 +00:00			`call GetMapPhoneService`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`and a`
			`ret nz`
			`xor a`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld [wWhichMomItemSet], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call CheckBalance_MomItem2`
			`ret nc`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`call Mom_GiveItemOrDoll`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ret nc`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld b, BANK(.Script)`
			`ld de, .Script`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`farcall LoadScriptBDE`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`scf`
			`ret`

Remove even more address comments That should be all of them this time 2018-06-25 00:10:37 +00:00			`.Script:`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`callasm .ASMFunction`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`farsjump Script_ReceivePhoneCall`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
Remove all address comments 2018-06-24 14:09:41 +00:00			`.ASMFunction:`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call MomBuysItem_DeductFunds`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`call Mom_GetScriptPointer`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld a, [wWhichMomItemSet]`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`and a`
			`jr nz, .ok`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld hl, wWhichMomItem`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`inc [hl]`
			`.ok`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld a, PHONE_MOM`
Curr -> Cur 2018-09-09 19:09:51 +00:00			`ld [wCurCaller], a`
Identify and eliminate wEngineBuffer1-5 2019-04-08 22:50:10 +00:00			`ld bc, wCallerContact`
			`ld hl, PHONE_CONTACT_TRAINER_CLASS`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`add hl, bc`
Identify and eliminate wEngineBuffer1-5 2019-04-08 22:50:10 +00:00			`ld [hl], TRAINER_NONE`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`inc hl`
Identify and eliminate wEngineBuffer1-5 2019-04-08 22:50:10 +00:00			`ld [hl], PHONE_MOM`
			`ld hl, PHONE_CONTACT_SCRIPT2_BANK`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`add hl, bc`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld a, BANK(Mom_GetScriptPointer)`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld [hli], a`
			`ld a, e`
			`ld [hli], a`
			`ld a, d`
			`ld [hl], a`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`CheckBalance_MomItem2:`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld a, [wWhichMomItem]`
Move NUM_BUENA_PRIZES to event/buena.asm (still hard-coded) Buena_PrizeMenu has "rept NUM_BUENA_PRIZES", which needs NUM_BUENA_PRIZES to be already defined. BuenaPrizeItems and BuenaPrizeItemsEnd are needed to define NUM_BUENA_PRIZES; but BuenaPrizeItems is defined after Buena_PrizeMenu. I don't see a way to avoid hard-coding its value of 9. Contrast that with the NUM_MOM_ITEMS constants, which are not used as "rept" arguments and so can be defined within their code file. 2017-12-23 05:31:04 +00:00			`cp NUM_MOM_ITEMS_2`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`jr nc, .nope`
			`call GetItemFromMom`
			`ld a, [hli]`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [hMoneyTemp], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld a, [hli]`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [hMoneyTemp + 1], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld a, [hli]`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [hMoneyTemp + 2], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld de, wMomsMoney`
			`ld bc, hMoneyTemp`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`farcall CompareMoney`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`jr nc, .have_enough_money`

			`.nope`
			`jr .check_have_2300`

			`.have_enough_money`
			`scf`
			`ret`

			`.check_have_2300`
			`ld hl, hMoneyTemp`
Resolve #428: Use `HIGH(X)` and `LOW(X)` instead of `X / $100` and `X % $100` or `X >> 8` and `X & $ff` 2017-12-25 18:40:10 +00:00			`ld [hl], HIGH(MOM_MONEY >> 8)`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`inc hl`
Resolve #428: Use `HIGH(X)` and `LOW(X)` instead of `X / $100` and `X % $100` or `X >> 8` and `X & $ff` 2017-12-25 18:40:10 +00:00			`ld [hl], HIGH(MOM_MONEY) ; mid`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`inc hl`
Resolve #428: Use `HIGH(X)` and `LOW(X)` instead of `X / $100` and `X % $100` or `X >> 8` and `X & $ff` 2017-12-25 18:40:10 +00:00			`ld [hl], LOW(MOM_MONEY)`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`.loop`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld de, wMomItemTriggerBalance`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld bc, wMomsMoney`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`farcall CompareMoney`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`jr z, .exact`
			`jr nc, .less_than`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`call .AddMoney`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`jr .loop`

			`.less_than`
			`xor a`
			`ret`

			`.exact`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`call .AddMoney`
Move NUM_BUENA_PRIZES to event/buena.asm (still hard-coded) Buena_PrizeMenu has "rept NUM_BUENA_PRIZES", which needs NUM_BUENA_PRIZES to be already defined. BuenaPrizeItems and BuenaPrizeItemsEnd are needed to define NUM_BUENA_PRIZES; but BuenaPrizeItems is defined after Buena_PrizeMenu. I don't see a way to avoid hard-coding its value of 9. Contrast that with the NUM_MOM_ITEMS constants, which are not used as "rept" arguments and so can be defined within their code file. 2017-12-23 05:31:04 +00:00			`ld a, NUM_MOM_ITEMS_1`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call RandomRange`
			`inc a`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld [wWhichMomItemSet], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`scf`
			`ret`

Local labels starting with capital letters are now decorated with a trailing colon; remove trailing whitespace; globally correct line endings to UNIX style 2016-04-10 18:42:14 +00:00			`.AddMoney:`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld de, wMomItemTriggerBalance`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld bc, hMoneyTemp`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`farcall AddMoney`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`MomBuysItem_DeductFunds:`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call GetItemFromMom`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld de, 3 ; cost`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`add hl, de`
			`ld a, [hli]`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [hMoneyTemp], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld a, [hli]`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [hMoneyTemp + 1], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld a, [hli]`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [hMoneyTemp + 2], a`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld de, wMomsMoney`
			`ld bc, hMoneyTemp`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`farcall TakeMoney`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`Mom_GiveItemOrDoll:`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call GetItemFromMom`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld de, 6 ; item type`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`add hl, de`
			`ld a, [hli]`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`cp MOM_ITEM`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`jr z, .not_doll`
			`ld a, [hl]`
			`ld c, a`
			`ld b, 1`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`farcall DecorationFlagAction_c`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`scf`
			`ret`

			`.not_doll`
			`ld a, [hl]`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurItem], a`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld a, 1`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld [wItemQuantityChangeBuffer], a`
Fix wram labeling for wPCItems 2019-03-18 15:43:58 +00:00			`ld hl, wNumPCItems`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call ReceiveItem`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`Mom_GetScriptPointer:`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`call GetItemFromMom`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld de, 6 ; item type`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`add hl, de`
			`ld a, [hli]`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld de, .ItemScript`
			`cp MOM_ITEM`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ret z`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`ld de, .DollScript`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ret`

Remove even more address comments That should be all of them this time 2018-06-25 00:10:37 +00:00			`.ItemScript:`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext MomHiHowAreYouText`
			`writetext MomFoundAnItemText`
			`writetext MomBoughtWithYourMoneyText`
			`writetext MomItsInPCText`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`end`

Remove even more address comments That should be all of them this time 2018-06-25 00:10:37 +00:00			`.DollScript:`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext MomHiHowAreYouText`
			`writetext MomFoundADollText`
			`writetext MomBoughtWithYourMoneyText`
			`writetext MomItsInYourRoomText`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`end`

Remove all address comments 2018-06-24 14:09:41 +00:00			`GetItemFromMom:`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld a, [wWhichMomItemSet]`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`and a`
			`jr z, .zero`
			`dec a`
			`ld de, MomItems_1`
Events and some WRAM cleanup 2015-12-19 01:07:09 +00:00			`jr .GetFromList1`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
			`.zero`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`ld a, [wWhichMomItem]`
Move NUM_BUENA_PRIZES to event/buena.asm (still hard-coded) Buena_PrizeMenu has "rept NUM_BUENA_PRIZES", which needs NUM_BUENA_PRIZES to be already defined. BuenaPrizeItems and BuenaPrizeItemsEnd are needed to define NUM_BUENA_PRIZES; but BuenaPrizeItems is defined after Buena_PrizeMenu. I don't see a way to avoid hard-coding its value of 9. Contrast that with the NUM_MOM_ITEMS constants, which are not used as "rept" arguments and so can be defined within their code file. 2017-12-23 05:31:04 +00:00			`cp NUM_MOM_ITEMS_2`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`jr c, .ok`
			`xor a`

			`.ok`
			`ld de, MomItems_2`

Local labels starting with capital letters are now decorated with a trailing colon; remove trailing whitespace; globally correct line endings to UNIX style 2016-04-10 18:42:14 +00:00			`.GetFromList1:`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ld l, a`
			`ld h, 0`
			`rept 3 ; multiply hl by 8`
			`add hl, hl`
			`endr`
			`add hl, de`
			`ret`

Copy pokered's organization some more, with further constant and data files 2017-12-15 22:22:52 +00:00			`INCLUDE "data/items/mom_phone.asm"`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`MomHiHowAreYouText:`
			`text_far _MomHiHowAreYouText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`MomFoundAnItemText:`
			`text_far _MomFoundAnItemText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`MomBoughtWithYourMoneyText:`
			`text_far _MomBoughtWithYourMoneyText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`MomItsInPCText:`
			`text_far _MomItsInPCText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`MomFoundADollText:`
			`text_far _MomFoundADollText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`MomItsInYourRoomText:`
			`text_far _MomItsInYourRoomText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
Clean up XXX comments for unused content 2018-01-02 12:24:05 +00:00			`db 0 ; unused`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00
Remove all address comments 2018-06-24 14:09:41 +00:00			`DummyPredef3A:`
main.asm is now under 30k lines 2015-11-19 23:07:20 +00:00			`ret`

Clean up XXX comments for unused content 2018-01-02 12:24:05 +00:00			`ret ; unused`