11 lines
No EOL
193 B
QBasic
11 lines
No EOL
193 B
QBasic
SUB MAIN
|
|
GRAPHICS
|
|
SETCOLOR 0,0,0
|
|
CLS
|
|
SETCOLOR 255,0,0
|
|
DRAWSTRING "HELLO",0,SCREENHEIGHT()/4
|
|
SETCOLOR 255,255,0
|
|
DRAWSTRING "WORLD",0,SCREENHEIGHT()/2
|
|
REPAINT
|
|
SLEEP 5000
|
|
END SUB |