Castle WOE 2.0

Tutti · April 20, 2015

Type'm with that in my mapserver.

Already tried everything here to be resolving this ERROR and you can not anyone knows how can I be packing it.

If someone can give me a help.

Alayne · April 20, 2015

Your use of getcastledata is wrong.

Here's the doc comment:

getcastledata("<map name>",<type of data>)

I don't know what you wanna check, but according to your script, replace

getcastledata "arug_cas03",0,"::OnRecvCastleAr03";

by

getcastledata "arug_cas03",0;

Tutti · April 20, 2015

If I removing the

OnRecvCastleAr03

It does not affect anything?

packed but now took a Warning and Debug how can I be packing it?

[Warning]: buildin_setcastledata: index = '0' is out of allowed range

[Debug]: Source (NPC): Gerente#aru03_02 at arug_cas03 (1,1)

Alayne · April 20, 2015

Actually I don't see why you've added these lines.

You don't do anything with the results you obtained.

And to be exact, the id of arug castle is "1", not 0.

Tutti · April 20, 2015

Friend this script I got was not me who created these lines would not want to know how can I be packing.

Alayne · April 20, 2015

Wow...Sorry don't understand what you want to say, except that you don't created the script initially ^^'

Tutti · April 20, 2015

I'm breaking the Emperium and is not appearing nick the player who broke

appears

The Fortress [Horn] of 'Valfreyja' was conquered by the guild [ownei] Thanks to player []

the script is so

The Fortress [" + getcastlename("arug_cas03") + "] of 'Valfreyja' was conquered by the guild [" + getguildname(.@GID) + "] Thanks to player ["+ .@breaker$ +"]",bc_all|bc_woe;

I found this script WOE 2.0 on google because of what was in my emulator was all buggy.

Edited April 20, 2015 by Tutti

Alayne · April 20, 2015

Ok but without the script, I can't tell you why the .@breaker$ variable isn't filled ^^'

Tutti · April 20, 2015

What variable can be putting to funfe nick the player to destroy the emperium?

Alayne · April 20, 2015

well at one moment or another, .@breaker$ should be filled with strcharinfo(0). Fill it when OnNPCKillEvent is called.

Tutti · April 20, 2015

could make me an example for me to see how it would look?

Alayne · April 20, 2015

Send me you OnNPCKillevent, it will be easier and I can complete it. Or check it at least.

Tutti · April 20, 2015

announce "A Fortaleza [" + getcastlename("arug_cas03") + "] de 'Valfreyja' foi conquistado pelo Clã [" + getguildname(.@GID) + "] Graças ao Jogador ["+ .@breaker$ +"]",bc_all|bc_woe;

evilpuncker · April 20, 2015

post the full script here on pastebin or something like that so we can take a look and help properly

Tutti · April 20, 2015

//= 1.0 First Version [L0ne_W0lf]
//= 1.1 Swaped an end for a close in eco investing. [L0ne_W0lf]
//= Fixed improper label used in guaridan stone.
//= 1.2 Fixed double message in defense investing. [L0ne_W0lf]
//= 1.3 Fixed a guardian spawning NPCs. [L0ne_W0lf]
//= 1.4 Fixed investment period not resetting. [L0ne_W0lf]
//= Made it so treasure won't spawn if castle is empty.
//= Treasure will now be killed before spawning.
//= 1.5 Tradução Efetuada [Reploid]
//= 1.6 Corrigido variáveis Defence [Asus/DaemonBSD]
//= 1.7 Correções e revisão [DaemonBSD]
//= 1.8 Fixado alguns bugs, de acordo com eAthena [Asus]
//= 1.9 Adicionado Labels de eventos para GDE_SE [soulBlaker]
//= Agora ela liga Independentemente.
//= 2.0 Corrigido Label de evento do Controle02. [soulBlaker]
//= 2.1 Adicionado setcell landprotector [Minos]
//= Para as barricadas não receberem dano de skills de área
//= enquanto as runas estiverem ativas
//= 2.2 Fixado bug, de acordo com eAthena [Lord]
//= 2.2a Corrigido problema com os monstros [Asus/SoulBlaker]
//= Ao destruir o emperium os monstros são mortos (cf. bRo)
//= 2.2b Corrido bug de acordo com o eAthena. [Lord]
//= 2.2c Corrigido erros de sintaxe. [Lord]
//= 2.3 Corrigido script. [Lord]
//= 2.4 Trocado efeitos numéricos por nomes. [Lord]
//= 2.5 Atualizado o sistema de economia/defesa. [RoM]
//= 2.6 Retirada emblemas dos Clãs no Serviço de Teleporte [Asus]
//= 2.6a Removido show [Yum]
//= 2.7 Fixed a possible exploit in guild castle investment. [brian]
//============================================================

arug_cas03,1,1,0 script Gerente#aru03_02 111,{
end;

OnInterIfInitOnce:
getcastledata "arug_cas03",1;
end;

OnRecvCastlear03:
requestguildinfo getcastledata("arug_cas03",1);
if (getcastledata("arug_cas03",1) == 0) {
donpcevent "Gerente#aru03_02::OnStart";
}
end;

OnAgitStart2:
if (agitcheck2()) {
maprespawnguildid "arug_cas03",getcastledata("arug_cas03",1),2;
gvgon "arug_cas03";
donpcevent "Gerente#aru03_02::OnStart";
}
else {
donpcevent "#aru03_RL00::OnDisable";
donpcevent "#aru03_RL01::OnDisable";
donpcevent "#aru03_RL02::OnDisable";
donpcevent "#aru03_RL03::OnDisable";
}
end;

OnAgitEnd2:
gvgoff "arug_cas03";
killmonster "arug_cas03","Steward#aru03::OnStartArena";
if (getcastledata("arug_cas03",1)) {
donpcevent "Gerente#aru03_02::OnReset";
donpcevent "Steward#aru03::OnStop";
}
end;

OnStart:
// 1st Guardian stone, 2nd Guardian stone, Barrier 1, Barrier 2, Barrier 3, Summon Guardians
// Settings for all but Summon Guardians
// 0 = Okay; 1 = Destroyed; 2 = Repairing
// Summon Guardians
// 0 = Do not Summon; 1 = Summon
if (getcastledata("arug_cas03",1)) {
setarray $agit_ar03[0],0,0,0,0,0,0;
donpcevent "#aru03_df01::OnEnable";
donpcevent "#aru03_df02::OnEnable";
donpcevent "#aru03_RL00::OnEnable";
donpcevent "#aru03_RL01::OnEnable";
donpcevent "#aru03_RL02::OnEnable";
donpcevent "#aru03_RL03::OnEnable";
}
if (agitcheck2()) {
monster "arug_cas03",141,293,"Emperium",1288,1,"Steward#aru03::OnStartArena";
}
end;

OnReset:
donpcevent "#aru03_df01::OnDisable";
donpcevent "#aru03_df02::OnDisable";
donpcevent "#aru03_gard01::OnReset";
donpcevent "#aru03_gard02::OnReset";
donpcevent "#aru03_RL00::OnDisable";
donpcevent "#aru03_RL01::OnDisable";
donpcevent "#aru03_RL02::OnDisable";
donpcevent "#aru03_RL03::OnDisable";
donpcevent "1ª Runa Guardiã#aru03::OnDisable";
donpcevent "2ª Runa Guardiã#aru03::OnDisable";
donpcevent "Controle01#aru03::OnDisable";
donpcevent "Controle02#aru03::OnDisable";
donpcevent "Controle03#aru03::OnDisable";
if (agitcheck2()) {
setarray $agit_ar03[0],0,0,1,1,1,0;
}
end;

Onchange:
setarray $agit_ar03[0],2,2,1,1,2,0;
monster "arug_cas03",141,293,"Emperium",1288,1,"Steward#aru03::OnStartArena";
donpcevent "Controle03#aru03::OnEnable";
donpcevent "1ª Runa Guardiã#aru03::OnEnable";
donpcevent "2ª Runa Guardiã#aru03::OnEnable";
end;

OnClock0001:
if (!getcastledata("arug_cas03",1)) end;
killmonster "arug_cas03","Gerente#aru03_02::OnTreasureDied";

if (getcastledata("arug_cas03",4)) {
set .@Economy,getcastledata("arug_cas03",2);
setcastledata "arug_cas03",2,.@Economy + getcastledata("arug_cas03",4) + (rand(2) && getgdskilllv(.@GID,10014));
if (getcastledata("arug_cas03",2) > 100) setcastledata "arug_cas03",2,100;
setcastledata "arug_cas03",4,0;
}
if (getcastledata("arug_cas03",5)) {
set .@Defence,getcastledata("arug_cas03",3);
setcastledata "arug_cas03",3,.@Defence + getcastledata("arug_cas03",5);
if (getcastledata("arug_cas03",3) > 100) setcastledata "arug_cas03",3,100;
setcastledata "arug_cas03",5,0;
}

set .@Treasure,getcastledata("arug_cas03",2)/5+4;
if (.@Treasure) {
monster "arug_cas03",291,276,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
monster "arug_cas03",292,276,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
monster "arug_cas03",293,276,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
monster "arug_cas03",294,276,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 5) end;
monster "arug_cas03",295,276,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 6) end;
monster "arug_cas03",296,276,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 7) end;
monster "arug_cas03",293,274,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 8) end;
monster "arug_cas03",294,274,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 9) end;
monster "arug_cas03",295,274,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 10) end;
monster "arug_cas03",296,274,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 11) end;
monster "arug_cas03",297,274,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 12) end;
monster "arug_cas03",298,274,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 13) end;
monster "arug_cas03",291,272,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 14) end;
monster "arug_cas03",292,272,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 15) end;
monster "arug_cas03",293,272,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 16) end;
monster "arug_cas03",294,272,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 17) end;
monster "arug_cas03",295,272,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 18) end;
monster "arug_cas03",296,272,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 19) end;
monster "arug_cas03",293,269,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 20) end;
monster "arug_cas03",294,269,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 21) end;
monster "arug_cas03",295,269,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 22) end;
monster "arug_cas03",296,269,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 23) end;
monster "arug_cas03",297,269,"Baú do Tesouro",1945,1,"Gerente#aru03_02::OnTreasureDied";
if (.@Treasure < 24) end;
monster "arug_cas03",298,269,"Baú do Tesouro",1324,1,"Gerente#aru03_02::OnTreasureDied";
}
end;

OnTreasureDied:
end;
}

arug_cas03,146,315,3 script Yehsus#aru03_01 868,{
set .@GID, getcastledata("arug_cas03",1);
if (.@GID == 0) {
mes "[Yehsus]";
mes "Bom trabalho. Agora, tudo que";
mes "você precisa fazer é destruir este";
mes "Emperium para ganhar a propriedade";
mes "desta fortaleza.";
close;
}
if (getcharid(2) == .@GID) {
if (strcharinfo(0) != getguildmaster(.@GID)) {
mes "[Yehsus]";
mes "Como guardião desta fortaleza,";
mes "eu apenas respondo ao mestre";
mes "do Clã que controla este";
mes "lugar.";
close;
}
else {
if (agitcheck2() == 0) {
mes "[Yehsus]";
mes "Eu sou Yehsus, guardião desta";
mes "fortaleza. Por enquanto,";
mes "tudo está quieto por aqui.";
next;
switch(select("Conversar:Cancelar")) {
case 1:
mes "[Yehsus]";
mes "Você tem alguma pergunta";
mes "para fazer sobre esta fortaleza?";
next;
switch(select("Runas Guardiãs:Portões da Fortaleza:Bandeiras:Estratégia de Batalha:Cancelar")) {
case 1:
mes "[Yehsus]";
mes "Há um Emperium e";
mes "duas Runas Guardiãs em";
mes "cada fortaleza. Estas runas";
mes "são a primeira linha de defesa,";
mes "e devem ser destruídas para que";
mes "os inimigos possam entrar.";
next;
mes "[Yehsus]";
mes "As runas estão localizadas no";
mes "^4D4DFFPortão Principal^000000 que deve ser";
mes "protegido para previnir que os";
mes "inimigos alcançem o Emperium.";
mes "Runas Guardiãs podem ^4D4DFFchamar";
mes "seus Guardiões^000000 para proteção.";
next;
mes "[Yehsus]";
mes "Fortalezas com maiores níveis";
mes "de defesa podem invocar mais";
mes "Guardiões: por isto é tão";
mes "importante para os Clãs";
mes "investir no Aumento da Defesa.";
next;
mes "[Yehsus]";
mes "Runas Guardiãs que foram";
mes "destruídas podem ser revividas";
mes "após um certo tempo, mas um dos membros do Clã deve me dar";
mes "a ordem. Eu apenas posso relatar o status das Runas Guardiãs.";
close;
case 2:
mes "[Yehsus]";
mes "Os ^4D4DFFPortões da Fortaleza^000000 são a segunda linha de defesa da fortaleza,";
mes "e são protegidos por barricadas extras ativadas pelas Runas Guardiãs.";
mes "Estes portões estão localizados em três partes diferentes da fortaleza.";
next;
mes "[Yehsus]";
mes "As Barricadas são protegidas pelas";
mes "Runas Guardiãs, e são";
mes "restauradas quando as Runas";
mes "Guardiãs são recuperadas. No entanto,";
mes "não é tão fácil restaurar os Portões da";
mes "Fortaleza que estão destruídos";
next;
mes "[Yehsus]";
mes "Os Portões da Fortaleza só podem ser";
mes "restaurados quando o ^4D4DFFLíder";
mes "mudar^000000, ou se ^4D4DFFa restauração";
mes "for solicitada pelo Líder";
mes "da Fortaleza^000000.";
close;
case 3:
mes "[Yehsus]";
mes "Nas Fortalezas há várias";
mes "Bandeiras que permitem que você";
mes "tenha acesso a áreas vitais dentro";
mes "das restrições colocadas pelas";
mes "Barricadas. Normalmente, ^4D4DFFa Bandeira 1";
mes "lhe envia para um dos Portões^000000.";
next;
mes "[Yehsus]";
mes "Muitas bandeiras o levam diretamente";
mes "a outras bandeiras próximas ao Emperium.";
mes "O número final de bandeiras conectadas";
mes "é para haver Facilidade na";
mes "entrada dos proprietários";
mes "da Fortaleza. Tenha isso em mente.";
close;
case 4:
mes "[Yehsus]";
mes "Estrátegia? Seria melhor você";
mes "desenvolver um plano de batalha";
mes "explorando as vantagens que seu Clã tem";
mes "e as fraquezas de seus inimigos.";
mes "Use os Portões e as Barricadas, e os reconstrua o mais rápido possível!";
close;
case 5:
mes "[Yehsus]";
mes "Você não tem nenhuma dúvida";
mes "para mim? Bem, eu estou";
mes "aqui para servir sempre que necessário.";
close;
}
case 2:
mes "[Yehsus]";
mes "Eu estou sempre aqui, então";
mes "sinta-se à vontade para pedir";
mes "minha assistência sempre que";
mes "for necessário.";
close;
}
}
else {
mes "[Yehsus]";
mes "Saudações, "+strcharinfo(0)+".";
mes "Quais são as suas ordens?";
next;
switch(select("Aumentar a defesa da Fortaleza:Relatório da Situação:Cancelar")) {
case 1:
if ($agit_ar03[5] == 0) {
if (getgdskilllv(.@GID,10002) == 0) {
mes "[Yehsus]";
mes "Lamento, mas as Runas Guardiãs";
mes "não são fortes o bastante para";
mes "invocar Guardiões no momento. Nós";
mes "precisamos acumular";
mes "sabedoria antes de invocarmos";
mes "Guardiões.";
close;
}
else {
mes "[Yehsus]";
mes "Eu vou me empenhar para invocar";
mes "um Guardião através de uma Runa";
mes "Guardiã. No entanto, fique sabendo";
mes "que isto não funcionará se a";
mes "Runa Guardiã estiver destruída.";
setarray $agit_ar03[5],1;
if ($agit_ar03[0] == 0) {
donpcevent "#aru03_gard01::OnEnable";
}
if ($agit_ar03[1] == 0) {
donpcevent "#aru03_gard02::OnEnable";
}
close;
}
}
else {
mes "[Yehsus]";
mes "Você já me deu a ordem para";
mes "invocar um Guardião para";
mes "defender a fortaleza.";
close;
}
case 2:
mes "[Yehsus]";
mes "O Estado de nossa defesa é...";
if ($agit_ar03[0] == 1) {
mes "1ª Runa Guardiã: ^FF0000Destruída^000000";
}
else if ($agit_ar03[0] == 2) {
mes "1ª Runa Guardiã: ^008000Reparando^000000";
}
else {
mes "1ª Runa Guardiã: ^4D4DFFOperacional^000000";
}
if ($agit_ar03[1] == 1) {
mes "2ª Runa Guardiã: ^FF0000Destruída^000000";
}
else if ($agit_ar03[1] == 2) {
mes "2ª Runa Guardiã: ^008000Reparando^000000";
}
else {
mes "2ª Runa Guardiã: ^4D4DFFOperacional^000000";
}
if ($agit_ar03[2] == 1) {
mes "1º Portão da Fortaleza: ^FF0000Destruído^000000";
}
else if ($agit_ar03[2] == 2) {
mes "1º Portão da Fortaleza: ^008000Reparando^000000";
}
else {
mes "1º Portão da Fortaleza: ^4D4DFFOperacional^000000";
}
if ($agit_ar03[3] == 1) {
mes "2º Portão da Fortaleza: ^FF0000Destruído^000000";
}
else if ($agit_ar03[3] == 2) {
mes "2º Portão da Fortaleza: ^008000Reparando^000000";
}
else {
mes "2º Portão da Fortaleza: ^4D4DFFOperacional^000000";
}
if ($agit_ar03[4] == 1) {
mes "3º Portão da Fortaleza: ^FF0000Destruído^000000";
}
else if ($agit_ar03[4] == 2) {
mes "3º Portão da Fortaleza: ^008000Reparando^000000";
}
else {
mes "3º Portão da Fortaleza: ^4D4DFFOperacional^000000";
}
close;
case 3:
mes "[Yehsus]";
mes "Eu vou estar aqui,";
mes "aguardando suas ordens.";
close;
}
}
}
}
else {
mes "[Yehsus]";
mes "Quem é você? Salafrário!";
mes "Deixe esta fortaleza agora!";
close;
}

OnInit:
setarray $agit_ar03[0],0,0,0,0,0,0;
end;
}

arug_cas03,1,1,0 script #aru03_gard01 -1,{
OnEnable:
set .@defence,getcastledata("arug_cas03",3);
guardian "arug_cas03",130,60,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //0;
if ((.@defence > 10) && (.@defence < 31)) {
set .MyMobCount,2;
guardian "arug_cas03",128,77,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //1;
}
else if ((.@defence > 30) && (.@defence < 51)) {
set .MyMobCount,3;
guardian "arug_cas03",128,77,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //1;
guardian "arug_cas03",128,90,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //2;
}
else if ((.@defence > 50) && (.@defence < 71)) {
set .MyMobCount,4;
guardian "arug_cas03",128,77,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //1;
guardian "arug_cas03",128,90,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //2;
guardian "arug_cas03",128,100,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //3;
}
else if (.@defence > 70) {
set .MyMobCount,5;
guardian "arug_cas03",128,77,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //1;
guardian "arug_cas03",128,90,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //2;
guardian "arug_cas03",128,100,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //3;
guardian "arug_cas03",110,96,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //4;
}
else {
set .MyMobCount,2;
guardian "arug_cas03",66,157,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //1;
}
initnpctimer;
end;

OnTimer300000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",91,53,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //5;
mapannounce "arug_cas03","O 1º Guardião foi invocado pelo Portão Principal.",bc_map,"0xff4500";
end;

OnTimer900000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",65,71,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //6;
mapannounce "arug_cas03","O 2º Guardião foi invocado pelo Portão Principal.",bc_map,"0xff4500";
end;

OnTimer1800000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",65,103,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //7;
mapannounce "arug_cas03","O 3º Guardião foi invocado pelo Portal Principal.",bc_map,"0xff4500";
end;

OnTimer2700000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",110,96,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //8;
mapannounce "arug_cas03","O 4º Guardião foi invocado pelo Portão Principal.",bc_map,"0xff4500";
end;

OnTimer3600000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",128,100,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //9;
mapannounce "arug_cas03","O 5º Guardião foi invocado pelo Portão Principal.",bc_map,"0xff4500";
stopnpctimer;
end;

OnGuardianDied:
set .MyMobCount,.MyMobCount-1;
if (.MyMobCount < 2) {
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",128,77,"Guardião",1899,"#aru03_gard01::OnGuardianDied"; //10;
}
end;

OnReset:
stopnpctimer;
killmonster "arug_cas03","#aru03_gard01::OnGuardianDied";
end;
}

arug_cas03,1,2,0 script #aru03_gard02 -1,{
OnEnable:
set .@defence,getcastledata("arug_cas03",3);
guardian "arug_cas03",156,101,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //11;
if ((.@defence > 10) && (.@defence < 31)) {
set .MyMobCount,2;
guardian "arug_cas03",172,95,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //12;
}
else if ((.@defence > 30) && (.@defence < 51)) {
set .MyMobCount,3;
guardian "arug_cas03",172,95,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //12;
guardian "arug_cas03",154,90,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //13;
}
else if ((.@defence > 50) && (.@defence < 71)) {
set .MyMobCount,4;
guardian "arug_cas03",172,95,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //12;
guardian "arug_cas03",154,90,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //13;
guardian "arug_cas03",156,77,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //14;
}
else if (.@defence > 70) {
set .MyMobCount,5;
guardian "arug_cas03",172,95,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //12;
guardian "arug_cas03",154,90,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //13;
guardian "arug_cas03",156,77,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //14;
guardian "arug_cas03",155,60,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //15;
}
else {
set .MyMobCount,2;
guardian "arug_cas03",211,159,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //12;
}
initnpctimer;
end;

OnTimer600000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",187,54,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //16;
end;

OnTimer1200000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",212,67,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //17;
end;

OnTimer2100000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",211,105,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //18;
end;

OnTimer3000000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",155,60,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //19;
end;

OnTimer3900000:
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",156,77,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //20;
stopnpctimer;
end;

OnGuardianDied:
set .MyMobCount,.MyMobCount-1;
if (.MyMobCount < 2) {
set .MyMobCount,.MyMobCount+1;
guardian "arug_cas03",172,95,"Guardião",1899,"#aru03_gard02::OnGuardianDied"; //21;
}
end;

OnReset:
stopnpctimer;
killmonster "arug_cas03","#aru03_gard02::OnGuardianDied";
end;
}

arug_cas03,1,3,0 script #aru03_df01 -1,{
OnEnable:
guardian "arug_cas03",65,171,"1ª Runa Guardiã",1907,"#aru03_df01::OnGuardianStoneDied"; //22;
end;

OnDisable:
killmonster "arug_cas03","#aru03_df01::OnGuardianStoneDied";
setarray $agit_ar03[0],1; //Global Variable
stopnpctimer;
end;

OnGuardianStoneDied:
// 1st Guardian Stone is Destroyed
setarray $agit_ar03[0],1;
if (($agit_ar03[0] == 1) || ($agit_ar03[0] == 2)) {
set .@destroyed,.@destroyed + 1;
}
if (($agit_ar03[1] == 1) || ($agit_ar03[1] == 2)) {
set .@destroyed,.@destroyed + 1;
}
if (.@destroyed == 2) {
mapannounce "arug_cas03","Todas as Runas Guardiãs foram destruídas!",bc_map,"0x00ff00";
donpcevent "#aru03_RL00::OnDisable";
donpcevent "#aru03_gard01::OnReset";
}
else {
mapannounce "arug_cas03","A 1ª Runa Guardiã foi destruída!",bc_map,"0x00ff00";
donpcevent "#aru03_gard01::OnReset";
}
initnpctimer;
end;

OnTimer300000:
donpcevent "1ª Runa Guardiã#aru03::OnEnable";
setarray $agit_ar03[0],2; //Global Variable
stopnpctimer;
end;
}

arug_cas03,65,171,0 script 1ª Runa Guardiã#aru03 844,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFVocê precisará dos";
mes "seguintes materiais para";
mes "reconstruir uma Runa Guardiã";
mes "que foi destruída.^000000";
next;
mes "1 Oridecon";
mes "1 Elunium";
mes "30 Pedras";
mes "5 Gemas Azuis";
mes "5 Gemas Amarelas";
mes "5 Gemas Vermelhas";
next;
mes "^3355FFVocê deseja continuar?^000000";
switch(select("Não:Continuar")) {
case 1:
mes "^3355FFServiço cancelado.^000000";
close;
case 2:
if ((countitem(984) > 0) && (countitem(985) > 0) && (countitem(7049) > 29) && (countitem(717) > 4) && (countitem(715) > 4) && (countitem(716) > 4)) {
mes "^3355FFOrganize as Pedras, Eluniums, e";
mes "Oridecons, nesta ordem, no";
mes "centro. E então você deve organizar";
mes "as Gemas encantadas para";
mes "reconstruir a Runa Guardiã.^000000";
next;
switch(select("Eluniums:Oridecons:Pedras")) {
case 1:
mes "^3355FFOs Eluniums foram";
mes "colocados no centro.^000000";
next;
break;
case 2:
mes "^3355FFOs Oridecons foram";
mes "colocados no centro.^000000";
next;
break;
case 3:
mes "^3355FFAs Pedras foram";
mes "colocadas no centro.^000000";
set .@nice,.@nice+10;
next;
break;
}
switch(select("Eluniums:Oridecons:Pedras")) {
case 1:
mes "^3355FFVocê faz um círculo";
mes "em volta do centro";
mes "com alguns Eluniums.^000000";
set .@nice,.@nice+10;
next;
break;
case 2:
mes "^3355FFVocê faz um círculo";
mes "em volta do centro";
mes "com alguns Oridecons.^000000";
next;
break;
case 3:
mes "^3355FFVocê faz um círculo";
mes "em volta do centro";
mes "com algumas Pedras.^000000";
next;
break;
}
switch(select("Eluniums:Oridecons:Pedras")) {
case 1:
mes "^3355FFVocê cobre o";
mes "resto do material com";
mes "alguns Eluniums.^000000";
next;
break;
case 2:
mes "^3355FFVocê cobre o";
mes "resto do material com";
mes "alguns Oridecons.^000000";
set .@nice,.@nice+10;
next;
break;
case 3:
mes "^3355FFVocê cobre o";
mes "resto do material com";
mes "algumas Pedras.^000000";
next;
break;
}
mes "^3355FFAgora você precisa organizar";
mes "as Gemas encantadas de";
mes "acordo. Você pode identificar";
mes "suas propriedades mágicas pelo";
mes "seu efeito lançado.^000000";
next;
while(1) {
if (.@roof0 > 7) {
break;
}
else {
switch(rand(1,3)) {
case 1:
specialeffect EF_BEGINSPELL2;
mes "^3355FFAs Gemas devem ser";
mes "organizadas na ordem correta";
mes "de acordo com seus Poderes";
mes "e Propriedades Mágicas.^000000";
next;
switch(select("Gema Vermelha:Gema Amarela:Gema Azul")) {
case 1:
mes "^3355FFVocê coloca a Gema Vermelha.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 2:
mes "^3355FFVocê coloca a Gema Amarela.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 3:
mes "^3355FFVocê coloca a Gema Azul.^000000";
set .@nice,.@nice+10;
set .@roof0,.@roof0 + 1;
specialeffect EF_STEAL;
next;
break;
}
break;
case 2:
specialeffect EF_VOLCANO;
mes "^3355FFAs Gemas devem ser";
mes "organizadas na ordem correta";
mes "de acordo com seus Poderes";
mes "e Propriedades Mágicas.^000000";
next;
switch(select("Gema Vermelha:Gema Amarela:Gema Azul")) {
case 1:
mes "^3355FFVocê coloca a Gema Vermelha.^000000";
set .@nice,.@nice+10;
set .@roof0,.@roof0 + 1;
specialeffect EF_STEAL;
next;
break;
case 2:
mes "^3355FFVocê coloca a Gema Amarela.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 3:
mes "^3355FFVocê coloca a Gema Azul.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
}
break;
case 3:
specialeffect EF_BEGINSPELL4;
mes "^3355FFAs Gemas devem ser";
mes "organizadas na ordem correta";
mes "de acordo com seus Poderes";
mes "e Propriedades Mágicas.^000000";
next;
switch(select("Gema Vermelha:Gema Amarela:Gema Azul")) {
case 1:
mes "^3355FFVocê coloca a Gema Vermelha.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 2:
mes "^3355FFVocê coloca a Gema Amarela.^000000";
set .@nice,.@nice+10;
set .@roof0,.@roof0 + 1;
specialeffect EF_STEAL;
next;
break;
case 3:
mes "^3355FFVocê coloca a Gema Azul.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
}
}
}
}
if (.@nice > 90) {
if ($agit_ar03[0] == 0) {
mes "^3355FFO Sistema de Reparo";
mes "de Runas Guardiãs";
mes "está completo.^000000";
close;
}
else {
if (agitcheck2() == 0) {
mes "^3355FFÉ Impossível reconstruir";
mes "a Runa Guardiã porque";
mes "o Emperium não";
mes "está presente.^000000";
close;
}
else {
mes "^3355FFAs Gemas foram organizadas,";
mes "e a Runa Guardiã foi reparada";
mes "com sucesso.^000000";
delitem 984,1; //Oridecon
delitem 985,1; //Elunium
delitem 7049,30; //Stone
delitem 717,5; //Blue_Gemstone
delitem 715,5; //Yellow_Gemstone
delitem 716,5; //Red_Gemstone
close2;
donpcevent "#aru03_df01::OnEnable";
specialeffect EF_ICECRASH;
disablenpc "1ª Runa Guardiã#aru03";
setarray $agit_ar03[0],0;
set .@df_all,$agit_ar03[0]+$agit_ar03[1];
if (.@df_all == 0) {
mapannounce "arug_cas03","Ambas as Runas Guardiãs estão de pé, reforçando as defesas desta fortaleza!",bc_map,"0x00ff00";
donpcevent "#aru03_RL00::OnEnable";
}
else {
mapannounce "arug_cas03","A 1ª Runa Guardiã foi reparada com Sucesso.",bc_map,"0x00ff00";
}
if ($agit_ar03[5] == 1) {
donpcevent "#aru03_gard01::OnEnable";
}
end;
}
}
}
else {
mes "^3355FFDepois de todo este trabalho...";
mes "Parece que você falhou em";
mes "reparar as Runas Guardiãs,";
mes "e perdeu materiais.^000000";
delitem 7049,10; //Stone
delitem 717,2; //Blue_Gemstone
delitem 715,2; //Yellow_Gemstone
delitem 716,2; //Red_Gemstone
close;
}
}
else {
mes "^3355FFVocê não tem materiais o";
mes "suficiente para reparar";
mes "a Runa Guardiã.^000000";
close;
}
}
}
end;

OnInit:
disablenpc "1ª Runa Guardiã#aru03";
end;

OnEnable:
enablenpc "1ª Runa Guardiã#aru03";
specialeffect EF_MAPPILLAR2;
end;

OnDisable:
disablenpc "1ª Runa Guardiã#aru03";
end;
}

arug_cas03,1,4,0 script #aru03_df02 -1,{
OnEnable:
guardian "arug_cas03",212,149,"2ª Runa Guardiã",1908,"#aru03_df02::OnGuardianStoneDied"; //23;
end;

OnDisable:
killmonster "arug_cas03","#aru03_df02::OnGuardianStoneDied";
setarray $agit_ar03[1],1; //Global Variable
stopnpctimer;
end;

OnGuardianStoneDied:
// 2nd Guardian Stone is Destroyed
setarray $agit_ar03[1],1;
if (($agit_ar03[0] == 1) || ($agit_ar03[0] == 2)) {
set .@destroyed,.@destroyed + 1;
}
if (($agit_ar03[1] == 1) || ($agit_ar03[1] == 2)) {
set .@destroyed,.@destroyed + 1;
}
if (.@destroyed == 2) {
mapannounce "arug_cas03","Todas as Runas Guardiãs foram destruídas!",bc_map,"0x00ff00";
donpcevent "#aru03_RL00::OnDisable";
donpcevent "#aru03_gard02::OnReset";
}
else {
mapannounce "arug_cas03","A 2ª Runa Guardiã foi destruída!",bc_map,"0x00ff00";
donpcevent "#aru03_gard02::OnReset";
}
initnpctimer;
end;

OnTimer300000:
donpcevent "2ª Runa Guardiã#aru03::OnEnable";
setarray $agit_ar03[1],2; //Global Variable
stopnpctimer;
end;
}

arug_cas03,212,149,0 script 2ª Runa Guardiã#aru03 844,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFVocê precisará dos";
mes "seguintes materiais para";
mes "reconstruir uma Runa Guardiã";
mes "que foi destruída.^000000";
next;
mes "1 Oridecon";
mes "1 Elunium";
mes "30 Pedras";
mes "5 Gemas Azuis";
mes "5 Gemas Amarelas";
mes "5 Gemas Vermelhas";
next;
mes "^3355FFVocê deseja continuar?^000000";
switch(select("Não:Continuar")) {
case 1:
mes "^3355FFServiço cancelado.^000000";
close;
case 2:
if ((countitem(984) > 0) && (countitem(985) > 0) && (countitem(7049) > 29) && (countitem(717) > 4) && (countitem(715) > 4) && (countitem(716) > 4)) {
mes "^3355FFOrganize as Pedras, Eluniums, e";
mes "Oridecons, nesta ordem, no";
mes "centro. E então você deve organizar";
mes "as Gemas encantadas para";
mes "reconstruir a Runa Guardiã.^000000";
next;
switch(select("Eluniums:Oridecons:Pedras")) {
case 1:
mes "^3355FFOs Eluniums foram";
mes "colocados no centro.^000000";
next;
break;
case 2:
mes "^3355FFOs Oridecons foram";
mes "colocados no centro.^000000";
next;
break;
case 3:
mes "^3355FFAs Pedras foram";
mes "colocadas no centro.^000000";
set .@nice,.@nice+10;
next;
break;
}
switch(select("Eluniums:Oridecons:Pedras")) {
case 1:
mes "^3355FFVocê faz um círculo";
mes "em volta do centro";
mes "com alguns Eluniums.^000000";
set .@nice,.@nice+10;
next;
break;
case 2:
mes "^3355FFVocê faz um círculo";
mes "em volta do centro";
mes "com alguns Oridecons.^000000";
next;
break;
case 3:
mes "^3355FFVocê faz um círculo";
mes "em volta do centro";
mes "com algumas Pedras.^000000";
next;
break;
}
switch(select("Eluniums:Oridecons:Pedras")) {
case 1:
mes "^3355FFVocê cobre o";
mes "resto do material com";
mes "alguns Eluniums.^000000";
next;
break;
case 2:
mes "^3355FFVocê cobre o";
mes "resto do material com";
mes "alguns Oridecons.^000000";
set .@nice,.@nice+10;
next;
break;
case 3:
mes "^3355FFVocê cobre o";
mes "resto do material com";
mes "algumas Pedras.^000000";
next;
break;
}
mes "^3355FFAgora você precisa organizar";
mes "as Gemas encantadas de";
mes "acordo. Você pode identificar";
mes "suas propriedades mágicas pelo";
mes "seu efeito lançado.^000000";
next;
while(1) {
if (.@roof0 > 7) {
break;
}
else {
switch(rand(1,3)) {
case 1:
specialeffect EF_BEGINSPELL2;
mes "^3355FFAs Gemas devem ser";
mes "organizadas na ordem correta";
mes "de acordo com seus Poderes";
mes "e Propriedades Mágicas.^000000";
next;
switch(select("Gema Vermelha:Gema Amarela:Gema Azul")) {
case 1:
mes "^3355FFVocê coloca a Gema Vermelha.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 2:
mes "^3355FFVocê coloca a Gema Amarela.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 3:
mes "^3355FFVocê coloca a Gema Azul.^000000";
set .@nice,.@nice+10;
set .@roof0,.@roof0 + 1;
specialeffect EF_STEAL;
next;
break;
}
break;
case 2:
specialeffect EF_VOLCANO;
mes "^3355FFAs Gemas devem ser";
mes "organizadas na ordem correta";
mes "de acordo com seus Poderes";
mes "e Propriedades Mágicas.^000000";
next;
switch(select("Gema Vermelha:Gema Amarela:Gema Azul")) {
case 1:
mes "^3355FFVocê coloca a Gema Vermelha.^000000";
set .@nice,.@nice+10;
set .@roof0,.@roof0 + 1;
specialeffect EF_STEAL;
next;
break;
case 2:
mes "^3355FFVocê coloca a Gema Amarela.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 3:
mes "^3355FFVocê coloca a Gema Azul.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
}
break;
case 3:
specialeffect EF_BEGINSPELL4;
mes "^3355FFAs Gemas devem ser";
mes "organizadas na ordem correta";
mes "de acordo com seus Poderes";
mes "e Propriedades Mágicas.^000000";
next;
switch(select("Gema Vermelha:Gema Amarela:Gema Azul")) {
case 1:
mes "^3355FFVocê coloca a Gema Vermelha.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
case 2:
mes "^3355FFVocê coloca a Gema Amarela.^000000";
set .@nice,.@nice+10;
set .@roof0,.@roof0 + 1;
specialeffect EF_STEAL;
next;
break;
case 3:
mes "^3355FFVocê coloca a Gema Azul.";
mes "Porém, o Sistema de Reparo de";
mes "Runas Guardiãs falha por causa";
mes "de um conflito de poderes mágicos.^000000";
close;
}
}
}
}
if (.@nice > 90) {
if ($agit_ar03[1] == 0) {
mes "^3355FFO Sistema de Reparo";
mes "de Runas Guardiãs";
mes "está completo.^000000";
close;
}
else {
if (agitcheck2() == 0) {
mes "^3355FFÉ Impossível reconstruir";
mes "a Runa Guardiã porque";
mes "o Emperium não";
mes "está presente.^000000";
close;
}
else {
mes "^3355FFAs Gemas foram organizadas,";
mes "e a Runa Guardiã foi reparada";
mes "com sucesso.^000000";
delitem 984,1; //Oridecon
delitem 985,1; //Elunium
delitem 7049,30; //Stone
delitem 717,5; //Blue_Gemstone
delitem 715,5; //Yellow_Gemstone
delitem 716,5; //Red_Gemstone
close2;
donpcevent "#aru03_df02::OnEnable";
specialeffect EF_ICECRASH;
disablenpc "2ª Runa Guardiã#aru03";
setarray $agit_ar03[1],0;
set .@df_all,$agit_ar03[0]+$agit_ar03[1];
if (.@df_all == 0) {
mapannounce "arug_cas03","Ambas as Runas Guardiãs estão de pé, reforçando as defesas desta fortaleza!",bc_map,"0x00ff00";
donpcevent "#aru03_RL00::OnEnable";
}
else {
mapannounce "arug_cas03","A 2ª Runa Guardiã foi reparada com Sucesso.",bc_map,"0x00ff00";
}
if ($agit_ar03[5] == 1) {
donpcevent "#aru03_gard02::OnEnable";
}
end;
}
}
}
else {
mes "^3355FFDepois de todo este trabalho...";
mes "Parece que você falhou em";
mes "reparar as Runas Guardiãs,";
mes "e perdeu materiais.^000000";
delitem 7049,10; //Stone
delitem 717,2; //Blue_Gemstone
delitem 715,2; //Yellow_Gemstone
delitem 716,2; //Red_Gemstone
close;
}
}
else {
mes "^3355FFVocê não tem materiais o";
mes "suficiente para reparar";
mes "a Runa Guardiã.^000000";
close;
}
}
}
end;

OnInit:
disablenpc "2ª Runa Guardiã#aru03";
end;

OnEnable:
enablenpc "2ª Runa Guardiã#aru03";
specialeffect EF_MAPPILLAR2;
end;

OnDisable:
disablenpc "2ª Runa Guardiã#aru03";
end;
}

// Barrier Summoners
arug_cas03,2,1,0 script #aru03_RL00 -1,{
OnEnable:
setcell "arug_cas03",138,110,145,110,cell_walkable,0;
setcell "arug_cas03",138,110,145,110,cell_shootable,0;
setcell "arug_cas03",138,110,145,110,cell_landprotector,0;
guardian "arug_cas03",139,111," ",1905,"#aru03_RL00::OnBarrierDestroyed"; //24;
guardian "arug_cas03",141,111," ",1905,"#aru03_RL00::OnBarrierDestroyed"; //25;
guardian "arug_cas03",143,111," ",1905,"#aru03_RL00::OnBarrierDestroyed"; //26;
guardian "arug_cas03",145,111," ",1905,"#aru03_RL00::OnBarrierDestroyed"; //27;
end;

OnDisable:
setcell "arug_cas03",138,110,145,110,cell_walkable,1;
setcell "arug_cas03",138,110,145,110,cell_shootable,1;
setcell "arug_cas03",138,110,145,110,cell_landprotector,1;
killmonster "arug_cas03","#aru03_RL00::OnBarrierDestroyed";
end;

OnBarrierDestroyed:
end;
}

arug_cas03,2,2,0 script #aru03_RL01 -1,{
OnEnable:
set .MyMobCount,6;
setcell "arug_cas03",139,158,144,158,cell_walkable,0;
guardian "arug_cas03",140,157," ",1905,"#aru03_RL01::OnBarrierDestroyed"; //28;
guardian "arug_cas03",142,157," ",1905,"#aru03_RL01::OnBarrierDestroyed"; //29;
guardian "arug_cas03",144,157," ",1905,"#aru03_RL01::OnBarrierDestroyed"; //30;
guardian "arug_cas03",139,156," ",1905,"#aru03_RL01::OnBarrierDestroyed"; //31;
guardian "arug_cas03",141,156," ",1905,"#aru03_RL01::OnBarrierDestroyed"; //32;
guardian "arug_cas03",143,156," ",1905,"#aru03_RL01::OnBarrierDestroyed"; //33;
end;

OnBarrierDestroyed:
set .MyMobCount,.MyMobCount-1;
if (.MyMobCount == 0) {
setarray $agit_ar03[2],1;
mapannounce "arug_cas03","O 1º Portão da Fortaleza foi destruído.",bc_map,"0x00ff00";
setcell "arug_cas03",139,158,144,158,cell_walkable,1;
}
end;

OnDisable:
setcell "arug_cas03",139,158,144,158,cell_walkable,1;
killmonster "arug_cas03","#aru03_RL01::OnBarrierDestroyed";
end;
}

arug_cas03,2,3,0 script #aru03_RL02 -1,{
OnEnable:
set .MyMobCount,6;
setcell "arug_cas03",138,210,145,210,cell_walkable,0;
guardian "arug_cas03",140,209," ",1905,"#aru03_RL02::OnBarrierDestroyed"; //34;
guardian "arug_cas03",142,209," ",1905,"#aru03_RL02::OnBarrierDestroyed"; //35;
guardian "arug_cas03",144,209," ",1905,"#aru03_RL02::OnBarrierDestroyed"; //36;
guardian "arug_cas03",139,208," ",1905,"#aru03_RL02::OnBarrierDestroyed"; //37;
guardian "arug_cas03",141,208," ",1905,"#aru03_RL02::OnBarrierDestroyed"; //38;
guardian "arug_cas03",143,208," ",1905,"#aru03_RL02::OnBarrierDestroyed"; //39;
end;

OnBarrierDestroyed:
set .MyMobCount,.MyMobCount-1;
if (.MyMobCount == 0) {
setarray $agit_ar03[3],1;
mapannounce "arug_cas03","O 2º Portão da Fortaleza foi destruído.",bc_map,"0x00ff00";
setcell "arug_cas03",138,210,145,210,cell_walkable,1;
}
end;

OnDisable:
setcell "arug_cas03",138,210,145,210,cell_walkable,1;
killmonster "arug_cas03","#aru03_RL02::OnBarrierDestroyed";
end;
}

arug_cas03,2,4,0 script #aru03_RL03 -1,{
OnEnable:
set .MyMobCount,4;
setcell "arug_cas03",138,263,145,263,cell_walkable,0;
guardian "arug_cas03",139,262," ",1905,"#aru03_RL03::OnBarrierDestroyed"; //40;
guardian "arug_cas03",141,262," ",1905,"#aru03_RL03::OnBarrierDestroyed"; //41;
guardian "arug_cas03",143,262," ",1905,"#aru03_RL03::OnBarrierDestroyed"; //42;
guardian "arug_cas03",145,262," ",1905,"#aru03_RL03::OnBarrierDestroyed"; //43;
end;

OnBarrierDestroyed:
set .MyMobCount,.MyMobCount-1;
if (.MyMobCount == 0) {
setarray $agit_ar03[4],1;
mapannounce "arug_cas03","O 3º Portão da Fortaleza foi destruído.",bc_map,"0x00ff00";
setcell "arug_cas03",138,363,145,263,cell_walkable,1;
}
end;

OnDisable:
setcell "arug_cas03",138,363,145,263,cell_walkable,1;
killmonster "arug_cas03","#aru03_RL03::OnBarrierDestroyed";
end;
}

arug_cas03,136,158,0 script Controle01#aru03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
if (strcharinfo(0) == getguildmaster(.@GID)) {
if ($agit_ar03[2] == 2) {
mes "^3355FFPortões da Fortaleza";
mes "Demolidos podem ser reparados,";
mes "mas você precisa conseguir";
mes "os seguintes materiais.^000000";
next;
mes "^4D4DFF10 Aços^000000,";
mes "^4D4DFF30 Troncos^000000,";
mes "^4D4DFF5 Oridecons^000000, e";
mes "^4D4DFF10 Emveretarcons^000000.";
next;
select("Continuar");
if ((countitem(1019) > 29) && (countitem(999) > 9) && (countitem(1011) > 9) && (countitem(984) > 4)) {
mes "^3355FFVocê precisará de Troncos para";
mes "reparar a estrutura de suporte,";
mes "Oridecons para aumentar";
mes "a resistência do Portão, e";
mes "Emveretarcons para basicamente";
mes "segurar tudo junto.^000000";
next;
set .@ro_of01,rand(10,15);
while(1) {
if (.@ro_of02 == .@ro_of01) {
break;
}
else {
switch(rand(1,4)) {
case 1:
mes "^3355FFA estrutura de suporte";
mes "está terrivelmente danificada:";
mes "reparar esta parte";
mes "é a prioridade.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFA estrutura foi";
mes "reforçada com madeira.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 2:
mes "^3355FFVocê tentou usar aço,";
mes "mas parece que não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
case 3:
mes "^3355FFVocê tentou usar emveretarcon,";
mes "mas parece que não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
case 4:
mes "^3355FFVocê tentou usar o oridecon,";
mes "mas parece que ele não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
}
break;
case 2:
mes "^3355FFParece que em geral";
mes "a resistência do portão tem";
mes "que ser reforçada com alguma coisa.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira";
mes "para reforçar o portão.^000000";
set .@ro_of02,.@ro_of02 + 1;
next;
break;
case 2:
mes "^3355FFVocê tentou usar aço";
mes "para reforçar o portão, mas";
mes "isto não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 3:
mes "^3355FFVocê tentou usar emveretarcon";
mes "para reforçar o portão, mas";
mes "isto não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 4:
mes "^3355FFVocê martelou o";
mes "oridecon: parece que";
mes "isso irá funcionar.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
}
break;
case 3:
mes "^3355FFO dano ao portão";
mes "causou todas estas";
mes "rachaduras. Você terá de";
mes "soldá-las de algum modo.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira";
mes "para corrigir este problema,";
mes "mas parece que só piorou a situação.";
mes "Você terá que começar novamente.^000000";
close;
case 2:
mes "^3355FFVocê usou o aço para soldar";
mes "todas as rachaduras: o portão está";
mes "começando a ficar mais sólido.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 3:
mes "^3355FFVocê tentou usar emveretarcon";
mes "para reforçar o portão, mas isto";
mes "não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 4:
mes "^3355FFVocê tentou usar oridecon,";
mes "mas isto não funcionou muito";
mes "bem. Você terá que";
mes "começar novamente.^000000";
close;
}
break;
case 4:
mes "^3355FFAgora você tem que ter";
mes "certeza de que o portão é seguro";
mes "e ao mesmo tempo sólido.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira para";
mes "solucionar este problema, mas parece";
mes "que o problema até piorou.";
mes "Você terá que começar tudo denovo.^000000";
close;
case 2:
mes "^3355FFVocê tentou usar aço,";
mes "mas não funcionou muito";
mes "bem. Você tem que tentar";
mes "com outra coisa.^000000";
close;
case 3:
mes "^3355FFVocê teve sucesso em";
mes "usar emveretarcon para reparar";
mes "os problemas do portão.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 4:
mes "^3355FFVocê tentou usar oridecon,";
mes "mas não funcionou muito";
mes "bem. Você tem que tentar";
mes "com outra coisa.^000000";
close;
}
}
}
}
mes "^3355FFBem, parece que";
mes "você conseguiu reparar";
mes "o portão.^000000";
next;
if (agitcheck2() == 0) {
mes "^3355FFInfelizmente, o Portão";
mes "da Fortaleza não pode ser reconstruído:";
mes "o Emperium não está mais aqui.^000000";
close;
}
else {
if (.@rp_temp == .@ro_of01) {
mes "^3355FFO Portão da Fortaleza";
mes "foi reparado com Sucesso!^000000";
delitem 1019,30; //Wooden_Block
delitem 999,10; //Steel
delitem 1011,10; //Emveretarcon
delitem 984,5; //Oridecon
close2;
donpcevent "#aru03_RL01::OnEnable";
disablenpc "Controle01#aru03";
mapannounce "arug_cas03","O 1º Portão da Fortaleza foi reconstruído!",bc_map,"0x00ff00";
setarray $agit_ar03[2],0;
end;
}
else {
mes "^3355FFO muro foi destruído,";
mes "e a tentativa de reparar o";
mes "Portão da Fortaleza falhou.";
mes "Você perdeu alguns de seus";
mes "itens para a reparação...^000000";
delitem 984,2; //Oridecon
delitem 999,4; //Steel
delitem 1019,14; //Wooden_Block
delitem 1011,3; //Emveretarcon
close;
}
}
}
else {
mes "^3355FFVocê não pode tentar reparar";
mes "o Portão da Fortaleza se você não";
mes "tiver todos os materiais necessários.^000000";
close;
}
}
}
}
end;

OnInit:
disablenpc "Controle01#aru03";
end;

OnEnable:
enablenpc "Controle01#aru03";
end;

OnDisable:
disablenpc "Controle01#aru03";
end;
}

arug_cas03,135,212,0 script Controle02#aru03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
if (strcharinfo(0) == getguildmaster(.@GID)) {
if ($agit_ar03[3] == 2) {
mes "^3355FFPortões da Fortaleza";
mes "Demolidos podem ser reparados,";
mes "mas você precisa conseguir";
mes "os seguintes materiais.^000000";
next;
mes "^4D4DFF10 Aços^000000,";
mes "^4D4DFF30 Troncos^000000,";
mes "^4D4DFF5 Oridecons^000000, e";
mes "^4D4DFF10 Emveretarcons^000000.";
next;
select("Continuar");
if ((countitem(1019) > 29) && (countitem(999) > 9) && (countitem(1011) > 9) && (countitem(984) > 4)) {
mes "^3355FFVocê precisará de Troncos para";
mes "reparar a estrutura de suporte,";
mes "Oridecons para aumentar";
mes "a resistência do Portão, e";
mes "Emveretarcons para basicamente";
mes "segurar tudo junto.^000000";
next;
set .@ro_of01,rand(10,15);
while(1) {
if (.@ro_of02 == .@ro_of01) {
break;
}
else {
switch(rand(1,4)) {
case 1:
mes "^3355FFA estrutura de suporte";
mes "está terrivelmente danificada:";
mes "reparar esta parte";
mes "é a prioridade.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFA estrutura foi";
mes "reforçada com madeira.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 2:
mes "^3355FFVocê tentou usar aço,";
mes "mas parece que não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
case 3:
mes "^3355FFVocê tentou usar emveretarcon,";
mes "mas parece que não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
case 4:
mes "^3355FFVocê tentou usar o oridecon,";
mes "mas parece que ele não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
}
break;
case 2:
mes "^3355FFParece que em geral";
mes "a resistência do portão tem";
mes "que ser reforçada com alguma coisa.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira";
mes "para reforçar o portão.^000000";
set .@ro_of02,.@ro_of02 + 1;
next;
break;
case 2:
mes "^3355FFVocê tentou usar aço";
mes "para reforçar o portão, mas";
mes "isto não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 3:
mes "^3355FFVocê tentou usar emveretarcon";
mes "para reforçar o portão, mas";
mes "isto não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 4:
mes "^3355FFVocê martelou o";
mes "oridecon: parece que";
mes "isso irá funcionar.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
}
break;
case 3:
mes "^3355FFO dano ao portão";
mes "causou todas estas";
mes "rachaduras. Você terá de";
mes "soldá-las de algum modo.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira";
mes "para corrigir este problema,";
mes "mas parece que só piorou a situação.";
mes "Você terá que começar novamente.^000000";
close;
case 2:
mes "^3355FFVocê usou o aço para soldar";
mes "todas as rachaduras: o portão está";
mes "começando a ficar mais sólido.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 3:
mes "^3355FFVocê tentou usar emveretarcon";
mes "para reforçar o portão, mas isto";
mes "não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 4:
mes "^3355FFVocê tentou usar oridecon,";
mes "mas isto não funcionou muito";
mes "bem. Você terá que";
mes "começar novamente.^000000";
close;
}
break;
case 4:
mes "^3355FFAgora você tem que ter";
mes "certeza de que o portão é seguro";
mes "e ao mesmo tempo sólido.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira para";
mes "solucionar este problema, mas parece";
mes "que o problema até piorou.";
mes "Você terá que começar tudo denovo.^000000";
close;
case 2:
mes "^3355FFVocê tentou usar aço,";
mes "mas não funcionou muito";
mes "bem. Você tem que tentar";
mes "com outra coisa.^000000";
close;
case 3:
mes "^3355FFVocê teve sucesso em";
mes "usar emveretarcon para reparar";
mes "os problemas do portão.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 4:
mes "^3355FFVocê tentou usar oridecon,";
mes "mas não funcionou muito";
mes "bem. Você tem que tentar";
mes "com outra coisa.^000000";
close;
}
}
}
}
mes "^3355FFBem, parece que";
mes "você conseguiu reparar";
mes "o portão.^000000";
next;
if (agitcheck2() == 0) {
mes "^3355FFInfelizmente, o Portão";
mes "da Fortaleza não pode ser reconstruído:";
mes "o Emperium não está mais aqui.^000000";
close;
}
else {
if (.@rp_temp == .@ro_of01) {
mes "^3355FFO Portão da Fortaleza";
mes "foi reparado com Sucesso!^000000";
delitem 1019,30; //Wooden_Block
delitem 999,10; //Steel
delitem 1011,10; //Emveretarcon
delitem 984,5; //Oridecon
close2;
donpcevent "#aru03_RL02::OnEnable";
disablenpc "Controle02#aru03";
mapannounce "arug_cas03","O 2º Portão da Fortaleza foi reconstruído!",bc_map,"0x00ff00";
setarray $agit_ar03[3],0; //Global Variable
setarray $agit_ar03[2],2; //Global Variable
donpcevent "Controle01#aru03::OnEnable";
end;
}
else {
mes "^3355FFO muro foi destruído,";
mes "e a tentativa de reparar o";
mes "Portão da Fortaleza falhou.";
mes "Você perdeu alguns de seus";
mes "itens para a reparação...^000000";
delitem 984,2; //Oridecon
delitem 999,4; //Steel
delitem 1019,14; //Wooden_Block
delitem 1011,3; //Emveretarcon
close;
}
}
}
else {
mes "^3355FFVocê não pode tentar reparar";
mes "o Portão da Fortaleza se você não";
mes "tiver todos os materiais necessários.^000000";
close;
}
}
}
}
end;

OnInit:
disablenpc "Controle02#aru03";
end;

OnEnable:
enablenpc "Controle02#aru03";
end;

OnDisable:
disablenpc "Controle02#aru03";
end;
}

arug_cas03,134,266,0 script Controle03#aru03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
if (strcharinfo(0) == getguildmaster(.@GID)) {
if ($agit_ar03[4] == 2) {
mes "^3355FFPortões da Fortaleza";
mes "Demolidos podem ser reparados,";
mes "mas você precisa conseguir";
mes "os seguintes materiais.^000000";
next;
mes "^4D4DFF10 Aços^000000,";
mes "^4D4DFF30 Troncos^000000,";
mes "^4D4DFF5 Oridecons^000000, e";
mes "^4D4DFF10 Emveretarcons^000000.";
next;
select("Continuar");
if ((countitem(1019) > 29) && (countitem(999) > 9) && (countitem(1011) > 9) && (countitem(984) > 4)) {
mes "^3355FFVocê precisará de Troncos para";
mes "reparar a estrutura de suporte,";
mes "Oridecons para aumentar";
mes "a resistência do Portão, e";
mes "Emveretarcons para basicamente";
mes "segurar tudo junto.^000000";
next;
set .@ro_of01,rand(10,15);
while(1) {
if (.@ro_of02 == .@ro_of01) {
break;
}
else {
switch(rand(1,4)) {
case 1:
mes "^3355FFA estrutura de suporte";
mes "está terrivelmente danificada:";
mes "reparar esta parte";
mes "é a prioridade.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFA estrutura foi";
mes "reforçada com madeira.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 2:
mes "^3355FFVocê tentou usar aço,";
mes "mas parece que não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
case 3:
mes "^3355FFVocê tentou usar emveretarcon,";
mes "mas parece que não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
case 4:
mes "^3355FFVocê tentou usar o oridecon,";
mes "mas parece que ele não funcionou";
mes "muito bem. Você precisará tentar";
mes "com outra coisa.^000000";
close;
}
break;
case 2:
mes "^3355FFParece que em geral";
mes "a resistência do portão tem";
mes "que ser reforçada com alguma coisa.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira";
mes "para reforçar o portão.^000000";
set .@ro_of02,.@ro_of02 + 1;
next;
break;
case 2:
mes "^3355FFVocê tentou usar aço";
mes "para reforçar o portão, mas";
mes "isto não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 3:
mes "^3355FFVocê tentou usar emveretarcon";
mes "para reforçar o portão, mas";
mes "isto não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 4:
mes "^3355FFVocê martelou o";
mes "oridecon: parece que";
mes "isso irá funcionar.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
}
break;
case 3:
mes "^3355FFO dano ao portão";
mes "causou todas estas";
mes "rachaduras. Você terá de";
mes "soldá-las de algum modo.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira";
mes "para corrigir este problema,";
mes "mas parece que só piorou a situação.";
mes "Você terá que começar novamente.^000000";
close;
case 2:
mes "^3355FFVocê usou o aço para soldar";
mes "todas as rachaduras: o portão está";
mes "começando a ficar mais sólido.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 3:
mes "^3355FFVocê tentou usar emveretarcon";
mes "para reforçar o portão, mas isto";
mes "não funcionou muito bem.";
mes "Você terá que começar novamente.^000000";
close;
case 4:
mes "^3355FFVocê tentou usar oridecon,";
mes "mas isto não funcionou muito";
mes "bem. Você terá que";
mes "começar novamente.^000000";
close;
}
break;
case 4:
mes "^3355FFAgora você tem que ter";
mes "certeza de que o portão é seguro";
mes "e ao mesmo tempo sólido.^000000";
next;
switch(select("Tronco:Aço:Emveretarcon:Oridecon")) {
case 1:
mes "^3355FFVocê tentou usar madeira para";
mes "solucionar este problema, mas parece";
mes "que o problema até piorou.";
mes "Você terá que começar tudo denovo.^000000";
close;
case 2:
mes "^3355FFVocê tentou usar aço,";
mes "mas não funcionou muito";
mes "bem. Você tem que tentar";
mes "com outra coisa.^000000";
close;
case 3:
mes "^3355FFVocê teve sucesso em";
mes "usar emveretarcon para reparar";
mes "os problemas do portão.^000000";
set .@rp_temp,.@rp_temp + 1;
set .@ro_of02,.@ro_of02 + 1;
specialeffect2 EF_REPAIRWEAPON;
next;
break;
case 4:
mes "^3355FFVocê tentou usar oridecon,";
mes "mas não funcionou muito";
mes "bem. Você tem que tentar";
mes "com outra coisa.^000000";
close;
}
}
}
}
mes "^3355FFBem, parece que";
mes "você conseguiu reparar";
mes "o portão.^000000";
next;
if (agitcheck2() == 0) {
mes "^3355FFInfelizmente, o Portão";
mes "da Fortaleza não pode ser reconstruído:";
mes "o Emperium não está mais aqui.^000000";
close;
}
else {
if (.@rp_temp == .@ro_of01) {
mes "^3355FFO Portão da Fortaleza";
mes "foi reparado com Sucesso!^000000";
delitem 1019,30; //Wooden_Block
delitem 999,10; //Steel
delitem 1011,10; //Emveretarcon
delitem 984,5; //Oridecon
close2;
donpcevent "#aru03_RL03::OnEnable";
disablenpc "Controle03#aru03";
mapannounce "arug_cas03","O 3º Portão da Fortaleza foi reconstruído!",bc_map,"0x00ff00";
setarray $agit_ar03[4],0;
setarray $agit_ar03[3],2;
donpcevent "Controle02#aru03::OnEnable";
end;
}
else {
mes "^3355FFO muro foi destruído,";
mes "e a tentativa de reparar o";
mes "Portão da Fortaleza falhou.";
mes "Você perdeu alguns de seus";
mes "itens para a reparação...^000000";
delitem 984,2; //Oridecon
delitem 999,4; //Steel
delitem 1019,14; //Wooden_Block
delitem 1011,3; //Emveretarcon
close;
}
}
}
else {
mes "^3355FFVocê não pode tentar reparar";
mes "o Portão da Fortaleza se você não";
mes "tiver todos os materiais necessários.^000000";
close;
}
}
}
}
end;

OnInit:
disablenpc "Controle03#aru03";
end;

OnEnable:
enablenpc "Controle03#aru03";
end;

OnDisable:
disablenpc "Controle03#aru03";
end;
}

// Link Flags
arug_cas03,122,314,0 script LF-01#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Primeiro Portão Principal:Segundo Portão Principal:Cancelar")) {
case 1:
warp "arug_cas03",84,158;
end;
case 2:
warp "arug_cas03",197,136;
end;
case 3:
close;
}
}
end;
}

arug_cas03,125,314,0 script LF-02#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 1-1:Área de Defesa 1-2:Cancelar")) {
case 1:
warp "arug_cas03",65,94;
end;
case 2:
warp "arug_cas03",211,97;
end;
case 3:
close;
}
}
end;
}

arug_cas03,128,314,0 script LF-03#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 1-3:Área de Defesa 1-3:Cancelar")) {
case 1:
warp "arug_cas03",112,73;
end;
case 2:
warp "arug_cas03",171,73;
end;
case 3:
close;
}
}
end;
}

arug_cas03,131,314,0 script LF-04#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 2-1:Área de Defesa 2-2:Cancelar")) {
case 1:
warp "arug_cas03",112,152;
end;
case 2:
warp "arug_cas03",172,152;
end;
case 3:
close;
}
}
end;
}

arug_cas03,134,314,0 script LF-05#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 2-3:Área de Defesa 2-4:Cancelar")) {
case 1:
warp "arug_cas03",120,186;
end;
case 2:
warp "arug_cas03",162,186;
end;
case 3:
close;
}
}
end;
}

arug_cas03,149,314,0 script LF-06#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 3-1:Área de Defesa 3-2:Cancelar")) {
case 1:
warp "arug_cas03",116,235;
end;
case 2:
warp "arug_cas03",164,235;
end;
case 3:
close;
}
}
end;
}

arug_cas03,152,314,0 script LF-07#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 1-1:Área de Defesa 2-1:Área de Defesa 3-1:Cancelar")) {
case 1:
warp "arug_cas03",65,94;
end;
case 2:
warp "arug_cas03",112,152;
end;
case 3:
warp "arug_cas03",116,235;
end;
case 4:
close;
}
}
end;
}

arug_cas03,155,314,0 script LF-08#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 1-2:Área de Defesa 2-2:Área de Defesa 3-2:Cancelar")) {
case 1:
warp "arug_cas03",211,97;
end;
case 2:
warp "arug_cas03",172,152;
end;
case 3:
warp "arug_cas03",164,235;
end;
case 4:
close;
}
}
end;
}

arug_cas03,158,314,0 script LF-09#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Escolha";
mes "a que local interno você";
mes "deseja ir.^000000";
switch(select("Área de Defesa 1-4:Área de Defesa 2-4:Cancelar")) {
case 1:
warp "arug_cas03",171,73;
end;
case 2:
warp "arug_cas03",162,186;
end;
case 3:
close;
}
}
end;
}

arug_cas03,161,314,0 script LF-10#arug_cas03 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Gostaria de";
mes "ser teleportado para o";
mes "Serviço de Conveniências para";
mes "membros do Clã?^000000";
switch(select("Ir para Serviço de Convêniencia:Cancelar")) {
case 1:
warp "arug_cas03",321,57;
end;
case 2:
close;
}
}
end;
}

arug_cas03,45,158,0 script Horn#LF_ar03_01::LF_ar03_01 111,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Gostaria de";
mes "ser teleportado para a";
mes "Sala do Emperium?^000000";
switch(select("Teleportar:Cancelar")) {
case 1:
warp "arug_cas03",121,318;
end;
case 2:
close;
}
}
end;
}

arug_cas03,226,156,0 duplicate(LF_ar03_01) Horn#LF_ar03_01 111
arug_cas03,134,62,4 duplicate(LF_ar03_01) Horn#LF_ar03_02 111
arug_cas03,149,62,4 duplicate(LF_ar03_01) Horn#LF_ar03_03 111
arug_cas03,123,154,0 duplicate(LF_ar03_01) Horn#LF_ar03_04 111
arug_cas03,160,154,0 duplicate(LF_ar03_01) Horn#LF_ar03_05 111
arug_cas03,135,205,0 duplicate(LF_ar03_01) Horn#LF_ar03_06 111
arug_cas03,148,205,0 duplicate(LF_ar03_01) Horn#LF_ar03_07 111
arug_cas03,134,260,0 duplicate(LF_ar03_01) Horn#LF_ar03_08 111
//arug_cas03,204,142,0 duplicate(LF_ar03_01) Horn#LF_ar03_09 111

arug_cas03,148,103,4 script Horn#LF_ar03_10::LF_ar03_02 722,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
mes "^3355FFEste é o Serviço de Teleporte";
mes "da Fortaleza. Gostaria de";
mes "ser teleportado para a";
mes "Sala do Emperium?^000000";
switch(select("Teleportar:Cancelar")) {
case 1:
warp "arug_cas03",121,318;
end;
case 2:
close;
}
}
end;
}

arug_cas03,135,103,4 duplicate(LF_ar03_02) Horn#LF_ar03_11 722
arug_cas03,63,51,7 duplicate(LF_ar03_02) Horn#LF_ar03_12 722
arug_cas03,214,51,1 duplicate(LF_ar03_02) Horn#LF_ar03_13 722

// Guild Gerente
arug_cas03,328,98,3 script Steward#aru03 55,{
set .@GID, getcastledata("arug_cas03",1);
if (.@GID == 0) {
mes "[ Steward ]";
mes "Estou esperando por meu mestre";
mes "para saber que destino ele escolheu";
mes "para mim. Você acha que tem";
mes "a coragem e força necessárias";
mes "para conquistar esta fortaleza?";
close;
}
if (getcharid(2) != .@GID || strcharinfo(0) != getguildmaster(.@GID)) {
mes "[ Steward ]";
mes "Hmpf. Suas Ameaças não";
mes "me assustam! Guardiões, levem";
mes "este intruso para longe daqui!";
mes "Eu sempre serei fiel ao";
mes "mestre desta fortaleza,";
mes "o primeiro e único ^FF0000" + getguildmaster(.@GID) + "^000000.";
close;
}
mes "[ Steward ]";
mes "Oh, mestre ^FF0000" + getguildmaster(.@GID) + "^000000...";
mes "Como posso lhe servir hoje?";
mes "Há algum aspecto sobre a";
mes "manutenção da fortaleza";
mes "que deseja discutir?";
next;
switch(select("Informações Sobre o Castelo:Investir no Crescimento Comercial:Investir no Aumento da Defesa:Contratar/Despedir Kafra:Ir para a Sala do Mestre")) {
case 1:
mes "[ Steward ]";
mes "O Nível do Crescimento";
mes "Comercial desta fortaleza é ^0000ff" + getcastledata("arug_cas03",2) + ".";
if (getcastledata("arug_cas03",4) > 0) {
mes "Da última vez, você investiu no";
mes "Crescimento Comercial " + getcastledata("arug_cas03",4) + " vezes.";
}
next;
mes "[ Steward ]";
mes "O nível da Defesa";
mes "da Fortaleza é " + getcastledata("arug_cas03",3) + ".";
if (getcastledata("arug_cas03",5) > 0) {
mes "Da última vez, você investiu";
mes "na Defesa " + getcastledata("arug_cas03",5) + " vezes.";
}
mes " ";
mes "Isto é tudo, mestre.";
close;
case 2:
set .@Economy,getcastledata("arug_cas03",2);
if (.@Economy < 6) { set .@eco_invest,5000; }
else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
//Quadruple the cost of investing if you've already invested once.
if (getcastledata("arug_cas03",4)) {
set .@eco_invest,.@eco_invest*4;
}
mes "[ Steward ]";
mes "Aumentando o Crescimento";
mes "Comercial da Fortaleza,";
mes "a quantidade de bens produzidos";
mes "pelo Clã aumentará.";
mes "Investindo no Crescimento Comercial";
mes "você irá ajudar com o futuro do Clã.";
next;
mes "[ Steward ]";
mes "Você pode fazer um investimento";
mes "por dia, mas se você pode fazer";
mes "dois investimentos se você pagar";
mes "mais zenys: isto irá acelerar";
mes "o desenvolvimento comercial,";
mes "mas pode sair muito caro.";
next;
if (.@Economy == 100) {
mes "[ Steward ]";
mes "Bem... Parece que o nível de";
mes "Crescimento Comercial da fortaleza";
mes "está em 100%. Não é possível";
mes "desenvolver o crescimento";
mes "comercial além disso.";
close;
}
if (getcastledata("arug_cas03",4) >= 2) {
mes "[ Steward ]";
mes "Você já fez dois investimentos";
mes "hoje, então você deve esperar";
mes "até amanhã para poder fazer";
mes "um novo investimento.";
close;
}
if (getcastledata("arug_cas03",4) == 0) {
mes "[ Steward ]";
mes "Você deve pagar ^FF0000" + .@eco_invest + "^000000 zenys";
mes "para fazer um investimento.";
mes "Você vai investir no";
mes "desenvolvimento comercial";
mes "desta fortaleza agora?";
}
else {
mes "[ Steward ]";
mes "Você deve pagar ^FF0000" + .@eco_invest + "^000000";
mes "zenys a mais para fazer um";
mes "segundo investimento hoje. Você irá";
mes "investir mais uma vez?";
}
next;
switch(select("Investir no Crescimento Comercial:Cancelar")) {
case 1:
if (getcastledata("arug_cas03",4) >= 2) {
mes "[ Steward ]";
mes "Você já fez dois";
mes "investimentos hoje, então você";
mes "vai ter que esperar até amanhã";
mes "para fazer outro investimento.";
close;
}
if (Zeny < .@eco_invest) {
mes "[ Steward ]";
mes "Lamento, Mestre, mas";
mes "você não tem a quantidade";
mes "necessária de zenys para fazer";
mes "um investimento pelo Clã hoje.";
close;
}
set Zeny,Zeny-.@eco_invest;
setcastledata "arug_cas03",4,getcastledata("arug_cas03",4)+1;
mes "[ Steward ]";
mes "Uma sábia escolha para utilizar os";
mes "fundos do Clã, Mestre. Temos que";
mes "esperar para ver os resultados";
mes "deste investimento amanhã.";
close;
case 2:
mes "[ Steward ]";
mes "As suas ordens, Mestre.";
close;
}
case 3:
set .@defence,getcastledata("arug_cas03",3);
if (.@Defence < 6) { set .@def_invest,10000; }
else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
//Quadruple the cost of investing if you've already invested once.
if (getcastledata("arug_cas03",5)) {
set .@def_invest,.@def_invest*4;
}
mes "[ Steward ]";
mes "Investir na defesa de nossa";
mes "fortaleza ajuda na durabilidade";
mes "de nossos Guardiões e do";
mes "Emperium. Nós precisaremos de";
mes "toda a vantagem para nos proteger";
mes "de nosso inimigos.";
next;
mes "[ Steward ]";
mes "Você pode investir na defesa";
mes "uma vez por dia, mais se você pagar";
mes "mais, você pode investir no";
mes "máximo duas vezes por dia.";
next;
mes "[ Steward ]";
if (getcastledata("arug_cas03",3) == 100) {
mes "O nível de Defesa desta";
mes "Fortaleza está em 100%, e";
mes "não podemos aumentar mais.";
close;
}
if (getcastledata("arug_cas03",5) >= 2) {
mes "Mestre, você ja investiu em";
mes "Defesa duas vezes por hoje.";
mes "Você precisará esperar até amanhã";
mes "se você deseja";
mes "aumentar nossas defesas.";
close;
}
if (getcastledata("arug_cas03",5) == 0) {
mes "Nós precisamos de ^FF0000" + .@def_invest + "^000000";
mes "zenys para investir na defesa";
mes "de nossa fortaleza.";
mes "Você vai investir agora?";
}
else {
mes "Nós precisamos de ^FF0000" + .@def_invest + "^000000";
mes "zenys para investir na defesa";
mes "de nossa fortaleza.";
mes "Você vai investir agora?";
}
next;
switch(select("Investir na Defesa:Cancelar")) {
case 1:
if (getcastledata("arug_cas03",5) >= 2) {
mes "[ Steward ]";
mes "Mestre, você já";
mes "investiu em Defesa duas";
mes "vezes hoje. Você terá";
mes "que esperar até amanhã se você realmente";
mes "deseja aumentar as nossas defesas.";
close;
}
if (Zeny < .@def_invest) {
mes "[ Steward ]";
mes "Lamento, Mestre, mas";
mes "você não tem a quantidade";
mes "necessária de zenys para fazer";
mes "um investimento pelo Clã hoje.";
close;
}
set Zeny,Zeny-.@def_invest;
setcastledata "arug_cas03",5,getcastledata("arug_cas03",5)+1;
mes "[ Steward ]";
mes "Uma sábia escolha para utilizar os";
mes "fundos do Clã, Mestre. O Aumento";
mes "da frequência dos tesouros";
mes "produzidos realmente";
mes "ajudará a todos do Clã.";
close;
case 2:
mes "[ Steward ]";
mes "As suas ordens, Mestre.";
close;
}
case 4:
if (getcastledata("arug_cas03",9) == 1) {
mes "[ Steward ]";
mes "Você deseja despedir";
mes "a Funcionária Kafra que";
mes "contratamos para o Clã?";
next;
switch(select("Despedir:Cancelar")) {
case 1:
cutin "kafra_01",2;
mes "[ Funcionária Kafra Contratada ]";
mes "Mestre, por favor reconsidere!";
mes "Estive trabalhando muito duro";
mes "pelo sucesso do Clã!";
mes "Vou tentar me esforçar mais para";
mes "servir aos membros do Clã desta";
mes "fortaleza, eu prometo!";
next;
switch(select("Despedir:Cancelar")) {
case 1:
mes "[ Funcionária Kafra Contratada ]";
mes "Por quê?! O que eu fiz";
mes "para merecer isto? Waaah~!";
next;
cutin "kafra_01",255;
break;
case 2:
mes "[ Funcionária Kafra Contratada ]";
mes "Obrigado, Mestre!";
mes "Eu vou obedecer todos os seus";
mes "comandos da melhor forma!";
mes "Você não vai se arrepender!";
close;
}
break;
case 2:
mes "[ Steward ]";
mes "Ela trabalha muito duro,";
mes "na minha opnião. Foi de nossos";
mes "todos melhores interesses";
mes "permitir sua admissão.";
close;
}
disablenpc "Funcionária Kafra#arug_cas03";
setcastledata "arug_cas03",9,0;
mes "[ Steward ]";
mes "A Funcionária Kafra foi";
mes "depedida. Você estava";
mes "insatisfeito de verdade com";
mes "o serviço dela por aquele preço?";
close;
}
else {
mes "[ Steward ]";
mes "Deseja contratar uma";
mes "Funcionária Kafra para servir";
mes "nossa fortaleza? Você tem";
mes "que pagar ^FF000010,000 zenys^000000 para contratar uma.";
next;
switch(select("Contratar:Cancelar")) {
case 1:
if (getgdskilllv(.@GID,10001) == 0) {
mes "[ Steward ]";
mes "Mestre, nós não podemos contarar uma";
mes "Funcionária Kafra porque";
mes "você ainda não tem a habilidade";
mes "^FF0000Contrato com Kafra^000000";
mes "do Clã.";
close;
}
if (Zeny < 10000) {
mes "[ Steward ]";
mes "Mestre, nós não podemos contratar";
mes "uma Funcionária Kafra porque";
mes "não temos fundos o suficiente";
mes "para pagar o contrato.";
close;
}
set Zeny,Zeny-10000;
enablenpc "Funcionária Kafra#aru03";
setcastledata "arug_cas03",9,1;
mes "[ Steward ]";
mes "Muito bem. Agora nós temos";
mes "com contrato oficial com a";
mes "Corporação Kafra, e contratamos";
mes "uma funcionária Kafra para nosso";
mes "castelo. Aqui está ela~";
next;
cutin "kafra_01",2;
mes "[ Funcionária Kafra Contratada ]";
mes "Como vai? Fui enviada";
mes "a pedido da chefe da";
mes "Corporação Kafra para";
mes "servir as nescessides.";
mes "de seu Clã.";
mes "Aguardo seus comandos, Mestre.";
next;
cutin "kafra_01",255;
mes "[ Steward ]";
mes "Nosso contrato vencerá dentro";
mes "de um mês, por isso é preciso";
mes "pagar uma taxa adicional para";
mes "manter está Empregada Kafra";
mes "as ordens de nosso Clã.";
close;
case 2:
mes "[ Steward ]";
mes "Como queira, Mestre.";
mes "No entanto, eu sugiro contratar";
mes "uma Funcionária Kafra logo";
mes "pois possívelmente, ela iria";
mes "beneficiar muito nossos membros";
mes "com as facilidades do serviço Kafra.";
close;
}
}
case 5:
mes "[ Steward ]";
mes "Você deseja entrar na";
mes "sala do Tesouro do Clã?";
mes "Só você, o Líder do Clã,";
mes "tem permisão para entrar.";
next;
mes "[ Steward ]";
mes "Por favor lembre-se de abrir";
mes "os Baús do Tesouro em pouco";
mes "tempo. Caso contrário, o";
mes "tesouro pode desaparecer se";
mes "algo demorar muito.";
next;
switch(select("Ir para Sala do Tesouro:Cancelar")) {
case 1:
mes "[ Steward ]";
mes "Me permita orientá-lo";
mes "sobre o segredo desta";
mes "Sala do Tesouro.";
mes "Aperte o interruptor secreto";
mes "quando quiser voltar aqui.";
close2;
warp "arug_cas03",292,266;
end;
case 2:
mes "[ Steward ]";
mes "Os itens da Sala do Tesouro";
mes "são produzidos uma vez por dia.";
mes "Portanto, você deve obter os";
mes "itens diáriamente.";
mes "Para o bem do Clã,";
mes "distribua o tesouro com os membros!";
close;
}
}

OnStop:
stopnpctimer;
end;

OnStartArena:
set .@GID,getcharid(2);
// Lower castle Economy
set .@Economy,getcastledata("arug_cas03",2) - 5;
if (.@Economy < 0) set .@Economy, 0;
setcastledata "arug_cas03", 2, .@Economy;
// Lower Castle Defence
set .@defence,getcastledata("arug_cas03",3) - 5;
if (.@defence < 0) set .@defence, 0;
setcastledata "arug_cas03", 3, .@defence;
// Set new owner
setcastledata "arug_cas03",1, .@GID;
// Clear castle's data.
for( set .@i, 4; .@i <= 9; set .@i, .@i+1 )
setcastledata "arug_cas03", .@i, 0;
// Disable Kafra
disablenpc "Funcionária Kafra#aru03";

set .msg,2;
if (.msg == 1) {
announce "A Fortaleza [" + getcastlename("arug_cas03") + "] de 'Valfreyja' foi conquistado pelo Clã [" + getguildname(.@GID) + "]",bc_all|bc_woe;
donpcevent "Gerente#aru03_02::OnStart";
}
else if (.msg == 2) {
announce "A Fortaleza [" + getcastlename("arug_cas03") + "] de 'Valfreyja' foi conquistado pelo Clã [" + getguildname(.@GID) + "] Graças ao Jogador ["+ .@breaker$ +"]",bc_all|bc_woe;
mapannounce "arug_cas03","O Emperium foi estilhaçado!",bc_map,"0x00FF00",FW_NORMAL,20,0,40;
if (agitcheck2()) {
donpcevent "Gerente#aru03_02::OnReset";
initnpctimer;
}
else {
donpcevent "Gerente#aru03_02::OnReset";
stopnpctimer;
}
}
else if (.msg == 0) {
announce "A Fortaleza [" + getcastlename("arug_cas03") + "]de 'Valfreyja' foi conquistado pelo Clã [" + getguildname(.@gid) + "].",bc_all|bc_woe;
donpcevent "Gerente#aru03_02::OnReset";
stopnpctimer;
end;
}
maprespawnguildid "arug_cas03",getcastledata("arug_cas03",1),2;
maprespawnguildid "arug_cas03",getcastledata("arug_cas03",1),4;
getcastledata "arug_cas03",1;
end;

OnTimer10000:
donpcevent "Gerente#aru03_02::Onchange";
mapannounce "arug_cas03","Reconstrua esta fortaleza e restaure os Portões e as Runas Guardiãs para tornar a segurança de seu Clã mais segura!",bc_map,"0x00FF00",FW_NORMAL,20,0,40;
end;
}

// Guild Kafra
arug_cas03,315,98,5 script Funcionária Kafra#aru03 117,{
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID && getgdskilllv(.@GID,10001)) {
mes "[Funcionária Kafra]";
mes "Bem-vindo, bravo membro";
mes "do Clã ^FF0000" + getguildname(.@GID) + "^000000!";
mes "A Corporação Kafra está";
mes "para ajudá-lo no que precisar!";
next;
switch(select("Usar Armazém:Usar Seviço de Teletransporte:Alugar Carrinho:Cancelar")) {
case 1:
if (basicskillcheck() && getskilllv(1) < 6) {
mes "[Funcionária Kafra]";
mes "Me desculpe, mas você";
mes "precisa das Habilidades Básicas";
mes "Nv. 6 para usar o Armazém.";
}
else {
openstorage;
}
break;
case 2:
mes "[Funcionária Kafra]";
mes "Por favor, selecione";
mes "o seu destino.";
next;
switch(select("Rachel -> 200 Zeny:Cancelar")) {
case 1:
if (Zeny < 200) {
mes "[Funcionária Kafra]";
mes "Me desculpe, mas você";
mes "não tem Zeny o suficiente para";
mes "pagar o serviço de teleporte.";
mes "Por favor, obtenha 200z para usar o serviço.";
close2;
cutin "kafra_01",255;
end;
}
set Zeny,Zeny-200;
warp "rachel",115,125;
end;
case 2:
cutin "kafra_01",255;
}
break;
case 3:
if (BaseClass != Job_Merchant) {
mes "[Funcionária Kafra]";
mes "Me desculpe, mas este";
mes "serviço só esta disponível";
mes "para as classes Mercador, Ferreiro";
mes "e Alquimistas.";
}
else if (checkcart() == 1) {
mes "[Funcionária Kafra]";
mes "Hm? Você já alugou";
mes "um Carrinho.";
}
else {
mes "[Funcionária Kafra]";
mes "Para alugar um carrinho";
mes "é cobrado 800 Zeny. Você";
mes "deseja Alugar um Carrinho?";
next;
switch(select("Alugar um Carrinho:Cancelar")) {
case 1:
if (Zeny < 800) {
mes "[Funcionária Kafra]";
mes "Me desculpe, mas você";
mes "não tem Zeny o suficiente";
mes "para pegar um carrinho.";
close2;
cutin "kafra_01",255;
end;
}
set Zeny,Zeny-800;
setcart;
break;
case 2:
break;
}
}
break;
case 4:
mes "[Funcionária Kafra]";
mes "Obrigado por usar o";
mes "Serviço Kafra. Volte";
mes "sempre que precisar,";
mes "de meus serviços Kafra!";
close2;
cutin "kafra_01",255;
end;
}
close2;
cutin "kafra_01",255;
end;
}
else {
mes "[Funcionária Kafra]";
mes "Me desculpe, mais tenho";
mes "contrato exclusivo com os";
mes "membros do Clã ^FF0000" + getguildname(.@GID) + "^000000.";
mes "Você terá que pedir ajuda";
mes "a outra Funcionária Kafra...";
close2;
cutin "kafra_01",255;
end;
}

OnRecvCastlear03:
if (getcastledata("arug_cas03",1) == 0) {
monster "arug_cas03",0,0,"Druida Maligno",1117,10;
monster "arug_cas03",0,0,"Khalitzburg",1132,4;
monster "arug_cas03",0,0,"Cavaleiro do Abismo",1219,3;
monster "arug_cas03",0,0,"Executor",1205,1;
monster "arug_cas03",0,0,"Penomena",1216,10;
monster "arug_cas03",0,0,"Relógio",1269,9;
monster "arug_cas03",0,0,"Raydric Arqueiro",1276,12;
monster "arug_cas03",0,0,"Andarilho",1208,3;
monster "arug_cas03",0,0,"Alice",1275,1;
monster "arug_cas03",0,0,"Cavaleiro Sanguinário",1268,2;
monster "arug_cas03",0,0,"Senhor das Trevas",1272,2;
monster "arug_cas03",0,0,"Gerente",1270,4;
}
if (getcastledata("arug_cas03",9) < 1) {
disablenpc "Funcionária Kafra#aru03";
}
end;
}

arug_cas03,299,277,0 script #aru03_switch 111,{
mes " ";
mes "^3355FFVocê vai puxar";
mes "a pequena alavanca?^000000";
next;
switch(select("Puxar Alavanca:Cancelar")) {
case 1:
warp "arug_cas03",321,57;
end;
case 2:
close;
}
}

aru_gld,60,174,0 script Horn#flag_Ar03_1::Ar03_Flag 722,{
set .@GID, getcastledata("arug_cas03",1);
if (.@GID == 0) {
mes "[ Decreto Real de Arunafeltz ]";
mes "O Santo Reino de Arunafeltz";
mes "declara que ainda tem de";
mes "reinvidicar um mestre";
mes "sobre este castelo. O primeiro";
mes "que quebrar o Emperium conquistará";
mes "e se tornará o novo dono.";
close;
}
else {
if (getcharid(2) == .@GID) {
mes "^CD0000[ Voz da Alinhagem ]^000000";
mes "Bravo guerreiro,";
mes "deseja retornar para";
mes "o seu castelo?";
next;
switch(select("^008000»^000000 Retornar ao Castelo:^008000»^000000 ^FF0000Cancelar^000000")) {
case 1:
set .@GID, getcastledata("arug_cas03",1);
if (getcharid(2) == .@GID) {
warp "arug_cas03",121,318;
end;
}
close;
case 2:
close;
}
}
mes "[ Decreto Real de Arunafeltz ]";
mes "O Santo Reino de";
mes "Arunafeltz declara que este";
mes "castelo pertence ao Clã";
mes "^FF0000" + getguildname(.@GID) + "^000000.";
next;
mes "[ Decreto Real de Arunafeltz ]";
mes "^FF0000" + getguildmaster(.@GID) + "^000000 é";
mes "o Líder do Clã ^FF0000" + getguildname(.@GID) + "^000000.";
mes "Qualquer objeção contra isso";
mes "deverá revindicar este Castelo";
mes "atravéz das forças do aço e da mágia";
mes "e assim ser nomeado Mestre com seu Clã.";
close;
}

OnRecvCastlear03:
flagemblem getcastledata("arug_cas03",1);
end;
}

aru_gld,74,174,0 duplicate(Ar03_Flag) Horn#flag_Ar03_2 722
prontera,150,198,4 duplicate(Ar03_Flag) Horn#flag_Ar04_2 722
prontera,146,118,4 duplicate(Ar03_Flag) Horn#flag_Ar05_2 722

RodRich · April 21, 2015

What variable can be putting to funfe nick the player to destroy the emperium?

Hahahaaaa, rindo por 2 anos: "funfe" kkkkkkkkkkkkkkkkkkkkkkkk

vc ganhou o trofeu "Joel Santana!!" kkkkkkkkk

Foi mal, mas é que não aguentei!! rsrs

-----------------------------------------------------------------

I'm sorry guys, he's my friend, I'm just laughing a lil bit of his english!!

B.t.w: Mine's isn't good as well, but you don't mind what he tried!! jajajaja

Alayne · April 21, 2015

It...Just can't work...That's not possible.

You use a variable that is never initialised...I really don't get what you're trying to do. You wanna display a message of breaking, but there's no script section about the breaking part.

Tutti · April 21, 2015

As I said I got this script on google because of giving a bug in another script that was in the emulator

What variable can be putting to funfe nick the player to destroy the emperium?

Hahahaaaa, rindo por 2 anos: "funfe" kkkkkkkkkkkkkkkkkkkkkkkk

vc ganhou o trofeu "Joel Santana!!" kkkkkkkkk

Foi mal, mas é que não aguentei!! rsrs

-----------------------------------------------------------------

I'm sorry guys, he's my friend, I'm just laughing a lil bit of his english!!

B.t.w: Mine's isn't good as well, but you don't mind what he tried!! jajajaja

@RodRich - Rindo do que mlkão ?
So Bilíngue. kkkkk

Already decided here Thanks.

CHUPA @RODRICH. kkkkkkkkkkkkkkkkkk

Edited April 21, 2015 by Tutti

Alayne · April 21, 2015

If the scripts was in the emulator, I guess there should be the maps too. If needed, I can send it to you, it'll be easier than recreating it.

Tutti · April 21, 2015

I could fix friend thanks

RodRich · April 21, 2015

I could fix friend thanks

He meant, he has fixed!!

Alayne · April 22, 2015

Allright. Tag the topic in [Answered] then ^^

Sign In

Castle WOE 2.0

Question

Share this post

Link to post

Share on other sites

21 answers to this question

Recommended Posts

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Share this post

Link to post

Share on other sites

Join the conversation

Recently Browsing 0 members

Important Information