Whenever you get problems like this, it's always best to simplify. Regard:
becomes:
In this instance, blitz is a bit tricky when it comes to arrays and types. so: array(1)\plop usually throws an error. Try:
a.fruitItem=array(1)
a\plop
fruitgrid(cntx,cnty)\picture = CopyImage(hold(grid(cntx,cnty))\picture)
becomes:
grid_ref=grid(cntx,cnty) image=hold(grid_ref)\picture fruitgrid(cntx,cnty)\picture = CopyImage(image)
In this instance, blitz is a bit tricky when it comes to arrays and types. so: array(1)\plop usually throws an error. Try:
a.fruitItem=array(1)
a\plop