Quest segítség

Indította Zeratul, 2017-01-15, 17:12:34

Sziasztok!
Szeretném a segítségeteket kérni vadász küldetéshez! Azt szeretném megoldani hogy mondjuk 10- szinten elő ugrik egy küldetés tekercs amiben 40 Éhes vaddisznót megöl a játékos akkor kap 20% kritikus találatot, és egy tárgyat is időkorlát nélkül lenne a küldetés!
Még kezdÅ' vagyok de igyekszek tanulni :-) !

Szerintem ezt Te is képes vagy megírni nem egy hatalmas terjedelmű és nehézségű questről beszélünk.
Mellesleg van pár séma az interneten mivel a metines questek durván 80%-a ilyen questekből áll. Vagy várd meg míg valaki némi pozitív karmáért megírja és várj még vele fél/egy napot amikor kb. 5-10 perc szarással zuhanyzással szeretkezéssel borotválkozással EGYÜTT.

Hát én nem tudom megírni + nem is találok de tök mind1
Még kezdÅ' vagyok de igyekszek tanulni :-) !

Ööö talán alapból ezek azok:
collect_herb_lv7.quest stbbb....

Igaza van Stepnek teljesen hogy ne legyen az mi mindig csak offolunk itt van egy minta de nem teljesen az amit te kérsz


quest lvl50_quest begin
state start begin
end
state run begin
when login or levelup or enter with pc.get_level() >=50 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Fertőzött emberek!")
end
when button or info begin
local kiiras = pc.getqf("kill")
say_title("Baek-Go levele.")
say("Baek-Go egy kísérletet végzett embereken,")
say("de elbukott a kísérlet.")
say("Az emberek gonosz halottak lettek.")
say("")
say("Baek-Go-nak szüksége van a segítségedre!")
say("Ölj meg 15 Gonosz embert!")
say("")
say("A Gonosz Embereket a Sohan hegyen találod!")
say("A teleportos segíthet eljuttatni oda!")
say_reward("Jutalmad Aquakő Védelem+6 ")
say_item_vnum(28642)
say_reward("Megölt Gonosz emberek: "..kiiras)
end
when 903.kill begin
if pc.getqf("kill")>=14 then
set_state(jutalom)
else
local i = pc.getqf("kill")+1
pc.setqf("kill",i)
end
end
end
state jutalom begin
when letter begin
send_letter("Jutalmad a Gonosz emberekért!")
end
when button or info begin
say_title("Sikeresen befejezted a feladatot!")
say("Jutalmad:")
say_reward("Aquakő védelem+6 !")
say_item_vnum(28642)
pc.give_item2(28642,1)
clear_letter()
set_quest_state("lvl55_quest", "run")
set_state(__complete)
end
end
state __complete begin
end
end


Ha jönne valaki igen onnan van a quest hirtelen ezt találtam.

Üzenet összefésülés: 2017-01-15, 18:44:03

Ha egy questet nem tudsz írni akkor ne is foglalkozz szerkesztéssel. Alapvető dolog és két nap alatt meg lehet tanulni.

Én is találtam neked egyet.
quest lv10 begin
    state start begin
        when login or levelup with pc.level >= 10 begin
            set_state(informaciok)
        end
    end
   
    state informaciok begin
        when letter begin
            send_letter("Vadállatok")
        end
        when button or info begin
        say_title("Vadállatok")
        say("Üdvözöllek kalandor !")
        say("A vaddinsznók egyre több falubeli emberre ")
say("támadnak ez így nem mehet tovább ! ")
say("Menj és tizedeld meg a lázadók létszámát! ")
        say("Feladatod:")
        say("")
        say("Gyilkolj le: 75 Vaddisznót!")
        say("Ha megcsinálod a jutalmad nem marad el!")
        say("Szeretnéd a feladatot elkezdeni?")
        local s = select("Igen","Nem,feladom!")
        if s == 2 then
                    say("Kár..")
                    clear_letter()
                    set_state (aufgeben)
        else
            say("Rendben, indulj!")
            say_reward("Ölj 75 darab Vaddisznót!")
say_reward("Ha megölted, jutalomban részesülsz!")
say_reward("Vigyázz! Ha nem fogadod majd el a jutalmad,")
say_reward("hiába csináltad meg a küldetést,nem kapod meg!")
            pc.setqf("state1", 0)
            q.set_counter("Vaddisznót", 75)
            set_state(go)
            end
        end
    end
   
state go begin
        when letter begin
            send_letter("Vadállatok")
        end
   
        when button or info begin
            say_title("Vadállatok")
            say("Státusz:")
            say_reward("Te már "..pc.getqf("state1").." Vaddisznót öltél meg a 75-ből!")
        end
       
        when 108.kill begin
            local count1 = pc.getqf("state1") + 1
            if count1 <= 75 then
                pc.setqf("state1", count1)
                q.set_counter("Vaddisznót", count1)
            end
            if count1 == 75 then
            set_state(fertig)
            end
        end
    end
           
    state fertig begin
        when letter begin
            send_letter("Küldetés befejezve!")
        end
       
        when button or info begin
            say_title("Befejezett küldetés!")
            say("Úgy látom végeztél!")
            say("Megérdemeled immáron a jutalmad!")
            wait()
            say("Szeretnéd a jutalmad most?")
            local s=select("Természetesen","Nem, soha")
            if s== 2 then
                clear_letter()
                set_state(aufgeben)
            else
say_reward( "Zöld Mágiát kaptál 4 darabot." )
say_reward( "Zöld Erőt kaptál 2 darabot." )
say_reward( "500.000 Tapasztalatot kaptál." )
say_reward( "600.000 Yangot kaptál." )
pc.give_item2(76023, 4) --Kagyló
pc.give_item2(76023, 2) --Kagyló
pc.give_exp2(500000)
pc.changegold(600000)
                clear_letter()
set_quest_state("lv20", "run")
                set_state(ende)
            end
        end
    end

    state aufgeben begin
    end
   
    state ende begin
    end
end


Biosz küldiről lemásolod, hogy optot adjon és viszlát.

Idézetet írta: Zeratul Dátum 2017-01-15, 18:40:58
Hát én nem tudom megírni + nem is találok de tök mind1
Igen flegma a srác gyerek. :'(

Pedig most tök rendes voltam. :-X

Nem vagyok Flegma de már próbáltam írni ilyen questet a biológus küldihez hasonlóan de sohasem volt jó keresni kerestem és úgy sem találtam de mind 1!


Köszönöm a segítséget!
Még kezdÅ' vagyok de igyekszek tanulni :-) !