Image IMG1
IMG1 := RealImage("New", 4, 100, 100)
IMG1 = 200
ShowImage(IMG1)
