home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / sharewar / picmaster / picmaster.exe / Plugins / FFL / Sapphire / andrew4.ffl < prev    next >
Encoding:
Text File  |  2001-04-03  |  8.7 KB  |  583 lines
  1. FFL1.0
  2. 20
  3. Finddge.8bf
  4. Andrew's Filters Part4
  5. Find Edges In Colour...
  6. AB
  7. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  8.  
  9.  
  10.  
  11.  
  12. Red 1
  13. Red 2
  14. Green 1
  15. Green 2
  16. Blue 1
  17. Blue 2
  18.  
  19.  
  20. 142
  21. 137
  22. 135
  23. 141
  24. 130
  25. 121
  26. 0
  27. 0
  28. 255-sqr(dif(c,src(x+val(0,-50,50),y+val(0,-50,50),z)))*sqr(dif(c,src(x+val(1,-50,50),y+val(1,-50,50),z)))
  29. 255-sqr(dif(c,src(x+val(2,-50,50),y+val(2,-50,50),z)))*sqr(dif(c,src(x+val(3,-50,50),y+val(3,-50,50),z)))
  30. 255-sqr(dif(c,src(x+val(4,-50,50),y+val(4,-50,50),z)))*sqr(dif(c,src(x+val(5,-50,50),y+val(5,-50,50),z)))
  31. a
  32. Grades.8bf
  33. Andrew's Filters Part4
  34. Good Grades Of Colour...
  35. AB
  36. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  37.  
  38.  
  39.  
  40.  
  41. Red x
  42. Red y
  43. Green x
  44. Green y
  45. Blue x
  46. Blue y
  47.  
  48.  
  49. 104
  50. 76
  51. 105
  52. 83
  53. 123
  54. 84
  55. 0
  56. 0
  57. dif(mix(sqr(sin(m)*ctl(0)),sqr(sin(m)*ctl(1)),x,y),c)
  58. dif(mix(sqr(sin(m)*ctl(2)),sqr(sin(m)*ctl(3)),x,y),c)
  59. dif(mix(sqr(sin(m)*ctl(4)),sqr(sin(m)*ctl(5)),x,y),c)
  60. a
  61. GraGrad.8bf
  62. Andrew's Filters Part4
  63. Gradients You Want Gradients...
  64. AB
  65. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  66.  
  67.  
  68.  
  69.  
  70. Red x
  71. Red y
  72. Green x
  73. Green y
  74. Blue x
  75. Blue y
  76. Factor
  77.  
  78. 97
  79. 75
  80. 146
  81. 161
  82. 94
  83. 29
  84. 37
  85. 0
  86. dif(c,((x-ctl(0))*(x-ctl(0))/3+(y-ctl(1))*(y-ctl(1)))/3/ctl(6))/2
  87. dif(c,((x-ctl(2))*(x-ctl(2))/3+(y-ctl(3))*(y-ctl(3)))/3/ctl(6))/2
  88. dif(c,((x-ctl(4))*(x-ctl(4))/3+(y-ctl(5))*(y-ctl(5))/3)/ctl(6))/2
  89. a
  90. GridHair.8bf
  91. Andrew's Filters Part4
  92. Grid In The Hair...
  93. AB
  94. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  95.  
  96.  
  97.  
  98.  
  99. Red Displace
  100. Green Displace
  101. Blue Displace
  102. Red Mod
  103. Green Mod
  104. Blue Mod
  105.  
  106.  
  107. 177
  108. 93
  109. 111
  110. 5
  111. 7
  112. 5
  113. 0
  114. 0
  115. x%ctl(3)&&y%ctl(3)?c:src(x+val(0,-50,50),y+val(0,-50,50),z)
  116. x%ctl(4)&&y%ctl(4)?c:src(x+val(1,-50,50),y+val(1,-50,50),z)
  117. x%ctl(5)&&y%ctl(5)?c:src(x+val(2,-50,50),y+val(2,-50,50),z)
  118. a
  119. CutBDg.8bf
  120. Andrew's Filters Part4
  121. Cut Back Diagonal...
  122. AB
  123. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  124.  
  125.  
  126.  
  127.  
  128. Red Sin
  129. Green Sin
  130. Blue Sin
  131. Red Cut
  132. Green Cut
  133. Blue Cut
  134. Jagged Factor
  135.  
  136. 78
  137. 61
  138. 61
  139. 16
  140. 61
  141. 111
  142. 113
  143. 0
  144. val(0,-1,2)*sin(dif(ctl(6)^x,y))+c-ctl(3)
  145. val(1,-1,2)*sin(dif(ctl(6)^x,y))+c-ctl(4)
  146. val(2,-1,2)*sin(dif(ctl(6)^x,y))+c-ctl(5)
  147. a
  148. DiffDiff.8bf
  149. Andrew's Filters Part4
  150. Difference To Diffuse...
  151. AB
  152. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  153.  
  154.  
  155.  
  156.  
  157. Red X
  158. Green X
  159. Blue X
  160. Red Y
  161. Green Y
  162. Blue Y
  163.  
  164.  
  165. 33
  166. 33
  167. 40
  168. 31
  169. 80
  170. 27
  171. 0
  172. 0
  173. dif(src(x+rnd(0,val(0,0,20)),y+rnd(0,val(3,0,20)),0),src(x-rnd(0,val(0,0,20)),y+rnd(0,val(4,0,20)),0))
  174. dif(src(x+rnd(0,val(1,0,20)),y+rnd(0,val(4,0,20)),1),src(x-rnd(0,val(1,0,20)),y+rnd(0,val(4,0,20)),1))
  175. dif(src(x+rnd(0,val(2,0,20)),y+rnd(0,val(5,0,20)),2),src(x-rnd(0,val(2,0,20)),y+rnd(0,val(5,0,20)),2))
  176. a
  177. NetCurt.8bf
  178. Andrew's Filters Part4
  179. Net Curtain...
  180. AB
  181. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  182.  
  183.  
  184.  
  185.  
  186. x & y
  187. Pattern A
  188. Pattern B
  189. Factor Red
  190. Factor Green
  191. Factor Blue
  192.  
  193.  
  194. 4
  195. 3
  196. 2
  197. 173
  198. 183
  199. 186
  200. 0
  201. 0
  202. ((x/ctl(0))*(x/ctl(0))+(y/ctl(0))*(y/ctl(0)))%ctl(1)==ctl(2)?rad(x,y,0):c%ctl(3)
  203. ((x/ctl(0))*(x/ctl(0))+(y/ctl(0))*(y/ctl(0)))%ctl(1)==ctl(2)?rad(x,y,1):c%ctl(4)
  204. ((x/ctl(0))*(x/ctl(0))+(y/ctl(0))*(y/ctl(0)))%ctl(1)==ctl(2)?rad(x,y,2):c%ctl(5)
  205. a
  206. OldTime.8bf
  207. Andrew's Filters Part4
  208. Old Times...
  209. AB
  210. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  211.  
  212.  
  213.  
  214.  
  215. Red x
  216. Red y
  217. Green x
  218. Green y
  219. Blue x
  220. Blue y
  221. Colour Ville
  222.  
  223. 76
  224. 87
  225. 124
  226. 51
  227. 45
  228. 65
  229. 28
  230. 0
  231. mix(dif(src(rnd(0,X%ctl(0)),rnd(0,Y%ctl(1)),0),c),x,y,m)+ctl(6)+120
  232. mix(dif(src(rnd(0,X%ctl(2)),rnd(0,Y%ctl(3)),0),src(x,y,0)),x,y,m)+ctl(6)
  233. mix(dif(src(rnd(0,X%ctl(4)),rnd(0,Y%ctl(5)),0),src(x,y,0)),x,y,m)+ctl(6)
  234. a
  235. ASmaKi.8bf
  236. Andrew's Filters Part4
  237. A Smart Kind of Thing...
  238. AB
  239. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  240.  
  241.  
  242.  
  243.  
  244. Red
  245. Green
  246. Blue
  247. Mix
  248. Red Mix
  249. Green Mix
  250. Blue Mix
  251.  
  252. 18
  253. 57
  254. 137
  255. 56
  256. 107
  257. 102
  258. 216
  259. 142
  260. mix(c,(r+g+b),ctl(0),100)-mix(c,ctl(3),ctl(4),100)
  261. mix(c,(r+g+b),ctl(1),100)-mix(c,ctl(3),ctl(5),100)
  262. mix(c,(r+g+b),ctl(2),100)-mix(c,ctl(3),ctl(6),100)
  263. a
  264. BluGlow.8bf
  265. Andrew's Filters Part4
  266. Blue Glow...
  267. AB
  268. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  269.  
  270.  
  271.  
  272.  
  273. Blue
  274. Red
  275. Green
  276. Factor
  277. Mix 
  278. Mix 1
  279. Factor
  280. Mix
  281. 8
  282. 15
  283. 6
  284. 32
  285. 16
  286. 13
  287. 5
  288. 61
  289. mix(r,val(6,512,255)-ctl(3)*m*(ctl(1)+(r+g+b))/(4*M),ctl(7),100)
  290. mix(r,val(6,512,255)-ctl(3)*m*(ctl(2)+(r+g+b))/(4*M),ctl(7),100)
  291. mix(mix(r+g+b,c,ctl(4),ctl(5)),val(6,512,255)-ctl(3)*m*(ctl(0)+(r+g+b))/(4*M),ctl(7),100)
  292. a
  293. CoInteg.8bf
  294. Andrew's Filters Part4
  295. Cos Integral...
  296. AB
  297. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  298.  
  299.  
  300.  
  301.  
  302. Factor 1
  303. Factor 2
  304. Factor 3
  305. Factor 4
  306. Mix 1
  307. Mix 2
  308.  
  309.  
  310. 3
  311. 6
  312. 20
  313. 4
  314. 49
  315. 64
  316. 130
  317. 67
  318. mix(c,sin((x/2)+sin(2*ctl(0)*x/4*ctl(1)))-sin((y/2)+sin(2*ctl(2)*y/4*ctl(3))),ctl(4),ctl(5))
  319. mix(c,sin((x/2)+sin(2*ctl(0)*x/4*ctl(1)))-sin((y/2)+sin(2*ctl(2)*y/4*ctl(3))),ctl(4),ctl(5))
  320. mix(c,sin((x/2)+sin(2*ctl(0)*x/4*ctl(1)))-sin((y/2)+sin(2*ctl(2)*y/4*ctl(3))),ctl(4),ctl(5))
  321. a
  322. DonFaAw.8bf
  323. Andrew's Filters Part4
  324. Don't Fade Away...
  325. AB
  326. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  327.  
  328.  
  329.  
  330.  
  331. Red
  332. Green
  333. Blue
  334. Red
  335. Green
  336. Blue
  337. Mix 1
  338. Mix 2
  339. 70
  340. 72
  341. 68
  342. 194
  343. 65
  344. 33
  345. 143
  346. 72
  347. mix(255-c%ctl(3)>ctl(0)?(r+g+b)/3:c,c%ctl(3)>ctl(0)?(r+g+b)/3:c,ctl(6),ctl(7))
  348. mix(255-c%ctl(4)>ctl(1)?(r+g+b)/3:c,c%ctl(4)>ctl(1)?(r+g+b)/3:c,ctl(6),ctl(7))
  349. mix(255-c%ctl(5)>ctl(2)?(r+g+b)/3:c,c%ctl(5)>ctl(2)?(r+g+b)/3:c,ctl(6),ctl(7))
  350. a
  351. FinPrint.8bf
  352. Andrew's Filters Part4
  353. Fine Print...
  354. AB
  355. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  356.  
  357.  
  358.  
  359.  
  360. Red 1
  361. Red 2
  362. Green 1
  363. Green 2
  364. Blue 1
  365. Blue 2
  366.  
  367.  
  368. 181
  369. 95
  370. 41
  371. 147
  372. 24
  373. 37
  374. 0
  375. 0
  376. dif(255-c,mix(c,(r+g+b)/3,ctl(0),ctl(1)))
  377. dif(255-c,mix(c,(r+g+b)/3,ctl(2),ctl(3)))
  378. dif(255-c,mix(c,(r+g+b)/3,ctl(4),ctl(5)))
  379. a
  380. FuPapP.8bf
  381. Andrew's Filters Part4
  382. Funny Paper Perhaps...
  383. AB
  384. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  385.  
  386.  
  387.  
  388.  
  389. Factor 1
  390. Factor 2
  391. Factor 3
  392. Factor 4
  393. Red
  394. Green
  395. Blue
  396.  
  397. 28
  398. 18
  399. 2
  400. 1
  401. 77
  402. 41
  403. 14
  404. 27
  405. mix(c,sin((x%ctl(2)==0?x:0)%ctl(0))-sin((y%ctl(3)==0?y:0)%ctl(1)),ctl(4),100)
  406. mix(c,sin((x%ctl(2)==0?x:0)%ctl(0))-sin((y%ctl(3)==0?y:0)%ctl(1)),ctl(5),100)
  407. mix(c,sin((x%ctl(2)==0?x:0)%ctl(0))-sin((y%ctl(3)==0?y:0)%ctl(1)),ctl(6),100)
  408. a
  409. GColFoun.8bf
  410. Andrew's Filters Part4
  411. Gorg Colours Found...
  412. AB
  413. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  414.  
  415.  
  416.  
  417.  
  418. Red
  419. Green
  420. Blue
  421. Which Way
  422. Mix 1
  423. Mix 2
  424.  
  425.  
  426. 5
  427. 4
  428. 2
  429. 205
  430. 207
  431. 79
  432. 150
  433. 163
  434. mix(c,2*(r+g+b)/3-(src(x+val(3,-2,2)*ctl(0),y+val(3,-2,2)*ctl(0),0)+src(x+val(3,-2,2)*ctl(1),y+val(3,-2,2)*ctl(1),1)+src(x+val(3,-2,2)*ctl(2),y+val(3,-2,2)*ctl(2),2))/3,ctl(4),ctl(5))
  435. mix(c,2*(r+g+b)/3-(src(x+val(3,-2,2)*ctl(0),y+val(3,-2,2)*ctl(0),0)+src(x+val(3,-2,2)*ctl(1),y+val(3,-2,2)*ctl(1),1)+src(x+val(3,-2,2)*ctl(2),y+val(3,-2,2)*ctl(2),2))/3,ctl(4),ctl(5))
  436. mix(c,2*(r+g+b)/3-(src(x+val(3,-2,2)*ctl(0),y+val(3,-2,2)*ctl(0),0)+src(x+val(3,-2,2)*ctl(1),y+val(3,-2,2)*ctl(1),1)+src(x+val(3,-2,2)*ctl(2),y+val(3,-2,2)*ctl(2),2))/3,ctl(4),ctl(5))
  437. a
  438. GlSide.8bf
  439. Andrew's Filters Part4
  440. Glowing To The Side...
  441. AB
  442. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  443.  
  444.  
  445.  
  446.  
  447. Factor
  448. m
  449. Red
  450. Green
  451. Blue
  452. Mix 1
  453. Mix 2
  454. Factor
  455. 12
  456. 16
  457. 28
  458. 61
  459. 79
  460. 20
  461. 23
  462. 22
  463. mix(mix(r+g+b,c,ctl(5),ctl(6)),val(7,512,255)-ctl(1)*(M-m)*(ctl(0)+(r+g+b))/(4*M),ctl(2),100)
  464. mix(mix(r+g+b,c,ctl(5),ctl(6)),val(7,512,255)-ctl(1)*(M-m)*(ctl(0)+(r+g+b))/(4*M),ctl(3),100)
  465. mix(mix(r+g+b,c,ctl(5),ctl(6)),val(7,512,255)-ctl(1)*(M-m)*(ctl(0)+(r+g+b))/(4*M),ctl(4),100)
  466. a
  467. MonoC.8bf
  468. Andrew's Filters Part4
  469. Mono...
  470. AB
  471. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  472.  
  473.  
  474.  
  475.  
  476. Red
  477. Green
  478. Blue
  479. Red
  480. Green
  481. Blue
  482.  
  483.  
  484. 13
  485. 111
  486. 34
  487. 9
  488. 29
  489. 6
  490. 0
  491. 0
  492. ctl(3)*(r+g+b)/ctl(0)
  493. ctl(4)*(r+g+b)/ctl(1)
  494. ctl(5)*(r+g+b)/ctl(2)
  495. a
  496. CInColo.8bf
  497. Andrew's Filters Part4
  498. Chrome In Colour...
  499. AB
  500. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  501.  
  502.  
  503.  
  504.  
  505. Red
  506. Green
  507. Blue
  508. Red
  509. Green
  510. Blue
  511. Mix
  512.  
  513. 72
  514. 97
  515. 93
  516. 57
  517. 114
  518. 178
  519. 90
  520. 0
  521. mix(c,(r+g+b)^ctl(0),ctl(3),ctl(6))
  522. mix(c,(r+g+b)^ctl(0),ctl(4),ctl(6))
  523. mix(c,(r+g+b)^ctl(0),ctl(5),ctl(6))
  524. a
  525. OrpSong.8bf
  526. Andrew's Filters Part4
  527. Orpheus Song...
  528. AB
  529. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  530.  
  531.  
  532.  
  533.  
  534. Source 1
  535. Source
  536. Red
  537. Green
  538. Blue
  539. x
  540. y
  541. Mix
  542. 210
  543. 17
  544. 201
  545. 14
  546. 144
  547. 169
  548. 157
  549. 140
  550. mix((r+g+b)/3,c<ctl(2)?(val(0,1,6)*src(x+val(5,-10,10),y+val(6,-10,10),z)-val(1,1,6)*c)/2:255,ctl(7),100)
  551. mix((r+g+b)/3,c<ctl(2)?(val(0,1,6)*src(x+val(5,-10,10),y+val(6,-10,10),z)-val(1,1,6)*c)/2:255,ctl(7),100)
  552. mix((r+g+b)/3,c<ctl(2)?(val(0,1,6)*src(x+val(5,-10,10),y+val(6,-10,10),z)-val(1,1,6)*c)/2:255,ctl(7),100)
  553. a
  554. POranMl.8bf
  555. Andrew's Filters Part4
  556. Pretty Orange Moll...
  557. AB
  558. ⌐ 1996-2001, Andrew Buckle (www.sapphire-innovations.com)
  559.  
  560.  
  561.  
  562.  
  563. Red
  564. Green
  565. Blue
  566. Red Mix
  567. Green Mix
  568. Blue Mix
  569. Mix
  570.  
  571. 153
  572. 122
  573. 105
  574. 39
  575. 47
  576. 60
  577. 52
  578. 0
  579. mix(c,r*(r-g)*sin(r+g)/ctl(0),ctl(3),ctl(6))
  580. mix(c,(r-g)*sin(r+g)/ctl(1),ctl(4),ctl(6))
  581. mix(c,(r-g)*sin(r+g)/ctl(2),ctl(5),ctl(6))
  582. a
  583.