[comp.sys.mac] HyperTalk OS-module

peterm@dna.lth.se (Peter M|ller) (01/09/90)

In a posting on the 2nd of January I said that I would like to have a OS 
module appended to HyperTalk, and that it should be able to write/execute 
those scripts outside of HyperCard. Someone then asked what that should do. 
This is an answer.

I can easily imagine a lot of things that such a language could do. For 
example:

1. Delete unwanted files from the System-folder and do specific things upon 
startup
   "on poweron
      delete all files in 'HD:SystemFolder:' with creator = "MSWD"
      ...
      show 'AppleShare:Stuff:InfoPicture'
      wait until mousedown
      close all windows
      ...
    end poweron"

2. Shut down the computer if no one is using it
   "on idle
      if no application in use and no useractivity for > 30 min 
         then shutdown
    ...
    endidle"

3. Do repetitive tasks, such as backup (assuming that you have a GigaByte 
tapebackup attached to your system)
   "on idle
      if saturday and no program in use and no useractivity for > 2 hrs
         then run 'HD:FileEdit:BackUpProgram'
         append 'Backupped:'+date+time to 'HD:SystemFolder:BackupLog'
    ...
    endidle"

3. Keep track of which programs are used
   "on applicationstart
       append applicationname+date+time to 'HD:SystemFolder:LogFile'
    endapplicationstart"

   "on quitapplication
       find last applicationname in 'HD:SystemFolder:LogFile'
       add on the same line ' quit:'+date+time 
    endquitapplication"

4. Typing in a messagebox
   "find all files in 'HD:Appl:' with creator = 'MSWD','MACA'"

5,6,7... YOU fill in!!


These are mere suggestions, and - I am afraid - not very HyperTalk'ish. If you 
like it and/or have opinions, please follow up or mail me! Remember to keep 
this subject clean of napalm.

yours sincerely

Peter Moller

------------------------------------------------------------------------------
Lund Institute of Technology, LTH    |   Internet: peterm@dna.lth.se
Box 118                              |   Voice:    +46 (0)46 13 00 11
S-221 00 LUND, Sweden                |   Beach:    beside the georgous girls
------------------------------------------------------------------------------