home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / FLM2151.LZX / FLM2.15 / FLM / ARexx / look.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1995-02-08  |  1.0 KB  |  30 lines
  1. /* Dieser Script schickt ein Wort an FLM,
  2.    worauf FLM das FLM-ARexx-Fenster öffnet */
  3.  
  4. /* Hier bitte den Pfad und Programmnamen von FLM einstellen*/
  5. initiation=run "dh0:FLM/FLM"
  6.  
  7. Options RESULTS /*Damit auch eine Rückgabe erfolgen kann*/
  8.  
  9. IF ~show('P','FLM') THEN DO
  10.  /*falls FLM noch nicht gestartet ist*/
  11.  ADDRESS COMMAND initiation
  12.  /* Warten bis FLM gestartet wurde ...*/
  13.  ADDRESS COMMAND "SYS:RexxC/WaitForPort FLM"
  14. END
  15.  
  16.  
  17. RESULT='go'
  18. /*Hier wird das Wort go in die Variable RESULT geschrieben. Diese Zeile
  19.   müssen Sie ändern, damit z.B. das Wort unter dem Cursor an FLM geschickt
  20.   werden kann. Wenn z.B. der ARexx-Befehl Ihres Text-Programmes "GetWord"
  21.   heißt, so müßte hier "Address <adr> GetWord" stehen. Für <adr> müssen Sie
  22.   die ARexx-Adresse Ihres Programmes schreiben, welche sich in Ihren
  23.   Programm-Dokumentationen befindet.
  24.   Es ist normalerweise auch möglich 'Address' + 'Port-Adresse des
  25.   Programmes' wegzulassen. Dann müßten Sie z.B. nur "GetWort" schreiben.
  26. */
  27.  
  28. Address FLM LOOKWORD RESULT /* Schickt Wort, welches in Variable RESULT steht an FLM*/
  29.  
  30.