//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// Npc criado por Ferraz
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// Nome do Npc Dias vip
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// Versão atual 1.5
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// Npc criado em 15/11/2013
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// Compatível com A porra toda
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// 1.5 Adicionado aluguel de itens por Wenden
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
- script Welcome -1,{
OnPCLoginEvent:
setarray .premio[0],5286,5068,5305; // Ids dos itens que serão entregues
set .tmp,7; // Tempo que os itens ficarão com o jogador
set .n$, "[^008000Recepcionista xRO^000000]";
if(getgroupid() >= 20) end;
if(#vipfree == 0) {
query_sql "UPDATE `login` SET `group_id`='1',`diasvip`='30' WHERE `account_id` = '"+ getcharid(3) +"'";
mes .n$;
mes "Olá ^FF0000"+strcharinfo(0)+"^000000,";
mes "seja bem vindo ao";
mes "xRO Ragnarök Online!";
mes "De início você acaba de receber";
mes "30 dias de VIP com direito a";
mes "escolher uma classe no Level/Job máximo 750/200!";
next;
mes .n$;
mes "Também lhe darei alguns itens";
mes "para que possa seguir sua jornada no xRO, boa sorte!";
next;
mes .n$;
mes "Escolha uma classe.";
mes " ";
mes "- ^FF0000Não se esqueça de relogar para ativar seu vip^000000.";
next;
switch(select("Lorde","Sum"+(Sex?"o":"a")+"-"+(Sex?"Sacerdote":"Sacerdotiza")+"","Arquimag"+(Sex?"o":"a")+"","Mestr"+(Sex?"e":"a")+"-Ferreir"+(Sex?"o":"a")+"","Atirado"+(Sex?"r":"ra")+" de Elite","Algoz","Paladin"+(Sex?"o":"a")+"","Mestr"+(Sex?"e":"a")+"","Professo"+(Sex?"r":"ra")+"","Desordeir"+(Sex?"o":"a")+"",
"Criado"+(Sex?"r":"ra")+"",""+(Sex?"Menestrel":"Cigana")+"","Ninja","Justicei"+(Sex?"ro":"ra")+"","Espiritualista","Mestr"+(Sex?"e":"a")+" Taekwon")) { next;
case 1:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Lorde";
jobchange 4008; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 2:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Sumo-"+(Sex?"Sacerdote":"Sacerdotiza")+"";
jobchange 4009; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 3:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Arquimag"+(Sex?"o":"a")+"";
jobchange 4010; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 4:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Mestr"+(Sex?"e":"a")+"-Ferreir"+(Sex?"o":"a")+"";
jobchange 4011; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 5:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Atirado"+(Sex?"r":"a")+" de Elite";
jobchange 4012; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 6:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Algoz";
jobchange 4013; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 7:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Paladin"+(Sex?"o":"a")+"";
jobchange 4015; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 8:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Mestre";
jobchange 4016; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 9:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Professo"+(Sex?"r":"ra")+"";
jobchange 4017; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 10:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+"Desordeir"+(Sex?"o":"a")+"";
jobchange 4018; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 11:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Criado"+(Sex?"r":"ra")+"";
jobchange 4019; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 12:
if(sex == 0) {
mes .n$;
mes "Você agora é uma Cigana";
jobchange 4020; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
}
mes .n$;
mes "Você agora é um Menestrel";
jobchange 4021; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 13:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Ninja";
jobchange 25; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 14:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Justiceir"+(Sex?"o":"a")+"";
jobchange 24; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 15:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Espiritualista";
jobchange 4049; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
case 16:
mes .n$;
mes "Você agora é u"+(Sex?"m":"ma")+" Mestre Taekwon";
jobchange 4047; set BaseLevel, 750;set JobLevel, 200;
callsub receberitem;
close;
receberitem:
set @t,86400*.tmp;
for (set @i,0; @i < getarraysize(.premio); set @i,@i+1)
rentitem .premio[@i],@t;
set #vipfree,1;
return;
}
}
end;
OnClock0000:
query_sql "UPDATE `login` SET `diasvip`=`diasvip`-1 WHERE `group_id`>='1'";
query_sql "UPDATE `login` SET `group_id`='0' WHERE `diasvip`<='0' AND `group_id`='1'";
end;
}