Help menu in a script

[wmmsr]

Hello good night guys, I would like some help in this script:

- shop MVSHOP1 -1,512:-1
- shop MVSHOP2 -1,512:-1


prontera,153,285,3 script Loja Pontos Mvp 1734,{
mes "[^FF0000Loja MvP^000000]";
mes "•MVP é a abreviação para Most Valuable Player, que significa Jogador de Maior Valor.";
mes "•É uma definição que não se limita apenas à Ragnarök Online.";
next;
mes "[^FF0000Loja MvP^000000]";
mes "•A dificuldade de um MVP está pelo seu HP, dano e Experiência altíssimos.";
mes "•Eles são do tipo Chefe, ou seja, possuem certas prioridades que um monstro comum não possui.";
next;
mes "[^FF0000Loja MvP^000000]";
mes "•Os MVPs são livres para todos os jogadores: qualquer um poderá atacar um MVP sem estar infringindo a regra de Kill Steal.";
mes "•Entretanto, se houver abuso e habilidade, os infratores deverão ser denunciados.";
next;
mes "[^FF0000Loja MvP^000000]";
mes "Deseja trocar seus pontos MvP por itens?";
switch(select("[^339966+^000000] Sim.:[^FF0000+^000000] Não."))
{
case 1:
next;
mes "[^FF0000Loja MvP^000000]";
mes "^FF0000Escolha a categoria de itens que lhe interessa:^000000";
set @s, select("Utilities :Equipament");
message strcharinfo(0),"Esta loja só aceita Pontos MvP.";
dispbottom "Você tem "+PontoMvP+" Pontos MvP.";
callshop "MVSHOP"+@s,1;
npcshopattach "MVSHOP"+@s;
end;
case 2:
close;
}


OnBuyItem:
if (PontoMvP==0){mes "Você não possui Pontos Mvp"; close;}
if (PontoMvP>=1){
set .@i,0;
while (.@i < getarraysize(@bought_nameid)) {
set .@j, 0;
while (.@j < getarraysize(getd(".Shop"+@s))) {
if(getd(".Shop"+@s+"["+.@j+"]") == @bought_nameid[.@i]) {
set @itemcost, (getd(".Shop"+@s+"["+(.@j+1)+"]") * @bought_quantity[.@i]);
set @totalcost, @totalcost + @itemcost;
break; }
set .@j, .@j+2; }
set .@i, .@i+1; }
if (@totalcost > PontoMvP) dispbottom "Você não tem o suficiente de Pontos MvP."; 
else {
set .@i,0;
while (.@i < getarraysize(@bought_nameid)) {
getitem @bought_nameid[.@i], @bought_quantity[.@i];


dispbottom "Você comprou "+@bought_quantity[.@i]+"x "+getitemname(@bought_nameid[.@i])+".";


set .@i, .@i+1; }
set PontoMvP,PontoMvP-@totalcost;
mes "Seu total de Pontos MvP agora é "+PontoMvP+" .";}
set @totalcost, 0;
deletearray @bought_nameid[0], 128;
deletearray @bought_quantity[0], 128;
close;
end;
}


OnInit:
setarray .Currency[1],507;
setarray .Shop1[0],12913,3,12914,3,13718,3,12916,3,13550,5,12901,3,14004,5,13989,2,6124,1,13718,3,13718,3,13718,3,13718,3,13718,3,13718,3;
setarray .Shop2[0],7729,470,7977,10,24000,300,24001,300,24002,300,24003,300,24004,300,24005,300,24006,300,24007,300,24008,300,24009,300,24010,300,24011,300,24012,300,24013,300,24014,300,24015,300,24016,300,24017,300,24018,300,24019,300,24020,300,24021,300,24022,300,24024,300,24025,300,24026,300,24027,300,24028,300,24029,300,24030,300;


set .@i,1;
while (.@i <= getarraysize(.Currency)) {
set .@j,0;
while (.@j < getarraysize(getd(".Shop"+.@i))) {
npcshopdelitem "MVSHOP"+.@i,512;
npcshopadditem "MVSHOP"+.@i, getd(".Shop"+.@i+"["+.@j+"]"), getd(".Shop"+.@i+"["+(.@j+1)+"]");
set .@j, .@j+2; }
set .@i, .@i+1; }
end;


}

There's Utilities and equipment, would be able to add more options in the menu by MvP points, I tried but I could not if anyone can help me I will be grateful

thanks.