for i:1..6
horses(i):=Pic.FileNew("horse"+intstr(i)+".jpg")
end for