viewing paste Unknown #29169 | Text

Posted on the
1
// Card removal NPC by TyrNemesis^// DANGEROUS! TODO: Think.. think 8) [Lupus]// Edited by KDSG - tradução, sem chance de erro e de graça.// Tradução by Envolventssec_in02,29,183,4       script  Removedora      69,{    if(getgroupid() < 1) goto naovip;       UPGRADEROOT:    mes "[Removedora de Cartas]";   mes "Olá! Você gostaria de remover alguma carta de algum equipamento?";       next;   menu "Claro.",REMOVEMENU,            "O que você quer em troca?",REMOVEPRICE,       "Não, até mais.",CLOSEOUT;REMOVEPRICE:   mes "[Removedora de Cartas]";   mes "Isso não vai lhe custar absolutamente NADA.";     next;   menu "Tudo bem, vamos em frente.",REMOVEMENU,        "Não, obrigado.",CLOSEOUT;REMOVEMENU:     mes "[Removedora de Cartas]";   mes "Muito bem, que item você quer que eu olhe?";      next;   menu "Nenhum, mudei de idéia.",CLOSEOUT,            getequipname(1),SLOT1,          getequipname(2),SLOT2,          getequipname(3),SLOT3,          getequipname(4),SLOT4,          getequipname(5),SLOT5,          getequipname(6),SLOT6,          getequipname(7),SLOT7,          getequipname(8),SLOT8,          getequipname(9),SLOT9,          getequipname(10),SLOT10;SLOT1:     set @part,1;    goto CARDNUMCHECK;SLOT2:        set @part,2;    goto CARDNUMCHECK;SLOT3:        set @part,3;    goto CARDNUMCHECK;SLOT4:        set @part,4;    goto CARDNUMCHECK;SLOT5:        set @part,5;    goto CARDNUMCHECK;SLOT6:        set @part,6;    goto CARDNUMCHECK;SLOT7:        set @part,7;    goto CARDNUMCHECK;SLOT8:        set @part,8;    goto CARDNUMCHECK;SLOT9:        set @part,9;    goto CARDNUMCHECK;SLOT10:       set @part,10;   goto CARDNUMCHECK;CARDNUMCHECK: if(getequipcardcnt(@part) == 0) goto DENYCARDCOUNT;     set @cardcount,getequipcardcnt(@part);  if(@cardcount > 1) goto CARDNUMMULTIMSG;        mes "[Removedora de Cartas]";   mes "Este item tem " + @cardcount + " carta(s).";       goto CARDNUMPOSTMSG;CARDNUMMULTIMSG:    mes "[Removedora de Cartas]";   mes "Este item tem " + @cardcount + " carta(s).";CARDNUMPOSTMSG:        next;   menu "Ok, faça-o.",REMOVECARDWARNING,       "Deixa pra lá.",CLOSEOUT;REMOVECARDWARNING:       mes "[Removedora de Cartas]";   mes "Antes de começar, há chance de perder ou o item ou a carta, qual é o mais importante?"; next;   menu "Mudei de idéia...",CLOSEOUT,          "O Item.",PRIORITYITEM,         "As cartas.",PRIORITYCARD;PRIORITYITEM:    set @failtype,1;        goto REMOVECARD;PRIORITYCARD:   set @failtype,2;        goto REMOVECARD;REMOVECARD:     mes "[Removedora de Cartas]";   mes "Muito bem, vamos começar.";// Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt// First value = Total failure chance (item and cards destroyed)// Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe)// Third value = Harmless failure chance (all that's lost is your investment)        set @failchance,rand(100);//    if(@failchance < 0) goto FAILREMOVECARD0;//     if((@failchance < 0) && (@failtype == 1)) goto FAILREMOVECARD1;//       if((@failchance < 0) && (@failtype == 2)) goto FAILREMOVECARD2; if(@failchance < 0) goto FAILREMOVECARD3;       successremovecards @part;       next;   mes "[Removedora de Cartas]";   mes "A operação foi um sucesso, até mais.";  close;FAILREMOVECARD0:  failedremovecards @part,0;      next;   mes "[Removedora de Cartas]";   mes "The process was a total failure. I am afraid the item and the cards were destroyed.";      close;FAILREMOVECARD1:  failedremovecards @part,1;      next;   mes "[Removedora de Cartas]";   mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay.";  close;FAILREMOVECARD2:  failedremovecards @part,2;      next;   mes "[Removedora de Cartas]";   mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process.";   close;FAILREMOVECARD3:  failedremovecards @part,3;      next;   mes "[Removedora de Cartas]";   mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay."; close;DENYCARDCOUNT:    mes "[Removedora de Cartas]";   mes "Não há nenhuma carta para ser retirada!";        close;DENYMATERIAL:     next;   mes "[Removedora de Cartas]";   mes "You do not have all the items I require to work my magic, child. Come again when you do."; close;CLOSEOUT: mes "[Removedora de Cartas]";   mes "Tudo bem, volte quando precisar."; close;  naovip: mes "[Removedora de Cartas]";   mes "Sinto muito, mas você não é VIP";       close;}
Viewed 484 times, submitted by unknown.