Posts by Piciul- [Legacy 3554]

quest redragon begin
    state start begin
        when login with pc.level >= 95 begin
            set_state(information)
        end
    end

    state information begin
        when letter begin
            send_letter("Omoara Dragonul Rosu")
        end

        when info or button begin
            say("Omoara Dragonul Rosu")
            say("Dragonul rosu a aparut si nu poate fi stapanit avem nevoie de ajutorul tau .")
            say("Trebuie sa il omori .")
            say("Ajuta-ne sa nu murim toti .Ucide Dragonul")
            say("Sper ca ne vei ajuta")
            say_reward("Vei primi 200 Binecuvantarea Vietii ,200 Binecuvantarea Manei , 25kk Experienta , 250kk Yang")
            say("")
            pc.setqf("state", 1)
            q.set_counter("Omoara Dragonul Rosu ", 1)
        end

        when 2291.kill begin
            local count = pc.getqf("state") - 1
            if count <= 1 then
                pc.setqf("state", count)
                q.set_counter("Omoara Dragonul Rosu  ", count)
            end
            if count == 0 then
                say_title("Dragonul rosu")
                say("Bravo Misiune completa!")
                say("Ca si BONUS vei primi LEU de calarie.")
                say_reward("Rasplata :")
            say_reward("Binecuvantarea Vietii")
                say_reward("30 Level cal")
                say_reward("Binecuvantarea Manei ")
                say_reward("Exp : 250000000")
                say_reward("Yang : 25000000")
                pc.change_money(25000000)
                pc.give_exp2(250000000)
                pc.give_item2(71020, 200)
                pc.give_item2(71019, 200)
                pc.give_item2(71120, 1)
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end

    state __COMPLETE__ begin
    end
end

Instalare:

1. Creezi un fişier text cu numele 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 .

quest ingamebann2 begin 
    state start begin 
        when ITEM_ID.use with pc.is_gm() begin 
            say("Ce doriti sa faceti?") 
            local s = select('Sa banez','Sa debanez',"Anuleaza") 
            if s == 3 then return end 
            local ban,bantxt,bantxt2 = "BLOCK","Banir","Banir" 
            if s == 2 then 
                ban,bantxt,bantxt2 = "OK","Desbanir","Desbanido" 
            end 
            say(col.blue('Player '..bantxt)); say('[Introdu]numele jucatorului.[Introdu](Sau doar tastati o parte a numelui, dupa care toate apar în aceasta parte a numelui.)') 
            local inp = input(); inp = mysql_escape(inp) 
            if inp == "" or inp == pc.get_name() then 
                say(col.red('Nome inválido![ENTER]Crash!')) 
                return 
            end 
            local q = mysql_query('select * from player.player WHERE name LIKE \\"%'..inp..'%\\" AND name NOT like \\"%[%\\"') 
            if q == "ERROR" then 
                say(col.red('Eroare la citirea datelor, sau altfel nu exista nici un personaj cu acest nume.')) 
                return 
            end 
            say('Utilizatorul care doresti '..bantxt2..' sa fie:') 
            local wahl = q.name; table.insert(wahl,"Anuleaza") 
            table.insert(wahl,1,6)      -- 6 este numarul maxim de utilizatori pe o pagina.
            local auswahl = select2(wahl) 
            if wahl[auswahl] == "Anuleaza" then return end 
            say('Jucatorul \\"'..q.name[auswahl]..'\\" é para '..bantxt..'?') 
            if select("Sim","Não") == 2 then return end 
            mysql_query('UPDATE account.account SET status = \\"'..ban..'\\" WHERE id = '..q.account_id[auswahl]..' LIMIT 1') 
            say('Executa ac?iunea pe Player!') 
        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 .

quest energy_system begin
    state start begin
      when 20001.chat."O nouă descoperire" with game.get_event_flag("energy") == 1 begin         
            say_title("Alchimist:")
            say("")
            say("Nu-mi vine să cred! Am reuşit!")
            say("În sfârsit am creat noul sistem de energie pură.")
            say("Am să îti spun cum, fii atent. Această energie stă ")
            say("în jurul fiecăruia. Am încercat să extrag această ")
            say("energie din arme şi armuri. A fost foarte dificil")
            say("dar am reuşit, în sfârsit!")
            say("")
            wait()               
            say_title("Alchimist:")
            say("")
            say("Dacă cumva eşti interesat de acest sistem, adu-mi")
            say("arme şi armuri pentru a le transforma în fragmente")
            say("de energie. Dacă vei avea noroc, voi face ca aceste")
            say("fragmente ce le-ai adunat să se unească între ele")
            say("şi se for transforma într-un cristal de energie.")
            say("Sper că acest sistem va ajuta multă lume.")   
            say("")
            set_state("make")         
         end
      end   
    state make begin
        when 20001.chat."Informaţii despre fragmentele de energie" with game.get_event_flag("energy") == 1 begin      
         say_title("Alchimist:")
         say("")
            say("Acum ştii cum funcţionează. Aceste obiecte pe")
         say("care mi le aduci le voi transforma în Fragmente")
         say("de Energie si nu le vei mai putea folosi.")
         say("Energia extrasă din ele îţi va oferi un bonus")
         say("aleatoriu timp de 2h. Ca să faci Fragmente de")
         say("Energie trebuie să ai minim nivelul 35.")         
         say("")
            wait()         
            if pc.get_level() < 35 then         
            say_title("Alchimist:")
            say("")
            say("Oh, îmi pare rău, dar trebuie să ai nivelul 35")
            say("pentru a putea crea Energie Pură.")   
            say("")
            else          
            say_title("Alchimist:")
            say("")
                say("Perfect! Se pare că ai nivelul necesar pentru a")
            say("crea energie pură.")         
            say("")
            end           
        end        
        when 20001.chat."Obţine fragmente de energie" with game.get_event_flag("energy") == 1 begin      
         say_title("Alchimist:")
         say("")
         say("Pentru a face energie pură ai nevoie de cel puţin")
         say("30 fragmente de energie.")
         say("")
         wait()
            if pc.get_level() < 35 then         
            say_title("Alchimist:")
            say("")
                say("Oh, ce păcat, nu ai nivelul 35 pentru a putea")
            say("crea energie pură.")    
            say("")
            else
                if pc.count_item(51001) >= 30 then            
               say_title("Alchimist:")
               say("")
                    say("Se pare că ai cele 30 de Fragmente de Energie.")
               say("Vrei să transform această energie în Energie Pură?")
               say("Pot încerca, dar nu garantez că voi reuşi.")
               say("")
                  wait()               
               say_title("Alchimist:")
               say("")
               say("Totodată, am nevoie şi de o sumă de bani.")
               say("Ştii, aş fi putut să îţi fac şi gratis")
               say("dar am nevoie pentru a întreţine proiectul...")
               say("Te va costa 500.000 Yang.")
               say("Eşti sigur că doreşti să creezi energie?")
               say("")
               
                    if select("Da","Nu") == 2 then
               
                        return
                    end
                    
                    pc.change_money(-500000)
                    pc.remove_item(51001,30)
                    
                    if number(0,1) == 1 then               
                  say_title("Alchimist:")
                  say("")
                        say("Am reuşit să creez Energie Pură.")
                  say("")
                  say_item("Ai primit un Cristal de Energie", 51002, "")    
                        pc.give_item2(51002,1)                  
                    else                
                  say_title("Alchimist:")
                  say("")
                        say("Oh, ce păcat. Fragmentele sunt sparte.")
                  say("Transformarea a eşuat.")
                  say("")
                        return
                    end                  
                else             
                  say_title("Alchimist:")
                  say("")
                        say("Se pare că nu ai la tine cele 30 de Fragmente")
                  say("de Energie. Mai adu-mi obiecte pentru a face")
                  say("mai multe Fragmente de Energie.")
                  say("")
                    return
                end               
            end
        end
        when 20001.take with game.get_event_flag("energy") == 1 begin
            if pc.get_level() < 35 then
                return
            end
            
            if item.get_type() == 1 or item.get_type() == 2 then
                local maxlvl = mysql_query("SELECT limitvalue0 FROM player.item_proto WHERE vnum='"..item.get_vnum().."' LIMIT 1;")
                test_chat(maxlvl[1][1])
                if tonumber(maxlvl[1][1]) < 35 then 
               say_title("Alchimist:")
               say("")
                    say("Din acest obiect nu se poate crea energie.")   
               say("")
                    return
                end
            
            say_title("Alchimist:")
            say("")
                say(string.trim(item.get_name()))
                say("Chiar doreşti să distrugi acest obiect?")
            say("")
                if select("Da","Nu") == 2 then
                    return
                else
                    local numar = number(0,15)
                    if numar > 0 then
                  say_title("Alchimist:")
                  say("")
                        say("Am reuşit să extrag energia din obiect!")      
                  say_item("Ai primit "..numar.." Fragment(e) de Energie", 51001, "")      
                        pc.give_item2(51001, numar)
                    else
                  say_title("Alchimist:")
                  say("")
                        say("Am eşuat. Din păcate nu am putut extrage energia")
                  say("din acest obiect.")
                  say("")
                        return
                    end
                    item.remove()
                end
                
            else
            say_title("Alchimist:")
            say("")
                say("Acest obiect nu are energie!")   
            say("")
            end
        end      
        when login begin
            if getenergytime() < 50000 then
                test_chat("[ENERGIE] Timp rămas: "..getenergytime())
                setenergytime(getenergytime() + get_time())
                cmdchat("energysystem "..getenergytyp().."|"..getenergyvalue().."#"..getenergytime())
            end
        end      
        when logout begin
            if getenergytime() > get_time() then
                local energy = getenergytime() - get_time()
                if energy > 0 then
                    setenergytime(energy)
                end
            end
        end       
        when 51002.use begin
            if getenergytime() > get_time() then
                chat("Foloseşti deja un Cristal de Energie!")

                return
            end          
            local bonus = number(1,10)
            lista_bonus = {}
            lista_bonus [1] = {apply.ATTBONUS_HUMAN,    15}
            lista_bonus [2] = {apply.ATTBONUS_MONSTER,    10}
            lista_bonus [3] = {apply.CRITICAL_PCT,    10}
            lista_bonus [4] = {apply.PENETRATE_PCT,    10}
            lista_bonus [5] = {apply.MAX_HP,    1000}
            lista_bonus [6] = {apply.MAX_SP,    2000}
            lista_bonus [7] = {apply.HP_REGEN,    30}
            lista_bonus [8] = {apply.STEAL_HP,    10}
            lista_bonus [9] = {apply.ATT_GRADE_BONUS,    75}
            lista_bonus [10] = {apply.ATT_GRADE_BONUS,    50}
            
            test_chat(bonus)
            test_chat(lista_bonus[bonus][1])
            test_chat(lista_bonus[bonus][2])

            affect.add_collect(lista_bonus[bonus][1],lista_bonus[bonus][2],7200)
            setenergy(bonus,lista_bonus[bonus][2],get_time() + 7200)

            cmdchat ("energysystem "..bonus.."|"..lista_bonus[bonus][2].."#"..(get_time() + 7200))
            
            setenergytime(get_time() + 7200)
            
            item.remove()
            chat("Simt energia cristalului cum curge prin venele mele.")           
        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.

quest hair begin
	state start begin
		function My_hair_item(vnum,index)	
			hair_list={}
			     --   vnum    /hair/ option  /  howmuch / duration 
			hair_list [74001] = {1001, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74002] = {1002, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74003] = {1003, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74004] = {1004, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74005] = {1005, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74006] = {1006, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74007] = {1007, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74008] = {1008, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74009] = {1009, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74010] = {1010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74011] = {1011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74012] = {1012, apply.ATTBONUS_SHAMAN,	10, 2592000}	
		
			hair_list [74251] = {2001, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74252] = {2002, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74253] = {2003, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74254] = {2004, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74255] = {2005, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74256] = {2006, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74257] = {2007, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74258] = {2008, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74259] = {2009, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74260] = {2010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74261] = {2011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74262] = {2012, apply.ATTBONUS_SHAMAN,	10, 2592000}	
 
			hair_list [74501] = {3001,  apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74502] = {3002,  apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74503] = {3003,  apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74504] = {3004,  apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74505] = {3005,  apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74506] = {3006,  apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74507] = {3007,  apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74508] = {3008,  apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74509] = {3009,  apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74510] = {3010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74511] = {3011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74512] = {3012, apply.ATTBONUS_SHAMAN,	10, 2592000}	

			hair_list [74751] = {4001, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74752] = {4002, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74753] = {4003, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74754] = {4004, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74755] = {4005, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74756] = {4006, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74757] = {4007, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74758] = {4008, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [74759] = {4009, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [74760] = {4010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [74761] = {4011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [74762] = {4012, apply.ATTBONUS_SHAMAN,	10, 2592000}	

		
			hair_list [75001] = {1001, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75002] = {1002, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75003] = {1003, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75004] = {1004, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75005] = {1005, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75006] = {1006, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75007] = {1007, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75008] = {1008, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75009] = {1009, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75010] = {1010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75011] = {1011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75012] = {1012, apply.ATTBONUS_SHAMAN,	10, 2592000}	
		
			hair_list [75201] = {2001, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75202] = {2002, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75203] = {2003, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75204] = {2004, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75205] = {2005, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75206] = {2006, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75207] = {2007, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75208] = {2008, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75209] = {2009, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75210] = {2010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75211] = {2011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75212] = {2012, apply.ATTBONUS_SHAMAN,	10, 2592000}	
 
			hair_list [75401] = {3001,  apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75402] = {3002,  apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75403] = {3003,  apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75404] = {3004,  apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75405] = {3005,  apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75406] = {3006,  apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75407] = {3007,  apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75408] = {3008,  apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75409] = {3009,  apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75410] = {3010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75411] = {3011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75412] = {3012, apply.ATTBONUS_SHAMAN,	10, 2592000}	

			hair_list [75601] = {4001, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75602] = {4002, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75603] = {4003, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75604] = {4004, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75605] = {4005, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75606] = {4006, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75607] = {4007, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75608] = {4008, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			hair_list [75609] = {4009, apply.ATTBONUS_WARRIOR,	10, 2592000}	
			hair_list [75610] = {4010, apply.ATTBONUS_ASSASSIN,	10, 2592000}	
			hair_list [75611] = {4011, apply.ATTBONUS_SURA,		10, 2592000}	
			hair_list [75612] = {4012, apply.ATTBONUS_SHAMAN,	10, 2592000}	
			return hair_list[vnum][index]
		end
		
		function leave_log(item_vnum)
			
			char_log(0, "CHANGE_HAIR", string.format("USE_ITEM(%d)",item_vnum)) -- Set Item log

			--char_log(0, "CHANGE_HAIR", string.format("SET_HAIR(%d)",item_vnum)) --Set Item log

			char_log(0, "CHANGE_HAIR", string.format("END_SEC(%d)",get_time()+ hair.My_hair_item(item_vnum,4)) ) -- Duration log

			--char_log(0, "CHANGE_HAIR", string.format("AFFECT(%s), DURATION:%d)",hair.My_hair_item(item_vnum,2),get_time()+ hair.My_hair_item(item_vnum,4))) -- Effect set log

			char_log(0, "CHANGE_HAIR", "CHANGE_HAIR_END") -- End log

		end
																				
	
		when  74001.use or
			  74002.use or 
			  74003.use or 
			  74004.use or 
			  74005.use or 
			  74006.use or 
			  74007.use or 
			  74008.use or 
			  74009.use or 
			  74010.use or 
			  74011.use or 
			  74012.use or
			  75001.use or
			  75002.use or 
			  75003.use or 
			  75004.use or 
			  75005.use or 
			  75006.use or 
			  75007.use or 
			  75008.use or 
			  75009.use or 
			  75010.use or 
			  75011.use or 
			  75012.use with pc.get_job()==0 begin
			
			pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
			affect.remove_hair()
			affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))

			pc.setqf("limit_time",get_time()+ hair.My_hair_item(item.vnum,4))
			hair.leave_log(item.vnum)
			item.remove()
		end
	
		when  74251.use or
			  74252.use or 
			  74253.use or 
			  74254.use or 
			  74255.use or 
			  74256.use or 
			  74257.use or 
			  74258.use or 
			  74259.use or 
			  74260.use or 
			  74261.use or 
			  74262.use or
			  75201.use or
			  75202.use or 
			  75203.use or 
			  75204.use or 
			  75205.use or 
			  75206.use or 
			  75207.use or 
			  75208.use or 
			  75209.use or 
			  75210.use or 
			  75211.use or 
			  75212.use with pc.get_job()==1 begin
		
			pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
			affect.remove_hair()
			affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))

			pc.setqf("limit_time",get_time()+hair.My_hair_item(item.vnum,4))

			hair.leave_log(item.vnum)
			item.remove()
		end

		when  74501.use or
			  74502.use or 
			  74503.use or 
			  74504.use or 
			  74505.use or 
			  74506.use or 
			  74507.use or 
			  74508.use or 
			  74509.use or 
			  74510.use or 
			  74511.use or 
			  74512.use or
			  75401.use or
			  75402.use or 
			  75403.use or 
			  75404.use or 
			  75405.use or 
			  75406.use or 
			  75407.use or 
			  75408.use or 
			  75409.use or 
			  75410.use or 
			  75411.use or 
			  75412.use with pc.get_job()==2 begin
			  
			
		    pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
			affect.remove_hair()
			affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))

			pc.setqf("limit_time",get_time()+hair.My_hair_item(item.vnum,4))

			hair.leave_log(item.vnum)
			item.remove()
		end
	
		when  74751.use or
			  74752.use or 
			  74753.use or 
			  74754.use or 
			  74755.use or 
			  74756.use or 
			  74757.use or 
			  74758.use or 
			  74759.use or 
			  74760.use or 
			  74761.use or 
			  74762.use or
			  75601.use or
			  75602.use or 
			  75603.use or 
			  75604.use or 
			  75605.use or 
			  75606.use or 
			  75607.use or 
			  75608.use or 
			  75609.use or 
			  75610.use or 
			  75611.use or 
			  75612.use with pc.get_job()==3 begin
			  
			
			pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
			affect.remove_hair()
			affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))

			pc.setqf("limit_time",get_time()+ hair.My_hair_item(item.vnum,4))

			hair.leave_log(item.vnum)
			item.remove()
		end

	end
end

Tutorial instalare quest:

• Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest

• Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).

• Îl puneţi acolo (să fie .quest sau .lua).

• Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/questapoi ./qc nume_quest.quest

• Intraţi pe server şi scrieţi /reload q

Există campania de Moderatori+ că nu respecţi regulile minime de acceptare.

:contra:

quest switch_fix begin
                state start begin                 
                        when 9003.chat."Vrajeste Obiectul" begin
                                local pcLevel = 15
                                local minItem = 1
                                local maxItem = 200
        local itemValue = 71084
                                local singleCost = 2000
                                say_title("Administrator Vrajeste Obiectul:")
                                say("Buna, eu sunt administratorul Vrajeste Obiectul.")
                                say("Cu ajutorul meu, vei primi niste Vrajeste Obiectul  la alegerea ta")
                                say("Pentru  a schimba bonusurile de pe iteme.")
                                say_item_vnum(itemValue)
                                say_reward("Introduceti câte Vrajeste Obiectul vreti,")
                                say_reward(string.format("reamintit ca acest lucru trebuie sa intre %d e %d", minItem, maxItem))
                                local quant = math.floor(tonumber(input()))
                                if quant < minItem or quant> maxItem or quant == nil then
                                        say_title("Administrator Vrajeste Obiectul:")
                                        say("Îmi pare rau, numarul introdus nu este valid.")
                                        say_reward(string.format("Suma trebuie sa fie între %d e %d", minItem, maxItem))
                                        return
                                end
                                say_title("Administrator Vrajeste Obiectul:")
                                say("Ei bine, ati introdus numarul corect.[ENTER]")
                                say_reward(string.format("Numarul de Vrajeste Obiectul: %d", quant))
                                say_reward(string.format("Nivel necesar: %d", pcLevel))
                                say_reward(string.format("Nivelul tau: %d", pc.get_level()))
                                say_reward(string.format("Costa pentru un singur Vrajeste Obiectul: %d Yang.", singleCost))
                                say("")
                                local price = quant*singleCost
                                say_reward(string.format("Cost total: %d Yang.", price))
                                say("")
                                say("Introduceti codul pentru a primi elementul ales.")
                                local psw = number(10000,99999)
                                say_reward("Codice: "..psw)
                                local check = tonumber(input())
                                --controlli--
                                say_title("Administrator Vrajeste Obiectul:")
                                if check != psw or check == nil then
                                        say("Codul introdus nu se potriveste.")
                                        say("Introduceti-l corect data viitoare.")
                                        return
                                end
                                if pc.count_item(itemValue) > 0 then
                                        say("Nu poti primi alte Vrajeste Obiectul")
                                        say("Prima data foloseste cele din inventar.")
                                        return
                                end
                                if pc.get_gold() < price then
                                        say("Nu aveti suficienti bani.")
                                        say("Revino când ai suma necesara")
                                        return
                                end
                                if pc.get_level() < pcLevel then
                                        say("Nu au nivelul necesar pentru a continua.")
                                        say("Reintoarcete înapoi când ai nivelul necesar.")
                                        return
                                end
                                -- end control--
                                say("În regula, ai primit Vrajeste Obiectul!")
                                say_item_vnum(itemValue)
                                pc.changegold(-price)
                                pc.give_item2(itemValue, quant)
                        end
                end
        end

Instalare:

1. Creezi un fişier text cu numele 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 .

uest primullogin begin
    state start begin
        when login begin
            local tab = {
                ["Regat"] = {
                    [1] = "rosu",
                    [2] = "galben",
                    [3] = "albastru"
                },
                ["Rasa"] = {
                    [0] = "Razboinic",
                    [1] = "Ninja",
                    [2] = "Sura",
                    [3] = "Saman"
                },
                ["Server"] = "Numele Serverului"
            }
            notice_all(string.format("Jucatorul %s din regatul %s a intrat in lumea %s ca %s.", pc.get_name(), tab["Regat"][pc.get_empire()], tab["Server"], tab["Rasa"][pc.get_job()]))
            set_state( __COMPLETE__ )
        end
    end
    state __COMPLETE__ begin
    end
end

1. Salvati continutul quest-ului într-un fisier text numit de exemplu nume_quest.quest .

2. Va conectati la filezilla / winscp si întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveti).

3. Îl puneti acolo (sa fie .quest) si da-ti permisiuni 777.

4. Te loghezi în FreeBSD / putty si scrii în felul urmator: cd /usr/home/game/share/locale/germany/quest 

5./qc nume_quest.quest

6. Intrati pe server si scrieti /reload q .

quest evento_mesterlum begin
   state start begin
   
      when 9004.chat."GM: Evento_reino" with pc.is_gm() begin
      
         say_title(""..pc.get_name()..":")
         say("")
         
      local se = select ("Activeaza evenimentul","Dezactiveaza evenimentul","Iesire")
      
            if se == 1 then
               game.set_event_flag("Razboi_Jinno", 1)
               game.set_event_flag("Razboi_Chunjo", 1)
               game.set_event_flag("Razboi_Shinsoo", 1)
               game.set_event_flag("Jinno", 1)
               game.set_event_flag("Chunjo", 1)
               game.set_event_flag("Shinso", 1)
               game.set_event_flag("Jinno_kill", 1)
               game.set_event_flag("Chunjo_kill", 1)
               game.set_event_flag("Shinsoo_kill", 1)
               notice_all("Evenimentul_regatelor activat")
               
            elseif se == 2 then
            
               game.set_event_flag("Razboi_Jinno", 0)
               game.set_event_flag("Razboi_Chunjo", 0)
               game.set_event_flag("Razboi_Shinsoo", 0)
               game.set_event_flag("Jinno", 0)
               game.set_event_flag("Chunjo", 0)
               game.set_event_flag("Shinsoo", 0)
               game.set_event_flag("Jinno_kill", 0)
               game.set_event_flag("Chunjo_kill", 0)
               game.set_event_flag("Shinso_kill", 0)
               notice_all("Evenimentul_regatelor dezactivat")
               
            else
               return
               
            end
            
      end
 
      
      when 9004.chat."Evenimentul e pe cale sa inceapa" begin
 
         if game.get_event_flag("Razboi_Chunjo") == 0 and pc.get_empire() == 2 then
         
            say_title("Evenimentul:")
            say("Este dezactivat in acest moment")
            say("")
         end   
         
         if game.get_event_flag("Razboi_Chunjo") == 1 and pc.get_empire() == 2 then
            say_title("Evenimentul:")
            say("Este activat in acest moment")
            
            local temo = select ("Vreau sa intru!", "Iesire")
            
               if temo == 1 then
               
                  pc.warp(819200,   204800)
                  
               else
                  return
               
               end
         end
            if game.get_event_flag("Razboi_Jinno") == 0 and pc.get_empire() == 3 then
         
            say_title("Evenimentul:")
            say("Este dezactivat in acest moment")
            say("")
         end   
         
         if game.get_event_flag("Razboi_Jinno") == 1 and pc.get_empire() == 3 then
            say_title("Evenimentul:")
            say("Este activat in acest moment")
            
            local temo1 = select ("Vreau sa intru!", "Iesire")
            
               if temo1 == 1 then
               
                  pc.warp(819200,   204800)
                  
               else
                  return
               
               end
         end
                  if game.get_event_flag("Razboi_Shinso") == 0 and pc.get_empire() == 1 then
         
            say_title("Evenimentul:")
            say("Este activat in acest moment")
            say("")
         end   
         
         if game.get_event_flag("Razboi_Shinsoo") == 1 and pc.get_empire() == 1 then
            say_title("Evenimentul:")
            say("Este activat in acest moment")
            
            local temo2 = select ("Vreau sa intru!", "Iesire")
            
               if temo2 == 1 then
               
                  pc.warp(819200,   204800)
                  
               else
                  return
               
               end
         end
      end
 
      when login with pc.get_map_index() == 43 begin
         
         if pc.get_empire() == 1 then
            game.set_event_flag("Shinsoo", game.get_event_flag("Shinsoo")+1)
            chat(""..game.get_event_flag("Shinsoo").." In eveniment au fost rosii")            
         elseif pc.get_empire() == 2 then
         
            game.set_event_flag("Chunjo", game.get_event_flag("Chunjo")+1)
            chat(""..game.get_event_flag("Chunjo").." In eveniment au fost galbenii")      
            
         elseif pc.get_empire() == 3 then
            game.set_event_flag("Jinno", game.get_event_flag("Jinno")+1)
            chat(""..game.get_event_flag("Jinno").." In eveniment au fost albastrii")
 
 
         end
         
      if game.get_event_flag("Shinsoo") == 2 then
         notice_all("Regatul rosu a ajuns la numarul maxim de jucatori si e gata sa inceapa!")
         notice_all("Portile pentru regatul rosu au fost inchise!")
         game.set_event_flag("Razboi_Shinsoo", 0)
      elseif game.get_event_flag("Jinno") == 2 then
         notice_all("Regatul albastru a ajuns la numarul maxim de jucatori si e gata sa inceapa!")
         notice_all("Portile pentru regatul albastru au fost inchise!")
         game.set_event_flag("Razboi_Jinno", 0)
      elseif game.get_event_flag("Chunjo") == 2 then
         notice_all("Regatul galben a ajuns la numarul maxim de jucatori si e gata sa inceapa!")
         notice_all("Portile pentru regatul galben au fost inchise!")
         game.set_event_flag("Razboi_Chunjo", 0)
      end
   end
 
      
      
      when kill with npc.is_pc() and pc.get_map_index() == 43 begin
      
            loop_timer("Timpul", 20*1)
 
            if pc.get_empire() == 3 then
               game.set_event_flag("Jinno_kill", game.get_event_flag("Jinno_kill")+1)
               notice_all("Jinno mai are:"..game.get_event_flag("Jinno_kill").."puncte")
            elseif pc.get_empire() == 2 then
               game.set_event_flag("Chunjo_kill", game.get_event_flag("Chunjo_kill")+1)
               notice_all("Chunjo mai are:"..game.get_event_flag("Chunjo_kill").."puncte")
               
            elseif pc.get_empire() == 1 then
               game.set_event_flag("Shinsoo_kill", game.get_event_flag("Shinso_kill")+1)
               notice_all("shinso mai are:"..game.get_event_flag("Shinsoo_kill").."puncte")
            end
      end
      
      
      when Timpul.timer begin
      
         chat("Timpul s-a sfarsit)
         
            if game.get_event_flag("Jinno_kill") > game.get_event_flag("Chunjo_kill") > game.get_event_flag("Shinsoo_kill") then   -------- Acum shinsoo pierde
                  notice_all("Shinsoo a fost eliminat")   
            elseif game.get_event_flag("Jinno_kill") > game.get_event_flag("Shinso_kill") > game.get_event_flag("Chunjo_kill") then  ------- Acum chunjo pierde
                  notice_all("Chunjo a fost eliminat")   
            elseif game.get_event_flag("Chunjo_kill") > game.get_event_flag("Shinso_kill") > game.get_event_flag("Jinno_kill") then   ------- Acum jinno pierde
                  notice_all("Jinno a fost eliminat")
                  
                  
            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 .

 quest change_sex_item begin
state start begin
when 71048.use begin
say_title("Schimbarea Sexului")
if pc.get_level() < 75 then
say("Pentr a schimbă sexul îţi trebuie minim nivelul 75")
say("Experienţă insuficientă")
say("pentru a schimbă sexul.")
return
elseif pc.is_married() then
say("Nu trebuie să fiţi căsătoriţi pentru a schimbă sexul.")
say("Divorţaţi pentru a va putea schimbă sexul.")
say("")
return
elseif pc.is_polymorphed() then
say("Sex schimbat")
say("Nu va puteţi schimbă sexul.")
return
elseif get_time() < pc.getqf("next_time") then
say("Perioada de asteaptare încă nu a expirat!")
say("Va puteţi schimbă sexul odată la 3 zile.")
if pc.is_gm() then
say_reward("Timpul tău de aşteptare este setat la 0.")
pc.setqf("next_time", 0)
end
return
end
say("Vrei cu adevărat să îţi schimbi sexul?")
say("Poţi să îţi schimbi sexul odată la 3 zile")
say("Acest lucru se face de către Schimbarea Sexului")
say_reward("Vrei să schimbi sexul?")
local s=select("Da", "Nu")
if 1==s then
say_title("Schimbarea Sexului")
say("Sexul a fost schimbat cu succes!")
say_reward("Pentru a îşi face efectul trebuie să")
say_reward("va reautentificati.")
pc.remove_item("71048", 1)
pc.setqf("next_time", get_time() + 86400 * 3)
pc.change_sex()
end
end
end
end

if pc.get_level() < 75 then

În loc de 75 puneţi level-ul dorit.

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 .

quest Recompensa Nivel 75 begin
   state start begin
      when login with pc.level >= 75 begin
         set_state(information)
      end
   end

   state information begin
      when letter begin
         send_letter("Recompensa Nivel 75")
      end

      when info or button begin
         say("Recompensa Nivel 75")
         say("Salut aventurierule , ai reusit de ai ajuns la nivelul 75. ")
         say("Acum demonstreazati abilitatile omorand un monstru.")
         say("Trebuie sa omori Dragonul de Gheata din v5.")
         say("Vei fi rasplatit, mult success.")
         say(""")
         say_reward("Dragonul se gaseste in v5.")
           pc.setqf("state", 1)
           q.set_counter("Dragonul de Gheata", 1)
      end

      when 2493.kill begin
         local count = pc.getqf("state") - 1
         if count <= 1 then
            pc.setqf("state", count)
               q.set_counter("Dragonul de Gheata", count)
         end
         if count == 0 then
             say_title("Recompensa Nivel 75")
             say("Ai finalizat cu succes misiunea!")
            say("Recompensa:")
             say_reward("Sabie Baron+9")
            say_reward("Alte informatii:")
             say_reward("Armura regelui")
            say_reward("Alte informatii:")
             say_reward("Ai primit 500000000 Yang")
             say_reward("Ai primit2000000 experienta")
            say_reward("Ai primit niveulul calului21")
            pc.change_money(500000000)
            pc.give_exp2(2000000)
            pc.give_item2(1, Sabie Baron+9)
            pc.give_item2(1, Armura regelui)
            horse.set_level("21")
            clear_letter()
            set_state(__COMPLETE__)

         end
      end
   end

   state __COMPLETE__ begin
   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 .