1               / Yet another memory clear.
   2               / This one from an unknown author in DECUScope Volume 6, Number 6.
   3               *2767
   4 002767  2770  C2770,  2770
   5 002770  3777  LOOP,   DCA I POINT
   6 002771  1367          TAD C2770
   7 002772  2377          ISZ POINT
   8 002773  7640          SZA CLA
   9 002774  5370          JMP LOOP
  10 002775  3374          DCA .-1
  11 002776  3377          DCA POINT
  12 002777  3001  POINT,  3001
  13 003000  3400          DCA I 0
  14               $

C2770   2767
LOOP    2770
POINT   2777