طريقة رائعة لعرض الصور

كود:
[left] FlowImage.MoveOne("Image1", 450, 25);
[/left]

كود:
[left] FlowImage.HideOneShowNext("Image1", "Image2", 450, 25);[/left]

كود:
[left] FlowImage.HideAll({"Image1","Image2","Image3","Image4","Image5"}, 450, 25);
[/left]

كود:
[left] FlowImage.HideOneShowNext("Image1", "Image2", 450, 25);
FlowImage.HideOneShowNext("Image2", "Image3", 450, 25);
FlowImage.HideOneShowNext("Image3", "Image4", 450, 25);
FlowImage.HideOneShowNext("Image4", "Image5", 450, 25);
FlowImage.HideOneShowNext("Image5", "Image1", 450, 25);[/left]

كود:
[left] FlowImage.HideAll({"Image1","Image2","Image3","Image4"}, 450, 25);
FlowImage.MoveOne("Image1", 450, 25);
[/left]

كود:

[left] FlowImage ={}

function FlowImage.Move(tblIMG, Height, Y)
 for count = 1, Table.Count(tblIMG) do
 for countPOS = 1, Height do
 Image.SetPos(tblIMG[count], -(Height)+(countPOS), Y);
 end
 end
end

function FlowImage.MoveOne(ImageName, Height, Y)
 for countPOS = 1, Height do
 Image.SetPos(ImageName, -(Height)+(countPOS), Y);
 end
end

function FlowImage.Hide(tblIMG, Height, Y)
 for count = 1, Table.Count(tblIMG) do
 Image.SetPos(tblIMG[count], -(Height+1), Y);
 end
end

function FlowImage.HideOne(ImageName, Height, Y)
 for count = 1, Height do
 Image.SetPos(ImageName, -(count), Y);
 if count == Height then
 Image.SetPos(ImageName, -(Height+1), Y);
 end
 end
end[/left]
[left]

function FlowImage.HideOneShowNext(ImageName, NextImage, Height, Y)
 for count = 1, Height do
 Image.SetPos(ImageName, -(count), Y);
 if count == Height then
 Image.SetPos(ImageName, -(Height+1), Y);
 FlowImage.MoveOne(NextImage, Height, Y)
 end
 end
end

function FlowImage.HideAll(tblIMG, Height, Y)
 for count = 1, Table.Count(tblIMG) do
 Image.SetPos(tblIMG[count], -(Height+1), Y);
 end
end[/left]