ASMB,R,L
      HED GASP2 
*     NAME:   GASP2 
*     SOURCE: 92067-18437 
*     RELOC:  92067-16425 
*     PGMR:   G.A.A.
*  ***************************************************************
*  * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1979.  ALL RIGHTS     *
*  * RESERVED.  NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED,      *
*  * REPRODUCED OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITHOUT*
*  * THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY.       *
*  ***************************************************************
* 
      NAM GASP2,5 92067-16425 REV.1903 760615 
      EXT G0PBF,G1SUB,G1SEG 
      SPC 1 
GASP2 LDA TABL
      STA G1SUB     SET THE TABLE ADDRESS 
      JMP G1SEG     RETURN TO MAIN
      SPC 1 
TABL  DEF *+1 
      SPC 1 
      EXT G1CDA 
      DEF G1CDA 
      EXT G1CQQ 
      DEF G1CQQ 
      EXT G1CIN 
      DEF G1CIN 
      EXT G1CSD 
      DEF G1CSD 
      EXT G1CSU 
      DEF G1CSU 
      END GASP2 
                                                      