summaryrefslogtreecommitdiff
path: root/scripts/mtmoonpokecenter.asm
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/mtmoonpokecenter.asm')
-rwxr-xr-xscripts/mtmoonpokecenter.asm94
1 files changed, 0 insertions, 94 deletions
diff --git a/scripts/mtmoonpokecenter.asm b/scripts/mtmoonpokecenter.asm
deleted file mode 100755
index b5edee8d..00000000
--- a/scripts/mtmoonpokecenter.asm
+++ /dev/null
@@ -1,94 +0,0 @@
-MtMoonPokecenterScript:
- call Serial_TryEstablishingExternallyClockedConnection
- jp EnableAutoTextBoxDrawing
-
-MtMoonPokecenterTextPointers:
- dw MtMoonHealNurseText
- dw MtMoonPokecenterText2
- dw MtMoonPokecenterText3
- dw MagikarpSalesmanText
- dw MtMoonPokecenterText5
- dw MtMoonTradeNurseText
-
-MtMoonHealNurseText:
- db $ff
-
-MtMoonPokecenterText2:
- TX_FAR _MtMoonPokecenterText1
- db "@"
-
-MtMoonPokecenterText3:
- TX_FAR _MtMoonPokecenterText3
- db "@"
-
-MagikarpSalesmanText:
- TX_ASM
- CheckEvent EVENT_BOUGHT_MAGIKARP, 1
- jp c, .alreadyBoughtMagikarp
- ld hl, .Text1
- call PrintText
- ld a, MONEY_BOX
- ld [wTextBoxID], a
- call DisplayTextBoxID
- call YesNoChoice
- ld a, [wCurrentMenuItem]
- and a
- jp nz, .choseNo
- ld [hMoney], a
- ld [hMoney + 2], a
- ld a, $5
- ld [hMoney + 1], a
- call HasEnoughMoney
- jr nc, .enoughMoney
- ld hl, .NoMoneyText
- jr .printText
-.enoughMoney
- lb bc, MAGIKARP, 5
- call GivePokemon
- jr nc, .done
- xor a
- ld [wPriceTemp], a
- ld [wPriceTemp + 2], a
- ld a, $5
- ld [wPriceTemp + 1], a
- ld hl, wPriceTemp + 2
- ld de, wPlayerMoney + 2
- ld c, $3
- predef SubBCDPredef
- ld a, MONEY_BOX
- ld [wTextBoxID], a
- call DisplayTextBoxID
- SetEvent EVENT_BOUGHT_MAGIKARP
- jr .done
-.choseNo
- ld hl, .RefuseText
- jr .printText
-.alreadyBoughtMagikarp
- ld hl, .Text2
-.printText
- call PrintText
-.done
- jp TextScriptEnd
-
-.Text1
- TX_FAR _MagikarpSalesmanText1
- db "@"
-
-.RefuseText
- TX_FAR _MagikarpSalesmanNoText
- db "@"
-
-.NoMoneyText
- TX_FAR _MagikarpSalesmanNoMoneyText
- db "@"
-
-.Text2
- TX_FAR _MagikarpSalesmanText2
- db "@"
-
-MtMoonPokecenterText5:
- TX_FAR _MtMoonPokecenterText5
- db "@"
-
-MtMoonTradeNurseText:
- db $f6