home *** CD-ROM | disk | FTP | other *** search
/ El Mac 8 / El Mac 8.iso / Shareware / Demos / OpenStack™ (Demo US) / OpenStack™ Demo / Objects Library (Demo) / Others / Column / Column.rsrc / HSCR_6000_DirectActionScript < prev    next >
Encoding:
Text File  |  1995-10-23  |  327 b   |  11 lines

  1. on namedScr
  2. global gOpenStackInfos
  3. put line 8 of gOpenStackInfos into targetObj
  4. put line 10 of gOpenStackInfos into objName
  5. if objName="Column" then
  6. ask "Type the name of the new section:" with objName
  7. if it=empty then exit namedScr
  8. put it into objName
  9. end if
  10. do "put ""e&objName&" :""e&" into "&targetObj
  11. end namedScr