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 / COUTJ.dcr / 00001_èâä²ê›íË.ls next >
Encoding:
Text File  |  2017-09-21  |  1.1 KB  |  32 lines

  1. global debug, loopcnt1, loopcnt2, loopcnt3, loopcnt4, l1, l2, l3, l4, l1back, l2back, l3back, l4back, bank, mm, ma, status, free, mb, tdata
  2.  
  3. on startMovie
  4.   set debug to 0
  5.   set tdata to " -900 000000000000000000000000"
  6.   set l2 to 3
  7.   set l2back to 0
  8.   set loopcnt2 to l2
  9.   set the cursor of sprite 45 to [4, 5]
  10.   set the cursor of sprite 46 to [4, 5]
  11.   set the cursor of sprite 48 to [4, 5]
  12.   set bank to "http://202.224.191.2/cgi-bin/EcOpe.cgi?"
  13.   set free to "GUEST"
  14.   set status to 0
  15.   put "Name" into field "Name"
  16.   set the textFont of field "Name" to "Helvetica"
  17.   set the textStyle of field "Name" to "plain"
  18.   set the textSize of field "Name" to 12
  19.   put free into field "Name"
  20.   put "Pass" into field "Pass"
  21.   set the textFont of field "Pass" to "Helvetica"
  22.   set the textStyle of field "Pass" to "plain"
  23.   set the textSize of field "Pass" to 12
  24.   put EMPTY into field "Pass"
  25.   put "money" into field "gold"
  26.   set the textFont of field "gold" to "Helvetica"
  27.   set the textSize of field "gold" to 10
  28.   set the textStyle of field "gold" to "plain"
  29.   set the textAlign of field "gold" to "right"
  30.   put EMPTY into field "gold"
  31. end
  32.