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 / COUT.dcr / 00152_INQ01.ls < prev    next >
Encoding:
Text File  |  2017-09-21  |  323 b   |  17 lines
  1. global debug, bank, status, free, mm
  2.  
  3. on exitFrame
  4.   sound stop 1
  5.   sound stop 2
  6.   if field "Name" = free then
  7.     set mm to 0
  8.     put mm into field "gold"
  9.     go("king")
  10.   else
  11.     set para to bank & "name=" & field "Name" & "&password=" & field "Pass"
  12.     if debug = 0 then
  13.       getnettext(para)
  14.     end if
  15.   end if
  16. end
  17.