mirror of
https://github.com/thornAvery/kep-hack.git
synced 2026-02-06 15:45:24 +13:00
Add subdirectories to engine/ similar to pokecrystal
This commit is contained in:
Rangi
parent
5559d51c86
commit
f275790aec
124 changed files with 342 additions and 346 deletions
977
engine/link/cable_club.asm
Executable file
977
engine/link/cable_club.asm
Executable file
|
|
@ -0,0 +1,977 @@
|
|||
; performs the appropriate action when the player uses the gameboy on the table in the Colosseum or Trade Center
|
||||
; In the Colosseum, it starts a battle. In the Trade Center, it displays the trade selection screen.
|
||||
; Before doing either action, it swaps random numbers, trainer names and party data with the other gameboy.
|
||||
CableClub_DoBattleOrTrade:
|
||||
ld c, 80
|
||||
call DelayFrames
|
||||
call ClearScreen
|
||||
call UpdateSprites
|
||||
call LoadFontTilePatterns
|
||||
call LoadHpBarAndStatusTilePatterns
|
||||
call LoadTrainerInfoTextBoxTiles
|
||||
coord hl, 3, 8
|
||||
ld b, 2
|
||||
ld c, 12
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 4, 10
|
||||
ld de, PleaseWaitString
|
||||
call PlaceString
|
||||
ld hl, wPlayerNumHits
|
||||
xor a
|
||||
ld [hli], a
|
||||
ld [hl], $50
|
||||
; fall through
|
||||
|
||||
; This is called after completing a trade.
|
||||
CableClub_DoBattleOrTradeAgain:
|
||||
ld hl, wSerialPlayerDataBlock
|
||||
ld a, SERIAL_PREAMBLE_BYTE
|
||||
ld b, 6
|
||||
.writePlayerDataBlockPreambleLoop
|
||||
ld [hli], a
|
||||
dec b
|
||||
jr nz, .writePlayerDataBlockPreambleLoop
|
||||
ld hl, wSerialRandomNumberListBlock
|
||||
ld a, SERIAL_PREAMBLE_BYTE
|
||||
ld b, 7
|
||||
.writeRandomNumberListPreambleLoop
|
||||
ld [hli], a
|
||||
dec b
|
||||
jr nz, .writeRandomNumberListPreambleLoop
|
||||
ld b, 10
|
||||
.generateRandomNumberListLoop
|
||||
call Random
|
||||
cp SERIAL_PREAMBLE_BYTE ; all the random numbers have to be less than the preamble byte
|
||||
jr nc, .generateRandomNumberListLoop
|
||||
ld [hli], a
|
||||
dec b
|
||||
jr nz, .generateRandomNumberListLoop
|
||||
ld hl, wSerialPartyMonsPatchList
|
||||
ld a, SERIAL_PREAMBLE_BYTE
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld b, $c8
|
||||
xor a
|
||||
.zeroPlayerDataPatchListLoop
|
||||
ld [hli], a
|
||||
dec b
|
||||
jr nz, .zeroPlayerDataPatchListLoop
|
||||
ld hl, wGrassRate
|
||||
ld bc, wTrainerHeaderPtr - wGrassRate
|
||||
.zeroEnemyPartyLoop
|
||||
xor a
|
||||
ld [hli], a
|
||||
dec bc
|
||||
ld a, b
|
||||
or c
|
||||
jr nz, .zeroEnemyPartyLoop
|
||||
ld hl, wPartyMons - 1
|
||||
ld de, wSerialPartyMonsPatchList + 10
|
||||
ld bc, 0
|
||||
.patchPartyMonsLoop
|
||||
inc c
|
||||
ld a, c
|
||||
cp SERIAL_PREAMBLE_BYTE
|
||||
jr z, .startPatchListPart2
|
||||
ld a, b
|
||||
dec a ; are we in part 2 of the patch list?
|
||||
jr nz, .checkPlayerDataByte ; jump if in part 1
|
||||
; if we're in part 2
|
||||
ld a, c
|
||||
cp (wPartyMonOT - (wPartyMons - 1)) - (SERIAL_PREAMBLE_BYTE - 1)
|
||||
jr z, .finishedPatchingPlayerData
|
||||
.checkPlayerDataByte
|
||||
inc hl
|
||||
ld a, [hl]
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr nz, .patchPartyMonsLoop
|
||||
; if the player data byte matches SERIAL_NO_DATA_BYTE, patch it with $FF and record the offset in the patch list
|
||||
ld a, c
|
||||
ld [de], a
|
||||
inc de
|
||||
ld [hl], $ff
|
||||
jr .patchPartyMonsLoop
|
||||
.startPatchListPart2
|
||||
ld a, SERIAL_PATCH_LIST_PART_TERMINATOR
|
||||
ld [de], a ; end of part 1
|
||||
inc de
|
||||
lb bc, 1, 0
|
||||
jr .patchPartyMonsLoop
|
||||
.finishedPatchingPlayerData
|
||||
ld a, SERIAL_PATCH_LIST_PART_TERMINATOR
|
||||
ld [de], a ; end of part 2
|
||||
call Serial_SyncAndExchangeNybble
|
||||
ld a, [hSerialConnectionStatus]
|
||||
cp USING_INTERNAL_CLOCK
|
||||
jr nz, .skipSendingTwoZeroBytes
|
||||
; if using internal clock
|
||||
; send two zero bytes for syncing purposes?
|
||||
call Delay3
|
||||
xor a
|
||||
ld [hSerialSendData], a
|
||||
ld a, START_TRANSFER_INTERNAL_CLOCK
|
||||
ld [rSC], a
|
||||
call DelayFrame
|
||||
xor a
|
||||
ld [hSerialSendData], a
|
||||
ld a, START_TRANSFER_INTERNAL_CLOCK
|
||||
ld [rSC], a
|
||||
.skipSendingTwoZeroBytes
|
||||
call Delay3
|
||||
ld a, (1 << SERIAL)
|
||||
ld [rIE], a
|
||||
ld hl, wSerialRandomNumberListBlock
|
||||
ld de, wSerialOtherGameboyRandomNumberListBlock
|
||||
ld bc, $11
|
||||
call Serial_ExchangeBytes
|
||||
ld a, SERIAL_NO_DATA_BYTE
|
||||
ld [de], a
|
||||
ld hl, wSerialPlayerDataBlock
|
||||
ld de, wSerialEnemyDataBlock
|
||||
ld bc, $1a8
|
||||
call Serial_ExchangeBytes
|
||||
ld a, SERIAL_NO_DATA_BYTE
|
||||
ld [de], a
|
||||
ld hl, wSerialPartyMonsPatchList
|
||||
ld de, wSerialEnemyMonsPatchList
|
||||
ld bc, $c8
|
||||
call Serial_ExchangeBytes
|
||||
ld a, (1 << SERIAL) | (1 << TIMER) | (1 << VBLANK)
|
||||
ld [rIE], a
|
||||
ld a, $ff
|
||||
call PlaySound
|
||||
ld a, [hSerialConnectionStatus]
|
||||
cp USING_INTERNAL_CLOCK
|
||||
jr z, .skipCopyingRandomNumberList ; the list generated by the gameboy clocking the connection is used by both gameboys
|
||||
ld hl, wSerialOtherGameboyRandomNumberListBlock
|
||||
.findStartOfRandomNumberListLoop
|
||||
ld a, [hli]
|
||||
and a
|
||||
jr z, .findStartOfRandomNumberListLoop
|
||||
cp SERIAL_PREAMBLE_BYTE
|
||||
jr z, .findStartOfRandomNumberListLoop
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .findStartOfRandomNumberListLoop
|
||||
dec hl
|
||||
ld de, wLinkBattleRandomNumberList
|
||||
ld c, 10
|
||||
.copyRandomNumberListLoop
|
||||
ld a, [hli]
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .copyRandomNumberListLoop
|
||||
ld [de], a
|
||||
inc de
|
||||
dec c
|
||||
jr nz, .copyRandomNumberListLoop
|
||||
.skipCopyingRandomNumberList
|
||||
ld hl, wSerialEnemyDataBlock + 3
|
||||
.findStartOfEnemyNameLoop
|
||||
ld a, [hli]
|
||||
and a
|
||||
jr z, .findStartOfEnemyNameLoop
|
||||
cp SERIAL_PREAMBLE_BYTE
|
||||
jr z, .findStartOfEnemyNameLoop
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .findStartOfEnemyNameLoop
|
||||
dec hl
|
||||
ld de, wLinkEnemyTrainerName
|
||||
ld c, NAME_LENGTH
|
||||
.copyEnemyNameLoop
|
||||
ld a, [hli]
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .copyEnemyNameLoop
|
||||
ld [de], a
|
||||
inc de
|
||||
dec c
|
||||
jr nz, .copyEnemyNameLoop
|
||||
ld de, wEnemyPartyCount
|
||||
ld bc, wTrainerHeaderPtr - wEnemyPartyCount
|
||||
.copyEnemyPartyLoop
|
||||
ld a, [hli]
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .copyEnemyPartyLoop
|
||||
ld [de], a
|
||||
inc de
|
||||
dec bc
|
||||
ld a, b
|
||||
or c
|
||||
jr nz, .copyEnemyPartyLoop
|
||||
ld de, wSerialPartyMonsPatchList
|
||||
ld hl, wPartyMons
|
||||
ld c, 2 ; patch list has 2 parts
|
||||
.unpatchPartyMonsLoop
|
||||
ld a, [de]
|
||||
inc de
|
||||
and a
|
||||
jr z, .unpatchPartyMonsLoop
|
||||
cp SERIAL_PREAMBLE_BYTE
|
||||
jr z, .unpatchPartyMonsLoop
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .unpatchPartyMonsLoop
|
||||
cp SERIAL_PATCH_LIST_PART_TERMINATOR
|
||||
jr z, .finishedPartyMonsPatchListPart
|
||||
push hl
|
||||
push bc
|
||||
ld b, 0
|
||||
dec a
|
||||
ld c, a
|
||||
add hl, bc
|
||||
ld a, SERIAL_NO_DATA_BYTE
|
||||
ld [hl], a
|
||||
pop bc
|
||||
pop hl
|
||||
jr .unpatchPartyMonsLoop
|
||||
.finishedPartyMonsPatchListPart
|
||||
ld hl, wPartyMons + (SERIAL_PREAMBLE_BYTE - 1)
|
||||
dec c ; is there another part?
|
||||
jr nz, .unpatchPartyMonsLoop
|
||||
ld de, wSerialEnemyMonsPatchList
|
||||
ld hl, wEnemyMons
|
||||
ld c, 2 ; patch list has 2 parts
|
||||
.unpatchEnemyMonsLoop
|
||||
ld a, [de]
|
||||
inc de
|
||||
and a
|
||||
jr z, .unpatchEnemyMonsLoop
|
||||
cp SERIAL_PREAMBLE_BYTE
|
||||
jr z, .unpatchEnemyMonsLoop
|
||||
cp SERIAL_NO_DATA_BYTE
|
||||
jr z, .unpatchEnemyMonsLoop
|
||||
cp SERIAL_PATCH_LIST_PART_TERMINATOR
|
||||
jr z, .finishedEnemyMonsPatchListPart
|
||||
push hl
|
||||
push bc
|
||||
ld b, 0
|
||||
dec a
|
||||
ld c, a
|
||||
add hl, bc
|
||||
ld a, SERIAL_NO_DATA_BYTE
|
||||
ld [hl], a
|
||||
pop bc
|
||||
pop hl
|
||||
jr .unpatchEnemyMonsLoop
|
||||
.finishedEnemyMonsPatchListPart
|
||||
ld hl, wEnemyMons + (SERIAL_PREAMBLE_BYTE - 1)
|
||||
dec c
|
||||
jr nz, .unpatchEnemyMonsLoop
|
||||
ld a, wEnemyMonOT % $100
|
||||
ld [wUnusedCF8D], a
|
||||
ld a, wEnemyMonOT / $100
|
||||
ld [wUnusedCF8D + 1], a
|
||||
xor a
|
||||
ld [wTradeCenterPointerTableIndex], a
|
||||
ld a, $ff
|
||||
call PlaySound
|
||||
ld a, [hSerialConnectionStatus]
|
||||
cp USING_INTERNAL_CLOCK
|
||||
ld c, 66
|
||||
call z, DelayFrames ; delay if using internal clock
|
||||
ld a, [wLinkState]
|
||||
cp LINK_STATE_START_BATTLE
|
||||
ld a, LINK_STATE_TRADING
|
||||
ld [wLinkState], a
|
||||
jr nz, .trading
|
||||
ld a, LINK_STATE_BATTLING
|
||||
ld [wLinkState], a
|
||||
ld a, OPP_SONY1
|
||||
ld [wCurOpponent], a
|
||||
call ClearScreen
|
||||
call Delay3
|
||||
ld hl, wOptions
|
||||
res 7, [hl]
|
||||
predef InitOpponent
|
||||
predef HealParty
|
||||
jp ReturnToCableClubRoom
|
||||
.trading
|
||||
ld c, BANK(Music_GameCorner)
|
||||
ld a, MUSIC_GAME_CORNER
|
||||
call PlayMusic
|
||||
jr CallCurrentTradeCenterFunction
|
||||
|
||||
PleaseWaitString:
|
||||
db "PLEASE WAIT!@"
|
||||
|
||||
CallCurrentTradeCenterFunction:
|
||||
ld hl, TradeCenterPointerTable
|
||||
ld b, 0
|
||||
ld a, [wTradeCenterPointerTableIndex]
|
||||
cp $ff
|
||||
jp z, DisplayTitleScreen
|
||||
add a
|
||||
ld c, a
|
||||
add hl, bc
|
||||
ld a, [hli]
|
||||
ld h, [hl]
|
||||
ld l, a
|
||||
jp hl
|
||||
|
||||
TradeCenter_SelectMon:
|
||||
call ClearScreen
|
||||
call LoadTrainerInfoTextBoxTiles
|
||||
call TradeCenter_DrawPartyLists
|
||||
call TradeCenter_DrawCancelBox
|
||||
xor a
|
||||
ld hl, wSerialSyncAndExchangeNybbleReceiveData
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hl], a
|
||||
ld [wMenuWatchMovingOutOfBounds], a
|
||||
ld [wCurrentMenuItem], a
|
||||
ld [wLastMenuItem], a
|
||||
ld [wMenuJoypadPollCount], a
|
||||
inc a
|
||||
ld [wSerialExchangeNybbleSendData], a
|
||||
jp .playerMonMenu
|
||||
.enemyMonMenu
|
||||
xor a
|
||||
ld [wMenuWatchMovingOutOfBounds], a
|
||||
inc a
|
||||
ld [wWhichTradeMonSelectionMenu], a
|
||||
ld a, D_DOWN | D_LEFT | A_BUTTON
|
||||
ld [wMenuWatchedKeys], a
|
||||
ld a, [wEnemyPartyCount]
|
||||
ld [wMaxMenuItem], a
|
||||
ld a, 9
|
||||
ld [wTopMenuItemY], a
|
||||
ld a, 1
|
||||
ld [wTopMenuItemX], a
|
||||
.enemyMonMenu_HandleInput
|
||||
ld hl, hFlags_0xFFF6
|
||||
set 1, [hl]
|
||||
call HandleMenuInput
|
||||
ld hl, hFlags_0xFFF6
|
||||
res 1, [hl]
|
||||
and a
|
||||
jp z, .getNewInput
|
||||
bit 0, a ; A button pressed?
|
||||
jr z, .enemyMonMenu_ANotPressed
|
||||
; if A button pressed
|
||||
ld a, [wMaxMenuItem]
|
||||
ld c, a
|
||||
ld a, [wCurrentMenuItem]
|
||||
cp c
|
||||
jr c, .displayEnemyMonStats
|
||||
ld a, [wMaxMenuItem]
|
||||
dec a
|
||||
ld [wCurrentMenuItem], a
|
||||
.displayEnemyMonStats
|
||||
ld a, INIT_ENEMYOT_LIST
|
||||
ld [wInitListType], a
|
||||
callab InitList ; the list isn't used
|
||||
ld hl, wEnemyMons
|
||||
call TradeCenter_DisplayStats
|
||||
jp .getNewInput
|
||||
.enemyMonMenu_ANotPressed
|
||||
bit 5, a ; Left pressed?
|
||||
jr z, .enemyMonMenu_LeftNotPressed
|
||||
; if Left pressed, switch back to the player mon menu
|
||||
xor a ; player mon menu
|
||||
ld [wWhichTradeMonSelectionMenu], a
|
||||
ld a, [wMenuCursorLocation]
|
||||
ld l, a
|
||||
ld a, [wMenuCursorLocation + 1]
|
||||
ld h, a
|
||||
ld a, [wTileBehindCursor]
|
||||
ld [hl], a
|
||||
ld a, [wCurrentMenuItem]
|
||||
ld b, a
|
||||
ld a, [wPartyCount]
|
||||
dec a
|
||||
cp b
|
||||
jr nc, .playerMonMenu
|
||||
ld [wCurrentMenuItem], a
|
||||
jr .playerMonMenu
|
||||
.enemyMonMenu_LeftNotPressed
|
||||
bit 7, a ; Down pressed?
|
||||
jp z, .getNewInput
|
||||
jp .selectedCancelMenuItem ; jump if Down pressed
|
||||
.playerMonMenu
|
||||
xor a ; player mon menu
|
||||
ld [wWhichTradeMonSelectionMenu], a
|
||||
ld [wMenuWatchMovingOutOfBounds], a
|
||||
ld a, D_DOWN | D_RIGHT | A_BUTTON
|
||||
ld [wMenuWatchedKeys], a
|
||||
ld a, [wPartyCount]
|
||||
ld [wMaxMenuItem], a
|
||||
ld a, 1
|
||||
ld [wTopMenuItemY], a
|
||||
ld a, 1
|
||||
ld [wTopMenuItemX], a
|
||||
coord hl, 1, 1
|
||||
lb bc, 6, 1
|
||||
call ClearScreenArea
|
||||
.playerMonMenu_HandleInput
|
||||
ld hl, hFlags_0xFFF6
|
||||
set 1, [hl]
|
||||
call HandleMenuInput
|
||||
ld hl, hFlags_0xFFF6
|
||||
res 1, [hl]
|
||||
and a ; was anything pressed?
|
||||
jr nz, .playerMonMenu_SomethingPressed
|
||||
jp .getNewInput
|
||||
.playerMonMenu_SomethingPressed
|
||||
bit 0, a ; A button pressed?
|
||||
jr z, .playerMonMenu_ANotPressed
|
||||
jp .chosePlayerMon ; jump if A button pressed
|
||||
; unreachable code
|
||||
ld a, INIT_PLAYEROT_LIST
|
||||
ld [wInitListType], a
|
||||
callab InitList ; the list isn't used
|
||||
call TradeCenter_DisplayStats
|
||||
jp .getNewInput
|
||||
.playerMonMenu_ANotPressed
|
||||
bit 4, a ; Right pressed?
|
||||
jr z, .playerMonMenu_RightNotPressed
|
||||
; if Right pressed, switch to the enemy mon menu
|
||||
ld a, $1 ; enemy mon menu
|
||||
ld [wWhichTradeMonSelectionMenu], a
|
||||
ld a, [wMenuCursorLocation]
|
||||
ld l, a
|
||||
ld a, [wMenuCursorLocation + 1]
|
||||
ld h, a
|
||||
ld a, [wTileBehindCursor]
|
||||
ld [hl], a
|
||||
ld a, [wCurrentMenuItem]
|
||||
ld b, a
|
||||
ld a, [wEnemyPartyCount]
|
||||
dec a
|
||||
cp b
|
||||
jr nc, .notPastLastEnemyMon
|
||||
; when switching to the enemy mon menu, if the menu selection would be past the last enemy mon, select the last enemy mon
|
||||
ld [wCurrentMenuItem], a
|
||||
.notPastLastEnemyMon
|
||||
jp .enemyMonMenu
|
||||
.playerMonMenu_RightNotPressed
|
||||
bit 7, a ; Down pressed?
|
||||
jr z, .getNewInput
|
||||
jp .selectedCancelMenuItem ; jump if Down pressed
|
||||
.getNewInput
|
||||
ld a, [wWhichTradeMonSelectionMenu]
|
||||
and a
|
||||
jp z, .playerMonMenu_HandleInput
|
||||
jp .enemyMonMenu_HandleInput
|
||||
.chosePlayerMon
|
||||
call SaveScreenTilesToBuffer1
|
||||
call PlaceUnfilledArrowMenuCursor
|
||||
ld a, [wMaxMenuItem]
|
||||
ld c, a
|
||||
ld a, [wCurrentMenuItem]
|
||||
cp c
|
||||
jr c, .displayStatsTradeMenu
|
||||
ld a, [wMaxMenuItem]
|
||||
dec a
|
||||
.displayStatsTradeMenu
|
||||
push af
|
||||
coord hl, 0, 14
|
||||
ld b, 2
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 2, 16
|
||||
ld de, .statsTrade
|
||||
call PlaceString
|
||||
xor a
|
||||
ld [wCurrentMenuItem], a
|
||||
ld [wLastMenuItem], a
|
||||
ld [wMenuJoypadPollCount], a
|
||||
ld [wMaxMenuItem], a
|
||||
ld a, 16
|
||||
ld [wTopMenuItemY], a
|
||||
.selectStatsMenuItem
|
||||
ld a, " "
|
||||
Coorda 11, 16
|
||||
ld a, D_RIGHT | B_BUTTON | A_BUTTON
|
||||
ld [wMenuWatchedKeys], a
|
||||
ld a, 1
|
||||
ld [wTopMenuItemX], a
|
||||
call HandleMenuInput
|
||||
bit 4, a ; Right pressed?
|
||||
jr nz, .selectTradeMenuItem
|
||||
bit 1, a ; B button pressed?
|
||||
jr z, .displayPlayerMonStats
|
||||
.cancelPlayerMonChoice
|
||||
pop af
|
||||
ld [wCurrentMenuItem], a
|
||||
call LoadScreenTilesFromBuffer1
|
||||
jp .playerMonMenu
|
||||
.selectTradeMenuItem
|
||||
ld a, " "
|
||||
Coorda 1, 16
|
||||
ld a, D_LEFT | B_BUTTON | A_BUTTON
|
||||
ld [wMenuWatchedKeys], a
|
||||
ld a, 11
|
||||
ld [wTopMenuItemX], a
|
||||
call HandleMenuInput
|
||||
bit 5, a ; Left pressed?
|
||||
jr nz, .selectStatsMenuItem
|
||||
bit 1, a ; B button pressed?
|
||||
jr nz, .cancelPlayerMonChoice
|
||||
jr .choseTrade
|
||||
.displayPlayerMonStats
|
||||
pop af
|
||||
ld [wCurrentMenuItem], a
|
||||
ld a, INIT_PLAYEROT_LIST
|
||||
ld [wInitListType], a
|
||||
callab InitList ; the list isn't used
|
||||
call TradeCenter_DisplayStats
|
||||
call LoadScreenTilesFromBuffer1
|
||||
jp .playerMonMenu
|
||||
.choseTrade
|
||||
call PlaceUnfilledArrowMenuCursor
|
||||
pop af
|
||||
ld [wCurrentMenuItem], a
|
||||
ld [wTradingWhichPlayerMon], a
|
||||
ld [wSerialExchangeNybbleSendData], a
|
||||
call Serial_PrintWaitingTextAndSyncAndExchangeNybble
|
||||
ld a, [wSerialSyncAndExchangeNybbleReceiveData]
|
||||
cp $f
|
||||
jp z, CallCurrentTradeCenterFunction ; go back to the beginning of the trade selection menu if the other person cancelled
|
||||
ld [wTradingWhichEnemyMon], a
|
||||
call TradeCenter_PlaceSelectedEnemyMonMenuCursor
|
||||
ld a, $1 ; TradeCenter_Trade
|
||||
ld [wTradeCenterPointerTableIndex], a
|
||||
jp CallCurrentTradeCenterFunction
|
||||
.statsTrade
|
||||
db "STATS TRADE@"
|
||||
.selectedCancelMenuItem
|
||||
ld a, [wCurrentMenuItem]
|
||||
ld b, a
|
||||
ld a, [wMaxMenuItem]
|
||||
cp b
|
||||
jp nz, .getNewInput
|
||||
ld a, [wMenuCursorLocation]
|
||||
ld l, a
|
||||
ld a, [wMenuCursorLocation + 1]
|
||||
ld h, a
|
||||
ld a, " "
|
||||
ld [hl], a
|
||||
.cancelMenuItem_Loop
|
||||
ld a, "▶" ; filled arrow cursor
|
||||
Coorda 1, 16
|
||||
.cancelMenuItem_JoypadLoop
|
||||
call JoypadLowSensitivity
|
||||
ld a, [hJoy5]
|
||||
and a ; pressed anything?
|
||||
jr z, .cancelMenuItem_JoypadLoop
|
||||
bit 0, a ; A button pressed?
|
||||
jr nz, .cancelMenuItem_APressed
|
||||
bit 6, a ; Up pressed?
|
||||
jr z, .cancelMenuItem_JoypadLoop
|
||||
; if Up pressed
|
||||
ld a, " "
|
||||
Coorda 1, 16
|
||||
ld a, [wPartyCount]
|
||||
dec a
|
||||
ld [wCurrentMenuItem], a
|
||||
jp .playerMonMenu
|
||||
.cancelMenuItem_APressed
|
||||
ld a, "▷" ; unfilled arrow cursor
|
||||
Coorda 1, 16
|
||||
ld a, $f
|
||||
ld [wSerialExchangeNybbleSendData], a
|
||||
call Serial_PrintWaitingTextAndSyncAndExchangeNybble
|
||||
ld a, [wSerialSyncAndExchangeNybbleReceiveData]
|
||||
cp $f ; did the other person choose Cancel too?
|
||||
jr nz, .cancelMenuItem_Loop
|
||||
; fall through
|
||||
|
||||
ReturnToCableClubRoom:
|
||||
call GBPalWhiteOutWithDelay3
|
||||
ld hl, wFontLoaded
|
||||
ld a, [hl]
|
||||
push af
|
||||
push hl
|
||||
res 0, [hl]
|
||||
xor a
|
||||
ld [wd72d], a
|
||||
dec a
|
||||
ld [wDestinationWarpID], a
|
||||
call LoadMapData
|
||||
callba ClearVariablesOnEnterMap
|
||||
pop hl
|
||||
pop af
|
||||
ld [hl], a
|
||||
call GBFadeInFromWhite
|
||||
ret
|
||||
|
||||
TradeCenter_DrawCancelBox:
|
||||
coord hl, 11, 15
|
||||
ld a, $7e
|
||||
ld bc, 2 * SCREEN_WIDTH + 9
|
||||
call FillMemory
|
||||
coord hl, 0, 15
|
||||
ld b, 1
|
||||
ld c, 9
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 2, 16
|
||||
ld de, CancelTextString
|
||||
jp PlaceString
|
||||
|
||||
CancelTextString:
|
||||
db "CANCEL@"
|
||||
|
||||
TradeCenter_PlaceSelectedEnemyMonMenuCursor:
|
||||
ld a, [wSerialSyncAndExchangeNybbleReceiveData]
|
||||
coord hl, 1, 9
|
||||
ld bc, SCREEN_WIDTH
|
||||
call AddNTimes
|
||||
ld [hl], "▷" ; cursor
|
||||
ret
|
||||
|
||||
TradeCenter_DisplayStats:
|
||||
ld a, [wCurrentMenuItem]
|
||||
ld [wWhichPokemon], a
|
||||
predef StatusScreen
|
||||
predef StatusScreen2
|
||||
call GBPalNormal
|
||||
call LoadTrainerInfoTextBoxTiles
|
||||
call TradeCenter_DrawPartyLists
|
||||
jp TradeCenter_DrawCancelBox
|
||||
|
||||
TradeCenter_DrawPartyLists:
|
||||
coord hl, 0, 0
|
||||
ld b, 6
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 0, 8
|
||||
ld b, 6
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 5, 0
|
||||
ld de, wPlayerName
|
||||
call PlaceString
|
||||
coord hl, 5, 8
|
||||
ld de, wLinkEnemyTrainerName
|
||||
call PlaceString
|
||||
coord hl, 2, 1
|
||||
ld de, wPartySpecies
|
||||
call TradeCenter_PrintPartyListNames
|
||||
coord hl, 2, 9
|
||||
ld de, wEnemyPartyMons
|
||||
; fall through
|
||||
|
||||
TradeCenter_PrintPartyListNames:
|
||||
ld c, $0
|
||||
.loop
|
||||
ld a, [de]
|
||||
cp $ff
|
||||
ret z
|
||||
ld [wd11e], a
|
||||
push bc
|
||||
push hl
|
||||
push de
|
||||
push hl
|
||||
ld a, c
|
||||
ld [$ff95], a
|
||||
call GetMonName
|
||||
pop hl
|
||||
call PlaceString
|
||||
pop de
|
||||
inc de
|
||||
pop hl
|
||||
ld bc, 20
|
||||
add hl, bc
|
||||
pop bc
|
||||
inc c
|
||||
jr .loop
|
||||
|
||||
TradeCenter_Trade:
|
||||
ld c, 100
|
||||
call DelayFrames
|
||||
xor a
|
||||
ld [wSerialExchangeNybbleSendData + 1], a ; unnecessary
|
||||
ld [wSerialExchangeNybbleReceiveData], a
|
||||
ld [wMenuWatchMovingOutOfBounds], a
|
||||
ld [wMenuJoypadPollCount], a
|
||||
coord hl, 0, 12
|
||||
ld b, 4
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
ld a, [wTradingWhichPlayerMon]
|
||||
ld hl, wPartySpecies
|
||||
ld c, a
|
||||
ld b, 0
|
||||
add hl, bc
|
||||
ld a, [hl]
|
||||
ld [wd11e], a
|
||||
call GetMonName
|
||||
ld hl, wcd6d
|
||||
ld de, wNameOfPlayerMonToBeTraded
|
||||
ld bc, NAME_LENGTH
|
||||
call CopyData
|
||||
ld a, [wTradingWhichEnemyMon]
|
||||
ld hl, wEnemyPartyMons
|
||||
ld c, a
|
||||
ld b, 0
|
||||
add hl, bc
|
||||
ld a, [hl]
|
||||
ld [wd11e], a
|
||||
call GetMonName
|
||||
ld hl, WillBeTradedText
|
||||
coord bc, 1, 14
|
||||
call TextCommandProcessor
|
||||
call SaveScreenTilesToBuffer1
|
||||
coord hl, 10, 7
|
||||
lb bc, 8, 11
|
||||
ld a, TRADE_CANCEL_MENU
|
||||
ld [wTwoOptionMenuID], a
|
||||
ld a, TWO_OPTION_MENU
|
||||
ld [wTextBoxID], a
|
||||
call DisplayTextBoxID
|
||||
call LoadScreenTilesFromBuffer1
|
||||
ld a, [wCurrentMenuItem]
|
||||
and a
|
||||
jr z, .tradeConfirmed
|
||||
; if trade cancelled
|
||||
ld a, $1
|
||||
ld [wSerialExchangeNybbleSendData], a
|
||||
coord hl, 0, 12
|
||||
ld b, 4
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 1, 14
|
||||
ld de, TradeCanceled
|
||||
call PlaceString
|
||||
call Serial_PrintWaitingTextAndSyncAndExchangeNybble
|
||||
jp .tradeCancelled
|
||||
.tradeConfirmed
|
||||
ld a, $2
|
||||
ld [wSerialExchangeNybbleSendData], a
|
||||
call Serial_PrintWaitingTextAndSyncAndExchangeNybble
|
||||
ld a, [wSerialSyncAndExchangeNybbleReceiveData]
|
||||
dec a ; did the other person cancel?
|
||||
jr nz, .doTrade
|
||||
; if the other person cancelled
|
||||
coord hl, 0, 12
|
||||
ld b, 4
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 1, 14
|
||||
ld de, TradeCanceled
|
||||
call PlaceString
|
||||
jp .tradeCancelled
|
||||
.doTrade
|
||||
ld a, [wTradingWhichPlayerMon]
|
||||
ld hl, wPartyMonOT
|
||||
call SkipFixedLengthTextEntries
|
||||
ld de, wTradedPlayerMonOT
|
||||
ld bc, NAME_LENGTH
|
||||
call CopyData
|
||||
ld hl, wPartyMon1Species
|
||||
ld a, [wTradingWhichPlayerMon]
|
||||
ld bc, wPartyMon2 - wPartyMon1
|
||||
call AddNTimes
|
||||
ld bc, wPartyMon1OTID - wPartyMon1
|
||||
add hl, bc
|
||||
ld a, [hli]
|
||||
ld [wTradedPlayerMonOTID], a
|
||||
ld a, [hl]
|
||||
ld [wTradedPlayerMonOTID + 1], a
|
||||
ld a, [wTradingWhichEnemyMon]
|
||||
ld hl, wEnemyMonOT
|
||||
call SkipFixedLengthTextEntries
|
||||
ld de, wTradedEnemyMonOT
|
||||
ld bc, NAME_LENGTH
|
||||
call CopyData
|
||||
ld hl, wEnemyMons
|
||||
ld a, [wTradingWhichEnemyMon]
|
||||
ld bc, wEnemyMon2 - wEnemyMon1
|
||||
call AddNTimes
|
||||
ld bc, wEnemyMon1OTID - wEnemyMon1
|
||||
add hl, bc
|
||||
ld a, [hli]
|
||||
ld [wTradedEnemyMonOTID], a
|
||||
ld a, [hl]
|
||||
ld [wTradedEnemyMonOTID + 1], a
|
||||
ld a, [wTradingWhichPlayerMon]
|
||||
ld [wWhichPokemon], a
|
||||
ld hl, wPartySpecies
|
||||
ld b, 0
|
||||
ld c, a
|
||||
add hl, bc
|
||||
ld a, [hl]
|
||||
ld [wTradedPlayerMonSpecies], a
|
||||
xor a
|
||||
ld [wRemoveMonFromBox], a
|
||||
call RemovePokemon
|
||||
ld a, [wTradingWhichEnemyMon]
|
||||
ld c, a
|
||||
ld [wWhichPokemon], a
|
||||
ld hl, wEnemyPartyMons
|
||||
ld d, 0
|
||||
ld e, a
|
||||
add hl, de
|
||||
ld a, [hl]
|
||||
ld [wcf91], a
|
||||
ld hl, wEnemyMons
|
||||
ld a, c
|
||||
ld bc, wEnemyMon2 - wEnemyMon1
|
||||
call AddNTimes
|
||||
ld de, wLoadedMon
|
||||
ld bc, wEnemyMon2 - wEnemyMon1
|
||||
call CopyData
|
||||
call AddEnemyMonToPlayerParty
|
||||
ld a, [wPartyCount]
|
||||
dec a
|
||||
ld [wWhichPokemon], a
|
||||
ld a, $1
|
||||
ld [wForceEvolution], a
|
||||
ld a, [wTradingWhichEnemyMon]
|
||||
ld hl, wEnemyPartyMons
|
||||
ld b, 0
|
||||
ld c, a
|
||||
add hl, bc
|
||||
ld a, [hl]
|
||||
ld [wTradedEnemyMonSpecies], a
|
||||
ld a, 10
|
||||
ld [wAudioFadeOutControl], a
|
||||
ld a, BANK(Music_SafariZone)
|
||||
ld [wAudioSavedROMBank], a
|
||||
ld a, MUSIC_SAFARI_ZONE
|
||||
ld [wNewSoundID], a
|
||||
call PlaySound
|
||||
ld c, 100
|
||||
call DelayFrames
|
||||
call ClearScreen
|
||||
call LoadHpBarAndStatusTilePatterns
|
||||
xor a
|
||||
ld [wUnusedCC5B], a
|
||||
ld a, [hSerialConnectionStatus]
|
||||
cp USING_EXTERNAL_CLOCK
|
||||
jr z, .usingExternalClock
|
||||
predef InternalClockTradeAnim
|
||||
jr .tradeCompleted
|
||||
.usingExternalClock
|
||||
predef ExternalClockTradeAnim
|
||||
.tradeCompleted
|
||||
callab TryEvolvingMon
|
||||
call ClearScreen
|
||||
call LoadTrainerInfoTextBoxTiles
|
||||
call Serial_PrintWaitingTextAndSyncAndExchangeNybble
|
||||
ld c, 40
|
||||
call DelayFrames
|
||||
coord hl, 0, 12
|
||||
ld b, 4
|
||||
ld c, 18
|
||||
call CableClub_TextBoxBorder
|
||||
coord hl, 1, 14
|
||||
ld de, TradeCompleted
|
||||
call PlaceString
|
||||
predef SaveSAVtoSRAM2
|
||||
ld c, 50
|
||||
call DelayFrames
|
||||
xor a
|
||||
ld [wTradeCenterPointerTableIndex], a
|
||||
jp CableClub_DoBattleOrTradeAgain
|
||||
.tradeCancelled
|
||||
ld c, 100
|
||||
call DelayFrames
|
||||
xor a ; TradeCenter_SelectMon
|
||||
ld [wTradeCenterPointerTableIndex], a
|
||||
jp CallCurrentTradeCenterFunction
|
||||
|
||||
WillBeTradedText:
|
||||
TX_FAR _WillBeTradedText
|
||||
db "@"
|
||||
|
||||
TradeCompleted:
|
||||
db "Trade completed!@"
|
||||
|
||||
TradeCanceled:
|
||||
db "Too bad! The trade"
|
||||
next "was canceled!@"
|
||||
|
||||
TradeCenterPointerTable:
|
||||
dw TradeCenter_SelectMon
|
||||
dw TradeCenter_Trade
|
||||
|
||||
CableClub_Run:
|
||||
ld a, [wLinkState]
|
||||
cp LINK_STATE_START_TRADE
|
||||
jr z, .doBattleOrTrade
|
||||
cp LINK_STATE_START_BATTLE
|
||||
jr z, .doBattleOrTrade
|
||||
cp LINK_STATE_RESET ; this is never used
|
||||
ret nz
|
||||
predef EmptyFunc3
|
||||
jp Init
|
||||
.doBattleOrTrade
|
||||
call CableClub_DoBattleOrTrade
|
||||
ld hl, Club_GFX
|
||||
ld a, h
|
||||
ld [wTilesetGfxPtr + 1], a
|
||||
ld a, l
|
||||
ld [wTilesetGfxPtr], a
|
||||
ld a, Bank(Club_GFX)
|
||||
ld [wTilesetBank], a
|
||||
ld hl, Club_Coll
|
||||
ld a, h
|
||||
ld [wTilesetCollisionPtr + 1], a
|
||||
ld a, l
|
||||
ld [wTilesetCollisionPtr], a
|
||||
xor a
|
||||
ld [wGrassRate], a
|
||||
inc a ; LINK_STATE_IN_CABLE_CLUB
|
||||
ld [wLinkState], a
|
||||
ld [hJoy5], a
|
||||
ld a, 10
|
||||
ld [wAudioFadeOutControl], a
|
||||
ld a, BANK(Music_Celadon)
|
||||
ld [wAudioSavedROMBank], a
|
||||
ld a, MUSIC_CELADON
|
||||
ld [wNewSoundID], a
|
||||
jp PlaySound
|
||||
|
||||
EmptyFunc3:
|
||||
ret
|
||||
|
||||
Diploma_TextBoxBorder:
|
||||
call GetPredefRegisters
|
||||
|
||||
; b = height
|
||||
; c = width
|
||||
CableClub_TextBoxBorder:
|
||||
push hl
|
||||
ld a, $78 ; border upper left corner tile
|
||||
ld [hli], a
|
||||
inc a ; border top horizontal line tile
|
||||
call CableClub_DrawHorizontalLine
|
||||
inc a ; border upper right corner tile
|
||||
ld [hl], a
|
||||
pop hl
|
||||
ld de, 20
|
||||
add hl, de
|
||||
.loop
|
||||
push hl
|
||||
ld a, $7b ; border left vertical line tile
|
||||
ld [hli], a
|
||||
ld a, " "
|
||||
call CableClub_DrawHorizontalLine
|
||||
ld [hl], $77 ; border right vertical line tile
|
||||
pop hl
|
||||
ld de, 20
|
||||
add hl, de
|
||||
dec b
|
||||
jr nz, .loop
|
||||
ld a, $7c ; border lower left corner tile
|
||||
ld [hli], a
|
||||
ld a, $76 ; border bottom horizontal line tile
|
||||
call CableClub_DrawHorizontalLine
|
||||
ld [hl], $7d ; border lower right corner tile
|
||||
ret
|
||||
|
||||
; c = width
|
||||
CableClub_DrawHorizontalLine:
|
||||
ld d, c
|
||||
.loop
|
||||
ld [hli], a
|
||||
dec d
|
||||
jr nz, .loop
|
||||
ret
|
||||
|
||||
LoadTrainerInfoTextBoxTiles:
|
||||
ld de, TrainerInfoTextBoxTileGraphics
|
||||
ld hl, vChars2 + $760
|
||||
lb bc, BANK(TrainerInfoTextBoxTileGraphics), (TrainerInfoTextBoxTileGraphicsEnd - TrainerInfoTextBoxTileGraphics) / $10
|
||||
jp CopyVideoData
|
||||
151
engine/link/cable_club_npc.asm
Executable file
151
engine/link/cable_club_npc.asm
Executable file
|
|
@ -0,0 +1,151 @@
|
|||
CableClubNPC::
|
||||
ld hl, CableClubNPCWelcomeText
|
||||
call PrintText
|
||||
CheckEvent EVENT_GOT_POKEDEX
|
||||
jp nz, .receivedPokedex
|
||||
; if the player hasn't received the pokedex
|
||||
ld c, 60
|
||||
call DelayFrames
|
||||
ld hl, CableClubNPCMakingPreparationsText
|
||||
call PrintText
|
||||
jp .didNotConnect
|
||||
.receivedPokedex
|
||||
ld a, $1
|
||||
ld [wMenuJoypadPollCount], a
|
||||
ld a, 90
|
||||
ld [wLinkTimeoutCounter], a
|
||||
.establishConnectionLoop
|
||||
ld a, [hSerialConnectionStatus]
|
||||
cp USING_INTERNAL_CLOCK
|
||||
jr z, .establishedConnection
|
||||
cp USING_EXTERNAL_CLOCK
|
||||
jr z, .establishedConnection
|
||||
ld a, CONNECTION_NOT_ESTABLISHED
|
||||
ld [hSerialConnectionStatus], a
|
||||
ld a, ESTABLISH_CONNECTION_WITH_EXTERNAL_CLOCK
|
||||
ld [rSB], a
|
||||
xor a
|
||||
ld [hSerialReceiveData], a
|
||||
ld a, START_TRANSFER_EXTERNAL_CLOCK
|
||||
ld [rSC], a
|
||||
ld a, [wLinkTimeoutCounter]
|
||||
dec a
|
||||
ld [wLinkTimeoutCounter], a
|
||||
jr z, .failedToEstablishConnection
|
||||
ld a, ESTABLISH_CONNECTION_WITH_INTERNAL_CLOCK
|
||||
ld [rSB], a
|
||||
ld a, START_TRANSFER_INTERNAL_CLOCK
|
||||
ld [rSC], a
|
||||
call DelayFrame
|
||||
jr .establishConnectionLoop
|
||||
.establishedConnection
|
||||
call Serial_SendZeroByte
|
||||
call DelayFrame
|
||||
call Serial_SendZeroByte
|
||||
ld c, 50
|
||||
call DelayFrames
|
||||
ld hl, CableClubNPCPleaseApplyHereHaveToSaveText
|
||||
call PrintText
|
||||
xor a
|
||||
ld [wMenuJoypadPollCount], a
|
||||
call YesNoChoice
|
||||
ld a, $1
|
||||
ld [wMenuJoypadPollCount], a
|
||||
ld a, [wCurrentMenuItem]
|
||||
and a
|
||||
jr nz, .choseNo
|
||||
callab SaveSAVtoSRAM
|
||||
call WaitForSoundToFinish
|
||||
ld a, SFX_SAVE
|
||||
call PlaySoundWaitForCurrent
|
||||
ld hl, CableClubNPCPleaseWaitText
|
||||
call PrintText
|
||||
ld hl, wUnknownSerialCounter
|
||||
ld a, $3
|
||||
ld [hli], a
|
||||
xor a
|
||||
ld [hl], a
|
||||
ld [hSerialReceivedNewData], a
|
||||
ld [wSerialExchangeNybbleSendData], a
|
||||
call Serial_SyncAndExchangeNybble
|
||||
ld hl, wUnknownSerialCounter
|
||||
ld a, [hli]
|
||||
inc a
|
||||
jr nz, .connected
|
||||
ld a, [hl]
|
||||
inc a
|
||||
jr nz, .connected
|
||||
ld b, 10
|
||||
.syncLoop
|
||||
call DelayFrame
|
||||
call Serial_SendZeroByte
|
||||
dec b
|
||||
jr nz, .syncLoop
|
||||
call CloseLinkConnection
|
||||
ld hl, CableClubNPCLinkClosedBecauseOfInactivityText
|
||||
call PrintText
|
||||
jr .didNotConnect
|
||||
.failedToEstablishConnection
|
||||
ld hl, CableClubNPCAreaReservedFor2FriendsLinkedByCableText
|
||||
call PrintText
|
||||
jr .didNotConnect
|
||||
.choseNo
|
||||
call CloseLinkConnection
|
||||
ld hl, CableClubNPCPleaseComeAgainText
|
||||
call PrintText
|
||||
.didNotConnect
|
||||
xor a
|
||||
ld hl, wUnknownSerialCounter
|
||||
ld [hli], a
|
||||
ld [hl], a
|
||||
ld hl, wd72e
|
||||
res 6, [hl]
|
||||
xor a
|
||||
ld [wMenuJoypadPollCount], a
|
||||
ret
|
||||
.connected
|
||||
xor a
|
||||
ld [hld], a
|
||||
ld [hl], a
|
||||
jpab LinkMenu
|
||||
|
||||
CableClubNPCAreaReservedFor2FriendsLinkedByCableText:
|
||||
TX_FAR _CableClubNPCAreaReservedFor2FriendsLinkedByCableText
|
||||
db "@"
|
||||
|
||||
CableClubNPCWelcomeText:
|
||||
TX_FAR _CableClubNPCWelcomeText
|
||||
db "@"
|
||||
|
||||
CableClubNPCPleaseApplyHereHaveToSaveText:
|
||||
TX_FAR _CableClubNPCPleaseApplyHereHaveToSaveText
|
||||
db "@"
|
||||
|
||||
CableClubNPCPleaseWaitText:
|
||||
TX_FAR _CableClubNPCPleaseWaitText
|
||||
TX_DELAY
|
||||
db "@"
|
||||
|
||||
CableClubNPCLinkClosedBecauseOfInactivityText:
|
||||
TX_FAR _CableClubNPCLinkClosedBecauseOfInactivityText
|
||||
db "@"
|
||||
|
||||
CableClubNPCPleaseComeAgainText:
|
||||
TX_FAR _CableClubNPCPleaseComeAgainText
|
||||
db "@"
|
||||
|
||||
CableClubNPCMakingPreparationsText:
|
||||
TX_FAR _CableClubNPCMakingPreparationsText
|
||||
db "@"
|
||||
|
||||
CloseLinkConnection:
|
||||
call Delay3
|
||||
ld a, CONNECTION_NOT_ESTABLISHED
|
||||
ld [hSerialConnectionStatus], a
|
||||
ld a, ESTABLISH_CONNECTION_WITH_EXTERNAL_CLOCK
|
||||
ld [rSB], a
|
||||
xor a
|
||||
ld [hSerialReceiveData], a
|
||||
ld a, START_TRANSFER_EXTERNAL_CLOCK
|
||||
ld [rSC], a
|
||||
ret
|
||||
20
engine/link/print_waiting_text.asm
Normal file
20
engine/link/print_waiting_text.asm
Normal file
|
|
@ -0,0 +1,20 @@
|
|||
PrintWaitingText::
|
||||
coord hl, 3, 10
|
||||
ld b, $1
|
||||
ld c, $b
|
||||
ld a, [wIsInBattle]
|
||||
and a
|
||||
jr z, .asm_4c17
|
||||
call TextBoxBorder
|
||||
jr .asm_4c1a
|
||||
.asm_4c17
|
||||
call CableClub_TextBoxBorder
|
||||
.asm_4c1a
|
||||
coord hl, 4, 11
|
||||
ld de, WaitingText
|
||||
call PlaceString
|
||||
ld c, 50
|
||||
jp DelayFrames
|
||||
|
||||
WaitingText:
|
||||
db "Waiting...!@"
|
||||
Loading…
Add table
Add a link
Reference in a new issue