<HTML>
<TITLE> Intel Distortion Filter Example </TITLE>
<BODY BGCOLOR=darkblue >
<script language=vbscript>
sub window_onload
screen.bufferDepth = -1
OnPokeEffect
end sub
sub OnPokeEffect
n= theImg.filters.item("IntelDistortion").Harmonics
theImg.filters.item("IntelDistortion").Harmonics = n
end sub
sub theImg_OnFilterChange
call SetTimeout( "OnPokeEffect", 100 )
end sub
</script>
<IMG ID=theImg
src=Distort-Temp.bmp
style="filter:IntelDistortion(enabled=1,NoiseScaleU=6,NoiseScaleV=6,ScaleUX=3, ScaleVX=1, ScaleUY=3, ScaleVY=1, ScaleUT=3, ScaleVT=1, Harmonics=3);
position:absolute; left=250; top=90;">
</BODY>
</HTML>
<HTML>
<HEAD>
<TITLE>Procedural Effects Template</TITLE>
</HEAD>
<script language=vbscript>
sub window_onload
screen.bufferDepth = -1
theImg.filters.item("IntelAdditive").BitmapSeed = "template.bmp"
end sub
sub OnPokeEffect
n = theImg.filters.item("IntelAdditive").NoiseScale
theImg.filters.item("IntelAdditive").NoiseScale = n
end sub
sub theImg_OnFilterChange
call SetTimeout( "OnPokeEffect", 15 )
end sub
</script>
<IMG ID=theImg
src=template.bmp
style="filter:IntelAdditive(Harmonics=6,
NoiseScale=11,
NoiseOffset=-13,
ScaleX=2,
ScaleY=1,
TimeX=-1,
TimeY=0,
enabled=1);
position:absolute; left=250; top=90;">
</HTML>
Tidak ada komentar:
Posting Komentar