/*
** AmiRecRLoad.ced
**
** $AmiRecRLoad 1.0 (07.09.94), written by Janne Saarme.
**
** This script is an ARexx program for communicating with CED.
** Requires CygnusEd Professional v3.5 (or later) to run.
**
** 
** What this do? 
**		Load recent file. Cut all crap away and run
** 		AmiRecRSave script if ya want. 
**
** How to install script?
**
** Edit this script for your needs and save it in ARexx directory.
**
** Select Special
**
**	Dos/Arexx interface
**	Install dos/Arexx command...
**
**   from CED. Enter the function key number you want to assign.
**   Give AmiRecRLoad and ENTER.
**
**   If you wish to save these commands, select "Save Dos/ARexx commands..."
**
*/


/* Default path and filename of RECENT file. */
default = "Dl:Recent2"		

/* If there is something crap before list, we try to find list. */
searchstring  = "|File"		  
				 

OPTIONS RESULTS

/* Set the default port name so that commands go to CED. */
ADDRESS "rexx_ced"		

/* Use the 'Open new' menu command to open up a new project. */
OPEN NEW			

/* Expand the new view out to full size. */
EXPAND VIEW			

/* Load default file or... */

OKAY2 "Do you want to load default file?"
if (RESULT = 1) THEN
    OPEN default
else
    OPEN

/* If you do not want to destroy "crap" before list, remove MARK and CUT lines. */
MARK				
 				  
SEARCH FOR searchstring
CUT

EXIT 0