% % stack: empty [ qty prod . . . ] % % set the quantities for products % { isnull ? % % insure no spaces % Str.NoSpaces % % assign the next product variable % ^"Prods." ! } loop pop