REM SET MODE TO 8 USING VDU ( VDU 22,8 REM SET LINE THICKNESS TO 3 VDU 23,23,3| REM OFF GCOL 1 COLOUR 1,175,165,150 FILL 100,100 COLOUR 157 INPUT TAB(0,5) "Enter Your Information " A$ PRINTTAB(0,6);A$ (mou) WAIT 0 : REM just wait, nothing to do ! GOTO (mou)
COLOUR 1,175,165,150 : Set palette color 1 to RGB triplet COLOUR 128+1 : REM Set text background to palette color 1 CLS INPUT TAB(0,5) "Enter Your Information: " A$ PRINTTAB(0,6);A$
MODE 8 COLOUR 1,175,165,150 : Set palette color 1 to RGB triplet GCOL 0 : REM Set graphics foreground to palette color 0 GCOL 128+1 : REM Set graphics background to palette color 1 VDU 5 : REM Treat text as graphics (transparent background) CLG MOVE 0,800 PRINT "Hello world!"