; Script to install and config StartMem Version 1.0
(complete 1)
(message "Hello wonderful World, this is the install-script for StartMem \n I hope you enjoy it! \n\n"
"Hallo schöne Welt, das ist das Installer-Skript für StartMem \n Ich hoffe, Du geniesst es! \n\n\n\n")
(complete 10)
(set SPRACHE
(askchoice
(prompt "Which language do you prefer ?\nWelche Sprache willst Du wählen ?")
(help @askchoice-help)
(choices "English"
"Deutsch")
(default 1)
)
)
(complete 20)
(if ( = SPRACHE 0)
(set WAS
(askchoice
(prompt "Do you want to install or to config StartMem ?")
(help @askchoice-help)
(choices "install"
"config")
(default 0)
)
)
(set WAS
(askchoice
(prompt "Willst Du StartMem installieren oder konfigurieren ?")
(help @askchoice-help)
(choices "installieren"
"konfigurieren")
(default 0)
)
)
)
(complete 30)
(if (= WAS 0)
(
(if ( = SPRACHE 0)
(set Verzeichnis
(askdir
(prompt "Where do you want to install StartMem ?\n A directory will be generated automatically.")
(help @askdir-help)
(default "sys:")
)
)
)
(if ( = SPRACHE 1)
(set Verzeichnis
(askdir
(prompt "Wo willst Du StartMem installieren ?\n Ein Verzeichnis StartMem wird automatisch angelegt.")
(help @askdir-help)
(default "sys:")
)
)
)
(complete 40)
(set @default-dest Verzeichnis)
(set startmemdir (tackon Verzeichnis "StartMem"))
(copyfiles
(source "StartMem_Install")
(dest startmemdir)
)
(copyfiles
(source "StartMem_install.info")
(dest startmemdir)
)
(copyfiles
(source "StartMem")
(dest startmemdir)
)
(copyfiles
(source "auswertung_StartMem")
(dest startmemdir)
)
)
((complete 50)
(if ( = SPRACHE 0)
(set Verzeichnis
(askdir
(prompt "Where have you have StartMem installed ?\n")
(help @askdir-help)
(default "sys:")
)
)
)
(if ( = SPRACHE 1)
(set Verzeichnis
(askdir
(prompt "Wo hast Du StartMem installiert ?\n")
(help @askdir-help)
(default "sys:")
)
)
)
(complete 60)
(set @default-dest Verzeichnis)
(set startmemdir (tackon Verzeichnis "StartMem"))
)
)
(complete 70)
(if ( = SPRACHE 0)
(set SysRam
(askchoice
(prompt "Which device do you want to use ?\n Or which device have you used for installation ?\n(read help for explanation) ")
(help "If you use SYS: (this means your boot-device e.g. Work:) then the result will be exact, but the disadvantage is that booting will take more time as usually."
"\nIf you use RAM: then the result won't be as exact as with SYS: (the difference won't be more than about 50kByte) but booting will be almost as fast as usually.")
(choices "SYS:"
"RAM:")
(default 1)
)
)
(set SysRam
(askchoice
(prompt "Welches Gerät willst Du gebrauchen ?\n Oder welches Gerät hast Du bei der Installation benutzt ?\n(lies den help-Text für weitere Erklärungen) ")
(help "Falls Du SYS: (also Dein Start-Gerät z.B. Work:) wählst, dann wird das Resultat genau sein, aber der Nachteil beim Booten wird sein, dass es viel länger dauern wird."
"\nFalls Du RAM: benutzen willst, dann wird das Resultat zwar nicht ganz so genau sein wie mit SYS: (Der Fehler wird nicht mehr als ca. 50kByte betragen) aber der Bootvorgang wird fast so schnell sein wie üblich.")
(choices "SYS:"
"RAM:")
(default 1)
)
)
)
(complete 80)
(if ( = SPRACHE 0)
(set Daten
(askoptions
(prompt "Which datas do you want to see ?\n(read help for explanation) ")
(help "StartMem will call the CLI-program:<avail>.\n"
"Therefore the result will (intern) looks like:\n\n"
"Type Available In-Use Maximum Largest\n"
"chip 1234567 1234567 1234567 1234567\n"
"fast 1234567 1234567 1234567 1234567\n"
"total 1234567 1234567 1234567 1234567\n\n"
"You also can chose the difference-mode in which you can see the real use of memory of a program.\n"
"Now you have to make the choice, which data do you need.\n"
"You can chose multiple items.")
(choices "chip Available"
"chip In-Use"
"chip Maximum"
"chip Largest"
"chip Difference"
"fast Available"
"fast In-Use"
"fast Maximum"
"fast Largest"
"fast Difference")
(default (+ 528))
)
)
(set Daten
(askoptions
(prompt "Welche Daten willst Du sehen ?\n(lies den help-Text für weitere Erklärungen) ")
(help "StartMem wird das CLI-program:<avail> aufrufen.\n"
"Deshalb wird das (interne) Resultat so aussehen:\n\n"
"Type Available In-Use Maximum Largest\n"
"chip 1234567 1234567 1234567 1234567\n"
"fast 1234567 1234567 1234567 1234567\n"
"total 1234567 1234567 1234567 1234567\n\n"
"Du kannst ebenso den Differenz-Modus wählen, in welchem man den effektiven Speicherverbrauch eines Programms sieht.\n"
"Jetzt must Du bestimmen, welche Daten Du brauchst.\n"