Och jo. Schade. Das nachfolgende Programm macht scheinbar auch wieder "nichts". Was macht es aber tatsächlich?
Code
10 Q$=CHR$(34)+CHR$(20)+CHR$(34):PRINT"{CLR}";:POKE648,2:PRINT"{HOME}"TAB(167);
11 PRINT"{SPACE}[{RVS ON}<{RVS OFF,SPACE}+{RVS ON}<{C=-A,RVS OFF,SHIFT-B}PC{SHIFT-L,SHIFT-H,RVS ON}2%{RVS OFF,C=-K,RVS ON}E{C=-F,RVS OFF})AI";
12 PRINT"{RVS ON}@E{RVS OFF,C=-K,RVS ON}){RVS OFF}D{RVS ON}E{C=-C}"Q$"{C=-R,SPACE,RVS OFF}B{SPACE,RVS ON,SHIFT-T};)<{SPACE}9";
13 PRINT"{SHIFT-P,RVS OFF}R{RVS ON}"Q$"{C=-Y,SPACE,RVS OFF}B{SPACE,RVS ON,SHIFT-T};){C=-R,SPACE,RVS OFF}B{SPACE}O{RVS ON};){C=-Y,SPACE}";
14 PRINT"{RVS OFF}B{SPACE,C=-M,RVS ON}8{SHIFT-F,RVS OFF,C=-K,RVS ON,SHIFT-F,C=-C,SHIFT-P,C=-G}%{C=-F,RVS OFF,SHIFT-J,SHIFT-POUND,SHIFT-*,RVS ON}E{RVS OFF,C=-K,SHIFT-SPACE}"
15 POKE785,167:POKE786,2:POKE648,4:SYS58648
Hmm... da sind entschieden zu viele Smilies drin. ![]()