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

**Defined in:** [[george:source:COREMACROS|COREMACROS]]

**Used in:** [[george:source:BACKMAP864|BACKMAP864]], [[george:source:BMCNTRL866|BMCNTRL866]], [[george:source:BMSJRNL866|BMSJRNL866]], [[george:source:BRADDATA867|BRADDATA867]], [[george:source:BRADEMUL867|BRADEMUL867]], [[george:source:CONMXA85|CONMXA85]], [[george:source:CONTXCOD60|CONTXCOD60]], [[george:source:CREATE867|CREATE867]], [[george:source:DRUM852|DRUM852]], [[george:source:FLAW866|FLAW866]], [[george:source:FLAWMAP866|FLAWMAP866]], [[george:source:GETWORD867|GETWORD867]], [[george:source:GROPE867|GROPE867]], [[george:source:INCEOT865|INCEOT865]], [[george:source:INCMON865|INCMON865]], [[george:source:INCSTART865|INCSTART865]], [[george:source:INLOOP84|INLOOP84]], [[george:source:INRESTAR84|INRESTAR84]], [[george:source:IPBIN867|IPBIN867]], [[george:source:IPBOUT867|IPBOUT867]], [[george:source:LABEL866|LABEL866]], [[george:source:LIBLOAD867|LIBLOAD867]], [[george:source:LIBLOADB867|LIBLOADB867]], [[george:source:LISTINIT867|LISTINIT867]], [[george:source:LISTINTC865|LISTINTC865]], [[george:source:LISTLOOP867|LISTLOOP867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTTPCP867|LISTTPCP867]], [[george:source:LOAD60|LOAD60]], [[george:source:LOADPROG865|LOADPROG865]], [[george:source:MOPOUT85|MOPOUT85]], [[george:source:MOPSTART865|MOPSTART865]], [[george:source:MOVCART867|MOVCART867]], [[george:source:MULTIPLX864|MULTIPLX864]], [[george:source:OLMTB867|OLMTB867]], [[george:source:OLMTE85|OLMTE85]], [[george:source:OPER864|OPER864]], [[george:source:OPERA864|OPERA864]], [[george:source:OPERIN867|OPERIN867]], [[george:source:PATCH|PATCH]], [[george:source:PCTCIN8|PCTCIN8]], [[george:source:PCTCON8|PCTCON8]], [[george:source:PCTCOUT8|PCTCOUT8]], [[george:source:PCTCRTR8|PCTCRTR8]], [[george:source:PCTLPTP851|PCTLPTP851]], [[george:source:PERFAIL866|PERFAIL866]], [[george:source:PERFLOGS866|PERFLOGS866]], [[george:source:PLUGIN867|PLUGIN867]], [[george:source:PROFLAG83|PROFLAG83]], [[george:source:READLINE8|READLINE8]], [[george:source:RENAMEMT867|RENAMEMT867]], [[george:source:RESTOREA866|RESTOREA866]], [[george:source:RESTOREG864|RESTOREG864]], [[george:source:SAVEBLOK65|SAVEBLOK65]], [[george:source:SCAN865|SCAN865]], [[george:source:SENTINEL8|SENTINEL8]], [[george:source:SETUP867|SETUP867]], [[george:source:SWAP865|SWAP865]], [[george:source:TAPEWAIT65|TAPEWAIT65]], [[george:source:TPINS861|TPINS861]], [[george:source:UNLOADMT867|UNLOADMT867]]

<code - LOCKC.mac.txt>
 2CCN ...[??? LOCKC SECT CENT FGN 32 DOC 
 2CMG    #   
 2D76    #   
 2DLQ    #MAC  LOCKC 
 2F6B    #STR  2,%A  
 2FL2          LDX   2  %A   
 2G5L          CALL  0  (GLOCKC) 
 2GK=          CALL  1  %B   
 2H4W          BLOCKCOPY 
 2HJG    #NOR
</code>