Text Problems

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

hmmmm... the above code is the same as the code I have now except for the:

Color 0,255,0
Locate 600,430
again$=Input("Try Another? y / n ")
If again$="n"
End

which I don't really need anyways.
I'ts odd how this is not working...
I made a perfectly working one a while ago like it, The code was:

AppTitle "Math Master 2000"

SetBuffer BackBuffer()

Graphics 800,600

mm=LoadImage("mm.bmp")
DrawImage mm, 50,0

Print "Please Wait...."
Delay 2000
Cls
DrawImage mm, 50,0

While Not KeyHit(1)

.startgame
Locate 0,0
wrong=0

For turn= 0 To 9

Cls
DrawImage mm, 50,0

SeedRnd MilliSecs()

sndno1=Rnd(0,99)
sndno2=Rnd(0,99)
sndanswer=sndno1+sndno2

Print sndno1+" + "+sndno2

guess=Input("=")

sndbeep=LoadSound ("beep.wav")
sndbeeplow=LoadSound ("beeplow.wav")
SoundVolume sndbeeplow,1

sndmtruc=LoadSound ("mtruc.wav")

If guess=sndanswer Then

Color 0,255,0
Print "Correct"
PlaySound sndbeep

Else ;guess not = sndanswer

wrong=wrong+1
Color 255,0,0
Print "WRONG!"
Print "A: "+sndanswer
PlaySound sndbeeplow

EndIf ;guess=sndanswer

WaitKey()

PlaySound sndmtruc

Next

Cls
DrawImage mm, 50,0
Color 0,255,255

Print "You got "+wrong+" wrong out of 10 questions."

If wrong= 0 Then
Print "Your grade: A+"
EndIf

If wrong=1 Or wrong=2 Then
Print "Your grade: A"
EndIf

If wrong=3 Or wrong=4 Then
Print "Your grade: B"
EndIf

If wrong=5 Then
Print "Your grade: C"
EndIf

If wrong>5 Then
Print "Your grade: F"
EndIf

Color 255,0,255
Print "Press any key for another game, <Esc> to exit to"
Print "main menu."
key = WaitKey()

Wend
StopChannel chnMusicLoop

If Not key = 27
Cls
DrawImage mm, 50,0
Goto startgame
EndIf

I don't see why the code I have now won't work.