home *** CD-ROM | disk | FTP | other *** search
Wrap
;$VER: akLJPG_Installer 43.100 (16.10.1997) #DOS © Msi Software FAILAT 21 ;Check OS version! c/akT OS 39 IF WARN ECHO "You need OS 3.0 or later!" ASK "Press return!" QUIT ENDIF ;Display old and new dt version etc! c/akT >ENV:akver VER classes/Datatypes/akLJPG.datatype c/akT >ENV:akverold VER Sys:Classes/Datatypes/akLJPG.datatype IF NOT WARN C:RequestChoice >NIL: "Andreas Ralph Kleinert presents:" "$akver" "Install/Update" ELSE C:RequestChoice >NIL: "Andreas Ralph Kleinert presents:" "$akver*N(old: $akverold)" "Install/Update" ENDIF UNSETENV akver UNSETENV akverold ;Create dt prefs drawer if not found! IF NOT EXISTS SYS:Prefs/DataTypes C:Makedir >NIL: SYS:Prefs/DataTypes C:Copy >NIL: prefs/datatypes.info SYS:Prefs/DataTypes.info CLONE ENDIF ;Move any dtprefs to sys:prefs/datatypes! IF EXISTS sys:prefs/akLJPGprefs C:Rename >NIL: sys:prefs/akLJPGprefs#? sys:prefs/datatypes ENDIF ;Create ENV:Datatypes if not found! IF NOT EXISTS ENV:Datatypes C:Makedir >NIL: ENV:Datatypes ENVARC:Datatypes ENDIF ;Install dtprefs if not found or current one is old! c/akT CHK prefs/datatypes/akLJPGPrefs SYS:prefs/datatypes/akLJPGPrefs IF WARN C:Copy >NIL: prefs/datatypes/akLJPGPrefs SYS:prefs/datatypes CLONE IF NOT EXISTS sys:prefs/datatypes/akLJPGPrefs.info C:Copy >NIL: prefs/datatypes/akLJPGPrefs.info SYS:prefs/datatypes CLONE ENDIF ENDIF ;Install gui if not found or current one is old! c/akT CHK prefs/datatypes/akLJPGPrefs_gui.wizard SYS:prefs/datatypes/akLJPGPrefs_gui.wizard IF WARN C:Copy >NIL: prefs/datatypes/akLJPGPrefs_gui.wizard SYS:prefs/datatypes CLONE ENDIF ;Install correct dt! c/akT CHK classes/datatypes/akLJPG.datatype SYS:classes/datatypes/akLJPG.datatype IF WARN c/akT CPU 060 IF NOT WARN C:Copy >NIL: classes/datatypes/akLJPG.datatype.060 SYS:Classes/datatypes/akLJPG.datatype CLONE ELSE c/akT CPU 040 IF NOT WARN C:Copy >NIL: classes/datatypes/akLJPG.datatype.040 SYS:Classes/datatypes/akLJPG.datatype CLONE ELSE c/akT CPU 030 IF NOT WARN C:Copy >NIL: classes/datatypes/akLJPG.datatype.030 SYS:Classes/datatypes/akLJPG.datatype CLONE ELSE c/akT CPU 020 IF NOT WARN C:Copy >NIL: classes/datatypes/akLJPG.datatype.030 SYS:Classes/datatypes/akLJPG.datatype CLONE ELSE C:Copy >NIL: classes/datatypes/akLJPG.datatype SYS:Classes/datatypes/akLJPG.datatype CLONE ENDIF ENDIF ENDIF ENDIF ;Move any old dt headers to storage! Rename >NIL: SYS:Devs/Datatypes/#?LJPG SYS:Storage/Datatypes/ ;Install new dt header! C:Copy >NIL: devs/datatypes/LJPG DEVS:DataTypes IF NOT EXISTS DEVS:DataTypes/LJPG.info C:Copy >NIL: devs/datatypes/LJPG.info DEVS:DataTypes ENDIF ;Change dir to docs! CD Docs ;Show guide and start dtprefs! Run >NIL: MultiView akLJPG.guide Run >NIL: /Prefs/DataTypes/akLJPGPrefs ;Install completed message! C:RequestChoice >NIL: "ak Installer" "Install completed!*NPlease reboot the system,*Nto use the new datatype!*N*NIf this is the first time you install,*Nyou do not need to reboot!" "Ok" C:AddDataTypes >NIL: REFRESH ELSE ;Install not needed message! C:RequestChoice >NIL: "ak Installer" "Install not needed!*NYou have the same or a higher version!" "Ok" ENDIF ;Clean up memory/free resources! C:Avail >NIL: FLUSH