Try this:
property pPointer
property pList
on beginSprite me
pList=["pict1", "pict2", "pict3", "pict4", "pict5", "whateverNameYouLike"]
pPointer=0
end
on mouseDown me
pPointer=pPointer+1
if pPointer>pList.count then pPointer=1
sprite(me.spriteNum).member=pList[pPointer]
updateStage --might not be necessary, try without
end
I have not tested though.
regards, Florian
Kamil Dabkowski wrote:
>
> Hi,
>
> I have a problem with image switcher script. Below is script that I
> wrote but it doesn't work properly.
> My problem is to stop the script execution after the first image change.
>
> Thanks
>
> Kamil
>
> property pPresentMember
> property myList
> property pString
>
> on beginSprite me
> myList = ["pict1", "pict2", "pict3", "pict4", "pict5"]
> pString = myList[1].char[1..4]
> end
>
> on exitframe me
> pPresentMember = sprite(1).member.name
> end
>
> on MouseDown me
> RightArrow(me)
> end
>
> on RightArrow me
>
> repeat with i = 1 to myList.count
>
> sprite(1).member = pString & + i
> updateStage
> put pPresentMember
>
> end repeat
>
> end
>
> --
> Kamil Dabkowski
> Geometrek
> http://stop.at/kamil
>
> [To remove yourself from this list, or to change to digest mode, go to
> http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
> email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
> Lingo-L is for learning and helping with programming Lingo. Thanks!]
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
