Mobiclic 41/MOBICLIC41.ISO/pc/Data/DemoAtlas/Ecran1_2_3.dir/00093_Script_93

Text File | 2002-02-07 | 533b | 35 lines

-- purge automatique des globes et clic

property aPurger
global debDemo

on exitFrame me
  s = the currentSpriteNum
  n = sprite(s).memberNum
  if (the frame) mod 5 = 0 then
    repeat with i=1 to count(aPurger)
      member(aPurger[i]).unload()
    end repeat
    aPurger = [n]
  else
    append aPurger, n
  end if
end

on beginSprite me
  aPurger = []
end

on mouseUp
  sound(2).play(member "sonClic")
  coupeSon 3
  debDemo = 1
end

on mouseEnter
  cursor 280
end

on mouseLeave
  cursor -1
end