>>>>>>I'll help Nick, George. I'm a dark beer drinker myself (well, that and tequila).
>>>>>>
>>>>>Hi Bonnie,
>>>>>
>>>>>Just have one for me, guys. I'll be thinking about ya.:-)
>>>>
>>>>.... or two, or three, or .... :-)
>>>
>>>One tequila, two tequila, three tequila, floor! ;)
>>
>>Ah, Fred, you floor me. Or is that =FLOOR(lnTequilas)< g >.
>
>No, the following code example should be correct, assuming you've previously instantiated the Fred object:
>
>

DO WHILE Fred.drinks.count < 3
>   oJustOneMore = NEWOBJECT('Tequila.shot')
>   Fred.drinks.add(oJustOneMore)
>   oJustOneMore = NULL
>ENDDO
>SEEK floor
>

reading all the posts in this thread I think the correct code is

LOCAL loParty,loDrinkingParty,loPerson,loDrink

loParty=NEWOBJECT('Devcon')
loDrinkingParty=loParty.GetCrazyUTFolks()
FOR EACH loPerson IN loDrinkinParty.People
   DO WHILE !loPerson.Dropped()
      loDrink=NEWOBJECT(loPerson.FavouriteDrink)
      loPerson.Abuse(loDrink)
   ENDDO
ENDFOR

Arnon