5 PRINTCHR$(14)
10 PRINT"[147][196]IESES [208]ROGRAMM DEMONSTRIERT DIE [203]OLLI-"
20 PRINT"SIONSREGISTER DES [214][201][195]."
30 PRINT"[193]CHTEN [211]IE AUF DIE BEIDEN [203]OLLONNEN, DIE";
40 PRINT"GLEICH AUF DEM [194]ILDSCHIRM ERSCHEINEN"
50 PRINT"WERDEN. [196]IE LINKE [203]OLONNE GIBT DEN MO-"
60 PRINT"MENTANEN [218]USTAND VON [210]EGISTER 30, DIE"
70 PRINT"RECHTE DEN VON [210]EGISTER 31 AN."
80 PRINT"[194]ITTE EINE [212]ASTE DRUECKEN."
90 GETA$:IFA$=""THEN90
110 FORI=832TO894:POKEI,255:NEXT
120 V=53248
122 POKE2040,13:POKE2041,13
130 POKEV+0,0:POKEV+1,100
140 POKEV+2,255:POKEV+3,100
141 POKEV+39,1:POKEV+40,0
142 POKEV+21,3
150 FORI=0TO255
160 POKEV,I:POKEV+2,255-I
170 PRINTPEEK(V+30),PEEK(V+31)
180 POKEV+30,0:POKEV+31,0
190 NEXT
200 POKEV+21,0