78PY ...[??? NAMETOP SECT CENT FGN 32 DOC   
 78^Q    [   
 79FB    [     ALTERS TYPE WORD OF BLOCK (MS 12BITS ONLY). PARAMETERS SAME AS FOR
 79^2    [   
 7=DL    #MAC  NAMETOP   
 7=Y=          LDN   0  #7777
 7?CW          MOD      ANDS 0 ATYPE,%A  
 7?XG          LDN   0  %C+%B               [LOAD BLOCK TYPE 
 7#C6          SLL   0  12   
 7#WQ          MOD      ORS 0 ATYPE,%A   
 7*BB    #NOR