T^2L    #   
 T^G=    [???                                STUBASE 
 T^^W    #                                   ******* 
 W2FG    #MAC  STUBASE   
 W2^6    #   
 W3DQ          LDN   %C 0
 W3YB          LDX   0  BSUNIT1(%A)  
 W4D2          ANDN  0  #77  
 W4XL          SBN   0  AFDS 
 W5C=          BNZ   0  MSTUBASE1
 W5WW          LDX   %C FDSTART  
 W6BG    MSTUBASE1   
 W6W6    #NOR