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

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

**Used in:** [[george:source:BSQ867|BSQ867]], [[george:source:LOADERII867|LOADERII867]], [[george:source:SETUPA867|SETUPA867]]

<code - GETEMSCR.mac.txt>
 6=F8 ...[??? GETEMSCR SECT CENT FGN 32 DOC  
 6=P2    [   
 6?8L    [ENTRY SEQUENCE FOR EMS TO GET CORE SAME WAY AS LINK BLOCK  
 6?N=    [   
 6#7W    #MAC  GETEMSCR  
 6#MG    #STR  %A,4  
 6*76          LDX   4  %A   
 6*LQ          CALL  0  (GEMS)   
 6B6B    #NOR
</code>