Beat the clock!

BGMPLAY 3,11
CLS
'PYRAMID OF NOTHING WAS FOUNDED IN 2012 BY ZZYEX, A PROGRAMER IN 9 VARIATIONS OF BASIC, AND A
'NOVICE IN JAVA.
'GO TO MY BLOG AT USELESSBLOGNOONECARESABOUT.BLOGGER.COM
'CONTACT ME @ LEGOSCOUT13@GMAIL.COM
'THIS CAN BE CONSIDERED V1 STABLE.

'NOTE: This isn't my first game, just the first i have published.

PRINT "PYRAMID OF NOTHING
WAIT 120
PRINT "
PRINT "     PRESENTS
WAIT 120
PRINT "
PRINT "    A GAME BY,
WAIT 120
PRINT "
PRINT "      ZZYEX
WAIT 120
CLS
PRINT "BEAT THE CLOCK!!!!!!!!
WAIT 345
CLS
PRINT "RECORD:12.3 URHP LEFT.
WAIT 120
SYSBEEP=FALSE
@START
CLS
PRINT "MISSION 1
PRINT "Kill as many clockzoids
PRINT "as you can!
PRINT "Go to shop w/ start
PRINT "TAP
PRINT "   OR
PRINT "     PRESS
PRINT "          START
IF BUTTON()==1024 GOTO @DISPLAY
IF TCHTIME==1 GOTO @DISPLAY
VSYNC 1
GOTO @START

@MAP
CLS
PRINT "г=You
PRINT "◎=Enemy
PRINT "
PRINT "┌─┬─┬─┐
PRINT "│г│╂│◎│
PRINT "└─┴─┴─┘
PRINT "Move with d-pad
IF BUTTON()==8 THEN GOTO @MAP1
VSYNC 1
GOTO @MAP

@MAP1
CLS
PRINT "┌─┬─┬─┐
PRINT "│╂│г│◎│
PRINT "└─┴─┴─┘
VSYNC 1
IF BUTTON()==8 THEN GOTO @LOAD
GOTO @MAP1

@DISPLAY
GOTO @MAP
@LOAD
LOAD"SPU1:CLOCK", FALSE
LOAD"COL1:CLOCK", FALSE
CLS
WAIT 120
VISIBLE 1,0,0,0,0,0
LOCATE 12,11
PRINT "ENEMY HEALTH
LOCATE 12,12
HP=100
PRINT ""HP""
LOCATE 12,13
PRINT "YOUR HEALTH
LOCATE 12,14
URHP=100
PRINT ""URHP""
MANA=0
MANA2=0
COIN=0
LVL=0
XP=100

@LOOP1
URHP=100+(LVL*DMG1)
HP=100

@LOOP
URHP=URHP
HP=HP
GOSUB @ATTACK1:GOSUB @ATTACK:GOSUB @MANA:GOSUB @MANA2:GOSUB @LEVEL
GOTO @LOOP

@LVLUP
DMG=DMG+1
LVL=LVL+1
XP=100
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
XP=XP+DMG1
URHP=100
URHP=URHP+DMG1
DMG1=5
RETURN

@LEVEL

IF TCHTIME==1 THEN XP=XP-DMG
IF XP==0 THEN GOSUB @LVLUP
RETURN

@MANA2
PRINT ""MANA2""
IF TCHTIME==1 THEN MANA2=MANA2+1
IF MANA2==100 THEN GOSUB @MEGA2
RETURN

@MANA
CLS
PRINT ""MANA""
IF TCHTIME==1 THEN MANA=MANA+DMG
IF MANA==50 THEN GOSUB @MEGA
RETURN

@ATTACK
CLS
PRINT "Using-
PRINT "Knife-1 atck
PRINT "special 1
PRINT "10 hp drain
PRINT "    2
PRINT "20 base dmg
PRINT "Attack 1
PRINT ""MANA""
PRINT "Attack 2
PRINT ""MANA2""
PRINT "Money
PRINT ""COIN""
PRINT "LEVEL
PRINT ""LVL""
PRINT "XP
PRINT ""XP""
LOCATE 12,11
PRINT "ENEMY HEALTH
LOCATE 12,12
PRINT ""HP""
LOCATE 12,13
PRINT "YOUR HEALTH
LOCATE 12,14
PRINT ""URHP""
IF TCHTIME==1 THEN HP=HP-DMG
IF MANA==50 THEN GOSUB @MEGA
DMG=1
IF HP<=0 THEN GOTO @WIN
IF URHP<=0 THEN GOTO @LOSE
IF BUTTON()==1024 THEN GOSUB @STORE
VSYNC 1
RETURN

@ATTACK1
CLS
URHP=URHP-EDMG
EDMG=0.1
COOL=25
COOL=COOL-EDMG
IF COOL<=0 THEN GOSUB @REST
IF URHP<=0 THEN GOTO @LOSE
IF HP<=0 THEN GOTO @WIN
RETURN

@REST
GOSUB @ATTACK
RETURN

@LOSE
CLS
WAIT 120
PRINT "LO
WAIT 120
PRINT "  SE
COIN=COIN-100
WAIT 120
GOTO @START

@WIN
CLS
WAIT 120
PRINT "YOU
WAIT 120
PRINT "   WIN!
WAIT 120
COIN=COIN+MANA2
GOTO @LOOP1

@STORE
VSYNC 1
CLS
PRINT ""COIN""
PRINT "Pistol-1000cp
PRINT "knife-10cp (owned)
PRINT "PRESS X
IF BUTTON()==64 THEN GOTO @LOOP
GOTO @STORE

@MEGA

HP=HP-MEGADMG
MEGADMG=10
MANA=MANA-50
URHP=URHP+MEGADMG
RETURN

@MEGA2

HP=HP-MEGADMG2
MEGADMG2=20
MANA2=MANA2-100
RETURN