Car Screensaver - Toyota/TOYOTA.iso/mjparty/no1_demo/dnorp00.dxr/script_13.ls

Text File | 1996-10-31 | 452 b | 27 lines

on exitFrame
  repeat with n = 1 to 5
    set the locV of sprite 1 to 55 + (n * 37)
    set the locV of sprite 2 to 240 + (n * 37)
    updateStage()
    if the timer > 5 then
      moveh5()
    end if
    if the mouseDown then
      exith()
    end if
  end repeat
end

on moveh5
  global gtime1
  if gtime1 = 24 then
    set gtime1 to 1
  else
    set gtime1 to gtime1 + 1
  end if
  if (gtime1 mod 12) = 0 then
    curh()
  end if
  startTimer()
end