0 LIST 10
1 REM *************************
2 REM *** KLAVESNICE QVERTZ ***
3 REM ***   A DALSI FUNKCE  ***
4 REM ***       V.H.S.      ***
5 REM *************************
10 GRAPHICS 0:? :? "Klavesnice je predefinovana tak, ze je navzajem zmeneno umisteni klaves, Z a Y"
20 ? "Dalsi funkce klavesnice jsou :"
30 ? "CONTROL + 4 umlceni pip, klavesmice"
40 ? "CONTROL + 5 kurzor vlevo"
50 ? "CONTROL + 6 kurzor vpravo"
60 ? "CONTROL + 7 kurzor levy horni roh"
70 ? "CONTROL + 8 kurzor levy dolni roh"
80 ? :? "Po RESET je nutno znovu aktivovat pomoci POKE 121,0:POKE 122,6"
90 ? :? "Program je ulozen od adresy 1536 a po inicializaci se sam vymaze."
100 D=PEEK(121)+256*PEEK(122):P=1535
110 FOR A=D TO D+192
130 B=PEEK(A):P=P+1
140 POKE P,B
150 NEXT A
160 POKE 1559,121:POKE 1579,122:POKE 1623,89:POKE 1643,90
170 POKE 1688,137
180 POKE 1691,145:POKE 1693,144
190 POKE 1715,142:POKE 1717,143
200 POKE 121,0:POKE 122,6
210 NEW