home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / PAGESTREAM3,0-1.DMS / in.adf / Macros.LHA / StickyNote.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1994-08-31  |  624 b   |  19 lines
  1. /* StickyNote.rexx */
  2. /* Copyright 1994 Soft-Logik Publishing Corporation */
  3. /* May not be distributed without Soft-Logik Publishing Corporation's express written permission */
  4. /* $VER: 1.0 */
  5.  
  6. ADDRESS 'PAGESTREAM'
  7. options results
  8. addlib("softlogik:libs/slarexxsupport.library", 0, -30)
  9.  
  10. 'settoolmode object'
  11. 'getcoord click message "Click to place the sticky note..."'
  12.  
  13. 'DRAWCOLUMN 'click.x click.y p2d(click.x)+2.25 p2d(click.y)+2.75' COLUMNS 1 GUTTER 0.25i '
  14. 'EDITCOLUMN NOPRINT FREE '
  15. 'FILLED ON '
  16. 'SETCOLORSTYLE Yellow COLORNUMBER 0 FILL OBJECT '
  17. 'settoolmode text '
  18. 'selecttext at 'p2d(click.x)+0.25 p2d(click.y)+0.25
  19.