def a_sands (expr p) =
    T:=identity;
    pickup PenC;
    path q; q = bbox p;
    picture tmp_pic;
    tmp_pic := image(
      for i = xpart llcorner q step 0.4u until xpart urcorner q:
        for j = ypart llcorner q step 0.4u until ypart urcorner q:
          draw origin shifted ((i,j) randomized 0.3u) withpen PenC;
        endfor;
      endfor;
    );
    #clip tmp_pic to p;
    draw tmp_pic;
  enddef;
  endcode  

U značky (pole) sands může vzniknout ještě jeden problém a to ten že při otevření v Acrobat Reader tyto značky neuvidíte. Může za to Acrobat Reader. Pokud tedy chcete poslat někomu mapu jenom pro prohlížení v pdf je možno změnit hodnotu pro generování mapy takto

  def a_sands (expr p) =
    T:=identity;
    pickup PenA;
    path q; q = bbox p;
    picture tmp_pic;
    tmp_pic := image(
      for i = xpart llcorner q step 0.4u until xpart urcorner q:
        for j = ypart llcorner q step 0.4u until ypart urcorner q:
          draw origin shifted ((i,j) randomized 0.3u) withpen PenA;
        endfor;
      endfor;
    );
    #clip tmp_pic to p;
    draw tmp_pic;
  enddef;
  endcode  

Jediná změna kterou jsme udělali je ta, že jsme změnili PenC na PenA, nyní již budou body vyditelné i v Acrobat Readeru.