Addbuffers >NIL: df0: 30
FailAt 21

version >NIL: graphics.library 37
IF WARN
   ;less than WB2.04
   echo ""
   echo "Für Wordworth 3 wird mindestens Workbench 2.04 benötigt! "
   echo "Startvorgang wird abgebrochen!"
   quit
ELSE
   version >NIL: graphics.library 39
   IF WARN
      ;less than WB3.0
      SetPatch QUIET
   ELSE
      ; WB3.0
      SetPatch3.0 QUIET
   ENDIF
ENDIF

Path >NIL: RAM: C: S: SYS:System

Resident >NIL: C:Assign PURE
Resident >NIL: C:makedir PURE
Resident >NIL: C:Copy PURE
Resident >NIL: C:delete PURE

MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
Copy >NIL: ENVARC: RAM:ENV ALL NOREQ

Assign >NIL: ENV: RAM:ENV
Assign >NIL: T: RAM:T
Assign >NIL: CLIPS: RAM:Clipboards
Assign >NIL: PRINTERS: DEVS:Printers
Assign >NIL: LIBS: SYS:Classes ADD
Assign >NIL: KEYMAPS: DEVS:Keymaps
Assign >NIL: LOCALE: SYS:Locale

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

C:IPrefs

SetEnv Workbench $Workbench
SetEnv Kickstart $Kickstart
UnSet Workbench
UnSet Kickstart

IF EXISTS s:User-Startup
  execute s:User-Startup
ENDIF

Resident makedir REMOVE
Resident delete REMOVE

c:LoadWB
ENDCLI >NIL: