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