home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / FileMover / HF-OM1.DMS / in.adf / CoreMagellan.lha / System / _CopyTo / TestScript.dopus5
Encoding:
Text File  |  1997-05-07  |  662 b   |  21 lines
  1. /*
  2.    An example of a CopyTo script. This script must be placed in the
  3.    DOpus5:System/CopyTo directory (create it if it doesn't already
  4.    exist). You must set the comment of the script file to the entry
  5.    you want displayed in the CopyTo menu. You must also set the S
  6.    protection bit.
  7.  
  8.    This will cause an entry to be created in the Copy >> menu in 
  9.    file and directory popup menus. Selecting this entry will
  10.    cause the script to be launched. It is passed the name of the
  11.    selected file, the Opus port name and the source lister handle.
  12.  
  13. */
  14.  
  15.  
  16. parse arg filename portname source
  17. options results
  18.  
  19. str="'File : "||filename||"'"
  20. dopus request str "Ok"
  21.