Hey ceej, how about scripting some DirectX games - maybe with a little DirectAnimation, delicately wrapped in Internet Explorer, with a milk chocolately KiXtart center ?

code:

break on

$ie = createobject("internetexplorer.application")

$ie.navigate("about:blank")
while $ie.busy and @error=0 loop

$html = '<'+'OBJECT ID="DAControl" STYLE="position:absolute; left:0; top:0;width:800;'+
	'height:300;z-index: -1" CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D"'+'>'+
	'<'+'/OBJECT'+'>'

$ie.document.write("$html")

$ie.visible = 1

$dacontrol = $ie.document.all("dacontrol")
$m = $dacontrol.meterlibrary

; Create an animated color

$half = $m.danumber("0.5")
$clr = $m.colorhslanim($m.mul($m.localtime, $m.danumber("0.345")),$half, $half)

; Contstruct a 12pt font and a text image

$font = $m.font("Arial", 11, $clr)  
$txtimg = $m.stringimage("KiXtart 2001 - A Scripting Odessey", $font)

; Move the text image across the page

$pos = $m.mul($m.sin($m.localtime), $m.danumber("0.02"))
$scl = $m.add($m.danumber("2"), $m.abs($m.mul($m.sin($m.localtime), $m.danumber("3"))))
$xf = $m.compose2($m.translate2anim($m.danumber("0"), $pos), $m.scale2uniformanim($scl))                       
$txtimg = $txtimg.transform($xf)

; Assign the animation back to the control and start it

$dacontrol.image = $txtimg
$dacontrol.start
gets$

exit 1

Code adapated from the DirectAnimation SDK

-Shawn

[ 09 November 2001: Message edited by: Shawn ]

[ 09 November 2001: Message edited by: Shawn ]