home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / OB3.2D4.DMS / in.adf / rexx / aF6.oed < prev    next >
Encoding:
Text File  |  1992-10-15  |  234 b   |  17 lines
  1. /* OEd Rexx Command  'Alt + F6': "PROCEDURE ..." */
  2.  
  3. address 'OEd'
  4.  
  5. 'return'
  6. 'return'
  7. 'write PROCEDURE'; 'right'; 'write ();'
  8. 'return'
  9. 'return'
  10. 'write BEGIN';
  11. 'return'
  12. 'write END'; 'right'; 'write ;'
  13. 'up'
  14. 'up'
  15. 'up'
  16. do 5; 'right'; end
  17.