// An elliptic window fading in and out
event.load
draw.main.ellipse(0,0,150,150, num.rgb(100,200,255))
draw.main.ellipse(0,0,150,150, num.rgb(50,100,150),10)
window.main.shape.elliptic(0,0,150,150)
window.main.pos.now(100,100,150,150)
draw.main.paint()
&alpha = 100
&alphaDir = 5
doEvent.loop()
event.end
event.loop
&alpha = num.compute(&alphaDir + &alpha)
if(&alpha < 100 || &alpha > 240)
&alphaDir = num.compute(0 - &alphaDir)
if.end
window.main.transparency(null, &alpha)
doEvent.loop(25)
event.end |