home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni E Inventori 1: Lavoro E Vita Quotidiana / invenzioni-inventori-1.iso / mac / Invenzio / index.dir / 00056_Script_56 < prev    next >
Text File  |  1997-10-15  |  586b  |  17 lines
  1. on cps
  2.   global attore,cisei
  3.   set cisei to true
  4.   if objectP (attore) then   forget attore
  5.   set attore to window ("popup")
  6.   if the machinetype < 255 then
  7.     set the filename of attore to ("invenzioni:invenzio:popsot.dir")
  8.   else
  9.     set a to char 1 of the moviepath
  10.     set the filename of attore to (a & ":\invenzio\popsot.dir")
  11.   end if
  12.   set s to rect (the stageLeft+336,the stageTop +340,the stageLeft+624,the stageTop + 468)
  13.   set the rect of window "popup" to s
  14.   set the windowType of  window "popup" to 3      
  15.   open attore
  16.   moveToFront window "popup"
  17. end