/* Script which takes translation from FLM, and writes it under the GoldED
   cursor position.

   To call this script automatically from GoldEd, follow the following
   steps:

   1. Start GoldEd and start "Keyboard..." in menu "Config".
   2. In the following window select "Record", and then press a key
      combination by which later you'll be able to call FLM. E.g. Ctrl+F9.
   3. In the following window select "Add".
   4. On the right, you must now select ARexx, and then the gadget on the
      right near to "Add". In the following filerequester, select this file
      ("golded_take.rexx") aus.
   5. Now click "Ok" and "Save".

   Now test just once if all this worked. If all is OK, now you should be
   able e.g. to write the translation from FLM under the current cursor
   position through Ctrl+F9.

-> Warning: Program FLM and RexxMast must be active !!!
*/

Options RESULTS

Address FLM TAKEWORD /* Translation from FLM in Variable RESULT */

If Symbol('RESULT')='LIT' Then Exit /* Is RESULT defined? */

TEXT T '"'RESULT'"' /* Contents of variable RESULT under cursor pos. */