home *** CD-ROM | disk | FTP | other *** search
- (set @default-dest "Sys:")
-
- (set #t_copylib "Installing in ")
-
- (set #t_welcome (cat
- " This script will install the Protracker datatype"
- " in your Sys:Classes/DataTypes drawer, and the"
- " descriptor in Sys:Devs/DataTypes."
- ))
-
- (message #t_welcome)
-
- (set #destbin "Sys:Classes/DataTypes")
- (set #destdesc "Sys:Devs/DataTypes")
-
- (copylib
- (prompt (cat #t_copylib #destbin))
- (help @copylib-help)
- (source "Classes/DataTypes/protracker.datatype")
- (dest #destbin)
- (confirm)
- )
-
- (copylib
- (prompt (cat #t_copylib #destdesc))
- (help @copylib-help)
- (source "Devs/DataTypes/Protracker")
- (infos)
- (noposition)
- (dest #destdesc)
- (confirm)
- )
-