#^RS ...[??? READED SECT FILE FGN 16 DOC
 *23L    #   
 *2H=    #     THESE MACROS READ & WRITE UP TO ONE BUCKET OF EDS-TYPE FILES OF   
 *32W    #     BUCKS1,2&4. THE BUCK PARAMETER (%B) IS NOT REPLACED.  IF BUCK8 IS 
 *3GG    #     USED AN ERROR LINE IS FLAGGED AT COMPILATION TIME.  THE AUTHOR IS 
 *426    #     AWARE THAT THE TENSE  USED IS  NOT COMMONLY FOUND IN TEXT BOOKS ON
 *4FQ    #     STANDARD ENGLISH. 
 *4^B    #MAC  READED
 *5F2    #STR  %C
 *5YL          ACCSTO   %C,ACOMMUNE7,FX2 
 *6D=    #STR  %C
 *6XW    #SKI
 *7CG    (   
 *7X6          LDN   0  %B*128   
 *8BQ          SMO      FX2  
 *8WB          STO   0  ACOMMUNE7
 *9B2    )   
 *9TL          ACCSTO   %A,ACOMMUNE8,FX2 
 *=*=          LDN   0  %B   
 *=SW          SMO      FX2  
 *?#G          STO   0  ACOMMUNE9
 *?S6          DOWN     RAND,1   
 *#?Q    #STR  %B,8  
 *#RB    #SKI
 **?2    !     BUCK8 INVALID WITH READED 
 **QL    #NOR