- Z=0
- Lbl 1
- Z+1:"CONFIG":Pause 3
- Y=100:U=0
- Prog AB
- {U}
- U"LIFE":U¡å0Goto1Prog AB:H[Z]=Int X
- {U}
- U"ATACK":Prog AB:A[Z]=Int X
- {U}
- U"DEFENCE":Prog AB:D[Z]=Int X
- {U}
- U"SPEED":Prog AB:S[Z]=Int X
- {U}
- L[Z]=Y
- V[Z]=1
- Z=Z+1:Z=1GoTo 1
- "FIGHT!":Pause 2
- Lbl 2
- S+Ran#¡ßL¡ãT+Ran#¡ßMU=0:Prog AA:U=1:Prog AA:U=1:Prog AA:U=0:Prog AA
- Goto 2
AA
- 2-U:"ATACK BY":Pause 0
- Z=Int (A[1-U]+L[1-U]/3¡ßRan#-D[U]/1.5-L[U]¡ßRan#/3+Ran#¡ß4-2)
- Z¡ã1Z=Int (Ran#¡ß2+1)
- (s[U]-S[1-U])/100¡äRan#U+1:"MISS!":Pause1:Goto 9
- Z+(u+1)/10:"HIT!":Pause 3
- H[U]=H[U]-Z
- H[U]¡ã0H[U]=0:Prog AD
- Lbl 9
- H[U]+(U+1)/10:"LIFE":Pause 3
- H[U]=0Prog AC
AB
- Y¡ãUU=Y:U¡ã0U=0
- X=U
- Y=Y-U:U=Y
AC
- V[U]=0Goto 1
- U+1:"LIMIT BREAK":Pause 2
- A[U]=A[U]¡ß2
- S[U]=S[U]¡ß3
- L[U]=L[U]¡ß3+20
- V[U]=0
- Lbl 1
AD
- 2.1-.9U:"WIN.DIE":Pause 9
- Lbl 1
- Goto 1