;AddMem 200000 2fffff ;include non auto-config. RAM exp.
;remove initial semicolon to use the command
;follow your manual to set parameters, copy AddMem to c directory

	SYS:CloantoAudio ;optional to save stack RAM
Stack 12000

SYS:System/SetMap usa1 ;Activate the ()/* on keypad. TASTIERA USA.

SYS:System/SetMap i ;delete this line if USA keyboard. TASTIERA ITALIANA.
;TOGLIERE LA RIGA QUI SOPRA PER LAVORARE CON LA TASTIERA USA

;SYS:Nimm3 -iy ;Invert Y & Z Keys (remove initial semicolon to use Nimm3)
;TOGLIERE IL PUNTO E VIRGOLA INIZIALE SOPRA PER INVERTIRE I TASTI <Y> E <Z>.

SYS:RAMExp
if WARN
   loadwb
   C1-Text
   endcli
   endif

Addbuffers df0: 10
c:SetPatch >NIL: ;patch system functions

cd c:
echo "A500/A2000 I Workbench disk.  Release 1.3 version 34.20*N"
echo "Cloanto C1-Text,  v. 1.01 I  -  © Cloanto ® 1987, 1988, 1989."
echo "Tutti i diritti riservati. Riproduzione vietata."

Sys:System/FastMemFirst ;move C00000 memory to last in list
BindDrivers
SetClock >NIL: load ;load system time from real time clock
;                    A1000 owners should replace the SetClock load with Date

if exists SYS:c/FF
   FF >NIL: -0 ;speed up Text
   endif

resident CLI L:Shell-Seg SYSTEM pure add; activate Shell
resident c:Execute pure
mount newcon:
;
failat 11
run execute s:StartupII ;This lets resident be used for rest of script
wait >NIL: 5 mins ;wait for StartupII to complete (will signal when done)


path ram: c: sys:utilities sys:system s: sys:prefs add ;set path for Workbench
LoadWB delay ;wait for inhibit to end before continuing

SYS:RAMExp
if WARN
   endcli >NIL:
   endif

;wait 1 SEC
;SYS:MJump wcc 570 180
;wait 11 SEC
;SYS:MJump qcc 80 104 ;WBench auto-run C1-Text

SYS:C1-Text ;CLI auto-run C1-Text

endcli >NIL: