Amiga ISO Collection/AmigaUtilCD2.iso/Misc/MAXONNOG2NOGURU.DMS/in.adf/Install_NOG2/install_NOG2

Text File | 1993-01-21 | 5.9 KB | 330 lines

;=============================================================================
;
; NOG2 installation script for AmigaDOS 2.0 or higher.
;
; NOG2 v2.94
;
; (german and english)
;
;=============================================================================




(complete 0)

;=============================================================================
; German strings
;
;(if (=@language "deutsch")
;(

(set #introduction
(cat "\n\nDieses Programm installiert Ihnen NOG2."
     "Es kann verwendet werden um eine aeltere NOG2 Version zu updaten oder"
     "fuer eine Neuinstalation.")
)

(set #dest_dir
(cat "In welchem Ordner oder Diskette wollen Sie NOG2 installiert haben?")
)

(set #where_dir
(cat "Wo kann ich die zu installierende NOG2 Version finden?")
)

(set #copy_nog2
(cat "Kopiere NOG2...")
)

(set #copy_iff
(cat "Soll ich die 'iff.library' ebenfalls kopieren?")
)

(set #iff_note
(cat "NOG2 braucht die iff.library nur fuer die 'GrabView' Funktion.")
)

(set #script_copy
(cat "Soll ich das 'NOG2.script' ebenfalls kopieren?")
)

(set #script_note
(cat "NOG2 braucht das Scriptfile nur fuer die 'Script' Funktion"
     " des Traphandlers. Sie koennen aber selbst einsolches erzeugen"
     " mit Hilfe eines Texteditors."
     "\n(Sehen Sie im Handbuch nach fuer weiter Informationen)")
)

(set #guru_copy
(cat "Soll ich die 'guru' Files, guru1 - guru8, ebenfalls kopieren?")
)

(set #guru_note
(cat "Sie koennen die 'guru' Files verwenden um den Umgang mit NOG2"
     " zu ueben. Doch sie werden von NOG2 sonst nicht gebraucht."
     "\nBevor sie die Files anwenden, nehmen Sie bitte das Handbuch"
     " zu rate!")
)

(set #copying_guru
(cat "Kopiere die 'guru' Files...")
)

(set #copy_sim
(cat "Wollen Sie den S.I.M. auch noch kopiert haben?")
)

(set #copying_sim
(cat "Kopiere SIM...")
)

(set #sim_note
(cat "S.I.M. - System Independend Monitor\n"
     "Hierbei handelt es sich um ein Monitor System, das von NOG2 aktiv"
     " unterstuetzt wird.\n"
     "Fuer weitere Informationen schauen Sie im Handbuch nach.")
)

(set #copy_docs
(cat "Welche Dokumentationen zum S.I.M. soll ich kopieren?")
)

(set #doc_note
(cat "SIM.doc\n"
     "Das Handbuch zum S.I.M., sollte umbedingt gelesen werden bevor Sie"
     " den S.I.M benutzen.\n\n\n"
     "SIM.specialdoc\n"
     "Ist eine Zusammenstellung/Liste aller S.I.M. Befehle.")
)

(set #yes
(cat "Ja")
)

(set #no
(cat "Nein")
)


;))

;=============================================================================
; English strings
;
(if (= @language "english")
(

(set #introduction
(cat "\n\nThis program lets you install NOG2 on a hard drive or disk."
     " It can be used to upgrade an older release or to intsall from scratch.")
)

(set #dest_dir
(cat "In which disk or drawer should NOG2 be installed?")
)

(set #where_dir
(cat "Where can I find the uninstalled NOG2?")
)

(set #copy_nog2
(cat "Copying NOG2...")
)

(set #copy_iff
(cat "Should I copy the iff.library?")
)

(set #iff_note
(cat "Note that NOG2 needs this library only for the 'GrabView' function.")
)

(set #script_copy
(cat "Should the 'NOG2.script' also be copied?")
)

(set #script_note
(cat "Note that NOG2 needs the script file for the traphandler 'Script' function."
     " You may generate another new script using a texteditor and put the script"
     " into the 's:' directory."
     "\n(Refer to the manual for more information)")
)

(set #guru_copy
(cat "Should I also copy the guru files (guru1 - guru8)?")
)

(set #guru_note
(cat "You may use this guru files to generate system crashes to practise"
     " the use of NOG2."
     "\nPlease refer to the manual before using them.")
)

(set #copying_guru
(cat "Copying 'guru' files...")
)

(set #copy_sim
(cat "Do you want to have the SIM copied to the disk/drawer?")
)

(set #copying_sim
(cat "Copying SIM...")
)

(set #sim_note
(cat "S.I.M. - System Independend Monitor\n"
     "It's a monitor system which is supported by NOG2.\n"
     "Refer to the manual for more information.")
)

(set #copy_docs
(cat "Select the documentation to be copied:")
)

(set #doc_note
(cat "SIM.doc\n"
     "The manual for S.I.M., please read it before using S.I.M.\n\n\n"
     "SIM.specialdoc\n"
     "It's a short command overview for S.I.M.")
)

(set #yes
(cat "Yes")
)

(set #no
(cat "No")
)

))

;=============================================================================

(message #introduction)
(welcome)


(set NOG2Name
    (tackon
        (askdir
            (prompt #dest_dir)
            (help @askdir-help)
            (default @default-dest)
        )
        ""
    )
)

(set SourceName "NOG2:" )



(complete 30)
(set @default-dest NOG2Name)

(copyfiles
    (prompt #copy_nog2)
    (help @copyfiles-help)
    (source (tackon SourceName ""))
    (dest (tackon NOG2Name ""))
    (choices "NOG2")
    (infos)
)



(complete 50)
(copylib
    (prompt #copy_iff)
    (help #iff_note)
    (source    (tackon SourceName "libs/iff.library"))
    (dest "libs:")
    (confirm)
)



(complete 57)
(copyfiles
    (prompt #script_copy)
    (help #script_note)
    (source    (tackon SourceName "s/nog2.script"))
    (dest "s:" )
    (confirm)
)



(complete 65)
(set guru_answer
    (askbool
        (prompt #guru_copy)
        (help #guru_note)
        (default 0)
    )
)



(complete 70)
(if guru_answer
(
        (copyfiles
            (prompt #copying_guru)
            (help @copyfiles-help)
            (source (tackon SourceName "Gurus"))
            (dest (tackon NOG2Name "Gurus"))
            (choices "LIES_MICH" "guru1" "guru2" "guru3" "guru4" "guru5" "guru6" "guru7" "guru8")
            (infos)
        )

))



(complete 80)

(set answer_sim
    (askchoice
        (prompt #copy_sim)
        (help #sim_note)
        (choices #yes #no)
        (default 1)
    )
)



(complete 85)
(if (not answer_sim)
(
    (copyfiles
        (prompt #copying_sim)
        (help #sim_note)
        (source (tackon SourceName "SIM"))
        (dest "c:" )
        (confirm)
    )


    (complete 90)
    (copyfiles
        (prompt #copy_docs)
        (help #doc_note)
        (source (tackon SourceName ""))
        (dest (tackon NOG2Name ""))
        (choices "SIM.doc" "SIM.specialdoc")
        (confirm)
        (infos)
    )
))


(complete 100)
(exit)

;=============================================================================