diff options
Diffstat (limited to 'scripts/BillsHouse.asm')
| -rwxr-xr-x | scripts/BillsHouse.asm | 214 |
1 files changed, 214 insertions, 0 deletions
diff --git a/scripts/BillsHouse.asm b/scripts/BillsHouse.asm new file mode 100755 index 00000000..74efc960 --- /dev/null +++ b/scripts/BillsHouse.asm @@ -0,0 +1,214 @@ +BillsHouse_Script: + call EnableAutoTextBoxDrawing + ld a, [wBillsHouseCurScript] + ld hl, BillsHouse_ScriptPointers + jp CallFunctionInTable + +BillsHouse_ScriptPointers: + dw BillsHouseScript0 + dw BillsHouseScript1 + dw BillsHouseScript2 + dw BillsHouseScript3 + dw BillsHouseScript4 + dw BillsHouseScript5 + +BillsHouseScript0: + ret + +BillsHouseScript1: + ld a, [wSpriteStateData1 + 9] + and a ; cp SPRITE_FACING_DOWN + ld de, MovementData_1e79c + jr nz, .notDown + ld de, MovementData_1e7a0 +.notDown + ld a, $1 + ld [H_SPRITEINDEX], a + call MoveSprite + ld a, $2 + ld [wBillsHouseCurScript], a + ret + +MovementData_1e79c: + db NPC_MOVEMENT_UP + db NPC_MOVEMENT_UP + db NPC_MOVEMENT_UP + db $FF + +; make Bill walk around the player +MovementData_1e7a0: + db NPC_MOVEMENT_RIGHT + db NPC_MOVEMENT_UP + db NPC_MOVEMENT_UP + db NPC_MOVEMENT_LEFT + db NPC_MOVEMENT_UP + db $FF + +BillsHouseScript2: + ld a, [wd730] + bit 0, a + ret nz + ld a, HS_BILL_POKEMON + ld [wMissableObjectIndex], a + predef HideObject + SetEvent EVENT_BILL_SAID_USE_CELL_SEPARATOR + xor a + ld [wJoyIgnore], a + ld a, $3 + ld [wBillsHouseCurScript], a + ret + +BillsHouseScript3: + CheckEvent EVENT_USED_CELL_SEPARATOR_ON_BILL + ret z + ld a, $f0 + ld [wJoyIgnore], a + ld a, $2 + ld [wSpriteIndex], a + ld a, $c + ld [$ffeb], a + ld a, $40 + ld [$ffec], a + ld a, $6 + ld [$ffed], a + ld a, $5 + ld [$ffee], a + call SetSpritePosition1 + ld a, HS_BILL_1 + ld [wMissableObjectIndex], a + predef ShowObject + ld c, 8 + call DelayFrames + ld a, $2 + ld [H_SPRITEINDEX], a + ld de, MovementData_1e807 + call MoveSprite + ld a, $4 + ld [wBillsHouseCurScript], a + ret + +MovementData_1e807: + db NPC_MOVEMENT_DOWN + db NPC_MOVEMENT_RIGHT + db NPC_MOVEMENT_RIGHT + db NPC_MOVEMENT_RIGHT + db NPC_MOVEMENT_DOWN + db $FF + +BillsHouseScript4: + ld a, [wd730] + bit 0, a + ret nz + xor a + ld [wJoyIgnore], a + SetEvent EVENT_MET_BILL_2 ; this event seems redundant + SetEvent EVENT_MET_BILL + ld a, $0 + ld [wBillsHouseCurScript], a + ret + +BillsHouseScript5: + ld a, $4 + ld [hSpriteIndexOrTextID], a + call DisplayTextID + ld a, $0 + ld [wBillsHouseCurScript], a + ret + +BillsHouse_TextPointers: + dw BillsHouseText1 + dw BillsHouseText2 + dw BillsHouseText3 + dw BillsHouseText4 + +BillsHouseText4: + TX_BILLS_PC + +BillsHouseText1: + TX_ASM + ld hl, BillsHouseText_1e865 + call PrintText + call YesNoChoice + ld a, [wCurrentMenuItem] + and a + jr nz, .asm_1e85a +.asm_1e84d + ld hl, BillsHouseText_1e86a + call PrintText + ld a, $1 + ld [wBillsHouseCurScript], a + jr .asm_1e862 +.asm_1e85a + ld hl, BillsHouseText_1e86f + call PrintText + jr .asm_1e84d +.asm_1e862 + jp TextScriptEnd + +BillsHouseText_1e865: + TX_FAR _BillsHouseText_1e865 + db "@" + +BillsHouseText_1e86a: + TX_FAR _BillsHouseText_1e86a + db "@" + +BillsHouseText_1e86f: + TX_FAR _BillsHouseText_1e86f + db "@" + +BillsHouseText2: + TX_ASM + CheckEvent EVENT_GOT_SS_TICKET + jr nz, .asm_1e8a9 + ld hl, BillThankYouText + call PrintText + lb bc, S_S_TICKET, 1 + call GiveItem + jr nc, .BagFull + ld hl, SSTicketReceivedText + call PrintText + SetEvent EVENT_GOT_SS_TICKET + ld a, HS_CERULEAN_GUARD_1 + ld [wMissableObjectIndex], a + predef ShowObject + ld a, HS_CERULEAN_GUARD_2 + ld [wMissableObjectIndex], a + predef HideObject +.asm_1e8a9 + ld hl, BillsHouseText_1e8cb + call PrintText + jr .asm_1e8b7 +.BagFull + ld hl, SSTicketNoRoomText + call PrintText +.asm_1e8b7 + jp TextScriptEnd + +BillThankYouText: + TX_FAR _BillThankYouText + db "@" + +SSTicketReceivedText: + TX_FAR _SSTicketReceivedText + TX_SFX_KEY_ITEM + TX_BLINK + db "@" + +SSTicketNoRoomText: + TX_FAR _SSTicketNoRoomText + db "@" + +BillsHouseText_1e8cb: + TX_FAR _BillsHouseText_1e8cb + db "@" + +BillsHouseText3: + TX_ASM + ld hl, BillsHouseText_1e8da + call PrintText + jp TextScriptEnd + +BillsHouseText_1e8da: + TX_FAR _BillsHouseText_1e8da + db "@" |