home *** CD-ROM | disk | FTP | other *** search
- /* Test of screentoback/front */
-
- address "MPlot_ARexx"
- options results
-
- if(~show('L','rexxsupport.library')) then do
- if(~addlib('rexxsupport.library',0,-30,0) ) then do
- say "ARexx-support-library not found"
- exit 10
- end
- end
-
-
- screentofront
- a=delay(150)
- screentoback
- a=delay(150)
- screentofront