- script Sample -1,{
OnInit:
set .amount, 40; // amount of item to shower
set .item_id, 7227; // item id to shower
set .item_id2, 1234; // next item id to shower
set .map$, "prontera"; // map to shower
bindatcmd "itemshower",strnpcinfo(3)+"::OnShower";
end;
OnShower:
while ( .count < .amount ) {
do {
.@x = rand(1,500);
.@y = rand(1,500);
} while (!checkcell(.map$,.@x,.@y,cell_chkpass));
.@var = rand(2);
makeitem .@var?.item_id:.item_id2,1,.map$,.@x,.@y;