home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / applications / patch / textfx.lha / TextFX.ifx next >
Encoding:
Text File  |  1994-12-27  |  3.7 KB  |  228 lines

  1. /* TextFX Generator - ver 1.0 26.12.94 - by R.Michael Fierro
  2.  *
  3.  * Taken from Chapter 8 of ImageFX 2.0 Manual plus a few more...
  4.  */
  5.  
  6. OPTIONS RESULTS
  7.  
  8.  
  9. gadget.1 = "d/135/18/140/Choose Effect/10/ Metal Plate / Brushed Brass/
  10.  Candy / Silver / Liquid Mercury / Plastic/ *Soft Pillow* / Leather / Hammered
  11.  Gold/ Money /0 "
  12. gadget.2 = "l/135/37/3/0/by R.Michael Fierro '94"
  13.  
  14. complexrequest '"TextFX Generator"'  2 gadget
  15.  
  16. IF rc~=0 THEN exit
  17.  
  18. IF result.1 = 0 THEN call MetalPlate
  19. IF result.1 = 1 THEN call Brass
  20. IF result.1 = 2 THEN call Candy
  21. IF result.1 = 3 THEN call Silver
  22. IF result.1 = 4 THEN call LiqMerc
  23. IF result.1 = 5 THEN call Plastic
  24. IF result.1 = 6 THEN call Pillow
  25. if result.1 = 7 then call leather
  26. if result.1 = 8 then call HamGold
  27. if result.1 = 9 then call Money
  28.  
  29.  
  30. MetalPlate:
  31.  
  32. redraw off
  33. ActiveColor 17
  34. setpalette '-1' 134 128 138
  35. hook text
  36. Region Brush
  37. Convolve "Storage/Convolve/GaussianHigh"
  38. Convolve "Storage/Convolve/GaussianHigh"
  39. ReliefMap 256 0
  40. DrawMode Color
  41. Call Standard
  42.  
  43. LiqMerc:
  44.  
  45. redraw off
  46. ActiveColor 17
  47. setpalette '-1' 134 150 150
  48. hook text
  49. Region Brush
  50. Convolve "Storage/Convolve/GaussianHigh"
  51. Convolve "Storage/Convolve/GaussianHigh"
  52. ReliefMap 256 0
  53. ColorTransform "Storage/Transform/Chrome3"
  54. DrawMode Color
  55. Call Standard
  56.  
  57.  
  58. Brass:
  59.  
  60. Redraw off
  61. ActiveColor 17
  62. SetPalette '-1' 127 127 127
  63. hook text
  64. Region Brush
  65. Roughen 128
  66. MotionBlur 45 10
  67. ReliefMap 255 0
  68. Negative
  69. ActiveColor 17
  70. SetPalette '-1' 148 113 13
  71. drawmode color
  72. call standard
  73.  
  74. Candy:
  75.  
  76. redraw off
  77. ActiveColor 17
  78. SetPalette '-1' 127 127 127
  79. hook text
  80. Region Brush
  81. Roughen 128
  82. Convolve "Storage/Convolve/GaussianHigh"
  83. Convolve "Storage/Convolve/GaussianHigh"
  84. ReliefMap 255 0
  85. Negative
  86. Red "127"
  87. Blue "60"
  88. DrawMode Normal
  89. EdgeMode AntiAlias 0
  90. menu toolbox
  91. region full
  92. lockinput
  93. requestnotify "Click anywhere on panel for text placement"
  94. address command wait 1
  95. redraw on
  96. hidepanel
  97. NewArea
  98. waitfor selectup
  99. AddArea x y
  100. KillBrush
  101. showpanel
  102. unlockinput
  103. exit
  104.  
  105.  
  106. Silver:
  107.  
  108. redraw off
  109. ActiveColor 17
  110. SetPalette '-1' 148 143 153
  111. hook text
  112. Region Brush
  113. Roughen 198
  114. MotionBlur 25 10
  115. ReliefMap 255 0
  116. Negative
  117. DrawMode Color
  118. Call Standard
  119.  
  120.  
  121. Plastic:
  122.  
  123. redraw off
  124. ActiveColor 17
  125. setpalette '-1' 240 240 220
  126. hook text
  127. Region Brush
  128. Convolve "Storage/Convolve/GaussianHigh"
  129. Convolve "Storage/Convolve/GaussianHigh"
  130. ReliefMap 256 0
  131. Negative
  132. drawmode color
  133. call standard
  134.  
  135.  
  136. Pillow:
  137.  
  138. requestresponse "This Will Clear Out the Main, Swap and Alpha Buffers"
  139. IF rc ~=0 THEN exit
  140. requestresponse "Please compose your text and stamp it down on the main buffer"
  141. IF rc ~=0 THEN exit
  142. AlphaChannel Off
  143. Hook Text
  144. Region Brush
  145. DrawMode Normal
  146. EdgeMode AntiAlias 0
  147. menu toolbox
  148. region full
  149. lockinput
  150. requestnotify "Click anywhere on panel for text placement"
  151. address command wait 1
  152. hidepanel
  153. NewArea
  154. waitfor selectup
  155. AddArea x y
  156. killbrush
  157. redraw off
  158. Buffer2Alpha
  159. Convolve "Storage/Convolve/GaussianHigh"
  160. Convolve "Storage/Convolve/GaussianHigh"
  161. ReliefMap 256 0
  162. Buffer2Swap
  163. Negative
  164. Swap
  165. Hook Composite MERGE 255 1 0 0 MatchMain AlphaFrisket
  166. redraw on
  167. killalpha
  168. killswap
  169. exit
  170.  
  171.  
  172. Leather:
  173.  
  174. redraw off
  175. ActiveColor 17
  176. setpalette '-1' 117 109 57
  177. DrawMode Color
  178. hook text
  179. Hook ApplyTexture "Textures/Leather" 0 50 SHINY
  180. reliefMap 255 0
  181. call standard
  182.  
  183.  
  184. HamGold:
  185.  
  186. redraw off
  187. ActiveColor 17
  188. setpalette '-1' 207 163 33
  189. DrawMode Color
  190. hook text
  191. Hook ApplyTexture "Textures/Cubist" 0 135 SHINY SHADING
  192. reliefMap 175 0
  193. call standard
  194.  
  195. Money:
  196.  
  197. redraw off
  198. ActiveColor 17
  199. setpalette '-1' 7 128 43
  200. DrawMode Color
  201. hook text
  202. Hook ApplyTexture "Textures/Money" 0 180 SHINY SHADING
  203. Negative
  204. reliefMap 85 0
  205. call standard
  206.  
  207. standard:
  208.  
  209. EdgeMode AntiAlias 0
  210. menu toolbox
  211. region full
  212. lockinput
  213. requestnotify "Click anywhere on panel for text placement"
  214. address command wait 1
  215. redraw on
  216. hidepanel
  217. NewArea
  218. waitfor selectup
  219. AddArea x y
  220. DrawMode Add
  221. redo
  222. killbrush
  223. showpanel
  224. unlockinput
  225. exit
  226.  
  227.  
  228.