set .@item, 500;
	do {
		if(.@item >= 13005) {
			mes "[Auctioneer]";
			mes "It seems that is all you have to offer me, come back when you know what you want to sell";
			close;
		}
		deletearray .@itemlist[0],getarraysize(.@itemlist);
		set .@menulist$, "";
		for(set .@i, 0; .@item < 13005 && .@i < 10; set .@i, .@i + 1)
			for(; !countitem(.@item) && .@item < 13005; set .@item, .@item + 1); // Loop until item found or end of itemlist.
			if(.@item < 13005) {
				set .@itemlist[.@i], .@item;
				set .@menulist$, .@menulist$ + getitemname(.@item) + ":";
			}
		}
		set .@menulist$, .@menulist$ + "Next Page:Cancel";
		set .@choice, select(.@menulist$);
	} while(.@choice == getarraysize(.@itemlist) + 1);