Teleport quest

Sziasztok elhoztam nektek a teleport questemet.

quest farm_map begin
state start begin
when 20041.chat."Farm map" begin

say_title("Farm map:")
say("")
say("Üdvözöllek kalandor! Beszeretnél lépni a farm mapra?")
say("Bizonyos feltételeknek megkell felelned")
say("hiszen a farm map-on tartózkodó szörnyek")
say("olyan erővel bírnak, hogy még")
say("a legerősebb harcosok is meghátrálnak.")
say_reward("A bejutáshoz szükséged van:")
say_reward("Legalább 30-as szintre,")
say_reward("illetve egy kristály belépőre!")
if pc.count_item(30203) or pc.count_item(30203) >= 1 and pc.level >= 30 then
local s=select("Belépni", "Mégse")

if s==1 then
pc.remove_item(30203,1)
pc.warp(2642900, 2694200)
else
return
end

else
say_reward("Nincs belépőd vagy nem vagy még 30as!")
end
end
end
end