REM Start of BASIC! Program
Gr.open 255,255,255,255,0,0
Gr.scale -1,1
Gr.screen w,h
Gr.color 255,255,0,0
Gr.text.size h/20
Gr.text.draw fred, -w/2, h/2,"FRED"
Gr.render
Do
Until 0