;ClassicWB Startup-Sequence
Wait 1
C:TestRMB
IF WARN
C:SetPatch QUIET
C:Version >NIL:
C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
Resident >NIL: C:Assign PURE
Resident >NIL: C:Execute PURE
Assign >NIL: ENVARC: S:Env-Archive
C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
Assign >NIL: ENV: RAM:ENV
Assign >NIL: T: RAM:T
Assign >NIL: CLIPS: RAM:Clipboards
Execute >NIL: S:Minboot-Sequence
EndIF
C:TestLMB
IF WARN
C:SetPatch QUIET
C:Version >NIL:
C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
Assign >NIL: ENV: RAM:ENV
Assign >NIL: T: RAM:T
Assign >NIL: CLIPS: RAM:Clipboards
Execute >NIL: S:CLIboot-Sequence
EndIF
C:SetPatch QUIET
C:Version >NIL:
FailAt 21
C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
Resident >NIL: C:Assign PURE
Resident >NIL: C:Execute PURE
Assign >NIL: ENV: RAM:ENV
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 NOT EXISTS SYS:Fonts
Assign FONTS:
EndIF
IF EXISTS SYS:Expansion/FBlit/FBlit
SYS:Expansion/FBlit/FBlit
SYS:Expansion/FBlit/FText
ELSE
C:Delete >NIL: RAM:ENV/Newicons.prefs
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 Workbench $Workbench
SetEnv Kickstart $Kickstart
UnSet Workbench
UnSet Kickstart
C:AddDataTypes REFRESH QUIET
C:IPrefs
C:ConClip
IF EXISTS SYS:WBstartupD
Rename >NIL: SYS:WBStartupD SYS:WBStartup
EndIF
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
C:LoadWB
EndCLI >NIL:
;ClassicWB User-Startup
C:Anticlick
Assign A-Games: SYS:Games
Assign A-Temp: SYS:Temp
Assign A-Programs: SYS:Programs
Assign A-MyFiles: SYS:MyFiles
Assign A-Demos: SYS:Demos
Assign Scalos: SYS:Expansion/Scalos
Assign JPEGTMP: SYS:T
Assign AWEB_APL: A-Programs:AWeb_APL
;BEGIN MUI
if exists Sys:Expansion/MUI
assign MUI: Sys:Expansion/MUI
if exists MUI:Libs
assign add LIBS: MUI:Libs
endif
if exists MUI:Locale
assign add LOCALE: MUI:Locale
endif
version >nil: exec.library 39
if not warn
if exists MUI:Docs
if exists HELP:dummy
endif
assign add HELP: MUI:Docs
endif
endif
endif
;END MUI
Mount KCON: from DEVS:KingCON-mountlist
Mount KRAW: from DEVS:KingCON-mountlist
SYS:System/Rexxmast >NIL:
xfdPatch >NIL:
Run >NIL: XpkMasterPrefs
C:CAPrefs >NIL:
Momento | Memoria libre |
Después de terminarse de cargar | 853.392 bytes |
Directory Opus | dos errores de mostrar ventana |
Eagle Player | 417.912 bytes |
Después de abrir el cajón System (disco) | 510.720 bytes |
Después de abrir el cajón Programs (System cerrado) | 495.384 bytes |
Después de cargar el driver PC0 y cerrado todos los cajones abiertos | 790.336 bytes |