home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 10
/
aminetcdnumber101996.iso
/
Aminet
/
misc
/
math
/
graph2d320.lha
/
Graph2DV3.20
/
Rexx
/
SendToMathScript.rexx
< prev
Wrap
OS/2 REXX Batch file
|
1995-04-29
|
352b
|
24 lines
/*
** This script gets the selected function from Graph2D
** and sends it to MathScript
** Author: Kai Nickel
*/
options results
ADDRESS 'GRAPH2D.1'
GETFUNCTION MS20
fkt = result
IF ~SHOW('p',"MATHSCRIPT.1") THEN
DO
ADDRESS COMMAND "run MathScript:MathScript"
ADDRESS COMMAND "wait 3"
END
ADDRESS "MATHSCRIPT.1"
SCREENTOFRONT
SETCONTENTS fkt