%
% generate product pricing
%

empty
1 "Prod" *allseter
_Prod.Count countup
{
 "PriceSetter(" &2 &","
 exch "Prod" *allseter _Prod.Short quoter & &","
 &_Prod.Price
 jspend
 &
} for
%
% stack: prod-price-js
%
"prodpric.js" ofsnap write