Font Trouble

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.

Siopses

Actually I solved that problem, but with the 'Input' function a
prompt window appears, dispite my program being in Graphics mode. Here's the code. I don't want the prompt
window.

Graphics 800,600
;Images
COE=LoadImage("cube_of_evil.bmp")
hand=LoadImage("hand.bmp")
title=LoadImage("title.bmp")
Xbound=LoadImage("X-boundary")
Ybound=LoadImage("Y-boundary")
;Fonts
fntArial=LoadFont("Arial",48,False,True,False)
fntbroadway=LoadFont("Broadway",36,False,False,False)
fntgameover=LoadFont("Chiller",48,True,True,False)
While Not KeyDown(1)
SetFont fntArial
Color 0,0,255
DrawImage title,200,0
.menu
SetFont fntbroadway
Text 300,250,"New Game > 1",False,False
Text 300,300,"High Score > 2",False,False
Text 300,350,"Options > 3",False,False
I=Input("What d'ya want?")
If I=1 Gosub Game
If I=2 Gosub HighScore
If I=3 Gosub Options
Delay 25
Flip
Wend
.Game
Cls
Text 300,300,"GAME"
Delay 5000
End
.HighScore
Text 300,300,"HIGH SCORE"
Delay 5000
End
.Options
Text 300,300,"OPTIONS"
Delay 5000
End

NOTE: Just a proto-type