{{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]]
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