home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / datatypes / mpegsystem_datatype / mpegsystemtest < prev    next >
Encoding:
Text File  |  1997-11-04  |  650 b   |  30 lines
  1. ; mpegsystem.datatype test script
  2. ; Execute it from the base directory
  3.  
  4. FailAt 10
  5. Set ECHO ON
  6.  
  7. ; Is here the datatype shared library ?
  8. If EXISTS "mpegsystem.datatype.ld"
  9.   ; Check if we created the test directory
  10.   If NOT EXISTS "RAM:DataTypes"
  11.     MakeDir "RAM:DataTypes"
  12.     Assign LIBS: RAM: ADD
  13.   EndIf
  14.  
  15.   ; Copy descriptor
  16.   If NOT EXISTS "RAM:MPEG System"
  17.     Copy CLONE FROM="MPEG System(%|.info)" TO="RAM:"
  18.   EndIf
  19.  
  20.   ; Copy class library
  21.   Copy CLONE FROM="mpegsystem.datatype.ld" TO="RAM:Datatypes/mpegsystem.datatype"
  22.  
  23.   ; Get rid of the old version
  24.   C:FlushLibs
  25. Else
  26.   ECHO "No mpegsystem.datatype.ld in this directory"
  27.   Quit 10
  28. EndIf
  29.  
  30.