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 / TITLEJ.dcr / 00038_INQ01.ls < prev    next >
Encoding:
Text File  |  2017-09-21  |  457 b   |  22 lines
  1. global debug, bank, status, free, mm
  2.  
  3. on exitFrame
  4.   repeat with idx = 7 to 16
  5.     set the visible of sprite idx to 0
  6.   end repeat
  7.   if field "Name" = free then
  8.     if debug = 0 then
  9.       preloadnetthing("OPENJ.dcr")
  10.       set status to 1
  11.     else
  12.       alert("PreLoad OPENJ")
  13.     end if
  14.     go("ToBeC")
  15.   else
  16.     set para to bank & "name=" & field "Name" & "&password=" & field "Pass"
  17.     if debug = 0 then
  18.       getnettext(para)
  19.     end if
  20.   end if
  21. end
  22.