{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: FILL)}}
====== FILL ======
(GIN Macro)

**Defined in:** [[george:source:MACROS_JSR|MACROS JSR]]

**Used in:** [[george:source:CROBJ6|CROBJ6]]

<code - FILL.mac.txt>
 FK2Q    #MAC  FILL     [J.S.RAYNER          GEORGE 3 VERSION
 FKGB     MOD  ADX   %B ADATUM,%A
 FL22          SMO      %B   
 FLFL          STO   %C 0
 FL^=          LDX   0  %D   
 FMDW          BCT   0  MFILL1   
 FMYG          BRN      MFILL2   
 FND6    MFILL1  
 FNXQ          SMO      %B   
 FPCB          LDN   %C 1
 FPX2          SMO      0
 FQBL          MOVE  %B 0
 FQW=    MFILL2  
 FR4G ...#NOR
</code>