I want to thank those who responde to my query about lists to strings. I 
hammered at it for a couple of days and this is what I came up with. The 
actuall collection of the items is in a movie script. This Script is on the 
button that puts the found items into  the "Inventory" field

--First I Made My Lists and strings globals

global MIA, CollectList, MyString1, MyString2

on mouseUp me

  --Then I  put the contents of List into a string, then put it into a field

  repeat with x = 1 to CollectList.count
    put getAt(CollectList,x) & "," && field "There" into field "There"
  end repeat
  repeat with x = 1 to MIA.count
    put getAt(MIA,x) & "," && field "NotThere" into field "NotThere"
  end repeat


  MyString1 = field "There"
  MyString2 = field "NotThere"

  --Then I checked to see if the Collect list is complete, if it is 
partially complete or empty to adjust the string in the Iventory field.

  if CollectList.count < 6 then
    member("Inventory").text =  "You have found && MyString1  && "you still 
need" && MyString2 &"."
  else
    if CollectList.count = 6 then
      member("Inventory").text =   "You have found && MyString1 & "."
    end if
  end if

    if MIA.count = 6 then
      put "You have found none of the required items." into field 
"Inventory"
    end if
end

I want to thank everyone for there time and advice.
Jacqueline

_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp


[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/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