DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦237671a71⟧ M200

    Length: 6144 (0x1800)
    Types: M200
    Notes: M200_PROGRAM
    Names: »P2VAL.M200«

Derivation

└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »P2VAL.M200« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »P2VAL.M200« 
    └─ ⟦this⟧ »P2VAL.M200« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »P2VAL.M200« 

Disassembly

0x20202


@ 20202
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 20202-2033e Body>                                              
        <POP 20202-20218 Prologue>                           Σ0         ↓
        <POP 20218-2022e RegCacheLoad>                       Σ0         ↓
        <POP 2022e-2028e Naked>                              Σ0         ↓ →0x202d6
            <Call 0x2022e 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x20234 [18] @>                            Δ-18               {[«18""»]}
            <POP 20240-20242 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x20242 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x2024e 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 20250-20251 StackAdj>                       Δ+22       ↓       {}
            <Blob 0x20251 [14] @>                            Δ-14               {[«14""»]}
            <POP 20260-20262 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x20262 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 2026c-2026e StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 2026e  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x20272 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 20278-2027a StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x2027a 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20280-20282 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20282 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20284-20286 StackAdj>                       Δ+18               {}
            <MI 20286  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 2028a  CMPA.W  #0x01,A0>                                        {}
            <MI 2028c  BEQ     0x202d6>                                         {}
        <POP 2028e-202d6 Naked>                              Σ0         ↓
            <Blob 0x2028e [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x2029e [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 202ae-202b0 StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x202b0 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 202ba-202bc StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x202bc>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x202bc 12>                      Δ-4        
                <Const 0x202c0 0x1.2>                        Δ-2        
                <Const 0x202c2 0x1e.2>                       Δ-2        
                <Call 0x202c4 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 202c6-202c8 StackAdj>                   Δ+8        
            <Call 0x202c8 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 202ce-202d0 StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x202d0 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 202d2-202d6 StackAdj>                       Δ+48               {}
        <POP 202d6-20336 Naked>                              Σ0         ↓ ←0x2022e
            <Blob 0x202d6 [14] @>                            Δ-14               {[«14""»]}
            <POP 202e6-202e8 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x202e8 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 202f2-202f4 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 202f4  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x202f8 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 202fe-20300 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x20300 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20306-20308 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20308 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2030a-2030b StackAdj>                       Δ+18       ↓       {}
            <Blob 0x2030b [24] @>                            Δ-24               {[«24""»]}
            <Const 0x2031a 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 2031e-20320 StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x20320 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x2032e 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 20334-20336 StackAdj>                       Δ+30               {}
        <POP 20336-2033e Epilogue>                           Σ0         

0x2033e


@ 2033e
        <LVAR  0x016 1(r)>
        <LVAR  0x012 4(r)>
        <LVAR  0x010 1(r)>
        <LVAR  0x00e 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @>
    <POP 2033e-20406 Body>                                   Δ+10       
        <POP 2033e-20354 Prologue>                           Σ0         ↓
        <POP 20354-2035c RegCacheLoad>                       Σ0         ↓
        <POP 2035c-2037c Naked>                              Σ0         ↓ →0x2038a
            <Call 0x2035c 0x10538>                                              {}
                IPC_Init(void)
            <MI 20362  MOVE.L  (A6+0x12),-(A7)>              Δ-4                {[4, '(A6+0x12)']}
            <Call 0x20366 0x10508>                                              {[4, '(A6+0x12)']}
                IPC_PutString(a : String)
            <POP 2036c-2036e StackAdj>                       Δ+2                {[-2-]}
            <MI 2036e  MOVE.B  (A6+0x10),(A7)>                                  {[-2-]}
            <Call 0x20372 0x10502>                                              {[-2-]}
                IPC_PutBool(a : Bool)
            <POP 20374-20376 StackAdj>                       Δ+2                {}
            <MI 20376  TST.B   (A6+0x16)>                                       {}
            <MI 2037a  BNE     0x2038a>                                         {}
        <POP 2037c-2038a Naked>                              Σ0         ↓
            <MI 2037c  MOVE.B  (A6+0xe),-(A7)>               Δ-2                {[2, '(A6+0xe)']}
            <Call 0x20380 0x10502>                                              {[2, '(A6+0xe)']}
                IPC_PutBool(a : Bool)
            <MI 20382  MOVE.B  (A6+0xc),(A7)>                                   {[-2-]}
            <Call 0x20386 0x10502>                                              {[-2-]}
                IPC_PutBool(a : Bool)
            <POP 20388-2038a StackAdj>                       Δ+2                {}
        <POP 2038a-20396 Naked>                              Σ0         ↓ →0x203a8 ←0x2035c
            <Call 0x2038a 0x10514>                                              {}
                IPC_PutEnd(void)
            <MI 20390  TST.B   (A6+0x16)>                                       {}
            <MI 20394  BEQ     0x203a8>                                         {}
        <POP 20396-203a8 Naked>                              Σ0 Δ-10    →0x203b8
            <Blob 0x20396 [10] @>                            Δ-10               {[«10""»]}
            <MI 203a6  BRA     0x203b8>                                         {[«10""»]}
        <POP 203a8-203b8 Naked>                              Σ0 Δ-10    ↓ ←0x2038a
            <Blob 0x203a8 [10] @>                            Δ-10               {[«10""»]}
        <POP 203b8-203fe Naked>                              Σ-10 Δ+10  ↓ ←0x20396
            <POP 203b8-203ba StackAdj>                       Δ-4                {[-14-]}
            <Lit 0x203ba>                                                       {[-10-]|[$$…]}
                <Pointer.sp 0x203ba 4>                       Δ-4        
                <Const 0x203be 0x1.2>                        Δ-2        
                <Const 0x203c2 0x9.2>                        Δ-2        
                <Call 0x203c6 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 203cc-203ce StackAdj>                   Δ+8        
            <Const 0x203ce 0x1.4>                            Δ-4                {[-10-]|[$$…]|[##1]}
            <Const 0x203d2 0x2.2>                            Δ-2                {[-10-]|[$$…]|[##1]|[#2]}
            <Pointer.fp 0x203d6 <LVAR -0x004 @>>             Δ-4                {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
            <Call 0x203da 0x103b0>                                              {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
                PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
            <POP 203e0-203e4 StackAdj>                       Δ+24               {}
            <Call 0x203e4 0x10538>                                              {}
                IPC_Init(void)
            <MI 203ea  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 203ee  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x203f0 0x10526>                                              {[4, '^(A0)']}
                IPC_GetBool() : Bool
            <POP 203f6-203f8 StackAdj>                       Δ+4                {}
            <Call 0x203f8 0x1051a>                                              {}
                IPC_GetEnd(void)
        <POP 203fe-20406 Epilogue>                           Σ0         

0x20406


@ 20406
        <LVAR  0x00a 1(r)>
        <LVAR  0x008 1(r)>
    <POP 20406-20460 Body>                                              
        <POP 20406-2041c Prologue>                           Σ0         ↓
        <POP 2041c-20428 RegCacheLoad>                       Σ0         ↓
        <POP 20428-2042e Naked>                              Σ0         ↓ →0x20458
            <MI 20428  TST.B   (A6+0xa)>                                        {}
            <MI 2042c  BNE     0x20458>                                         {}
        <POP 2042e-20458 Naked>                              Σ0         ↓
            <MI 2042e  MOVE.B  (A6+0x8),0x215d5>                                {}
            <MI 20432  MOVE.B  #0x04,0x215d6>                                   {}
            <MI 20436  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x20438 [4] 0x21594>                       Δ-4                {[#0]|[«4»]}
            <Blob 0x2043e [4] 0x21598>                       Δ-4                {[#0]|[«4»]|[«4»]}
            <Blob 0x20444 [2] 0x215d5>                       Δ-2                {[#0]|[«4»]|[«4»]|[«2»]}
            <Blob 0x20446 [4] 0x215da>                       Δ-4                {[#0]|[«4»]|[«4»]|[«2»]|[«4»]}
            <Blob 0x2044c [4] 0x215d6>                       Δ-4                {[#0]|[«4»]|[«4»]|[«2»]|[«4»]|[«4»]}
            <Call 0x2044e 0x1054a>                                              {[#0]|[«4»]|[«4»]|[«2»]|[«4»]|[«4»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20454-20458 StackAdj>                       Δ+20               {}
        <POP 20458-20460 Epilogue>                           Σ0         ←0x20428

0x20460


@ 20460
    <POP 20460-204a8 Body>                                              
        <POP 20460-20476 Prologue>                           Σ0         ↓
        <POP 20476-204a0 Naked>                              Σ0         ↓
            <Call 0x20476 0x214f8>                                              {}
                exp_CLEAR_PARITY.VAL()
            <MI 2047c  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x2047e [6] @>                             Δ-6                {[#0]|[«6""»]}
            <MI 2048e  CLR.B   -(A7)>                        Δ-2                {[#0]|[«6""»]|[#0]}
            <Call 0x20490 0x214be>                                              {[#0]|[«6""»]|[#0]}
                exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1)
            <POP 20496-2049a StackAdj>                       Δ+10               {}
            <Call 0x2049a 0x21372>                                              {}
                exp_RESET.VAL()
        <POP 204a0-204a8 Epilogue>                           Σ0         

0x204a8


@ 204a8
        <LVAR -0x005 @>
        <LVAR -0x007 @>
        <LVAR -0x008 @ 1(r)>
    <POP 204a8-2053e Body>                                              
        <POP 204a8-204be Prologue>                           Σ0         ↓
        <POP 204be-204d2 RegCacheLoad>                       Σ0         ↓
        <POP 204d2-20536 Naked>                              Σ0         ↓
            <Pointer.fp 0x204d2 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Call 0x204d4 0x20f68>                                              {[@@-8]}
                exp_TEST_WCS_ADDRESS.VAL(&Fr)
            <POP 204da-204dc StackAdj>                       Δ+2                {[-2-]}
            <MI 204dc  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x204de 0x1.2>                            Δ-2                {[-2-]|[#1]}
            <Call 0x204e2 0x20406>                                              {[-2-]|[#1]}
            <POP 204e4-204e6 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x204e6 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x204e8 0x2159f.4>                        Δ-4                {[@@-8]|[##136607]}
            <Const 0x204ea 0x215b6.4>                        Δ-4                {[@@-8]|[##136607]|[##136630]}
            <Call 0x204ec 0x20f46>                                              {[@@-8]|[##136607]|[##136630]}
                exp_TEST_WCS_DATA.VAL(&Fr, &Sr_5, &Sr_5)
            <POP 204f2-204f6 StackAdj>                       Δ+10               {[-2-]}
            <MI 204f6  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x204f8 0x2.2>                            Δ-2                {[-2-]|[#2]}
            <Call 0x204fc 0x20406>                                              {[-2-]|[#2]}
            <POP 204fe-20500 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20500 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20502 <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-5]}
            <Call 0x20506 0x20ed4>                                              {[@@-8]|[@@-5]}
                exp_TEST_WCS_PARITY.VAL(&Fr, &Sr_5)
            <POP 2050c-2050e StackAdj>                       Δ+6                {[-2-]}
            <MI 2050e  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20510 0x3.2>                            Δ-2                {[-2-]|[#3]}
            <Call 0x20514 0x20406>                                              {[-2-]|[#3]}
            <POP 20516-20518 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20518 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x2051a <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Const 0x2051e 0x2159f.4>                        Δ-4                {[@@-8]|[@@-7]|[##136607]}
            <Const 0x20520 0x215b6.4>                        Δ-4                {[@@-8]|[@@-7]|[##136607]|[##136630]}
            <Call 0x20522 0x20ef6>                                              {[@@-8]|[@@-7]|[##136607]|[##136630]}
                exp_TEST_WCS_LOCATIONS.VAL(&Fr, &Sr_2, &Sr_5, &Sr_5)
            <POP 20528-2052c StackAdj>                       Δ+14               {[-2-]}
            <MI 2052c  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x2052e 0x4.2>                            Δ-2                {[-2-]|[#4]}
            <Call 0x20532 0x20406>                                              {[-2-]|[#4]}
            <POP 20534-20536 StackAdj>                       Δ+4                {}
        <POP 20536-2053e Epilogue>                           Σ0         

0x2053e


@ 2053e
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x00c 4(r)>
        <LVAR -0x010 @ 4(r)>
        <LVAR -0x011 @ 1(r)>
        <LVAR -0x012 @ 1(r)>
        <LVAR -0x013 @ 1(r)>
        <LVAR -0x014 @ 1(r)>
    <POP 2053e-20632 Body>                                   Δ+8        
        <POP 2053e-20554 Prologue>                           Σ0         ↓
        <POP 20554-2055a RegCacheLoad>                       Σ0         ↓
        <POP 2055a-2057a Naked>                              Σ0         ↓ →0x20582
            <Pointer.fp 0x2055a <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x2055c <LVAR -0x013 @ 1(r)>>        Δ-4                {[@@-20]|[@@-19]}
            <Const 0x20560 0x215ac.4>                        Δ-4                {[@@-20]|[@@-19]|[##136620]}
            <Const 0x20566 0x215c3.4>                        Δ-4                {[@@-20]|[@@-19]|[##136620]|[##136643]}
            <Call 0x2056c 0x2112c>                                              {[@@-20]|[@@-19]|[##136620]|[##136643]}
                exp_TEST_LOAD_WDR.VAL(&Fr, &Fr, &Sr_8_1, &Sr_8_1)
            <POP 20572-20576 StackAdj>                       Δ+16               {}
            <MI 20576  TST.B   (A6-0x14)>                                       {}
            <MI 20578  BEQ     0x20582>                                         {}
        <POP 2057a-20582 Naked>                              Σ0         ↓ →0x2062a
            <MI 2057a  TST.B   (A6-0x13)>                                       {}
            <MI 2057e  BNE     0x2062a>                                         {}
        <POP 20582-2058c Naked>                              Σ0         ↓ →0x20612 ←0x2055a
            <MI 20582  TST.B   0x215de>                                         {}
            <MI 20588  BEQ     0x20612>                                         {}
        <POP 2058c-205d6 Naked>                              Σ0         ↓ →0x205f0
            <Blob 0x2058c [4] @>                             Δ-4                {[«4""»]}
            <POP 20590-20592 StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x20592 4>                                                     {[«4""»]|[$$P2FP]}
            <POP 205a2-205a4 StackAdj>                       Δ-2                {[«4""»]|[$$P2FP]|[-2-]}
            <POP 205a4-205a5 StackAdj>                       Δ+2                {[«4""»]|[$$P2FP]}
            <Const 0x205a5 0x1.2>                            Δ-2                {[«4""»]|[$$P2FP]|[#1]}
            <MI 205a6  MOVE.B  0x215df,D0>                                      {[«4""»]|[$$P2FP]|[#1]}
            <MI 205ac  EXTB.W  D0>                                              {[«4""»]|[$$P2FP]|[#1]}
            <POP 0x205ae LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[$$P2FP]|[#1]}
            <MI 205b0  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']}
            <Pointer.fp 0x205b2 <LVAR -0x012 @ 1(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-18]}
            <Pointer.fp 0x205b6 <LVAR -0x008 @ 4(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-18]|[@@-8]}
            <Pointer.fp 0x205ba <LVAR -0x004 @ 4(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-18]|[@@-8]|[@@-4]}
            <Pointer.fp 0x205be <LVAR -0x011 @ 1(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-18]|[@@-8]|[@@-4]|[@@-17]}
            <Pointer.fp 0x205c2 <LVAR -0x010 @ 4(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-18]|[@@-8]|[@@-4]|[@@-17]|[@@-16]}
            <Call 0x205c6 0x1053e>                                              {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-18]|[@@-8]|[@@-4]|[@@-17]|[@@-16]}
                FSCALL_1053e
            <POP 205cc-205d0 StackAdj>                       Δ+32               {}
            <MI 205d0  TST.B   (A6-0x12)>                                       {}
            <MI 205d4  BEQ     0x205f0>                                         {}
        <POP 205d6-205da Naked>                              Σ0         ↓ →0x205e2
            <MI 205d6  TST.B   (A6-0x14)>                                       {}
            <MI 205d8  BEQ     0x205e2>                                         {}
        <POP 205da-205e2 Naked>                              Σ0 Δ-4     →0x205e8
            <MI 205da  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x205dc 0x6.2>                            Δ-2                {[#0]|[#6]}
            <MI 205e0  BRA     0x205e8>                                         {[#0]|[#6]}
        <POP 205e2-205e8 Naked>                              Σ0 Δ-4     ↓ ←0x205d6
            <MI 205e2  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x205e4 0x5.2>                            Δ-2                {[#0]|[#5]}
        <POP 205e8-205f0 Naked>                              Σ-4 Δ+4    →0x20610 ←0x205da
            <Call 0x205e8 0x20406>                                              {[-4-]}
            <POP 205ec-205ee StackAdj>                       Δ+4                {}
            <MI 205ee  BRA     0x20610>                                         {}
        <POP 205f0-20610 Naked>                              Σ0         ↓ ←0x2058c
            <MI 205f0  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 205f2  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[#0]|[4, '(A6-0x8)']}
            <MI 205f6  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
            <MI 205fa  MOVE.B  (A6-0x11),-(A7)>              Δ-2                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x11)']}
            <MI 205fe  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x11)']|[4, '(A6-0xc)']}
            <MI 20602  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x11)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <Call 0x20606 0x1054a>                                              {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x11)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 2060c-20610 StackAdj>                       Δ+20               {}
        <POP 20610-20612 Naked>                              Σ0         →0x2062a ←0x205e8
            <MI 20610  BRA     0x2062a>                                         {}
        <POP 20612-20616 Naked>                              Σ0         ↓ →0x2061e ←0x20582
            <MI 20612  TST.B   (A6-0x14)>                                       {}
            <MI 20614  BEQ     0x2061e>                                         {}
        <POP 20616-2061e Naked>                              Σ0 Δ-4     →0x20624
            <MI 20616  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20618 0x7.2>                            Δ-2                {[#0]|[#7]}
            <MI 2061c  BRA     0x20624>                                         {[#0]|[#7]}
        <POP 2061e-20624 Naked>                              Σ0 Δ-4     ↓ ←0x20612
            <MI 2061e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20620 0x8.2>                            Δ-2                {[#0]|[#8]}
        <POP 20624-2062a Naked>                              Σ-4 Δ+4    ↓ ←0x20616
            <Call 0x20624 0x20406>                                              {[-4-]}
            <POP 20628-2062a StackAdj>                       Δ+4                {}
        <POP 2062a-20632 Epilogue>                           Σ0         ←0x2057a ←0x20610

0x20632


@ 20632
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x011 @>
        <LVAR -0x012 @ 1(r)>
        <LVAR -0x013 @ 1(r)>
        <LVAR -0x014 @ 1(r)>
    <POP 20632-2070c Body>                                              
        <POP 20632-20648 Prologue>                           Σ0         ↓
        <POP 20648-2064a RegCacheLoad>                       Σ0         ↓
        <POP 2064a-2066c Naked>                              Σ0         ↓ →0x20704
            <Pointer.fp 0x2064a <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Const 0x2064e 0x215ac.4>                        Δ-4                {[@@-20]|[##136620]}
            <Const 0x20654 0x215c3.4>                        Δ-4                {[@@-20]|[##136620]|[##136643]}
            <Call 0x2065a 0x211e8>                                              {[@@-20]|[##136620]|[##136643]}
                exp_TEST_FIU_BUS.VAL(&Fr, &Sr_8_1, &Sr_8_1)
            <POP 20660-20664 StackAdj>                       Δ+12               {}
            <MI 20664  TST.B   (A6-0x14)>                                       {}
            <MI 20668  BNE     0x20704>                                         {}
        <POP 2066c-20676 Naked>                              Σ0         ↓ →0x206f8
            <MI 2066c  TST.B   0x215de>                                         {}
            <MI 20672  BEQ     0x206f8>                                         {}
        <POP 20676-206c0 Naked>                              Σ0         ↓ →0x206ce
            <Blob 0x20676 [4] @>                             Δ-4                {[«4""»]}
            <POP 2067a-2067c StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x2067c 4>                                                     {[«4""»]|[$$P2FP]}
            <POP 2068c-2068e StackAdj>                       Δ-2                {[«4""»]|[$$P2FP]|[-2-]}
            <POP 2068e-2068f StackAdj>                       Δ+2                {[«4""»]|[$$P2FP]}
            <Const 0x2068f 0x1.2>                            Δ-2                {[«4""»]|[$$P2FP]|[#1]}
            <MI 20690  MOVE.B  0x215df,D0>                                      {[«4""»]|[$$P2FP]|[#1]}
            <MI 20696  EXTB.W  D0>                                              {[«4""»]|[$$P2FP]|[#1]}
            <POP 0x20698 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[$$P2FP]|[#1]}
            <MI 2069a  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']}
            <Pointer.fp 0x2069c <LVAR -0x013 @ 1(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-19]}
            <Pointer.fp 0x206a0 <LVAR -0x008 @ 4(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-19]|[@@-8]}
            <Pointer.fp 0x206a4 <LVAR -0x004 @ 4(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-19]|[@@-8]|[@@-4]}
            <Pointer.fp 0x206a8 <LVAR -0x012 @ 1(r)>>        Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-19]|[@@-8]|[@@-4]|[@@-18]}
            <Pointer.fp 0x206ac <LVAR -0x011 @>>             Δ-4                {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-19]|[@@-8]|[@@-4]|[@@-18]|[@@-17]}
            <Call 0x206b0 0x1053e>                                              {[«4""»]|[$$P2FP]|[#1]|[2, 'D0']|[@@-19]|[@@-8]|[@@-4]|[@@-18]|[@@-17]}
                FSCALL_1053e
            <POP 206b6-206ba StackAdj>                       Δ+32               {}
            <MI 206ba  TST.B   (A6-0x13)>                                       {}
            <MI 206be  BEQ     0x206ce>                                         {}
        <POP 206c0-206ce Naked>                              Σ0         →0x206f6
            <MI 206c0  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x206c2 0x9.2>                            Δ-2                {[#0]|[#9]}
            <Call 0x206c6 0x20406>                                              {[#0]|[#9]}
            <POP 206ca-206cc StackAdj>                       Δ+4                {}
            <MI 206cc  BRA     0x206f6>                                         {}
        <POP 206ce-206f6 Naked>                              Σ0         ↓ ←0x20676
            <MI 206ce  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 206d0  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[#0]|[4, '(A6-0x8)']}
            <MI 206d4  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
            <MI 206d8  MOVE.B  (A6-0x12),-(A7)>              Δ-2                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']}
            <Blob 0x206dc [8] (A6-0x11)>                     Δ-8                {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']|[«8»]}
            <Call 0x206ec 0x1054a>                                              {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 206f2-206f6 StackAdj>                       Δ+20               {}
        <POP 206f6-206f8 Naked>                              Σ0         →0x20704 ←0x206c0
            <MI 206f6  BRA     0x20704>                                         {}
        <POP 206f8-20704 Naked>                              Σ0         ↓ ←0x2066c
            <MI 206f8  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x206fa 0xa.2>                            Δ-2                {[#0]|[#10]}
            <Call 0x206fe 0x20406>                                              {[#0]|[#10]}
            <POP 20702-20704 StackAdj>                       Δ+4                {}
        <POP 20704-2070c Epilogue>                           Σ0         ←0x2064a ←0x206f6

0x2070c


@ 2070c
        <LVAR -0x005 @>
        <LVAR -0x007 @>
        <LVAR -0x008 @>
        <LVAR -0x009 @ 1(r)>
        <LVAR -0x00a @>
        <LVAR -0x00b @>
        <LVAR -0x00c @ 1(r)>
        <LVAR -0x014 @ 4(r)>
    <POP 2070c-20832 Body>                                              
        <POP 2070c-20722 Prologue>                           Σ0         ↓
        <POP 20722-20736 RegCacheLoad>                       Σ0         ↓
        <POP 20736-207bc Naked>                              Σ0         ↓
            <Pointer.fp 0x20736 <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-9]}
            <Pointer.fp 0x20738 <LVAR -0x008 @>>             Δ-4                {[@@-9]|[@@-8]}
            <Pointer.fp 0x2073c <LVAR -0x005 @>>             Δ-4                {[@@-9]|[@@-8]|[@@-5]}
            <Pointer.fp 0x20740 <LVAR -0x007 @>>             Δ-4                {[@@-9]|[@@-8]|[@@-5]|[@@-7]}
            <Call 0x20744 0x2114e>                                              {[@@-9]|[@@-8]|[@@-5]|[@@-7]}
                exp_TEST_LOAD_LOOP_COUNTER.VAL(&Fr, &Fr, &Sr_2, &Sr_2)
            <POP 2074a-2074c StackAdj>                       Δ+14               {[-2-]}
            <MI 2074c  MOVE.B  (A6-0x9),(A7)>                                   {[-2-]}
            <Const 0x2074e 0xb.2>                            Δ-2                {[-2-]|[#11]}
            <Call 0x20752 0x20406>                                              {[-2-]|[#11]}
            <POP 20754-20756 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20756 <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-9]}
            <Pointer.fp 0x20758 <LVAR -0x008 @>>             Δ-4                {[@@-9]|[@@-8]}
            <Const 0x2075c 0x215a4.4>                        Δ-4                {[@@-9]|[@@-8]|[##136612]}
            <Const 0x20762 0x215bb.4>                        Δ-4                {[@@-9]|[@@-8]|[##136612]|[##136635]}
            <Call 0x20768 0x21278>                                              {[@@-9]|[@@-8]|[##136612]|[##136635]}
                exp_TEST_COUNT_LOOP_COUNTER.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
            <POP 2076e-20770 StackAdj>                       Δ+14               {[-2-]}
            <MI 20770  MOVE.B  (A6-0x9),(A7)>                                   {[-2-]}
            <Const 0x20772 0xc.2>                            Δ-2                {[-2-]|[#12]}
            <Call 0x20776 0x20406>                                              {[-2-]|[#12]}
            <POP 20778-20779 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x20779 [28] @>                            Δ-28               {[«28""»]}
            <POP 2078a-2078c StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x2078c 27>                                                    {[«28""»]|[$$TEST_LOOP_CNTR_OVERFLOW.VAL]}
            <Pointer.fp 0x2079e <LVAR -0x014 @ 4(r)>>        Δ-4                {[«28""»]|[$$TEST_LOOP_CNTR_OVERFLOW.VAL]|[@@-20]}
            <Call 0x207a0 0x10460>                                              {[«28""»]|[$$TEST_LOOP_CNTR_OVERFLOW.VAL]|[@@-20]}
                ExpLoad(a : String; b: Pointer)
            <POP 207a6-207aa StackAdj>                       Δ+34               {[-2-]}
            <POP 207aa-207ab StackAdj>                       Δ+2                {}
            <Const 0x207ab 0x7.2>                            Δ-2                {[#7]}
            <MI 207ac  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[#7]|[4, '(A6-0x14)']}
            <Call 0x207ae 0x1047e>                                              {[#7]|[4, '(A6-0x14)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 207b4-207b6 StackAdj>                       Δ+6                {}
            <MI 207b6  MOVE.L  #0xffffec78,D7>                                  {}
        <POP 207bc-207d6 Naked>                              Σ0         ↓ →0x207de ←0x207d6
            <Const 0x207bc 0x7.2>                            Δ-2                {[#7]}
            <Pointer.fp 0x207be <LVAR -0x00c @ 1(r)>>        Δ-4                {[#7]|[@@-12]}
            <Pointer.fp 0x207c2 <LVAR -0x00b @>>             Δ-4                {[#7]|[@@-12]|[@@-11]}
            <Pointer.fp 0x207c6 <LVAR -0x00a @>>             Δ-4                {[#7]|[@@-12]|[@@-11]|[@@-10]}
            <Call 0x207ca 0x10484>                                              {[#7]|[@@-12]|[@@-11]|[@@-10]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 207d0-207d2 StackAdj>                       Δ+14               {}
            <MI 207d2  ADDQ.L  #0x1,D7>                                         {}
            <MI 207d4  BEQ     0x207de>                                         {}
        <POP 207d6-207de Naked>                              Σ0         ↓ →0x207bc
            <MI 207d6  MOVE.B  (A6-0xc),D0>                                     {}
            <MI 207da  CMP.B   #0x01,D0>                                        {}
            <MI 207dc  BNE     0x207bc>                                         {}
        <POP 207de-207e6 Naked>                              Σ0         ↓ →0x207ee ←0x207bc
            <MI 207de  MOVE.B  (A6-0xc),D0>                                     {}
            <MI 207e2  CMP.B   #0x01,D0>                                        {}
            <MI 207e4  BEQ     0x207ee>                                         {}
        <POP 207e6-207ee Naked>                              Σ0         ↓
            <MI 207e6  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x207e8 0xd.2>                            Δ-2                {[#0]|[#13]}
            <Call 0x207ea 0x20406>                                              {[#0]|[#13]}
            <POP 207ec-207ee StackAdj>                       Δ+4                {}
        <POP 207ee-2082a Naked>                              Σ0         ↓ ←0x207de
            <Const 0x207ee 0x7.2>                            Δ-2                {[#7]}
            <MI 207f0  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[#7]|[4, '(A6-0x14)']}
            <Pointer.fp 0x207f2 <LVAR -0x00c @ 1(r)>>        Δ-4                {[#7]|[4, '(A6-0x14)']|[@@-12]}
            <Call 0x207f6 0x10490>                                              {[#7]|[4, '(A6-0x14)']|[@@-12]}
                ExpUpload(adr: Byte; ptr: Pointer; VAR status : Byte)
            <POP 207fc-207fe StackAdj>                       Δ+6                {[#7]|[-2-]}
            <MI 207fe  MOVE.L  (A6-0x14),(A7)>                                  {[4, '(A6-0x14)']}
            <Pointer.fp 0x20800 <LVAR -0x009 @ 1(r)>>        Δ-4                {[4, '(A6-0x14)']|[@@-9]}
            <Call 0x20802 0x10478>                                              {[4, '(A6-0x14)']|[@@-9]}
                ExpOutputFlag(exp : Pointer; VAR status : Bool)
            <POP 20808-2080a StackAdj>                       Δ+8                {}
            <Pointer.fp 0x2080a <LVAR -0x014 @ 4(r)>>        Δ-4                {[@@-20]}
            <Call 0x2080c 0x10496>                                              {[@@-20]}
                ExpClose(exp : Pointer)
            <POP 20812-20814 StackAdj>                       Δ+2                {[-2-]}
            <POP 20814-20815 StackAdj>                       Δ+2                {}
            <Const 0x20815 0x7.2>                            Δ-2                {[#7]}
            <Const 0x20816 0x2.2>                            Δ-2                {[#7]|[#2]}
            <Call 0x2081a 0x1048a>                                              {[#7]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 20820-20822 StackAdj>                       Δ+2                {[#7]}
            <MI 20822  MOVE.B  (A6-0x9),(A7)>                                   {[-2-]}
            <Const 0x20824 0xd.2>                            Δ-2                {[-2-]|[#13]}
            <Call 0x20826 0x20406>                                              {[-2-]|[#13]}
            <POP 20828-2082a StackAdj>                       Δ+4                {}
        <POP 2082a-20832 Epilogue>                           Σ0         

0x20832


@ 20832
        <LVAR -0x002 @>
        <LVAR -0x003 @>
        <LVAR -0x00b @>
        <LVAR -0x013 @>
        <LVAR -0x014 @ 1(r)>
    <POP 20832-20910 Body>                                              
        <POP 20832-20848 Prologue>                           Σ0         ↓
        <POP 20848-2085c RegCacheLoad>                       Σ0         ↓
        <POP 2085c-20908 Naked>                              Σ0         ↓
            <Pointer.fp 0x2085c <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x2085e <LVAR -0x013 @>>             Δ-4                {[@@-20]|[@@-19]}
            <Pointer.fp 0x20860 <LVAR -0x013 @>>             Δ-4                {[@@-20]|[@@-19]|[@@-19]}
            <Const 0x20862 0x215bb.4>                        Δ-4                {[@@-20]|[@@-19]|[@@-19]|[##136635]}
            <Call 0x20864 0x21056>                                              {[@@-20]|[@@-19]|[@@-19]|[##136635]}
                exp_TEST_RF_DATA_LINES.VAL(&Fr, &Sr_8, &Sr_8, &Sr_8)
            <POP 2086a-2086c StackAdj>                       Δ+14               {[-2-]}
            <MI 2086c  MOVE.B  (A6-0x14),(A7)>                                  {[-2-]}
            <Const 0x2086e 0xe.2>                            Δ-2                {[-2-]|[#14]}
            <Call 0x20870 0x20406>                                              {[-2-]|[#14]}
            <POP 20874-20875 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x20875 [8] @>                             Δ-8                {[«8""»]}
            <Call 0x20884 0x214de>                                              {[«8""»]}
                exp_INIT_RF.VAL(Sw_8)
            <POP 2088a-2088c StackAdj>                       Δ+8                {}
            <Pointer.fp 0x2088c <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x2088e <LVAR -0x013 @>>             Δ-4                {[@@-20]|[@@-19]}
            <Pointer.fp 0x20890 <LVAR -0x00b @>>             Δ-4                {[@@-20]|[@@-19]|[@@-11]}
            <Const 0x20894 0x215bb.4>                        Δ-4                {[@@-20]|[@@-19]|[@@-11]|[##136635]}
            <Call 0x20896 0x211c0>                                              {[@@-20]|[@@-19]|[@@-11]|[##136635]}
                exp_TEST_FRAME_REG_ADR.VAL(&Fr, &Sr_8, &Sr_8, &Sr_8)
            <POP 2089c-2089e StackAdj>                       Δ+14               {[-2-]}
            <MI 2089e  MOVE.B  (A6-0x14),(A7)>                                  {[-2-]}
            <Const 0x208a0 0xf.2>                            Δ-2                {[-2-]|[#15]}
            <Call 0x208a4 0x20406>                                              {[-2-]|[#15]}
            <POP 208a8-208a9 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x208a9 [8] @>                             Δ-8                {[«8""»]}
            <Call 0x208b8 0x214de>                                              {[«8""»]}
                exp_INIT_RF.VAL(Sw_8)
            <POP 208be-208c0 StackAdj>                       Δ+8                {}
            <Pointer.fp 0x208c0 <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x208c2 <LVAR -0x003 @>>             Δ-4                {[@@-20]|[@@-3]}
            <Pointer.fp 0x208c6 <LVAR -0x002 @>>             Δ-4                {[@@-20]|[@@-3]|[@@-2]}
            <Pointer.fp 0x208ca <LVAR -0x013 @>>             Δ-4                {[@@-20]|[@@-3]|[@@-2]|[@@-19]}
            <Pointer.fp 0x208cc <LVAR -0x00b @>>             Δ-4                {[@@-20]|[@@-3]|[@@-2]|[@@-19]|[@@-11]}
            <Const 0x208d0 0x215bb.4>                        Δ-4                {[@@-20]|[@@-3]|[@@-2]|[@@-19]|[@@-11]|[##136635]}
            <Call 0x208d2 0x20f1e>                                              {[@@-20]|[@@-3]|[@@-2]|[@@-19]|[@@-11]|[##136635]}
                exp_TEST_WRITE_GP_ADR.VAL(&Fr, &Sr_1, &Sr_1, &Sr_8, &Sr_8, &Sr_8)
            <POP 208d8-208da StackAdj>                       Δ+22               {[-2-]}
            <MI 208da  MOVE.B  (A6-0x14),(A7)>                                  {[-2-]}
            <Const 0x208dc 0x10.2>                           Δ-2                {[-2-]|[#16]}
            <Call 0x208de 0x20406>                                              {[-2-]|[#16]}
            <POP 208e2-208e4 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x208e4 <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x208e6 <LVAR -0x003 @>>             Δ-4                {[@@-20]|[@@-3]}
            <Pointer.fp 0x208ea <LVAR -0x002 @>>             Δ-4                {[@@-20]|[@@-3]|[@@-2]}
            <Pointer.fp 0x208ee <LVAR -0x013 @>>             Δ-4                {[@@-20]|[@@-3]|[@@-2]|[@@-19]}
            <Pointer.fp 0x208f0 <LVAR -0x00b @>>             Δ-4                {[@@-20]|[@@-3]|[@@-2]|[@@-19]|[@@-11]}
            <Const 0x208f4 0x215bb.4>                        Δ-4                {[@@-20]|[@@-3]|[@@-2]|[@@-19]|[@@-11]|[##136635]}
            <Call 0x208f6 0x2102e>                                              {[@@-20]|[@@-3]|[@@-2]|[@@-19]|[@@-11]|[##136635]}
                exp_TEST_READ_GP_ADR.VAL(&Fr, &Sr_1, &Sr_1, &Sr_8, &Sr_8, &Sr_8)
            <POP 208fc-208fe StackAdj>                       Δ+22               {[-2-]}
            <MI 208fe  MOVE.B  (A6-0x14),(A7)>                                  {[-2-]}
            <Const 0x20900 0x10.2>                           Δ-2                {[-2-]|[#16]}
            <Call 0x20902 0x20406>                                              {[-2-]|[#16]}
            <POP 20906-20908 StackAdj>                       Δ+4                {}
        <POP 20908-20910 Epilogue>                           Σ0         

0x20910


@ 20910
        <LVAR -0x008 @>
        <LVAR -0x009 @ 1(r)>
        <LVAR -0x012 @>
        <LVAR -0x013 @>
        <LVAR -0x014 @ 1(r)>
    <POP 20910-209c0 Body>                                   Δ+8        
        <POP 20910-20926 Prologue>                           Σ0         ↓
        <POP 20926-20940 RegCacheLoad>                       Σ0         ↓
        <POP 20940-20976 Naked>                              Σ0         ↓ →0x2097e
            <Pointer.fp 0x20940 <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x20942 <LVAR -0x013 @>>             Δ-4                {[@@-20]|[@@-19]}
            <Pointer.fp 0x20946 <LVAR -0x012 @>>             Δ-4                {[@@-20]|[@@-19]|[@@-18]}
            <Call 0x2094a 0x20fb6>                                              {[@@-20]|[@@-19]|[@@-18]}
                exp_TEST_RF_PARITY_CHECKERS.VAL(&Fr, &Fr, &Sr_8_1)
            <POP 20950-20954 StackAdj>                       Δ+10               {[-2-]}
            <MI 20954  MOVE.B  (A6-0x14),(A7)>                                  {[-2-]}
            <Const 0x20956 0x11.2>                           Δ-2                {[-2-]|[#17]}
            <Call 0x2095a 0x20406>                                              {[-2-]|[#17]}
            <POP 2095c-2095e StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2095e <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x20960 <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-20]|[@@-9]}
            <Pointer.fp 0x20962 <LVAR -0x008 @>>             Δ-4                {[@@-20]|[@@-9]|[@@-8]}
            <Const 0x20966 0x2159c.4>                        Δ-4                {[@@-20]|[@@-9]|[@@-8]|[##136604]}
            <Const 0x20968 0x215b5.4>                        Δ-4                {[@@-20]|[@@-9]|[@@-8]|[##136604]|[##136629]}
            <Call 0x2096a 0x212f6>                                              {[@@-20]|[@@-9]|[@@-8]|[##136604]|[##136629]}
                exp_TEST_BUS_PARITY_CHECKERS.VAL(&Fr, &Fr, &Sr_8, &Sr_1, &Sr_1)
            <POP 20970-20972 StackAdj>                       Δ+20               {}
            <MI 20972  TST.B   (A6-0x9)>                                        {}
            <MI 20974  BEQ     0x2097e>                                         {}
        <POP 20976-2097e Naked>                              Σ0 Δ-4     →0x20984
            <MI 20976  MOVE.B  (A6-0x14),-(A7)>              Δ-2                {[2, '(A6-0x14)']}
            <Const 0x20978 0x1d.2>                           Δ-2                {[2, '(A6-0x14)']|[#29]}
            <MI 2097c  BRA     0x20984>                                         {[2, '(A6-0x14)']|[#29]}
        <POP 2097e-20984 Naked>                              Σ0 Δ-4     ↓ ←0x20940
            <MI 2097e  MOVE.B  (A6-0x14),-(A7)>              Δ-2                {[2, '(A6-0x14)']}
            <Const 0x20980 0x1c.2>                           Δ-2                {[2, '(A6-0x14)']|[#28]}
        <POP 20984-209a6 Naked>                              Σ-4 Δ+4    ↓ →0x209ae ←0x20976
            <Call 0x20984 0x20406>                                              {[-4-]}
            <POP 20986-20988 StackAdj>                       Δ+4                {}
            <Call 0x20988 0x213da>                                              {}
                exp_PREP_TEST_RF_PAR_ADDR.VAL()
            <Pointer.fp 0x2098e <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-20]}
            <Pointer.fp 0x20990 <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-20]|[@@-9]}
            <Pointer.fp 0x20992 <LVAR -0x008 @>>             Δ-4                {[@@-20]|[@@-9]|[@@-8]}
            <Const 0x20996 0x2159c.4>                        Δ-4                {[@@-20]|[@@-9]|[@@-8]|[##136604]}
            <Const 0x20998 0x215b5.4>                        Δ-4                {[@@-20]|[@@-9]|[@@-8]|[##136604]|[##136629]}
            <Call 0x2099a 0x20fe2>                                              {[@@-20]|[@@-9]|[@@-8]|[##136604]|[##136629]}
                exp_TEST_RF_PAR_ADDR.VAL(&Fr, &Fr, &Sr_8, &Sr_1, &Sr_1)
            <POP 209a0-209a2 StackAdj>                       Δ+20               {}
            <MI 209a2  TST.B   (A6-0x9)>                                        {}
            <MI 209a4  BEQ     0x209ae>                                         {}
        <POP 209a6-209ae Naked>                              Σ0 Δ-4     →0x209b4
            <MI 209a6  MOVE.B  (A6-0x14),-(A7)>              Δ-2                {[2, '(A6-0x14)']}
            <Const 0x209a8 0x20.2>                           Δ-2                {[2, '(A6-0x14)']|[#32]}
            <MI 209ac  BRA     0x209b4>                                         {[2, '(A6-0x14)']|[#32]}
        <POP 209ae-209b4 Naked>                              Σ0 Δ-4     ↓ ←0x20984
            <MI 209ae  MOVE.B  (A6-0x14),-(A7)>              Δ-2                {[2, '(A6-0x14)']}
            <Const 0x209b0 0x1f.2>                           Δ-2                {[2, '(A6-0x14)']|[#31]}
        <POP 209b4-209b8 Naked>                              Σ-4 Δ+4    ↓ ←0x209a6
            <Call 0x209b4 0x20406>                                              {[-4-]}
            <POP 209b6-209b8 StackAdj>                       Δ+4                {}
        <POP 209b8-209c0 Epilogue>                           Σ0         

0x209c0


@ 209c0
        <LVAR -0x002 @>
        <LVAR -0x003 @>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x005 @>
        <LVAR -0x006 @ 1(r)>
        <LVAR -0x007 @ 1(r)>
        <LVAR -0x008 @ 1(r)>
    <POP 209c0-20ba0 Body>                                              
        <POP 209c0-209d6 Prologue>                           Σ0         ↓
        <POP 209d6-209f8 RegCacheLoad>                       Σ0         ↓
        <POP 209f8-20b98 Naked>                              Σ0         ↓
            <Call 0x209f8 0x21388>                                              {}
                exp_PREP_UCODE_LOGICAL_ALU.VAL()
            <Call 0x209fe 0x2149a>                                              {}
                exp_PREP_RF_LOGICAL_ALU.VAL()
            <Pointer.fp 0x20a04 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20a06 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20a08 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20a0a 0x2117a>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_LOGICAL_ALU.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20a10-20a12 StackAdj>                       Δ+10               {[-2-]}
            <MI 20a12  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20a14 0x12.2>                           Δ-2                {[-2-]|[#18]}
            <Call 0x20a16 0x20406>                                              {[-2-]|[#18]}
            <POP 20a18-20a1a StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20a1a <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20a1c 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20a1e 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20a20 0x210c4>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_NOT_B_OP.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20a26-20a28 StackAdj>                       Δ+10               {[-2-]}
            <MI 20a28  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20a2a 0x12.2>                           Δ-2                {[-2-]|[#18]}
            <Call 0x20a2c 0x20406>                                              {[-2-]|[#18]}
            <POP 20a2e-20a30 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20a30 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20a32 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-8]|[@@-4]}
            <Const 0x20a36 0x215bb.4>                        Δ-4                {[@@-8]|[@@-4]|[##136635]}
            <Const 0x20a38 0x215a4.4>                        Δ-4                {[@@-8]|[@@-4]|[##136635]|[##136612]}
            <Call 0x20a3a 0x21324>                                              {[@@-8]|[@@-4]|[##136635]|[##136612]}
                exp_TEST_ALU_ZEROS_ONES.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
            <POP 20a40-20a42 StackAdj>                       Δ+14               {[-2-]}
            <MI 20a42  MOVE.B  (A6-0x4),(A7)>                                   {[-2-]}
            <Const 0x20a46 0x13.2>                           Δ-2                {[-2-]|[#19]}
            <Call 0x20a4a 0x20406>                                              {[-2-]|[#19]}
            <POP 20a4c-20a4e StackAdj>                       Δ+2                {[-2-]}
            <MI 20a4e  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20a50 0x14.2>                           Δ-2                {[-2-]|[#20]}
            <Call 0x20a54 0x20406>                                              {[-2-]|[#20]}
            <POP 20a56-20a58 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20a58 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20a5a <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-5]}
            <Const 0x20a5e 0x215bb.4>                        Δ-4                {[@@-8]|[@@-5]|[##136635]}
            <Const 0x20a60 0x215a4.4>                        Δ-4                {[@@-8]|[@@-5]|[##136635]|[##136612]}
            <Call 0x20a62 0x2107e>                                              {[@@-8]|[@@-5]|[##136635]|[##136612]}
                exp_TEST_PASS_RANDOMS.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
            <POP 20a68-20a6a StackAdj>                       Δ+14               {[-2-]}
            <MI 20a6a  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20a6c 0x15.2>                           Δ-2                {[-2-]|[#21]}
            <Call 0x20a70 0x20406>                                              {[-2-]|[#21]}
            <POP 20a72-20a74 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20a74 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20a76 <LVAR -0x002 @>>             Δ-4                {[@@-8]|[@@-2]}
            <Const 0x20a7a 0x215bb.4>                        Δ-4                {[@@-8]|[@@-2]|[##136635]}
            <Const 0x20a7c 0x215a4.4>                        Δ-4                {[@@-8]|[@@-2]|[##136635]|[##136612]}
            <Call 0x20a7e 0x2134c>                                              {[@@-8]|[@@-2]|[##136635]|[##136612]}
                exp_TEST_ALU_SHIFTED.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
            <POP 20a84-20a86 StackAdj>                       Δ+14               {[-2-]}
            <MI 20a86  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20a88 0x16.2>                           Δ-2                {[-2-]|[#22]}
            <Call 0x20a8c 0x20406>                                              {[-2-]|[#22]}
            <POP 20a8e-20a90 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20a90 <LVAR -0x007 @ 1(r)>>        Δ-4                {[@@-7]}
            <Pointer.fp 0x20a92 <LVAR -0x006 @ 1(r)>>        Δ-4                {[@@-7]|[@@-6]}
            <Const 0x20a96 0x215a4.4>                        Δ-4                {[@@-7]|[@@-6]|[##136612]}
            <Call 0x20a98 0x21400>                                              {[@@-7]|[@@-6]|[##136612]}
                exp_PREP_TEST_PLUS_MINUS.VAL(&Fr, &Fr, &Sr_8)
            <POP 20a9e-20aa0 StackAdj>                       Δ+10               {[-2-]}
            <MI 20aa0  MOVE.B  (A6-0x7),(A7)>                                   {[-2-]}
            <Const 0x20aa2 0x17.2>                           Δ-2                {[-2-]|[#23]}
            <Call 0x20aa4 0x20406>                                              {[-2-]|[#23]}
            <POP 20aa6-20aa8 StackAdj>                       Δ+2                {[-2-]}
            <MI 20aa8  MOVE.B  (A6-0x6),(A7)>                                   {[-2-]}
            <Const 0x20aac 0x17.2>                           Δ-2                {[-2-]|[#23]}
            <Call 0x20aae 0x20406>                                              {[-2-]|[#23]}
            <POP 20ab0-20ab2 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20ab2 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20ab4 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20ab6 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20ab8 0x210a4>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_PLUS_OP.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20abe-20ac0 StackAdj>                       Δ+10               {[-2-]}
            <MI 20ac0  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20ac2 0x17.2>                           Δ-2                {[-2-]|[#23]}
            <Call 0x20ac4 0x20406>                                              {[-2-]|[#23]}
            <POP 20ac6-20ac8 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20ac8 <LVAR -0x007 @ 1(r)>>        Δ-4                {[@@-7]}
            <Pointer.fp 0x20aca <LVAR -0x006 @ 1(r)>>        Δ-4                {[@@-7]|[@@-6]}
            <Const 0x20ace 0x215a4.4>                        Δ-4                {[@@-7]|[@@-6]|[##136612]}
            <Call 0x20ad0 0x21400>                                              {[@@-7]|[@@-6]|[##136612]}
                exp_PREP_TEST_PLUS_MINUS.VAL(&Fr, &Fr, &Sr_8)
            <POP 20ad6-20ada StackAdj>                       Δ+12               {}
            <Pointer.fp 0x20ada <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20adc 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20ade 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20ae0 0x2110a>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_MINUS_OP.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20ae6-20ae8 StackAdj>                       Δ+10               {[-2-]}
            <MI 20ae8  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20aea 0x17.2>                           Δ-2                {[-2-]|[#23]}
            <Call 0x20aec 0x20406>                                              {[-2-]|[#23]}
            <POP 20aee-20af0 StackAdj>                       Δ+4                {}
            <Call 0x20af0 0x21428>                                              {}
                exp_PREP_TEST_INC_DEC.VAL()
            <Pointer.fp 0x20af6 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20af8 <LVAR -0x003 @>>             Δ-4                {[@@-8]|[@@-3]}
            <Const 0x20afc 0x215bb.4>                        Δ-4                {[@@-8]|[@@-3]|[##136635]}
            <Const 0x20afe 0x215a4.4>                        Δ-4                {[@@-8]|[@@-3]|[##136635]|[##136612]}
            <Call 0x20b00 0x2119e>                                              {[@@-8]|[@@-3]|[##136635]|[##136612]}
                exp_TEST_INC_A_OP.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
            <POP 20b06-20b08 StackAdj>                       Δ+14               {[-2-]}
            <MI 20b08  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20b0a 0x17.2>                           Δ-2                {[-2-]|[#23]}
            <Call 0x20b0c 0x20406>                                              {[-2-]|[#23]}
            <POP 20b0e-20b10 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20b10 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20b12 <LVAR -0x003 @>>             Δ-4                {[@@-8]|[@@-3]}
            <Const 0x20b16 0x215bb.4>                        Δ-4                {[@@-8]|[@@-3]|[##136635]}
            <Const 0x20b18 0x215a4.4>                        Δ-4                {[@@-8]|[@@-3]|[##136635]|[##136612]}
            <Call 0x20b1a 0x2122e>                                              {[@@-8]|[@@-3]|[##136635]|[##136612]}
                exp_TEST_DEC_A_OP.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
            <POP 20b20-20b22 StackAdj>                       Δ+14               {[-2-]}
            <MI 20b22  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20b24 0x17.2>                           Δ-2                {[-2-]|[#23]}
            <Call 0x20b26 0x20406>                                              {[-2-]|[#23]}
            <POP 20b28-20b2a StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20b2a <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20b2c 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20b2e 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20b30 0x21250>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_CARRY_PROPAGATE.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20b36-20b38 StackAdj>                       Δ+10               {[-2-]}
            <MI 20b38  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20b3a 0x18.2>                           Δ-2                {[-2-]|[#24]}
            <Call 0x20b3c 0x20406>                                              {[-2-]|[#24]}
            <POP 20b3e-20b40 StackAdj>                       Δ+4                {}
            <Call 0x20b40 0x21474>                                              {}
                exp_PREP_TEST_BORROW_PROP.VAL()
            <Pointer.fp 0x20b46 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20b48 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20b4a 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20b4c 0x212cc>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_BORROW_PROPAGATE.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20b52-20b54 StackAdj>                       Δ+10               {[-2-]}
            <MI 20b54  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20b56 0x18.2>                           Δ-2                {[-2-]|[#24]}
            <Call 0x20b58 0x20406>                                              {[-2-]|[#24]}
            <POP 20b5a-20b5c StackAdj>                       Δ+4                {}
            <Call 0x20b5c 0x2144a>                                              {}
                exp_PREP_TEST_CARRY_GENERATE.VAL()
            <Pointer.fp 0x20b62 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20b64 0x215bb.4>                        Δ-4                {[@@-8]|[##136635]}
            <Const 0x20b66 0x215a4.4>                        Δ-4                {[@@-8]|[##136635]|[##136612]}
            <Call 0x20b68 0x212a4>                                              {[@@-8]|[##136635]|[##136612]}
                exp_TEST_CARRY_GENERATE.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20b6e-20b70 StackAdj>                       Δ+10               {[-2-]}
            <MI 20b70  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20b72 0x18.2>                           Δ-2                {[-2-]|[#24]}
            <Call 0x20b74 0x20406>                                              {[-2-]|[#24]}
            <POP 20b76-20b78 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20b78 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Const 0x20b7a 0x215b5.4>                        Δ-4                {[@@-8]|[##136629]}
            <Const 0x20b80 0x2159c.4>                        Δ-4                {[@@-8]|[##136629]|[##136604]}
            <Call 0x20b86 0x21208>                                              {[@@-8]|[##136629]|[##136604]}
                exp_TEST_DIVIDE_LOGIC.VAL(&Fr, &Sr_1, &Sr_1)
            <POP 20b8c-20b8e StackAdj>                       Δ+10               {[-2-]}
            <MI 20b8e  MOVE.B  (A6-0x8),(A7)>                                   {[-2-]}
            <Const 0x20b90 0x1e.2>                           Δ-2                {[-2-]|[#30]}
            <Call 0x20b94 0x20406>                                              {[-2-]|[#30]}
            <POP 20b96-20b98 StackAdj>                       Δ+4                {}
        <POP 20b98-20ba0 Epilogue>                           Σ0         

0x20ba0


@ 20ba0
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x004 @ 1(r)>
    <POP 20ba0-20ca4 Body>                                   Δ+8        
        <POP 20ba0-20bb6 Prologue>                           Σ0         ↓
        <POP 20bb6-20bca RegCacheLoad>                       Σ0         ↓
        <POP 20bca-20c18 Naked>                              Σ0         ↓ →0x20c1e
            <Blob 0x20bca [8] @>                             Δ-8                {[«8""»]}
            <Call 0x20bda 0x214de>                                              {[«8""»]}
                exp_INIT_RF.VAL(Sw_8)
            <MI 20be0  MOVEA.L A7,A0>                                           {[«8""»]}
            <MI 20be2  LEA.L   0x201e9,A1>                                      {[«8""»]}
            <BlockMove 8,A1,A0>                                                 {[«8""»]}
            <Pointer.fp 0x20bee <LVAR -0x004 @ 1(r)>>        Δ-4                {[«8""»]|[@@-4]}
            <Const 0x20bf0 0x215a4.4>                        Δ-4                {[«8""»]|[@@-4]|[##136612]}
            <Call 0x20bf6 0x21008>                                              {[«8""»]|[@@-4]|[##136612]}
                exp_TEST_RF_LOCATIONS.VAL(Sw_8, &Fr, &Sr_8)
            <POP 20bfc-20bfe StackAdj>                       Δ+14               {[-2-]}
            <MI 20bfe  MOVE.B  (A6-0x4),(A7)>                                   {[-2-]}
            <Const 0x20c00 0x19.2>                           Δ-2                {[-2-]|[#25]}
            <Call 0x20c02 0x20406>                                              {[-2-]|[#25]}
            <POP 20c04-20c06 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20c06 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-3]}
            <Pointer.fp 0x20c08 <LVAR -0x002 @ 1(r)>>        Δ-4                {[@@-3]|[@@-2]}
            <Call 0x20c0c 0x20f8a>                                              {[@@-3]|[@@-2]}
                exp_TEST_RF_PARITY_LOCATIONS.VAL(&Fr, &Fr)
            <POP 20c12-20c14 StackAdj>                       Δ+8                {}
            <MI 20c14  TST.B   (A6-0x3)>                                        {}
            <MI 20c16  BNE     0x20c1e>                                         {}
        <POP 20c18-20c1e Naked>                              Σ0 Δ-4     →0x20c24
            <MI 20c18  MOVE.B  (A6-0x3),-(A7)>               Δ-2                {[2, '(A6-0x3)']}
            <Const 0x20c1a 0x21.2>                           Δ-2                {[2, '(A6-0x3)']|[#33]}
            <MI 20c1c  BRA     0x20c24>                                         {[2, '(A6-0x3)']|[#33]}
        <POP 20c1e-20c24 Naked>                              Σ0 Δ-4     ↓ ←0x20bca
            <MI 20c1e  MOVE.B  (A6-0x2),-(A7)>               Δ-2                {[2, '(A6-0x2)']}
            <Const 0x20c22 0x22.2>                           Δ-2                {[2, '(A6-0x2)']|[#34]}
        <POP 20c24-20c8c Naked>                              Σ-4 Δ+4    ↓ →0x20c92 ←0x20c18
            <Call 0x20c24 0x20406>                                              {[-4-]}
            <POP 20c26-20c28 StackAdj>                       Δ+4                {}
            <Blob 0x20c28 [8] @>                             Δ-8                {[«8""»]}
            <Call 0x20c38 0x214de>                                              {[«8""»]}
                exp_INIT_RF.VAL(Sw_8)
            <MI 20c3e  MOVEA.L A7,A0>                                           {[«8""»]}
            <MI 20c40  LEA.L   0x201f1,A1>                                      {[«8""»]}
            <BlockMove 8,A1,A0>                                                 {[«8""»]}
            <Pointer.fp 0x20c4c <LVAR -0x004 @ 1(r)>>        Δ-4                {[«8""»]|[@@-4]}
            <Const 0x20c4e 0x215a4.4>                        Δ-4                {[«8""»]|[@@-4]|[##136612]}
            <Call 0x20c54 0x21008>                                              {[«8""»]|[@@-4]|[##136612]}
                exp_TEST_RF_LOCATIONS.VAL(Sw_8, &Fr, &Sr_8)
            <POP 20c5a-20c5c StackAdj>                       Δ+14               {[-2-]}
            <MI 20c5c  MOVE.B  (A6-0x4),(A7)>                                   {[-2-]}
            <Const 0x20c5e 0x19.2>                           Δ-2                {[-2-]|[#25]}
            <Call 0x20c60 0x20406>                                              {[-2-]|[#25]}
            <POP 20c62-20c63 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x20c63 [8] @>                             Δ-8                {[«8""»]}
            <Call 0x20c72 0x214de>                                              {[«8""»]}
                exp_INIT_RF.VAL(Sw_8)
            <POP 20c78-20c7a StackAdj>                       Δ+8                {}
            <Pointer.fp 0x20c7a <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-3]}
            <Pointer.fp 0x20c7c <LVAR -0x002 @ 1(r)>>        Δ-4                {[@@-3]|[@@-2]}
            <Call 0x20c80 0x20f8a>                                              {[@@-3]|[@@-2]}
                exp_TEST_RF_PARITY_LOCATIONS.VAL(&Fr, &Fr)
            <POP 20c86-20c88 StackAdj>                       Δ+8                {}
            <MI 20c88  TST.B   (A6-0x3)>                                        {}
            <MI 20c8a  BNE     0x20c92>                                         {}
        <POP 20c8c-20c92 Naked>                              Σ0 Δ-4     →0x20c98
            <MI 20c8c  MOVE.B  (A6-0x3),-(A7)>               Δ-2                {[2, '(A6-0x3)']}
            <Const 0x20c8e 0x21.2>                           Δ-2                {[2, '(A6-0x3)']|[#33]}
            <MI 20c90  BRA     0x20c98>                                         {[2, '(A6-0x3)']|[#33]}
        <POP 20c92-20c98 Naked>                              Σ0 Δ-4     ↓ ←0x20c24
            <MI 20c92  MOVE.B  (A6-0x2),-(A7)>               Δ-2                {[2, '(A6-0x2)']}
            <Const 0x20c96 0x22.2>                           Δ-2                {[2, '(A6-0x2)']|[#34]}
        <POP 20c98-20c9c Naked>                              Σ-4 Δ+4    ↓ ←0x20c8c
            <Call 0x20c98 0x20406>                                              {[-4-]}
            <POP 20c9a-20c9c StackAdj>                       Δ+4                {}
        <POP 20c9c-20ca4 Epilogue>                           Σ0         

0x20ca4


@ 20ca4
        <LVAR -0x004 @ 1(r)>
    <POP 20ca4-20d0c Body>                                              
        <POP 20ca4-20cba Prologue>                           Σ0         ↓
        <POP 20cba-20cce RegCacheLoad>                       Σ0         ↓
        <POP 20cce-20d04 Naked>                              Σ0         ↓
            <Call 0x20cce 0x213b0>                                              {}
                exp_PREP_TEST_Z_CNTR_FILLING.VAL()
            <Pointer.fp 0x20cd4 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Const 0x20cd6 0x215bb.4>                        Δ-4                {[@@-4]|[##136635]}
            <Const 0x20cd8 0x215a4.4>                        Δ-4                {[@@-4]|[##136635]|[##136612]}
            <Call 0x20cda 0x20eac>                                              {[@@-4]|[##136635]|[##136612]}
                exp_TEST_Z_CNTR_FILLING.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20ce0-20ce2 StackAdj>                       Δ+10               {[-2-]}
            <MI 20ce2  MOVE.B  (A6-0x4),(A7)>                                   {[-2-]}
            <Const 0x20ce4 0x1a.2>                           Δ-2                {[-2-]|[#26]}
            <Call 0x20ce6 0x20406>                                              {[-2-]|[#26]}
            <POP 20cea-20cec StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20cec <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Const 0x20cee 0x215bb.4>                        Δ-4                {[@@-4]|[##136635]}
            <Const 0x20cf0 0x215a4.4>                        Δ-4                {[@@-4]|[##136635]|[##136612]}
            <Call 0x20cf2 0x20e84>                                              {[@@-4]|[##136635]|[##136612]}
                exp_TEST_Z_CNTR_WALKING.VAL(&Fr, &Sr_8, &Sr_8)
            <POP 20cf8-20cfa StackAdj>                       Δ+10               {[-2-]}
            <MI 20cfa  MOVE.B  (A6-0x4),(A7)>                                   {[-2-]}
            <Const 0x20cfc 0x1a.2>                           Δ-2                {[-2-]|[#26]}
            <Call 0x20cfe 0x20406>                                              {[-2-]|[#26]}
            <POP 20d02-20d04 StackAdj>                       Δ+4                {}
        <POP 20d04-20d0c Epilogue>                           Σ0         

0x20d0c


@ 20d0c
        <LVAR -0x005 @>
        <LVAR -0x00f @>
        <LVAR -0x010 @ 1(r)>
    <POP 20d0c-20d90 Body>                                              
        <POP 20d0c-20d22 Prologue>                           Σ0         ↓
        <POP 20d22-20d26 RegCacheLoad>                       Σ0         ↓
        <POP 20d26-20d88 Naked>                              Σ0         ↓
            <Blob 0x20d26 [28] @>                            Δ-28               {[«28""»]}
            <MI 20d38  CLR.B   -(A7)>                        Δ-2                {[«28""»]|[#0]}
            <POP 20d3a-20d3c StackAdj>                       Δ-4                {[«28""»]|[#0]|[-4-]}
            <Lit 0x20d3c 27>                                                    {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]}
            <POP 20d4a-20d4c StackAdj>                       Δ-2                {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]|[-2-]}
            <POP 20d4c-20d4d StackAdj>                       Δ+2                {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]}
            <Const 0x20d4d 0x1.2>                            Δ-2                {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]|[#1]}
            <Const 0x20d4e 0x1.2>                            Δ-2                {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]|[#1]|[#1]}
            <Const 0x20d50 0x1.2>                            Δ-2                {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]|[#1]|[#1]|[#1]}
            <Pointer.fp 0x20d52 <LVAR -0x00f @>>             Δ-4                {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]|[#1]|[#1]|[#1]|[@@-15]}
            <Call 0x20d56 0x2033e>                                              {[«28""»]|[#0]|[$$PHASE2_MULT_TEST.M200_UCODE]|[#1]|[#1]|[#1]|[@@-15]}
            <POP 20d5a-20d5e StackAdj>                       Δ+44               {}
            <Pointer.fp 0x20d5e <LVAR -0x010 @ 1(r)>>        Δ-4                {[@@-16]}
            <Pointer.fp 0x20d62 <LVAR -0x005 @>>             Δ-4                {[@@-16]|[@@-5]}
            <Const 0x20d66 0x215a4.4>                        Δ-4                {[@@-16]|[@@-5]|[##136612]}
            <Const 0x20d6c 0x215bb.4>                        Δ-4                {[@@-16]|[@@-5]|[##136612]|[##136635]}
            <Call 0x20d72 0x210e6>                                              {[@@-16]|[@@-5]|[##136612]|[##136635]}
                exp_TEST_MULTIPLIER.VAL(&Fr, &Sr_2, &Sr_8, &Sr_8)
            <POP 20d78-20d7c StackAdj>                       Δ+14               {[-2-]}
            <MI 20d7c  MOVE.B  (A6-0x10),(A7)>                                  {[-2-]}
            <Const 0x20d80 0x1b.2>                           Δ-2                {[-2-]|[#27]}
            <Call 0x20d82 0x20406>                                              {[-2-]|[#27]}
            <POP 20d86-20d88 StackAdj>                       Δ+4                {}
        <POP 20d88-20d90 Epilogue>                           Σ0         

0x20d90


@ 20d90
START
    <POP 20d90--0001 Body>                                              
        <POP 20d90-20d9a Prologue>                           Σ0         
        <POP 20d9a-20db0 RegCacheLoad>                       Σ0         ↓
        <POP 20db0-20e14 Naked>                              Σ0         ↓
            <Call 0x20db0 0x10398>                                              {}
                FSCALL_10398
            <Const 0x20db6 0x0.4>                            Δ-4                {[##0]}
            <Call 0x20dba 0x104d8>                                              {[##0]}
                ExpInit(a : Long)
            <POP 20dc0-20dc2 StackAdj>                       Δ+4                {}
            <Const 0x20dc2 0x215de.4>                        Δ-4                {[##136670]}
            <Const 0x20dc8 0x215df.4>                        Δ-4                {[##136670]|[##136671]}
            <Call 0x20dca 0x10544>                                              {[##136670]|[##136671]}
                IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
            <POP 20dd0-20dd2 StackAdj>                       Δ+6                {[-2-]}
            <POP 20dd2-20dd3 StackAdj>                       Δ+2                {}
            <Blob 0x20dd3 [2] 0x215df>                       Δ-2                {[«2»]}
            <Call 0x20dd4 0x104d2>                                              {[«2»]}
                SetExpInitDone(a : Byte)
            <POP 20dda-20ddb StackAdj>                       Δ+2        ↓       {}
            <Blob 0x20ddb [6] @>                             Δ-6                {[«6""»]}
            <POP 20dea-20dec StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x20dec 5>                                                     {[«6""»]|[$$P2VAL]}
            <MI 20dfe  MOVE.L  (A7)+,0x21594>                Δ+4                {[«6""»]}
            <POP 20e00-20e02 StackAdj>                       Δ+6                {}
            <Const 0x20e02 0x21598.4>                        Δ-4                {[##136600]}
            <Call 0x20e04 0x102b8>                                              {[##136600]}
                NewString(VAR a : String)
            <POP 20e0a-20e0c StackAdj>                       Δ+4                {}
            <MI 20e0c  CLR.B   0x215d5>                                         {}
            <MI 20e12  MOVEQ.L #0x00,D0>                                        {}
        <POP 20e14-20e30 Naked>                              Σ0         ↓ →0x20e14 ←0x20e14
            <MI 20e14  MOVE.L  D0,0x215e0>                                      {}
            <POP 0x20e1a LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 20e20  LEA.L   0x2158c,A0>                                      {}
            <MI 20e26  CLR.B   (A0+D0.L+#0x4a)>                                 {}
            <MI 20e2a  ADDQ.L  #0x1,D0>                                         {}
            <MI 20e2c  CMP.L   #0x07,D0>                                        {}
            <MI 20e2e  BLE     0x20e14>                                         {}
        <POP 20e30-20e7e Naked>                              Σ0         ↓
            <Call 0x20e30 0x204a8>                                              {}
            <Call 0x20e34 0x2053e>                                              {}
            <Call 0x20e38 0x20632>                                              {}
            <Call 0x20e3c 0x2070c>                                              {}
            <Call 0x20e40 0x20832>                                              {}
            <Call 0x20e44 0x20910>                                              {}
            <Call 0x20e48 0x209c0>                                              {}
            <Call 0x20e4c 0x20ba0>                                              {}
            <Call 0x20e50 0x20ca4>                                              {}
            <Call 0x20e54 0x20d0c>                                              {}
            <Call 0x20e58 0x20460>                                              {}
            <Const 0x20e5c 0x1.2>                            Δ-2                {[#1]}
            <Blob 0x20e5e [4] 0x21594>                       Δ-4                {[#1]|[«4»]}
            <Blob 0x20e60 [4] 0x21598>                       Δ-4                {[#1]|[«4»]|[«4»]}
            <Blob 0x20e62 [2] 0x215d5>                       Δ-2                {[#1]|[«4»]|[«4»]|[«2»]}
            <Blob 0x20e68 [4] 0x215da>                       Δ-4                {[#1]|[«4»]|[«4»]|[«2»]|[«4»]}
            <Blob 0x20e6e [4] 0x215d6>                       Δ-4                {[#1]|[«4»]|[«4»]|[«2»]|[«4»]|[«4»]}
            <Call 0x20e74 0x1054a>                                              {[#1]|[«4»]|[«4»]|[«2»]|[«4»]|[«4»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20e7a-20e7e StackAdj>                       Δ+20               {}
        <POP 20e7e-20e84 Naked>                              Σ0         
            <Call 0x20e7e 0x10284>                                              {}
                ?exit

0x21524


@ 21524
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 21524-2158c Body>                                              
        <POP 21524-2153a Prologue>                           Σ0         ↓
        <POP 2153a-21584 Naked>                              Σ0         ↓
            <Blob 0x2153a [14] @>                            Δ-14               {[«14""»]}
            <Const 0x21546 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 2154a-2154c StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x2154c 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 2155e-21560 StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21560  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21564  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21566  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21568  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x2156a 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 21570-21572 StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x21572 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21578-2157a StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x2157a 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 21580-21584 StackAdj>                       Δ+20               {}
        <POP 21584-2158c Epilogue>                           Σ0         

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.70c95d4a287548e7
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 0d 90              |        |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 15 ec              |        |		.PTR	0x215ec
00020010					code.end:
00020010 00 02 15 8c              |        |		.PTR	0x2158c
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 15 24              |   $    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 02 02              |        |		.CODE	EXP_FAIL
00020020 00 00 00 00              |        |		.CONST	0x00000000
00020024					exp_init_done:
00020024 00                       |        |		.CONST	0x00
00020025 00                       |        |		.CONST	0x00
00020026 00 00                    |        |		.CONST	0x0000
00020028 00 00                    |        |		.CONST	0x0000
0002002a 00 00                    |        |		.XXX[0x2]
0002002c 00 00                    |        |		.CONST	0x0000
0002002e 00 00                    |        |		.CONST	0x0000
00020030 00 00                    |        |		.CONST	0x0000
00020032 00 00 00 00 00 00        |        |		.XXX[0x6]
00020038 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0xb0]
000200e8 00 00 00 00              |        |		.XXX[0x4]
000200ec 00 00 00 00              |        |		.PTR	0x0
000200f0					is_open_ERROR_LOG:
000200f0 00                       |        |		.CONST	0x0
000200f1					write_error_ERROR_LOG:
000200f1 00                       |        |		.CONST	0x0
000200f2 00 00 00 00              |        |		.CONST	0x00000000
000200f6 00 00 00 00              |        |		.CONST	0x00000000
000200fa 00                       |        |		.CONST	0x00
000200fb 00                       |        |		.CONST	0x00
000200fc					file_ERROR_LOG:
000200fc 00 00 00 00              |        |		.CONST	0x00000000
00020100 00 00 00 00              |        |		.CONST	0x00000000
00020104 00 00                    |        |		.CONST	0x0000
00020106 00 00                    |        |		.CONST	0x0000
00020108					somekindoffsflag:
00020108 00                       |        |		.CONST	0x00
00020109 00                       |        |		.CONST	0x00
0002010a 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_ '
00020118 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_ '
00020126 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_ '
00020134 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
00020146 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error. '
0002015e 53 42 55 53 55 4c 4f 41  |SBUSULOA|		.TXT	'SBUSULOAD '
00020168 44 42 55 53 55 4c 4f 41  |DBUSULOA|		.TXT	'DBUSULOAD '
00020172 50 32 46 50              |P2FP    |		.TXT	'P2FP'
00020176 50 32 46 50              |P2FP    |		.TXT	'P2FP'
0002017a 54 45 53 54 5f 4c 4f 4f  |TEST_LOO|		.TXT	'TEST_LOOP_CNTR_OVERFLOW.VAL '
00020196 50 48                    |PH      |		.XXX[0x2]
00020198 41 53 45 32 5f 4d 55 4c  |ASE2_MUL|		.XXX[0x18]
000201a0 54 5f 54 45 53 54 2e 4d  |T_TEST.M|
000201a8 31 30 30 5f 55 43 4f 44  |100_UCOD|
000201b0 45 20                    |E       |		.XXX[0x2]
000201b2 50 48 41 53 45 32 5f 4d  |PHASE2_M|		.TXT	'PHASE2_MULT_TEST.M200_UCODE '
000201ce 50 32 56 41 4c 20        |P2VAL   |		.TXT	'P2VAL '
000201d4 00 0a 7f 87 ff 00        |        |		.CONST	0x0,0xa,0x7f,0x87,0xff,0x0
000201da 00 00 00 00 00 0a        |        |		.XXX[0x6]
000201e0 dd                       |        |		.XXX[0x1]
000201e1 00 00 00 00 00 00 00 00  |        |		.CONST	0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
000201e9 00 00 00 00 00 00 00 00  |        |		.CONST	0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
000201f1 ff ff ff ff ff ff ff ff  |        |		.CONST	0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff
000201f9 01 01 01 01 01 01 01 01  |        |		.CONST	0x1,0x1,0x1,0x1,0x1,0x1,0x1,0x1
00020201 00                       |        |		.XXX[0x1]
00020202 ; --------------------------------------------------------------------------------------
00020202 ; OMSI PASCAL Function
00020202 ;    <LVAR  0x00e 1(r)>
00020202 ;    <LVAR  0x00a 4(r)>
00020202 ;    <LVAR  0x008 1(r)>
00020202 ; --------------------------------------------------------------------------------------
00020202					EXP_FAIL:
00020202 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
00020206 bf d5                    |        |		CMPA.L	(A5),A7
00020208 62 06                    |b       |		BHI	0x20210
0002020a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002020e 4e 76                    |Nv      |		TRAPV
00020210 de fc 00 74              |   t    |		ADDA.W	#0x74,A7
00020214 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00020218 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002021e 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
00020224 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020226 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
00020228 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
0002022a 78 12                    |x       |		MOVEQ.L	#0x12,D4
0002022c 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
0002022e 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00020234 41 fa ff 10              |A       |		LEA.L	0x20146,A0
00020238 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002023a 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002023c 51 c8 ff fc              |Q       |		DBF	D0,0x2023a
00020240 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020242 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020246 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020248 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002024a 4e 93                    |N       |		JSR	(A3)
0002024c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002024e 4e 94                    |N       |		JSR	(A4)
00020250 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020252 20 4f                    | O      |		MOVEA.L	A7,A0
00020254 43 fa fe b4              |C       |		LEA.L	0x2010a,A1
00020258 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002025a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002025c 51 c8 ff fc              |Q       |		DBF	D0,0x2025a
00020260 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020262 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020266 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020268 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002026a 4e 93                    |N       |		JSR	(A3)
0002026c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002026e 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
00020272 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
00020278 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002027a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020280 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020282 4e 94                    |N       |		JSR	(A4)
00020284 de c4                    |        |		ADDA.W	D4,A7
00020286 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
0002028a b0 c1                    |        |		CMPA.W	D1,A0
0002028c 67 48                    |gH      |		BEQ	0x202d6
0002028e 9e c5                    |        |		SUBA.W	D5,A7
00020290 22 4f                    |"O      |		MOVEA.L	A7,A1
00020292 45 fa fe 84              |E       |		LEA.L	0x20118,A2
00020296 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020298 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002029a 51 c8 ff fc              |Q       |		DBF	D0,0x20298
0002029e 9e c3                    |        |		SUBA.W	D3,A7
000202a0 22 4f                    |"O      |		MOVEA.L	A7,A1
000202a2 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
000202a6 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
000202a8 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000202aa 51 c8 ff fc              |Q       |		DBF	D0,0x202a8
000202ae 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202b0 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
000202b4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202b6 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202b8 4e 93                    |N       |		JSR	(A3)
000202ba 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000202bc 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000202c0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202c2 3f 03                    |?       |		MOVE.W	D3,-(A7)
000202c4 4e 93                    |N       |		JSR	(A3)
000202c6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202c8 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000202ce 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202d0 4e 94                    |N       |		JSR	(A4)
000202d2 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
000202d6 9e c5                    |        |		SUBA.W	D5,A7
000202d8 20 4f                    | O      |		MOVEA.L	A7,A0
000202da 43 fa fe 4a              |C  J    |		LEA.L	0x20126,A1
000202de 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000202e0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000202e2 51 c8 ff fc              |Q       |		DBF	D0,0x202e0
000202e6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202e8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000202ec 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202ee 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202f0 4e 93                    |N       |		JSR	(A3)
000202f2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202f4 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000202f8 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
000202fe 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020300 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020306 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020308 4e 94                    |N       |		JSR	(A4)
0002030a 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002030c 20 4f                    | O      |		MOVEA.L	A7,A0
0002030e 43 fa fe 36              |C  6    |		LEA.L	0x20146,A1
00020312 70 16                    |p       |		MOVEQ.L	#0x16,D0
00020314 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020316 51 c8 ff fc              |Q       |		DBF	D0,0x20314
0002031a 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
0002031e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020320 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020324 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020326 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
0002032a 4e 93                    |N       |		JSR	(A3)
0002032c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002032e 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020334 de c3                    |        |		ADDA.W	D3,A7
00020336 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002033a 4e 5e                    |N^      |		UNLK	A6
0002033c 4e 75                    |Nu      |		RTS
0002033e ; --------------------------------------------------------------------------------------
0002033e ; OMSI PASCAL Function
0002033e ;    <LVAR  0x016 1(r)>
0002033e ;    <LVAR  0x012 4(r)>
0002033e ;    <LVAR  0x010 1(r)>
0002033e ;    <LVAR  0x00e 1(r)>
0002033e ;    <LVAR  0x00c 1(r)>
0002033e ;    <LVAR  0x008 4(r)>
0002033e ;    <LVAR -0x004 @>
0002033e ; --------------------------------------------------------------------------------------
0002033e 4e 56 ff cc              |NV      |		LINK.W	A6,#0xffcc
00020342 bf d5                    |        |		CMPA.L	(A5),A7
00020344 62 06                    |b       |		BHI	0x2034c
00020346 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002034a 4e 76                    |Nv      |		TRAPV
0002034c de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00020350 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
00020354 45 f9 00 01 05 02        |E       |		LEA.L	IPC_PutBool(a : Bool),A2
0002035a 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
0002035c 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020362 2f 2e 00 12              |/.      |		MOVE.L	(A6+0x12),-(A7)
00020366 4e b9 00 01 05 08        |N       |		JSR	IPC_PutString(a : String)
0002036c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002036e 1e ae 00 10              |        |		MOVE.B	(A6+0x10),(A7)
00020372 4e 92                    |N       |		JSR	(A2)
00020374 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020376 4a 2e 00 16              |J.      |		TST.B	(A6+0x16)
0002037a 66 0e                    |f       |		BNE	0x2038a
0002037c 1f 2e 00 0e              | .      |		MOVE.B	(A6+0xe),-(A7)
00020380 4e 92                    |N       |		JSR	(A2)
00020382 1e ae 00 0c              |        |		MOVE.B	(A6+0xc),(A7)
00020386 4e 92                    |N       |		JSR	(A2)
00020388 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002038a 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
00020390 4a 2e 00 16              |J.      |		TST.B	(A6+0x16)
00020394 67 12                    |g       |		BEQ	0x203a8
00020396 9e c1                    |        |		SUBA.W	D1,A7
00020398 20 4f                    | O      |		MOVEA.L	A7,A0
0002039a 43 fa fd c2              |C       |		LEA.L	0x2015e,A1
0002039e 70 08                    |p       |		MOVEQ.L	#0x08,D0
000203a0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000203a2 51 c8 ff fc              |Q       |		DBF	D0,0x203a0
000203a6 60 10                    |`       |		BRA	0x203b8
000203a8 9e c1                    |        |		SUBA.W	D1,A7
000203aa 20 4f                    | O      |		MOVEA.L	A7,A0
000203ac 43 fa fd ba              |C       |		LEA.L	0x20168,A1
000203b0 70 08                    |p       |		MOVEQ.L	#0x08,D0
000203b2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000203b4 51 c8 ff fc              |Q       |		DBF	D0,0x203b2
000203b8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000203ba 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000203be 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000203c2 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
000203c6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000203cc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203ce 48 78 00 01              |Hx      |		PEA.L	0x1
000203d2 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000203d6 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000203da 4e b9 00 01 03 b0        |N       |		JSR	PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
000203e0 de fc 00 18              |        |		ADDA.W	#0x18,A7
000203e4 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
000203ea 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000203ee 48 50                    |HP      |		PEA.L	(A0)
000203f0 4e b9 00 01 05 26        |N    &  |		JSR	IPC_GetBool() : Bool
000203f6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000203f8 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
000203fe 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
00020402 4e 5e                    |N^      |		UNLK	A6
00020404 4e 75                    |Nu      |		RTS
00020406 ; --------------------------------------------------------------------------------------
00020406 ; OMSI PASCAL Function
00020406 ;    <LVAR  0x00a 1(r)>
00020406 ;    <LVAR  0x008 1(r)>
00020406 ; --------------------------------------------------------------------------------------
00020406 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
0002040a bf d5                    |        |		CMPA.L	(A5),A7
0002040c 62 06                    |b       |		BHI	0x20414
0002040e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020412 4e 76                    |Nv      |		TRAPV
00020414 de fc 00 20              |        |		ADDA.W	#0x20,A7
00020418 48 e7 00 c0              |H       |		MOVEM.L	A1+A0,-(A7)
0002041c 41 f9 00 02 15 d5        |A       |		LEA.L	0x215d5,A0
00020422 43 f9 00 02 15 d6        |C       |		LEA.L	0x215d6,A1
00020428 4a 2e 00 0a              |J.      |		TST.B	(A6+0xa)
0002042c 66 2a                    |f*      |		BNE	0x20458
0002042e 10 ae 00 08              |        |		MOVE.B	(A6+0x8),(A0)
00020432 12 bc 00 04              |        |		MOVE.B	#0x04,(A1)
00020436 42 27                    |B'      |		CLR.B	-(A7)
00020438 2f 39 00 02 15 94        |/9      |		MOVE.L	0x21594,-(A7)
0002043e 2f 39 00 02 15 98        |/9      |		MOVE.L	0x21598,-(A7)
00020444 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020446 2f 39 00 02 15 da        |/9      |		MOVE.L	0x215da,-(A7)
0002044c 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002044e 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020454 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020458 4c df 03 00              |L       |		MOVEM.L	(A7)+,A0+A1
0002045c 4e 5e                    |N^      |		UNLK	A6
0002045e 4e 75                    |Nu      |		RTS
00020460 ; --------------------------------------------------------------------------------------
00020460 ; OMSI PASCAL Function
00020460 ; --------------------------------------------------------------------------------------
00020460 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
00020464 bf d5                    |        |		CMPA.L	(A5),A7
00020466 62 06                    |b       |		BHI	0x2046e
00020468 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002046c 4e 76                    |Nv      |		TRAPV
0002046e de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00020472 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00020476 4e b9 00 02 14 f8        |N       |		JSR	exp_CLEAR_PARITY.VAL()
0002047c 42 67                    |Bg      |		CLR.W	-(A7)
0002047e 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00020480 20 4f                    | O      |		MOVEA.L	A7,A0
00020482 43 fa fd 50              |C  P    |		LEA.L	0x201d4,A1
00020486 70 04                    |p       |		MOVEQ.L	#0x04,D0
00020488 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002048a 51 c8 ff fc              |Q       |		DBF	D0,0x20488
0002048e 42 27                    |B'      |		CLR.B	-(A7)
00020490 4e b9 00 02 14 be        |N       |		JSR	exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1)
00020496 de fc 00 0a              |        |		ADDA.W	#0xa,A7
0002049a 4e b9 00 02 13 72        |N    r  |		JSR	exp_RESET.VAL()
000204a0 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
000204a4 4e 5e                    |N^      |		UNLK	A6
000204a6 4e 75                    |Nu      |		RTS
000204a8 ; --------------------------------------------------------------------------------------
000204a8 ; OMSI PASCAL Function
000204a8 ;    <LVAR -0x005 @>
000204a8 ;    <LVAR -0x007 @>
000204a8 ;    <LVAR -0x008 @ 1(r)>
000204a8 ; --------------------------------------------------------------------------------------
000204a8 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
000204ac bf d5                    |        |		CMPA.L	(A5),A7
000204ae 62 06                    |b       |		BHI	0x204b6
000204b0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204b4 4e 76                    |Nv      |		TRAPV
000204b6 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000204ba 48 e7 00 f0              |H       |		MOVEM.L	A3+A2+A1+A0,-(A7)
000204be 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
000204c2 43 fa ff 42              |C  B    |		LEA.L	0x20406,A1
000204c6 45 f9 00 02 15 9f        |E       |		LEA.L	0x2159f,A2
000204cc 47 f9 00 02 15 b6        |G       |		LEA.L	0x215b6,A3
000204d2 48 50                    |HP      |		PEA.L	(A0)
000204d4 4e b9 00 02 0f 68        |N    h  |		JSR	exp_TEST_WCS_ADDRESS.VAL(&Fr)
000204da 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000204dc 1e 90                    |        |		MOVE.B	(A0),(A7)
000204de 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
000204e2 4e 91                    |N       |		JSR	(A1)
000204e4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000204e6 48 50                    |HP      |		PEA.L	(A0)
000204e8 48 52                    |HR      |		PEA.L	(A2)
000204ea 48 53                    |HS      |		PEA.L	(A3)
000204ec 4e b9 00 02 0f 46        |N    F  |		JSR	exp_TEST_WCS_DATA.VAL(&Fr, &Sr_5, &Sr_5)
000204f2 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000204f6 1e 90                    |        |		MOVE.B	(A0),(A7)
000204f8 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000204fc 4e 91                    |N       |		JSR	(A1)
000204fe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020500 48 50                    |HP      |		PEA.L	(A0)
00020502 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020506 4e b9 00 02 0e d4        |N       |		JSR	exp_TEST_WCS_PARITY.VAL(&Fr, &Sr_5)
0002050c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002050e 1e 90                    |        |		MOVE.B	(A0),(A7)
00020510 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00020514 4e 91                    |N       |		JSR	(A1)
00020516 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020518 48 50                    |HP      |		PEA.L	(A0)
0002051a 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
0002051e 48 52                    |HR      |		PEA.L	(A2)
00020520 48 53                    |HS      |		PEA.L	(A3)
00020522 4e b9 00 02 0e f6        |N       |		JSR	exp_TEST_WCS_LOCATIONS.VAL(&Fr, &Sr_2, &Sr_5, &Sr_5)
00020528 de fc 00 0e              |        |		ADDA.W	#0xe,A7
0002052c 1e 90                    |        |		MOVE.B	(A0),(A7)
0002052e 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00020532 4e 91                    |N       |		JSR	(A1)
00020534 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020536 4c df 0f 00              |L       |		MOVEM.L	(A7)+,A0+A1+A2+A3
0002053a 4e 5e                    |N^      |		UNLK	A6
0002053c 4e 75                    |Nu      |		RTS
0002053e ; --------------------------------------------------------------------------------------
0002053e ; OMSI PASCAL Function
0002053e ;    <LVAR -0x004 @ 4(r)>
0002053e ;    <LVAR -0x008 @ 4(r)>
0002053e ;    <LVAR -0x00c 4(r)>
0002053e ;    <LVAR -0x010 @ 4(r)>
0002053e ;    <LVAR -0x011 @ 1(r)>
0002053e ;    <LVAR -0x012 @ 1(r)>
0002053e ;    <LVAR -0x013 @ 1(r)>
0002053e ;    <LVAR -0x014 @ 1(r)>
0002053e ; --------------------------------------------------------------------------------------
0002053e 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
00020542 bf d5                    |        |		CMPA.L	(A5),A7
00020544 62 06                    |b       |		BHI	0x2054c
00020546 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002054a 4e 76                    |Nv      |		TRAPV
0002054c de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00020550 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00020554 41 ee ff ec              |A       |		LEA.L	(A6-0x14),A0
00020558 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002055a 48 50                    |HP      |		PEA.L	(A0)
0002055c 48 6e ff ed              |Hn      |		PEA.L	(A6-0x13)
00020560 48 79 00 02 15 ac        |Hy      |		PEA.L	0x215ac
00020566 48 79 00 02 15 c3        |Hy      |		PEA.L	0x215c3
0002056c 4e b9 00 02 11 2c        |N    ,  |		JSR	exp_TEST_LOAD_WDR.VAL(&Fr, &Fr, &Sr_8_1, &Sr_8_1)
00020572 de fc 00 10              |        |		ADDA.W	#0x10,A7
00020576 4a 10                    |J       |		TST.B	(A0)
00020578 67 08                    |g       |		BEQ	0x20582
0002057a 4a 2e ff ed              |J.      |		TST.B	(A6-0x13)
0002057e 66 00 00 aa              |f       |		BNE	0x2062a
00020582 4a 39 00 02 15 de        |J9      |		TST.B	0x215de
00020588 67 00 00 88              |g       |		BEQ	0x20612
0002058c 2f 3a fb e4              |/:      |		MOVE.L	0x20172,-(A7)
00020590 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020592 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020596 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020598 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
0002059c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000205a2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000205a4 1e 81                    |        |		MOVE.B	D1,(A7)
000205a6 10 39 00 02 15 df        | 9      |		MOVE.B	0x215df,D0
000205ac 48 80                    |H       |		EXTB.W	D0
000205ae 41 81                    |A       |		CHK.W	D1,D0
000205b0 1f 00                    |        |		MOVE.B	D0,-(A7)
000205b2 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
000205b6 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000205ba 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000205be 48 6e ff ef              |Hn      |		PEA.L	(A6-0x11)
000205c2 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
000205c6 4e b9 00 01 05 3e        |N    >  |		JSR	FSCALL_1053e
000205cc de fc 00 20              |        |		ADDA.W	#0x20,A7
000205d0 4a 2e ff ee              |J.      |		TST.B	(A6-0x12)
000205d4 67 1a                    |g       |		BEQ	0x205f0
000205d6 4a 10                    |J       |		TST.B	(A0)
000205d8 67 08                    |g       |		BEQ	0x205e2
000205da 42 27                    |B'      |		CLR.B	-(A7)
000205dc 1f 3c 00 06              | <      |		MOVE.B	#0x06,-(A7)
000205e0 60 06                    |`       |		BRA	0x205e8
000205e2 42 27                    |B'      |		CLR.B	-(A7)
000205e4 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
000205e8 4e ba fe 1c              |N       |		JSR	0x20406
000205ec 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205ee 60 20                    |`       |		BRA	0x20610
000205f0 42 27                    |B'      |		CLR.B	-(A7)
000205f2 2f 2e ff f8              |/.      |		MOVE.L	(A6-0x8),-(A7)
000205f6 2f 2e ff fc              |/.      |		MOVE.L	(A6-0x4),-(A7)
000205fa 1f 2e ff ef              | .      |		MOVE.B	(A6-0x11),-(A7)
000205fe 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
00020602 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
00020606 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
0002060c de fc 00 14              |        |		ADDA.W	#0x14,A7
00020610 60 18                    |`       |		BRA	0x2062a
00020612 4a 10                    |J       |		TST.B	(A0)
00020614 67 08                    |g       |		BEQ	0x2061e
00020616 42 27                    |B'      |		CLR.B	-(A7)
00020618 1f 3c 00 07              | <      |		MOVE.B	#0x07,-(A7)
0002061c 60 06                    |`       |		BRA	0x20624
0002061e 42 27                    |B'      |		CLR.B	-(A7)
00020620 1f 3c 00 08              | <      |		MOVE.B	#0x08,-(A7)
00020624 4e ba fd e0              |N       |		JSR	0x20406
00020628 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002062a 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
0002062e 4e 5e                    |N^      |		UNLK	A6
00020630 4e 75                    |Nu      |		RTS
00020632 ; --------------------------------------------------------------------------------------
00020632 ; OMSI PASCAL Function
00020632 ;    <LVAR -0x004 @ 4(r)>
00020632 ;    <LVAR -0x008 @ 4(r)>
00020632 ;    <LVAR -0x011 @>
00020632 ;    <LVAR -0x012 @ 1(r)>
00020632 ;    <LVAR -0x013 @ 1(r)>
00020632 ;    <LVAR -0x014 @ 1(r)>
00020632 ; --------------------------------------------------------------------------------------
00020632 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
00020636 bf d5                    |        |		CMPA.L	(A5),A7
00020638 62 06                    |b       |		BHI	0x20640
0002063a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002063e 4e 76                    |Nv      |		TRAPV
00020640 de fc 00 34              |   4    |		ADDA.W	#0x34,A7
00020644 48 e7 c0 c0              |H       |		MOVEM.L	A1+A0+D1+D0,-(A7)
00020648 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002064a 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
0002064e 48 79 00 02 15 ac        |Hy      |		PEA.L	0x215ac
00020654 48 79 00 02 15 c3        |Hy      |		PEA.L	0x215c3
0002065a 4e b9 00 02 11 e8        |N       |		JSR	exp_TEST_FIU_BUS.VAL(&Fr, &Sr_8_1, &Sr_8_1)
00020660 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020664 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
00020668 66 00 00 9a              |f       |		BNE	0x20704
0002066c 4a 39 00 02 15 de        |J9      |		TST.B	0x215de
00020672 67 00 00 84              |g       |		BEQ	0x206f8
00020676 2f 3a fa fe              |/:      |		MOVE.L	0x20176,-(A7)
0002067a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002067c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020680 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020682 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020686 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002068c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002068e 1e 81                    |        |		MOVE.B	D1,(A7)
00020690 10 39 00 02 15 df        | 9      |		MOVE.B	0x215df,D0
00020696 48 80                    |H       |		EXTB.W	D0
00020698 41 81                    |A       |		CHK.W	D1,D0
0002069a 1f 00                    |        |		MOVE.B	D0,-(A7)
0002069c 48 6e ff ed              |Hn      |		PEA.L	(A6-0x13)
000206a0 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000206a4 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000206a8 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
000206ac 48 6e ff ef              |Hn      |		PEA.L	(A6-0x11)
000206b0 4e b9 00 01 05 3e        |N    >  |		JSR	FSCALL_1053e
000206b6 de fc 00 20              |        |		ADDA.W	#0x20,A7
000206ba 4a 2e ff ed              |J.      |		TST.B	(A6-0x13)
000206be 67 0e                    |g       |		BEQ	0x206ce
000206c0 42 27                    |B'      |		CLR.B	-(A7)
000206c2 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
000206c6 4e ba fd 3e              |N  >    |		JSR	0x20406
000206ca 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000206cc 60 28                    |`(      |		BRA	0x206f6
000206ce 42 27                    |B'      |		CLR.B	-(A7)
000206d0 2f 2e ff f8              |/.      |		MOVE.L	(A6-0x8),-(A7)
000206d4 2f 2e ff fc              |/.      |		MOVE.L	(A6-0x4),-(A7)
000206d8 1f 2e ff ee              | .      |		MOVE.B	(A6-0x12),-(A7)
000206dc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000206de 20 4f                    | O      |		MOVEA.L	A7,A0
000206e0 43 ee ff ef              |C       |		LEA.L	(A6-0x11),A1
000206e4 70 07                    |p       |		MOVEQ.L	#0x07,D0
000206e6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000206e8 51 c8 ff fc              |Q       |		DBF	D0,0x206e6
000206ec 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
000206f2 de fc 00 14              |        |		ADDA.W	#0x14,A7
000206f6 60 0c                    |`       |		BRA	0x20704
000206f8 42 27                    |B'      |		CLR.B	-(A7)
000206fa 1f 3c 00 0a              | <      |		MOVE.B	#0x0a,-(A7)
000206fe 4e ba fd 06              |N       |		JSR	0x20406
00020702 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020704 4c df 03 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1
00020708 4e 5e                    |N^      |		UNLK	A6
0002070a 4e 75                    |Nu      |		RTS
0002070c ; --------------------------------------------------------------------------------------
0002070c ; OMSI PASCAL Function
0002070c ;    <LVAR -0x005 @>
0002070c ;    <LVAR -0x007 @>
0002070c ;    <LVAR -0x008 @>
0002070c ;    <LVAR -0x009 @ 1(r)>
0002070c ;    <LVAR -0x00a @>
0002070c ;    <LVAR -0x00b @>
0002070c ;    <LVAR -0x00c @ 1(r)>
0002070c ;    <LVAR -0x014 @ 4(r)>
0002070c ; --------------------------------------------------------------------------------------
0002070c 4e 56 ff 94              |NV      |		LINK.W	A6,#0xff94
00020710 bf d5                    |        |		CMPA.L	(A5),A7
00020712 62 06                    |b       |		BHI	0x2071a
00020714 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020718 4e 76                    |Nv      |		TRAPV
0002071a de fc 00 58              |   X    |		ADDA.W	#0x58,A7
0002071e 48 e7 f9 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7)
00020722 45 ee ff f7              |E       |		LEA.L	(A6-0x9),A2
00020726 47 ee ff ec              |G       |		LEA.L	(A6-0x14),A3
0002072a 49 fa fc da              |I       |		LEA.L	0x20406,A4
0002072e 72 07                    |r       |		MOVEQ.L	#0x07,D1
00020730 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
00020732 76 01                    |v       |		MOVEQ.L	#0x01,D3
00020734 78 0d                    |x       |		MOVEQ.L	#0x0d,D4
00020736 48 52                    |HR      |		PEA.L	(A2)
00020738 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002073c 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020740 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
00020744 4e b9 00 02 11 4e        |N    N  |		JSR	exp_TEST_LOAD_LOOP_COUNTER.VAL(&Fr, &Fr, &Sr_2, &Sr_2)
0002074a de c2                    |        |		ADDA.W	D2,A7
0002074c 1e 92                    |        |		MOVE.B	(A2),(A7)
0002074e 1f 3c 00 0b              | <      |		MOVE.B	#0x0b,-(A7)
00020752 4e 94                    |N       |		JSR	(A4)
00020754 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020756 48 52                    |HR      |		PEA.L	(A2)
00020758 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002075c 48 79 00 02 15 a4        |Hy      |		PEA.L	0x215a4
00020762 48 79 00 02 15 bb        |Hy      |		PEA.L	0x215bb
00020768 4e b9 00 02 12 78        |N    x  |		JSR	exp_TEST_COUNT_LOOP_COUNTER.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
0002076e de c2                    |        |		ADDA.W	D2,A7
00020770 1e 92                    |        |		MOVE.B	(A2),(A7)
00020772 1f 3c 00 0c              | <      |		MOVE.B	#0x0c,-(A7)
00020776 4e 94                    |N       |		JSR	(A4)
00020778 9e fc 00 18              |        |		SUBA.W	#0x18,A7
0002077c 20 4f                    | O      |		MOVEA.L	A7,A0
0002077e 43 fa f9 fa              |C       |		LEA.L	0x2017a,A1
00020782 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
00020784 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020786 51 c8 ff fc              |Q       |		DBF	D0,0x20784
0002078a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002078c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020790 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020792 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
00020796 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002079c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002079e 48 53                    |HS      |		PEA.L	(A3)
000207a0 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000207a6 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
000207aa 1e 81                    |        |		MOVE.B	D1,(A7)
000207ac 2f 13                    |/       |		MOVE.L	(A3),-(A7)
000207ae 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
000207b4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000207b6 2e 3c ff ff ec 78        |.<   x  |		MOVE.L	#0xffffec78,D7
000207bc 1f 01                    |        |		MOVE.B	D1,-(A7)
000207be 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
000207c2 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
000207c6 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
000207ca 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
000207d0 de c2                    |        |		ADDA.W	D2,A7
000207d2 52 87                    |R       |		ADDQ.L	#0x1,D7
000207d4 67 08                    |g       |		BEQ	0x207de
000207d6 10 2e ff f4              | .      |		MOVE.B	(A6-0xc),D0
000207da b0 03                    |        |		CMP.B	D3,D0
000207dc 66 de                    |f       |		BNE	0x207bc
000207de 10 2e ff f4              | .      |		MOVE.B	(A6-0xc),D0
000207e2 b0 03                    |        |		CMP.B	D3,D0
000207e4 67 08                    |g       |		BEQ	0x207ee
000207e6 42 27                    |B'      |		CLR.B	-(A7)
000207e8 1f 04                    |        |		MOVE.B	D4,-(A7)
000207ea 4e 94                    |N       |		JSR	(A4)
000207ec 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000207ee 1f 01                    |        |		MOVE.B	D1,-(A7)
000207f0 2f 13                    |/       |		MOVE.L	(A3),-(A7)
000207f2 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
000207f6 4e b9 00 01 04 90        |N       |		JSR	ExpUpload(adr: Byte; ptr: Pointer; VAR status : Byte)
000207fc 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000207fe 2e 93                    |.       |		MOVE.L	(A3),(A7)
00020800 48 52                    |HR      |		PEA.L	(A2)
00020802 4e b9 00 01 04 78        |N    x  |		JSR	ExpOutputFlag(exp : Pointer; VAR status : Bool)
00020808 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002080a 48 53                    |HS      |		PEA.L	(A3)
0002080c 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
00020812 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020814 1e 81                    |        |		MOVE.B	D1,(A7)
00020816 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
0002081a 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
00020820 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020822 1e 92                    |        |		MOVE.B	(A2),(A7)
00020824 1f 04                    |        |		MOVE.B	D4,-(A7)
00020826 4e 94                    |N       |		JSR	(A4)
00020828 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002082a 4c df 1f 9f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4
0002082e 4e 5e                    |N^      |		UNLK	A6
00020830 4e 75                    |Nu      |		RTS
00020832 ; --------------------------------------------------------------------------------------
00020832 ; OMSI PASCAL Function
00020832 ;    <LVAR -0x002 @>
00020832 ;    <LVAR -0x003 @>
00020832 ;    <LVAR -0x00b @>
00020832 ;    <LVAR -0x013 @>
00020832 ;    <LVAR -0x014 @ 1(r)>
00020832 ; --------------------------------------------------------------------------------------
00020832 4e 56 ff ac              |NV      |		LINK.W	A6,#0xffac
00020836 bf d5                    |        |		CMPA.L	(A5),A7
00020838 62 06                    |b       |		BHI	0x20840
0002083a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002083e 4e 76                    |Nv      |		TRAPV
00020840 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00020844 48 e7 f0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
00020848 45 ee ff ec              |E       |		LEA.L	(A6-0x14),A2
0002084c 47 f9 00 02 15 bb        |G       |		LEA.L	0x215bb,A3
00020852 49 ee ff ed              |I       |		LEA.L	(A6-0x13),A4
00020856 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
00020858 74 16                    |t       |		MOVEQ.L	#0x16,D2
0002085a 76 10                    |v       |		MOVEQ.L	#0x10,D3
0002085c 48 52                    |HR      |		PEA.L	(A2)
0002085e 48 54                    |HT      |		PEA.L	(A4)
00020860 48 54                    |HT      |		PEA.L	(A4)
00020862 48 53                    |HS      |		PEA.L	(A3)
00020864 4e b9 00 02 10 56        |N    V  |		JSR	exp_TEST_RF_DATA_LINES.VAL(&Fr, &Sr_8, &Sr_8, &Sr_8)
0002086a de c1                    |        |		ADDA.W	D1,A7
0002086c 1e 92                    |        |		MOVE.B	(A2),(A7)
0002086e 1f 01                    |        |		MOVE.B	D1,-(A7)
00020870 4e ba fb 94              |N       |		JSR	0x20406
00020874 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020876 20 4f                    | O      |		MOVEA.L	A7,A0
00020878 43 fa f9 5f              |C  _    |		LEA.L	0x201d9,A1
0002087c 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002087e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020880 51 c8 ff fc              |Q       |		DBF	D0,0x2087e
00020884 4e b9 00 02 14 de        |N       |		JSR	exp_INIT_RF.VAL(Sw_8)
0002088a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002088c 48 52                    |HR      |		PEA.L	(A2)
0002088e 48 54                    |HT      |		PEA.L	(A4)
00020890 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
00020894 48 53                    |HS      |		PEA.L	(A3)
00020896 4e b9 00 02 11 c0        |N       |		JSR	exp_TEST_FRAME_REG_ADR.VAL(&Fr, &Sr_8, &Sr_8, &Sr_8)
0002089c de c1                    |        |		ADDA.W	D1,A7
0002089e 1e 92                    |        |		MOVE.B	(A2),(A7)
000208a0 1f 3c 00 0f              | <      |		MOVE.B	#0x0f,-(A7)
000208a4 4e ba fb 60              |N  `    |		JSR	0x20406
000208a8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000208aa 20 4f                    | O      |		MOVEA.L	A7,A0
000208ac 43 fa f9 33              |C  3    |		LEA.L	0x201e1,A1
000208b0 70 07                    |p       |		MOVEQ.L	#0x07,D0
000208b2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000208b4 51 c8 ff fc              |Q       |		DBF	D0,0x208b2
000208b8 4e b9 00 02 14 de        |N       |		JSR	exp_INIT_RF.VAL(Sw_8)
000208be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000208c0 48 52                    |HR      |		PEA.L	(A2)
000208c2 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
000208c6 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
000208ca 48 54                    |HT      |		PEA.L	(A4)
000208cc 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
000208d0 48 53                    |HS      |		PEA.L	(A3)
000208d2 4e b9 00 02 0f 1e        |N       |		JSR	exp_TEST_WRITE_GP_ADR.VAL(&Fr, &Sr_1, &Sr_1, &Sr_8, &Sr_8, &Sr_8)
000208d8 de c2                    |        |		ADDA.W	D2,A7
000208da 1e 92                    |        |		MOVE.B	(A2),(A7)
000208dc 1f 03                    |        |		MOVE.B	D3,-(A7)
000208de 4e ba fb 26              |N  &    |		JSR	0x20406
000208e2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208e4 48 52                    |HR      |		PEA.L	(A2)
000208e6 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
000208ea 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
000208ee 48 54                    |HT      |		PEA.L	(A4)
000208f0 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
000208f4 48 53                    |HS      |		PEA.L	(A3)
000208f6 4e b9 00 02 10 2e        |N    .  |		JSR	exp_TEST_READ_GP_ADR.VAL(&Fr, &Sr_1, &Sr_1, &Sr_8, &Sr_8, &Sr_8)
000208fc de c2                    |        |		ADDA.W	D2,A7
000208fe 1e 92                    |        |		MOVE.B	(A2),(A7)
00020900 1f 03                    |        |		MOVE.B	D3,-(A7)
00020902 4e ba fb 02              |N       |		JSR	0x20406
00020906 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020908 4c df 1f 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4
0002090c 4e 5e                    |N^      |		UNLK	A6
0002090e 4e 75                    |Nu      |		RTS
00020910 ; --------------------------------------------------------------------------------------
00020910 ; OMSI PASCAL Function
00020910 ;    <LVAR -0x008 @>
00020910 ;    <LVAR -0x009 @ 1(r)>
00020910 ;    <LVAR -0x012 @>
00020910 ;    <LVAR -0x013 @>
00020910 ;    <LVAR -0x014 @ 1(r)>
00020910 ; --------------------------------------------------------------------------------------
00020910 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
00020914 bf d5                    |        |		CMPA.L	(A5),A7
00020916 62 06                    |b       |		BHI	0x2091e
00020918 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002091c 4e 76                    |Nv      |		TRAPV
0002091e de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00020922 48 e7 80 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D0,-(A7)
00020926 41 ee ff ec              |A       |		LEA.L	(A6-0x14),A0
0002092a 43 ee ff f7              |C       |		LEA.L	(A6-0x9),A1
0002092e 45 fa fa d6              |E       |		LEA.L	0x20406,A2
00020932 47 f9 00 02 15 9c        |G       |		LEA.L	0x2159c,A3
00020938 49 f9 00 02 15 b5        |I       |		LEA.L	0x215b5,A4
0002093e 70 14                    |p       |		MOVEQ.L	#0x14,D0
00020940 48 50                    |HP      |		PEA.L	(A0)
00020942 48 6e ff ed              |Hn      |		PEA.L	(A6-0x13)
00020946 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
0002094a 4e b9 00 02 0f b6        |N       |		JSR	exp_TEST_RF_PARITY_CHECKERS.VAL(&Fr, &Fr, &Sr_8_1)
00020950 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020954 1e 90                    |        |		MOVE.B	(A0),(A7)
00020956 1f 3c 00 11              | <      |		MOVE.B	#0x11,-(A7)
0002095a 4e 92                    |N       |		JSR	(A2)
0002095c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002095e 48 50                    |HP      |		PEA.L	(A0)
00020960 48 51                    |HQ      |		PEA.L	(A1)
00020962 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00020966 48 53                    |HS      |		PEA.L	(A3)
00020968 48 54                    |HT      |		PEA.L	(A4)
0002096a 4e b9 00 02 12 f6        |N       |		JSR	exp_TEST_BUS_PARITY_CHECKERS.VAL(&Fr, &Fr, &Sr_8, &Sr_1, &Sr_1)
00020970 de c0                    |        |		ADDA.W	D0,A7
00020972 4a 11                    |J       |		TST.B	(A1)
00020974 67 08                    |g       |		BEQ	0x2097e
00020976 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020978 1f 3c 00 1d              | <      |		MOVE.B	#0x1d,-(A7)
0002097c 60 06                    |`       |		BRA	0x20984
0002097e 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020980 1f 3c 00 1c              | <      |		MOVE.B	#0x1c,-(A7)
00020984 4e 92                    |N       |		JSR	(A2)
00020986 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020988 4e b9 00 02 13 da        |N       |		JSR	exp_PREP_TEST_RF_PAR_ADDR.VAL()
0002098e 48 50                    |HP      |		PEA.L	(A0)
00020990 48 51                    |HQ      |		PEA.L	(A1)
00020992 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00020996 48 53                    |HS      |		PEA.L	(A3)
00020998 48 54                    |HT      |		PEA.L	(A4)
0002099a 4e b9 00 02 0f e2        |N       |		JSR	exp_TEST_RF_PAR_ADDR.VAL(&Fr, &Fr, &Sr_8, &Sr_1, &Sr_1)
000209a0 de c0                    |        |		ADDA.W	D0,A7
000209a2 4a 11                    |J       |		TST.B	(A1)
000209a4 67 08                    |g       |		BEQ	0x209ae
000209a6 1f 10                    |        |		MOVE.B	(A0),-(A7)
000209a8 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
000209ac 60 06                    |`       |		BRA	0x209b4
000209ae 1f 10                    |        |		MOVE.B	(A0),-(A7)
000209b0 1f 3c 00 1f              | <      |		MOVE.B	#0x1f,-(A7)
000209b4 4e 92                    |N       |		JSR	(A2)
000209b6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000209b8 4c df 1f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3+A4
000209bc 4e 5e                    |N^      |		UNLK	A6
000209be 4e 75                    |Nu      |		RTS
000209c0 ; --------------------------------------------------------------------------------------
000209c0 ; OMSI PASCAL Function
000209c0 ;    <LVAR -0x002 @>
000209c0 ;    <LVAR -0x003 @>
000209c0 ;    <LVAR -0x004 @ 1(r)>
000209c0 ;    <LVAR -0x005 @>
000209c0 ;    <LVAR -0x006 @ 1(r)>
000209c0 ;    <LVAR -0x007 @ 1(r)>
000209c0 ;    <LVAR -0x008 @ 1(r)>
000209c0 ; --------------------------------------------------------------------------------------
000209c0 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
000209c4 bf d5                    |        |		CMPA.L	(A5),A7
000209c6 62 06                    |b       |		BHI	0x209ce
000209c8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000209cc 4e 76                    |Nv      |		TRAPV
000209ce de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
000209d2 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
000209d6 41 f9 00 02 15 a4        |A       |		LEA.L	0x215a4,A0
000209dc 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
000209e0 45 f9 00 02 15 bb        |E       |		LEA.L	0x215bb,A2
000209e6 47 fa fa 1e              |G       |		LEA.L	0x20406,A3
000209ea 49 ee ff f9              |I       |		LEA.L	(A6-0x7),A4
000209ee 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
000209f0 72 17                    |r       |		MOVEQ.L	#0x17,D1
000209f2 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
000209f4 76 18                    |v       |		MOVEQ.L	#0x18,D3
000209f6 78 12                    |x       |		MOVEQ.L	#0x12,D4
000209f8 4e b9 00 02 13 88        |N       |		JSR	exp_PREP_UCODE_LOGICAL_ALU.VAL()
000209fe 4e b9 00 02 14 9a        |N       |		JSR	exp_PREP_RF_LOGICAL_ALU.VAL()
00020a04 48 51                    |HQ      |		PEA.L	(A1)
00020a06 48 52                    |HR      |		PEA.L	(A2)
00020a08 48 50                    |HP      |		PEA.L	(A0)
00020a0a 4e b9 00 02 11 7a        |N    z  |		JSR	exp_TEST_LOGICAL_ALU.VAL(&Fr, &Sr_8, &Sr_8)
00020a10 de c0                    |        |		ADDA.W	D0,A7
00020a12 1e 91                    |        |		MOVE.B	(A1),(A7)
00020a14 1f 04                    |        |		MOVE.B	D4,-(A7)
00020a16 4e 93                    |N       |		JSR	(A3)
00020a18 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a1a 48 51                    |HQ      |		PEA.L	(A1)
00020a1c 48 52                    |HR      |		PEA.L	(A2)
00020a1e 48 50                    |HP      |		PEA.L	(A0)
00020a20 4e b9 00 02 10 c4        |N       |		JSR	exp_TEST_NOT_B_OP.VAL(&Fr, &Sr_8, &Sr_8)
00020a26 de c0                    |        |		ADDA.W	D0,A7
00020a28 1e 91                    |        |		MOVE.B	(A1),(A7)
00020a2a 1f 04                    |        |		MOVE.B	D4,-(A7)
00020a2c 4e 93                    |N       |		JSR	(A3)
00020a2e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a30 48 51                    |HQ      |		PEA.L	(A1)
00020a32 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020a36 48 52                    |HR      |		PEA.L	(A2)
00020a38 48 50                    |HP      |		PEA.L	(A0)
00020a3a 4e b9 00 02 13 24        |N    $  |		JSR	exp_TEST_ALU_ZEROS_ONES.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
00020a40 de c2                    |        |		ADDA.W	D2,A7
00020a42 1e ae ff fc              |        |		MOVE.B	(A6-0x4),(A7)
00020a46 1f 3c 00 13              | <      |		MOVE.B	#0x13,-(A7)
00020a4a 4e 93                    |N       |		JSR	(A3)
00020a4c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a4e 1e 91                    |        |		MOVE.B	(A1),(A7)
00020a50 1f 3c 00 14              | <      |		MOVE.B	#0x14,-(A7)
00020a54 4e 93                    |N       |		JSR	(A3)
00020a56 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a58 48 51                    |HQ      |		PEA.L	(A1)
00020a5a 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020a5e 48 52                    |HR      |		PEA.L	(A2)
00020a60 48 50                    |HP      |		PEA.L	(A0)
00020a62 4e b9 00 02 10 7e        |N    ~  |		JSR	exp_TEST_PASS_RANDOMS.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
00020a68 de c2                    |        |		ADDA.W	D2,A7
00020a6a 1e 91                    |        |		MOVE.B	(A1),(A7)
00020a6c 1f 3c 00 15              | <      |		MOVE.B	#0x15,-(A7)
00020a70 4e 93                    |N       |		JSR	(A3)
00020a72 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a74 48 51                    |HQ      |		PEA.L	(A1)
00020a76 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020a7a 48 52                    |HR      |		PEA.L	(A2)
00020a7c 48 50                    |HP      |		PEA.L	(A0)
00020a7e 4e b9 00 02 13 4c        |N    L  |		JSR	exp_TEST_ALU_SHIFTED.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
00020a84 de c2                    |        |		ADDA.W	D2,A7
00020a86 1e 91                    |        |		MOVE.B	(A1),(A7)
00020a88 1f 3c 00 16              | <      |		MOVE.B	#0x16,-(A7)
00020a8c 4e 93                    |N       |		JSR	(A3)
00020a8e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a90 48 54                    |HT      |		PEA.L	(A4)
00020a92 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020a96 48 50                    |HP      |		PEA.L	(A0)
00020a98 4e b9 00 02 14 00        |N       |		JSR	exp_PREP_TEST_PLUS_MINUS.VAL(&Fr, &Fr, &Sr_8)
00020a9e de c0                    |        |		ADDA.W	D0,A7
00020aa0 1e 94                    |        |		MOVE.B	(A4),(A7)
00020aa2 1f 01                    |        |		MOVE.B	D1,-(A7)
00020aa4 4e 93                    |N       |		JSR	(A3)
00020aa6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020aa8 1e ae ff fa              |        |		MOVE.B	(A6-0x6),(A7)
00020aac 1f 01                    |        |		MOVE.B	D1,-(A7)
00020aae 4e 93                    |N       |		JSR	(A3)
00020ab0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ab2 48 51                    |HQ      |		PEA.L	(A1)
00020ab4 48 52                    |HR      |		PEA.L	(A2)
00020ab6 48 50                    |HP      |		PEA.L	(A0)
00020ab8 4e b9 00 02 10 a4        |N       |		JSR	exp_TEST_PLUS_OP.VAL(&Fr, &Sr_8, &Sr_8)
00020abe de c0                    |        |		ADDA.W	D0,A7
00020ac0 1e 91                    |        |		MOVE.B	(A1),(A7)
00020ac2 1f 01                    |        |		MOVE.B	D1,-(A7)
00020ac4 4e 93                    |N       |		JSR	(A3)
00020ac6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ac8 48 54                    |HT      |		PEA.L	(A4)
00020aca 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020ace 48 50                    |HP      |		PEA.L	(A0)
00020ad0 4e b9 00 02 14 00        |N       |		JSR	exp_PREP_TEST_PLUS_MINUS.VAL(&Fr, &Fr, &Sr_8)
00020ad6 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020ada 48 51                    |HQ      |		PEA.L	(A1)
00020adc 48 52                    |HR      |		PEA.L	(A2)
00020ade 48 50                    |HP      |		PEA.L	(A0)
00020ae0 4e b9 00 02 11 0a        |N       |		JSR	exp_TEST_MINUS_OP.VAL(&Fr, &Sr_8, &Sr_8)
00020ae6 de c0                    |        |		ADDA.W	D0,A7
00020ae8 1e 91                    |        |		MOVE.B	(A1),(A7)
00020aea 1f 01                    |        |		MOVE.B	D1,-(A7)
00020aec 4e 93                    |N       |		JSR	(A3)
00020aee 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020af0 4e b9 00 02 14 28        |N    (  |		JSR	exp_PREP_TEST_INC_DEC.VAL()
00020af6 48 51                    |HQ      |		PEA.L	(A1)
00020af8 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020afc 48 52                    |HR      |		PEA.L	(A2)
00020afe 48 50                    |HP      |		PEA.L	(A0)
00020b00 4e b9 00 02 11 9e        |N       |		JSR	exp_TEST_INC_A_OP.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
00020b06 de c2                    |        |		ADDA.W	D2,A7
00020b08 1e 91                    |        |		MOVE.B	(A1),(A7)
00020b0a 1f 01                    |        |		MOVE.B	D1,-(A7)
00020b0c 4e 93                    |N       |		JSR	(A3)
00020b0e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b10 48 51                    |HQ      |		PEA.L	(A1)
00020b12 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020b16 48 52                    |HR      |		PEA.L	(A2)
00020b18 48 50                    |HP      |		PEA.L	(A0)
00020b1a 4e b9 00 02 12 2e        |N    .  |		JSR	exp_TEST_DEC_A_OP.VAL(&Fr, &Fr, &Sr_8, &Sr_8)
00020b20 de c2                    |        |		ADDA.W	D2,A7
00020b22 1e 91                    |        |		MOVE.B	(A1),(A7)
00020b24 1f 01                    |        |		MOVE.B	D1,-(A7)
00020b26 4e 93                    |N       |		JSR	(A3)
00020b28 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b2a 48 51                    |HQ      |		PEA.L	(A1)
00020b2c 48 52                    |HR      |		PEA.L	(A2)
00020b2e 48 50                    |HP      |		PEA.L	(A0)
00020b30 4e b9 00 02 12 50        |N    P  |		JSR	exp_TEST_CARRY_PROPAGATE.VAL(&Fr, &Sr_8, &Sr_8)
00020b36 de c0                    |        |		ADDA.W	D0,A7
00020b38 1e 91                    |        |		MOVE.B	(A1),(A7)
00020b3a 1f 03                    |        |		MOVE.B	D3,-(A7)
00020b3c 4e 93                    |N       |		JSR	(A3)
00020b3e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b40 4e b9 00 02 14 74        |N    t  |		JSR	exp_PREP_TEST_BORROW_PROP.VAL()
00020b46 48 51                    |HQ      |		PEA.L	(A1)
00020b48 48 52                    |HR      |		PEA.L	(A2)
00020b4a 48 50                    |HP      |		PEA.L	(A0)
00020b4c 4e b9 00 02 12 cc        |N       |		JSR	exp_TEST_BORROW_PROPAGATE.VAL(&Fr, &Sr_8, &Sr_8)
00020b52 de c0                    |        |		ADDA.W	D0,A7
00020b54 1e 91                    |        |		MOVE.B	(A1),(A7)
00020b56 1f 03                    |        |		MOVE.B	D3,-(A7)
00020b58 4e 93                    |N       |		JSR	(A3)
00020b5a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b5c 4e b9 00 02 14 4a        |N    J  |		JSR	exp_PREP_TEST_CARRY_GENERATE.VAL()
00020b62 48 51                    |HQ      |		PEA.L	(A1)
00020b64 48 52                    |HR      |		PEA.L	(A2)
00020b66 48 50                    |HP      |		PEA.L	(A0)
00020b68 4e b9 00 02 12 a4        |N       |		JSR	exp_TEST_CARRY_GENERATE.VAL(&Fr, &Sr_8, &Sr_8)
00020b6e de c0                    |        |		ADDA.W	D0,A7
00020b70 1e 91                    |        |		MOVE.B	(A1),(A7)
00020b72 1f 03                    |        |		MOVE.B	D3,-(A7)
00020b74 4e 93                    |N       |		JSR	(A3)
00020b76 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b78 48 51                    |HQ      |		PEA.L	(A1)
00020b7a 48 79 00 02 15 b5        |Hy      |		PEA.L	0x215b5
00020b80 48 79 00 02 15 9c        |Hy      |		PEA.L	0x2159c
00020b86 4e b9 00 02 12 08        |N       |		JSR	exp_TEST_DIVIDE_LOGIC.VAL(&Fr, &Sr_1, &Sr_1)
00020b8c de c0                    |        |		ADDA.W	D0,A7
00020b8e 1e 91                    |        |		MOVE.B	(A1),(A7)
00020b90 1f 3c 00 1e              | <      |		MOVE.B	#0x1e,-(A7)
00020b94 4e 93                    |N       |		JSR	(A3)
00020b96 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b98 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
00020b9c 4e 5e                    |N^      |		UNLK	A6
00020b9e 4e 75                    |Nu      |		RTS
00020ba0 ; --------------------------------------------------------------------------------------
00020ba0 ; OMSI PASCAL Function
00020ba0 ;    <LVAR -0x002 @ 1(r)>
00020ba0 ;    <LVAR -0x003 @ 1(r)>
00020ba0 ;    <LVAR -0x004 @ 1(r)>
00020ba0 ; --------------------------------------------------------------------------------------
00020ba0 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
00020ba4 bf d5                    |        |		CMPA.L	(A5),A7
00020ba6 62 06                    |b       |		BHI	0x20bae
00020ba8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020bac 4e 76                    |Nv      |		TRAPV
00020bae de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
00020bb2 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
00020bb6 45 ee ff fd              |E       |		LEA.L	(A6-0x3),A2
00020bba 47 ee ff fc              |G       |		LEA.L	(A6-0x4),A3
00020bbe 49 fa f8 46              |I  F    |		LEA.L	0x20406,A4
00020bc2 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
00020bc4 74 19                    |t       |		MOVEQ.L	#0x19,D2
00020bc6 76 21                    |v!      |		MOVEQ.L	#0x21,D3
00020bc8 78 22                    |x"      |		MOVEQ.L	#0x22,D4
00020bca 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020bcc 20 4f                    | O      |		MOVEA.L	A7,A0
00020bce 43 fa f6 19              |C       |		LEA.L	0x201e9,A1
00020bd2 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020bd4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020bd6 51 c8 ff fc              |Q       |		DBF	D0,0x20bd4
00020bda 4e b9 00 02 14 de        |N       |		JSR	exp_INIT_RF.VAL(Sw_8)
00020be0 20 4f                    | O      |		MOVEA.L	A7,A0
00020be2 43 fa f6 05              |C       |		LEA.L	0x201e9,A1
00020be6 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020be8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020bea 51 c8 ff fc              |Q       |		DBF	D0,0x20be8
00020bee 48 53                    |HS      |		PEA.L	(A3)
00020bf0 48 79 00 02 15 a4        |Hy      |		PEA.L	0x215a4
00020bf6 4e b9 00 02 10 08        |N       |		JSR	exp_TEST_RF_LOCATIONS.VAL(Sw_8, &Fr, &Sr_8)
00020bfc de c1                    |        |		ADDA.W	D1,A7
00020bfe 1e 93                    |        |		MOVE.B	(A3),(A7)
00020c00 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c02 4e 94                    |N       |		JSR	(A4)
00020c04 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c06 48 52                    |HR      |		PEA.L	(A2)
00020c08 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020c0c 4e b9 00 02 0f 8a        |N       |		JSR	exp_TEST_RF_PARITY_LOCATIONS.VAL(&Fr, &Fr)
00020c12 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020c14 4a 12                    |J       |		TST.B	(A2)
00020c16 66 06                    |f       |		BNE	0x20c1e
00020c18 1f 12                    |        |		MOVE.B	(A2),-(A7)
00020c1a 1f 03                    |        |		MOVE.B	D3,-(A7)
00020c1c 60 06                    |`       |		BRA	0x20c24
00020c1e 1f 2e ff fe              | .      |		MOVE.B	(A6-0x2),-(A7)
00020c22 1f 04                    |        |		MOVE.B	D4,-(A7)
00020c24 4e 94                    |N       |		JSR	(A4)
00020c26 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c28 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020c2a 20 4f                    | O      |		MOVEA.L	A7,A0
00020c2c 43 fa f5 c3              |C       |		LEA.L	0x201f1,A1
00020c30 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020c32 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020c34 51 c8 ff fc              |Q       |		DBF	D0,0x20c32
00020c38 4e b9 00 02 14 de        |N       |		JSR	exp_INIT_RF.VAL(Sw_8)
00020c3e 20 4f                    | O      |		MOVEA.L	A7,A0
00020c40 43 fa f5 af              |C       |		LEA.L	0x201f1,A1
00020c44 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020c46 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020c48 51 c8 ff fc              |Q       |		DBF	D0,0x20c46
00020c4c 48 53                    |HS      |		PEA.L	(A3)
00020c4e 48 79 00 02 15 a4        |Hy      |		PEA.L	0x215a4
00020c54 4e b9 00 02 10 08        |N       |		JSR	exp_TEST_RF_LOCATIONS.VAL(Sw_8, &Fr, &Sr_8)
00020c5a de c1                    |        |		ADDA.W	D1,A7
00020c5c 1e 93                    |        |		MOVE.B	(A3),(A7)
00020c5e 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c60 4e 94                    |N       |		JSR	(A4)
00020c62 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020c64 20 4f                    | O      |		MOVEA.L	A7,A0
00020c66 43 fa f5 91              |C       |		LEA.L	0x201f9,A1
00020c6a 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020c6c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020c6e 51 c8 ff fc              |Q       |		DBF	D0,0x20c6c
00020c72 4e b9 00 02 14 de        |N       |		JSR	exp_INIT_RF.VAL(Sw_8)
00020c78 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020c7a 48 52                    |HR      |		PEA.L	(A2)
00020c7c 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020c80 4e b9 00 02 0f 8a        |N       |		JSR	exp_TEST_RF_PARITY_LOCATIONS.VAL(&Fr, &Fr)
00020c86 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020c88 4a 12                    |J       |		TST.B	(A2)
00020c8a 66 06                    |f       |		BNE	0x20c92
00020c8c 1f 12                    |        |		MOVE.B	(A2),-(A7)
00020c8e 1f 03                    |        |		MOVE.B	D3,-(A7)
00020c90 60 06                    |`       |		BRA	0x20c98
00020c92 1f 2e ff fe              | .      |		MOVE.B	(A6-0x2),-(A7)
00020c96 1f 04                    |        |		MOVE.B	D4,-(A7)
00020c98 4e 94                    |N       |		JSR	(A4)
00020c9a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c9c 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
00020ca0 4e 5e                    |N^      |		UNLK	A6
00020ca2 4e 75                    |Nu      |		RTS
00020ca4 ; --------------------------------------------------------------------------------------
00020ca4 ; OMSI PASCAL Function
00020ca4 ;    <LVAR -0x004 @ 1(r)>
00020ca4 ; --------------------------------------------------------------------------------------
00020ca4 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
00020ca8 bf d5                    |        |		CMPA.L	(A5),A7
00020caa 62 06                    |b       |		BHI	0x20cb2
00020cac 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020cb0 4e 76                    |Nv      |		TRAPV
00020cb2 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00020cb6 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
00020cba 41 ee ff fc              |A       |		LEA.L	(A6-0x4),A0
00020cbe 43 f9 00 02 15 bb        |C       |		LEA.L	0x215bb,A1
00020cc4 45 f9 00 02 15 a4        |E       |		LEA.L	0x215a4,A2
00020cca 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00020ccc 72 1a                    |r       |		MOVEQ.L	#0x1a,D1
00020cce 4e b9 00 02 13 b0        |N       |		JSR	exp_PREP_TEST_Z_CNTR_FILLING.VAL()
00020cd4 48 50                    |HP      |		PEA.L	(A0)
00020cd6 48 51                    |HQ      |		PEA.L	(A1)
00020cd8 48 52                    |HR      |		PEA.L	(A2)
00020cda 4e b9 00 02 0e ac        |N       |		JSR	exp_TEST_Z_CNTR_FILLING.VAL(&Fr, &Sr_8, &Sr_8)
00020ce0 de c0                    |        |		ADDA.W	D0,A7
00020ce2 1e 90                    |        |		MOVE.B	(A0),(A7)
00020ce4 1f 01                    |        |		MOVE.B	D1,-(A7)
00020ce6 4e ba f7 1e              |N       |		JSR	0x20406
00020cea 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020cec 48 50                    |HP      |		PEA.L	(A0)
00020cee 48 51                    |HQ      |		PEA.L	(A1)
00020cf0 48 52                    |HR      |		PEA.L	(A2)
00020cf2 4e b9 00 02 0e 84        |N       |		JSR	exp_TEST_Z_CNTR_WALKING.VAL(&Fr, &Sr_8, &Sr_8)
00020cf8 de c0                    |        |		ADDA.W	D0,A7
00020cfa 1e 90                    |        |		MOVE.B	(A0),(A7)
00020cfc 1f 01                    |        |		MOVE.B	D1,-(A7)
00020cfe 4e ba f7 06              |N       |		JSR	0x20406
00020d02 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020d04 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
00020d08 4e 5e                    |N^      |		UNLK	A6
00020d0a 4e 75                    |Nu      |		RTS
00020d0c ; --------------------------------------------------------------------------------------
00020d0c ; OMSI PASCAL Function
00020d0c ;    <LVAR -0x005 @>
00020d0c ;    <LVAR -0x00f @>
00020d0c ;    <LVAR -0x010 @ 1(r)>
00020d0c ; --------------------------------------------------------------------------------------
00020d0c 4e 56 ff ac              |NV      |		LINK.W	A6,#0xffac
00020d10 bf d5                    |        |		CMPA.L	(A5),A7
00020d12 62 06                    |b       |		BHI	0x20d1a
00020d14 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020d18 4e 76                    |Nv      |		TRAPV
00020d1a de fc 00 44              |   D    |		ADDA.W	#0x44,A7
00020d1e 48 e7 e0 c0              |H       |		MOVEM.L	A1+A0+D2+D1+D0,-(A7)
00020d22 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020d24 74 1b                    |t       |		MOVEQ.L	#0x1b,D2
00020d26 9e fc 00 1c              |        |		SUBA.W	#0x1c,A7
00020d2a 20 4f                    | O      |		MOVEA.L	A7,A0
00020d2c 43 fa f4 84              |C       |		LEA.L	0x201b2,A1
00020d30 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
00020d32 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020d34 51 c8 ff fc              |Q       |		DBF	D0,0x20d32
00020d38 42 27                    |B'      |		CLR.B	-(A7)
00020d3a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020d3c 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020d40 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020d42 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020d44 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020d4a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d4c 1e 81                    |        |		MOVE.B	D1,(A7)
00020d4e 1f 01                    |        |		MOVE.B	D1,-(A7)
00020d50 1f 01                    |        |		MOVE.B	D1,-(A7)
00020d52 48 6e ff f1              |Hn      |		PEA.L	(A6-0xf)
00020d56 4e ba f5 e6              |N       |		JSR	0x2033e
00020d5a de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00020d5e 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00020d62 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020d66 48 79 00 02 15 a4        |Hy      |		PEA.L	0x215a4
00020d6c 48 79 00 02 15 bb        |Hy      |		PEA.L	0x215bb
00020d72 4e b9 00 02 10 e6        |N       |		JSR	exp_TEST_MULTIPLIER.VAL(&Fr, &Sr_2, &Sr_8, &Sr_8)
00020d78 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020d7c 1e ae ff f0              |        |		MOVE.B	(A6-0x10),(A7)
00020d80 1f 02                    |        |		MOVE.B	D2,-(A7)
00020d82 4e ba f6 82              |N       |		JSR	0x20406
00020d86 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020d88 4c df 03 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1
00020d8c 4e 5e                    |N^      |		UNLK	A6
00020d8e 4e 75                    |Nu      |		RTS
00020d90 ; --------------------------------------------------------------------------------------
00020d90 ; OMSI PASCAL Function
00020d90 ; --------------------------------------------------------------------------------------
00020d90					START:
00020d90 4f fa 00 08              |O       |		LEA.L	MAIN,A7
00020d94 4e f9 00 01 02 80        |N       |		JMP	?start_program
00020d9a					MAIN:
00020d9a 45 f9 00 02 15 df        |E       |		LEA.L	0x215df,A2
00020da0 47 f9 00 02 15 94        |G       |		LEA.L	0x21594,A3
00020da6 49 f9 00 02 15 98        |I       |		LEA.L	0x21598,A4
00020dac 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020dae 74 07                    |t       |		MOVEQ.L	#0x07,D2
00020db0 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
00020db6 48 78 00 00              |Hx      |		PEA.L	0x0
00020dba 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00020dc0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020dc2 48 79 00 02 15 de        |Hy      |		PEA.L	0x215de
00020dc8 48 52                    |HR      |		PEA.L	(A2)
00020dca 4e b9 00 01 05 44        |N    D  |		JSR	IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
00020dd0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020dd2 1e 92                    |        |		MOVE.B	(A2),(A7)
00020dd4 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
00020dda 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020ddc 20 4f                    | O      |		MOVEA.L	A7,A0
00020dde 43 fa f3 ee              |C       |		LEA.L	0x201ce,A1
00020de2 70 04                    |p       |		MOVEQ.L	#0x04,D0
00020de4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020de6 51 c8 ff fc              |Q       |		DBF	D0,0x20de4
00020dea 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020dec 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020df0 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020df2 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00020df6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020dfc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020dfe 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00020e00 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020e02 48 54                    |HT      |		PEA.L	(A4)
00020e04 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00020e0a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020e0c 42 39 00 02 15 d5        |B9      |		CLR.B	0x215d5
00020e12 70 00                    |p       |		MOVEQ.L	#0x00,D0
00020e14 23 c0 00 02 15 e0        |#       |		MOVE.L	D0,0x215e0
00020e1a b0 82                    |        |		CMP.L	D2,D0
00020e1c 63 02                    |c       |		BLS	0x20e20
00020e1e 4e 4f                    |NO      |		TRAP	#15
00020e20 41 f9 00 02 15 8c        |A       |		LEA.L	0x2158c,A0
00020e26 42 30 08 4a              |B0 J    |		CLR.B	(A0+D0.L+#0x4a)
00020e2a 52 80                    |R       |		ADDQ.L	#0x1,D0
00020e2c b0 82                    |        |		CMP.L	D2,D0
00020e2e 6f e4                    |o       |		BLE	0x20e14
00020e30 4e ba f6 76              |N  v    |		JSR	0x204a8
00020e34 4e ba f7 08              |N       |		JSR	0x2053e
00020e38 4e ba f7 f8              |N       |		JSR	0x20632
00020e3c 4e ba f8 ce              |N       |		JSR	0x2070c
00020e40 4e ba f9 f0              |N       |		JSR	0x20832
00020e44 4e ba fa ca              |N       |		JSR	0x20910
00020e48 4e ba fb 76              |N  v    |		JSR	0x209c0
00020e4c 4e ba fd 52              |N  R    |		JSR	0x20ba0
00020e50 4e ba fe 52              |N  R    |		JSR	0x20ca4
00020e54 4e ba fe b6              |N       |		JSR	0x20d0c
00020e58 4e ba f6 06              |N       |		JSR	0x20460
00020e5c 1f 01                    |        |		MOVE.B	D1,-(A7)
00020e5e 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00020e60 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00020e62 1f 39 00 02 15 d5        | 9      |		MOVE.B	0x215d5,-(A7)
00020e68 2f 39 00 02 15 da        |/9      |		MOVE.L	0x215da,-(A7)
00020e6e 2f 39 00 02 15 d6        |/9      |		MOVE.L	0x215d6,-(A7)
00020e74 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020e7a de fc 00 14              |        |		ADDA.W	#0x14,A7
00020e7e 4e b9 00 01 02 84        |N       |		JSR	?exit
00020e84					exp_TEST_Z_CNTR_WALKING.VAL(&Fr, &Sr_8, &Sr_8):
00020e84 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020e8a 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020e8c 17 54 45 53 54 5f 5a 5f  | TEST_Z_|		.TXT	23,'TEST_Z_CNTR_WALKING.VAL'
00020ea4 00                       |        |		.CONST	0x0
00020ea5 07                       |        |		.CONST	0x7			; DIPROC address
00020ea6 03                       |        |		.CONST	0x3			; Output Parameters
00020ea7 00                       |        |		.CONST	0x0			; Input Parameters
00020ea8 08                       |        |		.CONST	0x8			; Out arg flag
00020ea9 07                       |        |		.CONST	0x7			; Out arg [8]
00020eaa 07                       |        |		.CONST	0x7			; Out arg [8]
00020eab 00                       |        |		.PAD	0x0
00020eac					exp_TEST_Z_CNTR_FILLING.VAL(&Fr, &Sr_8, &Sr_8):
00020eac 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020eb2 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020eb4 17 54 45 53 54 5f 5a 5f  | TEST_Z_|		.TXT	23,'TEST_Z_CNTR_FILLING.VAL'
00020ecc 00                       |        |		.CONST	0x0
00020ecd 07                       |        |		.CONST	0x7			; DIPROC address
00020ece 03                       |        |		.CONST	0x3			; Output Parameters
00020ecf 00                       |        |		.CONST	0x0			; Input Parameters
00020ed0 08                       |        |		.CONST	0x8			; Out arg flag
00020ed1 07                       |        |		.CONST	0x7			; Out arg [8]
00020ed2 07                       |        |		.CONST	0x7			; Out arg [8]
00020ed3 00                       |        |		.PAD	0x0
00020ed4					exp_TEST_WCS_PARITY.VAL(&Fr, &Sr_5):
00020ed4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020eda 00 10                    |        |		.CONST	0x0010			; Stack-delta
00020edc 13 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	19,'TEST_WCS_PARITY.VAL'
00020ef0 00                       |        |		.CONST	0x0
00020ef1 07                       |        |		.CONST	0x7			; DIPROC address
00020ef2 02                       |        |		.CONST	0x2			; Output Parameters
00020ef3 00                       |        |		.CONST	0x0			; Input Parameters
00020ef4 08                       |        |		.CONST	0x8			; Out arg flag
00020ef5 04                       |        |		.CONST	0x4			; Out arg [5]
00020ef6					exp_TEST_WCS_LOCATIONS.VAL(&Fr, &Sr_2, &Sr_5, &Sr_5):
00020ef6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020efc 00 18                    |        |		.CONST	0x0018			; Stack-delta
00020efe 16 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	22,'TEST_WCS_LOCATIONS.VAL'
00020f15 00                       |        |		.CONST	0x0
00020f16 07                       |        |		.CONST	0x7			; DIPROC address
00020f17 04                       |        |		.CONST	0x4			; Output Parameters
00020f18 00                       |        |		.CONST	0x0			; Input Parameters
00020f19 08                       |        |		.CONST	0x8			; Out arg flag
00020f1a 01                       |        |		.CONST	0x1			; Out arg [2]
00020f1b 04                       |        |		.CONST	0x4			; Out arg [5]
00020f1c 04                       |        |		.CONST	0x4			; Out arg [5]
00020f1d 00                       |        |		.PAD	0x0
00020f1e					exp_TEST_WRITE_GP_ADR.VAL(&Fr, &Sr_1, &Sr_1, &Sr_8, &Sr_8, &Sr_8):
00020f1e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f24 00 20                    |        |		.CONST	0x0020			; Stack-delta
00020f26 15 54 45 53 54 5f 57 52  | TEST_WR|		.TXT	21,'TEST_WRITE_GP_ADR.VAL'
00020f3c 00                       |        |		.CONST	0x0
00020f3d 07                       |        |		.CONST	0x7			; DIPROC address
00020f3e 06                       |        |		.CONST	0x6			; Output Parameters
00020f3f 00                       |        |		.CONST	0x0			; Input Parameters
00020f40 08                       |        |		.CONST	0x8			; Out arg flag
00020f41 00                       |        |		.CONST	0x0			; Out arg [1]
00020f42 00                       |        |		.CONST	0x0			; Out arg [1]
00020f43 07                       |        |		.CONST	0x7			; Out arg [8]
00020f44 07                       |        |		.CONST	0x7			; Out arg [8]
00020f45 07                       |        |		.CONST	0x7			; Out arg [8]
00020f46					exp_TEST_WCS_DATA.VAL(&Fr, &Sr_5, &Sr_5):
00020f46 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f4c 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020f4e 11 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	17,'TEST_WCS_DATA.VAL'
00020f60 00                       |        |		.CONST	0x0
00020f61 07                       |        |		.CONST	0x7			; DIPROC address
00020f62 03                       |        |		.CONST	0x3			; Output Parameters
00020f63 00                       |        |		.CONST	0x0			; Input Parameters
00020f64 08                       |        |		.CONST	0x8			; Out arg flag
00020f65 04                       |        |		.CONST	0x4			; Out arg [5]
00020f66 04                       |        |		.CONST	0x4			; Out arg [5]
00020f67 00                       |        |		.PAD	0x0
00020f68					exp_TEST_WCS_ADDRESS.VAL(&Fr):
00020f68 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f6e 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020f70 14 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	20,'TEST_WCS_ADDRESS.VAL'
00020f85 00                       |        |		.CONST	0x0
00020f86 07                       |        |		.CONST	0x7			; DIPROC address
00020f87 01                       |        |		.CONST	0x1			; Output Parameters
00020f88 00                       |        |		.CONST	0x0			; Input Parameters
00020f89 08                       |        |		.CONST	0x8			; Out arg flag
00020f8a					exp_TEST_RF_PARITY_LOCATIONS.VAL(&Fr, &Fr):
00020f8a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f90 00 10                    |        |		.CONST	0x0010			; Stack-delta
00020f92 1c 54 45 53 54 5f 52 46  | TEST_RF|		.TXT	28,'TEST_RF_PARITY_LOCATIONS.VAL'
00020faf 00                       |        |		.CONST	0x0
00020fb0 07                       |        |		.CONST	0x7			; DIPROC address
00020fb1 02                       |        |		.CONST	0x2			; Output Parameters
00020fb2 00                       |        |		.CONST	0x0			; Input Parameters
00020fb3 08                       |        |		.CONST	0x8			; Out arg flag
00020fb4 08                       |        |		.CONST	0x8			; Out arg flag
00020fb5 00                       |        |		.PAD	0x0
00020fb6					exp_TEST_RF_PARITY_CHECKERS.VAL(&Fr, &Fr, &Sr_8_1):
00020fb6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020fbc 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020fbe 1b 54 45 53 54 5f 52 46  | TEST_RF|		.TXT	27,'TEST_RF_PARITY_CHECKERS.VAL'
00020fda 00                       |        |		.CONST	0x0
00020fdb 07                       |        |		.CONST	0x7			; DIPROC address
00020fdc 03                       |        |		.CONST	0x3			; Output Parameters
00020fdd 00                       |        |		.CONST	0x0			; Input Parameters
00020fde 08                       |        |		.CONST	0x8			; Out arg flag
00020fdf 08                       |        |		.CONST	0x8			; Out arg flag
00020fe0 0d                       |        |		.CONST	0xd			; Out arg [8, 1]
00020fe1 00                       |        |		.PAD	0x0
00020fe2					exp_TEST_RF_PAR_ADDR.VAL(&Fr, &Fr, &Sr_8, &Sr_1, &Sr_1):
00020fe2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020fe8 00 1c                    |        |		.CONST	0x001c			; Stack-delta
00020fea 14 54 45 53 54 5f 52 46  | TEST_RF|		.TXT	20,'TEST_RF_PAR_ADDR.VAL'
00020fff 00                       |        |		.CONST	0x0
00021000 07                       |        |		.CONST	0x7			; DIPROC address
00021001 05                       |        |		.CONST	0x5			; Output Parameters
00021002 00                       |        |		.CONST	0x0			; Input Parameters
00021003 08                       |        |		.CONST	0x8			; Out arg flag
00021004 08                       |        |		.CONST	0x8			; Out arg flag
00021005 07                       |        |		.CONST	0x7			; Out arg [8]
00021006 00                       |        |		.CONST	0x0			; Out arg [1]
00021007 00                       |        |		.CONST	0x0			; Out arg [1]
00021008					exp_TEST_RF_LOCATIONS.VAL(Sw_8, &Fr, &Sr_8):
00021008 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002100e 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021010 15 54 45 53 54 5f 52 46  | TEST_RF|		.TXT	21,'TEST_RF_LOCATIONS.VAL'
00021026 00                       |        |		.CONST	0x0
00021027 07                       |        |		.CONST	0x7			; DIPROC address
00021028 02                       |        |		.CONST	0x2			; Output Parameters
00021029 01                       |        |		.CONST	0x1			; Input Parameters
0002102a 07                       |        |		.CONST	0x7			; In arg [8]
0002102b 08                       |        |		.CONST	0x8			; Out arg flag
0002102c 07                       |        |		.CONST	0x7			; Out arg [8]
0002102d 00                       |        |		.PAD	0x0
0002102e					exp_TEST_READ_GP_ADR.VAL(&Fr, &Sr_1, &Sr_1, &Sr_8, &Sr_8, &Sr_8):
0002102e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021034 00 20                    |        |		.CONST	0x0020			; Stack-delta
00021036 14 54 45 53 54 5f 52 45  | TEST_RE|		.TXT	20,'TEST_READ_GP_ADR.VAL'
0002104b 00                       |        |		.CONST	0x0
0002104c 07                       |        |		.CONST	0x7			; DIPROC address
0002104d 06                       |        |		.CONST	0x6			; Output Parameters
0002104e 00                       |        |		.CONST	0x0			; Input Parameters
0002104f 08                       |        |		.CONST	0x8			; Out arg flag
00021050 00                       |        |		.CONST	0x0			; Out arg [1]
00021051 00                       |        |		.CONST	0x0			; Out arg [1]
00021052 07                       |        |		.CONST	0x7			; Out arg [8]
00021053 07                       |        |		.CONST	0x7			; Out arg [8]
00021054 07                       |        |		.CONST	0x7			; Out arg [8]
00021055 00                       |        |		.PAD	0x0
00021056					exp_TEST_RF_DATA_LINES.VAL(&Fr, &Sr_8, &Sr_8, &Sr_8):
00021056 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002105c 00 18                    |        |		.CONST	0x0018			; Stack-delta
0002105e 16 54 45 53 54 5f 52 46  | TEST_RF|		.TXT	22,'TEST_RF_DATA_LINES.VAL'
00021075 00                       |        |		.CONST	0x0
00021076 07                       |        |		.CONST	0x7			; DIPROC address
00021077 04                       |        |		.CONST	0x4			; Output Parameters
00021078 00                       |        |		.CONST	0x0			; Input Parameters
00021079 08                       |        |		.CONST	0x8			; Out arg flag
0002107a 07                       |        |		.CONST	0x7			; Out arg [8]
0002107b 07                       |        |		.CONST	0x7			; Out arg [8]
0002107c 07                       |        |		.CONST	0x7			; Out arg [8]
0002107d 00                       |        |		.PAD	0x0
0002107e					exp_TEST_PASS_RANDOMS.VAL(&Fr, &Fr, &Sr_8, &Sr_8):
0002107e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021084 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021086 15 54 45 53 54 5f 50 41  | TEST_PA|		.TXT	21,'TEST_PASS_RANDOMS.VAL'
0002109c 00                       |        |		.CONST	0x0
0002109d 07                       |        |		.CONST	0x7			; DIPROC address
0002109e 04                       |        |		.CONST	0x4			; Output Parameters
0002109f 00                       |        |		.CONST	0x0			; Input Parameters
000210a0 08                       |        |		.CONST	0x8			; Out arg flag
000210a1 08                       |        |		.CONST	0x8			; Out arg flag
000210a2 07                       |        |		.CONST	0x7			; Out arg [8]
000210a3 07                       |        |		.CONST	0x7			; Out arg [8]
000210a4					exp_TEST_PLUS_OP.VAL(&Fr, &Sr_8, &Sr_8):
000210a4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000210aa 00 14                    |        |		.CONST	0x0014			; Stack-delta
000210ac 10 54 45 53 54 5f 50 4c  | TEST_PL|		.TXT	16,'TEST_PLUS_OP.VAL'
000210bd 00                       |        |		.CONST	0x0
000210be 07                       |        |		.CONST	0x7			; DIPROC address
000210bf 03                       |        |		.CONST	0x3			; Output Parameters
000210c0 00                       |        |		.CONST	0x0			; Input Parameters
000210c1 08                       |        |		.CONST	0x8			; Out arg flag
000210c2 07                       |        |		.CONST	0x7			; Out arg [8]
000210c3 07                       |        |		.CONST	0x7			; Out arg [8]
000210c4					exp_TEST_NOT_B_OP.VAL(&Fr, &Sr_8, &Sr_8):
000210c4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000210ca 00 14                    |        |		.CONST	0x0014			; Stack-delta
000210cc 11 54 45 53 54 5f 4e 4f  | TEST_NO|		.TXT	17,'TEST_NOT_B_OP.VAL'
000210de 00                       |        |		.CONST	0x0
000210df 07                       |        |		.CONST	0x7			; DIPROC address
000210e0 03                       |        |		.CONST	0x3			; Output Parameters
000210e1 00                       |        |		.CONST	0x0			; Input Parameters
000210e2 08                       |        |		.CONST	0x8			; Out arg flag
000210e3 07                       |        |		.CONST	0x7			; Out arg [8]
000210e4 07                       |        |		.CONST	0x7			; Out arg [8]
000210e5 00                       |        |		.PAD	0x0
000210e6					exp_TEST_MULTIPLIER.VAL(&Fr, &Sr_2, &Sr_8, &Sr_8):
000210e6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000210ec 00 18                    |        |		.CONST	0x0018			; Stack-delta
000210ee 13 54 45 53 54 5f 4d 55  | TEST_MU|		.TXT	19,'TEST_MULTIPLIER.VAL'
00021102 00                       |        |		.CONST	0x0
00021103 07                       |        |		.CONST	0x7			; DIPROC address
00021104 04                       |        |		.CONST	0x4			; Output Parameters
00021105 00                       |        |		.CONST	0x0			; Input Parameters
00021106 08                       |        |		.CONST	0x8			; Out arg flag
00021107 01                       |        |		.CONST	0x1			; Out arg [2]
00021108 07                       |        |		.CONST	0x7			; Out arg [8]
00021109 07                       |        |		.CONST	0x7			; Out arg [8]
0002110a					exp_TEST_MINUS_OP.VAL(&Fr, &Sr_8, &Sr_8):
0002110a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021110 00 14                    |        |		.CONST	0x0014			; Stack-delta
00021112 11 54 45 53 54 5f 4d 49  | TEST_MI|		.TXT	17,'TEST_MINUS_OP.VAL'
00021124 00                       |        |		.CONST	0x0
00021125 07                       |        |		.CONST	0x7			; DIPROC address
00021126 03                       |        |		.CONST	0x3			; Output Parameters
00021127 00                       |        |		.CONST	0x0			; Input Parameters
00021128 08                       |        |		.CONST	0x8			; Out arg flag
00021129 07                       |        |		.CONST	0x7			; Out arg [8]
0002112a 07                       |        |		.CONST	0x7			; Out arg [8]
0002112b 00                       |        |		.PAD	0x0
0002112c					exp_TEST_LOAD_WDR.VAL(&Fr, &Fr, &Sr_8_1, &Sr_8_1):
0002112c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021132 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021134 11 54 45 53 54 5f 4c 4f  | TEST_LO|		.TXT	17,'TEST_LOAD_WDR.VAL'
00021146 00                       |        |		.CONST	0x0
00021147 07                       |        |		.CONST	0x7			; DIPROC address
00021148 04                       |        |		.CONST	0x4			; Output Parameters
00021149 00                       |        |		.CONST	0x0			; Input Parameters
0002114a 08                       |        |		.CONST	0x8			; Out arg flag
0002114b 08                       |        |		.CONST	0x8			; Out arg flag
0002114c 0d                       |        |		.CONST	0xd			; Out arg [8, 1]
0002114d 0d                       |        |		.CONST	0xd			; Out arg [8, 1]
0002114e					exp_TEST_LOAD_LOOP_COUNTER.VAL(&Fr, &Fr, &Sr_2, &Sr_2):
0002114e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021154 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021156 1a 54 45 53 54 5f 4c 4f  | TEST_LO|		.TXT	26,'TEST_LOAD_LOOP_COUNTER.VAL'
00021171 00                       |        |		.CONST	0x0
00021172 07                       |        |		.CONST	0x7			; DIPROC address
00021173 04                       |        |		.CONST	0x4			; Output Parameters
00021174 00                       |        |		.CONST	0x0			; Input Parameters
00021175 08                       |        |		.CONST	0x8			; Out arg flag
00021176 08                       |        |		.CONST	0x8			; Out arg flag
00021177 01                       |        |		.CONST	0x1			; Out arg [2]
00021178 01                       |        |		.CONST	0x1			; Out arg [2]
00021179 00                       |        |		.PAD	0x0
0002117a					exp_TEST_LOGICAL_ALU.VAL(&Fr, &Sr_8, &Sr_8):
0002117a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021180 00 14                    |        |		.CONST	0x0014			; Stack-delta
00021182 14 54 45 53 54 5f 4c 4f  | TEST_LO|		.TXT	20,'TEST_LOGICAL_ALU.VAL'
00021197 00                       |        |		.CONST	0x0
00021198 07                       |        |		.CONST	0x7			; DIPROC address
00021199 03                       |        |		.CONST	0x3			; Output Parameters
0002119a 00                       |        |		.CONST	0x0			; Input Parameters
0002119b 08                       |        |		.CONST	0x8			; Out arg flag
0002119c 07                       |        |		.CONST	0x7			; Out arg [8]
0002119d 07                       |        |		.CONST	0x7			; Out arg [8]
0002119e					exp_TEST_INC_A_OP.VAL(&Fr, &Fr, &Sr_8, &Sr_8):
0002119e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000211a4 00 18                    |        |		.CONST	0x0018			; Stack-delta
000211a6 11 54 45 53 54 5f 49 4e  | TEST_IN|		.TXT	17,'TEST_INC_A_OP.VAL'
000211b8 00                       |        |		.CONST	0x0
000211b9 07                       |        |		.CONST	0x7			; DIPROC address
000211ba 04                       |        |		.CONST	0x4			; Output Parameters
000211bb 00                       |        |		.CONST	0x0			; Input Parameters
000211bc 08                       |        |		.CONST	0x8			; Out arg flag
000211bd 08                       |        |		.CONST	0x8			; Out arg flag
000211be 07                       |        |		.CONST	0x7			; Out arg [8]
000211bf 07                       |        |		.CONST	0x7			; Out arg [8]
000211c0					exp_TEST_FRAME_REG_ADR.VAL(&Fr, &Sr_8, &Sr_8, &Sr_8):
000211c0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000211c6 00 18                    |        |		.CONST	0x0018			; Stack-delta
000211c8 16 54 45 53 54 5f 46 52  | TEST_FR|		.TXT	22,'TEST_FRAME_REG_ADR.VAL'
000211df 00                       |        |		.CONST	0x0
000211e0 07                       |        |		.CONST	0x7			; DIPROC address
000211e1 04                       |        |		.CONST	0x4			; Output Parameters
000211e2 00                       |        |		.CONST	0x0			; Input Parameters
000211e3 08                       |        |		.CONST	0x8			; Out arg flag
000211e4 07                       |        |		.CONST	0x7			; Out arg [8]
000211e5 07                       |        |		.CONST	0x7			; Out arg [8]
000211e6 07                       |        |		.CONST	0x7			; Out arg [8]
000211e7 00                       |        |		.PAD	0x0
000211e8					exp_TEST_FIU_BUS.VAL(&Fr, &Sr_8_1, &Sr_8_1):
000211e8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000211ee 00 14                    |        |		.CONST	0x0014			; Stack-delta
000211f0 10 54 45 53 54 5f 46 49  | TEST_FI|		.TXT	16,'TEST_FIU_BUS.VAL'
00021201 00                       |        |		.CONST	0x0
00021202 07                       |        |		.CONST	0x7			; DIPROC address
00021203 03                       |        |		.CONST	0x3			; Output Parameters
00021204 00                       |        |		.CONST	0x0			; Input Parameters
00021205 08                       |        |		.CONST	0x8			; Out arg flag
00021206 0d                       |        |		.CONST	0xd			; Out arg [8, 1]
00021207 0d                       |        |		.CONST	0xd			; Out arg [8, 1]
00021208					exp_TEST_DIVIDE_LOGIC.VAL(&Fr, &Sr_1, &Sr_1):
00021208 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002120e 00 14                    |        |		.CONST	0x0014			; Stack-delta
00021210 15 54 45 53 54 5f 44 49  | TEST_DI|		.TXT	21,'TEST_DIVIDE_LOGIC.VAL'
00021226 00                       |        |		.CONST	0x0
00021227 07                       |        |		.CONST	0x7			; DIPROC address
00021228 03                       |        |		.CONST	0x3			; Output Parameters
00021229 00                       |        |		.CONST	0x0			; Input Parameters
0002122a 08                       |        |		.CONST	0x8			; Out arg flag
0002122b 00                       |        |		.CONST	0x0			; Out arg [1]
0002122c 00                       |        |		.CONST	0x0			; Out arg [1]
0002122d 00                       |        |		.PAD	0x0
0002122e					exp_TEST_DEC_A_OP.VAL(&Fr, &Fr, &Sr_8, &Sr_8):
0002122e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021234 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021236 11 54 45 53 54 5f 44 45  | TEST_DE|		.TXT	17,'TEST_DEC_A_OP.VAL'
00021248 00                       |        |		.CONST	0x0
00021249 07                       |        |		.CONST	0x7			; DIPROC address
0002124a 04                       |        |		.CONST	0x4			; Output Parameters
0002124b 00                       |        |		.CONST	0x0			; Input Parameters
0002124c 08                       |        |		.CONST	0x8			; Out arg flag
0002124d 08                       |        |		.CONST	0x8			; Out arg flag
0002124e 07                       |        |		.CONST	0x7			; Out arg [8]
0002124f 07                       |        |		.CONST	0x7			; Out arg [8]
00021250					exp_TEST_CARRY_PROPAGATE.VAL(&Fr, &Sr_8, &Sr_8):
00021250 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021256 00 14                    |        |		.CONST	0x0014			; Stack-delta
00021258 18 54 45 53 54 5f 43 41  | TEST_CA|		.TXT	24,'TEST_CARRY_PROPAGATE.VAL'
00021271 00                       |        |		.CONST	0x0
00021272 07                       |        |		.CONST	0x7			; DIPROC address
00021273 03                       |        |		.CONST	0x3			; Output Parameters
00021274 00                       |        |		.CONST	0x0			; Input Parameters
00021275 08                       |        |		.CONST	0x8			; Out arg flag
00021276 07                       |        |		.CONST	0x7			; Out arg [8]
00021277 07                       |        |		.CONST	0x7			; Out arg [8]
00021278					exp_TEST_COUNT_LOOP_COUNTER.VAL(&Fr, &Fr, &Sr_8, &Sr_8):
00021278 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002127e 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021280 1b 54 45 53 54 5f 43 4f  | TEST_CO|		.TXT	27,'TEST_COUNT_LOOP_COUNTER.VAL'
0002129c 00                       |        |		.CONST	0x0
0002129d 07                       |        |		.CONST	0x7			; DIPROC address
0002129e 04                       |        |		.CONST	0x4			; Output Parameters
0002129f 00                       |        |		.CONST	0x0			; Input Parameters
000212a0 08                       |        |		.CONST	0x8			; Out arg flag
000212a1 08                       |        |		.CONST	0x8			; Out arg flag
000212a2 07                       |        |		.CONST	0x7			; Out arg [8]
000212a3 07                       |        |		.CONST	0x7			; Out arg [8]
000212a4					exp_TEST_CARRY_GENERATE.VAL(&Fr, &Sr_8, &Sr_8):
000212a4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000212aa 00 14                    |        |		.CONST	0x0014			; Stack-delta
000212ac 17 54 45 53 54 5f 43 41  | TEST_CA|		.TXT	23,'TEST_CARRY_GENERATE.VAL'
000212c4 00                       |        |		.CONST	0x0
000212c5 07                       |        |		.CONST	0x7			; DIPROC address
000212c6 03                       |        |		.CONST	0x3			; Output Parameters
000212c7 00                       |        |		.CONST	0x0			; Input Parameters
000212c8 08                       |        |		.CONST	0x8			; Out arg flag
000212c9 07                       |        |		.CONST	0x7			; Out arg [8]
000212ca 07                       |        |		.CONST	0x7			; Out arg [8]
000212cb 00                       |        |		.PAD	0x0
000212cc					exp_TEST_BORROW_PROPAGATE.VAL(&Fr, &Sr_8, &Sr_8):
000212cc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000212d2 00 14                    |        |		.CONST	0x0014			; Stack-delta
000212d4 19 54 45 53 54 5f 42 4f  | TEST_BO|		.TXT	25,'TEST_BORROW_PROPAGATE.VAL'
000212ee 00                       |        |		.CONST	0x0
000212ef 07                       |        |		.CONST	0x7			; DIPROC address
000212f0 03                       |        |		.CONST	0x3			; Output Parameters
000212f1 00                       |        |		.CONST	0x0			; Input Parameters
000212f2 08                       |        |		.CONST	0x8			; Out arg flag
000212f3 07                       |        |		.CONST	0x7			; Out arg [8]
000212f4 07                       |        |		.CONST	0x7			; Out arg [8]
000212f5 00                       |        |		.PAD	0x0
000212f6					exp_TEST_BUS_PARITY_CHECKERS.VAL(&Fr, &Fr, &Sr_8, &Sr_1, &Sr_1):
000212f6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000212fc 00 1c                    |        |		.CONST	0x001c			; Stack-delta
000212fe 1c 54 45 53 54 5f 42 55  | TEST_BU|		.TXT	28,'TEST_BUS_PARITY_CHECKERS.VAL'
0002131b 00                       |        |		.CONST	0x0
0002131c 07                       |        |		.CONST	0x7			; DIPROC address
0002131d 05                       |        |		.CONST	0x5			; Output Parameters
0002131e 00                       |        |		.CONST	0x0			; Input Parameters
0002131f 08                       |        |		.CONST	0x8			; Out arg flag
00021320 08                       |        |		.CONST	0x8			; Out arg flag
00021321 07                       |        |		.CONST	0x7			; Out arg [8]
00021322 00                       |        |		.CONST	0x0			; Out arg [1]
00021323 00                       |        |		.CONST	0x0			; Out arg [1]
00021324					exp_TEST_ALU_ZEROS_ONES.VAL(&Fr, &Fr, &Sr_8, &Sr_8):
00021324 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002132a 00 18                    |        |		.CONST	0x0018			; Stack-delta
0002132c 17 54 45 53 54 5f 41 4c  | TEST_AL|		.TXT	23,'TEST_ALU_ZEROS_ONES.VAL'
00021344 00                       |        |		.CONST	0x0
00021345 07                       |        |		.CONST	0x7			; DIPROC address
00021346 04                       |        |		.CONST	0x4			; Output Parameters
00021347 00                       |        |		.CONST	0x0			; Input Parameters
00021348 08                       |        |		.CONST	0x8			; Out arg flag
00021349 08                       |        |		.CONST	0x8			; Out arg flag
0002134a 07                       |        |		.CONST	0x7			; Out arg [8]
0002134b 07                       |        |		.CONST	0x7			; Out arg [8]
0002134c					exp_TEST_ALU_SHIFTED.VAL(&Fr, &Fr, &Sr_8, &Sr_8):
0002134c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021352 00 18                    |        |		.CONST	0x0018			; Stack-delta
00021354 14 54 45 53 54 5f 41 4c  | TEST_AL|		.TXT	20,'TEST_ALU_SHIFTED.VAL'
00021369 00                       |        |		.CONST	0x0
0002136a 07                       |        |		.CONST	0x7			; DIPROC address
0002136b 04                       |        |		.CONST	0x4			; Output Parameters
0002136c 00                       |        |		.CONST	0x0			; Input Parameters
0002136d 08                       |        |		.CONST	0x8			; Out arg flag
0002136e 08                       |        |		.CONST	0x8			; Out arg flag
0002136f 07                       |        |		.CONST	0x7			; Out arg [8]
00021370 07                       |        |		.CONST	0x7			; Out arg [8]
00021371 00                       |        |		.PAD	0x0
00021372					exp_RESET.VAL():
00021372 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021378 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002137a 09 52 45 53 45 54 2e 56  | RESET.V|		.TXT	9,'RESET.VAL'
00021384 00                       |        |		.CONST	0x0
00021385 07                       |        |		.CONST	0x7			; DIPROC address
00021386 00                       |        |		.CONST	0x0			; Output Parameters
00021387 00                       |        |		.CONST	0x0			; Input Parameters
00021388					exp_PREP_UCODE_LOGICAL_ALU.VAL():
00021388 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002138e 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021390 1a 50 52 45 50 5f 55 43  | PREP_UC|		.TXT	26,'PREP_UCODE_LOGICAL_ALU.VAL'
000213ab 00                       |        |		.CONST	0x0
000213ac 07                       |        |		.CONST	0x7			; DIPROC address
000213ad 00                       |        |		.CONST	0x0			; Output Parameters
000213ae 00                       |        |		.CONST	0x0			; Input Parameters
000213af 00                       |        |		.PAD	0x0
000213b0					exp_PREP_TEST_Z_CNTR_FILLING.VAL():
000213b0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000213b6 00 08                    |        |		.CONST	0x0008			; Stack-delta
000213b8 1c 50 52 45 50 5f 54 45  | PREP_TE|		.TXT	28,'PREP_TEST_Z_CNTR_FILLING.VAL'
000213d5 00                       |        |		.CONST	0x0
000213d6 07                       |        |		.CONST	0x7			; DIPROC address
000213d7 00                       |        |		.CONST	0x0			; Output Parameters
000213d8 00                       |        |		.CONST	0x0			; Input Parameters
000213d9 00                       |        |		.PAD	0x0
000213da					exp_PREP_TEST_RF_PAR_ADDR.VAL():
000213da 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000213e0 00 08                    |        |		.CONST	0x0008			; Stack-delta
000213e2 19 50 52 45 50 5f 54 45  | PREP_TE|		.TXT	25,'PREP_TEST_RF_PAR_ADDR.VAL'
000213fc 00                       |        |		.CONST	0x0
000213fd 07                       |        |		.CONST	0x7			; DIPROC address
000213fe 00                       |        |		.CONST	0x0			; Output Parameters
000213ff 00                       |        |		.CONST	0x0			; Input Parameters
00021400					exp_PREP_TEST_PLUS_MINUS.VAL(&Fr, &Fr, &Sr_8):
00021400 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021406 00 14                    |        |		.CONST	0x0014			; Stack-delta
00021408 18 50 52 45 50 5f 54 45  | PREP_TE|		.TXT	24,'PREP_TEST_PLUS_MINUS.VAL'
00021421 00                       |        |		.CONST	0x0
00021422 07                       |        |		.CONST	0x7			; DIPROC address
00021423 03                       |        |		.CONST	0x3			; Output Parameters
00021424 00                       |        |		.CONST	0x0			; Input Parameters
00021425 08                       |        |		.CONST	0x8			; Out arg flag
00021426 08                       |        |		.CONST	0x8			; Out arg flag
00021427 07                       |        |		.CONST	0x7			; Out arg [8]
00021428					exp_PREP_TEST_INC_DEC.VAL():
00021428 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002142e 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021430 15 50 52 45 50 5f 54 45  | PREP_TE|		.TXT	21,'PREP_TEST_INC_DEC.VAL'
00021446 00                       |        |		.CONST	0x0
00021447 07                       |        |		.CONST	0x7			; DIPROC address
00021448 00                       |        |		.CONST	0x0			; Output Parameters
00021449 00                       |        |		.CONST	0x0			; Input Parameters
0002144a					exp_PREP_TEST_CARRY_GENERATE.VAL():
0002144a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021450 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021452 1c 50 52 45 50 5f 54 45  | PREP_TE|		.TXT	28,'PREP_TEST_CARRY_GENERATE.VAL'
0002146f 00                       |        |		.CONST	0x0
00021470 07                       |        |		.CONST	0x7			; DIPROC address
00021471 00                       |        |		.CONST	0x0			; Output Parameters
00021472 00                       |        |		.CONST	0x0			; Input Parameters
00021473 00                       |        |		.PAD	0x0
00021474					exp_PREP_TEST_BORROW_PROP.VAL():
00021474 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002147a 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002147c 19 50 52 45 50 5f 54 45  | PREP_TE|		.TXT	25,'PREP_TEST_BORROW_PROP.VAL'
00021496 00                       |        |		.CONST	0x0
00021497 07                       |        |		.CONST	0x7			; DIPROC address
00021498 00                       |        |		.CONST	0x0			; Output Parameters
00021499 00                       |        |		.CONST	0x0			; Input Parameters
0002149a					exp_PREP_RF_LOGICAL_ALU.VAL():
0002149a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214a0 00 08                    |        |		.CONST	0x0008			; Stack-delta
000214a2 17 50 52 45 50 5f 52 46  | PREP_RF|		.TXT	23,'PREP_RF_LOGICAL_ALU.VAL'
000214ba 00                       |        |		.CONST	0x0
000214bb 07                       |        |		.CONST	0x7			; DIPROC address
000214bc 00                       |        |		.CONST	0x0			; Output Parameters
000214bd 00                       |        |		.CONST	0x0			; Input Parameters
000214be					exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1):
000214be 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214c4 00 12                    |        |		.CONST	0x0012			; Stack-delta
000214c6 10 4c 4f 41 44 5f 57 43  | LOAD_WC|		.TXT	16,'LOAD_WCS_UIR.VAL'
000214d7 00                       |        |		.CONST	0x0
000214d8 07                       |        |		.CONST	0x7			; DIPROC address
000214d9 00                       |        |		.CONST	0x0			; Output Parameters
000214da 03                       |        |		.CONST	0x3			; Input Parameters
000214db 01                       |        |		.CONST	0x1			; In arg [2]
000214dc 04                       |        |		.CONST	0x4			; In arg [5]
000214dd 00                       |        |		.CONST	0x0			; In arg [1]
000214de					exp_INIT_RF.VAL(Sw_8):
000214de 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214e4 00 10                    |        |		.CONST	0x0010			; Stack-delta
000214e6 0b 49 4e 49 54 5f 52 46  | INIT_RF|		.TXT	11,'INIT_RF.VAL'
000214f2 00                       |        |		.CONST	0x0
000214f3 07                       |        |		.CONST	0x7			; DIPROC address
000214f4 00                       |        |		.CONST	0x0			; Output Parameters
000214f5 01                       |        |		.CONST	0x1			; Input Parameters
000214f6 07                       |        |		.CONST	0x7			; In arg [8]
000214f7 00                       |        |		.PAD	0x0
000214f8					exp_CLEAR_PARITY.VAL():
000214f8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214fe 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021500 10 43 4c 45 41 52 5f 50  | CLEAR_P|		.TXT	16,'CLEAR_PARITY.VAL'
00021511 00                       |        |		.CONST	0x0
00021512 07                       |        |		.CONST	0x7			; DIPROC address
00021513 00                       |        |		.CONST	0x0			; Output Parameters
00021514 00                       |        |		.CONST	0x0			; Input Parameters
00021515 00                       |        |		.PAD	0x0
00021516 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
00021524 ; --------------------------------------------------------------------------------------
00021524 ; OMSI PASCAL Function
00021524 ;    <LVAR  0x008 1(r)>
00021524 ; --------------------------------------------------------------------------------------
00021524					PROG_FAIL:
00021524 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00021528 bf d5                    |        |		CMPA.L	(A5),A7
0002152a 62 06                    |b       |		BHI	0x21532
0002152c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021530 4e 76                    |Nv      |		TRAPV
00021532 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00021536 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002153a 41 fa ff e8              |A       |		LEA.L	PROG_FAIL,A0
0002153e 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021540 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021542 51 c8 ff fc              |Q       |		DBF	D0,0x21540
00021546 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
0002154a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002154c 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00021550 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00021554 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00021558 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002155e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021560 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021564 48 80                    |H       |		EXTB.W	D0
00021566 48 c0                    |H       |		EXTW.L	D0
00021568 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002156a 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021570 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021572 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021578 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002157a 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00021580 de fc 00 14              |        |		ADDA.W	#0x14,A7
00021584 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00021588 4e 5e                    |N^      |		UNLK	A6
0002158a 4e 75                    |Nu      |		RTS