89YD ...[??? OUTPAR SECT CENT FGN 7 DOC 
 8=8=    #MAC  OUTPAR
 8=MW    #OPT  MOUTPAR1=0?   
 8?7G    #SKI  0?-MOUTPAR1<1$1   
 8?M6    (   
 8#6Q          CALL  1  (AOUT3)  
 8#LB          DOWN SETMON,11
 8*62          BRN      MOUTPAR1 
 8*KL          BRN      MOUTPARE 
 8B5=          LDN   0  MOUTPARE-MOUTPAR1-5-HLINK [LENGTH OF PDC LIST
 8BJW    )   
 8C4G    #STR  %A
 8CJ6    (   
 8D3Q                   #500:JPD%A   
 8DHB          OUTPAR %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U
 8F32    )   
 8FGL    #STR  %A
 8G2=    #SKI
 8GFW    (   
 8G^G    #DEF  MOUTPARE=0?   
 8HF6    #FRE  MOUTPARE,MOUTPAR1 
 8HYQ    )   
 8JDB    #NOR