pokered/engine/oak_speech.asm

SetDefaultNames:
	ld a, [wLetterPrintingDelayFlags]
	push af
	ld a, [wOptions]
	push af
	ld a, [wd732]
	push af
	ld hl, wPlayerName
	ld bc, $d8a
	xor a
	call FillMemory
	ld hl, wSpriteStateData1
	ld bc, $200
	xor a
	call FillMemory
	pop af
	ld [wd732], a
	pop af
	ld [wOptions], a
	pop af
	ld [wLetterPrintingDelayFlags], a
	ld a, [wOptionsInitialized]
	and a
	call z, InitOptions
	ld hl, NintenText
	ld de, wPlayerName
	ld bc, NAME_LENGTH
	call CopyData
	ld hl, SonyText
	ld de, wRivalName
	ld bc, NAME_LENGTH
	jp CopyData

OakSpeech:
	ld a,$FF
	call PlaySound ; stop music
	ld a, BANK(Music_Routes2)
	ld c,a
	ld a, MUSIC_ROUTES2
	call PlayMusic
	call ClearScreen
	call LoadTextBoxTilePatterns
	call SetDefaultNames
	predef InitPlayerData2
	ld hl,wNumBoxItems
	ld a,POTION
	ld [wcf91],a
	ld a,1
	ld [wItemQuantity],a
	call AddItemToInventory  ; give one potion
	ld a,[wDefaultMap]
	ld [wDestinationMap],a
	call SpecialWarpIn
	xor a
	ld [hTilesetType],a
	ld a,[wd732]
	bit 1,a ; possibly a debug mode bit
	jp nz,.skipChoosingNames
	ld de,ProfOakPic
	lb bc, Bank(ProfOakPic), $00
	call IntroDisplayPicCenteredOrUpperRight
	call FadeInIntroPic
	ld hl,OakSpeechText1
	call PrintText
	call GBFadeOutToWhite
	call ClearScreen
	ld a,NIDORINO
	ld [wd0b5],a
	ld [wcf91],a
	call GetMonHeader
	coord hl, 6, 4
	call LoadFlippedFrontSpriteByMonIndex
	call MovePicLeft
	ld hl,OakSpeechText2
	call PrintText
	call GBFadeOutToWhite
	call ClearScreen
	ld de,RedPicFront
	lb bc, Bank(RedPicFront), $00
	call IntroDisplayPicCenteredOrUpperRight
	call MovePicLeft
	ld hl,IntroducePlayerText
	call PrintText
	call ChoosePlayerName
	call GBFadeOutToWhite
	call ClearScreen
	ld de,Rival1Pic
	lb bc, Bank(Rival1Pic), $00
	call IntroDisplayPicCenteredOrUpperRight
	call FadeInIntroPic
	ld hl,IntroduceRivalText
	call PrintText
	call ChooseRivalName
.skipChoosingNames
	call GBFadeOutToWhite
	call ClearScreen
	ld de,RedPicFront
	lb bc, Bank(RedPicFront), $00
	call IntroDisplayPicCenteredOrUpperRight
	call GBFadeInFromWhite
	ld a,[wd72d]
	and a
	jr nz,.next
	ld hl,OakSpeechText3
	call PrintText
.next
	ld a,[H_LOADEDROMBANK]
	push af
	ld a,SFX_SHRINK
	call PlaySound
	pop af
	ld [H_LOADEDROMBANK],a
	ld [MBC1RomBank],a
	ld c,4
	call DelayFrames
	ld de,RedSprite
	ld hl,vSprites
	lb bc, BANK(RedSprite), $0C
	call CopyVideoData
	ld de,ShrinkPic1
	lb bc, BANK(ShrinkPic1), $00
	call IntroDisplayPicCenteredOrUpperRight
	ld c,4
	call DelayFrames
	ld de,ShrinkPic2
	lb bc, BANK(ShrinkPic2), $00
	call IntroDisplayPicCenteredOrUpperRight
	call ResetPlayerSpriteData
	ld a,[H_LOADEDROMBANK]
	push af
	ld a, BANK(Music_PalletTown)
	ld [wAudioROMBank],a
	ld [wAudioSavedROMBank],a
	ld a, 10
	ld [wAudioFadeOutControl],a
	ld a,$FF
	ld [wNewSoundID],a
	call PlaySound ; stop music
	pop af
	ld [H_LOADEDROMBANK],a
	ld [MBC1RomBank],a
	ld c,20
	call DelayFrames
	coord hl, 6, 5
	ld b,7
	ld c,7
	call ClearScreenArea
	call LoadTextBoxTilePatterns
	ld a,1
	ld [wUpdateSpritesEnabled],a
	ld c,50
	call DelayFrames
	call GBFadeOutToWhite
	jp ClearScreen
OakSpeechText1:
	TX_FAR _OakSpeechText1
	db "@"
OakSpeechText2:
	TX_FAR _OakSpeechText2A
	TX_CRY_NIDORINA
	TX_FAR _OakSpeechText2B
	db "@"
IntroducePlayerText:
	TX_FAR _IntroducePlayerText
	db "@"
IntroduceRivalText:
	TX_FAR _IntroduceRivalText
	db "@"
OakSpeechText3:
	TX_FAR _OakSpeechText3
	db "@"

FadeInIntroPic:
	ld hl,IntroFadePalettes
	ld b,6
.next
	ld a,[hli]
	ld [rBGP],a
	ld c,10
	call DelayFrames
	dec b
	jr nz,.next
	ret

IntroFadePalettes:
	db %01010100
	db %10101000
	db %11111100
	db %11111000
	db %11110100
	db %11100100

MovePicLeft:
	ld a,119
	ld [rWX],a
	call DelayFrame

	ld a,$E4
	ld [rBGP],a
.next
	call DelayFrame
	ld a,[rWX]
	sub 8
	cp $FF
	ret z
	ld [rWX],a
	jr .next

DisplayPicCenteredOrUpperRight:
	call GetPredefRegisters
IntroDisplayPicCenteredOrUpperRight:
; b = bank
; de = address of compressed pic
; c: 0 = centred, non-zero = upper-right
	push bc
	ld a,b
	call UncompressSpriteFromDE
	ld hl,sSpriteBuffer1
	ld de,sSpriteBuffer0
	ld bc,$310
	call CopyData
	ld de,vFrontPic
	call InterlaceMergeSpriteBuffers
	pop bc
	ld a,c
	and a
	coord hl, 15, 1
	jr nz,.next
	coord hl, 6, 4
.next
	xor a
	ld [hStartTileID],a
	predef_jump CopyUncompressedPicToTilemap
remove address comments 2016-06-12 00:24:04 +00:00			`SetDefaultNames:`
hall of fame / credits 2015-07-15 02:46:52 +00:00			`ld a, [wLetterPrintingDelayFlags]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push af`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wOptions]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push af`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [wd732]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push af`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`ld hl, wPlayerName`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld bc, $d8a`
			`xor a`
			`call FillMemory`
			`ld hl, wSpriteStateData1`
			`ld bc, $200`
			`xor a`
			`call FillMemory`
			`pop af`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld [wd732], a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`pop af`
No more W_ 2015-08-31 02:38:41 +00:00			`ld [wOptions], a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`pop af`
hall of fame / credits 2015-07-15 02:46:52 +00:00			`ld [wLetterPrintingDelayFlags], a`
misc 2015-07-19 03:49:52 +00:00			`ld a, [wOptionsInitialized]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`and a`
misc 2015-07-19 03:49:52 +00:00			`call z, InitOptions`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld hl, NintenText`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`ld de, wPlayerName`
Replace hardcoded name lengths with NAME_LENGTH 2015-08-11 04:51:20 +00:00			`ld bc, NAME_LENGTH`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call CopyData`
			`ld hl, SonyText`
No more W_ 2015-08-31 02:38:41 +00:00			`ld de, wRivalName`
Replace hardcoded name lengths with NAME_LENGTH 2015-08-11 04:51:20 +00:00			`ld bc, NAME_LENGTH`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`jp CopyData`

remove address comments 2016-06-12 00:24:04 +00:00			`OakSpeech:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a,$FF`
			`call PlaySound ; stop music`
fix variable naming 2015-07-18 15:17:29 +00:00			`ld a, BANK(Music_Routes2)`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld c,a`
fix variable naming 2015-07-18 15:17:29 +00:00			`ld a, MUSIC_ROUTES2`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`call PlayMusic`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ClearScreen`
			`call LoadTextBoxTilePatterns`
			`call SetDefaultNames`
Use macros for predef calls/jumps instead of static ids. 2014-06-16 20:57:26 +00:00			`predef InitPlayerData2`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld hl,wNumBoxItems`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a,POTION`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld [wcf91],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a,1`
named wram variables 2015-07-13 06:00:48 +00:00			`ld [wItemQuantity],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call AddItemToInventory ; give one potion`
documented flags and misc. fixes 2015-08-30 00:15:05 +00:00			`ld a,[wDefaultMap]`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`ld [wDestinationMap],a`
			`call SpecialWarpIn`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`xor a`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`ld [hTilesetType],a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a,[wd732]`
fix variable naming 2015-07-18 15:17:29 +00:00			`bit 1,a ; possibly a debug mode bit`
			`jp nz,.skipChoosingNames`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld de,ProfOakPic`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, Bank(ProfOakPic), $00`
fix variable naming 2015-07-18 15:17:29 +00:00			`call IntroDisplayPicCenteredOrUpperRight`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call FadeInIntroPic`
			`ld hl,OakSpeechText1`
fix variable naming 2015-07-18 15:17:29 +00:00			`call PrintText`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`call GBFadeOutToWhite`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ClearScreen`
			`ld a,NIDORINO`
fix variable naming 2015-07-18 15:17:29 +00:00			`ld [wd0b5],a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld [wcf91],a`
fix variable naming 2015-07-18 15:17:29 +00:00			`call GetMonHeader`
Consolidate coord macros 2015-07-18 20:52:03 +00:00			`coord hl, 6, 4`
fix variable naming 2015-07-18 15:17:29 +00:00			`call LoadFlippedFrontSpriteByMonIndex`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call MovePicLeft`
			`ld hl,OakSpeechText2`
fix variable naming 2015-07-18 15:17:29 +00:00			`call PrintText`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`call GBFadeOutToWhite`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ClearScreen`
			`ld de,RedPicFront`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, Bank(RedPicFront), $00`
fix variable naming 2015-07-18 15:17:29 +00:00			`call IntroDisplayPicCenteredOrUpperRight`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call MovePicLeft`
			`ld hl,IntroducePlayerText`
			`call PrintText`
fix variable naming 2015-07-18 15:17:29 +00:00			`call ChoosePlayerName`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`call GBFadeOutToWhite`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ClearScreen`
			`ld de,Rival1Pic`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, Bank(Rival1Pic), $00`
fix variable naming 2015-07-18 15:17:29 +00:00			`call IntroDisplayPicCenteredOrUpperRight`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call FadeInIntroPic`
			`ld hl,IntroduceRivalText`
			`call PrintText`
fix variable naming 2015-07-18 15:17:29 +00:00			`call ChooseRivalName`
			`.skipChoosingNames`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`call GBFadeOutToWhite`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ClearScreen`
			`ld de,RedPicFront`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, Bank(RedPicFront), $00`
fix variable naming 2015-07-18 15:17:29 +00:00			`call IntroDisplayPicCenteredOrUpperRight`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`call GBFadeInFromWhite`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a,[wd72d]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`and a`
			`jr nz,.next`
			`ld hl,OakSpeechText3`
			`call PrintText`
			`.next`
			`ld a,[H_LOADEDROMBANK]`
			`push af`
Name sound effects 2015-07-19 08:46:12 +00:00			`ld a,SFX_SHRINK`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call PlaySound`
			`pop af`
			`ld [H_LOADEDROMBANK],a`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`ld [MBC1RomBank],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld c,4`
			`call DelayFrames`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`ld de,RedSprite`
Use VRAM constants where applicable. 2014-05-29 08:31:46 +00:00			`ld hl,vSprites`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, BANK(RedSprite), $0C`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call CopyVideoData`
			`ld de,ShrinkPic1`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, BANK(ShrinkPic1), $00`
fix variable naming 2015-07-18 15:17:29 +00:00			`call IntroDisplayPicCenteredOrUpperRight`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld c,4`
			`call DelayFrames`
			`ld de,ShrinkPic2`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, BANK(ShrinkPic2), $00`
fix variable naming 2015-07-18 15:17:29 +00:00			`call IntroDisplayPicCenteredOrUpperRight`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ResetPlayerSpriteData`
			`ld a,[H_LOADEDROMBANK]`
			`push af`
$U-Fish-PC\Daniel$ More music bank references Now the AUDIO constants in audio.asm can be edited freely 2014-06-10 05:10:11 +00:00			`ld a, BANK(Music_PalletTown)`
commented audio code 2015-08-09 05:32:44 +00:00			`ld [wAudioROMBank],a`
			`ld [wAudioSavedROMBank],a`
			`ld a, 10`
			`ld [wAudioFadeOutControl],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a,$FF`
commented audio code 2015-08-09 05:32:44 +00:00			`ld [wNewSoundID],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call PlaySound ; stop music`
			`pop af`
			`ld [H_LOADEDROMBANK],a`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`ld [MBC1RomBank],a`
			`ld c,20`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
Consolidate coord macros 2015-07-18 20:52:03 +00:00			`coord hl, 6, 5`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b,7`
			`ld c,7`
			`call ClearScreenArea`
			`call LoadTextBoxTilePatterns`
			`ld a,1`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`ld [wUpdateSpritesEnabled],a`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`ld c,50`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`call GBFadeOutToWhite`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`jp ClearScreen`
remove address comments 2016-06-12 00:24:04 +00:00			`OakSpeechText1:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _OakSpeechText1`
			`db "@"`
remove address comments 2016-06-12 00:24:04 +00:00			`OakSpeechText2:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _OakSpeechText2A`
Clean up text commands 2016-07-18 06:17:03 +00:00			`TX_CRY_NIDORINA`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _OakSpeechText2B`
			`db "@"`
remove address comments 2016-06-12 00:24:04 +00:00			`IntroducePlayerText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _IntroducePlayerText`
			`db "@"`
remove address comments 2016-06-12 00:24:04 +00:00			`IntroduceRivalText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _IntroduceRivalText`
			`db "@"`
remove address comments 2016-06-12 00:24:04 +00:00			`OakSpeechText3:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _OakSpeechText3`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`FadeInIntroPic:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld hl,IntroFadePalettes`
			`ld b,6`
			`.next`
			`ld a,[hli]`
			`ld [rBGP],a`
			`ld c,10`
			`call DelayFrames`
			`dec b`
			`jr nz,.next`
			`ret`

remove address comments 2016-06-12 00:24:04 +00:00			`IntroFadePalettes:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`db %01010100`
			`db %10101000`
			`db %11111100`
			`db %11111000`
			`db %11110100`
			`db %11100100`

remove address comments 2016-06-12 00:24:04 +00:00			`MovePicLeft:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a,119`
hall of fame / credits 2015-07-15 02:46:52 +00:00			`ld [rWX],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrame`

			`ld a,$E4`
			`ld [rBGP],a`
			`.next`
			`call DelayFrame`
hall of fame / credits 2015-07-15 02:46:52 +00:00			`ld a,[rWX]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`sub 8`
			`cp $FF`
			`ret z`
hall of fame / credits 2015-07-15 02:46:52 +00:00			`ld [rWX],a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`jr .next`

remove address comments 2016-06-12 00:24:04 +00:00			`DisplayPicCenteredOrUpperRight:`
Comment some bank 0 functions, and add wram labels for Predef. 2014-05-23 22:11:09 +00:00			`call GetPredefRegisters`
remove address comments 2016-06-12 00:24:04 +00:00			`IntroDisplayPicCenteredOrUpperRight:`
fix variable naming 2015-07-18 15:17:29 +00:00			`; b = bank`
			`; de = address of compressed pic`
			`; c: 0 = centred, non-zero = upper-right`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push bc`
			`ld a,b`
			`call UncompressSpriteFromDE`
No more S_ 2015-08-31 03:15:32 +00:00			`ld hl,sSpriteBuffer1`
			`ld de,sSpriteBuffer0`
Use VRAM constants where applicable. 2014-05-29 08:31:46 +00:00			`ld bc,$310`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call CopyData`
Use VRAM constants where applicable. 2014-05-29 08:31:46 +00:00			`ld de,vFrontPic`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call InterlaceMergeSpriteBuffers`
			`pop bc`
			`ld a,c`
			`and a`
Consolidate coord macros 2015-07-18 20:52:03 +00:00			`coord hl, 15, 1`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`jr nz,.next`
Consolidate coord macros 2015-07-18 20:52:03 +00:00			`coord hl, 6, 4`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`.next`
			`xor a`
fixed hram aliases and named wram var 2015-07-24 03:48:35 +00:00			`ld [hStartTileID],a`
$U-Daniel-PC\Daniel$ Rename/organize part 1 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:37:53 +00:00			`predef_jump CopyUncompressedPicToTilemap`