home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh2x
/
sh24a.d64
/
dictionary.gen
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
389b
|
19 lines
1000 PRINT"[147][194]ITTE DIE [196]ISKETTE FUER DAS
1010 [153]"(null)OERTERVERZEICHNIS EINLEGEN!
1020 POKE198,0:WAIT198,1
1030 FORI=65TO90
1040 A$=CHR$(I)
1050 PRINT" [145][145]"
1060 PRINT"[214]ERZEICHNIS FUER [194]UCHSTABE : ";A$
1070 OPEN1,8,1,"SPELL.DICT."+A$
1080 PRINT#1,CHR$(255);
1090 GOSUB10000
1100 CLOSE1
1110 NEXTI
1120 PRINT"[214]ERZEICHNIS FERTIG
1130 [128]
10000 [159]15,8,15
10010 [132]15,E,E$,T,S
10020 [153]"STR$ISK-VALRROR: ";E;E$;T;S
10030 [160]15:[142]