Ich will mal die Quest anschauen lassen ich bin mir nicht sehr sicher
ob die funktionen richtig geschrieben sind
schauts euch bitte mal an...
Quest:
Functions:
Tabelle: player.snowtable
spalten
pid, name
pid = player_id
name = charname
und ja ich hätte es aus der playerplayer auslesen können
aber genau das wollte ich nicht^^
ob die funktionen richtig geschrieben sind
schauts euch bitte mal an...
Quest:
PHP Code:
quest schneeballschlacht begin
state start begin
when login with pc.getqf("clear") == 0 begin
local MONAT = tonumber(os.date("%m"))
if MONAT>0 and MONAT<=12 then
pc.clear_snow_ball()
else
return
end
end
when login with os.date("%m")=="12" begin
pc.setqf("clear", 0)
if pc.getqf("snow") ==0 then
local TODAY = tonumber(os.date("%d"))
if TODAY>11 and TODAY<=25 then
say_title("Schneeball Event")
say("Die Schneeballschlacht wurde eröffnet,")
say("Brandneues Feature auf World of Secrets.")
say("Bewirf andere mit Schneebällen und sie,")
say("erhalten eine neue Sichtweise im Spiel :)")
say("Willst du teilnehmen?")
say_reward("Eventlaufzeit 12.12 - 24.12")
local f = select ("Ja" , "Abbrechen")
if f == 1 then
say_title("Schneeball Event")
say("Sehr schön ich habe dich aktiviert viel Spaß")
pc.set_snow_id()
pc.setqf("snow", 1)
elseif f == 2 then
say_title("Schneeball Event")
say("Sehr schade, falls dus dir anders überlegst,")
say("Du kannst diese Entscheidung rückgängig machen,")
say("Beim Wächter des Dorfplatzes!!!")
end
else
return
end
if game.get_event_flag("".. pc.get_player_id() .."") > 1 then
local TODAY = tonumber(os.date("%d"))
if TODAY>11 and TODAY<=25 then
check_snowball()
else
return
end
else
return
end
end
when 11000.click or 11002.click or 11004.click with os.date("%m")=="12" begin
local TODAY = tonumber(os.date("%d"))
if pc.getqf("snow") ==0 then
if TODAY>11 and TODAY<=25 then
say_title("Schneeball Event")
say("Die Schneeballschlacht wurde eröffnet,")
say("Brandneues Feature auf World of Secrets.")
say("Bewirf andere mit Schneebällen und sie,")
say("erhalten eine neue Sichtweise im Spiel :)")
say("Willst du teilnehmen?")
say_reward("Eventlaufzeit 12.12 - 24.12")
local f = select ("Ja" , "Abbrechen")
if f == 1 then
say_title("Schneeball Event")
say("Sehr schön ich habe dich aktiviert viel Spaß")
pc.set_snow_id()
pc.setqf("snow", 1)
elseif f == 2 then
say_title("Schneeball Event")
say("Sehr schade, falls dus dir anders überlegst,")
say("Du kannst diese Entscheidung rückgängig machen,")
say("Beim Wächter des Dorfplatzes!!!")
end
else
return
end
end
end
when xxxxx.use with os.date("%m")=="12" begin
local TODAY = tonumber(os.date("%d"))
if TODAY>11 and TODAY<=25 then
say_title("Schneeball Event")
say("Hallo machen wirs kurz!")
say("Auf wen willst du mich werfen?")
say("gebe einen Charnamen ein..")
local charname = tonumber(input())
pc.search_another_pid(charname)
else
return
end
end
end
end
PHP Code:
function pc.clear_snow_ball()
local pid = pc.get_player_id()
game.set_event_flag(pid, 0)
pc.setqf("clear", 1)
pc.setqf("snow", 0)
end
function pc.set_snow_id()
local pid = pc.get_player_id()
game.set_event_flag(pid, 0)
end
function pc.get_snow_ball()
local pid = pc.get_player_id()
game.get_event_flag(pid)
end
function pc.search_another_pid(name)
local anotherpid = mysql_query("SELECT * FROM player.snowtable WHERE name='"..name.."'","m2user","m2pass@#","account","localhost")
if anotherpid.pid > 0 then
say(""..anotherpid.pid.." exestiert.")
say("....")
say("")
local chance = number(1, 30)
local chance_max = 3
if chance <= chance_max then
local actual_snowballs = game.get_event_flag(anotherpid.pid)
game.set_event_flag(anotherpid.pid, actual_snowballs + 1)
say("Hammer!, du hast getroffen :)")
else
say("Das war wohl nichts...")
end
else
say("Es trat ein Fehler auf!")
say("Datenbank Error oder Spieler nimmt nicht Teil.")
end
end
function check_snowball()
local actual_balls = pc.get_snow_ball()
if actual_balls > 1 then
game.set_event_flag(""..pc.get_player_id().."", -1)
cmdchat("snow")
say("eiskalt erwischt")
say("du hast für 5 minuten Schneeansicht :D")
else
syschat("Glück gehabt keine Neuen Schneebälle eingetroffen!")
end
end
spalten
pid, name
pid = player_id
name = charname
und ja ich hätte es aus der playerplayer auslesen können
aber genau das wollte ich nicht^^
