image IMG1
IMG1 := RealImage("New", 4, 200, 200)
ShowImage(IMG1)
number WX, WY
SetWindowPosition(IMG1,300,100)
