start tok64 d64-QXBHeu
100 k=k+1:f1$="shareware":f2$="user guide"
110 ON k GOTO120,130,210
120 PRINT"{clear}{down} wait!":LOAD"norsk chr",8,1
130 SYS 52750,"80-screen.chr":PRINT"{ct n}
140 PRINT"{clear}";SPC(50);"{reverse on} OPEN SYSTEM KA43/61 "
150 PRINT SPC(90);"Presents you with an
160 PRINT SPC(52);"80 COLUMN DISPLAY
170 PRINT SPC(52);"for{space*2}COMMODORE 64"
180 PRINT SPC(125);"{reverse on} SHIFT {reverse off}{space*2}Hold screen
190 PRINT SPC(45);"{reverse on} F7 {reverse off}{space*5}Stop
200 LOAD"view-file",8,1
210 SYS 50176,f1$,80
220 SYS 50176,f2$,80
230 PRINT SPC(45);"For more iformation press <RETUR>
240 PRINT SPC(85);"sys 50176,";CHR$(34);"external help":PRINT"{up*4}
stop tok64
(bastext 1.0)