Hi Yo

Try this using a movie script or set it as a handler within an object or
behaviour etc..

<movie script starts>

on mCountListItem (vList, listItem)
  i = 0
  repeat with j = vList.count down to 1
    if vList[j] = listItem then
      i = 1 + 1
    end if
  end repeat
  return i
end mCountListItem

</movieScript ends>

<message window text>

MyList=[#d,#a,#b,#c,#b,#a]

put mCountListItem MyList,#a

-- 2


Sincerely

Mark

--------------------------------------------
Mark R. Jonkman
Mark R. Jonkman Consulting
ADDRESS: 20 Windermere Crt., Guelph, ON, CANADA N1E 3L4
PHONE: 519-837-8509
EMAIL: [EMAIL PROTECTED]
--------------------------------------------


[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!]

Reply via email to