Events mice v.1.0

-- Events Mice Coded by Izzeberg --

version = "1.0"
event = "Rien"
modo = "Izzeberg"
Et = "0"
s = 0
C = 0
P = 0
H = 0
N = 0

-- Interface de base --

ui.addTextArea(1, "<a href='event:help'><P align='center'>?</a>", nil, 760, 24, 31, 15, 0x000001, 0x000001, 0.75, true)

-- Interface de l'event --

function eventTextAreaCallback (id, name, c)
 if c == "help" then
  if name == ""..modo.."" then
  ui.addTextArea(2, "<font size='30'><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: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 == "St-Valentin" then
  Et = "10"
  event = "Saint-Valentin"
  RandA()
 elseif c == "Carnaval" then
  Et = "10"
  event = "Carnaval"
  RandA()
 elseif c == "Poisson" then
  Et = "10"
  event = "Poisson d'avril"
  RandA()
 elseif c == "Halloween" then
  Et = "10"
  event = "Halloween"
  tfm.exec.setVampirePlayer (name)
 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
  ui.removeTextArea(2, nil)
  ET = 0
 end
end
RandA()

function eventLoop()
s = s + 0.1
C = C + 0.1
P = P + 0.5
H = H + 0.5
N = N + 0.5
 --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 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
end