Define constants for prices in maps' event scripts

Supersedes #592
This commit is contained in:
Rangi
2019-02-16 13:19:39 -05:00
parent af29f1f97c
commit f9a60cff7a
7 changed files with 100 additions and 71 deletions

View File

@@ -1,3 +1,7 @@
GOLDENRODDEPTSTORE6F_FRESH_WATER_PRICE EQU 200
GOLDENRODDEPTSTORE6F_SODA_POP_PRICE EQU 300
GOLDENRODDEPTSTORE6F_LEMONADE_PRICE EQU 350
const_def 2 ; object constants
const GOLDENRODDEPTSTORE6F_LASS
const GOLDENRODDEPTSTORE6F_SUPER_NERD
@@ -22,29 +26,29 @@ GoldenrodVendingMachine:
end
.FreshWater:
checkmoney YOUR_MONEY, 200
checkmoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_FRESH_WATER_PRICE
ifequal HAVE_LESS, .NotEnoughMoney
giveitem FRESH_WATER
iffalse .NotEnoughSpace
takemoney YOUR_MONEY, 200
takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_FRESH_WATER_PRICE
itemtotext FRESH_WATER, MEM_BUFFER_0
jump .VendItem
.SodaPop:
checkmoney YOUR_MONEY, 300
checkmoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_SODA_POP_PRICE
ifequal HAVE_LESS, .NotEnoughMoney
giveitem SODA_POP
iffalse .NotEnoughSpace
takemoney YOUR_MONEY, 300
takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_SODA_POP_PRICE
itemtotext SODA_POP, MEM_BUFFER_0
jump .VendItem
.Lemonade:
checkmoney YOUR_MONEY, 350
checkmoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_LEMONADE_PRICE
ifequal HAVE_LESS, .NotEnoughMoney
giveitem LEMONADE
iffalse .NotEnoughSpace
takemoney YOUR_MONEY, 350
takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_LEMONADE_PRICE
itemtotext LEMONADE, MEM_BUFFER_0
jump .VendItem