10 PRINT"_00__01__02__03__04__05__06__07__08__09__10__11__12__13__14__15."
20 PRINT: FOR T=0 TO 3                     'Смотрим 4 строки памяти
30 OUT &HB4,13                             'Номер колонки со счетчиком
40 A=INP(&HB5)
50 A=(A AND &B1100) OR T: OUT &HB5,A       'T - номер  с т р о к и
60 FOR N=0 TO 15: OUT &HB4,N               'N - номер  с т о л б ц а
70 A=INP(&HB5):A=A AND 15
80 PRINT A;TAB((N+1)*4);:NEXT:PRINT:NEXT
90 INPUT"Строка(0-3),Столбик(0-15),Значение(0-15)";K,L,M
100 IF K=0 AND L=0 AND M=0 THEN END         'Выход в командный режим
110 OUT &HB4,13
120 OUT &HB5,(INP(&HB5) AND &B1100) OR K
130 OUT &HB4,L: OUT &HB5,M
140 GOTO 10