[Admin] tierrilopes Posted December 11, 2015 at 05:38 PM Share Posted December 11, 2015 at 05:38 PM Spoiler quest collect_quest_reset_v2 begin state start begin when login with pc.level >= 92 begin if tostring(get_quest_state("collect_quest_lv92")) == "557528158" or tostring(get_quest_state("collect_quest_lv92")) == "1918565466" or tostring(get_quest_state("collect_quest_lv94")) == "557528158" or tostring(get_quest_state("collect_quest_lv94")) == "1918565466" or tostring(get_quest_state("collect_quest_lv96")) == "557528158" or tostring(get_quest_state("collect_quest_lv96")) == "1918565466" then set_state( check_reset_able ) end end end state check_reset_able begin when 20091.chat."Desejas mudar a tua recompensa?" begin --- l say_title("Seon-Pyeong:") say("") say("Eh.. Desejas mudar a recompensa que escolhes-te?") say("Hmmmm....") say("") wait() say_title("Seon-Pyeong:") say("") say("Preciso de um Jade Celestial para fazer a mudança.") say("Poderás encontrá-lo na Gruta das Almas.") say("") say("Será que me podes trazer 5 Jades?") say("") wait() say_title("Seon-Pyeong:") say("") say("Se trouxeres 5 Jades Celestiais eu consigo") say("mudar um dos extras que tinhas antes.") say("") say("Que tal huh?") say("") local s = select("Okay", "Deixa-me pensar.") if s == 1 then say_title("Seon-Pyeong:") say("") say("Ficarei à tua espera.") say("") set_state( find_jewel ) else say_title("Seon-Pyeong:") say("") say("À vontade, pensa cuidadosamente.") say("") end end end state find_jewel begin when letter begin send_letter("Seon-Pyeong's offer") end when button or info begin say("") say("Traz 5 Jades Celestiais a Seon-Pyeong") say("para ele mudar um dos extras.") say("") say_item_vnum( 30254 ) say_reward("Coleccionas-te "..pc.getqf("collect_count").." até agora.") say("") end when 2401.kill or 2402.kill or 2403.kill or 2404.kill begin if number(1, 100) <= 40 then pc.give_item2(30254, 1) send_letter("Encontras-te Jade Celestial!") end end when 2411.kill or 2412.kill or 2413.kill or 2414.kill begin if number(1, 100) <= 20 then pc.give_item2(30254, 1) send_letter("Tens Jade Celestial!") end end when 20091.chat."Trouxes-te uma Jade?" with pc.count_item(30254) > 0 begin pc.remove_item( 30254 , 1 ) say_title("Seon-Pyeong:") say("") say("Ah, aqui estás tu. Deixa-me ver...") setdelay(150) say("Hmmm...") resetdelay() if number(1, 100) <= 20 then say("Este não serve.") say("Por favor traz-me outro.") say("") return end say("Sim... Isto é um verdadeiro Jade Celestial!!") say("") wait() local count = pc.getqf( "collect_count" ) + 1 if count < 5 then pc.setqf( "collect_count", count ) say_title("Seon-Pyeong:") say("") say("Agora precisas de trazer mais " .. 5-count .. ".") say("Continua assim!") say("") return end say_title("Seon-Pyeong:") say("") say("Como prometido irei mudar um dos extras!") say_reward("Atenção:") say_reward("Os extras NÃO podem ser repetidos.") say("") local selTab = {} local pos = 1 if tostring(get_quest_state("collect_quest_lv92")) == "557528158" or tostring(get_quest_state("collect_quest_lv92")) == "1918565466" and tostring(get_quest_state("collect_quest_lv94")) != "1918565466" and tostring(get_quest_state("collect_quest_lv94")) != "557528158" and tostring(get_quest_state("collect_quest_lv96")) != "1918565466" and tostring(get_quest_state("collect_quest_lv96")) != "557528158" then table.insert(selTab, pos, "92 sky gem reward") pos = pos + 1 end if tostring(get_quest_state("collect_quest_lv92")) == "557528158" or tostring(get_quest_state("collect_quest_lv92")) == "1918565466" and tostring(get_quest_state("collect_quest_lv94")) == "557528158" or tostring(get_quest_state("collect_quest_lv94")) == "1918565466" and tostring(get_quest_state("collect_quest_lv96")) != "1918565466" and tostring(get_quest_state("collect_quest_lv96")) != "557528158" then table.insert(selTab, pos, "92 and 94 sky gem reward") pos = pos + 1 end if tostring(get_quest_state("collect_quest_lv92")) == "557528158" or tostring(get_quest_state("collect_quest_lv92")) == "1918565466" and tostring(get_quest_state("collect_quest_lv94")) == "557528158" or tostring(get_quest_state("collect_quest_lv94")) == "1918565466" and tostring(get_quest_state("collect_quest_lv96")) == "557528158" or tostring(get_quest_state("collect_quest_lv96")) == "1918565466" then table.insert(selTab, pos, "92, 94 and 96 sky gem reward") pos = pos + 1 end local s = select_table( selTab ) if selTab[s] == "92 sky gem reward" then affect.remove_collect(1, 1000) affect.remove_collect(apply.DEF_GRADE_BONUS, 300) affect.remove_collect(apply.ATT_GRADE_BONUS, 100) pc.setf("collect_quest_lv92","block_id",0) while true do say_title("Seon-Pyeong:") say("") say("Escolhe a nova recompensa de LV.92:") say("") s = select("Max VD +1000","Defesa +300","Valor Ataque +100") if 1== s then if pc.getf("collect_quest_lv94","block_id") == 1 or pc.getf("collect_quest_lv96","block_id") == 1 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(1, 1000, 60*60*24*365*60) --hp+3000 hp is 1 pc.setf("collect_quest_lv92","block_id",1) break end elseif 2== s then if pc.getf("collect_quest_lv94","block_id") == 2 or pc.getf("collect_quest_lv96","block_id") == 2 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 300, 60*60*24*365*60) pc.setf("collect_quest_lv92","block_id",2) break end else if pc.getf("collect_quest_lv94","block_id") == 3 or pc.getf("collect_quest_lv96","block_id") == 3 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,100,60*60*24*365*60)--60years pc.setf("collect_quest_lv92","block_id",3) break end end end elseif selTab[s] == "92 and 94 sky gem reward" then affect.remove_collect(1, 1000) affect.remove_collect(apply.DEF_GRADE_BONUS, 300) affect.remove_collect(apply.ATT_GRADE_BONUS, 100) pc.setf("collect_quest_lv92","block_id",0) affect.remove_collect(1, 1500) affect.remove_collect(apply.DEF_GRADE_BONUS, 500) affect.remove_collect(apply.ATT_GRADE_BONUS, 200) pc.setf("collect_quest_lv94","block_id",0) while true do say_title("Seon-Pyeong:") say("") say("Escolhe a nova recompensa de LV.92:") say("") s = select("Max VD +1000","Defesa +300","Valor Ataque +100") if 1== s then if pc.getf("collect_quest_lv94","block_id") == 1 or pc.getf("collect_quest_lv96","block_id") == 1 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(1, 1000, 60*60*24*365*60) --hp+3000 hp is 1 pc.setf("collect_quest_lv92","block_id",1) break end elseif 2== s then if pc.getf("collect_quest_lv94","block_id") == 2 or pc.getf("collect_quest_lv96","block_id") == 2 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 300, 60*60*24*365*60) pc.setf("collect_quest_lv92","block_id",2) break end else if pc.getf("collect_quest_lv94","block_id") == 3 or pc.getf("collect_quest_lv96","block_id") == 3 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,100,60*60*24*365*60)--60years pc.setf("collect_quest_lv92","block_id",3) break end end end while true do say_title("Seon-Pyeong:") say("") say("Escolhe a nova recompensa de LV.94:") say("") s2 = select("Max VD +1500","Defesa +500","Valor Ataque +200") if 1== s2 then if pc.getf("collect_quest_lv92","block_id") == 1 or pc.getf("collect_quest_lv96","block_id") == 1 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(1, 1500, 60*60*24*365*60) --hp+3000 hp is 1 pc.setf("collect_quest_lv94","block_id",1) break end elseif 2== s2 then if pc.getf("collect_quest_lv92","block_id") == 2 or pc.getf("collect_quest_lv96","block_id") == 2 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 500, 60*60*24*365*60) pc.setf("collect_quest_lv94","block_id",2) break end else if pc.getf("collect_quest_lv92","block_id") == 3 or pc.getf("collect_quest_lv96","block_id") == 3 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,200,60*60*24*365*60)--60years pc.setf("collect_quest_lv94","block_id",3) break end end end elseif selTab[s] == "92, 94 and 96 sky gem reward" then affect.remove_collect(1, 1000) affect.remove_collect(apply.DEF_GRADE_BONUS, 300) affect.remove_collect(apply.ATT_GRADE_BONUS, 100) pc.setf("collect_quest_lv92","block_id",0) affect.remove_collect(1, 1500) affect.remove_collect(apply.DEF_GRADE_BONUS, 500) affect.remove_collect(apply.ATT_GRADE_BONUS, 200) pc.setf("collect_quest_lv94","block_id",0) affect.remove_collect(1, 3000) affect.remove_collect(apply.DEF_GRADE_BONUS, 700) affect.remove_collect(apply.ATT_GRADE_BONUS, 300) pc.setf("collect_quest_lv96","block_id",0) while true do say_title("Seon-Pyeong:") say("") say("Escolhe a nova recompensa de LV.92:") say("") s = select("Max VD +1000","Defesa +300","Valor Ataque +100") if 1== s then if pc.getf("collect_quest_lv94","block_id") == 1 or pc.getf("collect_quest_lv96","block_id") == 1 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(1, 1000, 60*60*24*365*60) --hp+3000 hp is 1 pc.setf("collect_quest_lv92","block_id",1) break end elseif 2== s then if pc.getf("collect_quest_lv94","block_id") == 2 or pc.getf("collect_quest_lv96","block_id") == 2 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 300, 60*60*24*365*60) pc.setf("collect_quest_lv92","block_id",2) break end else if pc.getf("collect_quest_lv94","block_id") == 3 or pc.getf("collect_quest_lv96","block_id") == 3 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,100,60*60*24*365*60)--60years pc.setf("collect_quest_lv92","block_id",3) break end end end while true do say_title("Seon-Pyeong:") say("") say("Escolhe a nova recompensa de LV.94:") say("") s2 = select("Max VD +1500","Defesa +500","Valor Ataque +200") if 1== s2 then if pc.getf("collect_quest_lv92","block_id") == 1 or pc.getf("collect_quest_lv96","block_id") == 1 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(1, 1500, 60*60*24*365*60) --hp+3000 hp is 1 pc.setf("collect_quest_lv94","block_id",1) break end elseif 2== s2 then if pc.getf("collect_quest_lv92","block_id") == 2 or pc.getf("collect_quest_lv96","block_id") == 2 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 500, 60*60*24*365*60) pc.setf("collect_quest_lv94","block_id",2) break end else if pc.getf("collect_quest_lv92","block_id") == 3 or pc.getf("collect_quest_lv96","block_id") == 3 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,200,60*60*24*365*60)--60years pc.setf("collect_quest_lv94","block_id",3) break end end end while true do say_title("Seon-Pyeong:") say("") say("Escolhe a nova recompensa de LV.96:") say("") s3 = select("Max VD +3000","Defesa +700","Valor Ataque +300") if 1== s3 then if pc.getf("collect_quest_lv92","block_id") == 1 or pc.getf("collect_quest_lv94","block_id") == 1 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(1, 3000, 60*60*24*365*60) --hp+3000 hp is 1 pc.setf("collect_quest_lv96","block_id",1) break end elseif 2== s3 then if pc.getf("collect_quest_lv92","block_id") == 2 or pc.getf("collect_quest_lv94","block_id") == 2 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 700, 60*60*24*365*60) pc.setf("collect_quest_lv96","block_id",2) break end else if pc.getf("collect_quest_lv92","block_id") == 3 or pc.getf("collect_quest_lv94","block_id") == 3 then say_white("Dois extras não podem ser iguais.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,300,60*60*24*365*60)--60years pc.setf("collect_quest_lv96","block_id",3) break end end end end pc.setqf( "collect_count", 0 ) set_state( check_reset_able ) say_title("Seon-Pyeong:") say("") say("Já mudei as recompensas.") say("Vem ter comigo se precisares de mudar mais uma vez.") say("") end end end collect_quest_reset_v2.quest 1 Link to comment Share on other sites More sharing options...
Devil Posted November 28, 2016 at 11:49 AM Share Posted November 28, 2016 at 11:49 AM esta é uma quest sempre ativa ou apenas funciona uma vez? ate gostei da ideia de poderem alterar a escolha. Link to comment Share on other sites More sharing options...
[Admin] tierrilopes Posted November 28, 2016 at 01:32 PM Author Share Posted November 28, 2016 at 01:32 PM Sempre ativa, consumindo os 5 itens. No entanto pode ser adaptada para apenas funcionar uma vez. Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now