10 DATA 01,10,00            :' LD BC, начальная X-координата
11 DATA 11,10,00            :' LD DE, начальная Y-координата
12 DATA F7                  :' RST #30
13 DATA 87                  :' (для ученического компьютера - 83)
14 DATA 85,00               :' Адрес расширенного BIOS
15 DATA C9                  :' RET
20 FOR I=0 TO 10:READ A$:POKE &HD000+I,VAL("&h"+A$):NEXTI
30 SCREEN 5                 :' Возможны SCREEN 5 ╤ SCREEN 8
40 POKE &HFCB3,240          :' X-координата 
W▐ GXPOS (FCB3,FCB4);
50 POKE &HFCB5,173          :' Y-координата 
W▐ GYPOS (FCB5,FCB6);
60 POKE &HF3F2,15           :' Цвет 
W▐         ATRBYT(F3F2);
70 DEFUSR=&HD000: Z=USR(0)  :' Рисуем  л и н и ю
80 A$=INPUT$(1)             :' К о н е ц