Events mice v.1.1

-- Events Mice Coded by Izzeberg --

version = "1.1"
event = "Rien"
modo = "Izzeberg"
Et = "0"
s = 0
C = 0
P = 0
H = 0
N = 0
Pa = 0
v = 200

-- Interface de base --

ui.addTextArea(1, "<a href='event:help'><P align='center'>?</a>", nil, 760, 24, 30, 15, 0x000001, 0x000001, 0.75, true)
ui.addTextArea(5, "<a href='event:NewE'><P align='center'>•</a>", nil, 720, 24, 30, 15, 0x000001, 0x000001, 0.75, true)
function eventNewPlayer (name)
 ui.addTextArea(1, "<a href='event:help'><P align='center'>?</a>", nil, 760, 24, 30, 15, 0x000001, 0x000001, 0.75, true)
 ui.addTextArea(5, "<a href='event:NewE'><P align='center'>•</a>", nil, 720, 24, 30, 15, 0x000001, 0x000001, 0.75, true)
end

-- Interface de l'event --

function eventTextAreaCallback (id, name, c)
 if c == "NewE" then
  if name == ""..modo.."" then
  ui.addTextArea(2, "<font size='20'><P align='center'><u>L'event :</u><br><br><a href='event:St-Valentin'>Saint-Valentin</a><br><a href='event:Carnaval'>Carnaval</a><br><a href='event:Pâques'>Pâques</a><br><a href='event:Poisson'>Poisson d'avril</a><br><a href='event:Halloween'>Halloween</a><br><a href='event:Noël'>Noël</a>", modo, 39, 54, 326, 277, 0x000001, 0x000001, 0.75, true)
  end
 end
 if c == "help" then
  ui.addTextArea(2, "<font size='20'><P align='center'><u>L'event :</u><br><br><a href='event:St-Valentin'>Saint-Valentin</a><br><a href='event:Carnaval'>Carnaval</a><br><a href='event:Pâques'>Pâques</a><br><a href='event:Poisson'>Poisson d'avril</a><br><a href='event:Halloween'>Halloween</a><br><a href='event:Noël'>Noël</a>", modo, 39, 54, 326, 277, 0x000001, 0x000001, 0.75, true)
 end
 if c == "St-Valentin" then
  Et = "10"
  event = "Saint-Valentin"
  RandA()
 elseif c == "Carnaval" then
  Et = "10"
  event = "Carnaval"
  RandA()
 elseif c == "Pâques" then
  Et = "10"
  event = "Pâques"
  RandA()
 elseif c == "Poisson" then
  Et = "10"
  event = "Poisson d'avril"
  RandA()
 elseif c == "Halloween" then
  Et = "10"
  event = "Halloween"
  RandA()
  v = 0
 elseif c == "Noël" then
  Et = "10"
  event = "Noël"
  RandA()
 end
end
function RandA(id, name)
 ui.removeTextArea(0, nil)
 ui.addTextArea(0, "<font size='20'><P align='center'>Event : "..event.."</P></font>", nil, 4, 370, 243, 40, 0x000001, 0x000001, 0.75, true)
 if Et == "10" then
     for name,player in pairs(tfm.get.room.playerList) do
      tfm.exec.killPlayer (name)
      tfm.exec.respawnPlayer (name)
     end
  ui.removeTextArea(2, nil)
  ET = 0
 end
end
RandA()

function eventLoop()
s = s + 0.1
C = C + 0.1
P = P + 0.1
H = H + 0.1
N = N + 0.1
v = v + 1.0
Pa = Pa + 0.1

 --if s == 0.1 then
  if event == "Saint-Valentin" then
    tfm.exec.displayParticle (30, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (31, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (5 , math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    s = 0
  end
 --end
 --if Pa == 0.1 then
  if event == "Pâques" then
    tfm.exec.displayParticle (34, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (33, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (32 , math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    Pa = 0
  end
 --end
 --if C == 0.1 then
  if event == "Carnaval" then
    tfm.exec.displayParticle (21, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (22, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (23, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (24, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    C = 0
  end
 --end
 --if P == 0.1 then
  if event == "Poisson d'avril" then
    tfm.exec.displayParticle (28, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (14, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (23, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (24, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    P = 0
  end
 --end
 --if H == 0.1 then
  if event == "Halloween" then
    tfm.exec.displayParticle (2, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    H = 0
  end
 --end
 --if N == 0.1 then
  if event == "Noël" then
    tfm.exec.snow(1, 10)
    tfm.exec.displayParticle (0, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (13, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    tfm.exec.displayParticle (4, math.random(0,800),math.random(0,400), 1.0, 1.0, 1.0, 1.0, nil)
    N = 0
  end
 --end
   if v == 2 then
    if event == "Halloween" then
     for name,player in pairs(tfm.get.room.playerList) do
     tfm.exec.setVampirePlayer (name)
     end
    end
   end
end