failat 30
C:MakeDir ram:temp
C:MakeDir ram:temp/t
C:MakeDir ram:temp/env
C:MakeDir ram:temp/clips
C:Assign T: ram:temp/t
C:Assign ENV: ram:temp/env
C:Assign ENVARC: sys:prefs/env-archive
C:Assign CLIPS: ram:temp/clips
C:Assign AMITEKST: sys:amitekst
C:Copy >nil: ENVARC: ENV: all quiet
C:Relabel ram: Ram_Disk
C:SetPatch QUIET
C:ChgFont >nil: TopPL.font
C:setmap usa-pl
;C:SetClock >nil: load
C:GoWB