home *** CD-ROM | disk | FTP | other *** search
- ;
- ; PSB Installation Script
- ; by
- ; Andrea Rafreider
- ;
-
- (message "\n\nPSB is copyright Steve P.R. Peruzzi 1996\n"
- "\n"
- "Installation script written by Andrea Rafreider\n")
-
- (set @default-dest
- (askdir
- (prompt "\nChoose the directory where you "
- "want to install PSB.\n"
- "A drawer named \"PSB\" will be created "
- "in the directory you choose.\n")
- (help "Here you can specify where you want "
- "to install PSB.\n"
- "A drawer named \"PSB\" will be created "
- "in the directory you choose.\n")
- (default "WORK:")
- )
- )
-
- (makedir (tackon @default-dest "PSB"))
-
- (set @default-dest (tackon @default-dest "PSB"))
-
- (copylib
- (source (tackon (pathonly @icon) "PSB"))
- (dest @default-dest)
- (infos)
-
- )
- (copyfiles
- (source (tackon (pathonly @icon) "PSB.guide"))
- (dest @default-dest)
- (infos)
- )
- (copyfiles
- (source (tackon (pathonly @icon) "PSB.readme"))
- (dest @default-dest)
- (infos)
- )
-
- (makedir (tackon @default-dest "data"))
-
- (message "\nPSB installation completed!\n")
-