/* ________________________________________________________
/ \
| | |__ _ __ / \ | |_| |__ ___ _ __ __ _ |
| | '_ \| '__/ _ \| __| '_ \ / _ \ '_ \ / _` | |
| | |_) | | / ___ \ |_| | | | __/ | | | (_| | |
| |_.__/|_|/_/ \_\__|_| |_|\___|_| |_|\__,_| |
| |
|--------------------------------------------------------|
| Nome do Script: Shoping com desconto |
|--------------------------------------------------------|
| Criado por: Sephir4 |
|--------------------------------------------------------|
\________________________________________________________/*/
prontera,158,180,5 script Shopping de Cartas 1_M_SIGNMCNT,{
query_sql "SELECT `value` FROM `acc_reg_num_db` WHERE `key`='#CASHPOINTS' AND `account_id` = '"+getcharid(3)+"'",.@VCash;
mes "[^539dc5Shopping de Cartas^000000]";
mes "Olá ^FF0000"+strcharinfo(0)+"^000000, Seja bem vindo!";
mes " ";
mes "Você atualmente possui ^0000FF"+.@VCash+"^000000 Cash";
mes " ";
mes "A Loja está com: ^0000FF"+$dcartas+"%^000000 de descontos para os VIP Plus.";
close2;
callshop "Shop01",1;
npcshopattach "Shop01";
end;
OnBuyItem:
for(set @i,0; @i < getarraysize(.item);set @i,@i+1){
if(@bought_nameid == .item[@i]){
mes .n$;
set @val, @bought_quantity*.custo[@i];
mes "Valor sem desconto: [^9B30FF"+@val+"^000000] Cash.";
if(getgroupid() > 2)set @calc, $dcartas*(@val/100); else set @calc, @val;
mes "Valor com desconto: [^228B22"+(@val-@calc)+"^000000] Cash.";
mes "Desconto: [^FF0000"+$dcartas+"%^000000]";
mes " ";
if(#CASHPOINTS >= (@val-@calc)){
mes "[^00FF00Compra bem sucedida^000000]";
mes "";
mes @bought_quantity+"x - "+getitemname(@bought_nameid);
getitem .item[@i],@bought_quantity;
set #CASHPOINTS,#CASHPOINTS-(@val-@calc);
soundeffect "09.wav", 0;
close;
}
mes "[^FF0000Cash insuficiente para comprar o item.^000000]";
soundeffect "10.wav", 0;
close;
}
}
mes "[^FF0000Algo está errado, entre em contato com a equipe de Administração.^000000]";
close;
end;
OnCalcDesconto:
set $dcartas, .@atcmd_parameters$[0];
dispbottom "Todos os itens do [Shopping de Cartas] terão um desconto de "+.@atcmd_parameters$[0]+"% para jogadores VIP Plus.";
end;
OnInit:
set .n$,"[^539dc5Shopping de Cartas^000000]";
set $dcartas, 0;
unbindatcmd "dcartas";
setarray .item[0], 4132,4143,4148,4169,4198,4241,4330,4372,4374,4403,4047,4054,4135,4302,4324,4342,4363,4386,4408,4419,4121,4134,4137,4142,4147,4263,4276,4305,4318,4367,4425,4146,4174,4123,4131,4168,4236,4290,4352,4376,4441,4144,4145,4384,4430,4399,4407,4361,4357,4359,4363,4365,4367,4128;
setarray .custo[0], 500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500;
bindatcmd("dcartas","Shopping de Cartas::OnCalcDesconto",99,99);
end;
}
- shop Shop01 -1,4132:500,4143:500,4148:500,4169:500,4198:500,4241:500,4330:500,4372:500,4374:500,4403:500,4047:500,4054:500,4135:500,4302:500,4324:500,4342:500,4363:500,4386:500,4408:500,4419:500,4121:500,4134:500,4137:500,4142:500,4147:500,4263:500,4276:500,4305:500,4318:500,4367:500,4425:500,4146:500,4174:500,4123:500,4131:500,4168:500,4236:500,4290:500,4352:500,4376:500,4441:500,4144:500,4145:500,4384:500,4430:500,4399:500,4407:500,4361:500,4357:500,4359:500,4363:500,4365:500,4367:500,4128:500