🚀 go-pugleaf

I am new to PostScript, and would like some help with the following
problem:
I am trying to show two (or more) grey-scale images on a page.
The following code segment only results in the first image being printed:

/picstr 4 string def
/imagetest
  {2 2 8 [2 0 0 -2 0 2]
    {currentfile picstr readhexstring pop}
    image 
  } bind def
----- scaling and translation
  imagetest
  ff 00 cc 88

--- scale and translate for 2nd image
  imagetest
  00 ff cc 44

showpage
restore

Any ideas why? Is it what I am doing here, or a problem with the
interpreter? I am trying this on a Sun laserwriter. It also does not
work with Sun's NeWs windowing system and the psh function. Thanks 
for help.
Bill