[Quest] Inel de Teleportare Avansat Cu Limită!

Deconectat
Avatar utilizator
Mikkelsen
Mister Just4Metin
Mister Just4Metin
Mesaje: 2423
Membru din: 06 Mar 2014
Localitate: Târgu Mureş
Reputație: :::Designer:::
:::Fost Super Ad Moderator:::
:::Fost Ad Moderator:::
:::Fost Super Moderator:::
:::Fost Lider Moderatori:::
:::Fost Lider Helperi:::
Server Metin2: ETH
Regat: Jinno
Mulțumiri acordate: 12
Mulțumiri primite: 17
Contact:

[Quest] Inel de Teleportare Avansat Cu Limită!

Mesajde Mikkelsen » 12 Noi 2014, 14:06

Salutare Just4Metin.

Am găsit un quest pentru inelul de teleport care are o limită de 50 de teleportări.
M-am gândit însă şi v-aş da un sfat ca acest inel să îl puneţi să pice din cufărul ucenic de nivel 50 sau 60,depinde din care doriţi voi să pice!

Cod: Selectaţi tot

-------------------------------
-- SERVERFILE BY HOPE v2
-------------------------------
quest warp_ring begin
   state start begin
      when 70007.use begin
         local x
         local y
         local t
         local e = pc.get_empire()
         
         if pc.getqf("warp_ring") == 0 then
            say_title("Inel teleportare")
            say("")
            say("Acest inel te ajută să te teleportezi")
            say("în aproape orice loc dorit, gratis.")
            say("Un inel poate fi folosit doar de 50 de ori")
            say("")
            pc.setqf("warp_ring",1)
            pc.setqf("warps",50)   
            return
         end
         
         if pc.getqf("warps") <= 0 then
            say_title("Inel teleportare")
            say("")
            say("Nu mai poţi folosi acest inel.")
            say("")
            pc.remove_item(item.vnum)
            pc.setqf("warp_ring",0)
            return
         end

         if pc.getqf("warp_ring") == 1 then
         say("Unde vrei să te teleportezi?")
         say_reward("Teleportări rămase: "..pc.getqf("warps"))
         say_size(350, 350)

         local s = select("Satul 1","Satul 2","Valea Seungryong","Deşertul Yongbi","Muntele Sohan","Ţara de foc","Următoarele","Închide")
         if s==7 then
            say("Unde vrei să te teleportezi?")
            say_reward("Teleportări rămase: "..pc.getqf("warps"))
            say_size(350, 350)
            local p = select("Turnul Demonilor","Kuahlo Dong","Lungsam","Pădurea Roşie","Ţărâmul Giganţilor","Grota Exilului","Temniţa Maimuţelor","Închide")
         
            if p==1 then   -- Turnul Demonilor
               x="590400" y="110500"      
               
            elseif p==2 then   -- Kuahlo Dong (V2)         
               x="91900" y="525400" 
               
            elseif p==3 then   -- Lungsam
               x="289000" y="5800"   
               
            elseif p==4 then   -- Pădurea Rosie
               say_size(350, 180)
               t = select("Început","Sfârşit","Închide")            
               if t==1 then
                  x="1119900" y="70800"                  
               elseif t==2 then
                  x="1119200" y="7000"
               elseif t==3 then      
                  return
               end
               
            elseif p==5 then -- Tărâmul Gigantilor
               x="828100" y="763400"
               
            elseif p==6 then -- Grota Exilului
               x="284200" y="809600"
                     
            elseif p==7 then -- Temniţa Maimuţelor
               say_size(350, 200)
               t = select("Temniţa Maimuţelor Începător","Temniţa Maimuţelor Normal","Temniţa Maimuţelor Avansat","Închide")
               
               if t==1 then               
                  local empire = pc . get_empire ( )
                     if empire == 1 then
                  x="768000" y="435200"
                     elseif empire == 2 then
                  x="844800" y="435200"
                     elseif empire == 3 then
                  x="921600" y="435200"            
               end
               
               elseif t== 2then    
                  x="128000" y="640000"                  
               elseif t==3 then   
                  x="128000" y="716800"
               elseif t==4 then   
                  return
               end
                              
            elseif p==8 then
               return                                    
            end            
      
         elseif s==1 then -- Satul 1
            say_size(350, 200)
            t = select("Ţinutul Yongan","Ţinutul Joan","Ţinutul Pyungmoo","Închide")
            if t==1 then
               x="473900" y="954600"               
            elseif t==2 then
               x="63200" y="166700"               
            elseif t==3 then
               x="959600" y="269700"   
            elseif t==4 then
               return      
            end
            
         elseif s==2 then -- Satul 2
            say_size(350, 200)
            t = select("Ţinutul Yayang","Ţinutul Bokjung","Ţinutul Bakra","Închide")
            if t==1 then
               x="352300" y="882700"               
            elseif t==2 then
               x="145700" y="239800"               
            elseif t==3 then
               x="863800" y="246000"      
            elseif t==4 then
               return                     
            end
            
         elseif s==3 then -- Valea Seungryong
            say_size(350, 200)
            t = select("Început","Mijloc","Închide")
            if t==1 then
               if e==1 then
                  x="402100" y="673900"                                    
               elseif e==2 then
                  x="270400" y="739900"                  
               elseif e==3 then
                  x="321300" y="808000"      
               elseif e==4 then
                  return                     
               end               
            elseif t==2 then
               x="332700" y="745600"      
            elseif t==3 then
               return               
            end
            
         elseif s==4 then -- Deşertul Yongbi
            say_size(350, 180)
            t = select("Început","Mijloc","Închide")
            if t==1 then
               if e==1 then
                  x="217800" y="627200"                                  
               elseif e==2 then
                  x="221900" y="502700"                  
               elseif e==3 then
                  x="344000" y="502500"                  
               end         
            elseif t==2 then
               x="296300" y="547500"   
            elseif t==3 then
               return                     
            end
            
         elseif s==5 then -- Muntele Sohan
            say_size(350, 180)
            t = select("Început","Mijloc","Închide")
            if t==1 then
               if e==1 then
                  x="434200" y="290600"                                 
               elseif e==2 then
                  x="375200" y="174900"                  
               elseif e==3 then
                  x="491800" y="173600"               
               end
               
            elseif t==2 then
               x="436200" y="215300"   
            elseif t==3 then
               return                     
            end      
   
         elseif s==6 then -- Ţara de foc
            say_size(350, 150)
            t = select("Început","Închide")
            if t==1 then
               if e==1 then
                  x="599400" y="756300"                                    
               elseif e==2 then
                  x="597800" y="622200"               
               elseif e==3 then
                  x="730700" y="689800"                  
               end               
            elseif t==2 then
               return
            end
      
         elseif s==8 then
            return
         end
      end
      
         pc.warp(x,y)
         pc.setqf("warps", pc.getqf("warps") - 1)
      
      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 .
Ultima oară modificat 25 Apr 2016, 18:02 de către Yahiko, modificat de 2 ori în total.
Motiv: .

Deconectat
Avatar utilizator
Cryptex
Fost Super Moderator
Fost Super Moderator
Mesaje: 834
Membru din: 12 Mar 2014
Localitate: Ineu
Status: Respect !
Server Metin2: SF CryptexV2 comming
Regat: Shinsoo
Mulțumiri acordate: 0
Mulțumiri primite: 28
Contact:

Re: [Quest] Inel de Teleportare Avansat Cu Limită!

Mesajde Cryptex » 12 Noi 2014, 20:49

... Nu prea merge..
Abort (core dumped)

Deconectat
Avatar utilizator
Sociopath
Super Ad Mod
Super Ad Mod
Mesaje: 1971
Membru din: 03 Sep 2014
Localitate: Bravos
Reputație: ﭸ S.Ad.Moderator
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
ﭸ Fost lider Helperi si Trial Helperi
ﭸ Fost Ad.Moderator
ﭸ Fost S.Moderator
ﭸ Fost Moderator
ﭸ Fost Helper
▬▬▬▬▬▬▬▬
ﭸ Old dawg
ﭸ Băştinaş
ﭸ Human after all...
▬▬▬▬▬▬▬▬
ﭸ Sătul de PCR
Nume anterior: h u m a n, .Ragnar
Status: ▬▬▬▬▬▬
Server Metin2: ▬▬▬▬▬▬
Mulțumiri acordate: 19
Mulțumiri primite: 19
Contact:

Re: [Quest] Inel de Teleportare Avansat Cu Limită!

Mesajde Sociopath » 08 Iul 2015, 00:49

Mutat în quest-uri!

[ Mesaj scris via Android ] Imagine
Imagine
Imagine

Deconectat
Avatar utilizator
nickjack77
Utilizator interzis !
Utilizator interzis !
Mesaje: 88
Membru din: 06 Iun 2014
Status: Sunt Bine dispus
Server Metin2: Metinul Meu :>
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: [Quest] Inel de Teleportare Avansat Cu Limită!

Mesajde nickjack77 » 08 Iul 2015, 09:09

Cryptex scrie:... Nu prea merge..
Abort (core dumped)

si mei la fel =]
In Jurul meu , Toti sare , dar cand privesc , Imi aduc aminte.


Imagine

Deconectat
Avatar utilizator
Metin2Kingston
Nivel 1
Nivel 1
Mesaje: 70
Membru din: 20 Iun 2015
Status: Sunt bine mersi ^.^
Server Metin2: Metin2 Kingston.Com
Regat: Chunjo
Mulțumiri acordate: 8
Mulțumiri primite: 2

Re: [Quest] Inel de Teleportare Avansat Cu Limită!

Mesajde Metin2Kingston » 10 Sep 2015, 16:32

Nu merge =)) =)) =)) =))

Deconectat
Avatar utilizator
BurNnN
Nou Venit
Nou Venit
Mesaje: 40
Membru din: 31 Aug 2015
Status: www.mt2addicted.com
Server Metin2: www.mt2addited.com
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: [Quest] Inel de Teleportare Avansat Cu Limită!

Mesajde BurNnN » 10 Sep 2015, 23:19

Super , felicitari ! imi place !


Înapoi la “Quest-uri”

Cine este conectat

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