home *** CD-ROM | disk | FTP | other *** search
/ The AGA Experience 2 / agavol2.iso / software / utilities / comms / voodoo / rexx / sendvoodoo.ttx < prev   
Text File  |  1996-01-14  |  307b  |  13 lines
  1. /*
  2.  *
  3.  * Deliver message when using TurboText as an external editor for Voodoo.
  4.  *
  5.  */
  6.  
  7. OPTIONS RESULTS
  8. SaveFile QUIET            /* QUIET (suppress requesters) requires TTX 2.0  */
  9. GetFileInfo
  10. PARSE VAR result . . '"'message'"'
  11. ADDRESS 'VOODOO' 'SEND' 'T:'message /* Signal Voodoo to send message */
  12. CloseDoc QUIET
  13.