home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1986 September
/
64er_Magazin_86-09_1986_Markt__Technik_de.d64
/
leser-info!
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
2KB
|
60 lines
10 poke 53280,6:poke 53281,6 :print chr$(14 )chr$(147);
20 print"[204]ieber [204]eser!"spc(8)"64'er, [193]usgabe 9/86";
30 print"-------------
40 [153]
50 [153]" Diese Diskette enthaelt alle Programme";
60 [153]"aus der atnusgabe 9/86.
70 print" Im Inhaltsverzeichnis der Disk sind";
80 print"Programme, die zu einem Artikel";
90 print"gehoeren, innerhalb von Trennstrichen";
100 print"zusammengefasst. Diese Trennstriche";
110 print"enthalten auch die Seitennummer im Heft,";
120 print"ab der Sie die Bedienungsanleitung zum";
130 print"nachfolgenden Programm finden. Lesen";
140 print"Sie diese genau durch, bevor Sie ein";
150 print"Programm laden und starten. Dadurch";
160 print"lassen sich Bedienungsfehler vermeiden.
170 [153]
180 [153]" Wenn Sie konkrete Verbesserungsvor-";
190 [153]"schlaege zum Aufbau der Programmservice-";
200 [153]"Disketten haben, schreiben Sie uns! Wir";
210 [153]"stehen Ihren Wuenschen aufgeschlossen";
220 [153]"gegenueber, um diese Disketten optimal";
230 [153]"zu gestalten.
240 print
250 printspc(16)"weiter: <RETURN>-Taste
260 [161]a$:[139]a$[179][177][199](13)[167]260
270 [151] 53280,6 :[151] 53281,6 :[153] [199](14 )[199](147);
280 [153]"Schicken Sie Ihre Vorschlaege an:
290 print
300 print"Verlag Markt&Technik AG
310 [153]"Redaktion 64'er
320 print"z.H. Herr Roeder
330 [153]"Hans-Pinsel-Str.2
340 print"8013 Haar
350 [153]:[153]
360 [153]" (NULL)un folgen einige (NULL)usatzinformationen:
370 print
380 for z=1 to 40:print"-";:next
390 print
400 print"-"chr$(34)"[200][201]-[208][210][201][206][212]"chr$(34)": [196]ieses [208]rogramm ist sowohl"
410 print" fuer einen [199][208] 700 [214][195] als auch fuer
420 [153]" einen (NULL)(NULL)-10 vorhanden. peekei der (NULL)ersion
430 print" fuer den [206][204]-10 muss der [206]ame des
440 [153]" (NULL)rogramms von left$right$-(NULL)(NULL)right$(NULL)(NULL) (NULL)(NULL)10 in
450 print" [200][201]-[208][210][201][206][212] geaendert werden, da [200][201]-[197][196][196][201]
460 [153]" nur left$right$-(NULL)(NULL)right$(NULL)(NULL) als (NULL)amen akzeptiert.
470 print:print:print
480 printspc(16)"weiter: <[210][197][212][213][210][206]>-[212]aste";
490 geta$:ifa$<>chr$(13)then490
500 poke 53280,6 :poke 53281,6 :print chr$(14 )chr$(147);
510 print"[194]ei den restlichen [208]rogrammen moechten
520 [153]" wir (NULL)ie bitten, sich die atnnleitungen
530 print" im 64'er [205]agazin genau durchzulesen.
630 [129]x[178]1[164]14:[153]:[130]
1240 [153]:[153]
1250 [153]"Ende der Information.
1260 print:print:print
1270 printspc(18)"Ende: <RETURN>-Taste
1280 [161]a$:[139]a$[179][177][199](13)[167]1280