home *** CD-ROM | disk | FTP | other *** search
/ Internet 1996 World Exposition / park.org.s3.amazonaws.com.7z / park.org.s3.amazonaws.com / Japan / Panasonic- / funcity / tokyo / slot.dcr / 00072.ls < prev    next >
Encoding:
Text File  |  2017-09-21  |  435 b   |  24 lines
  1. on exitFrame
  2.   global gslt, gbet, gcoin, gkritu, gten
  3.   movelamp(4)
  4.   updatelamp()
  5.   if the timer > 60 then
  6.     if gkritu > 0 then
  7.       set gkritu to gkritu - 1
  8.       set gten to gten + 1
  9.       set gcoin to gcoin + (gbet * 10)
  10.       dspcoin()
  11.       startTimer()
  12.     else
  13.       clearsw(0)
  14.       if getAt(gslt, 2) = 4 then
  15.         go("Bar")
  16.       else
  17.         go("├¬┬Ñ├⌐Z")
  18.       end if
  19.     end if
  20.   else
  21.     go(the frame)
  22.   end if
  23. end
  24.