home *** CD-ROM | disk | FTP | other *** search
/ Fractal Frenzy 1 / WalnutCreekFractalFrenzy-1.iso / pc / viewers / amiga / giftoif2.lzh / convert next >
AmigaDOS Script File  |  1993-12-08  |  1KB  |  66 lines

  1. .key source/a,image/a,opt1,opt2,opt3
  2.  
  3. if exists <image>.tmp
  4.   echo "Found <image>.tmp ... skipping to TMPtoIFF"
  5.   skip T2ICONT
  6. endif
  7. if exists <source><image>
  8.   G2I:GIFtoTMP <source><image> <image>.tmp
  9.   if warn
  10.     skip UNLACEIT
  11.   endif
  12.   if not exists <image>.tmp
  13.     echo "G2I:GIFtoTMP <source><image> <image>.tmp   failed"
  14.     quit 20
  15.   endif
  16. else
  17.   if exists <source><image>.gif
  18.     G2I:GIFtoTMP <source><image>.gif <image>.tmp
  19.     if warn
  20.       skip UNLACEIT
  21.     endif
  22.     if not exists <image>.tmp
  23.       echo "G2I:GIFtoTMP <source><image>.gif <image>.tmp --- failed"
  24.       quit 20
  25.     endif
  26.   else
  27.     echo "Can't find <source><image> or <source><image>.gif"
  28.     quit 20
  29.   endif
  30. endif
  31.  
  32. LAB T2ICONT
  33. G2I:TMPtoIFF <image>.tmp <image>.pic <opt1> <opt2>
  34. if exists <image>.pic
  35.   if <opt3> EQ "NOTMP"
  36.     del <image>.tmp
  37.   endif
  38.   echo "Success"
  39.   skip THEEND
  40. else
  41.   echo "G2I:TMPtoIFF <image>.tmp <image>.pic <opt1> <opt2> --- failed"
  42. endif
  43. quit 20
  44.  
  45. LAB UNLACEIT
  46. G2I:Unlace <image>.tmp <image>.ltmp
  47. if exists <image>.ltmp
  48.   del <image>.tmp
  49.   rename <image>.ltmp <image>.tmp 
  50.   G2I:TMPtoIFF <image>.tmp <image>.pic <opt1> <opt2>
  51.   if exists <image>.pic
  52.     if <opt3> EQ "NOTMP"
  53.       del <image>.tmp
  54.     endif
  55.     echo "Success"
  56.     skip THEEND
  57.   else
  58.     echo "G2I:TMPtoIFF <image>.tmp <image>.pic <opt1> <opt2> --- failed"
  59.     quit 20
  60.   endif
  61. else
  62.   echo "G2I:Unlace <image>.tmp <image>.ltmp --- failed"
  63. endif
  64. quit 20
  65. LAB THEEND
  66.