home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / FLM2151.LZX / FLM2.15 / FLM / ARexx / edward_look.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1995-02-08  |  1.2 KB  |  37 lines
  1. /* Dieser Script schickt Wort unter Cursor-Position an FLM
  2.  
  3.    Um diesen Script über eine Tastenkombination aufzurufen, laden Sie
  4.    die Datei "Edward.DEF" im Edward-Verzeichnis. Gehen Sie nun mit dem Cursor
  5.    an die Stelle "Keybordbelegungen" (befindet sich nach den
  6.    Menü-Einstellunegn) und fügen folgende Zeile z.B. nach "(CTRL" ein.
  7.  
  8.    <Taste> (ExecRexx "<Datei>")
  9.  
  10.    <Taste>:Hier müssen Sie die Taste eingeben, mit der Sie diesen Script
  11.            aufrufen möchten, z.B. F10
  12.    <Datei>:Hier müssen Sie den Namen dieser Datei und ihren Pfad angeben.
  13.  
  14.    Bsp.: F10    (ExecRexx "edward_look.rexx")
  15.  
  16.    Nach obigem Beispiel wird nun durch Ctrl+F10 das Wort unter dem Cursor an
  17.    FLM geschickt, welches daraufhin ein Fenster mit der Übersetzung öffnet.
  18.  
  19. -> Beachten Sie, daß das Programm RexxMast aktiv ist !!!
  20. */
  21.  
  22. /* Hier bitte den Pfad und Programmnamen von FLM einstellen*/
  23. initiation=run >NIL: "dh0:FLM/FLM"
  24.  
  25. Options RESULTS
  26.  
  27. IF ~show('P','FLM') THEN DO
  28.  /*falls FLM noch nicht gestartet ist*/
  29.  ADDRESS COMMAND initiation
  30.  ADDRESS COMMAND "SYS:RexxC/WaitForPort FLM"
  31. END
  32.  
  33. GetWord /* Wort unter Cursor in Variable RESULT */
  34.  
  35. Address FLM lookword RESULT /*Inhalt von Variable RESULT an FLM*/
  36.  
  37.