home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / GFX / Converter / IMAFX26.lha / imagefx2 / rexx / autofx / Load.ifx < prev    next >
Encoding:
Text File  |  1996-04-23  |  1.4 KB  |  58 lines
  1. /*
  2.  * $VER: Load.ifx 2.6 (24.04.96)
  3.  * Copyright © 1992-1996 Nova Design, Inc.
  4.  * Originally written by Steve Tibbett
  5.  * Updated by Thomas Krehbiel
  6.  *
  7.  * Loads main, swap, and alpha buffers.  Only loads the images if
  8.  * they are specified.
  9.  *
  10.  * Inputs:
  11.  *    Word(Arg(1),1) = Frame number (1 - N)
  12.  *    Word(Arg(1),2) = Main filename ("-" if not specified)
  13.  *    Word(Arg(1),3) = Swap filename ("-" if not specified)
  14.  *    Word(Arg(1),4) = Sequence number (?)
  15.  *    Word(Arg(1),5) = Total number of frames (N)
  16.  *    Word(Arg(1),6) = Alpha filename ("-" if not specified) [2.6]
  17.  *
  18.  * Returns:
  19.  *    0 if successful, non-zero on failure
  20.  *
  21.  */
  22.  
  23. OPTIONS RESULTS
  24.  
  25. /*
  26.  * AutoFX 2.6 now sets some clip variables.  If we find them, use them instead
  27.  * of the arg strings so that we can handle filenames with spaces in them.
  28.  */
  29.  
  30. MainName = GETCLIP('AUTOFX_MAIN')
  31. IF MainName = "" THEN MainName=word(Arg(1),2)
  32.  
  33. SwapName = GETCLIP('AUTOFX_SWAP')
  34. IF SwapName = "" THEN SwapName=word(Arg(1),3)
  35.  
  36. AlfName = GETCLIP('AUTOFX_ALPHA')
  37. IF AlfName = "" THEN AlfName=word(Arg(1),6)
  38.  
  39. /* test = GETCLIP('FRIDAY')
  40. RequestNotify '(' test '|' MainName '|' SwapName '|' AlfName ')' */
  41.  
  42. LoadBuffer Force '"'MainName'"'
  43. IF rc ~= 0 THEN EXIT rc
  44.  
  45. IF (SwapName ~= "-") THEN DO
  46.         Swap
  47.         LoadBuffer Force '"'SwapName'"'
  48.         IF rc ~= 0 THEN EXIT rc
  49.         Swap
  50.         END
  51.  
  52. IF (AlfName ~= "-") /*&& (AlfName ~= "")*/ THEN DO
  53.    LoadAlpha '"'AlfName'"' Force
  54.    IF rc ~= 0 THEN EXIT rc
  55.    END
  56.  
  57. EXIT 0
  58.