Jump to content

4ss

Miembro
  • Contador contenido

    9
  • Ingreso

  • Última visita

Mensajes publicados por 4ss

  1.  

    Aqui tienes la quest correjida, no es solo un if y un when, la sintaxis estaba incorrecta en varios puntos, faltaban simbolos de igual, ademas de los select y otros fallos.

    quest começar beginstate start beginwhen letter begin	local v = find_npc_by_vnum(9003)	if v != 0 then target.vid("__TARGET__", v, "Loja Geral")	end	send_letter("Equipamento Inicial")endwhen button or info begin	say_title("Equipamento Inicial")	say("")	say("Vai ter com a Loja Geral para ela")	say("te dar o Teu Equipamento Inicial.")	say("")	say_reward("Vai Antes que se esgote.")	say("")endwhen __TARGET__.target.click or 9003.chat."Equipamento Inicial" begin	target.delete("__TARGET__")	say("Loja Geral:")	say("")	say("Opah, nova Gente por aqui?")	say("Bem...")	say("Ainda bem que vieste falar comigo,")	say("eu é que te dou o Set Inicial a todos os novatos")	say("que aparecem por cá.")	say("Queres Receber o Teu set então?")	local opcao = select("Claro..." , "Deixa Estar")	if opcao == 2 then		return	endsay_title("Loja Geral:")say("Como pareces ser boa pessoa, eu dou te o teu Set")say("mas tem antenção, caso faças porcaria")say("nesta ou noutra cidade, falo com os meus")say("superiores, e eles põe te daqui para fora!")say("Tamos Entendidos?")local opcao2 = select("Sim" , "Não voltes a falar assim comigo!")	if opcao2 == 2 then		pc.setqf("basic_weapon", 1)		say_title ("Loja Geral")		say ("")		say ("Põe te a andar daqui para fora imediatamente!")		notice_all (" o Novato " .. pc . name .. " não terá Set Inicial! Castiguem no!")	return	endpc.setqf("basic_weapon", 1)say("Muito bem, então aqui tens o teu Set Inicial.")nation = { "Vermelho" , "Amarelo" , "Azul" }notice_all ( "O jogador " .. pc . name .. " do reino " .. nation [ pc . getempire ( ) ] .. " acaba de receber o Set Inicial!" )notice_all ( "Dêem Todos as Boas Vindas ao " .. pc . name .. "!" )if pc.job == 0 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(19)pc.give_item2(11209)pc.give_item2(12209)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )elseif pc.job == 1 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(1009)pc.give_item2(11409)pc.give_item2(12349)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )elseif pc.job == 2 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(19)pc.give_item2(11609)pc.give_item2(12489)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )elseif pc.job == 3 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(7009)pc.give_item2(11809)pc.give_item2(12629)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )endend--whenendend 

     

     

    Si pero asi la quest se da siempre que se enpeza a jugar, y yo so lo quero una vez, quando se empeza nel juego, nel 1º login

  2. Hola.

     

    Vos pido aiuda para esta quest que para mi es un quebra cabeças...

     

    ela me da un error que es esto :

     

     

    syntax error : [string "start"]:7: unexpected symbol near "when"

     

    Aqui está la Quest:

     

     

     

    quest começar beginstate start beginwhen login beginif pc.getqf("basic_weapon") == 0 thenwhen letter beginlocal v = find_npc_by_vnum(9003)if v != 0 then target.vid("__TARGET__", v, "Loja Geral")endsend_letter("Equipamento Inicial")endwhen button or info beginsay_title("Equipamento Inicial")say("")say("Vai ter com a Loja Geral para ela")say("te dar o Teu Equipamento Inicial.")say("")say_reward("Vai Antes que se esgote.")say("")endwhen __TARGET__.target.click or 9003.chat."Equipamento Inicial" begintarget.delete("__TARGET__")say("Loja Geral:")say("")say("Opah, nova Gente por aqui?")say("Bem...")say("Ainda bem que vieste falar comigo,")say("eu é que te dou o Set Inicial a todos os novatos")say("que aparecem por cá.")say("Queres Receber o Teu set então?")local opcao = ("Claro..." , "Deixa Estar")if opcao = 2 thenendelsesay_title("Loja Geral:")say("Como pareces ser boa pessoa, eu dou te o teu Set")say("mas tem antenção, caso faças porcaria")say("nesta ou noutra cidade, falo com os meus")say("superiores, e eles põe te daqui para fora!")say("Tamos Entendidos?")local opcao2 = ("Sim" , "Não voltes a falar assim comigo!")if opcao2 = 2 thenpc.setqf("basic_weapon", 1)say_title ("Loja Geral")say ("")say ("Põe te a andar daqui para fora imediatamente!")notice_all (" o Novato " .. pc . name .. " não terá Set Inicial! Castiguem no!")endelsepc.setqf("basic_weapon", 1)say("Muito bem, então aqui tens o teu Set Inicial.")nation = { "Vermelho" , "Amarelo" , "Azul" }notice_all ( "O jogador " .. pc . name .. " do reino " .. nation [ pc . getempire ( ) ] .. " acaba de receber o Set Inicial!" )notice_all ( "Dêem Todos as Boas Vindas ao " .. pc . name .. "!" )if pc.job == 0 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(19)pc.give_item2(11209)pc.give_item2(12209)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )elseif pc.job == 1 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(1009)pc.give_item2(11409)pc.give_item2(12349)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )elseif pc.job == 2 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(19)pc.give_item2(11609)pc.give_item2(12489)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )elseif pc.job == 3 thenpc.give_item2(27002,200 )pc.give_item2(27002,200 )pc.give_item2(27005,200 )pc.give_item2(7009)pc.give_item2(11809)pc.give_item2(12629)pc.give_item2(13009)pc.give_item2(14009)pc.give_item2(15009)pc.give_item2(16009)pc.give_item2(17009)pc.give_item2(72702)pc.give_item2(71044, 20)pc.give_item2(71045, 20)horse . set_level ( 21 )horse . ride ( )pc . give_item2 ( 50053 )pc.give_item2 ( 53003)pc . set_skill_level ( 131 , 59 )pc . set_skill_level ( 137 , 59 )pc . set_skill_level ( 138 , 59 )pc . set_skill_level ( 139 , 59 )pc . set_skill_level ( 140 , 59 )endendendendend

     

     

    Yo necessito mucho desta quest...

     

    Gracias

  3. Hola, esta quest yo ha necessito pero me da un error que es

     

    qc in malloc(): error: allocation failed

    la quest es esta

     

    quest dropmoobs begin
    state start begin
    when kill with not npc.is_pc() and pc.get_map_index() == 401 and pc.get_level() <= 120 then
       local sks = number(1,30)
    			if sks == 1 then
    				game.drop_item(90003, 1)
    			end
    		end
    end

    alguien que me ayude plz :c

  4. Hola, usted tendría que cambiar un poco la quest, que se vería así

     

    quest cofre begin
    state start begin
      when 12345.use begin
       chat("Hi idiot")
       change_hp(-(Aquí se pone el valor que desee para disminuir hp))
      end
    end
    end

     

    no lo tengo la certeza que esto funcione, pero lo puedes testar :)

     

    despues dime se ha funcionado :)

  5. Hola, esta es una quest echa por un amigo, pero esta muy buena e yo hai decidido publica la...

    es una quest muy simples, pero muy buena

     

     

    quest removeritens begin
    state start begin
    when 20006.chat."Remocao de Itens" begin
    say_title ("Remocao de Itens")
    say("Com esta opçao podes remover todos os ")
    say("itens que desejas, mesmo aqueles que ")
    say("nao podes negociar ou deitar para o chao... ")
    say("Para removeres os itens indesejados ")
    say("Basta Arrastares o item para cima de mim. ")
    end
    when 20006.take begin
    say_title("Remocao de Itens! ")
    say("")
    say("Estas a tentar destruir o seguinte item: ")
    say_reward(string.trim(item.get_name()))
    say("")
    say("")
    say("Desejas mesmo destruir este item? ")
    local opcao = select ("Sim", "Nao")
    if opcao == 1 then
    say_title("Obrigado! ")
    say("")
    say("")
    say("Este item foi destruido com sucesso. ")
    item.remove()
    else
    say_title("Remocao de Itens! ")
    say("")
    say("")
    say("Volta quando estiveres mais seguro ")
    say("para removeres esse item... ")
    end
    end
    end
    end

     

     

    La quest es en Portugues, teen de ha traduzir...

     

    Fuente :

    Cyber-gamers.org

×
×
  • Crear nuevo...