image IMG1 IMG1 := RealImage("New", 4, 200, 200) ShowImage(IMG1) GetName(IMG1) SetName(IMG1, "The image that I want")