[QuestHU]Metin2 - Night's sleep

----------------------------------------------------
-- Sub Quest 50 ~ Kapitány
-- Lv 52 Egy jó éjszakai alvás
-- P3NG3R
----------------------------------------------------
--[[
locale.lua
locale.vileage1_name = {
    "Yongan terület",
    "Joan terület",
    "Pyungmoo terület"
}

locale.vileage2_name = {
    "Jayang terület",
    "Bokjung terület",
    "Bakra terület"
}
]]
quest subquest_50 begin
    state start begin
        when login or levelup or enter with pc.level >= 52 begin
            set_state(information)
        end
    end

    state information begin
        when letter begin
            send_letter("Egy jó éjszakai alvás")

            local v=find_npc_by_vnum(20018)
            if v!=0 then target.vid("__BAEKGO__", v, "Baek-Go") end
        end

        when button or info begin
            say_title("Egy jó éjszakai alvás")
            ----"12345678901234567890123456789012345678901234567890|
            say("A kapitányt álmatlanság gyötri. Menj Baek-Go-hoz,")
            say("és kérj tőle erősebb altató tablettákat a")
            say("kapitány számára.")
            say()
            say("Baek-Go itt van: "..locale.vileage1_name[pc.get_empire()])
            say()
        end

        when 20018.chat."Egy jó éjszakai alvás" begin
            target.delete("__BAEKGO__")
            say_title("Baek-Go:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Altatót a Kapitánynak? Attól tartok, nem tudok")
            say("erősebbet adni neked. Viszont talán Yu-Hwan tud")
            say("készíteni valami gyógynövény alapú szert, ami")
            say("meghozza a kívánt eredményt.")
            say()
            local s = select("Akkor jobb, ha elmegyek Yu-Hwan-hoz!", "Most nem")
            if s == 1 then
                set_skin(NOWINDOW)
                set_state(goto_yuhwan)
            else
                say_title("Baek-Go:")
                ----"12345678901234567890123456789012345678901234567890|
                say("Kár, hogy nem segítesz a Kapitánynak...")
                say("Viszlát.")
                say()
                return
            end

        end
    end

    state goto_yuhwan begin
        when letter begin
            send_letter("Egy jó éjszakai alvás")

            local v = find_npc_by_vnum(20017)
            if v!=0 then target.vid("__YUHWAN__", v, mob_name(20017)) end
        end

        when button or info begin
            say_title("Egy jó éjszakai alvás")
            ----"12345678901234567890123456789012345678901234567890|
            say("Baek-Go-nak nincs erősebb gyógyszere. Yu-Hwan")
            say("talán mégis tudna segíteni, ha ismer olyan")
            say("gyógynövényt, amivel elérhető a kívánt hatás.")
            say()
            say("Yu-Hwan itt van: "..locale.vileage2_name[pc.get_empire()])
            say()
        end

        when 20017.chat.'Egy jó éjszakai alvás' begin
            target.delete("__YUHWAN__")
            say_title("Egy jó éjszakai alvás")
            ----"12345678901234567890123456789012345678901234567890|
            say("Jól ismerem a Kapitányt. És mint talán már tudod,")
            say("elég hosszú időn keresztül teljesítettem számára")
            say("titkos küldetéseket. De azt kell mondanom, most")
            say("nem segítenek megoldani a problémáját a")
            say("gyógynövények.")
            say("Más oka van annak, hogy a Kapitány nem tud")
            say("aludni, És higgy nekem, ő pontosan tudja az okát.")
            say("De ez olyan dolog, amit magának kell elrendeznie,")
            say("én nem tehetem meg helyette. Menj, látogasd meg,")
            say("és kérdezd erről.")
            say()
            wait()

            set_skin(NOWINDOW)
            set_state(ask_captain)
        end
    end

    state ask_captain begin
        when letter begin
            send_letter("Egy jó éjszakai alvás")

            local v = find_npc_by_vnum(20355)
            if v!=0 then target.vid("__CAPTAIN__", v, mob_name(20355)) end
        end

        when button or info begin
            say_title("Egy jó éjszakai alvás")
            ----"12345678901234567890123456789012345678901234567890|
            say("Yu-Hwan nem akar fecsegni mások titkairól, így ez")
            say("valószínűleg valami kellemetlen dolog lehet. De")
            say("ez sem használ, beszélned kell erről a ")
            say("Kapitánnyal. Ha nem tudjuk, mi okozza, nem tudjuk")
            say("megoldani az alvás problémáját sem. Tehát menj")
            say("ide: "..locale.vileage1_name[pc.get_empire()])
            say()
        end

        when 20355.chat.'Egy jó éjszakai alvás' begin--__CAPTAIN__.target.click or...
            target.delete("__CAPTAIN__")
            say_title(pc.name..":")
            ----"12345678901234567890123456789012345678901234567890|
            say("Nincs elérhető erősebb altatószer. De Kapitány,")
            say("talán tudok segíteni, ha megtaláljuk az")
            say("álmatlanság okát.")
            say()
            wait()

            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Nincs semmi olyan, amit hozzád hasonló ")
            say("fiatalemberekkel szeretnék megosztani.")
            say("De hamarosan megőrülök, ha nem tudom végre")
            say("kialudni magam éjjel. Azt hiszem, el kell... De")
            say("ne feledd, erről csak Te tudhatsz: Minden éjjel")
            say("négy szellem kísért. De nem is ez a")
            say("legrosszabb... Én vagyok a felelős a halálukért.")
            say("Négy katona. Azt mondják, idézők és kínzók")
            say("kínozták őket halálra a Seungryong-völgyben. Én")
            say("rendeltem őket oda - én küldtem őket a halálba!")
            say()
            wait()

            say_title(pc.name..":")
            ----"12345678901234567890123456789012345678901234567890|
            say("És mit tehetünk ezekért a szellemekért?")
            say()
            wait()

            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Bosszút akarnak! Mit tehetnénk? Ha hagyom, hogy")
            say("megtorolják, a falu vezetés nélkül marad,")
            say("lerohanják, és elveszítjük. De ha nem megyek,")
            say("megőrülök.")
            say("Ha nem én felelnék a falu biztonságáért, azonnal")
            say("mentem volna. Csak egyetlen kiutat látok: ")
            say()
            wait()

            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Valaki más lesz, aki bosszút áll értük, értem. De")
            say("hogyan küldhetnék több harcost a völgybe,")
            say("kockáztatva azt, hogy ők is belerokkannak? Hogyan")
            say("kérhetném ezt bárkitől is csak azért, hogy újra")
            say("tudjak aludni?")
            say()
            wait()

            say_title(pc.name..":")
            ----"12345678901234567890123456789012345678901234567890|
            say("Nem könnyű egy ilyen döntés.")
            say()
            local s=select("A falu java ...", "Nem lesz könnyű ...", "Nem várhatsz el semmi ilyesmit!")
            if 1 == s then--Mission accept
                say_title(pc.name..":")
                ----"12345678901234567890123456789012345678901234567890|
                say("... fontosabb a gyávaságnál. Bosszút állok az")
                say("embereidért. És ha nem jövök vissza, találkozunk")
                say("ma éjjel!")
                say()
                wait()

                say_title("Kapitány:")
                ----"12345678901234567890123456789012345678901234567890|
                say("Reméltem, hogy ezt fogod mondani. De sajnos nem")
                say("tudom, melyik kínzó vagy idéző ölte meg őket.")
                say("Remélem, érezni fogom, amikor az egyik szellem")
                say("megbocsátott.")
                say("Küldeni fogok egy levelet. A szellemek azt")
                say("mondták, a bosszúra a Sárkányisten Háromszögnél")
                say("kerül sor. Van ott három pillér, amelyek egy")
                say("háromszög csúcsait alkotják.")
                say()
                wait()

                set_skin(NOWINDOW)
                set_state(goto_revenge)
            elseif 2==s then--Mission delayed
                say_title(pc.name..":")
                ----"12345678901234567890123456789012345678901234567890|
                say("... harcost találni a feladatra. Sajnos én most")
                say("nem vállalom. Talán majd később, ha eléggé bízom")
                say("magamban, hogy elbírjak ekkora veszéllyel.")
                say()
                wait()

                say_title("Kapitány:")
                ----"12345678901234567890123456789012345678901234567890|
                say("Teljesen megértelek. Várni foglak, ha felkészültél.")
                say("Addig valahogy kibírom kevés alvással.")
                say("Viszlát.")
                say()
                return
            else--Mission cancelled
                say_title(pc.name..":")
                ----"12345678901234567890123456789012345678901234567890|
                say("Sajnálom, de engem nem érdekelnek a te problémáid.")
                say("Nekem is megvannak a sajátjaim, ráadásul még több")
                say("embert küldeni egy lehetetlen küldetésre... Kizárt!")
                say("A részemről engem teljes mértékben hidegen hagy.")
                say("Keress mást, aki vállalkozik erre az őrültségre.")
                say()
                wait()

                say_title("Kapitány:")
                ----"12345678901234567890123456789012345678901234567890|
                say("Kár, hogy nem segítesz nekem, de megértem....")
                say()
                wait()
                say_title("Információ:")
                say("Valóban elutasítod a küldetést?")
                if select(locale.yes, locale.no) == 2 then
                    say_title("Kapitány:")
                    ----"12345678901234567890123456789012345678901234567890|
                    say("Köszönöm, reméltem hogy meggondolod magad.")
                    say("Beszéljünk újra.")
                    say()
                    return
                else
                    say_title("Kapitány:")
                    ----"12345678901234567890123456789012345678901234567890|
                    say("Remélem akad még valaki a faluban, akinek számít")
                    say("valamit személyem, és segít nekem ebben a dologban.")
                    say("Vagy majd magam intézem ha lesz egy kis szabad")
                    say("időm. Addig meg elviselem valahogy.")
                    say("Na viszlát.")
                    say()
                    wait()

                    set_skin(NOWINDOW)
                    set_state(__GIVEUP__)
                end
            end
        end
    end

    state goto_revenge begin
        when letter begin
            send_letter("Egy jó éjszakai alvás")
        end

        when button or info begin
            say_title("Egy jó éjszakai alvás")
            ----"12345678901234567890123456789012345678901234567890|
            say("A szellemek, akik nyomasztották a Kapitányt,")
            say("fiatal katonák voltak, akik elestek a küldetésük")
            say("alatt. Sötét Idézők, Magas kínzók")
            say("és Magas Idézők ölték meg őket.")
            say("Meg kell semmisítened a Sárkányisten Háromszöget")
            say("alkotó pillérek között a katonák haláláért")
            say("felelős kínzókat és idézőket, hogy megbosszuld")
            say("őket.")
            say()
            say("A Sárkányisten Háromszög a Seugryong-völgy")
            say("közepén van.")
            if subquest_50.is_allowed_place() == true then
                say_reward("Épp a Sárkányisten háromszög területén tartózkodsz.")
            end
            say()
        end

        when 20355.chat.'Egy jó éjszakai alvás' begin
            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Azt hiszem már mindent elmondtam, amit csak")
            say("tudnod érdemes. Most pedig menj és állj")
            say("bosszút a katonáimért.")
            say("A Seugryong völgy közepén van a Sárkányisten")
            say("háromszög. Csak ott tudsz bosszút állni, mivel")
            say("azon a helyen lettek halálra kínozva az embereim.")
            say()
            say_reward("Eddig még senkin nem álltál bosszút.")
            say()
        end

        when 706.kill or 707.kill or 756.kill or 757.kill with subquest_50.is_allowed_place() == true begin
            local n = number(1,50)
            if pc.is_gm() then
                chat("This area is the dragongod triangle, they will be here somewhere.")
                n = number(1,10)
            end
            if n <= 1 then
                set_skin(NOWINDOW)
                set_state(revenge1)
            end
        end
    end

    state revenge1 begin
        when letter begin
            send_letter("Első katona megbosszulva")
        end

        when button or info begin
            say_title("Bosszú a 4 elesettért")
            ----"12345678901234567890123456789012345678901234567890|
            say_reward("Még további 3 katonát kell megbosszulni!")
            say("Úgy tűnik, sikeres voltál. Most hallottam az")
            say("egyik elesett katona hangját. Azt mondta,")
            say("megbocsátott nekem, és meg lett bosszulva a")
            say("halála. És ez mind neked köszönhető!")
            say("Kérlek, bosszuld meg a többi elesett katonát is,")
            say("és ölj Sötét kínzőkat, Sötét Idézőket, Magas")
            say("Kínzókat és Magas Idézőket. Ne feledd, csak a")
            say("Sárkányisten három nagy pillére által közrezárt")
            say("háromszögben tudod szabadon engedni őket.")
            say()
        end

        when 20355.chat.'Egy jó éjszakai alvás' begin
            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Azt hiszem már mindent elmondtam, amit csak")
            say("tudnod érdemes. Most pedig menj és állj")
            say("bosszút a katonáimért.")
            say("A Seugryong völgy közepén van a Sárkányisten")
            say("háromszög. Csak ott tudsz bosszút állni, mivel")
            say("azon a helyen lettek halálra kínozva az embereim.")
            say()
            say_reward("Már egy katona haláláért bosszút álltál.")
            say()
        end

        when 706.kill or 707.kill or 756.kill or 757.kill with subquest_50.is_allowed_place() == true begin
            local n = number(1,100)
            if pc.is_gm() then
                chat("This area is the dragongod triangle, they will be here somewhere.")
                n = number(1,10)
            end
            if n <= 1 then
                set_skin(NOWINDOW)
                set_state(revenge2)
            end
        end
    end

    state revenge2 begin
        when letter begin
            send_letter("Második katona megbosszulva")
        end

        when button or info begin
            say_title("Bosszú a 4 elesettért")
            ----"12345678901234567890123456789012345678901234567890|
            say("Megsemmisítettél egy másikat is a katonáim")
            say("gyilkosai közül! A félhomályban láttam, amint az")
            say("elesett katona a kezét feltartva tisztelgett.")
            say("Kérlek, bosszuld meg a többi elesett katonát is,")
            say("és ölj Sötét kínzőkat, Sötét Idézőket, Magas")
            say("Kínzókat és Magas Idézőket. Ne feledd, csak a")
            say("Sárkányisten három nagy pillére által közrezárt")
            say("háromszögben tudod szabadon engedni őket.")
            say()
        end

        when 20355.chat.'Egy jó éjszakai alvás' begin
            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Azt hiszem már mindent elmondtam, amit csak")
            say("tudnod érdemes. Most pedig menj és állj")
            say("bosszút a katonáimért.")
            say("A Seugryong völgy közepén van a Sárkányisten")
            say("háromszög. Csak ott tudsz bosszút állni, mivel")
            say("azon a helyen lettek halálra kínozva az embereim.")
            say()
            say_reward("Már két katona haláláért bosszút álltál.")
            say()
        end

        when 706.kill or 707.kill or 756.kill or 757.kill with subquest_50.is_allowed_place() == true begin
            local n = number(1,150)
            if pc.is_gm() then
                chat("This area is the dragongod triangle, they will be here somewhere.")
                n = number(1,10)
            end
            if n <= 1 then
                set_skin(NOWINDOW)
                set_state(revenge3)
            end
        end
    end

    state revenge3 begin
        when letter begin
            send_letter("Harmadik katona megbosszulva")
        end

        when button or info begin
            say_title("Bosszú a 4 elesettért")
            ----"12345678901234567890123456789012345678901234567890|
            say("Még egy másik katona is várja, hogy bosszút állj!")
            say("Hihetetlen vagy! Az elesett katona szelleme")
            say("megállt mellettem egy percre, majd búcsút intett.")
            say("Valószínűleg elég nehéz lesz megtalálni az utolsó ")
            say("gyilkost.")
            say("Kérlek, bosszuld meg a többi elesett katonát is,")
            say("és ölj Sötét kínzőkat, Sötét Idézőket, Magas")
            say("Kínzókat és Magas Idézőket. Ne feledd, csak a")
            say("Sárkányisten három nagy pillére által közrezárt")
            say("háromszögben tudod szabadon engedni őket.")
            say()
        end

        when 20355.chat.'Egy jó éjszakai alvás' begin
            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Azt hiszem már mindent elmondtam, amit csak")
            say("tudnod érdemes. Most pedig menj és állj")
            say("bosszút a katonáimért.")
            say("A Seugryong völgy közepén van a Sárkányisten")
            say("háromszög. Csak ott tudsz bosszút állni, mivel")
            say("azon a helyen lettek halálra kínozva az embereim.")
            say()
            say_reward("Már három katona haláláért bosszút álltál.")
            say()
        end

        when 706.kill or 707.kill or 756.kill or 757.kill with subquest_50.is_allowed_place() == true begin
            local n = number(1,300)
            if pc.is_gm() then
                chat("This area is the dragongod triangle, they will be here somewhere.")
                n = number(1,10)
            end
            if n <= 1 then
                set_skin(NOWINDOW)
                set_state(alldead)
            end
        end
    end

    state alldead begin
        when enter begin
            pc.setqf("reward_sb", 50400 + table_get_random_item(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()]))
        end

        when leave begin
            pc.setqf("reward_sb", 0)
            --pc.delqf("reward_sb")
        end

        when letter begin
            send_letter("Egy alvó éjszakai alvás")

            local v=find_npc_by_vnum(20355)
            if v!= 0 then target.vid("__CAPTAIN__", v, mob_name(20355)) end
        end

        when button or info begin
            say_title("Levél a Kapitánytól")
            ----"12345678901234567890123456789012345678901234567890|
            say("Megbosszultad mind a 4 katonát!")
            say("Megtaláltad az utolsó gyilkost is! A négy elesett")
            say("katona közül most jelent meg az utolsó, és")
            say("köszönetet mondott a bátorságodért. Hátrahogyott")
            say("neked valamit: "..item_name(pc.getqf('reward_sb'))..'.')
            say("Látogass meg, hogy megkapd a jutalmad. Itt fogok")
            say("várni rád: "..locale.vileage1_name[pc.get_empire()])
        end

        when 20355.chat.'Egy jó éjszakai alvás' begin
            target.delete("__CAPTAIN__")
            say_title("Kapitány:")
            ----"12345678901234567890123456789012345678901234567890|
            say("Nagyszerű szolgálatot tettél nekem és a")
            say("falvamnak. Itt a jutalom, amit nálam hagyott a")
            say("szellem számodra: "..item_name(pc.getqf('reward_sb')))
            say("És itt egy kis Yang tőlem. Most visszavonulok, és")
            say("végre alszom egy keveset.")
            say("Végtelenül hálás vagyok neked, fiam.")
            wait()

            say_title("Jutalom:")
            say()
            say_reward(item_name(pc.getqf('reward_sb')))
            say_reward("270.000 Yang")
            say()
            wait()

            pc.change_gold(270000)
            pc.give_item2(pc.getqf('reward_sb'), 1)

            clear_letter()
            set_skin(NOWINDOW)
            set_state(__COMPLETE__)
        end
    end

    state _FUNC_ begin
        --For the Dragongod Triangle
        --[[
        #Exapmle to test my idea in python :D
        import os

        test = open("test.txt", "w")
        temp = []
        for y in xrange(1500):
            line = ''
            for x in xrange(1500):
                if (x >= 610 and y >= 670) and (x <= 900 and y <= 905):
                    line += ' '
                else:
                    line += 'X'
            temp.append(line)

        test.write('\n'.join(temp))
        test.close()
        os.system("pause")
        ]]
        function is_allowed_place()
            if pc.get_map_index() == 64 then
                local x, y = pc.get_local_x(), pc.get_local_y()
                if (x >= 610 and y >= 670) and (x <= 900 and y <= 905) then
                    return true
                else
                    return false
                end
            else
                return false
            end
        end
    end

    state __GIVEUP__ begin
    end

    state __COMPLETE__ begin
    end
end