try this, just insert command for refresh
- script paytowinbuffs -1,{
end;
OnBuffs:
.@size = getarraysize(.buffs$);
for( .@i = 0; .@i < .@size; .@i++){
.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
}
.@i = select(.@menu$) -1;
sc_start .elements[.@i],180000,5;
atcommand "@refresh "+strcharinfo(0);
end;
OnInit:
setarray .buffs$, "Fire", "Water", "Earth", "Wind", "Holy", "Shadow", "Poison";
setarray .elements, 96, 97, "99", "98", "37", "144", "26";
bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,99;
end;
}