text program help

Blitz3D Forums/Blitz3D Programming/text program help

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.

Augen
 #1
Open in online IDE
Graphics 800,600

Text 0,0, "hello dear friend"
Delay 2000;delay 2 seconds before anything else happens
Cls;clear screen so text at 0,0 is not overwritten

.NoSpacebarYet;label to goto if spacebar not hit(but it's better to use function, not goto)

Text 0,0, "Press Spacebar to continue"
WaitKey();wait for any key to be pressed before processing the If statement below

If KeyHit(57);57 is scancode for the spacebar
	Cls;clear screen so text at 0,0 is not overwritten
	Text 0,0, "You Pressed the Spacebar, Here is More Text"
	WaitKey();wait for any key to be pressed before ending program
Else
	Goto NoSpacebarYet;goto the NoSpacebarYet label if key other than spacebar is hit
EndIf

End;end the program