ASMB
      HED S/P BLANC   (21MX ONLY)  PS  24/08/77 
      NAM BLANC,7 . 92903-16001 REV.1805  770824
* 
*     SOURCE 92903-18006
* 
      SPC 2 
**************************************************************
* (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1978.  ALL RIGHTS    *
* RESERVED.  NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED, RE- *
* PRODUCED, OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITH-  *
* OUT THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY.  *
**************************************************************
      SPC 2 
      EXT .ENTR 
      ENT BLANC 
* 
* THIS ROUTINE BLANKS A BUFFER
* 
BUF   NOP 
NMOT  NOP 
* 
BLANC NOP 
      JSB .ENTR 
      DEF BUF 
      CCA 
      ADA NMOT,I
      SSA 
      JMP BLANC,I 
      STA NMOT
      LDB BL
      STB BUF,I    INIT. FIRST WORD 
      SZA,RSS 
      JMP BLANC,I 
      LDA BUF 
      STA 1 
      INB 
      MVW NMOT
      JMP BLANC,I 
* 
BL    OCT 20040 
      END 
                                            