home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
91xx
/
9108a.d64
/
typing
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
1KB
|
21 lines
1 POKE53280,0:POKE53281,0:DATA1,52,27,26,53,26,80,9:ZE$="[193][194][195][196][197][198][199][200][201][202][203][204][205][206][207][208][209][210][211][212][213]"
2 ZE$=ZE$+"[214][215][216][217][218]ABCDEFGHIJKLMNOPQRSTUVWXYZ!#$%&'()*+,-./:;<=>?@[\]^_1234567890"
3 PRINT"[147]"TAB(17)"[212]YPING"TAB(49)"[146][159](W) 1991 BY [204].[194]ISCHOFS"
4 PRINT"[158] 1) [199]ROSS- UND [203]LEINSCHREIBUNG"TAB(45)"2) [203]LEINSCHREIBUNG
5 [153]" 3) (null)EICHEN"[163]45)"4) (null)AHLEN"
6 [161]A$:[139]A$[179][177]"1"[175]A$[179][177]"2"[175]A$[179][177]"3"[175]A$[179][177]"4"[137]6
7 ZE[178]7:[133]"OPENON(null)IE VIELE (null)EILEN (VORGEGEBEN:7)";ZE:[139]ZE[179]1[137]7
8 [153]"LOAD":B[178][198](A$)[171]48:[129]A[178]1[164]B:[135]T,A1:[130]A
9 TI$[178]"000000":[129]Z[178]1[164]ZE:TE$[178]"":L[178]0:S[178]0:A$[178]TI$
10 I[178][181]([187](X)[172]7)[170]1:L[178]L[170]I[170]1:[129]A[178]1[164]I
11 TE$[178]TE$[170][202](ZE$,[181]([187](X)[172]A1)[170]T,1):[130]A:TE$[178]TE$[170]" ":[139]L[179]39[137]10
12 TE$[178][200](TE$,39):[153]"SYS"TE$"":TI$[178]A$
13 [161]A$:A$[178]A$[170]"":B[178][198](A$):[139]B[179]31[176]B[178]34[176]B[177]96[175]B[179]193[176]B[177]218[137]13
14 A$[178][200](A$,1):[153][163]S)"CONTON"[202](TE$,S[170]1,1)
15 [139]A$[178][202](TE$,S[170]1,1)[167][153][163]S)""A$"ON":[137]17
16 [153][163]S)""A$"ON":FE[178]FE[170]1
17 S[178]S[170]1:[139]S[179]39[137]13
18 [153]"":[130]Z:SE[178][181](TI[173]60):[153]"CONT(null)EIT:WAIT "[202](TI$,3,2)":"[201](TI$,2);
19 [153]" (null)INUTEN PRINTASCEHLERANZAHL:WAIT"FE:[153]"SYSATNNSCHLAEGE/(null)INUTE";
20 [153]":WAIT"[181]((ZE[172]39[173]SE)[172]60)"OPEN(null)EICHEN:WAIT"ZE[172]39:[151]198,0:[146]198,1:[138]