PC World 2001 April/PCWorld_2001-04_cd.bin/Software/Topware/gimp/gimp-setup-20001226.exe/Main/Toadies.ffl

Text File | 2000-12-27 | 24.9 KB | 1,134 lines

FFL1.0
   39
t_Poster.8bf
Toadies
Posterize...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Steps







227
0
0
0
0
0
0
0
put(i%val(0,255,1),0),put(val(0,255,1)/2,1),c-get(0)+get(1)
c-get(0)+get(1)
c-get(0)+get(1)
a
t_Banding Suppress.8bf
Toadies
Banding Suppress Noise...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.




Noise







73
0
0
0
0
0
0
0
put(max(r,(max(g,b))),0),put(rnd(0,(ctl(0)*get(0)/512)),1),c-get(1)
c-get(1)
c-get(1)
a
t_Bitches Crystal.8bf
Toadies
Bitches Crystal...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Facet Width
Facet Height






37
39
0
0
0
0
0
0
put(val(0,0,X),2),put(val(1,0,Y),3),put(x%get(2),0),put(y%get(3),1),put(src((x-get(0)+get(2)/2+X)%X,(y-get(1)+get(3)/2+Y)%Y,z),4),put(src((x+get(0)-get(2)/2+X)%X,(y+get(1)-get(3)/2+Y)%Y,z),5),mix(get(4),get(5),get(0)*get(1),get(2)*get(3))
put(src((x-get(0)+get(2)/2+X)%X,(y-get(1)+get(3)/2+Y)%Y,z),4),put(src((x+get(0)-get(2)/2+X)%X,(y+get(1)-get(3)/2+Y)%Y,z),5),mix(get(4),get(5),get(0)*get(1),get(2)*get(3))
put(src((x-get(0)+get(2)/2+X)%X,(y-get(1)+get(3)/2+Y)%Y,z),4),put(src((x+get(0)-get(2)/2+X)%X,(y+get(1)-get(3)/2+Y)%Y,z),5),mix(get(4),get(5),get(0)*get(1),get(2)*get(3))
src((x-get(0)+X)%X,(y-get(1)+Y)%Y,z)
t_Blast_'em!.8bf
Toadies
Blast 'em!...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad. Freeware, contact [e-mail] more.




Diffuse
Transparency






20
211
0
0
0
0
0
0
put(scl(rnd(-ctl(0),ctl(0)),0,255,0,X/2),0),put(scl(rnd(-ctl(0),ctl(0)),0,255,0,Y/2),1),put(mix(src(x+get(0),y+get(1),z),c,ctl(1),255),c)
put(mix(src(x+get(0),y+get(1),z),c,ctl(1),255),c)
put(mix(src(x+get(0),y+get(1),z),c,ctl(1),255),c)
put(mix(src(x+get(0),y+get(1),z),c,ctl(1),255),c)
t_Blur 'em!.8bf
Toadies
Blur 'em!...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.




X-blast
Y-blast






14
12
0
0
0
0
0
0
put(rnd(0,val(0,0,X/2)),0),put(rnd(0,val(1,0,Y/2)),1),(src(x+get(0),y+get(1),z)+src(x-get(0),y+get(1),z)+src(x+get(0),y-get(1),z)+src(x-get(0),y-get(1),z))/4
(src(x+get(0),y+get(1),z)+src(x-get(0),y+get(1),z)+src(x+get(0),y-get(1),z)+src(x-get(0),y-get(1),z))/4
(src(x+get(0),y+get(1),z)+src(x-get(0),y+get(1),z)+src(x+get(0),y-get(1),z)+src(x-get(0),y-get(1),z))/4
(src(x+get(0),y+get(1),z)+src(x-get(0),y+get(1),z)+src(x+get(0),y-get(1),z)+src(x-get(0),y-get(1),z))/4
t_Boost.8bf
Toadies
Boost
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.












0
0
0
0
0
0
0
0
put((255-max(max(r,g),b)),i),get(i)+c
get(i)+c
get(i)+c
a
t_Crazy_Colour_Waves.8bf
Toadies
Crazy Colour Waves...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad. Freeware, contact [e-mail] more.
Reds
Greens
Blues









208
198
50
216
86
133
0
0
put((i-sin(i*val(0,0,50))/val(1,20,3)),1),get(1)>255?512-get(1):(get(1)<0?abs(get(1)):get(1))
put((i-sin(i*val(2,0,50))/val(3,20,3)),1),get(1)>255?512-get(1):(get(1)<0?abs(get(1)):get(1))
put((i-sin(i*val(4,0,50))/val(5,20,3)),1),get(1)>255?512-get(1):(get(1)<0?abs(get(1)):get(1))
c
t_Cyborg.8bf
Toadies
Cyborg...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad. Freeware, contact [e-mail] more.




Reflection #1
Reflection #2
Shine #1
Shine #2

Mesh size
Mapping factor
Colour
44
250
136
238
0
36
13
49
put((i-sin(i*val(0,5,20))/val(2,20,3)-sin(i*val(1,10,30))/val(3,17,3)),1),get(1)>255?512-get(1):get(1),put((255-max(max(r,g),b)),0),(x+scl(i,0,255,0,ctl(6)))%val(5,0,X)<=1||(y+scl(i,0,255,0,ctl(6)))%val(5,0,Y)<=1?0:ctl(7)*(get(0)+c)*get(1)/65025+(255-ctl(7))*get(1)/255
(x+scl(i,0,255,0,ctl(6)))%val(5,0,X)<=1||(y+scl(i,0,255,0,ctl(6)))%val(5,0,Y)<=1?0:ctl(7)*(get(0)+c)*get(1)/65025+(255-ctl(7))*get(1)/255
(x+scl(i,0,255,0,ctl(6)))%val(5,0,X)<=1||(y+scl(i,0,255,0,ctl(6)))%val(5,0,Y)<=1?0:ctl(7)*(get(0)+c)*get(1)/65025+(255-ctl(7))*get(1)/255
c
t_Metalfalls II.8bf
Toadies
Metalfalls II...
Ilyich the Toad
Copyright (C) 1996-98 Ilyich the Toad. Freeware.Contact [e-mail]




Foils
Colour
Steps





217
212
190
0
0
0
0
0
put(255*((255*y/Y)%val(0,i-i%val(2,255,0),0))/val(0,255,0),0),mix(scl(c,0,255,0,get(0)),get(0),ctl(1),255)
mix(scl(c,0,255,0,get(0)),get(0),ctl(1),255)
mix(scl(c,0,255,0,get(0)),get(0),ctl(1),255)
a
t_Metallic_Onion.8bf
Toadies
Metallic Onion...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.




Corrosion
Colour






177
53
0
0
0
0
0
0
put(255*((i)%val(0,255,0))/val(0,255,0),0),mix(scl(c,0,255,0,get(0)),get(0),ctl(1),255)
mix(scl(c,0,255,0,get(0)),get(0),ctl(1),255)
mix(scl(c,0,255,0,get(0)),get(0),ctl(1),255)
a
t_Metalwork.8bf
Toadies
Metalwork...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.




Reflection #1
Reflection #2
Shine #1
Shine #2



Colour
45
159
205
210
0
0
0
99
put((i-sin(i*val(0,5,20))/val(2,20,3)-sin(i*val(1,10,30))/val(3,17,3)),1),get(1)>255?512-get(1):get(1),put((255-max(max(r,g),b)),0),ctl(7)*(get(0)+c)*get(1)/65025+(255-ctl(7))*get(1)/255
ctl(7)*(get(0)+c)*get(1)/65025+(255-ctl(7))*get(1)/255
ctl(7)*(get(0)+c)*get(1)/65025+(255-ctl(7))*get(1)/255
c
t_Mosaic Blur.8bf
Toadies
Plain Mosaic Blur...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad. Freeware.Contact [e-mail]




Cell Width
Cell Height

Cell Edges On/Off




15
23
0
18
0
0
0
0
put(val(0,0,X),2),put(val(1,0,Y),3),put(x%get(2),0),put(y%get(3),1),put(mix(src(x-get(0)+get(2),y-get(1)+get(3),z),src(x-get(0),y-get(1),z),get(0)*get(1),get(2)*get(3)),4),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(4):get(4)
put(mix(src(x-get(0)+get(2),y-get(1)+get(3),z),src(x-get(0),y-get(1),z),get(0)*get(1),get(2)*get(3)),4),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(4):get(4)
put(mix(src(x-get(0)+get(2),y-get(1)+get(3),z),src(x-get(0),y-get(1),z),get(0)*get(1),get(2)*get(3)),4),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(4):get(4)
mix(src(x-get(0)+get(2),y-get(1)+get(3),z),src(x-get(0),y-get(1),z),get(0)*get(1),get(2)*get(3))
t_Old Photo.8bf
Toadies
Old Photo...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad ([e-mail]). Freeware.




Red
Green
Blue





183
69
131
0
0
0
0
0
mix(c,i,ctl(z),255)
mix(c,i,ctl(z),255)
mix(c,i,ctl(z),255)
a
t_Ommadawn.8bf
Toadies
Ommadawn...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Cell Width
Cell Height
Cell "a" Sharp/Soft
Cell Edges On/Off




17
16
234
17
0
0
0
0
put(val(0,0,X),2),put(val(1,0,Y),3),put(x%get(2),0),put(y%get(3),1),put(src(x-get(0),y-get(1),z),4),put(src(x-get(0)+get(2),y-get(1)+get(3),z),5),put(src(x-get(0),y-get(1)+get(3),z),7),put(src(x-get(0)+get(2),y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(6):get(6)
put(src(x-get(0),y-get(1),z),4),put(src(x-get(0)+get(2),y-get(1)+get(3),z),5),put(src(x-get(0),y-get(1)+get(3),z),7),put(src(x-get(0)+get(2),y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(6):get(6)
put(src(x-get(0),y-get(1),z),4),put(src(x-get(0)+get(2),y-get(1)+get(3),z),5),put(src(x-get(0),y-get(1)+get(3),z),7),put(src(x-get(0)+get(2),y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(6):get(6)
put(src(x-get(0),y-get(1),z),4),put(src(x-get(0)+get(2),y-get(1)+get(3),z),5),put(src(x-get(0),y-get(1)+get(3),z),7),put(src(x-get(0)+get(2),y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(2)<128?src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z):get(6)
t_Picasso's Last Word.8bf
Toadies
Picasso's Last Word...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad. Version 2 (fix), freeware.Contact [e-mail]




Cell Width
Cell Height
i-Dependence
Cell Edges On/Off




62
53
128
67
0
0
0
0
put(val(0,0,X*val(2,255-i,i)/255),2),put(val(1,0,Y*val(2,255-i,i)/255),3),put(x%get(2),0),put(y%get(3),1),ctl(3)<128?(get(0)==0||get(1)==0)?0:src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z):src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z)
ctl(3)<128?(get(0)==0||get(1)==0)?0:src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z):src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z)
ctl(3)<128?(get(0)==0||get(1)==0)?0:src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z):src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z)
src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z)
t_Picasso's_Another_Word.8bf
Toadies
Picasso's Another Word...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad. Freeware, contact [e-mail] more. Or, better yet, modify it yourself!




Cell Width
Cell Height
i-Dependence





24
39
126
0
0
0
0
0
put(x%val(0,0,X*val(2,255-i,i)/255),0),put(y%val(1,0,Y*val(2,255-i,i)/255),1),put(src(x-get(0),y-get(1),z),2),mix(0,get(2),get(0)*get(1),val(0,0,X*val(2,255-i,i)/255)*val(1,0,X*val(2,255-i,i)/255))
put(src(x-get(0),y-get(1),z),2),mix(0,get(2),get(0)*get(1),val(0,0,X*val(2,255-i,i)/255)*val(1,0,X*val(2,255-i,i)/255))
put(src(x-get(0),y-get(1),z),2),mix(0,get(2),get(0)*get(1),val(0,0,X*val(2,255-i,i)/255)*val(1,0,X*val(2,255-i,i)/255))
src(x-get(0),y-get(1),z)
t_Rasterline.8bf
Toadies
Rasterline...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad ([e-mail]). Freeware.

Source image range


Vertical Frequency
Horizontal Frequency


Mode switch



243
255
244
6
211
0
0
0
put(255*(y%val(0,Y,0))/val(0,Y,0),0),put(255*(x%val(1,X,0))/val(1,X,0),1),put(ctl(4)>128?c:0,2),get(0)+get(1)>map(1,i)?get(2):255
put(ctl(4)>128?c:0,2),get(0)+get(1)>map(1,i)?get(2):255
put(ctl(4)>128?c:0,2),get(0)+get(1)>map(1,i)?get(2):255
put(ctl(4)>128?c:c,2),get(0)+get(1)>map(1,i)?get(2):0
t_Sucking_Toad_I.8bf
Toadies
*Sucking Toad*  Bevel I...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad. Freeware, contact [e-mail] more.




Bevel Width
X-light
Y-light





44
183
201
0
0
0
0
0
put(val(0,0,X/2),0),put(val(1,-128,128)-(255-c)*val(1,-128,128)/255,1),put(val(2,-128,128)-(255-c)*val(2,-128,128)/255,2),(x<val(0,0,X/2)&&x*Y<=X*y&&x*Y<=X*(Y-y)?c+get(1):(y<val(0,0,Y/2)&&x*Y>=X*y&&Y*(X-x)>=X*y?c+get(2):(x>val(0,X,X/2)&&(X-x)*Y<=X*y&&x*(Y-y)>=y*(X-x)?c-get(1):(y>val(0,Y,Y/2)&&x*Y>=X*(Y-y)&&x*(Y-y)<=y*(X-x)?c-get(2):c))))
(x<val(0,0,X/2)&&x*Y<=X*y&&x*Y<=X*(Y-y)?c+get(1):(y<val(0,0,Y/2)&&x*Y>=X*y&&Y*(X-x)>=X*y?c+get(2):(x>val(0,X,X/2)&&(X-x)*Y<=X*y&&x*(Y-y)>=y*(X-x)?c-get(1):(y>val(0,Y,Y/2)&&x*Y>=X*(Y-y)&&x*(Y-y)<=y*(X-x)?c-get(2):c))))
(x<val(0,0,X/2)&&x*Y<=X*y&&x*Y<=X*(Y-y)?c+get(1):(y<val(0,0,Y/2)&&x*Y>=X*y&&Y*(X-x)>=X*y?c+get(2):(x>val(0,X,X/2)&&(X-x)*Y<=X*y&&x*(Y-y)>=y*(X-x)?c-get(1):(y>val(0,Y,Y/2)&&x*Y>=X*(Y-y)&&x*(Y-y)<=y*(X-x)?c-get(2):c))))
a
t_Sucking_Toad_II.8bf
Toadies
*Sucking Toad*  Bevel II.2...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad, partial (C) Sandy Blair. Freeware.




Bevel Width
X-light
Y-light





115
62
43
0
0
0
0
0
put(val(0,0,min(X,Y)/2),0),put(scl(c,0,255,abs(val(1,-255,255)),255),1),put(scl(c,0,255,0,255-abs(val(1,-255,255))),2),put(scl(c,0,255,abs(val(2,-255,255)),255),3),put(scl(c,0,255,0,255-abs(val(2,-255,255))),4),(x<get(0)&&x<=y&&x<=(Y-y)?get(1)*(ctl(1)<128)+get(2)*(ctl(1)>=128):(y<get(0)&&x>=y&&(X-x)>=y?get(3)*(ctl(2)<128)+get(4)*(ctl(2)>=128):(x>X-get(0)&&(X-x)<=y&&(Y-y)>=(X-x)?get(1)*(ctl(1)>=128)+get(2)*(ctl(1)<128):(y>Y-get(0)&&x>=(Y-y)&&(Y-y)<=(X-x)?get(3)*(ctl(2)>=128)+get(4)*(ctl(2)<128):c))))
put(scl(c,0,255,abs(val(1,-255,255)),255),1),put(scl(c,0,255,0,255-abs(val(1,-255,255))),2),put(scl(c,0,255,abs(val(2,-255,255)),255),3),put(scl(c,0,255,0,255-abs(val(2,-255,255))),4),(x<get(0)&&x<=y&&x<=(Y-y)?get(1)*(ctl(1)<128)+get(2)*(ctl(1)>=128):(y<get(0)&&x>=y&&(X-x)>=y?get(3)*(ctl(2)<128)+get(4)*(ctl(2)>=128):(x>X-get(0)&&(X-x)<=y&&(Y-y)>=(X-x)?get(1)*(ctl(1)>=128)+get(2)*(ctl(1)<128):(y>Y-get(0)&&x>=(Y-y)&&(Y-y)<=(X-x)?get(3)*(ctl(2)>=128)+get(4)*(ctl(2)<128):c))))
put(scl(c,0,255,abs(val(1,-255,255)),255),1),put(scl(c,0,255,0,255-abs(val(1,-255,255))),2),put(scl(c,0,255,abs(val(2,-255,255)),255),3),put(scl(c,0,255,0,255-abs(val(2,-255,255))),4),(x<get(0)&&x<=y&&x<=(Y-y)?get(1)*(ctl(1)<128)+get(2)*(ctl(1)>=128):(y<get(0)&&x>=y&&(X-x)>=y?get(3)*(ctl(2)<128)+get(4)*(ctl(2)>=128):(x>X-get(0)&&(X-x)<=y&&(Y-y)>=(X-x)?get(1)*(ctl(1)>=128)+get(2)*(ctl(1)<128):(y>Y-get(0)&&x>=(Y-y)&&(Y-y)<=(X-x)?get(3)*(ctl(2)>=128)+get(4)*(ctl(2)<128):c))))
a
t_Weaver.8bf
Toadies
Weaver...
Ilyich the Toad
Copyright (C) 1997 Ilyich the Toad. Freeware.Contact [e-mail]




Cell Width
Cell Height

Cell Edges On/Off




59
48
0
222
0
0
0
0
put(val(0,0,X),2),put(val(1,0,Y),3),put(x%get(2),0),put(y%get(3),1),put(src(x,y-get(1)+get(3),z),4),put(src(x-get(0)+get(2),y,z),5),put(src(x-get(0),y,z),7),put(src(x,y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(6):get(6)
put(src(x,y-get(1)+get(3),z),4),put(src(x-get(0)+get(2),y,z),5),put(src(x-get(0),y,z),7),put(src(x,y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(6):get(6)
put(src(x,y-get(1)+get(3),z),4),put(src(x-get(0)+get(2),y,z),5),put(src(x-get(0),y,z),7),put(src(x,y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6),ctl(3)<128?(get(0)==0||get(1)==0)?0:get(6):get(6)
put(src(x,y-get(1)+get(3),z),4),put(src(x-get(0)+get(2),y,z),5),put(src(x-get(0),y,z),7),put(src(x,y-get(1),z),8),put((get(5)*get(0)*get(1)+get(4)*(get(2)-get(0))*(get(3)-get(1))+get(8)*get(0)*(get(3)-get(1))+get(7)*(get(2)-get(0))*get(1))/(get(2)*get(3)),6)
t_What Are You.8bf
Toadies
What Are You?...
Ilyich the Toad
Copyright (C) 1997-98 Ilyich the Toad. Freeware.Contact [e-mail]




X-dose
Y-dose






20
20
0
0
0
0
0
0
(src(x+(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x+(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z))/4
(src(x+(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x+(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z))/4
(src(x+(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x+(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z))/4
(src(x+(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y+(val(1,0,Y/2)+Y)%Y,z)+src(x+(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z)+src(x-(val(0,0,X/2)+X)%X,y-(val(1,0,Y/2)+Y)%Y,z))/4
t_Glasswork Colour.8bf
Toadies
Glasswork Colour
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.












0
0
0
0
0
0
0
0
put(r*g*b/65536,1),c
c
c
255-get(1)
t_Glasswork Gray.8bf
Toadies
Glasswork Gray
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad ([e-mail]). Freeware.












0
0
0
0
0
0
0
0
0
0
0
255-i
t_Opacity.8bf
Toadies
Direct OpacityÖ...
Ilyich the Toad
Copyright (C) 1996 Ilyich the Toad. Freeware.Contact [e-mail]




Opacity







221
134
146
0
0
0
0
0
c
c
c
ctl(0)
t_Trails.8bf
Toadies
Motion Trail...
Ilyich the Toad
Copyright (C) 1996, 1997 Ilyich the Toad. Freeware.Contact [e-mail]




X-offset
Y-offset
Trail opacity





135
134
146
0
0
0
0
0
put(ctl(2)*src(x-val(0,-X/2,X/2),y-val(1,-Y/2,Y/2),3)/255,0),put((get(0)>a)&&(x-val(0,-X/2,X/2)>0)&&(y-val(1,-Y/2,Y/2)>0)&&(x-val(0,-X/2,X/2)<X)&&(y-val(1,-Y/2,Y/2)<Y),1),get(1)>0?src(x-val(0,-X/2,X/2),y-val(1,-Y/2,Y/2),z):c
get(1)>0?src(x-val(0,-X/2,X/2),y-val(1,-Y/2,Y/2),z):c
get(1)>0?src(x-val(0,-X/2,X/2),y-val(1,-Y/2,Y/2),z):c
get(1)>0?get(0):c
t_Darwin.8bf
Toadies
Darwin...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Steps
Step to select
Posterize/Retain
Above/Exact/Below




225
67
39
141
0
0
0
0
put(i%val(0,255,1),0),put(val(0,255,1)/2,1),ctl(2)<128?c-get(0)+get(1):c
ctl(2)<128?c-get(0)+get(1):c
ctl(2)<128?c-get(0)+get(1):c
(ctl(3)<85)*((i-get(0))/ctl(1)>=1?c:0)+(ctl(3)>170)*((i-get(0))/ctl(1)<=1?c:0)+(ctl(3)>85)*(ctl(3)<170)*((i-get(0))/ctl(1)==1?c:0)
//  ster Gradient Ib.8bf
Toadies
Living Sine (linear)...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Colour Cycling
Steps
i-Dependence





225
181
20
0
0
0
0
0
put(i%val(1,255,1),1),put(scl(i-get(1),0,255,0,4*ctl(2)*X/255),0),scl(sin(512*((get(0)+x+val(0,0,X)+X)%X)/X),0,512,0,255)
scl(sin(512*((get(0)+x+X/3+val(0,0,X)+X)%X)/X),0,512,0,255)
scl(sin(512*((get(0)+x+2*X/3+val(0,0,X)+X)%X)/X),0,512,0,255)
a
//  ster Gradient IId.8bf
Toadies
Living Sine (circular)...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Colour cycling
Steps
i-Dependence





219
189
144
0
0
0
0
0
put(i%val(1,255,1),1),put(scl(i-get(1),0,255,0,16*ctl(2)*X/255),0),scl(sin(512*((get(0)+d+val(0,0,D)+D)%D)/D),0,512,0,255)
scl(sin(512*((get(0)+d+D/3+val(0,0,D)+D)%D)/D),0,512,0,255)
scl(sin(512*((get(0)+d+2*D/3+val(0,0,D)+D)%D)/D),0,512,0,255)
a
t_TV.8bf
Toadies
Look, Butthead, a TV!...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Total Scanline Width
Underline Width
Underline Shading
Underline Alpha




13
128
115
69
0
0
0
0
put(y%val(0,0,Y),1),put(scl(get(1),0,val(0,0,Y),0,255),0),get(0)>ctl(1)?src(x,y-get(1),z):(255-ctl(2))*src(x,y-get(1),z)/255
get(0)>ctl(1)?src(x,y-get(1),z):(255-ctl(2))*src(x,y-get(1),z)/255
get(0)>ctl(1)?src(x,y-get(1),z):(255-ctl(2))*src(x,y-get(1),z)/255
get(0)>ctl(1)?src(x,y-get(1),z):255-ctl(3)
t_Sucking_Toad_III.8bf
Toadies
*Sucking Toad*  Bevel III...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Light Direction
Outer Radius
Inner Radius
Thingies freq.
Thingies amp.



56
0
107
36
25
0
0
0
put(min(X/2,Y/2),3),put(val(1,0,M),4),put((ctl(1)==0)*get(3)+(ctl(1)>0)*get(4),1),put(val(2,0,get(1)),2),put(scl(sin(512*((d+val(0,0,D)+D)%D)/D),0,512,-255,255),0),put(scl(sin(512*((ctl(3)*d+val(0,0,D)+ctl(3)*D)%D)/D),0,512,-255,255),5),put(get(0)*get(5)/255,7),put(mix(get(7),get(0),ctl(4),255),6),m<get(1)?(m>get(2))?get(6)<0?(get(6)+255)*c/255:255-(255-c)*(255-get(6))/255:c:0
m<get(1)?(m>get(2))?get(6)<0?(get(6)+255)*c/255:255-(255-c)*(255-get(6))/255:c:0
m<get(1)?(m>get(2))?get(6)<0?(get(6)+255)*c/255:255-(255-c)*(255-get(6))/255:c:0
m<get(1)?c:0
t_Mosaic.8bf
Toadies
Plain Mosaic 2...
Ilyich the Toad
Copyright (C) 1997-98 Ilyich the Toad. Freeware.Contact [e-mail]




Cell Width
Cell Height
Alfa Threshold
Edge Hard\Soft\Off




22
18
30
124
0
0
0
0
put(val(0,0,X),2),put(val(1,0,Y),3),put(x%get(2),0),put(y%get(3),1),put(src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z),4),put(scl(abs(sin(scl(x,0,get(2)*2,-512,512))*sin(scl(y,0,get(3)*2,-512,512))),0,262144,0,255),5),ctl(3)<85?(get(0)==0||get(1)==0)?0:get(4):ctl(3)>170?get(4):get(5)*get(4)/255
put(src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z),4),ctl(3)<85?(get(0)==0||get(1)==0)?0:get(4):ctl(3)>170?get(4):get(5)*get(4)/255
put(src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z),4),ctl(3)<85?(get(0)==0||get(1)==0)?0:get(4):ctl(3)>170?get(4):get(5)*get(4)/255
get(5)<ctl(2)?0:src(x-get(0)+get(2)/2,y-get(1)+get(3)/2,z)
t_Inside Out.8bf
Distort
Turn Your Inside Outside...
Tatsuya Sasaki,  Ilyich the Toad
Copyright (C) 1997 Tatsuya Sasaki, 1998 Ilyich the Toad




Tightness







255
0
0
0
0
0
0
0
put(mix(min(X/2,Y/2),M,255,ctl(0)),0),put((get(0)-m+M)%M,1),rad(d,get(1),z)
rad(d,get(1),z)
rad(d,get(1),z)
rad(d,get(1),z)
t_SinButt.8bf
Toadies
*Sucking Toad*  Bevel IV...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Bevel Shading
Inner Shading





Bevel Width
208
78
1
0
0
0
0
42
put(val(0,0,X/2),0),put(val(0,0,Y/2),1),put(abs(sin(scl((x-get(0)+X/2+X)%X,0,X,-255,255))*sin(scl((y-get(1)+Y/2+Y)%Y,0,Y,-255,255)))/1024,2),put(abs(sin(scl(x+X/2,0,X,-255,255))*sin(scl(y+Y/2,0,Y,-255,255)))/1024,3),put(abs(sin(scl(x+get(0)+X/2,0,X,-255,255))*sin(scl(y+get(0)+Y/2,0,Y,-255,255)))/1024,4),put(get(3)-get(2),5),put(get(3)-get(4),6),put(get(5)-get(6),7),put(get(3)<ctl(7),8),put((get(3)<ctl(7)/4),9),get(9)?0:get(8)?c+get(7):c-ctl(1)*get(7)/255
get(9)?0:get(8)?c+get(7):c-ctl(1)*get(7)/255
get(9)?0:get(8)?c+get(7):c-ctl(1)*get(7)/255
get(9)?0:c
t_Pool.8bf
Distort
The Toad's Pool I...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




X Asymmetry
Y Asymmetry
X Distortion
Y Distortion
Blob/Cross/Diamond



143
48
177
191
12
0
0
0
put(val(0,-X,X),0),put(val(1,-Y,Y),1),put(abs(sin(scl(x+X/2,0,X,-255,255))*sin(scl(y+Y/2,0,Y,-255,255)))/1024,3),put(abs(sin(scl(x+X/2+get(0),0,X,-255,255))*sin(scl(y+Y/2+get(1),0,Y,-255,255)))/1024,4),put((ctl(4)<=85)*max(get(3),get(4))+(ctl(4)>85&ctl(4)<170)*min(get(3),get(4))+(ctl(4)>=170)*dif(get(3),get(4)),5),put(val(2,-X/2,X/2),8),put(val(3,-Y/2,Y/2),9),put(scl(get(5),0,255,-get(8),get(8)),6),put(scl(get(5),0,255,-get(9),get(9)),7),src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
t_Pool_II.8bf
Distort
The Toad's Pool II...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




X-Asymmetry
Y-Asymmetry
X-Distortion
Y-Distortion




82
248
135
144
0
0
0
0
put(abs(sin(scl(x+X/2,0,X,-255,255))*sin(scl(y+Y/2,0,Y,-255,255)))/1024,3),put(abs(sin(scl(x+(val(7,-X*get(3)/ctl(6),X*get(3)/ctl(6)))+get(0),0,X,-255,255))*sin(scl(y+(val(7,-Y*get(3)/ctl(6),Y*get(3)/ctl(6)))+get(1),0,Y,-255,255)))/1024,4),put(dif(get(3),dif(get(3),get(4))),5),put(val(2,-X/2,X/2),8),put(val(3,-Y/2,Y/2),9),put(scl(get(5),0,255,-get(8),get(8)),6),put(scl(get(5),0,255,-get(9),get(9)),7),src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
put(val(0,-X,X),0),put(val(1,-Y,Y),1),src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
src((x+get(6)+X)%X,(y+get(7)+Y)%Y,z)
t_Poster Gradient Ic.8bf
Toadies
Living Sine (linear) ...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Colour cycling
Steps
i-Dependence




Colour squeeze
131
244
167
0
0
0
0
50
put(i%val(1,255,1),1),put(val(7,0,420),2),put(scl(i-get(1),0,255,0,val(2,-128,128)*X/64),0),scl(sin(512*((get(0)+x+val(0,0,X)+X)%X)/X),get(2),512,0,255)
scl(sin(512*((get(0)+x+X/3+val(0,0,X)+X)%X)/X),get(2),512,0,255)
scl(sin(512*((get(0)+x+2*X/3+val(0,0,X)+X)%X)/X),get(2),512,0,255)
a
t_Poster Gradient IIe.8bf
Toadies
Living Sine (circular)...
Ilyich the Toad
Copyright (C) 1998 Ilyich the Toad. Freeware.Contact [e-mail]




Colour cycling
Steps
i-Dependence




Colour squeeze
219
229
176
0
0
0
0
152
put(i%val(1,255,1),1),put(val(7,0,420),2),put(scl(i-get(1),0,255,0,val(2,-128,128)*D/128),0),scl(sin(512*((get(0)+d+val(0,0,D)+D)%D)/D),get(2),512,0,255)
scl(sin(512*((get(0)+d+D/3+val(0,0,D)+D)%D)/D),get(2),512,0,255)
scl(sin(512*((get(0)+d+2*D/3+val(0,0,D)+D)%D)/D),get(2),512,0,255)
a
t_3D_Mesh.8bf
Toadies
3D Mesh...
Ilyich the Toad ([e-mail])
Copyright (C) 1996-98 Ilyich the Toad  http://www.chat.ru/~bufo/




Mesh Size
i-Dependance

Zero X
Zero Y
Checkers/Grid

Mesh Softness
225
184
0
128
128
210
0
128
put(mix(255,i,255,383-ctl(1)),0),put(min(X+1,Y+1),2),put(val(3,0,X+1),3),put(val(4,0,Y+1),4),put(((sin(val(0,255,1)*get(0)*(x+1-get(3))/get(2)))*(sin(val(0,255,0)*get(0)*(y+1-get(4))/get(2)))/val(7,1,2048)),1),put((get(1)+128)*(ctl(5)<128)+abs(get(1))*(ctl(5)>=128),1),get(1)
get(1)
get(1)
c
3D_SCheck.8bf
Toadies
3D Supercheckers
Ilyich the Toad ([e-mail])
Copyright(c)1994 Adobe Systems, Inc.All Rights Reserved.




Mapping Strength







47
0
0
0
0
0
0
0
put(mix(i,0,ctl(0),255),2),put(scl(X/2-abs(x-X/2),0,X,0,255-get(2)),0),put(scl(Y/2-abs(y-Y/2),0,Y,128,255-get(2)),1),put(scl((get(0)&get(1)),0,128,255,-383),3)
get(3)
get(3)
a