@Drakon, post #184
@Drakon, post #185
@polutuje, post #189
@madman15, post #195
C:LoadModule >NIL: L:cardres.ld.strip REVERSE
@Drakon, post #196
@madman15, post #195
@SokOK, post #202
@SokOK, post #204
@SokOK, post #204
;ClassicWB Startup-Sequence
;--------------------------
;FULL ADV ADVSP UAE 3.1
IF EXISTS DEVS:scsi.device
C:LoadModule DEVS:scsi.device
EndIF
C:GetMouseInput LOCAL
C:LoadModule >NIL: L:cardres.ld.strip REVERSE
IF $MouseInput EQ 1
Unset MouseInput
C:SetPatch QUIET
C:Assign >NIL: ENV: RAM:
C:Assign >NIL: T: RAM:
C:Execute S:Maxmem-Sequence
EndCLI >NIL:
EndIF
IF $MouseInput EQ 2
Unset MouseInput
C:Execute S:Bootmenu-Sequence
EndCLI >NIL:
EndIF
Unset MouseInput
C:SetPatch QUIET
;C:Cardpatch
;C:Cardreset
IF EXISTS C:StackAttack
C:StackAttack
EndIF
C:Version >NIL:
FailAt 21
IF EXISTS SYS:WBstartupD
C:Rename >NIL: SYS:WBStartup SYS:WBStartupM
C:Rename >NIL: SYS:WBStartupD SYS:WBStartup
EndIF
Resident >NIL: C:IconX PURE
Resident >NIL: C:WBRun PURE
Resident >NIL: C:Assign PURE
Resident >NIL: C:Execute PURE
IF EXISTS L:env-handler
C:MakeDir RAM:T RAM:Clipboards
L:env-handler
C:Copy >NIL: ENVARC:Sys/def_kick.info ENV:Sys/def_kick.info
ELSE
C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
Assign >NIL: ENV: RAM:ENV
EndIF
IF EXISTS C:PatchRAM
C:PatchRAM
EndIF
IF EXISTS C:TagLiFE
C:TagLiFE
EndIF
Assign >NIL: T: RAM:T
Assign >NIL: CLIPS: RAM:Clipboards
Assign >NIL: REXX: S:
Assign >NIL: PRINTERS: DEVS:Printers
Assign >NIL: KEYMAPS: DEVS:Keymaps
Assign >NIL: LOCALE: SYS:Locale
Assign >NIL: LIBS: SYS:Classes ADD
Assign >NIL: HELP: LOCALE:Help DEFER
IF EXISTS C:BlazeWCP
C:BlazeWCP
EndIF
IF EXISTS SYS:System/FBlit/FBlit
SYS:System/FBlit/FBlit
SYS:System/FBlit/FText
EndIF
BindDrivers
C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
IF EXISTS DEVS:Monitors
IF EXISTS DEVS:Monitors/VGAOnly
DEVS:Monitors/VGAOnly
EndIF
C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
Execute T:M
C:Delete >NIL: T:M
EndIF
SetEnv Language "english"
SetEnv Workbench $Workbench
SetEnv Kickstart $Kickstart
UnSet Workbench
UnSet Kickstart
IF EXISTS C:IconBeFast
C:IconBeFast 0
EndIF
C:AddDataTypes REFRESH QUIET
C:IPrefs
C:ConClip
Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
IF EXISTS S:User-Startup
Execute S:User-Startup
EndIF
Resident Execute REMOVE
Resident Assign REMOVE
IF EXISTS C:StackAttack
C:StackAttack AUTO
EndIF
C:LoadWB
EndCLI >NIL:@Drakon, post #206
@perinoid, post #208