pokered/engine/movie/oak_speech/oak_speech.asm

SetDefaultNames:
	ld a, [wLetterPrintingDelayFlags]
	push af
	ld a, [wOptions]
	push af
	ld a, [wd732]
	push af
	ld hl, wPlayerName
	ld bc, wBoxDataEnd - wPlayerName
	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, SFX_STOP_ALL_MUSIC
	call PlaySound
	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, [hLoadedROMBank]
	push af
	ld a, SFX_SHRINK
	call PlaySound
	pop af
	ld [hLoadedROMBank], 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, [hLoadedROMBank]
	push af
	ld a, BANK(Music_PalletTown)
	ld [wAudioROMBank], a
	ld [wAudioSavedROMBank], a
	ld a, 10
	ld [wAudioFadeOutControl], a
	ld a, SFX_STOP_ALL_MUSIC
	ld [wNewSoundID], a
	call PlaySound
	pop af
	ld [hLoadedROMBank], 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, %11100100
	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`
sync engine code with pokeyellow 2016-06-12 04:30:05 +00:00			`ld bc, wBoxDataEnd - wPlayerName`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`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:`
Organize macros/ like pokecrystal While doing so I replaced the StopAllMusic macro with a SFX_STOP_ALL_MUSIC constant and applied it throughout the code. 2020-07-03 20:37:47 +00:00			`ld a, SFX_STOP_ALL_MUSIC`
			`call PlaySound`
fix variable naming 2015-07-18 15:17:29 +00:00			`ld a, BANK(Music_Routes2)`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld hl, wNumBoxItems`
			`ld a, POTION`
			`ld [wcf91], a`
			`ld a, 1`
			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, [wDefaultMap]`
			`ld [wDestinationMap], a`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld [hTilesetType], a`
			`ld a, [wd732]`
			`bit 1, a ; possibly a debug mode bit`
			`jp nz, .skipChoosingNames`
			`ld de, ProfOakPic`
Replace raw hex values with HRAM constants To do: turn constants into labels and use ldh 2020-07-04 02:11:35 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, NIDORINO`
			`ld [wd0b5], a`
			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld de, RedPicFront`
Replace raw hex values with HRAM constants To do: turn constants into labels and use ldh 2020-07-04 02:11:35 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld hl, IntroducePlayerText`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld de, Rival1Pic`
Replace raw hex values with HRAM constants To do: turn constants into labels and use ldh 2020-07-04 02:11:35 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld hl, IntroduceRivalText`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld de, RedPicFront`
Replace raw hex values with HRAM constants To do: turn constants into labels and use ldh 2020-07-04 02:11:35 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`jr nz, .next`
			`ld hl, OakSpeechText3`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call PrintText`
			`.next`
H_CONSTANTNAMES -> hConstantNames 2020-07-03 23:59:41 +00:00			`ld a, [hLoadedROMBank]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push af`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
H_CONSTANTNAMES -> hConstantNames 2020-07-03 23:59:41 +00:00			`ld [hLoadedROMBank], a`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld [MBC1RomBank], a`
			`ld c, 4`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld de, RedSprite`
			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld c, 4`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`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`
H_CONSTANTNAMES -> hConstantNames 2020-07-03 23:59:41 +00:00			`ld a, [hLoadedROMBank]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`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)`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld [wAudioROMBank], a`
			`ld [wAudioSavedROMBank], a`
commented audio code 2015-08-09 05:32:44 +00:00			`ld a, 10`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld [wAudioFadeOutControl], a`
Organize macros/ like pokecrystal While doing so I replaced the StopAllMusic macro with a SFX_STOP_ALL_MUSIC constant and applied it throughout the code. 2020-07-03 20:37:47 +00:00			`ld a, SFX_STOP_ALL_MUSIC`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld [wNewSoundID], a`
Organize macros/ like pokecrystal While doing so I replaced the StopAllMusic macro with a SFX_STOP_ALL_MUSIC constant and applied it throughout the code. 2020-07-03 20:37:47 +00:00			`call PlaySound`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`pop af`
H_CONSTANTNAMES -> hConstantNames 2020-07-03 23:59:41 +00:00			`ld [hLoadedROMBank], a`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld b, 7`
			`ld c, 7`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call ClearScreenArea`
			`call LoadTextBoxTilePatterns`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, 1`
			`ld [wUpdateSpritesEnabled], a`
			`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:`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld hl, IntroFadePalettes`
			`ld b, 6`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`.next`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, [hli]`
			`ld [rBGP], a`
			`ld c, 10`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
			`dec b`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`jr nz, .next`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`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:`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, 119`
			`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`

Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, %11100100`
			`ld [rBGP], a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`.next`
			`call DelayFrame`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, b`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call UncompressSpriteFromDE`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld hl, sSpriteBuffer1`
			`ld de, sSpriteBuffer0`
			`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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, c`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`and a`
Consolidate coord macros 2015-07-18 20:52:03 +00:00			`coord hl, 15, 1`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +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`