Will blitz ever be able to load its own font ???

wtf..
without meaning to be rude, I am not an idiot.

font=LoadFont("Blitz.fon",15,True,False,False)

mywin=CreateWindow("blah",50,50,200,200,0,1)
mytext=CreateTextArea(0,0,200,200,mywin)
SetTextAreaFont(mytext,font)

Repeat
	Select WaitEvent()
		Case $803 : End
	End Select
Forever

Above code will not load in the blitz font.

This is the Plus forum I posted in :) (not beginner)