Jump to content

LeyendasMt2

Miembro
  • Contador contenido

    50
  • Ingreso

  • Última visita

  • Días ganados

    1

Mensajes publicados por LeyendasMt2

  1. creo ke tambien asi te funcionaria , osea tenerlos en la misma quest, seguiria conservando el qf

     

    quest quest1 begin
    	    state start begin
    			    when login begin
    					    say("Que bueno que entrastes. te esperabamos")
    					    pc.setqf("entradas", pc.getqf("entradas")+1)
    			    end
    				  when 50000.chat."Consultar entradas" begin
    					    say("Usted tiene: " .. pc.getqf("entradas"))
    			    end
    	    end
    end
    
  2. yo pienso que es asi, pero me da error xD . Los canjes son una copia del sistema de logros de keko.

     

    quest Ranking_de_Kills begin
    state start begin
    when login or levelup with pc.get_level() > 1 begin
    set_state("pannello")
    end
    end
    state pannello begin
    when kill with npc.is_pc() begin
    pc.setqf("conta_kills", pc.getqf("conta_kills")+1)
    end
    when letter begin
    send_letter("Ranking de Kills")
    end
    when button or info begin
    say_title("Ranking de Kills")
    say("")
    say("Hola "..pc.get_name().."")
    say("Aqui podrás ver cuántos jugadores has matado")
    say("En tu carrera en el NOMBRE DEL SERVIDOR!")
    wait()
    say("Tienes un total de:")
    say_reward("".. pc.getqf("conta_kills") .." Kills")
    say("")
    say("Divierte te!")
    end
    --Canjeo--
    when 40001.use begin
    say_title ( "Canjea tus puntos logro" )
    local conta_kills = pc . getqf ( "conta_kills" )
    local p = select ( "Caballo armado - 5 puntos" , "Caballo militar - 30 puntos" , "Bonus mediohumanos +20% por 30min - 50 puntos" , "Bonus HP +5000 por 30min - 60 puntos" , "Armadura divina - 400 logros" , "Mascota de ataque - 30 puntos" , "Mas" )
    if p == 1 then
    if pc . getqf ( "conta_kills" ) <= 4 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 5 )
    say ( "Has recibido un caballo armado" )
    horse . set_level ( "11" )
    horse . unsummon ( )
    horse . summon ( )
    pc . give_item2 ( "50052" , 1 )
    return
    elseif p == 2 then
    if pc . getqf ( "conta_kills" ) <= 29 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 30 )
    say ( "Has recibido un caballo militar" )
    horse . set_level ( "21" )
    horse . unsummon ( )
    horse . summon ( )
    pc . give_item2 ( "50053" , 1 )
    return
    elseif p == 3 then
    if pc . getqf ( "conta_kills" ) <= 49 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 50 )
    say ( "Has recibido 20% fuerza contra mediohumanos por 30min" )
    affect . add_collect ( apply . ATTBONUS_HUMAN , 20 , 60 * 30 )
    return
    elseif p == 4 then
    if pc . getqf ( "conta_kills" ) <= 59 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 60 )
    say ( "Has recibido 5000hp por 30min" )
    affect . add_collect ( apply . MAX_HP , 5000 , 60 * 30 )
    return
    elseif p == 5 then
    if pc. getqf ( "conta_kills" ) <= 399 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 399 )
    local armor = select ( "Armd. divina (G)" , "Armd. divina (N)" , "Armd. divina (S)" , "Armd. divina (C)" )
    if armor == 1 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "42080" , 1 )
    return
    elseif armor == 2 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "44080" , 1 )
    return
    elseif armor == 3 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "46080" , 1 )
    return
    elseif armor == 4 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "48080" , 1 )
    return
    end
    elseif p == 6 then
    if pc . getqf ( "conta_kills" ) <= 29 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 29 )
    say ( "Has recibido la mascota de ataque" )
    pc . give_item2 ( "30312" , 1 )
    return
    elseif p == 7 then
    local p2 = select ( "Leon Blanco - 40 puntos" , "Anillo experiencia - 5 puntos" , "Fuerza monstruo +20% 30min - 15 puntos" , "Velocidad movimiento +25% 30min - 10 puntos" , "Mascota de defensa - 25 puntos" , "Cuantos logros tengo?" , "Cerrar" )
    if p2 == 1 then
    if pc . getqf ( "conta_kills" ) <= 39 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 40 )
    say ( "Has recibido un leon blanco disfrtualo, no se acaba" )
    pc . give_item2 ( "50110" , 1 )
    return
    elseif p2 == 2 then
    if pc . getqf ( "conta_kills" ) <= 4 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 5 )
    say ( "Disfruta de un anillo de experiencia" )
    pc . give_item2 ( "71015" , 1 )
    return
    elseif p2 == 3 then
    if pc . getqf ( "conta_kills" ) <= 14 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 15 )
    say ( "Has recibido 20% fuerza monstruo por 30min" )
    affect . add_collect ( apply . ATTBONUS_MONSTER , 20 , 60 * 30 )
    return
    elseif p2 == 4 then
    if pc . getqf ( "conta_kills" ) <= 9 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 10 )
    say ( "Has recibido 25% velo.movimiento por 30min" )
    affect . add_collect ( apply . MOV_SPEED , 25 , 60 * 30 )
    return
    elseif p2 == 5 then
    if pc . getqf ( "conta_kills" ) <= 24 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local conta_kills = pc . getqf ( "conta_kills" )
    pc . setqf ( "conta_kills" , conta_kills - 25 )
    say ( "Has recibido la mascota de defensa" )
    pc . give_item2 ( "71124" , 1 )
    return
    end
    end
    
  3. Gracias pacificador pero eso no es lo que quiero , tu pones alli que cuando tengas X puntos te de premio directamente. Tal vez me exprese mal, lo que quiero decir es que los puntos se acumulen y haya una tienda tipo como la que puse keko en su sistema de logros, a lo mejor tengo 20 puntos acumulados y quiero canjear 5 por un objeto , nose si me explico :okay:

  4. Hola buenas tengo una quest que suma muertes y se me ocurrio hacerla tipo el sistema de logros de keko, osea por X muertes te den un premio. Dejo la quest para ver si me podeis ayudar ^^

     

    quest Ranking_de_Kills begin
    state start begin
    when login or levelup with pc.get_level() > 1 begin
    set_state("pannello")
    end
    end
    state pannello begin
    when kill with npc.is_pc() begin
    pc.setqf("conta_kills", pc.getqf("conta_kills")+1)
    end
    when letter begin
    send_letter("Ranking de Kills")
    end
    when button or info begin
    say_title("Ranking de Kills")
    say("")
    say("Hola "..pc.get_name().."")
    say("Aqui podrás ver cuántos jugadores has matado")
    say("En tu carrera en el NOMBRE DEL SERVIDOR!")
    wait()
    say("Tienes un total de:")
    say_reward("".. pc.getqf("conta_kills") .." Kills")
    say("")
    say("Divierte te!")
    end
    
  5. hola a todos , he intentado meter una quest a mi server y al cargarla me tira el siguiente error

     

    qc in malloc() error allocation failed

    abort (core dumped)

     

    Dejo la quest :

     

    
    quest koep begin
        state start begin
    	    when login begin
    		    if global.getvarchar("rank1") == pc.get_name then
    			    chat("You're first in kill other empire player's ranklist")
    		    elseif global.getvarchar("rank2") == pc.get_name then
    			    chat("You're second in kill other empire player's ranklist")
    		    elseif global.getvarchar("rank3") == pc.get_name then
    			    chat("You're third in kill other empire player's ranklist")
    	    end
        end
    	    when kill with npc.is_pc() begin
    		    if npc.empire != pc.empire then
    			  pc.setqf("yourkills", pc.getqf("yourkills")+1)
    			    if pc.getqf("yourkills")>game.get_event_flag("rank1lvl") then
    				    if global_getvarchar("rank1") != "" then
    					    global_setvarchar("rank3", global_getvarchar("rank2"))
    					    game.set_event_flag("rank3", game.get_event_flag("rank2"))
    					    game.set_event_flag("rank3empire", game.get_event_flag("rank2empire")
    					    global_setvarchar("rank2", global_getvarchar("rank1"))
    					    game.set_event_flag("rank2", game.get_event_flag("rank1"))
    					    game.set_event_flag("rank2empire", game.get_event_flag("rank1empire")
    					    notice_all(pc.get_name()..">>>"..global_getvarchar("rank1").."")
    				    end
    					    game.set_event_flag("rank1lvl", pc.getqf("yourkills"))
    					    global_setvarchar("rank1",pc.get_name())
    					    game.set_event_flag("rank1empire", pc.get_empire())
    		    elseif npc.empire != pc.empire then
    			  pc.setqf("yourkills", pc.getqf("yourkills")+1)
    			    if pc.getqf("yourkills")>game.get_event_flag("rank2lvl") then
    				    if global_getvarchar("rank2") != "" then
    					    global_setvarchar("rank3", global_getvarchar("rank2"))
    					    game.set_event_flag("rank3", game.get_event_flag("rank2"))
    					    game.set_event_flag("rank3empire", game.get_event_flag("rank2empire")
    					    notice_all(pc.get_name()..">>>"..global_getvarchar("rank2").."")
    				    end
    					    game.set_event_flag("rank2lvl", pc.getqf("yourkills"))
    					    global_setvarchar("rank2",pc.get_name())
    					    game.set_event_flag("rank2empire", pc.get_empire())
    		    elseif npc.empire != pc.empire then
    			  pc.setqf("yourkills", pc.getqf("yourkills")+1)
    			    if pc.getqf("yourkills")>game.get_event_flag("rank3lvl") then
    				    if global_getvarchar("rank3") != "" then
    					    game.set_event_flag("rank3lvl", pc.getqf("yourkills"))
    					    global_setvarchar("rank3",pc.get_name())
    					    game.set_event_flag("rank3empire", pc.get_empire())
    					    notice_all(pc.get_name()..">>>"..global_getvarchar("rank3").."")
    				    end
    					    game.set_event_flag("rank3lvl", pc.getqf("yourkills"))
    					    global_setvarchar("rank3",pc.get_name())
    					    game.set_event_flag("rank3empire", pc.get_empire())
    				    end
    			    end
    	    when 20354.chat."Other Empire Kill Player Rank" begin
    		    say_title("Ranking List:")
    		    say("Its 2000000 gold!")
    		    say("Do you want see it ?")
    		    local select = select("Yes","No")
    		    if select == 1 then
    		    local gold = 2000000
    		    pc.changegold(-gold)
    		    say("Rank : "..global.getvarchar("rank1").." Level : "..game.set_event_flag("rank1lvl").." Empire : "..game.set_event_flag("rank1empire").."")
    		    say("Rank : "..global.getvarchar("rank2").." Level : "..game.set_event_flag("rank2lvl").." Empire : "..game.set_event_flag("rank2empire").."")
    		    say("Rank : "..global.getvarchar("rank3").." Level : "..game.set_event_flag("rank3lvl").." Empire : "..game.set_event_flag("rank3empire").."")
    		    wait()
    		    if global.getvarchar("rank1") == pc.get_name() then
    			    say("Congratulations")
    			    say("You are first killer!")
    		    elseif global.getvarchar("rank2") == pc.get_name() then   
    			    say("You are second killer,good job!")
    			    say("Take courage..!")
    		    elseif global.getvarchar("rank3") == pc.get_name() then   
    			    say("You are third killer, have a long way to first grade!")
    			    say("You must not discourage!Good job..")
    		    else
    			    say("No,Problem bye")	   
    		    end
    	    end
        end
    end 
    
  6. Perfecto , mis respetos keko , me funciono a la primera , este tipo de ayudas te hacen grande.

     

    He mirado la quest de dextrok y me gusto tambien el tema del contador , porque con tu quest keko , no se ve cuantos puntos lleva, sino que sube de lvl cuando llega a esa cantidad de muertes, me encantaria que tuviera un contador que dijera cuantos restan para alcanzar la siguiente cantidad para subir de lvl, o sino un contador ke vaya sumando y por ejemplo cuando llegue a 100 muertes , subes de lvl y vuelva a 0.

     

    perdon por ser tan pesado u.u

×
×
  • Crear nuevo...