home *** CD-ROM | disk | FTP | other *** search
/ Curso de Informatica 1 / elPeriodico1.iso / menu.dir / Internal_22.ls < prev    next >
Encoding:
Text File  |  1997-08-14  |  309 b   |  14 lines
  1. on mouseUp
  2.   global opcio, valorTexte, opcioMenu, submenu3, shareware
  3.   puppetSound("harp")
  4.   marcaDescripcio()
  5.   ompleTexteShareware()
  6.   desactivaBotoExecutar()
  7.   set opcio to 1
  8.   set valorTexte to the text of field "texte"
  9.   set opcioMenu to 4
  10.   set submenu3 to 1
  11.   set shareware to 1
  12.   go("shareware")
  13. end
  14.