news
About Elegant Chaos
info
About me and my friends
people
Software from Elegant Chaos
software
Other stuff...
stuff

UL_InitScript

Revision 1
Revised on 19/03/95 19:01

Description

Initialise the Utility Library.

Don't call this script yourself unless you know what you're doing.


Code

on UL_InitScript
  global UL_inited, UL_QuietStartup,gUL_LockCount,Development,Stacks
  
  if UL_inited is not true then
    set cursor to "sam"
    
    UL_ReadPrefs
    
    if UL_QuietStartup is not true then
      -- maybe put up a dialog
    end if
    
    put 0 into gUL_LockCount
    
    if Development then
      ULTRALAB "Also","Development"
    end if
  end if
end UL_InitScript