pokecrystal-board/engine/phone/scripts/bill.asm

42 lines
680 B
NASM
Raw Normal View History

BillPhoneCalleeScript:
checktime DAY
iftrue .daygreet
checktime NITE
iftrue .nitegreet
farwritetext BillPhoneMornGreetingText
buttonsound
jump .main
.daygreet
farwritetext BillPhoneDayGreetingText
buttonsound
jump .main
.nitegreet
farwritetext BillPhoneNiteGreetingText
buttonsound
jump .main
.main
farwritetext BillPhoneGenericText
buttonsound
checkcode VAR_BOXSPACE
vartomem MEM_BUFFER_0
ifequal 0, .full
ifless PARTY_LENGTH, .nearlyfull
farwritetext BillPhoneNotFullText
end
.nearlyfull
farwritetext BillPhoneNearlyFullText
end
.full
farwritetext BillPhoneFullText
end
BillPhoneCallerScript:
farwritetext BillPhoneNewlyFullText
waitbutton
end