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: SWITRACE)}} ====== SWITRACE ====== (GIN Macro) **Defined in:** [[george:source:MACROS_RME10|MACROS RME10]] **Used in:** [[george:source:CLOSEMT867|CLOSEMT867]], [[george:source:GETON867|GETON867]], [[george:source:LABEL866|LABEL866]], [[george:source:LIBCOM867|LIBCOM867]], [[george:source:LIBLOAD867|LIBLOAD867]], [[george:source:LIBLOADB867|LIBLOADB867]], [[george:source:LIBREQC867|LIBREQC867]], [[george:source:LIBSEC867|LIBSEC867]], [[george:source:MODE866|MODE866]], [[george:source:MODEA65|MODEA65]], [[george:source:OLMTC85|OLMTC85]], [[george:source:REDONMT867|REDONMT867]], [[george:source:TAPEWAIT65|TAPEWAIT65]], [[george:source:UNLOAD7|UNLOAD7]], [[george:source:UNLOADMT867|UNLOADMT867]] <code - SWITRACE.mac.txt> 93#Y ...[??? SWITRACE SECT FILE FGN 4 DOC 93JQ #MAC SWITRACE 944B TRACE %A,%B 94J2 #SKI GSWITRAC 953L ( 95H= STO 1 GEN0 962W CALL 1 M6SWI 96GG #OPT M0SWITRAC=1 9726 #SKI M0SWITRAC 97FQ ( 97^B BRN M1SWITRAC 98F2 SUBSWIT 98YL STO 0 GEN1 99D= STO 1 GEN2 99XW BSOFF GSWITBIT,M3SWI 9=CG SBN 1 3 9=X6 LDX 0 0(1) 9?BQ SMO FX1 9?WB ANDX 0 M4SWI 9#B2 SMO FX1 9#TL ORX 0 M5SWI 9**= SMO FX1 9*SW STO 0 M2SWI 9B#G LDX 0 1 9BS6 SBN 0 2 9C?Q SMO FX1 9CRB LDN 1 M2SWI+1 9D?2 MOVE 0 2 9DQL LDX 0 GEN1 9F== LDX 1 GEN0 9FPW M2SWI +0 9G9G +0 9GP6 +0 9H8Q BRN (GEN2) 9HNB M3SWI LDX 0 GEN1 9J82 LDX 1 GEN0 9JML BRN (GEN2) 9K7= M4SWI #37777 9KLW M5SWI #77740000 9L6G M1SWITRAC 9LL6 #DEF M6SWI=SUBSWIT 9M5Q ) 9MKB #FREE M0SWITRAC 9N52 #DEF M0SWITRAC=0 9NJL ) 9P4= #NOR </code> Last modified: 17/01/2024 11:55by 127.0.0.1 Log In