[Quest]Full EekRing

02/26/2012 11:42 omonoia#1
quest EekRing begin
state start begin
when 40004.use begin
local all =select("Reset exp to 0%","Freeze/Anti-Freeze exp","exit")
if all == 1 then

local ep = pc.get_exp()
if ep == 0 then
say("Du hast bereits 0 Exp")
return
end
pc.give_exp2(-ep)
chat("Exp wurde auf 0 gesetzt")
end

if all = 2 then
if pc.getqf("antiexp") == 0 then
pc.setqf("antiexp", 1)
chat("Anti EXP aktiviert. Deine Erfahrungspunkte werden jede Sekunde auf 0 gesetzt!")
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 1)
elseif pc.getqf("antiexp") == 1 then
pc.setqf("antiexp", 0)
chat("Anti EXP deaktiviert. Viel Spaß auf OverGaming2!")
end
end

when erfahrung.timer with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung1", 1)
pc.setqf("antiexp", 1)
end

when erfahrung1.timer with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 1)
pc.setqf("antiexp", 1)
end

when login with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 1)
pc.setqf("antiexp", 1)
end

if all = 3 then
return
end
end
end




Kommentare und Eindrücke. Vielen Dank!
02/26/2012 11:46 Lеlouch#2
Wurde schonmal released, hast viellt nur eine Released-Funktion dran gebaut.
Sollte auch nicht schwer sein, solch eine Quest zuschreiben.

Trotzdem - Danke.
02/26/2012 11:49 omonoia#3
Eek Ring do everything.. But.. is it true?? :D:D
02/26/2012 14:14 exi°#4
Das nächste mal bitte die Quest in einen Code-BBCode setzen.
Zur Quest: Braucht man nicht.
02/26/2012 15:30 .Delta#5
schade, dass die noch net mal funzen wird mit der anordnung :D

ihr solltet eure quests schon mal testen, bevor ihr sie released^^
02/26/2012 17:09 omonoia#6
.Delta was ist falsch?