5 'Автор программы: Беленький Г. (9 класс). 05.01.90 
10 DATA 01,00,00                 :' LD  BC, X начальное
11 DATA 11,00,00                 :' LD  DE, 
O
O
O
O  ░
W
W
W
W
W
W
W
W
W
W
W
W
W
W
W
W
W
Y
12 DATA F7                       :' RST #30                         
V
13 DATA 87                       :' (для ученического компьютера-83)
V
14 DATA 85,00                    :' адрес расширенного BIOS         
V
15 DATA C9                       :' RET                             
V
20 FORI=0TO10:READA$:POKE &HD000+I,VAL("&h"+A$):NEXT:DEFUSR=&HD000:'
V
30 SCREEN 8                      :' Возможны SCREEN 5 ╤ SCREEN 8    
V
40 POKE&HFCB3,255:POKE &HFCB4,0  :' X-координата фиксированой точки 
V
50 POKE&HFCB5,0:POKE &HFCB5,0    :' Y-координата                    
V
60  FOR I=0 TO 211               :'                                 
V
70    POKE &HF3F2,I              :' Цвет                            
V
80    POKE &HD004,I              :' Изменяющаяся Y-координата 
W
W
W
W
W
W
[
90    Z=USR(0)                   :' Рисуем  л и н и ю
100 NEXT I                       :'
110 A$=INPUT$(1)                 :' К о н е ц