home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / no1_demo / dnorp00.dxr / script_9.ls < prev    next >
Encoding:
Text File  |  1996-10-31  |  970 b   |  60 lines
  1. on exitFrame
  2.   global gflag1
  3.   set gflag1 to 45
  4.   repeat while gflag1 <> 48
  5.     if the timer > 5 then
  6.       moveh3()
  7.     end if
  8.     if the mouseDown then
  9.       exith()
  10.     end if
  11.   end repeat
  12. end
  13.  
  14. on moveh3
  15.   global gtime1
  16.   if gtime1 = 24 then
  17.     set gtime1 to 1
  18.   else
  19.     set gtime1 to gtime1 + 1
  20.   end if
  21.   if (gtime1 mod 12) = 0 then
  22.     curh()
  23.   end if
  24.   if (gtime1 mod 6) = 0 then
  25.     playh()
  26.   end if
  27.   if (gtime1 mod 3) = 0 then
  28.     handh()
  29.   end if
  30.   if (gtime1 mod 2) = 0 then
  31.     eyeh()
  32.   end if
  33.   startTimer()
  34.   updateStage()
  35. end
  36.  
  37. on playh
  38.   global gflag1
  39.   set gflag1 to gflag1 + 1
  40.   set the memberNum of sprite 3 to gflag1
  41.   puppetTransition(26, 0.25, 4, 1)
  42.   updateStage()
  43. end
  44.  
  45. on handh
  46.   if the locV of sprite 4 = 240 then
  47.     set the locV of sprite 4 to -72
  48.   else
  49.     set the locV of sprite 4 to 240
  50.   end if
  51. end
  52.  
  53. on eyeh
  54.   if the locV of sprite 5 = 240 then
  55.     set the locV of sprite 5 to 78
  56.   else
  57.     set the locV of sprite 5 to 240
  58.   end if
  59. end
  60.