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

BL_SetupScript

Revision
Revised on

Description


Code

on BL_SetupScript
  global BL_Inited, BL_LibraryToBackup
  
  if BL_Inited is not true then
    BL_ReadPrefs
    BL_GetBackupFlag
    BL_SetNextBackup
    
    put the number of lines in the stacksInUse into nLibs
    put the number of lines in the stacks into nStacks
    put random(nStacks+nLibs) into BL_LibraryToBackup
    put true into BL_Inited
  end if
  
  
end BL_SetupScript