home *** CD-ROM | disk | FTP | other *** search
/ Curso de Informatica 10 / elPeriodico10.iso / menu.dir / Internal_103.ls < prev    next >
Encoding:
Text File  |  1997-12-15  |  271 b   |  11 lines
  1. on mouseUp
  2.   global joc, valorTexte, opcio, Lsubmenus
  3.   puppetSound("harp")
  4.   set joc to 2
  5.   marcaDescripcio()
  6.   set the text of member "texte" to the text of member "texte joc2"
  7.   set valorTexte to the text of field "texte"
  8.   set opcio to 1
  9.   setAt(Lsubmenus, 2, 2)
  10. end
  11.