prontera,140,169,5	script	Hourly Points Shop	405,{
	if(getgmlevel() >= 60) {
	mes "[ Hourly Points Shop ]";
	mes "Hello "+strcharinfo(0);
	mes "Do you want to exchange your Hourly Points to items in this shop?";
 	 menu "Yes, please.",Normalmenu;
       	 end;
      	  }

Normalmenu:
	callshop "Donator_SHOP#02",1;
	npcshopattach "Donator_SHOP#02";
	message strcharinfo(0),"You currently have ["+#KAFRAPOINTS+"] Hourly Points.";
	end;

OnBuyItem:
	for(set @i,0; @i < getarraysize(@bought_nameid); set @i,@i+1) {
		for(set @j,0; @j < getarraysize(.POD_ITEMS); set @j,@j+2) {
			if(.POD_ITEMS[@j] == @bought_nameid[@i]) {
				set @itemcost,(.POD_ITEMS[(@j+1)]*@bought_quantity[@i]);
				set @totalcost,(@totalcost+@itemcost);
				break;
			}
		}
	}
	if(@totalcost > #KAFRAPOINTS) {
		message strcharinfo(0),"You don't have enough Hourly Points.";
	} else {
	for(set @i,0; @i < getarraysize(@bought_nameid); set @i,@i+1) {
		getitem @bought_nameid[@i],@bought_quantity[@i];
	}
		set #KAFRAPOINTS,#KAFRAPOINTS-@totalcost;
		//delitem .pod_item,@totalcost;
		message strcharinfo(0),"You now have ["+#KAFRAPOINTS+"] Hourly Points left.";
	}
		set @totalcost,0;
		deletearray @bought_nameid[0],128;
		deletearray @bought_quantity[0],128;
		end;

OnInit:
	npcshopdelitem "Donator_SHOP#02",909;
	set .name$,"^9933FF[ Hourly Points Trader ]^000000";
	setarray .POD_ITEMS

[0],13517::15,30110::15,30021::1000,30004::1000,7086::3000,7077::3000,7078::3000,7079::3000,7088::3000,7089::3000,7090::3000,7091::3000,7092::3000,;	// Input as many

items as you want (item::price)

	for(set .@i,0; .@i < getarraysize(.POD_ITEMS); set .@i,.@i+2) {
		npcshopadditem "Donator_SHOP#02",.POD_ITEMS[.@i],.POD_ITEMS[(.@i+1)];
	}
}

-	shop	Donator_SHOP#02	139,909:10