home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / INTERWORD1.DMS / in.adf / Rexx / CursorMove.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1993-03-15  |  836 b   |  37 lines
  1. /*
  2.  *
  3.  * Script name:     CursorMove.rexx
  4.  * Author:          Franz Hemmer
  5.  * Purpose:         Demonstrate how to move the cursor in a direction in InterWord.
  6.  * Related Program: InterWord Pro
  7.  * Written:         01.03.93
  8.  *
  9.  */
  10.  
  11. /*--------------------*/
  12. /* Get result in 'rc' */
  13. /*--------------------*/
  14. Options Results
  15. PARSE ARG direction
  16.  
  17. IF direction = "" THEN
  18.     DO
  19.         SAY 'Usage: CursorMove <direction>'
  20.         SAY 'Supported directions are:'
  21.         SAY '  - START_OF_TEXT'
  22.         SAY '  - END_OF_TEXT'
  23.         SAY '  - START_OF_PAGE'
  24.         SAY '  - START_OF_NEXT_PAGE'
  25.         SAY '  - UP'
  26.         SAY '  - LEFT'
  27.         SAY '  - DOWN'
  28.         SAY '  - RIGHT'
  29.       EXIT 5
  30.    END
  31. ENDIF
  32.  
  33. /*----------------------------------------------*/
  34. /* Address InterWord port, and execute command. */
  35. /*----------------------------------------------*/
  36. ADDRESS INTERWORD1 CURSOR_MOVE direction
  37.