.key NOGUI/S,DEFSCR/S,PUPSCR/S,REQSCR/S,SM/K,DEPTH/K,LORES/S,HIRES/S,NODITHER/S,GRAY/S,FRAMERATE/K,FASTBLIT/S,CHIP/K,SLOWFAST/K,Z2RAM/K,Z3RAM/K,NOSOUND/S,DF0/K,DF1/K,DF2/K,DF3/K,ROMFILE/K,MOUNT/K
.bra {
.ket }

; $VER: UAELauncher 0.1 (01.09.98) for UAE 0.7.0 (c) by Samuel Devulder

FAILAT 20

Delete >NIL: ENV:UAESM
Avail >NIL: flush

; ==================
; SCREEN TYPE OPTION
; ==================
SET HOPT " -H1"
IF {DEFSCR}
   SET HOPT " -H0"
ENDIF
IF {PUBSCR}
   SET HOPT " -H1"
ENDIF
IF {REQSCR}
   SET HOPT " -H2"
ENDIF
set tmp1 `eval {DEPTH}+0`
set tmp2 `eval {SM}+0`
IF $tmp1 gt 0
   IF $tmp2 gt 0
	SetEnv UAESM $tmp2:$tmp1
	Set HOPT " -H2"
   ELSE
      echo "Error: Missing SM=<num> argument"
      QUIT 5
   ENDIF
ELSE
  IF $tmp2 gt 0
      echo "Error: Missing DEPTH=<num> argument"
  ENDIF
ENDIF

; ===========
; WINDOW SIZE
; ===========
IF {LORES}
   Set OOPT " -O320:256:XYl"
ENDIF
IF {HIRES}
   Set OOPT "-O640:512:XYd"
ENDIF

; ========
; RAM SIZE
; ========
set RAMOPT ""
IF {CHIP}
   set tmp1 `eval {CHIP}/256`
   IF $tmp1 gt 0
      Set RAMOPT "$RAMOPT -c$tmp1"
   ELSE
      Echo "Error: CHIP=256 or 512 or 1024 or 2048"
      Return 5
   ENDIF
ENDIF
IF {Z2RAM}
   set tmp1 `eval {Z2RAM}/1024`
   IF $tmp1 gt 0
      Set RAMOPT "$RAMOPT -F$tmp1"
   ELSE
      Echo "Error: Z2RAM=1024 or 2048 or ... or 8192"
      Return 5
   ENDIF
ENDIF
IF {Z3RAM}
   set tmp1 `eval {Z3RAM}/1024`
   IF $tmp1 gt 0
      Set RAMOPT "$RAMOPT -Z$tmp1"
   ELSE
      Echo "Error: Z3RAM=1024 or 2048 or ..."
      Return 5
   ENDIF
ENDIF
IF {SLOWFAST}
   set tmp1 `eval {SLOWFAST}/512`
   IF $tmp1 gt 0
      Set RAMOPT "$RAMOPT -s$tmp1"
   ELSE
      Echo "Error: SLOWFAST=512 or 1024"
      Return 5
   ENDIF
ENDIF

; =====
; DISKS
; =====
set DISKS ""
IF {DF0}
  set DISKS "$DISKS -d{DF0}"
ENDIF
IF {DF1}
  set DISKS "$DISKS -d{DF1}"
ENDIF
IF {DF2}
  set DISKS "$DISKS -d{DF2}"
ENDIF
IF {DF3}
  set DISKS "$DISKS -d{DF3}"
ENDIF
IF {ROMFILE}
  set RISKS "$DISKS -r{ROMFILE}"
ENDIF

; =====
; SOUND
; =====
set SOUND " -S2"
IF {NOSOUND}
  set SOUND " -S0"
ENDIF

; ====
; MISC
; ====
set MISC ""
IF {NODITHER}
  set MISC "$MISC -x"
ENDIF
IF {GRAY}
  set MISC "$MISC -T"
ENDIF
IF {FASTBLIT}
  set MISC "$MISC -n3i"
ENDIF

; ===============
; VOLUME MOUNTING
; ===============
set MOUNT ""
IF {MOUNT}
  set "-m{MOUNT}"
ENDIF

IF "{NOGUI}" eq ""
   path src amiga add
   run >NIL: rx UAEGUI.rexx
ENDIF

UAE $HOPT$OOPT$RAMOPT$SOUND$MISC$DISKS$MOUNT