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

⟦64fb933ca⟧ M200

    Length: 4608 (0x1200)
    Types: M200
    Notes: M200_PROGRAM
    Names: »P2IOC.M200«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »P2IOC.M200« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »P2IOC.M200« 

Disassembly

0x201bc


@ 201bc
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 201bc-202f8 Body>                                              
        <POP 201bc-201d2 Prologue>                           Σ0         ↓
        <POP 201d2-201e8 RegCacheLoad>                       Σ0         ↓
        <POP 201e8-20248 Naked>                              Σ0         ↓ →0x20290
            <Call 0x201e8 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x201ee [18] @>                            Δ-18               {[«18""»]}
            <POP 201fa-201fc StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x201fc 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x20208 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 2020a-2020b StackAdj>                       Δ+22       ↓       {}
            <Blob 0x2020b [14] @>                            Δ-14               {[«14""»]}
            <POP 2021a-2021c StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x2021c 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 20226-20228 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 20228  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x2022c 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 20232-20234 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x20234 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2023a-2023c StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x2023c 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2023e-20240 StackAdj>                       Δ+18               {}
            <MI 20240  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 20244  CMPA.W  #0x01,A0>                                        {}
            <MI 20246  BEQ     0x20290>                                         {}
        <POP 20248-20290 Naked>                              Σ0         ↓
            <Blob 0x20248 [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x20258 [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 20268-2026a StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x2026a 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 20274-20276 StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x20276>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x20276 12>                      Δ-4        
                <Const 0x2027a 0x1.2>                        Δ-2        
                <Const 0x2027c 0x1e.2>                       Δ-2        
                <Call 0x2027e 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20280-20282 StackAdj>                   Δ+8        
            <Call 0x20282 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 20288-2028a StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x2028a 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2028c-20290 StackAdj>                       Δ+48               {}
        <POP 20290-202f0 Naked>                              Σ0         ↓ ←0x201e8
            <Blob 0x20290 [14] @>                            Δ-14               {[«14""»]}
            <POP 202a0-202a2 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x202a2 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 202ac-202ae StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 202ae  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x202b2 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 202b8-202ba StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x202ba 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 202c0-202c2 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x202c2 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 202c4-202c5 StackAdj>                       Δ+18       ↓       {}
            <Blob 0x202c5 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x202d4 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 202d8-202da StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x202da 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x202e8 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 202ee-202f0 StackAdj>                       Δ+30               {}
        <POP 202f0-202f8 Epilogue>                           Σ0         

0x202f8


@ 202f8
    <POP 202f8-20390 Body>                                              
        <POP 202f8-2030e Prologue>                           Σ0         ↓
        <POP 2030e-20316 RegCacheLoad>                       Σ0         ↓
        <POP 20316-20372 Naked>                              Σ0         ↓
            <Const 0x20316 0x210c4.4>                        Δ-4                {[##135364]}
            <Const 0x2031c 0x210c5.4>                        Δ-4                {[##135364]|[##135365]}
            <Call 0x2031e 0x10544>                                              {[##135364]|[##135365]}
                IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
            <POP 20324-20326 StackAdj>                       Δ+6                {[-2-]}
            <POP 20326-20327 StackAdj>                       Δ+2                {}
            <Blob 0x20327 [2] 0x210c5>                       Δ-2                {[«2»]}
            <Call 0x20328 0x104d2>                                              {[«2»]}
                SetExpInitDone(a : Byte)
            <POP 2032e-2032f StackAdj>                       Δ+2        ↓       {}
            <Blob 0x2032f [6] @>                             Δ-6                {[«6""»]}
            <POP 2033e-20340 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x20340 5>                                                     {[«6""»]|[$$P2IOC]}
            <MI 20354  MOVE.L  (A7)+,0x210c6>                Δ+4                {[«6""»]}
            <POP 2035a-2035c StackAdj>                       Δ+6                {}
            <Const 0x2035c 0x210ca.4>                        Δ-4                {[##135370]}
            <Call 0x20362 0x102b8>                                              {[##135370]}
                NewString(VAR a : String)
            <POP 20368-2036a StackAdj>                       Δ+4                {}
            <MI 2036a  CLR.B   0x210ce>                                         {}
            <MI 20370  MOVEQ.L #0x00,D7>                                        {}
        <POP 20372-20388 Naked>                              Σ0         ↓ →0x20372 ←0x20372
            <POP 0x20372 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {}
            <MI 20378  LEA.L   0x210bc,A0>                                      {}
            <MI 2037e  CLR.B   (A0+D7.L+#0x13)>                                 {}
            <MI 20382  ADDQ.L  #0x1,D7>                                         {}
            <MI 20384  CMP.L   #0x07,D7>                                        {}
            <MI 20386  BLE     0x20372>                                         {}
        <POP 20388-20390 Epilogue>                           Σ0         

0x20390


@ 20390
        <LVAR  0x008 1(r)>
    <POP 20390-203ea Body>                                              
        <POP 20390-203a6 Prologue>                           Σ0         ↓
        <POP 203a6-203b2 RegCacheLoad>                       Σ0         ↓
        <POP 203b2-203e2 Naked>                              Σ0         ↓
            <MI 203b2  MOVE.B  (A6+0x8),0x210ce>                                {}
            <MI 203b6  MOVE.B  #0x2b,0x210cf>                                   {}
            <MI 203ba  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x203bc [4] 0x210c6>                       Δ-4                {[#0]|[«4»]}
            <Blob 0x203c2 [4] 0x210ca>                       Δ-4                {[#0]|[«4»]|[«4»]}
            <Blob 0x203c8 [2] 0x210ce>                       Δ-2                {[#0]|[«4»]|[«4»]|[«2»]}
            <Blob 0x203ca [8] 0x210cf>                       Δ-8                {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
            <Call 0x203d8 0x1054a>                                              {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 203de-203e2 StackAdj>                       Δ+20               {}
        <POP 203e2-203ea Epilogue>                           Σ0         

0x203ea


@ 203ea
        <LVAR  0x008 4(r)>
    <POP 203ea-2044e Body>                                              
        <POP 203ea-20400 Prologue>                           Σ0         ↓
        <POP 20400-20406 RegCacheLoad>                       Σ0         ↓
        <POP 20406-20446 Naked>                              Σ0         ↓
            <MI 20406  MOVE.L  (A6+0x8),D0>                                     {}
            <POP 0x2040a LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20414  MOVE.B  D0,0x210ce>                                      {}
            <MI 2041a  MOVE.B  #0x2b,0x210cf>                                   {}
            <MI 2041e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x20420 [4] 0x210c6>                       Δ-4                {[#0]|[«4»]}
            <Blob 0x20426 [4] 0x210ca>                       Δ-4                {[#0]|[«4»]|[«4»]}
            <MI 2042c  MOVE.B  D0,-(A7)>                     Δ-2                {[#0]|[«4»]|[«4»]|[2, 'D0']}
            <Blob 0x2042e [8] 0x210cf>                       Δ-8                {[#0]|[«4»]|[«4»]|[2, 'D0']|[«8»]}
            <Call 0x2043c 0x1054a>                                              {[#0]|[«4»]|[«4»]|[2, 'D0']|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20442-20446 StackAdj>                       Δ+20               {}
        <POP 20446-2044e Epilogue>                           Σ0         

0x2044e


@ 2044e
        <LVAR -0x005 @>
        <LVAR -0x007 @>
        <LVAR -0x008 @ 1(r)>
    <POP 2044e-204cc Body>                                              
        <POP 2044e-20464 Prologue>                           Σ0         ↓
        <POP 20464-20476 RegCacheLoad>                       Σ0         ↓
        <POP 20476-20488 Naked>                              Σ0         ↓ →0x20490
            <Pointer.fp 0x20476 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20478 <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Pointer.fp 0x2047a <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-7]|[@@-5]}
            <Call 0x2047c 0x20cb6>                                              {[@@-8]|[@@-7]|[@@-5]}
                exp_TEST_WCS_DATA.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 20482-20484 StackAdj>                       Δ+12               {}
            <MI 20484  TST.B   (A6-0x8)>                                        {}
            <MI 20486  BNE     0x20490>                                         {}
        <POP 20488-20490 Naked>                              Σ0         ↓
            <Const 0x20488 0x1.2>                            Δ-2                {[#1]}
            <Call 0x2048c 0x20390>                                              {[#1]}
            <POP 2048e-20490 StackAdj>                       Δ+2                {}
        <POP 20490-204a2 Naked>                              Σ0         ↓ →0x204aa ←0x20476
            <Pointer.fp 0x20490 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20492 <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Pointer.fp 0x20494 <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-7]|[@@-5]}
            <Call 0x20496 0x20cfa>                                              {[@@-8]|[@@-7]|[@@-5]}
                exp_TEST_WCS_ADDRESSING.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 2049c-2049e StackAdj>                       Δ+12               {}
            <MI 2049e  TST.B   (A6-0x8)>                                        {}
            <MI 204a0  BNE     0x204aa>                                         {}
        <POP 204a2-204aa Naked>                              Σ0         ↓
            <Const 0x204a2 0x2.2>                            Δ-2                {[#2]}
            <Call 0x204a6 0x20390>                                              {[#2]}
            <POP 204a8-204aa StackAdj>                       Δ+2                {}
        <POP 204aa-204bc Naked>                              Σ0         ↓ →0x204c4 ←0x20490
            <Pointer.fp 0x204aa <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x204ac <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Pointer.fp 0x204ae <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-7]|[@@-5]}
            <Call 0x204b0 0x20cd8>                                              {[@@-8]|[@@-7]|[@@-5]}
                exp_TEST_WCS_BITS.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 204b6-204b8 StackAdj>                       Δ+12               {}
            <MI 204b8  TST.B   (A6-0x8)>                                        {}
            <MI 204ba  BNE     0x204c4>                                         {}
        <POP 204bc-204c4 Naked>                              Σ0         ↓
            <Const 0x204bc 0x3.2>                            Δ-2                {[#3]}
            <Call 0x204c0 0x20390>                                              {[#3]}
            <POP 204c2-204c4 StackAdj>                       Δ+2                {}
        <POP 204c4-204cc Epilogue>                           Σ0         ←0x204aa

0x204cc


@ 204cc
        <LVAR -0x005 @>
        <LVAR -0x007 @>
        <LVAR -0x008 @ 1(r)>
    <POP 204cc-2054a Body>                                              
        <POP 204cc-204e2 Prologue>                           Σ0         ↓
        <POP 204e2-204f4 RegCacheLoad>                       Σ0         ↓
        <POP 204f4-20506 Naked>                              Σ0         ↓ →0x2050e
            <Pointer.fp 0x204f4 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x204f6 <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Pointer.fp 0x204f8 <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-7]|[@@-5]}
            <Call 0x204fa 0x20d22>                                              {[@@-8]|[@@-7]|[@@-5]}
                exp_TEST_TRACE_DATA.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 20500-20502 StackAdj>                       Δ+12               {}
            <MI 20502  TST.B   (A6-0x8)>                                        {}
            <MI 20504  BNE     0x2050e>                                         {}
        <POP 20506-2050e Naked>                              Σ0         ↓
            <Const 0x20506 0x4.2>                            Δ-2                {[#4]}
            <Call 0x2050a 0x20390>                                              {[#4]}
            <POP 2050c-2050e StackAdj>                       Δ+2                {}
        <POP 2050e-20520 Naked>                              Σ0         ↓ →0x20528 ←0x204f4
            <Pointer.fp 0x2050e <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x20510 <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Pointer.fp 0x20512 <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-7]|[@@-5]}
            <Call 0x20514 0x20d6a>                                              {[@@-8]|[@@-7]|[@@-5]}
                exp_TEST_TRACE_ADDRESSING.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 2051a-2051c StackAdj>                       Δ+12               {}
            <MI 2051c  TST.B   (A6-0x8)>                                        {}
            <MI 2051e  BNE     0x20528>                                         {}
        <POP 20520-20528 Naked>                              Σ0         ↓
            <Const 0x20520 0x5.2>                            Δ-2                {[#5]}
            <Call 0x20524 0x20390>                                              {[#5]}
            <POP 20526-20528 StackAdj>                       Δ+2                {}
        <POP 20528-2053a Naked>                              Σ0         ↓ →0x20542 ←0x2050e
            <Pointer.fp 0x20528 <LVAR -0x008 @ 1(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x2052a <LVAR -0x007 @>>             Δ-4                {[@@-8]|[@@-7]}
            <Pointer.fp 0x2052c <LVAR -0x005 @>>             Δ-4                {[@@-8]|[@@-7]|[@@-5]}
            <Call 0x2052e 0x20d46>                                              {[@@-8]|[@@-7]|[@@-5]}
                exp_TEST_TRACE_BITS.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 20534-20536 StackAdj>                       Δ+12               {}
            <MI 20536  TST.B   (A6-0x8)>                                        {}
            <MI 20538  BNE     0x20542>                                         {}
        <POP 2053a-20542 Naked>                              Σ0         ↓
            <Const 0x2053a 0x6.2>                            Δ-2                {[#6]}
            <Call 0x2053e 0x20390>                                              {[#6]}
            <POP 20540-20542 StackAdj>                       Δ+2                {}
        <POP 20542-2054a Epilogue>                           Σ0         ←0x20528

0x2054a


@ 2054a
        <LVAR -0x002 @>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x004 @ 1(r)>
    <POP 2054a-206dc Body>                                              
        <POP 2054a-20560 Prologue>                           Σ0         ↓
        <POP 20560-2057e RegCacheLoad>                       Σ0         ↓
        <POP 2057e-20590 Naked>                              Σ0         ↓ →0x205a0
            <Pointer.fp 0x2057e <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Pointer.fp 0x20580 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-4]|[@@-3]}
            <Pointer.fp 0x20582 <LVAR -0x002 @>>             Δ-4                {[@@-4]|[@@-3]|[@@-2]}
            <Call 0x20584 0x20fcc>                                              {[@@-4]|[@@-3]|[@@-2]}
                exp_TEST_ADDRESS_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 2058a-2058c StackAdj>                       Δ+12               {}
            <MI 2058c  TST.B   (A6-0x4)>                                        {}
            <MI 2058e  BNE     0x205a0>                                         {}
        <POP 20590-205a0 Naked>                              Σ0         ↓
            <MI 20590  CLR.L   D0>                                              {}
            <MI 20592  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 20594  ADDQ.W  #0x7,D0>                                         {}
            <MI 20596  EXTW.L  D0>                                              {}
            <MI 20598  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <Call 0x2059a 0x203ea>                                              {[4, 'D0']}
            <POP 2059e-205a0 StackAdj>                       Δ+4                {}
        <POP 205a0-205b2 Naked>                              Σ0         ↓ →0x205c4 ←0x2057e
            <Pointer.fp 0x205a0 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Pointer.fp 0x205a2 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-4]|[@@-3]}
            <Pointer.fp 0x205a4 <LVAR -0x002 @>>             Δ-4                {[@@-4]|[@@-3]|[@@-2]}
            <Call 0x205a6 0x20f40>                                              {[@@-4]|[@@-3]|[@@-2]}
                exp_TEST_FIU_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 205ac-205ae StackAdj>                       Δ+12               {}
            <MI 205ae  TST.B   (A6-0x4)>                                        {}
            <MI 205b0  BNE     0x205c4>                                         {}
        <POP 205b2-205c4 Naked>                              Σ0         ↓
            <MI 205b2  CLR.L   D0>                                              {}
            <MI 205b4  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 205b6  ADDI.W  #0x000b,D0>                                      {}
            <MI 205ba  EXTW.L  D0>                                              {}
            <MI 205bc  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <Call 0x205be 0x203ea>                                              {[4, 'D0']}
            <POP 205c2-205c4 StackAdj>                       Δ+4                {}
        <POP 205c4-205d6 Naked>                              Σ0         ↓ →0x20608 ←0x205a0
            <Pointer.fp 0x205c4 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Pointer.fp 0x205c6 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-4]|[@@-3]}
            <Pointer.fp 0x205c8 <LVAR -0x002 @>>             Δ-4                {[@@-4]|[@@-3]|[@@-2]}
            <Call 0x205ca 0x20e06>                                              {[@@-4]|[@@-3]|[@@-2]}
                exp_TEST_TV_0_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 205d0-205d2 StackAdj>                       Δ+12               {}
            <MI 205d2  TST.B   (A6-0x4)>                                        {}
            <MI 205d4  BNE     0x20608>                                         {}
        <POP 205d6-20608 Naked>                              Σ0         ↓
            <Blob 0x205d6 [26] @>                            Δ-26               {[«26""»]}
            <POP 205e2-205e4 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x205e4 26>                                                    {[«26""»]|[$$not asserted\not asserted\]}
            <MI 205f4  MOVE.L  (A7)+,0x210ca>                Δ+4                {[«26""»]}
            <POP 205f6-205f8 StackAdj>                       Δ+26               {}
            <MI 205f8  CLR.L   D0>                                              {}
            <MI 205fa  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 205fc  ADD.W   #0x0f,D0>                                        {}
            <MI 205fe  EXTW.L  D0>                                              {}
            <MI 20600  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <Call 0x20602 0x203ea>                                              {[4, 'D0']}
            <POP 20606-20608 StackAdj>                       Δ+4                {}
        <POP 20608-2061a Naked>                              Σ0         ↓ →0x2064c ←0x205c4
            <Pointer.fp 0x20608 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Pointer.fp 0x2060a <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-4]|[@@-3]}
            <Pointer.fp 0x2060c <LVAR -0x002 @>>             Δ-4                {[@@-4]|[@@-3]|[@@-2]}
            <Call 0x2060e 0x20de0>                                              {[@@-4]|[@@-3]|[@@-2]}
                exp_TEST_TV_1_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 20614-20616 StackAdj>                       Δ+12               {}
            <MI 20616  TST.B   (A6-0x4)>                                        {}
            <MI 20618  BNE     0x2064c>                                         {}
        <POP 2061a-2064c Naked>                              Σ0         ↓
            <Blob 0x2061a [22] @>                            Δ-22               {[«22""»]}
            <POP 20626-20628 StackAdj>                       Δ-4                {[«22""»]|[-4-]}
            <Lit 0x20628 22>                                                    {[«22""»]|[$$not asserted\asserted\]}
            <MI 20638  MOVE.L  (A7)+,0x210ca>                Δ+4                {[«22""»]}
            <POP 2063a-2063c StackAdj>                       Δ+22               {}
            <MI 2063c  CLR.L   D0>                                              {}
            <MI 2063e  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 20640  ADD.W   #0x0f,D0>                                        {}
            <MI 20642  EXTW.L  D0>                                              {}
            <MI 20644  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <Call 0x20646 0x203ea>                                              {[4, 'D0']}
            <POP 2064a-2064c StackAdj>                       Δ+4                {}
        <POP 2064c-2065e Naked>                              Σ0         ↓ →0x20690 ←0x20608
            <Pointer.fp 0x2064c <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Pointer.fp 0x2064e <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-4]|[@@-3]}
            <Pointer.fp 0x20650 <LVAR -0x002 @>>             Δ-4                {[@@-4]|[@@-3]|[@@-2]}
            <Call 0x20652 0x20dba>                                              {[@@-4]|[@@-3]|[@@-2]}
                exp_TEST_TV_2_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 20658-2065a StackAdj>                       Δ+12               {}
            <MI 2065a  TST.B   (A6-0x4)>                                        {}
            <MI 2065c  BNE     0x20690>                                         {}
        <POP 2065e-20690 Naked>                              Σ0         ↓
            <Blob 0x2065e [22] @>                            Δ-22               {[«22""»]}
            <POP 2066a-2066c StackAdj>                       Δ-4                {[«22""»]|[-4-]}
            <Lit 0x2066c 22>                                                    {[«22""»]|[$$asserted\not asserted\]}
            <MI 2067c  MOVE.L  (A7)+,0x210ca>                Δ+4                {[«22""»]}
            <POP 2067e-20680 StackAdj>                       Δ+22               {}
            <MI 20680  CLR.L   D0>                                              {}
            <MI 20682  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 20684  ADD.W   #0x0f,D0>                                        {}
            <MI 20686  EXTW.L  D0>                                              {}
            <MI 20688  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <Call 0x2068a 0x203ea>                                              {[4, 'D0']}
            <POP 2068e-20690 StackAdj>                       Δ+4                {}
        <POP 20690-206a2 Naked>                              Σ0         ↓ →0x206d4 ←0x2064c
            <Pointer.fp 0x20690 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Pointer.fp 0x20692 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-4]|[@@-3]}
            <Pointer.fp 0x20694 <LVAR -0x002 @>>             Δ-4                {[@@-4]|[@@-3]|[@@-2]}
            <Call 0x20696 0x20d94>                                              {[@@-4]|[@@-3]|[@@-2]}
                exp_TEST_TV_3_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 2069c-2069e StackAdj>                       Δ+12               {}
            <MI 2069e  TST.B   (A6-0x4)>                                        {}
            <MI 206a0  BNE     0x206d4>                                         {}
        <POP 206a2-206d4 Naked>                              Σ0         ↓
            <Blob 0x206a2 [18] @>                            Δ-18               {[«18""»]}
            <POP 206ae-206b0 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x206b0 18>                                                    {[«18""»]|[$$asserted\asserted\]}
            <MI 206c0  MOVE.L  (A7)+,0x210ca>                Δ+4                {[«18""»]}
            <POP 206c2-206c4 StackAdj>                       Δ+18               {}
            <MI 206c4  CLR.L   D0>                                              {}
            <MI 206c6  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 206c8  ADD.W   #0x0f,D0>                                        {}
            <MI 206ca  EXTW.L  D0>                                              {}
            <MI 206cc  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <Call 0x206ce 0x203ea>                                              {[4, 'D0']}
            <POP 206d2-206d4 StackAdj>                       Δ+4                {}
        <POP 206d4-206dc Epilogue>                           Σ0         ←0x20690

0x206dc


@ 206dc
        <LVAR -0x009 @>
        <LVAR -0x00f @>
        <LVAR -0x010 @ 1(r)>
    <POP 206dc-20718 Body>                                              
        <POP 206dc-206ee Prologue>                           Σ0         ↓
        <POP 206ee-2070a Naked>                              Σ0         ↓ →0x20714
            <Pointer.fp 0x206ee <LVAR -0x010 @ 1(r)>>        Δ-4                {[@@-16]}
            <Pointer.fp 0x206f2 <LVAR -0x00f @>>             Δ-4                {[@@-16]|[@@-15]}
            <Pointer.fp 0x206f6 <LVAR -0x009 @>>             Δ-4                {[@@-16]|[@@-15]|[@@-9]}
            <Call 0x206fa 0x20fa6>                                              {[@@-16]|[@@-15]|[@@-9]}
                exp_TEST_COUNTER_DATA.IOC(&Fr, &Sr_6, &Sr_6)
            <POP 20700-20704 StackAdj>                       Δ+12               {}
            <MI 20704  TST.B   (A6-0x10)>                                       {}
            <MI 20708  BNE     0x20714>                                         {}
        <POP 2070a-20714 Naked>                              Σ0         ↓
            <Const 0x2070a 0x1f.2>                           Δ-2                {[#31]}
            <Call 0x2070e 0x20390>                                              {[#31]}
            <POP 20712-20714 StackAdj>                       Δ+2                {}
        <POP 20714-20718 Epilogue>                           Σ0         ←0x206ee

0x20718


@ 20718
        <LVAR -0x005 @>
        <LVAR -0x006 @>
        <LVAR -0x008 @>
        <LVAR -0x009 @>
        <LVAR -0x00b @>
        <LVAR -0x013 @>
        <LVAR -0x01b @>
        <LVAR -0x01c @ 1(r)>
    <POP 20718-207be Body>                                              
        <POP 20718-2072e Prologue>                           Σ0         ↓
        <POP 2072e-20738 RegCacheLoad>                       Σ0         ↓
        <POP 20738-2074e Naked>                              Σ0         ↓ →0x20756
            <Pointer.fp 0x20738 <LVAR -0x01c @ 1(r)>>        Δ-4                {[@@-28]}
            <Pointer.fp 0x2073a <LVAR -0x008 @>>             Δ-4                {[@@-28]|[@@-8]}
            <Pointer.fp 0x2073e <LVAR -0x005 @>>             Δ-4                {[@@-28]|[@@-8]|[@@-5]}
            <Call 0x20742 0x20f84>                                              {[@@-28]|[@@-8]|[@@-5]}
                exp_TEST_CHECKBITS.IOC(&Fr, &Sr_2, &Sr_2)
            <POP 20748-2074a StackAdj>                       Δ+12               {}
            <MI 2074a  TST.B   (A6-0x1c)>                                       {}
            <MI 2074c  BNE     0x20756>                                         {}
        <POP 2074e-20756 Naked>                              Σ0         ↓
            <Const 0x2074e 0x22.2>                           Δ-2                {[#34]}
            <Call 0x20752 0x20390>                                              {[#34]}
            <POP 20754-20756 StackAdj>                       Δ+2                {}
        <POP 20756-2076c Naked>                              Σ0         ↓ →0x20774 ←0x20738
            <Pointer.fp 0x20756 <LVAR -0x01c @ 1(r)>>        Δ-4                {[@@-28]}
            <Pointer.fp 0x20758 <LVAR -0x009 @>>             Δ-4                {[@@-28]|[@@-9]}
            <Pointer.fp 0x2075c <LVAR -0x006 @>>             Δ-4                {[@@-28]|[@@-9]|[@@-6]}
            <Call 0x20760 0x20e2c>                                              {[@@-28]|[@@-9]|[@@-6]}
                exp_TEST_SYNDROME_TRANSCEIVER.IOC(&Fr, &Sr_1, &Sr_1)
            <POP 20766-20768 StackAdj>                       Δ+12               {}
            <MI 20768  TST.B   (A6-0x1c)>                                       {}
            <MI 2076a  BNE     0x20774>                                         {}
        <POP 2076c-20774 Naked>                              Σ0         ↓
            <Const 0x2076c 0x24.2>                           Δ-2                {[#36]}
            <Call 0x20770 0x20390>                                              {[#36]}
            <POP 20772-20774 StackAdj>                       Δ+2                {}
        <POP 20774-20798 Naked>                              Σ0         ↓ →0x207a0 ←0x20756
            <Pointer.fp 0x20774 <LVAR -0x01c @ 1(r)>>        Δ-4                {[@@-28]}
            <Pointer.fp 0x20776 <LVAR -0x01b @>>             Δ-4                {[@@-28]|[@@-27]}
            <Pointer.fp 0x2077a <LVAR -0x013 @>>             Δ-4                {[@@-28]|[@@-27]|[@@-19]}
            <Pointer.fp 0x2077e <LVAR -0x00b @>>             Δ-4                {[@@-28]|[@@-27]|[@@-19]|[@@-11]}
            <Pointer.fp 0x20782 <LVAR -0x009 @>>             Δ-4                {[@@-28]|[@@-27]|[@@-19]|[@@-11]|[@@-9]}
            <Pointer.fp 0x20786 <LVAR -0x006 @>>             Δ-4                {[@@-28]|[@@-27]|[@@-19]|[@@-11]|[@@-9]|[@@-6]}
            <Call 0x2078a 0x20f64>                                              {[@@-28]|[@@-27]|[@@-19]|[@@-11]|[@@-9]|[@@-6]}
                exp_TEST_ECC.IOC(&Fr, &Sr_8, &Sr_8, &Sr_2, &Sr_1, &Sr_1)
            <POP 20790-20794 StackAdj>                       Δ+24               {}
            <MI 20794  TST.B   (A6-0x1c)>                                       {}
            <MI 20796  BNE     0x207a0>                                         {}
        <POP 20798-207a0 Naked>                              Σ0         ↓
            <Const 0x20798 0x21.2>                           Δ-2                {[#33]}
            <Call 0x2079c 0x20390>                                              {[#33]}
            <POP 2079e-207a0 StackAdj>                       Δ+2                {}
        <POP 207a0-207ae Naked>                              Σ0         ↓ →0x207b6 ←0x20774
            <Pointer.fp 0x207a0 <LVAR -0x01c @ 1(r)>>        Δ-4                {[@@-28]}
            <Call 0x207a2 0x20e82>                                              {[@@-28]}
                exp_TEST_MULTIBIT_ERROR.IOC(&Fr)
            <POP 207a8-207aa StackAdj>                       Δ+4                {}
            <MI 207aa  TST.B   (A6-0x1c)>                                       {}
            <MI 207ac  BNE     0x207b6>                                         {}
        <POP 207ae-207b6 Naked>                              Σ0         ↓
            <Const 0x207ae 0x23.2>                           Δ-2                {[#35]}
            <Call 0x207b2 0x20390>                                              {[#35]}
            <POP 207b4-207b6 StackAdj>                       Δ+2                {}
        <POP 207b6-207be Epilogue>                           Σ0         ←0x207a0

0x207be


@ 207be
        <LVAR -0x004 @ 4(r)>
    <POP 207be-20800 Body>                                              
        <POP 207be-207d4 Prologue>                           Σ0         ↓
        <POP 207d4-207f8 Naked>                              Σ0         ↓
            <MI 207d4  CLR.L   (A6-0x4)>                                        {}
            <MI 207d8  LEA.L   (A6-0x4),A0>                                     {}
            <MI 207dc  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x207de 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Const 0x207e2 0xfffff300.4>                     Δ-4                {[4, 'A0']|[#1]|[##4294963968]}
            <Const 0x207e6 0x5.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294963968]|[#5]}
            <Const 0x207ea 0x4.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294963968]|[#5]|[#4]}
            <Call 0x207ee 0x1023a>                                              {[4, 'A0']|[#1]|[##4294963968]|[#5]|[#4]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 207f4-207f8 StackAdj>                       Δ+14               {}
        <POP 207f8-20800 Epilogue>                           Σ0         

0x20800


@ 20800
        <LVAR -0x004 @ 4(w)>
    <POP 20800-20846 Body>                                              
        <POP 20800-20816 Prologue>                           Σ0         ↓
        <POP 20816-2083e Naked>                              Σ0         ↓
            <MI 20816  MOVE.L  #0x2,(A6-0x4)>                                   {}
            <MI 2081e  LEA.L   (A6-0x4),A0>                                     {}
            <MI 20822  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x20824 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Const 0x20828 0xfffff300.4>                     Δ-4                {[4, 'A0']|[#1]|[##4294963968]}
            <Const 0x2082c 0x5.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294963968]|[#5]}
            <Const 0x20830 0x4.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294963968]|[#5]|[#4]}
            <Call 0x20834 0x1023a>                                              {[4, 'A0']|[#1]|[##4294963968]|[#5]|[#4]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 2083a-2083e StackAdj>                       Δ+14               {}
        <POP 2083e-20846 Epilogue>                           Σ0         

0x20846


@ 20846
        <LVAR -0x004 @ 4(r)>
    <POP 20846-20888 Body>                                              
        <POP 20846-2085c Prologue>                           Σ0         ↓
        <POP 2085c-20880 Naked>                              Σ0         ↓
            <MI 2085c  CLR.L   (A6-0x4)>                                        {}
            <MI 20860  LEA.L   (A6-0x4),A0>                                     {}
            <MI 20864  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x20866 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Const 0x2086a 0xfffff500.4>                     Δ-4                {[4, 'A0']|[#1]|[##4294964480]}
            <Const 0x2086e 0x5.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294964480]|[#5]}
            <Const 0x20872 0x4.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294964480]|[#5]|[#4]}
            <Call 0x20876 0x1023a>                                              {[4, 'A0']|[#1]|[##4294964480]|[#5]|[#4]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 2087c-20880 StackAdj>                       Δ+14               {}
        <POP 20880-20888 Epilogue>                           Σ0         

0x20888


@ 20888
    <POP 20888-208c6 Body>                                              
        <POP 20888-2089e Prologue>                           Σ0         ↓
        <POP 2089e-208a2 RegCacheLoad>                       Σ0         ↓
        <POP 208a2-208be Naked>                              Σ0         ↓
            <MI 208a2  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x208a4 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Const 0x208a8 0xfffff600.4>                     Δ-4                {[4, 'A0']|[#1]|[##4294964736]}
            <Const 0x208ac 0x5.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294964736]|[#5]}
            <Const 0x208b0 0x4.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294964736]|[#5]|[#4]}
            <Call 0x208b4 0x1023a>                                              {[4, 'A0']|[#1]|[##4294964736]|[#5]|[#4]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 208ba-208be StackAdj>                       Δ+14               {}
        <POP 208be-208c6 Epilogue>                           Σ0         

0x208c6


@ 208c6
        <LVAR  0x008 2(w)>
        <LVAR -0x004 @ 4(r)>
    <POP 208c6-20934 Body>                                              
        <POP 208c6-208dc Prologue>                           Σ0         ↓
        <POP 208dc-208e8 RegCacheLoad>                       Σ0         ↓
        <POP 208e8-2092c Naked>                              Σ0         ↓
            <MI 208e8  CLR.L   (A6-0x4)>                                        {}
            <MI 208ea  LEA.L   (A6-0x4),A0>                                     {}
            <MI 208ec  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x208ee 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Const 0x208f0 0xfffff700.4>                     Δ-4                {[4, 'A0']|[#1]|[##4294964992]}
            <Const 0x208f4 0x5.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294964992]|[#5]}
            <Const 0x208f6 0x4.2>                            Δ-2                {[4, 'A0']|[#1]|[##4294964992]|[#5]|[#4]}
            <Call 0x208f8 0x1023a>                                              {[4, 'A0']|[#1]|[##4294964992]|[#5]|[#4]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 208fe-20900 StackAdj>                       Δ+14               {}
            <Const 0x20900 0xfffff100.4>                     Δ-4                {[##4294963456]}
            <Const 0x20904 0x5.2>                            Δ-2                {[##4294963456]|[#5]}
            <MI 20906  LEA.L   (A6-0x4),A0>                                     {[##4294963456]|[#5]}
            <MI 20908  MOVE.L  A0,-(A7)>                     Δ-4                {[##4294963456]|[#5]|[4, 'A0']}
            <Const 0x2090a 0x1.2>                            Δ-2                {[##4294963456]|[#5]|[4, 'A0']|[#1]}
            <Const 0x2090c 0x4.2>                            Δ-2                {[##4294963456]|[#5]|[4, 'A0']|[#1]|[#4]}
            <Call 0x2090e 0x1023a>                                              {[##4294963456]|[#5]|[4, 'A0']|[#1]|[#4]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 20914-20916 StackAdj>                       Δ+14               {}
            <MI 20916  MOVE.L  (A6-0x4),D0>                                     {}
            <MI 20918  ANDI.L  #0x0000ffff,D0>                                  {}
            <POP 0x2091e LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 20928  MOVE.W  D0,(A6+0x8)>                                     {}
        <POP 2092c-20934 Epilogue>                           Σ0         

0x20934


@ 20934
        <LVAR -0x007 1(w)>
        <LVAR -0x008 1(w) 2(r)>
    <POP 20934-20a30 Body>                                              
        <POP 20934-2094a Prologue>                           Σ0         ↓
        <POP 2094a-20968 RegCacheLoad>                       Σ0         ↓
        <POP 20968-20972 Naked>                              Σ0         ↓
            <Call 0x20968 0x207be>                                              {}
            <Call 0x2096c 0x20846>                                              {}
            <MI 2096e  MOVEQ.L #0x01,D6>                                        {}
            <MI 20970  MOVEQ.L #0x00,D7>                                        {}
        <POP 20972-2099a Naked>                              Σ0         ↓ →0x209a4 ←0x209a4
            <MI 20972  MOVE.L  D6,D0>                                           {}
            <MI 20974  LSR.L   #0x8,D0>                                         {}
            <MI 20976  AND.L   #0xff,D0>                                        {}
            <MI 20978  MOVE.B  D0,(A6-0x8)>                                     {}
            <MI 2097a  MOVE.L  D6,D0>                                           {}
            <MI 2097c  AND.L   #0xff,D0>                                        {}
            <POP 0x2097e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20984  MOVE.B  D0,(A6-0x7)>                                     {}
            <MI 20988  MOVE.W  (A6-0x8),-(A7)>               Δ-2                {[2, '(A6-0x8)']}
            <Call 0x2098a 0x20c8c>                                              {[2, '(A6-0x8)']}
                exp_WRITE_REQUEST_QUEUE_FIFO.IOC(Sw_2)
            <Call 0x20990 0x208c6>                                              {[2, '(A6-0x8)']}
            <MI 20992  CLR.L   D0>                                              {[2, '(A6-0x8)']}
            <MI 20994  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <MI 20996  CMP.L   D0,D6>                                           {}
            <MI 20998  BEQ     0x209a4>                                         {}
        <POP 2099a-209a4 Naked>                              Σ0         ↓
            <Call 0x2099a 0x20846>                                              {}
            <Call 0x2099c 0x20800>                                              {}
            <Const 0x2099e 0x2b.2>                           Δ-2                {[#43]}
            <Call 0x209a0 0x20390>                                              {[#43]}
            <POP 209a2-209a4 StackAdj>                       Δ+2                {}
        <POP 209a4-209ac Naked>                              Σ0         ↓ →0x20972 ←0x20972
            <MI 209a4  ADD.L   D6,D6>                                           {}
            <MI 209a6  ADDQ.L  #0x1,D7>                                         {}
            <MI 209a8  CMP.L   #0x0f,D7>                                        {}
            <MI 209aa  BLE     0x20972>                                         {}
        <POP 209ac-209b4 Naked>                              Σ0         ↓
            <MI 209ac  MOVE.L  #0xfffe,D6>                                      {}
            <MI 209b2  MOVEQ.L #0x00,D7>                                        {}
        <POP 209b4-209dc Naked>                              Σ0         ↓ →0x209e6 ←0x209e6
            <MI 209b4  MOVE.L  D6,D0>                                           {}
            <MI 209b6  LSR.L   #0x8,D0>                                         {}
            <MI 209b8  AND.L   #0xff,D0>                                        {}
            <MI 209ba  MOVE.B  D0,(A6-0x8)>                                     {}
            <MI 209bc  MOVE.L  D6,D0>                                           {}
            <MI 209be  AND.L   #0xff,D0>                                        {}
            <POP 0x209c0 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 209c6  MOVE.B  D0,(A6-0x7)>                                     {}
            <MI 209ca  MOVE.W  (A6-0x8),-(A7)>               Δ-2                {[2, '(A6-0x8)']}
            <Call 0x209cc 0x20c8c>                                              {[2, '(A6-0x8)']}
                exp_WRITE_REQUEST_QUEUE_FIFO.IOC(Sw_2)
            <Call 0x209d2 0x208c6>                                              {[2, '(A6-0x8)']}
            <MI 209d4  CLR.L   D0>                                              {[2, '(A6-0x8)']}
            <MI 209d6  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <MI 209d8  CMP.L   D0,D6>                                           {}
            <MI 209da  BEQ     0x209e6>                                         {}
        <POP 209dc-209e6 Naked>                              Σ0         ↓
            <Call 0x209dc 0x20846>                                              {}
            <Call 0x209de 0x20800>                                              {}
            <Const 0x209e0 0x2b.2>                           Δ-2                {[#43]}
            <Call 0x209e2 0x20390>                                              {[#43]}
            <POP 209e4-209e6 StackAdj>                       Δ+2                {}
        <POP 209e6-209f6 Naked>                              Σ0         ↓ →0x209b4 ←0x209b4
            <MI 209e6  ADD.L   D6,D6>                                           {}
            <MI 209e8  ADDQ.L  #0x1,D6>                                         {}
            <MI 209ea  ANDI.L  #0x0000ffff,D6>                                  {}
            <MI 209f0  ADDQ.L  #0x1,D7>                                         {}
            <MI 209f2  CMP.L   #0x0f,D7>                                        {}
            <MI 209f4  BLE     0x209b4>                                         {}
        <POP 209f6-20a00 Naked>                              Σ0         ↓
            <Call 0x209f6 0x20846>                                              {}
            <Call 0x209f8 0x2101e>                                              {}
                exp_FILL_REQUEST_QUEUE_FIFO.IOC()
            <MI 209fe  MOVEQ.L #0x00,D7>                                        {}
        <POP 20a00-20a12 Naked>                              Σ0         ↓ →0x20a1e ←0x20a1e
            <MI 20a00  MOVE.L  D7,D5>                                           {}
            <MI 20a02  ASL.L   #0x8,D5>                                         {}
            <MI 20a04  ADD.L   D7,D5>                                           {}
            <POP 20a06-20a08 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x20a08 0x208c6>                                              {[-2-]}
            <MI 20a0a  CLR.L   D0>                                              {[-2-]}
            <MI 20a0c  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <MI 20a0e  CMP.L   D0,D5>                                           {}
            <MI 20a10  BEQ     0x20a1e>                                         {}
        <POP 20a12-20a1e Naked>                              Σ0         ↓
            <Call 0x20a12 0x20846>                                              {}
            <Call 0x20a14 0x20800>                                              {}
            <Const 0x20a16 0x2c.2>                           Δ-2                {[#44]}
            <Call 0x20a1a 0x20390>                                              {[#44]}
            <POP 20a1c-20a1e StackAdj>                       Δ+2                {}
        <POP 20a1e-20a24 Naked>                              Σ0         ↓ →0x20a00 ←0x20a00
            <MI 20a1e  ADDQ.L  #0x1,D7>                                         {}
            <MI 20a20  CMP.L   #0xff,D7>                                        {}
            <MI 20a22  BLE     0x20a00>                                         {}
        <POP 20a24-20a28 Naked>                              Σ0         ↓
            <Call 0x20a24 0x20846>                                              {}
            <Call 0x20a26 0x20800>                                              {}
        <POP 20a28-20a30 Epilogue>                           Σ0         

0x20a30


@ 20a30
        <LVAR -0x00b 1(r)>
        <LVAR -0x00c @ 1(r)>
    <POP 20a30-20b3c Body>                                              
        <POP 20a30-20a46 Prologue>                           Σ0         ↓
        <POP 20a46-20a60 RegCacheLoad>                       Σ0         ↓
        <POP 20a60-20a6a Naked>                              Σ0         ↓
            <Call 0x20a60 0x207be>                                              {}
            <Call 0x20a64 0x20846>                                              {}
            <MI 20a66  MOVEQ.L #0x01,D5>                                        {}
            <MI 20a68  MOVEQ.L #0x00,D6>                                        {}
        <POP 20a6a-20a8a Naked>                              Σ0         ↓ →0x20a96 ←0x20a96
            <MI 20a6a  MOVE.L  D5,-(A7)>                     Δ-4                {[4, 'D5']}
            <Call 0x20a6c 0x20888>                                              {[4, 'D5']}
            <POP 20a6e-20a70 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20a70 <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Call 0x20a72 0x20ff4>                                              {[@@-12]}
                exp_READ_RESPONSE_QUEUE_FIFO.IOC(&Sr_2)
            <POP 20a74-20a76 StackAdj>                       Δ+4                {}
            <MI 20a76  CLR.L   D0>                                              {}
            <MI 20a78  MOVE.B  (A6-0xc),D0>                                     {}
            <MI 20a7a  MOVE.L  D0,D7>                                           {}
            <MI 20a7c  ASL.L   #0x8,D7>                                         {}
            <MI 20a7e  CLR.L   D0>                                              {}
            <MI 20a80  MOVE.B  (A6-0xb),D0>                                     {}
            <MI 20a84  ADD.L   D0,D7>                                           {}
            <MI 20a86  CMP.L   D7,D5>                                           {}
            <MI 20a88  BEQ     0x20a96>                                         {}
        <POP 20a8a-20a96 Naked>                              Σ0         ↓
            <Call 0x20a8a 0x20846>                                              {}
            <Call 0x20a8c 0x20800>                                              {}
            <Const 0x20a8e 0x2d.2>                           Δ-2                {[#45]}
            <Call 0x20a90 0x20390>                                              {[#45]}
            <POP 20a94-20a96 StackAdj>                       Δ+2                {}
        <POP 20a96-20a9e Naked>                              Σ0         ↓ →0x20a6a ←0x20a6a
            <MI 20a96  ADD.L   D5,D5>                                           {}
            <MI 20a98  ADDQ.L  #0x1,D6>                                         {}
            <MI 20a9a  CMP.L   #0x0f,D6>                                        {}
            <MI 20a9c  BLE     0x20a6a>                                         {}
        <POP 20a9e-20aa6 Naked>                              Σ0         ↓
            <MI 20a9e  MOVE.L  #0xfffe,D5>                                      {}
            <MI 20aa4  MOVEQ.L #0x00,D6>                                        {}
        <POP 20aa6-20ac6 Naked>                              Σ0         ↓ →0x20ad2 ←0x20ad2
            <MI 20aa6  MOVE.L  D5,-(A7)>                     Δ-4                {[4, 'D5']}
            <Call 0x20aa8 0x20888>                                              {[4, 'D5']}
            <POP 20aaa-20aac StackAdj>                       Δ+4                {}
            <Pointer.fp 0x20aac <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Call 0x20aae 0x20ff4>                                              {[@@-12]}
                exp_READ_RESPONSE_QUEUE_FIFO.IOC(&Sr_2)
            <POP 20ab0-20ab2 StackAdj>                       Δ+4                {}
            <MI 20ab2  CLR.L   D0>                                              {}
            <MI 20ab4  MOVE.B  (A6-0xc),D0>                                     {}
            <MI 20ab6  MOVE.L  D0,D7>                                           {}
            <MI 20ab8  ASL.L   #0x8,D7>                                         {}
            <MI 20aba  CLR.L   D0>                                              {}
            <MI 20abc  MOVE.B  (A6-0xb),D0>                                     {}
            <MI 20ac0  ADD.L   D0,D7>                                           {}
            <MI 20ac2  CMP.L   D7,D5>                                           {}
            <MI 20ac4  BEQ     0x20ad2>                                         {}
        <POP 20ac6-20ad2 Naked>                              Σ0         ↓
            <Call 0x20ac6 0x20846>                                              {}
            <Call 0x20ac8 0x20800>                                              {}
            <Const 0x20aca 0x2d.2>                           Δ-2                {[#45]}
            <Call 0x20acc 0x20390>                                              {[#45]}
            <POP 20ad0-20ad2 StackAdj>                       Δ+2                {}
        <POP 20ad2-20ae2 Naked>                              Σ0         ↓ →0x20aa6 ←0x20aa6
            <MI 20ad2  ADD.L   D5,D5>                                           {}
            <MI 20ad4  ADDQ.L  #0x1,D5>                                         {}
            <MI 20ad6  ANDI.L  #0x0000ffff,D5>                                  {}
            <MI 20adc  ADDQ.L  #0x1,D6>                                         {}
            <MI 20ade  CMP.L   #0x0f,D6>                                        {}
            <MI 20ae0  BLE     0x20aa6>                                         {}
        <POP 20ae2-20ae6 Naked>                              Σ0         ↓
            <Call 0x20ae2 0x20846>                                              {}
            <MI 20ae4  MOVEQ.L #0x00,D6>                                        {}
        <POP 20ae6-20afe Naked>                              Σ0         ↓ →0x20ae6 ←0x20ae6
            <MI 20ae6  MOVE.L  D6,D7>                                           {}
            <MI 20ae8  MOVE.L  D6,D7>                                           {}
            <MI 20aea  ASL.L   #0x8,D7>                                         {}
            <MI 20aec  ADD.L   D6,D7>                                           {}
            <MI 20aee  MOVE.L  D7,-(A7)>                     Δ-4                {[4, 'D7']}
            <Call 0x20af0 0x20888>                                              {[4, 'D7']}
            <POP 20af2-20af4 StackAdj>                       Δ+4                {}
            <MI 20af4  ADDQ.L  #0x1,D6>                                         {}
            <MI 20af6  CMPI.L  #0x000000ff,D6>                                  {}
            <MI 20afc  BLE     0x20ae6>                                         {}
        <POP 20afe-20b00 Naked>                              Σ0         ↓
            <MI 20afe  MOVEQ.L #0x00,D6>                                        {}
        <POP 20b00-20b0e Naked>                              Σ0         ↓ →0x20b18 ←0x20b26
            <Pointer.fp 0x20b00 <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Call 0x20b02 0x20ff4>                                              {[@@-12]}
                exp_READ_RESPONSE_QUEUE_FIFO.IOC(&Sr_2)
            <POP 20b04-20b06 StackAdj>                       Δ+4                {}
            <MI 20b06  CLR.L   D0>                                              {}
            <MI 20b08  MOVE.B  (A6-0xc),D0>                                     {}
            <MI 20b0a  CMP.L   D0,D6>                                           {}
            <MI 20b0c  BNE     0x20b18>                                         {}
        <POP 20b0e-20b18 Naked>                              Σ0         ↓ →0x20b26
            <MI 20b0e  CLR.L   D0>                                              {}
            <MI 20b10  MOVE.B  (A6-0xb),D0>                                     {}
            <MI 20b14  CMP.L   D0,D6>                                           {}
            <MI 20b16  BEQ     0x20b26>                                         {}
        <POP 20b18-20b26 Naked>                              Σ0         ↓ ←0x20b00
            <Call 0x20b18 0x20846>                                              {}
            <Call 0x20b1a 0x20800>                                              {}
            <Const 0x20b1c 0x2e.2>                           Δ-2                {[#46]}
            <Call 0x20b20 0x20390>                                              {[#46]}
            <POP 20b24-20b26 StackAdj>                       Δ+2                {}
        <POP 20b26-20b30 Naked>                              Σ0         ↓ →0x20b00 ←0x20b0e
            <MI 20b26  ADDQ.L  #0x1,D6>                                         {}
            <MI 20b28  CMPI.L  #0x000000ff,D6>                                  {}
            <MI 20b2e  BLE     0x20b00>                                         {}
        <POP 20b30-20b34 Naked>                              Σ0         ↓
            <Call 0x20b30 0x20846>                                              {}
            <Call 0x20b32 0x20800>                                              {}
        <POP 20b34-20b3c Epilogue>                           Σ0         

0x20b3c


@ 20b3c
        <LVAR -0x007 @>
        <LVAR -0x00b @>
        <LVAR -0x00c @ 1(r)>
    <POP 20b3c-20b78 Body>                                              
        <POP 20b3c-20b4e Prologue>                           Σ0         ↓
        <POP 20b4e-20b6a Naked>                              Σ0         ↓ →0x20b74
            <Pointer.fp 0x20b4e <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Pointer.fp 0x20b52 <LVAR -0x00b @>>             Δ-4                {[@@-12]|[@@-11]}
            <Pointer.fp 0x20b56 <LVAR -0x007 @>>             Δ-4                {[@@-12]|[@@-11]|[@@-7]}
            <Call 0x20b5a 0x20ef8>                                              {[@@-12]|[@@-11]|[@@-7]}
                exp_TEST_MEMORY_DATA.IOC(&Fr, &Sr_4, &Sr_4)
            <POP 20b60-20b64 StackAdj>                       Δ+12               {}
            <MI 20b64  TST.B   (A6-0xc)>                                        {}
            <MI 20b68  BNE     0x20b74>                                         {}
        <POP 20b6a-20b74 Naked>                              Σ0         ↓
            <Const 0x20b6a 0x20.2>                           Δ-2                {[#32]}
            <Call 0x20b6e 0x20390>                                              {[#32]}
            <POP 20b72-20b74 StackAdj>                       Δ+2                {}
        <POP 20b74-20b78 Epilogue>                           Σ0         ←0x20b4e

0x20b78


@ 20b78
        <LVAR -0x00b @>
        <LVAR -0x00c @ 1(r)>
    <POP 20b78-20bfa Body>                                              
        <POP 20b78-20b8e Prologue>                           Σ0         ↓
        <POP 20b8e-20b96 RegCacheLoad>                       Σ0         ↓
        <POP 20b96-20ba4 Naked>                              Σ0         ↓ →0x20bac
            <Pointer.fp 0x20b96 <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Call 0x20b98 0x20e5a>                                              {[@@-12]}
                exp_TEST_MACRO_EVENT_SLICE.IOC(&Fr)
            <POP 20b9e-20ba0 StackAdj>                       Δ+4                {}
            <MI 20ba0  TST.B   (A6-0xc)>                                        {}
            <MI 20ba2  BNE     0x20bac>                                         {}
        <POP 20ba4-20bac Naked>                              Σ0         ↓
            <Const 0x20ba4 0x25.2>                           Δ-2                {[#37]}
            <Call 0x20ba8 0x20390>                                              {[#37]}
            <POP 20baa-20bac StackAdj>                       Δ+2                {}
        <POP 20bac-20bba Naked>                              Σ0         ↓ →0x20bc2 ←0x20b96
            <Pointer.fp 0x20bac <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Call 0x20bae 0x20ed0>                                              {[@@-12]}
                exp_TEST_MACRO_EVENT_DELAY.IOC(&Fr)
            <POP 20bb4-20bb6 StackAdj>                       Δ+4                {}
            <MI 20bb6  TST.B   (A6-0xc)>                                        {}
            <MI 20bb8  BNE     0x20bc2>                                         {}
        <POP 20bba-20bc2 Naked>                              Σ0         ↓
            <Const 0x20bba 0x26.2>                           Δ-2                {[#38]}
            <Call 0x20bbe 0x20390>                                              {[#38]}
            <POP 20bc0-20bc2 StackAdj>                       Δ+2                {}
        <POP 20bc2-20bd4 Naked>                              Σ0         ↓ →0x20bdc ←0x20bac
            <Pointer.fp 0x20bc2 <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Pointer.fp 0x20bc4 <LVAR -0x00b @>>             Δ-4                {[@@-12]|[@@-11]}
            <Call 0x20bc8 0x20ea8>                                              {[@@-12]|[@@-11]}
                exp_TEST_MICRO_EVENT_EXIT.IOC(&Fr, &Sr_8)
            <POP 20bce-20bd0 StackAdj>                       Δ+8                {}
            <MI 20bd0  TST.B   (A6-0xc)>                                        {}
            <MI 20bd2  BNE     0x20bdc>                                         {}
        <POP 20bd4-20bdc Naked>                              Σ0         ↓
            <Const 0x20bd4 0x28.2>                           Δ-2                {[#40]}
            <Call 0x20bd8 0x20390>                                              {[#40]}
            <POP 20bda-20bdc StackAdj>                       Δ+2                {}
        <POP 20bdc-20bea Naked>                              Σ0         ↓ →0x20bf2 ←0x20bc2
            <Pointer.fp 0x20bdc <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-12]}
            <Call 0x20bde 0x20f1c>                                              {[@@-12]}
                exp_TEST_IOC_CLOCKSTOP.IOC(&Fr)
            <POP 20be4-20be6 StackAdj>                       Δ+4                {}
            <MI 20be6  TST.B   (A6-0xc)>                                        {}
            <MI 20be8  BNE     0x20bf2>                                         {}
        <POP 20bea-20bf2 Naked>                              Σ0         ↓
            <Const 0x20bea 0x2a.2>                           Δ-2                {[#42]}
            <Call 0x20bee 0x20390>                                              {[#42]}
            <POP 20bf0-20bf2 StackAdj>                       Δ+2                {}
        <POP 20bf2-20bfa Epilogue>                           Σ0         ←0x20bdc

0x20bfa


@ 20bfa
    <POP 20bfa-20c10 Body>                                              
        <POP 20bfa-20c0c Prologue>                           Σ0         ↓
        <POP 20c0c-20c10 Epilogue>                           Σ0         

0x20c10


@ 20c10
START
    <POP 20c10--0001 Body>                                              
        <POP 20c10-20c1a Prologue>                           Σ0         
        <POP 20c1a-20c86 Naked>                              Σ0         ↓
            <Call 0x20c1a 0x10398>                                              {}
                FSCALL_10398
            <Const 0x20c20 0xf.4>                            Δ-4                {[##15]}
            <Call 0x20c24 0x104d8>                                              {[##15]}
                ExpInit(a : Long)
            <POP 20c2a-20c2c StackAdj>                       Δ+4                {}
            <Call 0x20c2c 0x202f8>                                              {}
            <Call 0x20c30 0x2044e>                                              {}
            <Call 0x20c34 0x204cc>                                              {}
            <Call 0x20c38 0x2054a>                                              {}
            <Call 0x20c3c 0x206dc>                                              {}
            <Call 0x20c40 0x20718>                                              {}
            <Call 0x20c44 0x20934>                                              {}
            <Call 0x20c48 0x20a30>                                              {}
            <Call 0x20c4c 0x20b78>                                              {}
            <Call 0x20c50 0x20bfa>                                              {}
            <Const 0x20c54 0x1.2>                            Δ-2                {[#1]}
            <Blob 0x20c58 [4] 0x210c6>                       Δ-4                {[#1]|[«4»]}
            <Blob 0x20c5e [4] 0x210ca>                       Δ-4                {[#1]|[«4»]|[«4»]}
            <Blob 0x20c64 [2] 0x210ce>                       Δ-2                {[#1]|[«4»]|[«4»]|[«2»]}
            <Blob 0x20c6a [8] 0x210cf>                       Δ-8                {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
            <Call 0x20c7c 0x1054a>                                              {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20c82-20c86 StackAdj>                       Δ+20               {}
        <POP 20c86-20c8c Naked>                              Σ0         
            <Call 0x20c86 0x10284>                                              {}
                ?exit

0x21054


@ 21054
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 21054-210bc Body>                                              
        <POP 21054-2106a Prologue>                           Σ0         ↓
        <POP 2106a-210b4 Naked>                              Σ0         ↓
            <Blob 0x2106a [14] @>                            Δ-14               {[«14""»]}
            <Const 0x21076 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 2107a-2107c StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x2107c 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 2108e-21090 StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21090  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21094  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21096  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 21098  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x2109a 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 210a0-210a2 StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x210a2 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 210a8-210aa StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x210aa 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 210b0-210b4 StackAdj>                       Δ+20               {}
        <POP 210b4-210bc Epilogue>                           Σ0         

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.589904cd9d2fbf11
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 0c 10              |        |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 10 e0              |        |		.PTR	0x210e0
00020010					code.end:
00020010 00 02 10 bc              |        |		.PTR	0x210bc
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 10 54              |   T    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 01 bc              |        |		.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 50 32 49 4f 43 20        |P2IOC   |		.TXT	'P2IOC '
00020164 6e 6f 74 20 61 73 73 65  |not asse|		.TXT	'not asserted\not asserted\'
0002017e 6e 6f 74 20 61 73 73 65  |not asse|		.TXT	'not asserted\asserted\'
00020194 61 73 73 65 72 74 65 64  |asserted|		.TXT	'asserted\not asserted\'
000201aa 61 73 73 65 72 74 65 64  |asserted|		.TXT	'asserted\asserted\'
000201bc ; --------------------------------------------------------------------------------------
000201bc ; OMSI PASCAL Function
000201bc ;    <LVAR  0x00e 1(r)>
000201bc ;    <LVAR  0x00a 4(r)>
000201bc ;    <LVAR  0x008 1(r)>
000201bc ; --------------------------------------------------------------------------------------
000201bc					EXP_FAIL:
000201bc 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
000201c0 bf d5                    |        |		CMPA.L	(A5),A7
000201c2 62 06                    |b       |		BHI	0x201ca
000201c4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000201c8 4e 76                    |Nv      |		TRAPV
000201ca de fc 00 74              |   t    |		ADDA.W	#0x74,A7
000201ce 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
000201d2 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
000201d8 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
000201de 72 01                    |r       |		MOVEQ.L	#0x01,D1
000201e0 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
000201e2 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
000201e4 78 12                    |x       |		MOVEQ.L	#0x12,D4
000201e6 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
000201e8 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
000201ee 41 fa ff 56              |A  V    |		LEA.L	0x20146,A0
000201f2 70 08                    |p       |		MOVEQ.L	#0x08,D0
000201f4 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000201f6 51 c8 ff fc              |Q       |		DBF	D0,0x201f4
000201fa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000201fc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020200 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020202 3f 04                    |?       |		MOVE.W	D4,-(A7)
00020204 4e 93                    |N       |		JSR	(A3)
00020206 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020208 4e 94                    |N       |		JSR	(A4)
0002020a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002020c 20 4f                    | O      |		MOVEA.L	A7,A0
0002020e 43 fa fe fa              |C       |		LEA.L	0x2010a,A1
00020212 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020214 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020216 51 c8 ff fc              |Q       |		DBF	D0,0x20214
0002021a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002021c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020220 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020222 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020224 4e 93                    |N       |		JSR	(A3)
00020226 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020228 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
0002022c 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
00020232 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020234 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002023a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002023c 4e 94                    |N       |		JSR	(A4)
0002023e de c4                    |        |		ADDA.W	D4,A7
00020240 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
00020244 b0 c1                    |        |		CMPA.W	D1,A0
00020246 67 48                    |gH      |		BEQ	0x20290
00020248 9e c5                    |        |		SUBA.W	D5,A7
0002024a 22 4f                    |"O      |		MOVEA.L	A7,A1
0002024c 45 fa fe ca              |E       |		LEA.L	0x20118,A2
00020250 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020252 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020254 51 c8 ff fc              |Q       |		DBF	D0,0x20252
00020258 9e c3                    |        |		SUBA.W	D3,A7
0002025a 22 4f                    |"O      |		MOVEA.L	A7,A1
0002025c 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
00020260 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
00020262 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00020264 51 c8 ff fc              |Q       |		DBF	D0,0x20262
00020268 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002026a 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
0002026e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020270 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020272 4e 93                    |N       |		JSR	(A3)
00020274 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020276 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
0002027a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002027c 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002027e 4e 93                    |N       |		JSR	(A3)
00020280 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020282 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020288 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002028a 4e 94                    |N       |		JSR	(A4)
0002028c de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00020290 9e c5                    |        |		SUBA.W	D5,A7
00020292 20 4f                    | O      |		MOVEA.L	A7,A0
00020294 43 fa fe 90              |C       |		LEA.L	0x20126,A1
00020298 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002029a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002029c 51 c8 ff fc              |Q       |		DBF	D0,0x2029a
000202a0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202a2 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000202a6 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202a8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202aa 4e 93                    |N       |		JSR	(A3)
000202ac 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202ae 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000202b2 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
000202b8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202ba 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000202c0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202c2 4e 94                    |N       |		JSR	(A4)
000202c4 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000202c6 20 4f                    | O      |		MOVEA.L	A7,A0
000202c8 43 fa fe 7c              |C  |    |		LEA.L	0x20146,A1
000202cc 70 16                    |p       |		MOVEQ.L	#0x16,D0
000202ce 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000202d0 51 c8 ff fc              |Q       |		DBF	D0,0x202ce
000202d4 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000202d8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000202da 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000202de 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202e0 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
000202e4 4e 93                    |N       |		JSR	(A3)
000202e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202e8 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000202ee de c3                    |        |		ADDA.W	D3,A7
000202f0 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
000202f4 4e 5e                    |N^      |		UNLK	A6
000202f6 4e 75                    |Nu      |		RTS
000202f8 ; --------------------------------------------------------------------------------------
000202f8 ; OMSI PASCAL Function
000202f8 ; --------------------------------------------------------------------------------------
000202f8 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
000202fc bf d5                    |        |		CMPA.L	(A5),A7
000202fe 62 06                    |b       |		BHI	0x20306
00020300 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020304 4e 76                    |Nv      |		TRAPV
00020306 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
0002030a 48 e7 c1 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D1+D0,-(A7)
0002030e 45 f9 00 02 10 c5        |E       |		LEA.L	0x210c5,A2
00020314 72 07                    |r       |		MOVEQ.L	#0x07,D1
00020316 48 79 00 02 10 c4        |Hy      |		PEA.L	0x210c4
0002031c 48 52                    |HR      |		PEA.L	(A2)
0002031e 4e b9 00 01 05 44        |N    D  |		JSR	IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
00020324 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020326 1e 92                    |        |		MOVE.B	(A2),(A7)
00020328 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
0002032e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020330 20 4f                    | O      |		MOVEA.L	A7,A0
00020332 43 fa fe 2a              |C  *    |		LEA.L	0x2015e,A1
00020336 70 04                    |p       |		MOVEQ.L	#0x04,D0
00020338 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002033a 51 c8 ff fc              |Q       |		DBF	D0,0x20338
0002033e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020340 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020344 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020348 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
0002034c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020352 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020354 23 df 00 02 10 c6        |#       |		MOVE.L	(A7)+,0x210c6
0002035a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002035c 48 79 00 02 10 ca        |Hy      |		PEA.L	0x210ca
00020362 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00020368 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002036a 42 39 00 02 10 ce        |B9      |		CLR.B	0x210ce
00020370 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020372 be 81                    |        |		CMP.L	D1,D7
00020374 63 02                    |c       |		BLS	0x20378
00020376 4e 4f                    |NO      |		TRAP	#15
00020378 41 f9 00 02 10 bc        |A       |		LEA.L	0x210bc,A0
0002037e 42 30 78 13              |B0x     |		CLR.B	(A0+D7.L+#0x13)
00020382 52 87                    |R       |		ADDQ.L	#0x1,D7
00020384 be 81                    |        |		CMP.L	D1,D7
00020386 6f ea                    |o       |		BLE	0x20372
00020388 4c df 07 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2
0002038c 4e 5e                    |N^      |		UNLK	A6
0002038e 4e 75                    |Nu      |		RTS
00020390 ; --------------------------------------------------------------------------------------
00020390 ; OMSI PASCAL Function
00020390 ;    <LVAR  0x008 1(r)>
00020390 ; --------------------------------------------------------------------------------------
00020390 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00020394 bf d5                    |        |		CMPA.L	(A5),A7
00020396 62 06                    |b       |		BHI	0x2039e
00020398 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002039c 4e 76                    |Nv      |		TRAPV
0002039e de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
000203a2 48 e7 80 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D0,-(A7)
000203a6 45 f9 00 02 10 ce        |E       |		LEA.L	0x210ce,A2
000203ac 47 f9 00 02 10 cf        |G       |		LEA.L	0x210cf,A3
000203b2 14 ae 00 08              |        |		MOVE.B	(A6+0x8),(A2)
000203b6 16 bc 00 2b              |   +    |		MOVE.B	#0x2b,(A3)
000203ba 42 27                    |B'      |		CLR.B	-(A7)
000203bc 2f 39 00 02 10 c6        |/9      |		MOVE.L	0x210c6,-(A7)
000203c2 2f 39 00 02 10 ca        |/9      |		MOVE.L	0x210ca,-(A7)
000203c8 1f 12                    |        |		MOVE.B	(A2),-(A7)
000203ca 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000203cc 20 4f                    | O      |		MOVEA.L	A7,A0
000203ce 22 4b                    |"K      |		MOVEA.L	A3,A1
000203d0 70 07                    |p       |		MOVEQ.L	#0x07,D0
000203d2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000203d4 51 c8 ff fc              |Q       |		DBF	D0,0x203d2
000203d8 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
000203de de fc 00 14              |        |		ADDA.W	#0x14,A7
000203e2 4c df 0f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3
000203e6 4e 5e                    |N^      |		UNLK	A6
000203e8 4e 75                    |Nu      |		RTS
000203ea ; --------------------------------------------------------------------------------------
000203ea ; OMSI PASCAL Function
000203ea ;    <LVAR  0x008 4(r)>
000203ea ; --------------------------------------------------------------------------------------
000203ea 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
000203ee bf d5                    |        |		CMPA.L	(A5),A7
000203f0 62 06                    |b       |		BHI	0x203f8
000203f2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000203f6 4e 76                    |Nv      |		TRAPV
000203f8 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
000203fc 48 e7 80 e0              |H       |		MOVEM.L	A2+A1+A0+D0,-(A7)
00020400 45 f9 00 02 10 cf        |E       |		LEA.L	0x210cf,A2
00020406 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
0002040a 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00020410 63 02                    |c       |		BLS	0x20414
00020412 4e 4f                    |NO      |		TRAP	#15
00020414 13 c0 00 02 10 ce        |        |		MOVE.B	D0,0x210ce
0002041a 14 bc 00 2b              |   +    |		MOVE.B	#0x2b,(A2)
0002041e 42 27                    |B'      |		CLR.B	-(A7)
00020420 2f 39 00 02 10 c6        |/9      |		MOVE.L	0x210c6,-(A7)
00020426 2f 39 00 02 10 ca        |/9      |		MOVE.L	0x210ca,-(A7)
0002042c 1f 00                    |        |		MOVE.B	D0,-(A7)
0002042e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020430 20 4f                    | O      |		MOVEA.L	A7,A0
00020432 22 4a                    |"J      |		MOVEA.L	A2,A1
00020434 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020436 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020438 51 c8 ff fc              |Q       |		DBF	D0,0x20436
0002043c 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020442 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020446 4c df 07 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2
0002044a 4e 5e                    |N^      |		UNLK	A6
0002044c 4e 75                    |Nu      |		RTS
0002044e ; --------------------------------------------------------------------------------------
0002044e ; OMSI PASCAL Function
0002044e ;    <LVAR -0x005 @>
0002044e ;    <LVAR -0x007 @>
0002044e ;    <LVAR -0x008 @ 1(r)>
0002044e ; --------------------------------------------------------------------------------------
0002044e 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
00020452 bf d5                    |        |		CMPA.L	(A5),A7
00020454 62 06                    |b       |		BHI	0x2045c
00020456 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002045a 4e 76                    |Nv      |		TRAPV
0002045c de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00020460 48 e7 80 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D0,-(A7)
00020464 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
00020468 43 ee ff f9              |C       |		LEA.L	(A6-0x7),A1
0002046c 45 ee ff fb              |E       |		LEA.L	(A6-0x5),A2
00020470 47 fa ff 1e              |G       |		LEA.L	0x20390,A3
00020474 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020476 48 50                    |HP      |		PEA.L	(A0)
00020478 48 51                    |HQ      |		PEA.L	(A1)
0002047a 48 52                    |HR      |		PEA.L	(A2)
0002047c 4e b9 00 02 0c b6        |N       |		JSR	exp_TEST_WCS_DATA.IOC(&Fr, &Sr_2, &Sr_2)
00020482 de c0                    |        |		ADDA.W	D0,A7
00020484 4a 10                    |J       |		TST.B	(A0)
00020486 66 08                    |f       |		BNE	0x20490
00020488 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
0002048c 4e 93                    |N       |		JSR	(A3)
0002048e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020490 48 50                    |HP      |		PEA.L	(A0)
00020492 48 51                    |HQ      |		PEA.L	(A1)
00020494 48 52                    |HR      |		PEA.L	(A2)
00020496 4e b9 00 02 0c fa        |N       |		JSR	exp_TEST_WCS_ADDRESSING.IOC(&Fr, &Sr_2, &Sr_2)
0002049c de c0                    |        |		ADDA.W	D0,A7
0002049e 4a 10                    |J       |		TST.B	(A0)
000204a0 66 08                    |f       |		BNE	0x204aa
000204a2 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000204a6 4e 93                    |N       |		JSR	(A3)
000204a8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000204aa 48 50                    |HP      |		PEA.L	(A0)
000204ac 48 51                    |HQ      |		PEA.L	(A1)
000204ae 48 52                    |HR      |		PEA.L	(A2)
000204b0 4e b9 00 02 0c d8        |N       |		JSR	exp_TEST_WCS_BITS.IOC(&Fr, &Sr_2, &Sr_2)
000204b6 de c0                    |        |		ADDA.W	D0,A7
000204b8 4a 10                    |J       |		TST.B	(A0)
000204ba 66 08                    |f       |		BNE	0x204c4
000204bc 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
000204c0 4e 93                    |N       |		JSR	(A3)
000204c2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000204c4 4c df 0f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3
000204c8 4e 5e                    |N^      |		UNLK	A6
000204ca 4e 75                    |Nu      |		RTS
000204cc ; --------------------------------------------------------------------------------------
000204cc ; OMSI PASCAL Function
000204cc ;    <LVAR -0x005 @>
000204cc ;    <LVAR -0x007 @>
000204cc ;    <LVAR -0x008 @ 1(r)>
000204cc ; --------------------------------------------------------------------------------------
000204cc 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
000204d0 bf d5                    |        |		CMPA.L	(A5),A7
000204d2 62 06                    |b       |		BHI	0x204da
000204d4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204d8 4e 76                    |Nv      |		TRAPV
000204da de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000204de 48 e7 80 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D0,-(A7)
000204e2 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
000204e6 43 ee ff f9              |C       |		LEA.L	(A6-0x7),A1
000204ea 45 ee ff fb              |E       |		LEA.L	(A6-0x5),A2
000204ee 47 fa fe a0              |G       |		LEA.L	0x20390,A3
000204f2 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000204f4 48 50                    |HP      |		PEA.L	(A0)
000204f6 48 51                    |HQ      |		PEA.L	(A1)
000204f8 48 52                    |HR      |		PEA.L	(A2)
000204fa 4e b9 00 02 0d 22        |N    "  |		JSR	exp_TEST_TRACE_DATA.IOC(&Fr, &Sr_2, &Sr_2)
00020500 de c0                    |        |		ADDA.W	D0,A7
00020502 4a 10                    |J       |		TST.B	(A0)
00020504 66 08                    |f       |		BNE	0x2050e
00020506 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
0002050a 4e 93                    |N       |		JSR	(A3)
0002050c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002050e 48 50                    |HP      |		PEA.L	(A0)
00020510 48 51                    |HQ      |		PEA.L	(A1)
00020512 48 52                    |HR      |		PEA.L	(A2)
00020514 4e b9 00 02 0d 6a        |N    j  |		JSR	exp_TEST_TRACE_ADDRESSING.IOC(&Fr, &Sr_2, &Sr_2)
0002051a de c0                    |        |		ADDA.W	D0,A7
0002051c 4a 10                    |J       |		TST.B	(A0)
0002051e 66 08                    |f       |		BNE	0x20528
00020520 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
00020524 4e 93                    |N       |		JSR	(A3)
00020526 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020528 48 50                    |HP      |		PEA.L	(A0)
0002052a 48 51                    |HQ      |		PEA.L	(A1)
0002052c 48 52                    |HR      |		PEA.L	(A2)
0002052e 4e b9 00 02 0d 46        |N    F  |		JSR	exp_TEST_TRACE_BITS.IOC(&Fr, &Sr_2, &Sr_2)
00020534 de c0                    |        |		ADDA.W	D0,A7
00020536 4a 10                    |J       |		TST.B	(A0)
00020538 66 08                    |f       |		BNE	0x20542
0002053a 1f 3c 00 06              | <      |		MOVE.B	#0x06,-(A7)
0002053e 4e 93                    |N       |		JSR	(A3)
00020540 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020542 4c df 0f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3
00020546 4e 5e                    |N^      |		UNLK	A6
00020548 4e 75                    |Nu      |		RTS
0002054a ; --------------------------------------------------------------------------------------
0002054a ; OMSI PASCAL Function
0002054a ;    <LVAR -0x002 @>
0002054a ;    <LVAR -0x003 @ 1(r)>
0002054a ;    <LVAR -0x004 @ 1(r)>
0002054a ; --------------------------------------------------------------------------------------
0002054a 4e 56 ff a2              |NV      |		LINK.W	A6,#0xffa2
0002054e bf d5                    |        |		CMPA.L	(A5),A7
00020550 62 06                    |b       |		BHI	0x20558
00020552 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020556 4e 76                    |Nv      |		TRAPV
00020558 de fc 00 5a              |   Z    |		ADDA.W	#0x5a,A7
0002055c 48 e7 fe f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020560 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
00020564 45 ee ff fd              |E       |		LEA.L	(A6-0x3),A2
00020568 47 f9 00 02 10 ca        |G       |		LEA.L	0x210ca,A3
0002056e 49 ee ff fe              |I       |		LEA.L	(A6-0x2),A4
00020572 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
00020574 74 01                    |t       |		MOVEQ.L	#0x01,D2
00020576 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
00020578 78 16                    |x       |		MOVEQ.L	#0x16,D4
0002057a 7a 1a                    |z       |		MOVEQ.L	#0x1a,D5
0002057c 7c 12                    ||       |		MOVEQ.L	#0x12,D6
0002057e 48 51                    |HQ      |		PEA.L	(A1)
00020580 48 52                    |HR      |		PEA.L	(A2)
00020582 48 54                    |HT      |		PEA.L	(A4)
00020584 4e b9 00 02 0f cc        |N       |		JSR	exp_TEST_ADDRESS_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
0002058a de c1                    |        |		ADDA.W	D1,A7
0002058c 4a 11                    |J       |		TST.B	(A1)
0002058e 66 10                    |f       |		BNE	0x205a0
00020590 42 80                    |B       |		CLR.L	D0
00020592 10 12                    |        |		MOVE.B	(A2),D0
00020594 5e 40                    |^@      |		ADDQ.W	#0x7,D0
00020596 48 c0                    |H       |		EXTW.L	D0
00020598 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002059a 4e ba fe 4e              |N  N    |		JSR	0x203ea
0002059e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205a0 48 51                    |HQ      |		PEA.L	(A1)
000205a2 48 52                    |HR      |		PEA.L	(A2)
000205a4 48 54                    |HT      |		PEA.L	(A4)
000205a6 4e b9 00 02 0f 40        |N    @  |		JSR	exp_TEST_FIU_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
000205ac de c1                    |        |		ADDA.W	D1,A7
000205ae 4a 11                    |J       |		TST.B	(A1)
000205b0 66 12                    |f       |		BNE	0x205c4
000205b2 42 80                    |B       |		CLR.L	D0
000205b4 10 12                    |        |		MOVE.B	(A2),D0
000205b6 06 40 00 0b              | @      |		ADDI.W	#0x000b,D0
000205ba 48 c0                    |H       |		EXTW.L	D0
000205bc 2f 00                    |/       |		MOVE.L	D0,-(A7)
000205be 4e ba fe 2a              |N  *    |		JSR	0x203ea
000205c2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205c4 48 51                    |HQ      |		PEA.L	(A1)
000205c6 48 52                    |HR      |		PEA.L	(A2)
000205c8 48 54                    |HT      |		PEA.L	(A4)
000205ca 4e b9 00 02 0e 06        |N       |		JSR	exp_TEST_TV_0_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
000205d0 de c1                    |        |		ADDA.W	D1,A7
000205d2 4a 11                    |J       |		TST.B	(A1)
000205d4 66 32                    |f2      |		BNE	0x20608
000205d6 41 fa fb a6              |A       |		LEA.L	0x2017e,A0
000205da 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000205dc 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000205de 51 c8 ff fc              |Q       |		DBF	D0,0x205dc
000205e2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000205e4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000205e8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000205ea 3f 05                    |?       |		MOVE.W	D5,-(A7)
000205ec 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000205f2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000205f4 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
000205f6 de c5                    |        |		ADDA.W	D5,A7
000205f8 42 80                    |B       |		CLR.L	D0
000205fa 10 12                    |        |		MOVE.B	(A2),D0
000205fc d0 43                    | C      |		ADD.W	D3,D0
000205fe 48 c0                    |H       |		EXTW.L	D0
00020600 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020602 4e ba fd e6              |N       |		JSR	0x203ea
00020606 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020608 48 51                    |HQ      |		PEA.L	(A1)
0002060a 48 52                    |HR      |		PEA.L	(A2)
0002060c 48 54                    |HT      |		PEA.L	(A4)
0002060e 4e b9 00 02 0d e0        |N       |		JSR	exp_TEST_TV_1_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
00020614 de c1                    |        |		ADDA.W	D1,A7
00020616 4a 11                    |J       |		TST.B	(A1)
00020618 66 32                    |f2      |		BNE	0x2064c
0002061a 41 fa fb 78              |A  x    |		LEA.L	0x20194,A0
0002061e 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00020620 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020622 51 c8 ff fc              |Q       |		DBF	D0,0x20620
00020626 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020628 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002062c 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002062e 3f 04                    |?       |		MOVE.W	D4,-(A7)
00020630 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020636 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020638 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
0002063a de c4                    |        |		ADDA.W	D4,A7
0002063c 42 80                    |B       |		CLR.L	D0
0002063e 10 12                    |        |		MOVE.B	(A2),D0
00020640 d0 43                    | C      |		ADD.W	D3,D0
00020642 48 c0                    |H       |		EXTW.L	D0
00020644 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020646 4e ba fd a2              |N       |		JSR	0x203ea
0002064a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002064c 48 51                    |HQ      |		PEA.L	(A1)
0002064e 48 52                    |HR      |		PEA.L	(A2)
00020650 48 54                    |HT      |		PEA.L	(A4)
00020652 4e b9 00 02 0d ba        |N       |		JSR	exp_TEST_TV_2_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
00020658 de c1                    |        |		ADDA.W	D1,A7
0002065a 4a 11                    |J       |		TST.B	(A1)
0002065c 66 32                    |f2      |		BNE	0x20690
0002065e 41 fa fb 4a              |A  J    |		LEA.L	0x201aa,A0
00020662 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00020664 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020666 51 c8 ff fc              |Q       |		DBF	D0,0x20664
0002066a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002066c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020670 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020672 3f 04                    |?       |		MOVE.W	D4,-(A7)
00020674 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002067a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002067c 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
0002067e de c4                    |        |		ADDA.W	D4,A7
00020680 42 80                    |B       |		CLR.L	D0
00020682 10 12                    |        |		MOVE.B	(A2),D0
00020684 d0 43                    | C      |		ADD.W	D3,D0
00020686 48 c0                    |H       |		EXTW.L	D0
00020688 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002068a 4e ba fd 5e              |N  ^    |		JSR	0x203ea
0002068e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020690 48 51                    |HQ      |		PEA.L	(A1)
00020692 48 52                    |HR      |		PEA.L	(A2)
00020694 48 54                    |HT      |		PEA.L	(A4)
00020696 4e b9 00 02 0d 94        |N       |		JSR	exp_TEST_TV_3_ENABLES.IOC(&Fr, &Sr_1, &Sr_1)
0002069c de c1                    |        |		ADDA.W	D1,A7
0002069e 4a 11                    |J       |		TST.B	(A1)
000206a0 66 32                    |f2      |		BNE	0x206d4
000206a2 41 fa fb 18              |A       |		LEA.L	EXP_FAIL,A0
000206a6 70 08                    |p       |		MOVEQ.L	#0x08,D0
000206a8 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000206aa 51 c8 ff fc              |Q       |		DBF	D0,0x206a8
000206ae 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000206b0 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000206b4 3f 02                    |?       |		MOVE.W	D2,-(A7)
000206b6 3f 06                    |?       |		MOVE.W	D6,-(A7)
000206b8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000206be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000206c0 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
000206c2 de c6                    |        |		ADDA.W	D6,A7
000206c4 42 80                    |B       |		CLR.L	D0
000206c6 10 12                    |        |		MOVE.B	(A2),D0
000206c8 d0 43                    | C      |		ADD.W	D3,D0
000206ca 48 c0                    |H       |		EXTW.L	D0
000206cc 2f 00                    |/       |		MOVE.L	D0,-(A7)
000206ce 4e ba fd 1a              |N       |		JSR	0x203ea
000206d2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000206d4 4c df 1f 7f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4
000206d8 4e 5e                    |N^      |		UNLK	A6
000206da 4e 75                    |Nu      |		RTS
000206dc ; --------------------------------------------------------------------------------------
000206dc ; OMSI PASCAL Function
000206dc ;    <LVAR -0x009 @>
000206dc ;    <LVAR -0x00f @>
000206dc ;    <LVAR -0x010 @ 1(r)>
000206dc ; --------------------------------------------------------------------------------------
000206dc 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
000206e0 bf d5                    |        |		CMPA.L	(A5),A7
000206e2 62 06                    |b       |		BHI	0x206ea
000206e4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000206e8 4e 76                    |Nv      |		TRAPV
000206ea de fc 00 10              |        |		ADDA.W	#0x10,A7
000206ee 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
000206f2 48 6e ff f1              |Hn      |		PEA.L	(A6-0xf)
000206f6 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
000206fa 4e b9 00 02 0f a6        |N       |		JSR	exp_TEST_COUNTER_DATA.IOC(&Fr, &Sr_6, &Sr_6)
00020700 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020704 4a 2e ff f0              |J.      |		TST.B	(A6-0x10)
00020708 66 0a                    |f       |		BNE	0x20714
0002070a 1f 3c 00 1f              | <      |		MOVE.B	#0x1f,-(A7)
0002070e 4e ba fc 80              |N       |		JSR	0x20390
00020712 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020714 4e 5e                    |N^      |		UNLK	A6
00020716 4e 75                    |Nu      |		RTS
00020718 ; --------------------------------------------------------------------------------------
00020718 ; OMSI PASCAL Function
00020718 ;    <LVAR -0x005 @>
00020718 ;    <LVAR -0x006 @>
00020718 ;    <LVAR -0x008 @>
00020718 ;    <LVAR -0x009 @>
00020718 ;    <LVAR -0x00b @>
00020718 ;    <LVAR -0x013 @>
00020718 ;    <LVAR -0x01b @>
00020718 ;    <LVAR -0x01c @ 1(r)>
00020718 ; --------------------------------------------------------------------------------------
00020718 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
0002071c bf d5                    |        |		CMPA.L	(A5),A7
0002071e 62 06                    |b       |		BHI	0x20726
00020720 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020724 4e 76                    |Nv      |		TRAPV
00020726 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002072a 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
0002072e 41 ee ff e4              |A       |		LEA.L	(A6-0x1c),A0
00020732 43 fa fc 5c              |C  \    |		LEA.L	0x20390,A1
00020736 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020738 48 50                    |HP      |		PEA.L	(A0)
0002073a 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002073e 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020742 4e b9 00 02 0f 84        |N       |		JSR	exp_TEST_CHECKBITS.IOC(&Fr, &Sr_2, &Sr_2)
00020748 de c0                    |        |		ADDA.W	D0,A7
0002074a 4a 10                    |J       |		TST.B	(A0)
0002074c 66 08                    |f       |		BNE	0x20756
0002074e 1f 3c 00 22              | < "    |		MOVE.B	#0x22,-(A7)
00020752 4e 91                    |N       |		JSR	(A1)
00020754 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020756 48 50                    |HP      |		PEA.L	(A0)
00020758 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
0002075c 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020760 4e b9 00 02 0e 2c        |N    ,  |		JSR	exp_TEST_SYNDROME_TRANSCEIVER.IOC(&Fr, &Sr_1, &Sr_1)
00020766 de c0                    |        |		ADDA.W	D0,A7
00020768 4a 10                    |J       |		TST.B	(A0)
0002076a 66 08                    |f       |		BNE	0x20774
0002076c 1f 3c 00 24              | < $    |		MOVE.B	#0x24,-(A7)
00020770 4e 91                    |N       |		JSR	(A1)
00020772 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020774 48 50                    |HP      |		PEA.L	(A0)
00020776 48 6e ff e5              |Hn      |		PEA.L	(A6-0x1b)
0002077a 48 6e ff ed              |Hn      |		PEA.L	(A6-0x13)
0002077e 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
00020782 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00020786 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
0002078a 4e b9 00 02 0f 64        |N    d  |		JSR	exp_TEST_ECC.IOC(&Fr, &Sr_8, &Sr_8, &Sr_2, &Sr_1, &Sr_1)
00020790 de fc 00 18              |        |		ADDA.W	#0x18,A7
00020794 4a 10                    |J       |		TST.B	(A0)
00020796 66 08                    |f       |		BNE	0x207a0
00020798 1f 3c 00 21              | < !    |		MOVE.B	#0x21,-(A7)
0002079c 4e 91                    |N       |		JSR	(A1)
0002079e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000207a0 48 50                    |HP      |		PEA.L	(A0)
000207a2 4e b9 00 02 0e 82        |N       |		JSR	exp_TEST_MULTIBIT_ERROR.IOC(&Fr)
000207a8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000207aa 4a 10                    |J       |		TST.B	(A0)
000207ac 66 08                    |f       |		BNE	0x207b6
000207ae 1f 3c 00 23              | < #    |		MOVE.B	#0x23,-(A7)
000207b2 4e 91                    |N       |		JSR	(A1)
000207b4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000207b6 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
000207ba 4e 5e                    |N^      |		UNLK	A6
000207bc 4e 75                    |Nu      |		RTS
000207be ; --------------------------------------------------------------------------------------
000207be ; OMSI PASCAL Function
000207be ;    <LVAR -0x004 @ 4(r)>
000207be ; --------------------------------------------------------------------------------------
000207be 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
000207c2 bf d5                    |        |		CMPA.L	(A5),A7
000207c4 62 06                    |b       |		BHI	0x207cc
000207c6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000207ca 4e 76                    |Nv      |		TRAPV
000207cc de fc 00 16              |        |		ADDA.W	#0x16,A7
000207d0 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
000207d4 42 ae ff fc              |B       |		CLR.L	(A6-0x4)
000207d8 41 ee ff fc              |A       |		LEA.L	(A6-0x4),A0
000207dc 2f 08                    |/       |		MOVE.L	A0,-(A7)
000207de 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000207e2 48 78 f3 00              |Hx      |		PEA.L	0xfffff300
000207e6 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
000207ea 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
000207ee 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
000207f4 de fc 00 0e              |        |		ADDA.W	#0xe,A7
000207f8 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
000207fc 4e 5e                    |N^      |		UNLK	A6
000207fe 4e 75                    |Nu      |		RTS
00020800 ; --------------------------------------------------------------------------------------
00020800 ; OMSI PASCAL Function
00020800 ;    <LVAR -0x004 @ 4(w)>
00020800 ; --------------------------------------------------------------------------------------
00020800 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6		; Spelunked
00020804 bf d5                    |        |		CMPA.L	(A5),A7
00020806 62 06                    |b       |		BHI	0x2080e
00020808 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002080c 4e 76                    |Nv      |		TRAPV
0002080e de fc 00 16              |        |		ADDA.W	#0x16,A7
00020812 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
00020816 2d 7c 00 00 00 02 ff fc  |-|      |		MOVE.L	#0x2,(A6-0x4)
0002081e 41 ee ff fc              |A       |		LEA.L	(A6-0x4),A0
00020822 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020824 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020828 48 78 f3 00              |Hx      |		PEA.L	0xfffff300
0002082c 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00020830 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020834 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
0002083a de fc 00 0e              |        |		ADDA.W	#0xe,A7
0002083e 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
00020842 4e 5e                    |N^      |		UNLK	A6
00020844 4e 75                    |Nu      |		RTS
00020846 ; --------------------------------------------------------------------------------------
00020846 ; OMSI PASCAL Function
00020846 ;    <LVAR -0x004 @ 4(r)>
00020846 ; --------------------------------------------------------------------------------------
00020846 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6		; Spelunked
0002084a bf d5                    |        |		CMPA.L	(A5),A7
0002084c 62 06                    |b       |		BHI	0x20854
0002084e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020852 4e 76                    |Nv      |		TRAPV
00020854 de fc 00 16              |        |		ADDA.W	#0x16,A7
00020858 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
0002085c 42 ae ff fc              |B       |		CLR.L	(A6-0x4)
00020860 41 ee ff fc              |A       |		LEA.L	(A6-0x4),A0
00020864 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020866 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002086a 48 78 f5 00              |Hx      |		PEA.L	0xfffff500
0002086e 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00020872 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020876 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
0002087c de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020880 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
00020884 4e 5e                    |N^      |		UNLK	A6
00020886 4e 75                    |Nu      |		RTS
00020888 ; --------------------------------------------------------------------------------------
00020888 ; OMSI PASCAL Function
00020888 ; --------------------------------------------------------------------------------------
00020888 4e 56 ff ea              |NV      |		LINK.W	A6,#0xffea		; Spelunked
0002088c bf d5                    |        |		CMPA.L	(A5),A7
0002088e 62 06                    |b       |		BHI	0x20896
00020890 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020894 4e 76                    |Nv      |		TRAPV
00020896 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002089a 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
0002089e 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
000208a2 2f 08                    |/       |		MOVE.L	A0,-(A7)
000208a4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000208a8 48 78 f6 00              |Hx      |		PEA.L	0xfffff600
000208ac 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
000208b0 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
000208b4 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
000208ba de fc 00 0e              |        |		ADDA.W	#0xe,A7
000208be 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
000208c2 4e 5e                    |N^      |		UNLK	A6
000208c4 4e 75                    |Nu      |		RTS
000208c6 ; --------------------------------------------------------------------------------------
000208c6 ; OMSI PASCAL Function
000208c6 ;    <LVAR  0x008 2(w)>
000208c6 ;    <LVAR -0x004 @ 4(r)>
000208c6 ; --------------------------------------------------------------------------------------
000208c6 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce		; Spelunked
000208ca bf d5                    |        |		CMPA.L	(A5),A7
000208cc 62 06                    |b       |		BHI	0x208d4
000208ce 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000208d2 4e 76                    |Nv      |		TRAPV
000208d4 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
000208d8 48 e7 f8 c0              |H       |		MOVEM.L	A1+A0+D4+D3+D2+D1+D0,-(A7)
000208dc 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
000208e0 72 01                    |r       |		MOVEQ.L	#0x01,D1
000208e2 74 05                    |t       |		MOVEQ.L	#0x05,D2
000208e4 76 04                    |v       |		MOVEQ.L	#0x04,D3
000208e6 78 0e                    |x       |		MOVEQ.L	#0x0e,D4
000208e8 42 91                    |B       |		CLR.L	(A1)
000208ea 20 49                    | I      |		MOVEA.L	A1,A0
000208ec 2f 08                    |/       |		MOVE.L	A0,-(A7)
000208ee 3f 01                    |?       |		MOVE.W	D1,-(A7)
000208f0 48 78 f7 00              |Hx      |		PEA.L	0xfffff700
000208f4 3f 02                    |?       |		MOVE.W	D2,-(A7)
000208f6 3f 03                    |?       |		MOVE.W	D3,-(A7)
000208f8 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
000208fe de c4                    |        |		ADDA.W	D4,A7
00020900 48 78 f1 00              |Hx      |		PEA.L	0xfffff100
00020904 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020906 20 49                    | I      |		MOVEA.L	A1,A0
00020908 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002090a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002090c 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002090e 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
00020914 de c4                    |        |		ADDA.W	D4,A7
00020916 20 11                    |        |		MOVE.L	(A1),D0
00020918 02 80 00 00 ff ff        |        |		ANDI.L	#0x0000ffff,D0
0002091e 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00020924 63 02                    |c       |		BLS	0x20928
00020926 4e 4f                    |NO      |		TRAP	#15
00020928 3d 40 00 08              |=@      |		MOVE.W	D0,(A6+0x8)
0002092c 4c df 03 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1
00020930 4e 5e                    |N^      |		UNLK	A6
00020932 4e 75                    |Nu      |		RTS
00020934 ; --------------------------------------------------------------------------------------
00020934 ; OMSI PASCAL Function
00020934 ;    <LVAR -0x007 1(w)>
00020934 ;    <LVAR -0x008 1(w) 2(r)>
00020934 ; --------------------------------------------------------------------------------------
00020934 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
00020938 bf d5                    |        |		CMPA.L	(A5),A7
0002093a 62 06                    |b       |		BHI	0x20942
0002093c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020940 4e 76                    |Nv      |		TRAPV
00020942 de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
00020946 48 e7 f7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7)
0002094a 41 fa fe fa              |A       |		LEA.L	0x20846,A0
0002094e 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
00020952 45 fa fe ac              |E       |		LEA.L	0x20800,A2
00020956 47 fa ff 6e              |G  n    |		LEA.L	0x208c6,A3
0002095a 49 fa fa 34              |I  4    |		LEA.L	0x20390,A4
0002095e 22 3c 00 00 00 ff        |"<      |		MOVE.L	#0xff,D1
00020964 74 2b                    |t+      |		MOVEQ.L	#0x2b,D2
00020966 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
00020968 4e ba fe 54              |N  T    |		JSR	0x207be
0002096c 4e 90                    |N       |		JSR	(A0)
0002096e 7c 01                    ||       |		MOVEQ.L	#0x01,D6
00020970 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020972 20 06                    |        |		MOVE.L	D6,D0
00020974 e0 88                    |        |		LSR.L	#0x8,D0
00020976 c0 81                    |        |		AND.L	D1,D0
00020978 12 80                    |        |		MOVE.B	D0,(A1)
0002097a 20 06                    |        |		MOVE.L	D6,D0
0002097c c0 81                    |        |		AND.L	D1,D0
0002097e b0 81                    |        |		CMP.L	D1,D0
00020980 63 02                    |c       |		BLS	0x20984
00020982 4e 4f                    |NO      |		TRAP	#15
00020984 1d 40 ff f9              | @      |		MOVE.B	D0,(A6-0x7)
00020988 3f 11                    |?       |		MOVE.W	(A1),-(A7)
0002098a 4e b9 00 02 0c 8c        |N       |		JSR	exp_WRITE_REQUEST_QUEUE_FIFO.IOC(Sw_2)
00020990 4e 93                    |N       |		JSR	(A3)
00020992 42 80                    |B       |		CLR.L	D0
00020994 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020996 bc 80                    |        |		CMP.L	D0,D6
00020998 67 0a                    |g       |		BEQ	0x209a4
0002099a 4e 90                    |N       |		JSR	(A0)
0002099c 4e 92                    |N       |		JSR	(A2)
0002099e 1f 02                    |        |		MOVE.B	D2,-(A7)
000209a0 4e 94                    |N       |		JSR	(A4)
000209a2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209a4 dc 86                    |        |		ADD.L	D6,D6
000209a6 52 87                    |R       |		ADDQ.L	#0x1,D7
000209a8 be 83                    |        |		CMP.L	D3,D7
000209aa 6f c6                    |o       |		BLE	0x20972
000209ac 2c 3c 00 00 ff fe        |,<      |		MOVE.L	#0xfffe,D6
000209b2 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000209b4 20 06                    |        |		MOVE.L	D6,D0
000209b6 e0 88                    |        |		LSR.L	#0x8,D0
000209b8 c0 81                    |        |		AND.L	D1,D0
000209ba 12 80                    |        |		MOVE.B	D0,(A1)
000209bc 20 06                    |        |		MOVE.L	D6,D0
000209be c0 81                    |        |		AND.L	D1,D0
000209c0 b0 81                    |        |		CMP.L	D1,D0
000209c2 63 02                    |c       |		BLS	0x209c6
000209c4 4e 4f                    |NO      |		TRAP	#15
000209c6 1d 40 ff f9              | @      |		MOVE.B	D0,(A6-0x7)
000209ca 3f 11                    |?       |		MOVE.W	(A1),-(A7)
000209cc 4e b9 00 02 0c 8c        |N       |		JSR	exp_WRITE_REQUEST_QUEUE_FIFO.IOC(Sw_2)
000209d2 4e 93                    |N       |		JSR	(A3)
000209d4 42 80                    |B       |		CLR.L	D0
000209d6 30 1f                    |0       |		MOVE.W	(A7)+,D0
000209d8 bc 80                    |        |		CMP.L	D0,D6
000209da 67 0a                    |g       |		BEQ	0x209e6
000209dc 4e 90                    |N       |		JSR	(A0)
000209de 4e 92                    |N       |		JSR	(A2)
000209e0 1f 02                    |        |		MOVE.B	D2,-(A7)
000209e2 4e 94                    |N       |		JSR	(A4)
000209e4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209e6 dc 86                    |        |		ADD.L	D6,D6
000209e8 52 86                    |R       |		ADDQ.L	#0x1,D6
000209ea 02 86 00 00 ff ff        |        |		ANDI.L	#0x0000ffff,D6
000209f0 52 87                    |R       |		ADDQ.L	#0x1,D7
000209f2 be 83                    |        |		CMP.L	D3,D7
000209f4 6f be                    |o       |		BLE	0x209b4
000209f6 4e 90                    |N       |		JSR	(A0)
000209f8 4e b9 00 02 10 1e        |N       |		JSR	exp_FILL_REQUEST_QUEUE_FIFO.IOC()
000209fe 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020a00 2a 07                    |*       |		MOVE.L	D7,D5
00020a02 e1 85                    |        |		ASL.L	#0x8,D5
00020a04 da 87                    |        |		ADD.L	D7,D5
00020a06 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a08 4e 93                    |N       |		JSR	(A3)
00020a0a 42 80                    |B       |		CLR.L	D0
00020a0c 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a0e ba 80                    |        |		CMP.L	D0,D5
00020a10 67 0c                    |g       |		BEQ	0x20a1e
00020a12 4e 90                    |N       |		JSR	(A0)
00020a14 4e 92                    |N       |		JSR	(A2)
00020a16 1f 3c 00 2c              | < ,    |		MOVE.B	#0x2c,-(A7)
00020a1a 4e 94                    |N       |		JSR	(A4)
00020a1c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a1e 52 87                    |R       |		ADDQ.L	#0x1,D7
00020a20 be 81                    |        |		CMP.L	D1,D7
00020a22 6f dc                    |o       |		BLE	0x20a00
00020a24 4e 90                    |N       |		JSR	(A0)
00020a26 4e 92                    |N       |		JSR	(A2)
00020a28 4c df 1f ef              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1+A2+A3+A4
00020a2c 4e 5e                    |N^      |		UNLK	A6
00020a2e 4e 75                    |Nu      |		RTS
00020a30 ; --------------------------------------------------------------------------------------
00020a30 ; OMSI PASCAL Function
00020a30 ;    <LVAR -0x00b 1(r)>
00020a30 ;    <LVAR -0x00c @ 1(r)>
00020a30 ; --------------------------------------------------------------------------------------
00020a30 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
00020a34 bf d5                    |        |		CMPA.L	(A5),A7
00020a36 62 06                    |b       |		BHI	0x20a3e
00020a38 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a3c 4e 76                    |Nv      |		TRAPV
00020a3e de fc 00 38              |   8    |		ADDA.W	#0x38,A7
00020a42 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
00020a46 41 fa fd fe              |A       |		LEA.L	0x20846,A0
00020a4a 43 ee ff f4              |C       |		LEA.L	(A6-0xc),A1
00020a4e 45 fa fd b0              |E       |		LEA.L	0x20800,A2
00020a52 47 fa fe 34              |G  4    |		LEA.L	0x20888,A3
00020a56 49 f9 00 02 0f f4        |I       |		LEA.L	exp_READ_RESPONSE_QUEUE_FIFO.IOC(&Sr_2),A4
00020a5c 72 2d                    |r-      |		MOVEQ.L	#0x2d,D1
00020a5e 74 0f                    |t       |		MOVEQ.L	#0x0f,D2
00020a60 4e ba fd 5c              |N  \    |		JSR	0x207be
00020a64 4e 90                    |N       |		JSR	(A0)
00020a66 7a 01                    |z       |		MOVEQ.L	#0x01,D5
00020a68 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020a6a 2f 05                    |/       |		MOVE.L	D5,-(A7)
00020a6c 4e 93                    |N       |		JSR	(A3)
00020a6e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a70 48 51                    |HQ      |		PEA.L	(A1)
00020a72 4e 94                    |N       |		JSR	(A4)
00020a74 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a76 42 80                    |B       |		CLR.L	D0
00020a78 10 11                    |        |		MOVE.B	(A1),D0
00020a7a 2e 00                    |.       |		MOVE.L	D0,D7
00020a7c e1 87                    |        |		ASL.L	#0x8,D7
00020a7e 42 80                    |B       |		CLR.L	D0
00020a80 10 2e ff f5              | .      |		MOVE.B	(A6-0xb),D0
00020a84 de 80                    |        |		ADD.L	D0,D7
00020a86 ba 87                    |        |		CMP.L	D7,D5
00020a88 67 0c                    |g       |		BEQ	0x20a96
00020a8a 4e 90                    |N       |		JSR	(A0)
00020a8c 4e 92                    |N       |		JSR	(A2)
00020a8e 1f 01                    |        |		MOVE.B	D1,-(A7)
00020a90 4e ba f8 fe              |N       |		JSR	0x20390
00020a94 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a96 da 85                    |        |		ADD.L	D5,D5
00020a98 52 86                    |R       |		ADDQ.L	#0x1,D6
00020a9a bc 82                    |        |		CMP.L	D2,D6
00020a9c 6f cc                    |o       |		BLE	0x20a6a
00020a9e 2a 3c 00 00 ff fe        |*<      |		MOVE.L	#0xfffe,D5
00020aa4 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020aa6 2f 05                    |/       |		MOVE.L	D5,-(A7)
00020aa8 4e 93                    |N       |		JSR	(A3)
00020aaa 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020aac 48 51                    |HQ      |		PEA.L	(A1)
00020aae 4e 94                    |N       |		JSR	(A4)
00020ab0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ab2 42 80                    |B       |		CLR.L	D0
00020ab4 10 11                    |        |		MOVE.B	(A1),D0
00020ab6 2e 00                    |.       |		MOVE.L	D0,D7
00020ab8 e1 87                    |        |		ASL.L	#0x8,D7
00020aba 42 80                    |B       |		CLR.L	D0
00020abc 10 2e ff f5              | .      |		MOVE.B	(A6-0xb),D0
00020ac0 de 80                    |        |		ADD.L	D0,D7
00020ac2 ba 87                    |        |		CMP.L	D7,D5
00020ac4 67 0c                    |g       |		BEQ	0x20ad2
00020ac6 4e 90                    |N       |		JSR	(A0)
00020ac8 4e 92                    |N       |		JSR	(A2)
00020aca 1f 01                    |        |		MOVE.B	D1,-(A7)
00020acc 4e ba f8 c2              |N       |		JSR	0x20390
00020ad0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ad2 da 85                    |        |		ADD.L	D5,D5
00020ad4 52 85                    |R       |		ADDQ.L	#0x1,D5
00020ad6 02 85 00 00 ff ff        |        |		ANDI.L	#0x0000ffff,D5
00020adc 52 86                    |R       |		ADDQ.L	#0x1,D6
00020ade bc 82                    |        |		CMP.L	D2,D6
00020ae0 6f c4                    |o       |		BLE	0x20aa6
00020ae2 4e 90                    |N       |		JSR	(A0)
00020ae4 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020ae6 2e 06                    |.       |		MOVE.L	D6,D7
00020ae8 2e 06                    |.       |		MOVE.L	D6,D7
00020aea e1 87                    |        |		ASL.L	#0x8,D7
00020aec de 86                    |        |		ADD.L	D6,D7
00020aee 2f 07                    |/       |		MOVE.L	D7,-(A7)
00020af0 4e 93                    |N       |		JSR	(A3)
00020af2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020af4 52 86                    |R       |		ADDQ.L	#0x1,D6
00020af6 0c 86 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D6
00020afc 6f e8                    |o       |		BLE	0x20ae6
00020afe 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020b00 48 51                    |HQ      |		PEA.L	(A1)
00020b02 4e 94                    |N       |		JSR	(A4)
00020b04 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b06 42 80                    |B       |		CLR.L	D0
00020b08 10 11                    |        |		MOVE.B	(A1),D0
00020b0a bc 80                    |        |		CMP.L	D0,D6
00020b0c 66 0a                    |f       |		BNE	0x20b18
00020b0e 42 80                    |B       |		CLR.L	D0
00020b10 10 2e ff f5              | .      |		MOVE.B	(A6-0xb),D0
00020b14 bc 80                    |        |		CMP.L	D0,D6
00020b16 67 0e                    |g       |		BEQ	0x20b26
00020b18 4e 90                    |N       |		JSR	(A0)
00020b1a 4e 92                    |N       |		JSR	(A2)
00020b1c 1f 3c 00 2e              | < .    |		MOVE.B	#0x2e,-(A7)
00020b20 4e ba f8 6e              |N  n    |		JSR	0x20390
00020b24 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b26 52 86                    |R       |		ADDQ.L	#0x1,D6
00020b28 0c 86 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D6
00020b2e 6f d0                    |o       |		BLE	0x20b00
00020b30 4e 90                    |N       |		JSR	(A0)
00020b32 4e 92                    |N       |		JSR	(A2)
00020b34 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
00020b38 4e 5e                    |N^      |		UNLK	A6
00020b3a 4e 75                    |Nu      |		RTS
00020b3c ; --------------------------------------------------------------------------------------
00020b3c ; OMSI PASCAL Function
00020b3c ;    <LVAR -0x007 @>
00020b3c ;    <LVAR -0x00b @>
00020b3c ;    <LVAR -0x00c @ 1(r)>
00020b3c ; --------------------------------------------------------------------------------------
00020b3c 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4		; Spelunked
00020b40 bf d5                    |        |		CMPA.L	(A5),A7
00020b42 62 06                    |b       |		BHI	0x20b4a
00020b44 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020b48 4e 76                    |Nv      |		TRAPV
00020b4a de fc 00 10              |        |		ADDA.W	#0x10,A7
00020b4e 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00020b52 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
00020b56 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
00020b5a 4e b9 00 02 0e f8        |N       |		JSR	exp_TEST_MEMORY_DATA.IOC(&Fr, &Sr_4, &Sr_4)
00020b60 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020b64 4a 2e ff f4              |J.      |		TST.B	(A6-0xc)
00020b68 66 0a                    |f       |		BNE	0x20b74
00020b6a 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
00020b6e 4e ba f8 20              |N       |		JSR	0x20390
00020b72 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b74 4e 5e                    |N^      |		UNLK	A6
00020b76 4e 75                    |Nu      |		RTS
00020b78 ; --------------------------------------------------------------------------------------
00020b78 ; OMSI PASCAL Function
00020b78 ;    <LVAR -0x00b @>
00020b78 ;    <LVAR -0x00c @ 1(r)>
00020b78 ; --------------------------------------------------------------------------------------
00020b78 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00020b7c bf d5                    |        |		CMPA.L	(A5),A7
00020b7e 62 06                    |b       |		BHI	0x20b86
00020b80 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020b84 4e 76                    |Nv      |		TRAPV
00020b86 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020b8a 48 e7 00 c0              |H       |		MOVEM.L	A1+A0,-(A7)
00020b8e 41 ee ff f4              |A       |		LEA.L	(A6-0xc),A0
00020b92 43 fa f7 fc              |C       |		LEA.L	0x20390,A1
00020b96 48 50                    |HP      |		PEA.L	(A0)
00020b98 4e b9 00 02 0e 5a        |N    Z  |		JSR	exp_TEST_MACRO_EVENT_SLICE.IOC(&Fr)
00020b9e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ba0 4a 10                    |J       |		TST.B	(A0)
00020ba2 66 08                    |f       |		BNE	0x20bac
00020ba4 1f 3c 00 25              | < %    |		MOVE.B	#0x25,-(A7)
00020ba8 4e 91                    |N       |		JSR	(A1)
00020baa 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020bac 48 50                    |HP      |		PEA.L	(A0)
00020bae 4e b9 00 02 0e d0        |N       |		JSR	exp_TEST_MACRO_EVENT_DELAY.IOC(&Fr)
00020bb4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020bb6 4a 10                    |J       |		TST.B	(A0)
00020bb8 66 08                    |f       |		BNE	0x20bc2
00020bba 1f 3c 00 26              | < &    |		MOVE.B	#0x26,-(A7)
00020bbe 4e 91                    |N       |		JSR	(A1)
00020bc0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020bc2 48 50                    |HP      |		PEA.L	(A0)
00020bc4 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
00020bc8 4e b9 00 02 0e a8        |N       |		JSR	exp_TEST_MICRO_EVENT_EXIT.IOC(&Fr, &Sr_8)
00020bce 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020bd0 4a 10                    |J       |		TST.B	(A0)
00020bd2 66 08                    |f       |		BNE	0x20bdc
00020bd4 1f 3c 00 28              | < (    |		MOVE.B	#0x28,-(A7)
00020bd8 4e 91                    |N       |		JSR	(A1)
00020bda 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020bdc 48 50                    |HP      |		PEA.L	(A0)
00020bde 4e b9 00 02 0f 1c        |N       |		JSR	exp_TEST_IOC_CLOCKSTOP.IOC(&Fr)
00020be4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020be6 4a 10                    |J       |		TST.B	(A0)
00020be8 66 08                    |f       |		BNE	0x20bf2
00020bea 1f 3c 00 2a              | < *    |		MOVE.B	#0x2a,-(A7)
00020bee 4e 91                    |N       |		JSR	(A1)
00020bf0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020bf2 4c df 03 00              |L       |		MOVEM.L	(A7)+,A0+A1
00020bf6 4e 5e                    |N^      |		UNLK	A6
00020bf8 4e 75                    |Nu      |		RTS
00020bfa ; --------------------------------------------------------------------------------------
00020bfa ; OMSI PASCAL Function
00020bfa ; --------------------------------------------------------------------------------------
00020bfa 4e 56 ff fc              |NV      |		LINK.W	A6,#0xfffc
00020bfe bf d5                    |        |		CMPA.L	(A5),A7
00020c00 62 06                    |b       |		BHI	0x20c08
00020c02 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020c06 4e 76                    |Nv      |		TRAPV
00020c08 de fc 00 04              |        |		ADDA.W	#0x4,A7
00020c0c 4e 5e                    |N^      |		UNLK	A6
00020c0e 4e 75                    |Nu      |		RTS
00020c10 ; --------------------------------------------------------------------------------------
00020c10 ; OMSI PASCAL Function
00020c10 ; --------------------------------------------------------------------------------------
00020c10					START:
00020c10 4f fa 00 08              |O       |		LEA.L	MAIN,A7
00020c14 4e f9 00 01 02 80        |N       |		JMP	?start_program
00020c1a					MAIN:
00020c1a 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
00020c20 48 78 00 0f              |Hx      |		PEA.L	0xf
00020c24 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00020c2a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c2c 4e ba f6 ca              |N       |		JSR	0x202f8
00020c30 4e ba f8 1c              |N       |		JSR	0x2044e
00020c34 4e ba f8 96              |N       |		JSR	0x204cc
00020c38 4e ba f9 10              |N       |		JSR	0x2054a
00020c3c 4e ba fa 9e              |N       |		JSR	0x206dc
00020c40 4e ba fa d6              |N       |		JSR	0x20718
00020c44 4e ba fc ee              |N       |		JSR	0x20934
00020c48 4e ba fd e6              |N       |		JSR	0x20a30
00020c4c 4e ba ff 2a              |N  *    |		JSR	0x20b78
00020c50 4e ba ff a8              |N       |		JSR	0x20bfa
00020c54 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
00020c58 2f 39 00 02 10 c6        |/9      |		MOVE.L	0x210c6,-(A7)
00020c5e 2f 39 00 02 10 ca        |/9      |		MOVE.L	0x210ca,-(A7)
00020c64 1f 39 00 02 10 ce        | 9      |		MOVE.B	0x210ce,-(A7)
00020c6a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020c6c 20 4f                    | O      |		MOVEA.L	A7,A0
00020c6e 43 f9 00 02 10 cf        |C       |		LEA.L	0x210cf,A1
00020c74 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020c76 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020c78 51 c8 ff fc              |Q       |		DBF	D0,0x20c76
00020c7c 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020c82 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020c86 4e b9 00 01 02 84        |N       |		JSR	?exit
00020c8c					exp_WRITE_REQUEST_QUEUE_FIFO.IOC(Sw_2):
00020c8c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020c92 00 0a                    |        |		.CONST	0x000a			; Stack-delta
00020c94 1c 57 52 49 54 45 5f 52  | WRITE_R|		.TXT	28,'WRITE_REQUEST_QUEUE_FIFO.IOC'
00020cb1 00                       |        |		.CONST	0x0
00020cb2 04                       |        |		.CONST	0x4			; DIPROC address
00020cb3 00                       |        |		.CONST	0x0			; Output Parameters
00020cb4 01                       |        |		.CONST	0x1			; Input Parameters
00020cb5 01                       |        |		.CONST	0x1			; In arg [2]
00020cb6					exp_TEST_WCS_DATA.IOC(&Fr, &Sr_2, &Sr_2):
00020cb6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020cbc 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020cbe 11 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	17,'TEST_WCS_DATA.IOC'
00020cd0 00                       |        |		.CONST	0x0
00020cd1 04                       |        |		.CONST	0x4			; DIPROC address
00020cd2 03                       |        |		.CONST	0x3			; Output Parameters
00020cd3 00                       |        |		.CONST	0x0			; Input Parameters
00020cd4 08                       |        |		.CONST	0x8			; Out arg flag
00020cd5 01                       |        |		.CONST	0x1			; Out arg [2]
00020cd6 01                       |        |		.CONST	0x1			; Out arg [2]
00020cd7 00                       |        |		.PAD	0x0
00020cd8					exp_TEST_WCS_BITS.IOC(&Fr, &Sr_2, &Sr_2):
00020cd8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020cde 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020ce0 11 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	17,'TEST_WCS_BITS.IOC'
00020cf2 00                       |        |		.CONST	0x0
00020cf3 04                       |        |		.CONST	0x4			; DIPROC address
00020cf4 03                       |        |		.CONST	0x3			; Output Parameters
00020cf5 00                       |        |		.CONST	0x0			; Input Parameters
00020cf6 08                       |        |		.CONST	0x8			; Out arg flag
00020cf7 01                       |        |		.CONST	0x1			; Out arg [2]
00020cf8 01                       |        |		.CONST	0x1			; Out arg [2]
00020cf9 00                       |        |		.PAD	0x0
00020cfa					exp_TEST_WCS_ADDRESSING.IOC(&Fr, &Sr_2, &Sr_2):
00020cfa 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d00 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020d02 17 54 45 53 54 5f 57 43  | TEST_WC|		.TXT	23,'TEST_WCS_ADDRESSING.IOC'
00020d1a 00                       |        |		.CONST	0x0
00020d1b 04                       |        |		.CONST	0x4			; DIPROC address
00020d1c 03                       |        |		.CONST	0x3			; Output Parameters
00020d1d 00                       |        |		.CONST	0x0			; Input Parameters
00020d1e 08                       |        |		.CONST	0x8			; Out arg flag
00020d1f 01                       |        |		.CONST	0x1			; Out arg [2]
00020d20 01                       |        |		.CONST	0x1			; Out arg [2]
00020d21 00                       |        |		.PAD	0x0
00020d22					exp_TEST_TRACE_DATA.IOC(&Fr, &Sr_2, &Sr_2):
00020d22 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d28 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020d2a 13 54 45 53 54 5f 54 52  | TEST_TR|		.TXT	19,'TEST_TRACE_DATA.IOC'
00020d3e 00                       |        |		.CONST	0x0
00020d3f 04                       |        |		.CONST	0x4			; DIPROC address
00020d40 03                       |        |		.CONST	0x3			; Output Parameters
00020d41 00                       |        |		.CONST	0x0			; Input Parameters
00020d42 08                       |        |		.CONST	0x8			; Out arg flag
00020d43 01                       |        |		.CONST	0x1			; Out arg [2]
00020d44 01                       |        |		.CONST	0x1			; Out arg [2]
00020d45 00                       |        |		.PAD	0x0
00020d46					exp_TEST_TRACE_BITS.IOC(&Fr, &Sr_2, &Sr_2):
00020d46 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d4c 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020d4e 13 54 45 53 54 5f 54 52  | TEST_TR|		.TXT	19,'TEST_TRACE_BITS.IOC'
00020d62 00                       |        |		.CONST	0x0
00020d63 04                       |        |		.CONST	0x4			; DIPROC address
00020d64 03                       |        |		.CONST	0x3			; Output Parameters
00020d65 00                       |        |		.CONST	0x0			; Input Parameters
00020d66 08                       |        |		.CONST	0x8			; Out arg flag
00020d67 01                       |        |		.CONST	0x1			; Out arg [2]
00020d68 01                       |        |		.CONST	0x1			; Out arg [2]
00020d69 00                       |        |		.PAD	0x0
00020d6a					exp_TEST_TRACE_ADDRESSING.IOC(&Fr, &Sr_2, &Sr_2):
00020d6a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d70 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020d72 19 54 45 53 54 5f 54 52  | TEST_TR|		.TXT	25,'TEST_TRACE_ADDRESSING.IOC'
00020d8c 00                       |        |		.CONST	0x0
00020d8d 04                       |        |		.CONST	0x4			; DIPROC address
00020d8e 03                       |        |		.CONST	0x3			; Output Parameters
00020d8f 00                       |        |		.CONST	0x0			; Input Parameters
00020d90 08                       |        |		.CONST	0x8			; Out arg flag
00020d91 01                       |        |		.CONST	0x1			; Out arg [2]
00020d92 01                       |        |		.CONST	0x1			; Out arg [2]
00020d93 00                       |        |		.PAD	0x0
00020d94					exp_TEST_TV_3_ENABLES.IOC(&Fr, &Sr_1, &Sr_1):
00020d94 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d9a 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020d9c 15 54 45 53 54 5f 54 56  | TEST_TV|		.TXT	21,'TEST_TV_3_ENABLES.IOC'
00020db2 00                       |        |		.CONST	0x0
00020db3 04                       |        |		.CONST	0x4			; DIPROC address
00020db4 03                       |        |		.CONST	0x3			; Output Parameters
00020db5 00                       |        |		.CONST	0x0			; Input Parameters
00020db6 08                       |        |		.CONST	0x8			; Out arg flag
00020db7 00                       |        |		.CONST	0x0			; Out arg [1]
00020db8 00                       |        |		.CONST	0x0			; Out arg [1]
00020db9 00                       |        |		.PAD	0x0
00020dba					exp_TEST_TV_2_ENABLES.IOC(&Fr, &Sr_1, &Sr_1):
00020dba 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020dc0 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020dc2 15 54 45 53 54 5f 54 56  | TEST_TV|		.TXT	21,'TEST_TV_2_ENABLES.IOC'
00020dd8 00                       |        |		.CONST	0x0
00020dd9 04                       |        |		.CONST	0x4			; DIPROC address
00020dda 03                       |        |		.CONST	0x3			; Output Parameters
00020ddb 00                       |        |		.CONST	0x0			; Input Parameters
00020ddc 08                       |        |		.CONST	0x8			; Out arg flag
00020ddd 00                       |        |		.CONST	0x0			; Out arg [1]
00020dde 00                       |        |		.CONST	0x0			; Out arg [1]
00020ddf 00                       |        |		.PAD	0x0
00020de0					exp_TEST_TV_1_ENABLES.IOC(&Fr, &Sr_1, &Sr_1):
00020de0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020de6 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020de8 15 54 45 53 54 5f 54 56  | TEST_TV|		.TXT	21,'TEST_TV_1_ENABLES.IOC'
00020dfe 00                       |        |		.CONST	0x0
00020dff 04                       |        |		.CONST	0x4			; DIPROC address
00020e00 03                       |        |		.CONST	0x3			; Output Parameters
00020e01 00                       |        |		.CONST	0x0			; Input Parameters
00020e02 08                       |        |		.CONST	0x8			; Out arg flag
00020e03 00                       |        |		.CONST	0x0			; Out arg [1]
00020e04 00                       |        |		.CONST	0x0			; Out arg [1]
00020e05 00                       |        |		.PAD	0x0
00020e06					exp_TEST_TV_0_ENABLES.IOC(&Fr, &Sr_1, &Sr_1):
00020e06 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020e0c 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020e0e 15 54 45 53 54 5f 54 56  | TEST_TV|		.TXT	21,'TEST_TV_0_ENABLES.IOC'
00020e24 00                       |        |		.CONST	0x0
00020e25 04                       |        |		.CONST	0x4			; DIPROC address
00020e26 03                       |        |		.CONST	0x3			; Output Parameters
00020e27 00                       |        |		.CONST	0x0			; Input Parameters
00020e28 08                       |        |		.CONST	0x8			; Out arg flag
00020e29 00                       |        |		.CONST	0x0			; Out arg [1]
00020e2a 00                       |        |		.CONST	0x0			; Out arg [1]
00020e2b 00                       |        |		.PAD	0x0
00020e2c					exp_TEST_SYNDROME_TRANSCEIVER.IOC(&Fr, &Sr_1, &Sr_1):
00020e2c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020e32 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020e34 1d 54 45 53 54 5f 53 59  | TEST_SY|		.TXT	29,'TEST_SYNDROME_TRANSCEIVER.IOC'
00020e52 00                       |        |		.CONST	0x0
00020e53 04                       |        |		.CONST	0x4			; DIPROC address
00020e54 03                       |        |		.CONST	0x3			; Output Parameters
00020e55 00                       |        |		.CONST	0x0			; Input Parameters
00020e56 08                       |        |		.CONST	0x8			; Out arg flag
00020e57 00                       |        |		.CONST	0x0			; Out arg [1]
00020e58 00                       |        |		.CONST	0x0			; Out arg [1]
00020e59 00                       |        |		.PAD	0x0
00020e5a					exp_TEST_MACRO_EVENT_SLICE.IOC(&Fr):
00020e5a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020e60 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020e62 1a 54 45 53 54 5f 4d 41  | TEST_MA|		.TXT	26,'TEST_MACRO_EVENT_SLICE.IOC'
00020e7d 00                       |        |		.CONST	0x0
00020e7e 04                       |        |		.CONST	0x4			; DIPROC address
00020e7f 01                       |        |		.CONST	0x1			; Output Parameters
00020e80 00                       |        |		.CONST	0x0			; Input Parameters
00020e81 08                       |        |		.CONST	0x8			; Out arg flag
00020e82					exp_TEST_MULTIBIT_ERROR.IOC(&Fr):
00020e82 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020e88 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020e8a 17 54 45 53 54 5f 4d 55  | TEST_MU|		.TXT	23,'TEST_MULTIBIT_ERROR.IOC'
00020ea2 00                       |        |		.CONST	0x0
00020ea3 04                       |        |		.CONST	0x4			; DIPROC address
00020ea4 01                       |        |		.CONST	0x1			; Output Parameters
00020ea5 00                       |        |		.CONST	0x0			; Input Parameters
00020ea6 08                       |        |		.CONST	0x8			; Out arg flag
00020ea7 00                       |        |		.PAD	0x0
00020ea8					exp_TEST_MICRO_EVENT_EXIT.IOC(&Fr, &Sr_8):
00020ea8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020eae 00 10                    |        |		.CONST	0x0010			; Stack-delta
00020eb0 19 54 45 53 54 5f 4d 49  | TEST_MI|		.TXT	25,'TEST_MICRO_EVENT_EXIT.IOC'
00020eca 00                       |        |		.CONST	0x0
00020ecb 04                       |        |		.CONST	0x4			; DIPROC address
00020ecc 02                       |        |		.CONST	0x2			; Output Parameters
00020ecd 00                       |        |		.CONST	0x0			; Input Parameters
00020ece 08                       |        |		.CONST	0x8			; Out arg flag
00020ecf 07                       |        |		.CONST	0x7			; Out arg [8]
00020ed0					exp_TEST_MACRO_EVENT_DELAY.IOC(&Fr):
00020ed0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020ed6 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020ed8 1a 54 45 53 54 5f 4d 41  | TEST_MA|		.TXT	26,'TEST_MACRO_EVENT_DELAY.IOC'
00020ef3 00                       |        |		.CONST	0x0
00020ef4 04                       |        |		.CONST	0x4			; DIPROC address
00020ef5 01                       |        |		.CONST	0x1			; Output Parameters
00020ef6 00                       |        |		.CONST	0x0			; Input Parameters
00020ef7 08                       |        |		.CONST	0x8			; Out arg flag
00020ef8					exp_TEST_MEMORY_DATA.IOC(&Fr, &Sr_4, &Sr_4):
00020ef8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020efe 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020f00 14 54 45 53 54 5f 4d 45  | TEST_ME|		.TXT	20,'TEST_MEMORY_DATA.IOC'
00020f15 00                       |        |		.CONST	0x0
00020f16 04                       |        |		.CONST	0x4			; DIPROC address
00020f17 03                       |        |		.CONST	0x3			; Output Parameters
00020f18 00                       |        |		.CONST	0x0			; Input Parameters
00020f19 08                       |        |		.CONST	0x8			; Out arg flag
00020f1a 03                       |        |		.CONST	0x3			; Out arg [4]
00020f1b 03                       |        |		.CONST	0x3			; Out arg [4]
00020f1c					exp_TEST_IOC_CLOCKSTOP.IOC(&Fr):
00020f1c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f22 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020f24 16 54 45 53 54 5f 49 4f  | TEST_IO|		.TXT	22,'TEST_IOC_CLOCKSTOP.IOC'
00020f3b 00                       |        |		.CONST	0x0
00020f3c 04                       |        |		.CONST	0x4			; DIPROC address
00020f3d 01                       |        |		.CONST	0x1			; Output Parameters
00020f3e 00                       |        |		.CONST	0x0			; Input Parameters
00020f3f 08                       |        |		.CONST	0x8			; Out arg flag
00020f40					exp_TEST_FIU_ENABLES.IOC(&Fr, &Sr_1, &Sr_1):
00020f40 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f46 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020f48 14 54 45 53 54 5f 46 49  | TEST_FI|		.TXT	20,'TEST_FIU_ENABLES.IOC'
00020f5d 00                       |        |		.CONST	0x0
00020f5e 04                       |        |		.CONST	0x4			; DIPROC address
00020f5f 03                       |        |		.CONST	0x3			; Output Parameters
00020f60 00                       |        |		.CONST	0x0			; Input Parameters
00020f61 08                       |        |		.CONST	0x8			; Out arg flag
00020f62 00                       |        |		.CONST	0x0			; Out arg [1]
00020f63 00                       |        |		.CONST	0x0			; Out arg [1]
00020f64					exp_TEST_ECC.IOC(&Fr, &Sr_8, &Sr_8, &Sr_2, &Sr_1, &Sr_1):
00020f64 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f6a 00 20                    |        |		.CONST	0x0020			; Stack-delta
00020f6c 0c 54 45 53 54 5f 45 43  | TEST_EC|		.TXT	12,'TEST_ECC.IOC'
00020f79 00                       |        |		.CONST	0x0
00020f7a 04                       |        |		.CONST	0x4			; DIPROC address
00020f7b 06                       |        |		.CONST	0x6			; Output Parameters
00020f7c 00                       |        |		.CONST	0x0			; Input Parameters
00020f7d 08                       |        |		.CONST	0x8			; Out arg flag
00020f7e 07                       |        |		.CONST	0x7			; Out arg [8]
00020f7f 07                       |        |		.CONST	0x7			; Out arg [8]
00020f80 01                       |        |		.CONST	0x1			; Out arg [2]
00020f81 00                       |        |		.CONST	0x0			; Out arg [1]
00020f82 00                       |        |		.CONST	0x0			; Out arg [1]
00020f83 00                       |        |		.PAD	0x0
00020f84					exp_TEST_CHECKBITS.IOC(&Fr, &Sr_2, &Sr_2):
00020f84 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020f8a 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020f8c 12 54 45 53 54 5f 43 48  | TEST_CH|		.TXT	18,'TEST_CHECKBITS.IOC'
00020f9f 00                       |        |		.CONST	0x0
00020fa0 04                       |        |		.CONST	0x4			; DIPROC address
00020fa1 03                       |        |		.CONST	0x3			; Output Parameters
00020fa2 00                       |        |		.CONST	0x0			; Input Parameters
00020fa3 08                       |        |		.CONST	0x8			; Out arg flag
00020fa4 01                       |        |		.CONST	0x1			; Out arg [2]
00020fa5 01                       |        |		.CONST	0x1			; Out arg [2]
00020fa6					exp_TEST_COUNTER_DATA.IOC(&Fr, &Sr_6, &Sr_6):
00020fa6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020fac 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020fae 15 54 45 53 54 5f 43 4f  | TEST_CO|		.TXT	21,'TEST_COUNTER_DATA.IOC'
00020fc4 00                       |        |		.CONST	0x0
00020fc5 04                       |        |		.CONST	0x4			; DIPROC address
00020fc6 03                       |        |		.CONST	0x3			; Output Parameters
00020fc7 00                       |        |		.CONST	0x0			; Input Parameters
00020fc8 08                       |        |		.CONST	0x8			; Out arg flag
00020fc9 05                       |        |		.CONST	0x5			; Out arg [6]
00020fca 05                       |        |		.CONST	0x5			; Out arg [6]
00020fcb 00                       |        |		.PAD	0x0
00020fcc					exp_TEST_ADDRESS_ENABLES.IOC(&Fr, &Sr_1, &Sr_1):
00020fcc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020fd2 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020fd4 18 54 45 53 54 5f 41 44  | TEST_AD|		.TXT	24,'TEST_ADDRESS_ENABLES.IOC'
00020fed 00                       |        |		.CONST	0x0
00020fee 04                       |        |		.CONST	0x4			; DIPROC address
00020fef 03                       |        |		.CONST	0x3			; Output Parameters
00020ff0 00                       |        |		.CONST	0x0			; Input Parameters
00020ff1 08                       |        |		.CONST	0x8			; Out arg flag
00020ff2 00                       |        |		.CONST	0x0			; Out arg [1]
00020ff3 00                       |        |		.CONST	0x0			; Out arg [1]
00020ff4					exp_READ_RESPONSE_QUEUE_FIFO.IOC(&Sr_2):
00020ff4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020ffa 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020ffc 1c 52 45 41 44 5f 52 45  | READ_RE|		.TXT	28,'READ_RESPONSE_QUEUE_FIFO.IOC'
00021019 00                       |        |		.CONST	0x0
0002101a 04                       |        |		.CONST	0x4			; DIPROC address
0002101b 01                       |        |		.CONST	0x1			; Output Parameters
0002101c 00                       |        |		.CONST	0x0			; Input Parameters
0002101d 01                       |        |		.CONST	0x1			; Out arg [2]
0002101e					exp_FILL_REQUEST_QUEUE_FIFO.IOC():
0002101e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021024 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021026 1b 46 49 4c 4c 5f 52 45  | FILL_RE|		.TXT	27,'FILL_REQUEST_QUEUE_FIFO.IOC'
00021042 00                       |        |		.CONST	0x0
00021043 04                       |        |		.CONST	0x4			; DIPROC address
00021044 00                       |        |		.CONST	0x0			; Output Parameters
00021045 00                       |        |		.CONST	0x0			; Input Parameters
00021046 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
00021054 ; --------------------------------------------------------------------------------------
00021054 ; OMSI PASCAL Function
00021054 ;    <LVAR  0x008 1(r)>
00021054 ; --------------------------------------------------------------------------------------
00021054					PROG_FAIL:
00021054 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00021058 bf d5                    |        |		CMPA.L	(A5),A7
0002105a 62 06                    |b       |		BHI	0x21062
0002105c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021060 4e 76                    |Nv      |		TRAPV
00021062 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00021066 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002106a 41 fa ff e8              |A       |		LEA.L	PROG_FAIL,A0
0002106e 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021070 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021072 51 c8 ff fc              |Q       |		DBF	D0,0x21070
00021076 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
0002107a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002107c 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00021080 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00021084 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00021088 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002108e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021090 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021094 48 80                    |H       |		EXTB.W	D0
00021096 48 c0                    |H       |		EXTW.L	D0
00021098 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002109a 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
000210a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000210a2 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000210a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000210aa 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000210b0 de fc 00 14              |        |		ADDA.W	#0x14,A7
000210b4 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000210b8 4e 5e                    |N^      |		UNLK	A6
000210ba 4e 75                    |Nu      |		RTS