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 / paris / wave / MAP062E.dcr / 00001.ls next >
Encoding:
Text File  |  2017-09-21  |  286 b   |  18 lines
  1. global mm, status
  2.  
  3. on exitFrame
  4.   if soundBusy(2) then
  5.     go(the frame)
  6.   else
  7.     set mm to mm - 500
  8.     if (mm >= 0) or (status = 0) then
  9.       put mm into field "gold"
  10.       go("rich")
  11.     else
  12.       set mm to 0
  13.       put mm into field "gold"
  14.       go("PL")
  15.     end if
  16.   end if
  17. end
  18.