-NT...
Try adding this to your behavior

global aList
property pShape

on beginSprite me

    if pShape = "random" then
       tempList = ["circle shape", "square shape", "triangle shape"]
       pShape = tempList[random(3)]
    end if

end

>on mouseUp me
>  spotCheck = getOne(aList, 0)
>  if spotCheck <> 0 then
>    setAt(aList, spotCheck, new(script "aScript", spotCheck + 5, pShape)) 
> -- changed this line
>  end if
>end

on getPropertyDescriptionList me
GPDL = [:]

GPDL[#pShape] = [#comment: "Shape type", #format:#string, #default: "", 
#range:["circle shape", "square shape", "triangle shape", "random"]]

end


This should help you get started.

Later.
...Neil


[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