Radio buttons y combo boxes en Director

Ahí vaaaaaaaaaaa!
Botron de radio::::
On getBehaviorTooltip me
return \
"Usa este comportamiento para crear un grupo de botones de radio con dibujos personalizados"&\
return&\
"Comportamiento realizado por bedelludrica: " & \
return&\
"[email protected] "
end getBehaviorTooltip
property p_encendido, p_apagado, p_estado, p_lista_sprites
on getPropertyDescriptionList me
list = [:]
addProp list, #p_encendido, [#comment: "miembro de encendido",\
#format: #member, #default: ""]
addProp list, #p_apagado, [#comment: "miembro de apagado",\
#format: #member, #default: ""]
addProp list, #p_estado, [#comment: "estado inicial",\
#format: #boolean, #default: FALSE]
addProp list, #p_lista_sprites, [#comment: "lista de sprites",\
#format: #list, #default: []]
return list
end
on beginSprite me
if p_estado then encendido(me)
end
on mouseUp me
encendido(me)
end
on encendido me
p_estado= TRUE
sprite(me.spriteNum).member = p_encendido
repeat with i in p_lista_sprites
if i <> me.spriteNum then
sendSprite(sprite i,#apagado)
end if
end repeat
end
on apagado me
p_estado= FALSE
sprite(me.spriteNum).member =p_apagado
end
-checkbox:::::::::_
No lo he encontrado... Mañana te lo pongo aquí mismo.