load image "w.jpg",1
r = rgb(255,0,0)
g = rgb(255,0,0)
b = rgb(255,0,0)
do


SPRITE  1, 0, 0, 1
SET SPRITE DIFFUSE 1, r, g, b
sync
loop