cerere quest o magie de la g la p

Închis
Avatar utilizator
.ShadoW
Nivel 4

Nivel 4
Mesaje: 659
Membru din: 14 Noi 2013, 17:54
Server: not yet..
Regat: Jinno
Aprecieri: 379  
Mulţumiri: 32  
Medalii

salutare!
As dori si eu daca se poate un quest pentru piatra curcubeu .
Vreau sa fac un pvm hard si vreau ca la piatra curcubeu , daca ai magii g , sa iti faca una la alegere , P, dupa care iti sterge piatra din inventar !
Multumesc anticipat!
Imagine
Afișează semnătura
Avatar utilizator
.ShadoW
Nivel 4

Nivel 4
Mesaje: 659
Membru din: 14 Noi 2013, 17:54
Server: not yet..
Regat: Jinno
Aprecieri: 379  
Mulţumiri: 32  
Medalii

up
Imagine
Afișează semnătura
Avatar utilizator
WashingtoN.
Nivel 5

Nivel 5
Mesaje: 844
Membru din: 05 Aug 2015, 12:15
Regat: Shinsoo
Aprecieri: 0
Mulţumiri: 25  
Medalii

Cod: Selectaţi tot

       quest regenbogen begin
            state start begin
                    when 50512.use  begin
                    pc.removeitem("50512", 1)
               
                        say_title("Piatra curcubeu")
                        say("Aceasta piatra va poate face")
                        say("magiile perfecte.")
                       
                        if pc.job ==0 then
                        say("Alegeti competentele dvs.")
                       
                        local s=select("Corp","Mental")
                       
                        if s==1 then
                        --Corp
                        pc.set_skill_group(1)
                        pc.set_skill_level(1 ,59)
                        pc.set_skill_level(2 ,59)
                        pc.set_skill_level(3 ,59)
                        pc.set_skill_level(4 ,59)
                        pc.set_skill_level(5 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        if s==2 then
                        --Mental
                        pc.set_skill_group(2)
                        pc.set_skill_level(16 ,59)
                        pc.set_skill_level(17 ,59)
                        pc.set_skill_level(18 ,59)
                        pc.set_skill_level(19 ,59)
                        pc.set_skill_level(20 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        elseif pc.job ==1 then
                        say("Alegeti competentele dvs.")
                       
                        local s=select("Lame","Arc")
                       
                        if s==1 then
                        --Lame
                        pc.set_skill_group(3)
                        pc.set_skill_level(31 ,59)
                        pc.set_skill_level(32 ,59)
                        pc.set_skill_level(33 ,59)
                        pc.set_skill_level(34 ,59)
                        pc.set_skill_level(35 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        if s==2 then
                        --Arc
                        pc.set_skill_group(4)
                        pc.set_skill_level(46 ,59)
                        pc.set_skill_level(47 ,59)
                        pc.set_skill_level(48 ,59)
                        pc.set_skill_level(49 ,59)
                        pc.set_skill_level(50 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        elseif pc.job ==2 then
                        say("Alegeti competentele dvs.")
                        local s=select("Magie","Arme")
                       
                        if s==1 then
                        --Magie
                        pc.set_skill_group(5)
                        pc.set_skill_level(76 ,59)
                        pc.set_skill_level(77 ,59)
                        pc.set_skill_level(78 ,59)
                        pc.set_skill_level(79 ,59)
                        pc.set_skill_level(80 ,59)
                        pc.set_skill_level(81, 59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        if s==2 then
                        --Arme
                        pc.set_skill_group(6)
                        pc.set_skill_level(61 ,59)
                        pc.set_skill_level(62 ,59)
                        pc.set_skill_level(63 ,59)
                        pc.set_skill_level(64 ,59)
                        pc.set_skill_level(65 ,59)
                        pc.set_skill_level(66 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        elseif pc.job ==3 then
                        say("Alegeti competentele dvs.")
                        local s=select("Vindecare","Dragon")
                       
                        if s==1 then
                        --Vindecare
                        pc.set_skill_group(7)
                        pc.set_skill_level(106 ,59)
                        pc.set_skill_level(107 ,59)
                        pc.set_skill_level(108 ,59)
                        pc.set_skill_level(109 ,59)
                        pc.set_skill_level(110 ,59)
                        pc.set_skill_level(111 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                       
                        if s==2 then
                        --Dragon
                        pc.set_skill_group(8)
                        pc.set_skill_level(91 ,59)
                        pc.set_skill_level(92 ,59)
                        pc.set_skill_level(93 ,59)
                        pc.set_skill_level(94 ,59)
                        pc.set_skill_level(95 ,59)
                        pc.set_skill_level(96 ,59)
                        say("Competentele dvs. sunt perfecte")
                        end
                    end
                end
            end
        end
Instalare:
1. Se creeaza un text cu numele piatra_curcubeu.quest
2. Va conectati la filezilla / winscp si intrati in /usr/home/game/share/locale/turkey/quest (depinde ce server aveti).
3. Il puneti acolo (sa fie .quest) si da-ti permisiuni 777
4. Te loghezi in FreeBSD / putty si scri asa cd /usr/home/game/share/locale/turkey/quest apoi ./qc piatra_curcubeu.quest
5. Intrati pe server si scrieti /reload q apoi /item 50512 si va faceti skillurile P

Succes :P
Pentru acest mesaj, WashingtoN. for the post:
.ShadoW
Imagine
Afișează semnătura
Avatar utilizator
.ShadoW
Nivel 4

Nivel 4
Mesaje: 659
Membru din: 14 Noi 2013, 17:54
Server: not yet..
Regat: Jinno
Aprecieri: 379  
Mulţumiri: 32  
Medalii

apreciez dar eu m-am referit la altceva!
Gen daca ai magii m sa nu te lase sa o folosesti
daca ai magii g sa te intrebe pe care vrei sa o faci p ,una la alegere
Imagine
Afișează semnătura
Avatar utilizator
Zerant :3
Nivel 4

Nivel 4
Mesaje: 723
Membru din: 17 Oct 2015, 12:53
Server: Velor2
Regat: Jinno
Aprecieri: 15  
Mulţumiri: 141  
Discord: Copiază ID
Medalii

Posibil asta te ajuta:
il bagi direct in object cod item /use / .start
exemplu:
40003/use/folderul.start

Cod: Selectaţi tot

local regencount = pc . count_item ( 50512 ) 
say_title ( "Perfect master" ) 
if pc . get_skill_group ( ) == 0 then 
say ( "Nu aveti abilitati " .. pc . get_skill_group ( ) ) 
return 
end 
local result = training_grandmaster_skill . BuildGrandMasterSkillList ( pc . get_job ( ) , pc . get_skill_group ( ) ) 
local vnum_list = result [ 1 ] 
local name_list = result [ 2 ] 
if table . getn ( vnum_list ) == 0 then 
say ( "Nu aveti abilitati" ) 
return 
end 
say ( "Selectati Skilul" ) 
say ( "" ) 
local menu_list = { } 
table . foreach ( name_list , function ( i , name ) table . insert ( menu_list , name ) end ) 
table . insert ( menu_list , "Anuleaza" ) 
local s = select_table ( menu_list ) 
if table . getn ( menu_list ) == s then 
return 
end 
local skill_name = name_list [ s ] 
local skill_vnum = vnum_list [ s ] 
local skill_level = pc . get_skill_level ( skill_vnum ) 
say ( "Piatra curcubeu va ajuta sa faceti" ) 
say ( "Un skill la P" ) 
say ( "Vreti sa Continuati?" ) 
local s = select ( "Da" , "Nu" ) 
if s == 2 then 
return 
end 
if pc . count_item ( 50512 ) ~= regencount then 
say ( ".........." ) 
return 
end 
pc . remove_item ( 50512 , 1 ) 
pc . set_skill_level ( skill_vnum , 59 ) 
say ( "Felicitari![ENTER]" ) 
say ( "Skilul " .. skill_name .. " afost facut cu succes" ) 
say_reward ( " " .. skill_name .. " e acuma Perfect" ) 
Avatar utilizator
Ankhed
Fost Super Ad Moderator

Fost Super Ad Moderator
Mesaje: 2130
Membru din: 22 Noi 2015, 13:00
Aprecieri: 42  
Mulţumiri: 45  
 Contact:
Medalii

Subiect vechi, arhivat
Imagine
Afișează semnătura
Închis

Înapoi la “Arhivă”

  • Informaţie
  • Cine este conectat

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