display()
{
        integer cnt =  llGetInventoryNumber( INVENTORY_OBJECT );

        active = cnt>0;

        if(active){

            llSetObjectName("Sales Box");

            llSetText(llGetInventoryName(INVENTORY_OBJECT,0)
            +(string)
"\n L$"+(string)PL+"\nAvailable: "+(string)cnt, <1,1,1>, 1);
        }else{
            llSetText("** Empty **", <1,1,1>, 1);
}