.key boot,second,volume,DiskA,ArchiveA,Check,DiskB,ArchiveB
.bra {
.ket }
;$VER: Ionic Installer - High Speed Installation Scripts and Binary Files
;Copyright © 1995,96,97 Imdad Shah
;Hi Everybody!


Hard_Drive {volume}
Failat 21
Cls
MegaEcho
Style B1
MegaEcho Ionic Installer Ready For Action
MegaEcho
MegaEcho Copyright © 1995,96,97 Imdad Shah
MegaEcho
MegaEcho All Rights Reserved
MegaEcho
MegaEcho
Style N1
MegaEcho Working On Installation...
MegaEcho

Assign {volume}: Exists >Nil:
If not Warn
	Style N2
	MegaEcho You Have Already Installed {volume}...
	Skip 2
Endif

;--- Floppy Option
If $input EQ f
	Assign Rad: Exists >Nil:
	If Not Warn
		Style B2
		MegaEcho Turbo Installing...
		Format Drive Rad: Name Bad FFS Noicons <ram:c/return >Nil:
;--- Decompress
		Ram:C/UNLZX x #? Rad: >Nil:
		Insert {DiskA}

;--- Decompress
		MegaEcho Decompressing Please Wait...
		Ram:C/UNLZX x {DiskA}:Archives/{ArchiveA}.lzx Rad: >Nil:
		If {check} EQ "And"
			Insert {DiskB}
;--- Decompress
		MegaEcho Decompressing Please Wait...
		Ram:C/UNLZX x {DiskB}:Archives/{ArchiveB}.lzx Rad: >Nil:
		Endif

		Turbo {boot} {second} {volume}
		Else

		Insert {DiskA}
	
;---- Normal Floppy Installation
		GoDoIt {boot} {second} {volume} {DiskA} {ArchiveA}
		Delete Ram:#?.lzx >Nil:

		If {check} EQ "And"
		Insert {DiskB}
		GoDoIt2 {boot} {second} {volume} {DiskB} {ArchiveB}
		Delete Ram:#?.lzx >Nil:
		Endif

	Endif
Endif

;--- Hard Drive Installation
If $input NOT EQ f
	Insert {DiskA}
	GoDoIt {boot} {second} {volume} {DiskA} {ArchiveA}
	Delete Ram:#?.lzx >Nil:

	If {check} EQ "And"
	Insert {DiskB}
	GoDoIt2 {boot} {second} {volume} {DiskB} {ArchiveB}
	Delete Ram:#?.lzx >Nil:
	Endif

Endif

If $input EQ f
	Install Drive DF0:
	Relabel Bad: {volume}
Endif

Lab 2
Run >Nil: Siren
MegaEcho
Style N1
MegaEcho All Done!
MegaEcho

Insert {boot}
Assign {volume}: Ram:

Style N1
Cls
