home *** CD-ROM | disk | FTP | other *** search
/ Encyklopedia Omnia / Planeta.iso / data / m_navfut.dir / 00023_Script_disasterClick < prev    next >
Text File  |  2000-09-30  |  474b  |  19 lines
  1. on mouseUp
  2.   global gDisasterToChoose, gDisasterIndex
  3.   
  4.   set n = the name of member the member of sprite the currentSpriteNum
  5.   set scelta = value(the last char of n)
  6.   
  7.   if scelta = gDisasterToChoose then
  8.     -- ok!
  9.     set gDisasterIndex = gDisasterToChoose
  10.     sound stop 1
  11.     tell the stage
  12.       puppetSound 1, "E_si"
  13.       go next
  14.     end tell
  15.   else
  16.     -- click sul disaster sbagliato...
  17.     tell the stage to puppetSound 1, "E_no"
  18.   end if
  19. end