home *** CD-ROM | disk | FTP | other *** search
/ Curio City 11 / CURIO11.bin / pc / movie / namio / qz_mise.dir / 00102_N-BAKETU.ls < prev    next >
Encoding:
Text File  |  1998-01-01  |  370 b   |  17 lines
  1. on mouseUp
  2.   global gqzitemlist, guserlist
  3.   set money to the money of guserlist
  4.   if (getaProp(gqzitemlist, #baketu) = 1) or (getaProp(gqzitemlist, #baketum) = 1) then
  5.     puppetSound(3, "PI")
  6.     go("HAVE")
  7.   else
  8.     if money < 60 then
  9.       puppetSound(3, "PI")
  10.       go("NOMONEY")
  11.     else
  12.       go(the frame + 1)
  13.       puppetSound(3, "PI")
  14.     end if
  15.   end if
  16. end
  17.