Inelul jucatorului

Deconectat
Avatar utilizator
Western
Nivel 3
Nivel 3
Mesaje: 339
Membru din: 30 Iul 2013
Localitate: Craiova
Status: Va urma ...
Mulțumiri acordate: 0
Mulțumiri primite: 14
Contact:

Inelul jucatorului

Mesajde Western » 10 Iun 2014, 23:09

Salutare, mai jos aveti un quest pentru a va crea un panoul al utilizatorului, ce poate fi folosit de fiecare jucator de pe orice server.

Questul contine urmatoarele:

Teleportare
Imagine

Banca
Imagine

Cod: Selectaţi tot

quest userpannel begin
    state start begin
        when 30003.use begin
      say_title("Panoul utilizatorului:")
      say("Fiecare utilizator al acestui inel beneficiaza")
      say("de urmatoarele:")
      say_reward("Banca")
      say_gold(">Ideal pentru depozitarea yang-ului.")
      say_reward("Depozit")
      say_gold(">Un mod mai simplu pentru depozitarea obiectelor.")
      say_reward("Teleportare")
      say_gold(">Ai o distanta lunga de parcurs si ti-e lene?")
         local main_set33 = select("Banca","Deschide depozitul","Teleportare","Iesire")
         if main_set33 == 1 then
         say_title("Banca:")
         say("Doresti sa-ti pastrezi yang-ul pentru ocazii")
         say("mai importante? La noi totul iti va fi totul")
         say("garantat. Yang-ul depus va fi pastrat in")
         say("siguranta.")
         say("")
            local action = select("Alimentare cont", "Extrage din cont", "Inchide")
            if action == 1 then
                say_title("Banca:")
                if pc.gold < 1 then
                    say("Nu aveti niciun yang.")
                    say("")
                    return
                end
                say("Detii "..pc.gold.." Yang.")
                say("Cat de mult vrei sa adaugi in cont?")
                local yang = tonumber(input())
                if yang < 0 then
                    return
                end
                if yang > pc.gold then
                    yang = pc.gold
                end
                pc.changegold(-yang)
                local saved_rest = tonumber(pc.getqf("saved_rest"))
                local saved_signed_longs = tonumber(pc.getqf("saved_signed_longs"))
                if saved_rest + yang > 2147483647 then
                    pc.setqf("saved_signed_longs", saved_signed_longs + 1)
                    pc.setqf("saved_rest", saved_rest + yang - 2147483647)
                else
                    pc.setqf("saved_rest", saved_rest + yang)
                end
                say_title("Banca:")
                say("Ai adaugat in cont "..yang.." yang.")
                say("")
                return
            elseif action == 2 then
                local saved_rest = tonumber(pc.getqf("saved_rest"))
                local saved_signed_longs = tonumber(pc.getqf("saved_signed_longs"))
                local saved_yang = saved_signed_longs*2147483647+saved_rest
                say_title("Banca:")
                if saved_yang < 1 then
                    say("Nu poti adauga aceasta suma in cont!")
                    return
                end
                say("Va puteti extrage yangul din cont")
                say("oricand vreti ยบi aveti posibilitatea.")
                say("")
                say_reward("Soldul contului: "..saved_yang.." Yang")
                say("")
                say("Cat yang doriti sa extrageti?")
                local yang = tonumber(input())
                if yang < 0 then
                    return
                end
                if yang > saved_yang then
                    yang = saved_yang
                end
                if pc.gold + yang > 1899999999 then
                    yang = 1899999999 - pc.gold
                end
                if yang > saved_yang then
                    yang = saved_yang
                end
                if saved_rest - yang < 0 then
                    pc.setqf("saved_signed_longs", saved_signed_longs - 1)
                    pc.setqf("saved_rest", 2147483647 - yang + saved_rest)
                else
                    pc.setqf("saved_rest", saved_rest - yang)
                end
                pc.changegold(yang)
                say_title("Banca:")
                say("Ati extras din cont "..yang.." yang.")
            say("Multumim!")
                say("")
            end
         end
         
         if main_set33 == 2 then
            game.open_safebox()
         end
         
         if main_set33 == 3 then
         local map = pc.get_map_index()
         local empire = pc.get_empire()
         local level = pc.get_level()
         local cost = math.floor(level / 5) * 1000

         -- ?? ????
         if cost < 1000 then
            cost = 1000
         end

         say_title("Teleporter:")
         say("Unde vrei sa te teleportezi?")
         say_reward(string.format("Te costa %d Yang.", cost))

         -- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
         if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then

            local guild_map_names = {
               "Zona Breslei",
               "Zona Breslei",
               "Zona Breslei",
            }

            guild_map_name = guild_map_names[empire]
            local empire_castle={
               "Lupta Regatelor",
               "Lupta Regatelor",
               "Lupta Regatelor",
            }
            empire_castle =empire_castle[empire]
            local sub_set = 0
            if level < 60 then -- 60?? : ?????, ???, ????, ???
               sub_set = select(guild_map_name, "Valea Seungryong", "Desertul Yongbi", "Muntele Sohan", "Inchide")
               if sub_set == 5 then -- ??
                  return
               end

            else -- 61?? : ????, ???, ????, ????
               sub_set = select(guild_map_name, "Valea Seungryong", "Desertul Yongbi", "Muntele Sohan", "Pagina urmatoare")
               if sub_set == 5 then -- ??
                  say_title("Teleporter:")
                  say("Unde vrei sa te teleportezi?")
                  say_reward(string.format("Te costa %d Yang.", cost))
                  sub_set = select("Tara de foc", "Turnul demonilor", "Cave2", "Padurea rosie", "Pagina anterioara", "Inchide") + 4
                  if sub_set == 10 then -- ??
                     return
                  end
                  if sub_set == 9 then -- ??
                     say_title("Teleporter:")
                     say("Unde vrei sa te teleportezi?")
                                     ---                                                   l
                     say_reward(string.format("Te costa %d Yang.", cost))
                     sub_set = select(guild_map_name, "Valea Seungryong", "Desertul Yongbi", "Muntele Sohan", "Pagina urmatoare")
                     if sub_set == 5 then -- ??
                        say_title("Teleporter:")
                        say("Unde vrei sa te teleportezi?")
                        say_reward(string.format("Te costa %d Yang.", cost))
                        sub_set = select("Tara de foc", "Turnul demonilor", "Cave2", "Padurea rosie", "Inchide") + 4
                        if sub_set == 9 then -- ??
                           return
                        end
                     end
                  end
               end
            end

            if pc.gold < cost then
               say("Nu ai suficient Yang")
               say_title("Teleporter:")
               say("Te-as teleporta si pe gratis, dar")
               say("am familie numeroasa, si ca sa o intretin")
               say("trebuie sa castig...")
               say_reward(string.format("Te costa %d Yang.", cost))
               return
            end

            pc.changegold(-cost)

            local warp = {
                    -- guild_map
                    {
                        { 128500, 1000 },
                        { 179500, 1000 },
                        { 271800, 13000 },
                    },
                    -- 64 map_n_threeway
                    {
                        { 402100, 673900 },
                        { 270400, 739900 },
                        { 321300, 808000 },
                    },
                    -- 63 metin2_map_n_desert_01
                    {
                        { 217800, 627200 },
                        { 221900, 502700 },
                        { 344000, 502500 },
                    },
                    -- 61 map_n_snowm_01
                    {
                        { 434200, 290600 },
                        { 375200, 174900 },
                        { 491800, 173600 },
                    },
                    -- 62 metin2_map_n_flame_01
                    {
                        { 599400, 756300 },
                        { 597800, 622200 },
                        { 730700, 689800 },
                    },
                    -- devil_tower
                    {
                        { 590500, 110500 },
                        { 590500, 110500 },
                        { 590500, 110500 },
                    },
               -- cave2
               {
                  { 704200, 463300 },
                  { 704200, 463300 },
                  { 704200, 463300 },
               },
               -- red_forest
                    {
                        { 1119900, 70800 },
                        { 1119900, 70800 },
                        { 1119900, 70800 },
                    },
            }
            test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
            say_title("Teleporter:")
            say("Vei fii teleportat intr-un loc periculos.")
            say("Ai grija de tine!")
            say("Mult noroc!")
            wait()
            pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
         

         else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??   
            local sub_set2 = 3

            --sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
            if empire==1 then   
               sub_set2 = select("Yongan","Jayang" , locale.cancel)
            elseif  empire ==2 then 
               sub_set2 = select("Joan","Bokjung" , locale.cancel)
            elseif  empire ==3 then
               sub_set2 = select("Pyungmoo","Bakra" , locale.cancel)
            end   
            if sub_set2 != 3 then
               if pc.gold < cost then
                  say_title("Teleporter:")
                  say("Te-as teleporta si pe gratis, dar")
                  say("am familie numeroasa, si ca sa o intretin")
                  say("trebuie sa castig...")
                  say_reward(string.format("Te costa %d Yang.", cost))
               else
                  if sub_set2 == 1 then
                     say_title("Teleporter:")
                     say("Vei fii teleportat.")
                     wait()

                     if empire == 1 then
                        pc.warp(474300,954800)
                     elseif empire == 2 then
                        pc.warp(63800,166400)
                     elseif empire == 3 then
                        pc.warp(959900,269200)
                     end   
                  elseif sub_set2 == 2 then
                     say_title("Teleporter:")
                     say("Vei fii teleportat.")

                     wait()
                     if empire == 1 then
                        pc.warp(353100,882900)
                     elseif empire == 2 then
                        pc.warp(145500,240000)
                     elseif empire == 3 then
                        pc.warp(863900,246000)
                     end   
                  end

                  pc.changegold(-cost)
               end
            end
         end
      end
   end
end
end

Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q.
6. Testaţi quest-ul.

Deconectat
Avatar utilizator
M.Seby
Utilizator interzis !
Utilizator interzis !
Mesaje: 3013
Membru din: 10 Sep 2013
Localitate: Suceava
Reputație: Fost Administrator
Fost Organizator echipă
Status: Sunt bine mersi ^.^
Server Metin2: Not Found
Regat: Jinno
Mulțumiri acordate: 1
Mulțumiri primite: 9
Contact:

Re: Inelul jucatorului

Mesajde M.Seby » 08 Iul 2015, 08:49

Mutat în altele!
Imagine

Contact:

Skype: seby_061

Deconectat
Avatar utilizator
stefan2256
Nou Venit
Nou Venit
Mesaje: 7
Membru din: 24 Oct 2015
Status: Sunt bine mersi ^.^
Server Metin2: metin2
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: Inelul jucatorului

Mesajde stefan2256 » 07 Dec 2015, 18:35

Il Instalez si eu ;;)

Conectat
Avatar utilizator
Yahiko
Moderator
Moderator
Mesaje: 2717
Membru din: 25 Mai 2015
Localitate: Arad
Reputație: ___________________________
► Super Ad Moderator
► Lider Helperi Experimentați
► Lider Helperi Avansați
► Lider Moderatori
► Lider Trial Moderator
► Lider Mister
► Membru Club
► Fost Ad-moderator
► Fost Super-moderator
► Fost Moderator
► Fost lider Trial Helperi
► Fost lider Helperi
► Fost Helper
-----------------------------------------------
Nume anterior: Zancrow, Natsu,.Mystogan
___________________________
Server Metin2: Loading. . .
Regat: Shinsoo
Autentificat prin: Android
Mulțumiri acordate: 0
Mulțumiri primite: 39
Contact:

Re: Inelul jucatorului

Mesajde Yahiko » 07 Dec 2015, 20:55

Mutat în Questuri

Deconectat
Avatar utilizator
ionel17
Nivel 1
Nivel 1
Mesaje: 134
Membru din: 28 Dec 2013
Status: Cautator
Server Metin2: Lucrez la el [JUP-M]
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: Inelul jucatorului

Mesajde ionel17 » 30 Dec 2015, 01:53

Daca vreau sa modific ceva in el nu se strica nimika
[*][**][*][Imagine][*] [**] [*]

******************************************************************

Imagine

Deconectat
Avatar utilizator
imposssibl3
Nivel 3
Nivel 3
Mesaje: 308
Membru din: 23 Mar 2014
Localitate: Craiova
Status: ImPosSsIbL3
Server Metin2: :)
Regat: Shinsoo
Mulțumiri acordate: 13
Mulțumiri primite: 3
Contact:

Re: Inelul jucatorului

Mesajde imposssibl3 » 08 Ian 2016, 05:05

Merge Perfect Ms.
Imagine


Înapoi la “Quest-uri”

Cine este conectat

Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 4 vizitatori