64'er 1996 September/64er_Magazin_96-09_1996_Markt__Technik_de_Side_A.d64/parset

Commodore BASIC | 2022-10-26 | 634b | 18 lines

1 print"[147][152]":fory=0to9:print" e[146]"mid$(str$(y),2)
2 print" a[146]"mid$(str$(y),2):next
3 a=36904:print"":fory=0to19:print"";
4 forx=0to7:print" "right$(" "+str$(peek(a+n)),3);:n=n+1:next:print:next
5 print"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]
6 [153]"(NULL)   tasten : cursor, +/-, return   (NULL)
7 print"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]
8 f[178]55296:a[178]36895:y[178]1:x[178]4
9 c[178]f[170]x[170]40[172]y:b[178]a[170]8[172]y[170](x[173]4):[129]k[178]c[164]c[170]2:[151]k,1:[130]:[158]46374
10 [146]198,1:[161]d$:[129]k[178]c[164]c[170]2:[151]k,12:[130]:[139]d$[178][199](13)[167][128]
11 [139]d$[178]""[167]y[178]y[170]1[170]20[172](y[178]20):[137]9
12 [139]d$[178]"on"[167]y[178]y[171]1[171]20[172](y[178]1):[137]9
13 [139]d$[178]""[167]x[178]x[170]4[170]32[172](x[178]32):[137]9
14 [139]d$[178]"cmd"[167]x[178]x[171]4[171]32[172](x[178]4):[137]9
15 [139]d$[178]"+"[167][151]b,[194](b)[170]1[170]256[172]([194](b)[178]255)
16 [139]d$[178]"-"[167][151]b,[194](b)[171]1[171]256[172]([194](b)[178]0)
17 [151]781,y:[151]782,x:[158]58636:[153][201](" "[170][196]([194](b)),3):[137]9