amiga-news DEUTSCHE VERSION
.
Links| Forums| Comments| Report news
.
Chat| Polls| Newsticker| Archive
.

amiga-news.de Forum > Amiga, AmigaOS 4 > ADF's automatisch auf Diskette schreiben [ - Search - New posts - Register - Login - ]

-1- [ - Post reply - ]

2006-03-06, 15:06 h

notime
Posts: 78
User
Moin.

Ich habe einen Ordner bei mir auf der Festplatte in dem sich ca. 400 ADF befinden. Num möchte ich gerne, das alle ADF's nach und nach auf Diskette geschrieben werden. Schön wäre es, wenn dies automatisch geschehn würde. So das ich nur noch aufgefordert werde, eine neue Diskette einzulegen.
Wie kann man das realiesieren? Gibs da vielleicht schon ein Programm für?
Zur Zeit benutze ich Packmaster mit transdisk. Da muss ich aber jedes mal die nächste ADF auswählen.

Für Eure Antwort bedanke ich mich schon mal im voraus.
Gruß
notime

[ - Answer - Quote - Direct link - ]

2006-03-06, 15:52 h

thomas
Posts: 7718
User
TSGui kann man aus der Shell aufrufen. Damit könnte man sich dann ein Script basteln. Ungefähr so:

code:
list >ram:script work:spiele/#?.adf lformat="requestchoice ADF-Screiber *"Bitte neue Diskette für %n einlegen !*" Ok*ntsgui write df0: *"%p%n*""
execute ram:script


Gruß Thomas

--
Email: thomas-rapp@web.de
Home: thomas-rapp.homepage.t-online.de/

[ - Answer - Quote - Direct link - ]

2006-03-06, 16:02 h

notime
Posts: 78
User
Achso!
?(
Gibs das auch für doofe? So wie mich?
Gruß notime

[ - Answer - Quote - Direct link - ]

2006-03-06, 18:05 h

Stefan
Posts: 936
User
Zitat:
Original von notime:
Achso!
?(
Gibs das auch für doofe? So wie mich?
Gruß notime


Wie meinst Du das? Kopiere die Zeilen in einen Editor und speichere
es unter S:DeinScript ab. Für DeinScript kannst Du natürlich einen
beliebigen Namen wählen. Dann machst eine Shell (CLI) auf, tippst
"protect S:DeinScript +s" und dann kannst Du es ganz einfach durch
Eingabe des Namens starten.

Gruß Stefan

:boing:



[ - Answer - Quote - Direct link - ]

2006-03-06, 19:19 h

600Amiga
Posts: 5
User
ADF Blister installieren ein feines kleines Programm ... gibts im Aminet :-)

[ - Answer - Quote - Direct link - ]

2006-03-07, 16:58 h

Palgucker
Posts: 1342
User
@ notime

Ich habe das Script von thomas noch ein bisschen "aufgemotzt" - (ich glaub ich habe zuviel Zeit ;) )
Andererseits befriedigt mich der Gedanke, das dir jetzt die Haare wohl richtig hochstehen! :D

Die Verbesserung an diesem Skript ist, das es bei allen ADF-Files, die du schon auf Diskette hast, das sogenannte Archived-Schutzbit setzt, und diese schon geschriebenen ADF's nicht nochmal schreiben will - ich gehe mal davon aus, das du nicht alle 400 ADF's in einem Rutsch schreiben willst.
Kurz gesagt, es macht beim nächsten mal dort weiter, wo du aufgehört hast.
Du benötigst natürlich dazu TSGui, was du z.B.
hier im Downloadbereich bekommst. TSGui selber gehört z.B. dann nach C: oder ein Verzeichnis, wo es gefunden wird.
Mit dem Script kannst du so verfahren, wie es Stefan vorgeschlagen hat.
Speicherst du es bsw. in S: unter WriteADF ab, kannst du es aufrufen,
indem du in eine Shell eingibst:

execute WriteADF _Dein_ADF_Directory_Pfad/

oder nach setzen das Script-Bits einfach mit

WriteADF _Dein_ADF_Directory_Pfad/

Du musst allerdings noch eine kleine Änderung vornehmen. Alle
Anführungszeichen wie diese >>''<< müssen in andere Anführungszeichen umgewandelt werden. Diese Zeilen habe ich rechts mit einen ;* gekennzeichnet
Die benötigten Anführungszeichen laufen von oben links nach unten rechts - musst Du mal auf der Tastatur suchen.

code:
.key Dir/A
.bra {
.ket }

echo ".key File*n.bra [*n.ket ]" >T:Temp.script
echo noline "echo noline first 4 len 1 '" >>T:Temp.script ;*
echo "list *"[File]*" lformat %a' >ENV:Attr" >>T:Temp.script ;*
echo noline "If $" >>T:Temp.script
echo "Attr EQ *"-*"" >>T:Temp.script
echo noline "If '" >>T:Temp.script ;*
echo "requestchoice *"Next ADF*" *"Neue Disk einlegen für [File]*" Ok Ende' EQ *"1*" VAL" >>T:Temp.script ;*
echo "tsgui write DF0: *"[File]*"" >>T:Temp.script
echo "protect *"[File]*" +a" >>T:Temp.script
echo "else*nquit 5*nendif*nendif" >>T:Temp.script

list {Dir}#?.adf >T:Temp2.script sort name lformat "execute T:Temp.script *"%p%n*""
execute T:Temp2.script



Wenn du dazu noch fragen hast, trau dich.

mfg Palgucker





[ Dieser Beitrag wurde von Palgucker am 07.03.2006 um 17:02 Uhr geändert. ]

[ - Answer - Quote - Direct link - ]


-1- [ - Post reply - ]


amiga-news.de Forum > Amiga, AmigaOS 4 > ADF's automatisch auf Diskette schreiben [ - Search - New posts - Register - Login - ]


.
Masthead | Privacy policy | Netiquette | Advertising | Contact
Copyright © 1998-2024 by amiga-news.de - all rights reserved.
.