home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 134
/
Tiger_Disk_134_20xx_Tiger-Crew-Disk_de_Side_B.d64
/
ram-disk
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
2KB
|
47 lines
10 ifa=1then410
20 poke53280,12:poke53281,12:print"[147] original-anleitung:[144]"
30 print" sys 49152 -> directory
40 [153]" sys 49332 -> formatieren
50 print" sys 49215 name -> speichern
60 [153]" sys 49374,x -> laden ('x' steht fuer die prg-nummer)
70 print
80 print" nach dem laden erst 'new' ein- geben und 'ram-disk' formatieren
90 [153]" geschrieben von tweeny
100 print"nachsatz ([153]tigercrew)":print"taste !!":poke198,0:wait198,1:poke198,0
110 print"[147][144]mit diesem programm kannst du das ram deines c64 als 'disketten-"
120 print"ersatz'":print"verwenden:":print"ein programm, das du normal im arbeits- spei";
130 print"cher hast, kannst du (nach laden desprg., 'new' und formatieren des ram";
140 print" mit":print"'sys49332[144]') mit 'sys49215 name[144]' im ram speichern."
150 print"mit 'sys49152[144]' kannst du dir dann anse- hen, welche files 'auf";
160 print" der ram-disk":print"stehen'.":print"mit 'sys49374,x[144]' kannst du ";
170 print"wiederum":print"eines dieser programme in den arbeits- speicher laden."
180 print"hierbei ist 'x[144]' die nummer des files lt.directory:"
190 print"das erste file im dir [144]ist die '1' - u.s.w...."
200 poke198,0:wait198,1:poke198,0
210 print"[147]zum test kannst du - falls du moechtest,dass das programm jetzt ";
220 print"geladen wird -":print"nach dem nachladen folgendes ausfuehren:"
230 print"sys49332 [158](ram-disk-formatieren)"
240 print"load name [158](prg. laden)"
250 print"list [158](prg. ansehen)"
260 print"sys49215 name [158](prg. speichern)"
270 print"new [158](arbeitsspeicher leeren)"
280 print"sys49152 [158]('ram-dir.' ansehen)"
290 print"sys49374,1 [158](dieses eine <also auch"
300 print" erste> programm wieder"
310 print" in den arbeitsspeicher"
320 print" laden)"
330 print"list [158](das programm sollte"
340 print" wieder im speicher"
350 print" stehen)"
360 print"[144]tigercrew";:poke198,0:wait198,1:poke198,0
370 print"[147]"chr$(34)"ram-disk"chr$(34)"[144] laden <j/n> ?"
380 geta$:ifa$<>"j"anda$<>"n"then380
390 ifa$="n"thenend
400 a=1:load"ram-disc*",8,1
410 print"[147]new":print" sys49332"
420 print" l[207]"chr$(34)"ram-disk"chr$(34)",8"
430 print" sys49215 test"
440 print" sys49152"
450 print" new":print" sys49374,1"
460 print" list[145][145][145][145][145][145]":end