home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / Mathscript_cr.lzx / MathScript / Rexx / Insert_FMLCode.ms < prev   
Encoding:
Text File  |  1996-07-04  |  478 b   |  24 lines
  1. /* Insert_FMLCode.ms V1.0
  2. **
  3. ** Open a string requester where you can enter MathScript's
  4. ** formula describtion code to be inserted
  5. ** Needs rexxreqtools.library!
  6. **
  7. */
  8.  
  9. options results
  10.  
  11. if ~show('l','rexxreqtools.library') then
  12.    if ~addlib('rexxreqtools.library',0,-30,0) then
  13.      do
  14.        say "Cannot open rexxreqtools.library!"
  15.        exit 20
  16.      end
  17.  
  18. code=rtgetstring(,"FML Code:","Insert FMLCode","_Insert|_Cancel",,)
  19.  
  20. if code="" then exit
  21.  
  22. InsertCode '"'||code||'"'
  23.  
  24.