Komputer for Alle 2001 #13/CD 13 (Black) - 2001.iso/K-CS.DCR/00190.ls

Text File | 2001-08-24 | 476 b | 22 lines

global ThreeDee, Dark3D, Pattern3D, BlinkObjekt

on new me
  cursor(0)
  set BlinkObject to 0
  set the locH of sprite 99 to 780
  set BlinkObjekt to new(script "Blink", 4, 80)
  set Dark3D to 0
  set ThreeDee to 0
  set Pattern3D to 0
  set the visible of sprite 80 to 0
  set the visible of sprite 81 to 0
  set the visible of sprite 82 to 0
  set the visible of sprite 83 to 0
  set the visible of sprite 84 to 0
end

on exitFrame
  checkBlink(BlinkObjekt)
  go(#loop)
end