Problem with start of Battle engine, timer system does not work.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    SYNC ON
SYNC RATE 0
HP#=100
EHP#=100
load music "Final Fantasy 7 - Main Theme (Fully Orchestrated).mp3",7
play music 7
DO
PRINT "ENEMY HP ",EHP#
SET CURSOR 400,0
PRINT "YOUR HP ",HP#

Rem speed
SPEED#=speedquality#
speedquality#=level#/2



Plyerwait#= timer()
Playerwaittime#=timer()>5000
if Playerwait>=Playerwaittime then INPUT "A TO ATTACK OR H TO HEAL ", MOVE$


Ifplayerwaittime=<timer()
then INPUT "A TO ATTACK OR H TO HEAL ", MOVE$
Playerwaitime= timer()+5000:endif
Rem character level handeler
level#=6
expn#=400
exp#=0
if expn#=exp#
level#=level#+1
expn#=level#*expn#

Endif
rem monster level
mlevel#= 5

rem experiance gained
expgained#=mlevel#*32

Rem physcial damage and protection
Damage#= strenght#*attack#
Protection#= vitality*Defense/3

Rem Magical Damage and protection
MDamage#=mattack*spelldamage#
MProtection#= Mdefense#*spirit#

Rem Elemental halve, immune, absorb

rem fire: halve
If Hfire#=1
Enemymfattack#=Enemymfattack#/2

endif
rem fire null
If Nfire#=1
Enemymfattack#=Enemymfattack#-(Enemymfattack#)

Endif
rem fire absorb
If Afire#=1
Enemymfattack#=Enemymfattack#-(Enemymfattack#*2)

Endif
rem lightning: halve
If Hlightning#=1
Enemymlattack#=Enemymlattack#/2

endif
rem lightning: null
If Nlightning#=1
Enemymlattack#=Enemymlattack#-(Enemymlattack#)

Endif
rem lightning: absorb
If Alightning#=1
Enemymlattack#=Enemymlattack#-(Enemymlattack#*2)

Endif
rem ice: halve
If Hice#=1
Enemymlattack#=Enemymlattack#/2

endif
rem ice: null
If Nice#=1
Enemymlattack#=Enemymlattack#-(Enemymlattack#)

Endif
rem lightning: absorb
If Aice#=1
Enemymlattack#=Enemymlattack#-(Enemymlattack#*2)

Endif
Rem choice of moves
IF MOVE$="A"
EHP#=EHP#-50

ENDIF

IF MOVE$="H"
HP#=HP#+1000

ENDIF



Rem Fire attack strenght(fire1,2,3) for enemy
Enemymfattack#= Rnd(30)=90*Emattack/4

If FIRE2#=1
Enemymfattack#=Enemymfattack#*2

endif

If FIRE3#=1
Enemymfattack#=Enemymfattack#*3

endif

Rem lightning attack strenght(bolt 1,2,3) for enemy
Enemymiattack#= Rnd(30)+120*Emattack/4
If Bolt2#=1
Enemymiattack#=Enemymiattack#*2

endif

If Bolt3#=1
Enemymiattack#=Enemymiattack#*3

endif
Rem If monster is dead
IF EHP#<1
GOTO WIN
ENDIF

SYNC
LOOP
rem Ninja (first enemy)
do
Rem attack

Ninjawaittime#=timer()>3000
if Ninjawait#>=Ninjawaittime#
Nchoice#=Rnd(Edamage# or Enemymfattack# or Enemymiattack#)
Ninjawait#= timer()

endif
loop
WIN:
CLS
PRINT "Congratulations you have defeated the monster!"
WAIT KEY
END