Show pageBacklinksBack to top This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong. {{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: LOOPD)}} ====== LOOPD ====== (GIN Macro) **Defined in:** [[george:source:MACROS_JSR|MACROS JSR]] **Used in:** [[george:source:CPOBJ6|CPOBJ6]], [[george:source:LPOBJ6|LPOBJ6]] <code - LOOPD.mac.txt> DK?6 # LOOPD,NEXTD ALLOW ACCESS TO THE WORDS OF AN OBJ. PROG AREA DKQQ # IN DESCENDING ORDER OF ADDRESS DL=B # DLQ2 #MAC LOOPD [DATUM,MOD,ACC DM9L ADX %B %C [ADDRESS OF LAST WORD+1 DMP= SBN %B 1 DN8W ADDRESS %A,%B,%B DNC6 ...#NOR </code> Last modified: 17/01/2024 11:55by 127.0.0.1 Log In