[QUEST] Blaster - Quest Gyüjtemény I.

[DjLevis]

I.
Elve: Valamilyen tárgyért cserébe ad Yangot/Sé/Tárgyat.

Kód Kijelölés Kibont

quest danaka_fule  begin
state start begin
when 20086.chat."Danaka Füle" begin
say_title ( "Danaka Füle" )
say ( "" )
say ( "10 Darab Danaka Fülért adok neked 300 milla yangot" )
say ( "Eventen öld meg a tanakákat, és szerezz minnél több fület." )
say ( "Így néz ki a Danaka füle:" )
say_item ( "Danaka Füle" , 30202 , "" )
say(" ")
say("Beváltod a füleket?")
say(" ")
local s = select ( "Beváltom" , "Nincs fülem" )
if s == 2 then
return
end
if s == 1 then
say_title ( "Danaka Füle" )
say ( "" )
say("Biztosan megvan mind a 10 db fül?")
say ( "" )
wait()
end
if pc.countitem ( 30202 ) < 10 then
say_title ( "Danaka Füle" )
say("")
say("Sajnálom, de nincs meg a 10db fül...")
say("")
else
say_title ( "Danaka Füle" )
say("")
say("Remek, azonnal beváltom neked.")
say("")
pc.remove_item ( 30202 , 10 )
pc.change_money ( 300000000 )
end
end
end
end
II.
Elve: Ha egy Céh vezére vagy, ennek a Quest segítségével át tudod adni másnak a vezetőséget!
Warning: Ebben csinálnod kell egy Tárgyat amivel Questet tudod párosítani:

Kód Kijelölés Kibont

quest change_ceh begin
state start begin
function change_master( name , level_limit , time_resign_limit , time_be_other_leader , time_be_other_member , iscacheitem )
local ret = guild.change_master_with_limit( name , level_limit , time_resign_limit , time_be_other_leader , time_be_other_member, iscacheitem)
local result = false

if ret == 0 then
say("Rossz nevet adtál meg")
elseif ret == 1 then
say("Csak céhvezér használhatja ezt a tárgyat.")
elseif ret == 2 then
say("Nem található ilyen nevu játékos a céhben.")
elseif ret == 3 then
say("Sikeresen átadtad a vezérséget.")
result = true
elseif ret == 4 then
say("Nem vagy céhben.")
elseif ret == 5 then
say("A célszemély nem elérheto.")
elseif ret == 6 then
say("Nem elég képzett a céhvezérségre.")
elseif ret == 7 then
say("Túl korai még, hogy vezetové váljon.")
end

return result
end

when 100009.use begin
if pc.is_guild_master() == false then
say("Csak céhvezér használhatja ezt a tárgyat.")
return
end

say("Kérlek add meg a célszemély nevét:")
say("")
local s = input()

if s == pc.name then
say("Nem adhatod át magadnak a vezetoséget.")
say("")
return
elseif s == "" then
say("Kérlek adj meg egy nevet.")
say("")
return
end

if not pc.is_near_vid( find_pc_by_name( s ) , 10 ) then
say("A célszemélynek melletted kell lennie.")
say("")
return
end

if change_guild_master.change_master( s , 40 , 0 , 0 , 0 ,true) == true then
pc.remove_item(100009)
elseif ret == 5 then
elseif ret == 6 then
say("Nem elég képzett a céhvezérségre.")
end
end
end
end

III.
Farmgyűrű
Elve: Kattintásra autómatikusan nullázza az EXP-d!
WARNING!: 40002 tárgyra van rakva! Ha nem arra szeretnéd csinálj egy tárgyat és ID-t írd át!

Kód Kijelölés Kibont

quest levi begin
state start begin
when 40002.use begin
if pc.getqf("antiexp") == 0 then
        pc.setqf("antiexp", 1)
chat("Levi Gyűrűje aktiválva, minden 3. másodpercben lenullázódik az exp-d!")
        pc.give_exp2(-900000000)
        timer("torol1", 3)
      elseif pc.getqf("antiexp") == 1 then
        pc.setqf("antiexp", 0)
        chat("Levi Gyűrűje deaktiválva.Jó szórakozást!")
        end
      end   
           
      when torol1.timer with pc.getqf("antiexp") == 1 begin
        pc.give_exp2(-900000000)
        timer("torol", 3)
        pc.setqf("antiexp", 1)
      end   
       
      when torol.timer with pc.getqf("antiexp") == 1 begin
        local ep = pc.get_exp()
        pc.give_exp2(-900000000)
        timer("torol1", 3)
        pc.setqf("antiexp", 1)       
      end
    end
end

GM bejelentkezés
Link: http://data.hu/get/3845421/gmlogin.rar
Készítő: Blaster

Bejelentkező üzenet
Link: http://data.hu/get/3845423/login.rar
Készítő: Blaster

12 óra nappal/éjszaka
Link: http://data.hu/get/4159927/nappal.rar
Készítő: Blaster

Pet-Rendszer
Letöltés: (minden benne van!) http://data.hu/get/5667329/Allatok_Teljes_Leiras.rar
Jelszó: m2h