home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1997 #3 / amigamamagazinepolishissue03-1 / ma_1995 / 04 / ami037a.txt < prev    next >
Text File  |  1997-04-06  |  1KB  |  94 lines
  1. <l>
  2. /* ConvertFLC.ifx
  3.  
  4.  *
  5.  
  6.  * Makrodefinicja ta tworzy kopië animacji úródîowej i zapisuje jâ do pliku
  7.  
  8.  * w formacie FLC. 
  9.  
  10.  * Zakîada sië ûe parametry generowania sâ ustawione w panelu
  11.  
  12.  * RENDER ImageFX'a 
  13.  
  14.  * 
  15.  
  16.  * Autor: Tadeusz Talar 
  17.  
  18.  */
  19.  
  20.  
  21.  
  22. OPTIONS RESULTS
  23.  
  24.  
  25.  
  26. RequestFile '"Wprowadú nazwë animacji ÚRÓDÎOWEJ:"'
  27.  
  28. IF rc ~= 0 THEN EXIT 0
  29.  
  30.  
  31.  
  32. s_plik = result
  33.  
  34.  
  35.  
  36. RequestFile '"Wprowadú nazwë animacji DOCELOWEJ:"'
  37.  
  38. IF rc ~= 0 THEN EXIT 0
  39.  
  40.  
  41.  
  42. d_plik = result
  43.  
  44.  
  45.  
  46. IF EXISTS(d_plik) THEN DO
  47.  
  48.    RequestResponse '"Plik Docelowy juû istnieje.  Czy mam nadpisaê dane na istniejâcych"'   IF rc ~= 0 THEN EXIT 0
  49.  
  50.    ADDRESS COMMAND 'Delete' d_plik
  51.  
  52.    END
  53.  
  54.  
  55.  
  56. SetPrefs Undo Off
  57.  
  58. Menu Render
  59.  
  60.  
  61.  
  62. LockRange 0 OFF
  63.  
  64.  
  65.  
  66. DO i = 1
  67.  
  68.  
  69.  
  70.    LoadBuffer s_plik Force i  /* wczytanie klatki */
  71.  
  72.    IF rc ~= 0 THEN LEAVE         /* uwaga... koniec pliku,  wyjôcie */
  73.  
  74.    Render Go                     /* wykorzystujë bieûâce ustawienia w panelu 
  75.  
  76.                                     RENDER */
  77.  
  78.    SaveRenderedAs FLC d_plik Append  /* doîâcz do wyjôciowej animacji*/
  79.  
  80.    LockRange 0 ON
  81.  
  82.  
  83.  
  84.    END
  85.  
  86.  
  87.  
  88. SetPrefs Undo On
  89.  
  90.  
  91.  
  92. EXIT 0
  93.  
  94.