Komputer for Alle 2002 #3/K-CD-3-2002.ISO/K-CS.DCR/00174.ls

Text File | 2002-01-14 | 576 b | 25 lines

property StartTicks

on new me
  cursor(4)
  set StartTicks to the ticks
  set the visible of sprite 62 to 0
  set the visible of sprite 63 to 0
  set the visible of sprite 64 to 0
  set the visible of sprite 65 to 0
  set the visible of sprite 66 to 0
  set the visible of sprite 67 to 0
  set the visible of sprite 68 to 0
  set the visible of sprite 69 to 0
  set the visible of sprite 70 to 0
end

on exitFrame
  set the visible of sprite (((the ticks - StartTicks) / 30) + 62) to 1
  if the ticks > (StartTicks + 300) then
    go(#next)
  else
    go(#loop)
  end if
end