home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / qh_demo.exe / DEMOHNT1.DXR / 00007.ls < prev    next >
Encoding:
Text File  |  1996-08-09  |  372 b   |  24 lines
  1. on exitFrame
  2.   global gtime1
  3.   if the timer > gtime1 then
  4.     btnh()
  5.   end if
  6.   if the timer < 900 then
  7.     go(the frame)
  8.   else
  9.     puppetSprite(16, 0)
  10.     unLoadCast()
  11.   end if
  12. end
  13.  
  14. on btnh
  15.   global gnum1, gtime1
  16.   if gnum1 = 108 then
  17.     set gnum1 to 83
  18.   else
  19.     set gnum1 to gnum1 + 1
  20.   end if
  21.   set the castNum of sprite 16 to gnum1
  22.   set gtime1 to gtime1 + 10
  23. end
  24.