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);