home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 10
/
aminetcdnumber101996.iso
/
Aminet
/
mus
/
midi
/
camouflage1_48.lha
/
installdemo
< prev
next >
Wrap
Text File
|
1995-10-30
|
3KB
|
182 lines
(transcript "Installation 1.05-Camouflage/MIDI-System 68000-DEMO ")
(onerror
(makeassign "Cto" (safe))
)
(complete 0)
(set @default-dest "DH0:")
(set camdest
(askdir
(prompt "Wohin soll Camouflage installiert werden ?\n Die Unterverzeichnisse werden selbst erzeugt\n Tragen Sie bitte danach den assign-Befehl in Ihre 's:user-startup' ein\n Bespiel: assign cam: work:musik/midi")
(help @askdir-help)
(default @default-dest)
)
)
(set @default-dest camdest)
; Die Directories
(makeassign "Cto"
(camdest)
(safe)
)
(makedir "Cto:Camouflage"
(infos)
(safe)
)
(copyfiles
(source "gminst.info")
(dest "Cto:camouflage/")
)
(copyfiles
(source "gminst")
(dest "Cto:camouflage/")
)
(copyfiles
(source "Camouflage.info")
(dest "Cto:camouflage/")
)
(copyfiles
(source "Camouflage")
(dest "Cto:camouflage/")
)
(complete 85)
; Die Fonts
(makedir
"Fonts:Cam"
(safe)
)
; Die Fonts
(makedir
"Fonts:Cambl"
(safe)
)
(copyfiles
(source "Camouflage:fonts/cam.font")
(dest "Fonts:")
)
(copyfiles
(source "Camouflage:fonts/cambl.font")
(dest "Fonts:")
)
(copyfiles
(source "Camouflage:fonts/cam/41")
(dest "Fonts:cam")
)
(copyfiles
(source "Camouflage:fonts/cam/11")
(dest "Fonts:cam")
)
(copyfiles
(source "Camouflage:fonts/cam/7")
(dest "Fonts:cam")
)
(copyfiles
(source "Camouflage:fonts/cambl/11")
(dest "Fonts:cambl")
)
(makedir "cto:camouflage/songs"
(infos)
(safe)
)
(makedir "cto:camouflage/tracks"
(infos)
(safe)
)
(makedir "cto:camouflage/blocks"
(infos)
(safe)
)
(makedir "cto:camouflage/midifiles"
(infos)
(safe)
)
(makedir "Cto:camouflage/pool"
(infos)
(safe)
)
(makedir "Cto:camouflage/sysex"
(infos)
(safe)
)
(makedir "Cto:camouflage/waves"
(infos)
(safe)
)
(makedir "Cto:camouflage/drums"
(infos)
(safe)
)
(makedir "Cto:camouflage/rythms"
(infos)
(safe)
)
(makedir "Cto:camouflage/mmg"
(infos)
(safe)
)
(makedir "Cto:camouflage/transforms"
(infos)
(safe)
)
(makedir "Cto:camouflage/splits"
(infos)
(safe)
)
(makedir "Cto:camouflage/chords"
(infos)
(safe)
)
(makedir "Cto:camouflage/keys"
(safe)
)
(copyfiles
(source "keys/")
(dest "Cto:camouflage/keys/")
(pattern "#?")
(prompt "Keyfiles ...")
)
(makeassign "Cto"
(safe)
)
(exit)