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

⟦2883194ab⟧ M200

    Length: 3584 (0xe00)
    Types: M200
    Notes: M200_PROGRAM
    Names: »P1FIU.M200«

Derivation

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

Disassembly

0x201fc


@ 201fc
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 201fc-20338 Body>                                              
        <POP 201fc-20212 Prologue>                           Σ0         ↓
        <POP 20212-20228 RegCacheLoad>                       Σ0         ↓
        <POP 20228-20288 Naked>                              Σ0         ↓ →0x202d0
            <Call 0x20228 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x2022e [18] @>                            Δ-18               {[«18""»]}
            <POP 2023a-2023c StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x2023c 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x20248 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 2024a-2024b StackAdj>                       Δ+22       ↓       {}
            <Blob 0x2024b [14] @>                            Δ-14               {[«14""»]}
            <POP 2025a-2025c StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x2025c 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 20266-20268 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 20268  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x2026c 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 20272-20274 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x20274 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2027a-2027c StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x2027c 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2027e-20280 StackAdj>                       Δ+18               {}
            <MI 20280  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 20284  CMPA.W  #0x01,A0>                                        {}
            <MI 20286  BEQ     0x202d0>                                         {}
        <POP 20288-202d0 Naked>                              Σ0         ↓
            <Blob 0x20288 [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x20298 [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 202a8-202aa StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x202aa 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 202b4-202b6 StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x202b6>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x202b6 12>                      Δ-4        
                <Const 0x202ba 0x1.2>                        Δ-2        
                <Const 0x202bc 0x1e.2>                       Δ-2        
                <Call 0x202be 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 202c0-202c2 StackAdj>                   Δ+8        
            <Call 0x202c2 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 202c8-202ca StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x202ca 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 202cc-202d0 StackAdj>                       Δ+48               {}
        <POP 202d0-20330 Naked>                              Σ0         ↓ ←0x20228
            <Blob 0x202d0 [14] @>                            Δ-14               {[«14""»]}
            <POP 202e0-202e2 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x202e2 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 202ec-202ee StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 202ee  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x202f2 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 202f8-202fa StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x202fa 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20300-20302 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20302 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20304-20305 StackAdj>                       Δ+18       ↓       {}
            <Blob 0x20305 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x20314 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 20318-2031a StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x2031a 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x20328 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 2032e-20330 StackAdj>                       Δ+30               {}
        <POP 20330-20338 Epilogue>                           Σ0         

0x20338


@ 20338
    <POP 20338-2035a Body>                                              
        <POP 20338-2034a Prologue>                           Σ0         ↓
        <POP 2034a-20356 Naked>                              Σ0         ↓
            <Call 0x2034a 0x105b6>                                              {}
                R1000_Reset_L(void)
            <Call 0x20350 0x105bc>                                              {}
                R1000_Reset_H(void)
        <POP 20356-2035a Epilogue>                           Σ0         

0x2035a


@ 2035a
        <LVAR  0x008 1(w)>
        <LVAR -0x001 @>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x003 @>
    <POP 2035a-203da Body>                                              
        <POP 2035a-20370 Prologue>                           Σ0         ↓
        <POP 20370-20372 RegCacheLoad>                       Σ0         ↓
        <POP 20372-20374 Naked>                              Σ0         ↓
            <MI 20372  MOVEQ.L #-0x01,D7>                                       {}
        <POP 20374-203bc Naked>                              Σ0         ↓ →0x203be ←0x203c2
            <MI 20374  ADDQ.L  #0x1,D7>                                         {}
            <POP 0x20376 LimitCheck 0x0 ≤ D7 ≤ 0x8>                             {}
            <MI 2037c  MOVE.L  D7,D0>                                           {}
            <MI 2037e  ASL.L   #0x1,D0>                                         {}
            <MI 20380  LEA.L   0x201ea,A0>                                      {}
            <MI 20384  MOVE.B  (A0+D0.L),-(A7)>              Δ-2                {[2, '(A0+D0.L)']}
            <MI 20388  CLR.B   -(A7)>                        Δ-2                {[2, '(A0+D0.L)']|[#0]}
            <Call 0x2038a 0x20d28>                                              {[2, '(A0+D0.L)']|[#0]}
                exp_LOAD_PAREG.FIU(Sw_1, Sw_1)
            <POP 20390-20392 StackAdj>                       Δ+2                {[2, '(A0+D0.L)']}
            <POP 20392-20393 StackAdj>                       Δ+2                {}
            <Const 0x20393 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x20396 <LVAR -0x003 @>>             Δ-4                {[#3]|[@@-3]}
            <Pointer.fp 0x2039a <LVAR -0x002 @ 1(r)>>        Δ-4                {[#3]|[@@-3]|[@@-2]}
            <Pointer.fp 0x2039e <LVAR -0x001 @>>             Δ-4                {[#3]|[@@-3]|[@@-2]|[@@-1]}
            <Call 0x203a2 0x10484>                                              {[#3]|[@@-3]|[@@-2]|[@@-1]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 203a8-203ac StackAdj>                       Δ+14               {}
            <MI 203ac  MOVEQ.L #0x00,D6>                                        {}
            <MI 203ae  LEA.L   0x201ea,A0>                                      {}
            <MI 203b2  MOVE.B  (A6-0x2),D1>                                     {}
            <MI 203b6  CMP.B   (A0+D0.L+#0x1),D1>                               {}
            <MI 203ba  BNE     0x203be>                                         {}
        <POP 203bc-203be Naked>                              Σ0         ↓
            <MI 203bc  ADDQ.B  #0x1,D6>                                         {}
        <POP 203be-203c2 Naked>                              Σ0         ↓ →0x203c6 ←0x20374
            <MI 203be  TST.B   D6>                                              {}
            <MI 203c0  BEQ     0x203c6>                                         {}
        <POP 203c2-203c6 Naked>                              Σ0         ↓ →0x20374
            <MI 203c2  CMP.L   #0x08,D7>                                        {}
            <MI 203c4  BNE     0x20374>                                         {}
        <POP 203c6-203d2 Naked>                              Σ0         ↓ ←0x203be
            <MI 203c6  MOVE.B  D6,D0>                                           {}
            <MI 203c8  EXTB.W  D0>                                              {}
            <POP 0x203ca LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 203ce  MOVE.B  D0,(A6+0x8)>                                     {}
        <POP 203d2-203da Epilogue>                           Σ0         

0x203da


@ 203da
        <LVAR  0x008 1(r)>
    <POP 203da-20434 Body>                                              
        <POP 203da-203f0 Prologue>                           Σ0         ↓
        <POP 203f0-203fc RegCacheLoad>                       Σ0         ↓
        <POP 203fc-2042c Naked>                              Σ0         ↓
            <MI 203fc  MOVE.B  #0x06,0x20deb>                                   {}
            <MI 20400  MOVE.B  (A6+0x8),0x20dea>                                {}
            <MI 20404  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x20406 [4] 0x20de2>                       Δ-4                {[#0]|[«4»]}
            <Blob 0x2040c [4] 0x20de6>                       Δ-4                {[#0]|[«4»]|[«4»]}
            <Blob 0x20412 [2] 0x20dea>                       Δ-2                {[#0]|[«4»]|[«4»]|[«2»]}
            <Blob 0x20414 [8] 0x20deb>                       Δ-8                {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
            <Call 0x20422 0x1054a>                                              {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20428-2042c StackAdj>                       Δ+20               {}
        <POP 2042c-20434 Epilogue>                           Σ0         

0x20434


@ 20434
        <LVAR  0x016 4(r)>
        <LVAR  0x012 4(r)>
        <LVAR  0x010 1(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 20434-2046a Body>                                              
        <POP 20434-20446 Prologue>                           Σ0         ↓
        <POP 20446-20466 Naked>                              Σ0         ↓
            <MI 20446  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 20448  MOVE.L  (A6+0x16),-(A7)>              Δ-4                {[#0]|[4, '(A6+0x16)']}
            <MI 2044c  MOVE.L  (A6+0x12),-(A7)>              Δ-4                {[#0]|[4, '(A6+0x16)']|[4, '(A6+0x12)']}
            <MI 20450  MOVE.B  (A6+0x10),-(A7)>              Δ-2                {[#0]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']}
            <MI 20454  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[#0]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 20458  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[#0]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2045c 0x1054a>                                              {[#0]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20462-20466 StackAdj>                       Δ+20               {}
        <POP 20466-2046a Epilogue>                           Σ0         

0x2046a


@ 2046a
        <LVAR  0x00c @ 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x007 @>
        <LVAR -0x008 @>
    <POP 2046a-204d0 Body>                                              
        <POP 2046a-20480 Prologue>                           Σ0         ↓
        <POP 20480-20482 RegCacheLoad>                       Σ0         ↓
        <POP 20482-204a2 Naked>                              Σ0         ↓
            <Const 0x20482 0x3.2>                            Δ-2                {[#3]}
            <MI 20484  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[#3]|[4, '(A6+0xc)']}
            <Call 0x20488 0x1047e>                                              {[#3]|[4, '(A6+0xc)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 2048e-20490 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x20490 <LVAR  0x00c @ 4(r)>>        Δ-4                {[@@12]}
            <Call 0x20494 0x10496>                                              {[@@12]}
                ExpClose(exp : Pointer)
            <POP 2049a-2049c StackAdj>                       Δ+4                {}
            <MI 2049c  MOVE.L  #0xfffffc18,D7>                                  {}
        <POP 204a2-204c0 Naked>                              Σ0         ↓ →0x204c8 ←0x204c0
            <MI 204a2  MOVEA.L (A6+0x8),A0>                                     {}
            <Const 0x204a6 0x3.2>                            Δ-2                {[#3]}
            <MI 204a8  PEA.L   (A0)>                         Δ-4                {[#3]|[4, '^(A0)']}
            <Pointer.fp 0x204aa <LVAR -0x008 @>>             Δ-4                {[#3]|[4, '^(A0)']|[@@-8]}
            <Pointer.fp 0x204ae <LVAR -0x007 @>>             Δ-4                {[#3]|[4, '^(A0)']|[@@-8]|[@@-7]}
            <Call 0x204b2 0x10484>                                              {[#3]|[4, '^(A0)']|[@@-8]|[@@-7]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 204b8-204bc StackAdj>                       Δ+14               {}
            <MI 204bc  ADDQ.L  #0x1,D7>                                         {}
            <MI 204be  BEQ     0x204c8>                                         {}
        <POP 204c0-204c8 Naked>                              Σ0         ↓ →0x204a2
            <MI 204c0  MOVE.B  (A0),D0>                                         {}
            <MI 204c2  CMPI.B  #0x01,D0>                                        {}
            <MI 204c6  BNE     0x204a2>                                         {}
        <POP 204c8-204d0 Epilogue>                           Σ0         ←0x204a2

0x204d0


@ 204d0
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x006 @>
        <LVAR -0x007 @>
        <LVAR -0x008 @ 1(r)>
    <POP 204d0-2056a Body>                                              
        <POP 204d0-204e6 Prologue>                           Σ0         ↓
        <POP 204e6-204ee RegCacheLoad>                       Σ0         ↓
        <POP 204ee-2050c Naked>                              Σ0         ↓ →0x20514
            <Const 0x204ee 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x204f2 <LVAR -0x008 @ 1(r)>>        Δ-4                {[#3]|[@@-8]}
            <Pointer.fp 0x204f4 <LVAR -0x007 @>>             Δ-4                {[#3]|[@@-8]|[@@-7]}
            <Pointer.fp 0x204f8 <LVAR -0x006 @>>             Δ-4                {[#3]|[@@-8]|[@@-7]|[@@-6]}
            <Call 0x204fc 0x10484>                                              {[#3]|[@@-8]|[@@-7]|[@@-6]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 20502-20504 StackAdj>                       Δ+14               {}
            <MI 20504  MOVE.B  (A6-0x8),D0>                                     {}
            <MI 20506  CMPI.B  #0x05,D0>                                        {}
            <MI 2050a  BEQ     0x20514>                                         {}
        <POP 2050c-20514 Naked>                              Σ0         ↓
            <Const 0x2050c 0x1.2>                            Δ-2                {[#1]}
            <Call 0x2050e 0x203da>                                              {[#1]}
            <POP 20512-20514 StackAdj>                       Δ+2                {}
        <POP 20514-20558 Naked>                              Σ0         ↓ →0x20562 ←0x204ee
            <Blob 0x20514 [10] @>                            Δ-10               {[«10""»]}
            <POP 20526-20528 StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x20528 9>                                                     {[«10""»]|[$$RESET.FIU]}
            <Pointer.fp 0x2053a <LVAR -0x004 @ 4(r)>>        Δ-4                {[«10""»]|[$$RESET.FIU]|[@@-4]}
            <Call 0x2053e 0x10460>                                              {[«10""»]|[$$RESET.FIU]|[@@-4]}
                ExpLoad(a : String; b: Pointer)
            <POP 20544-20546 StackAdj>                       Δ+14               {[-4-]}
            <MI 20546  MOVE.L  (A6-0x4),(A7)>                                   {[4, '(A6-0x4)']}
            <Pointer.fp 0x2054a <LVAR -0x008 @ 1(r)>>        Δ-4                {[4, '(A6-0x4)']|[@@-8]}
            <Call 0x2054c 0x2046a>                                              {[4, '(A6-0x4)']|[@@-8]}
            <POP 20550-20552 StackAdj>                       Δ+8                {}
            <MI 20552  MOVE.B  (A6-0x8),D0>                                     {}
            <MI 20554  CMP.B   #0x01,D0>                                        {}
            <MI 20556  BEQ     0x20562>                                         {}
        <POP 20558-20562 Naked>                              Σ0         ↓
            <Const 0x20558 0x2.2>                            Δ-2                {[#2]}
            <Call 0x2055c 0x203da>                                              {[#2]}
            <POP 20560-20562 StackAdj>                       Δ+2                {}
        <POP 20562-2056a Epilogue>                           Σ0         ←0x20514

0x2056a


@ 2056a
        <LVAR -0x003 @>
        <LVAR -0x004 @>
        <LVAR -0x005 @ 1(r)>
        <LVAR -0x00d @>
        <LVAR -0x00e @ 1(r)>
        <LVAR -0x012 @ 4(r)>
        <LVAR -0x016 @ 4(r)>
        <LVAR -0x017 @ 1(r)>
        <LVAR -0x018 @ 1(r)>
        <LVAR -0x01c @ 4(r)>
    <POP 2056a-20976 Body>                                   Δ+8        
        <POP 2056a-20580 Prologue>                           Σ0         ↓
        <POP 20580-2059a RegCacheLoad>                       Σ0         ↓
        <POP 2059a-205f0 Naked>                              Σ0         ↓ →0x20672
            <Blob 0x2059a [18] @>                            Δ-18               {[«18""»]}
            <POP 205aa-205ac StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x205ac 17>                                                    {[«18""»]|[$$TRIGGER_SCOPE.FIU]}
            <Pointer.fp 0x205ba <LVAR -0x01c @ 4(r)>>        Δ-4                {[«18""»]|[$$TRIGGER_SCOPE.FIU]|[@@-28]}
            <Call 0x205bc 0x10460>                                              {[«18""»]|[$$TRIGGER_SCOPE.FIU]|[@@-28]}
                ExpLoad(a : String; b: Pointer)
            <POP 205c2-205c6 StackAdj>                       Δ+24               {[-2-]}
            <MI 205c6  CLR.B   (A7)>                                            {[-2-]}
            <MI 205c8  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x1c)']}
            <Pointer.sp 0x205ca 4>                           Δ-4                {[-2-]|[4, '(A6-0x1c)']|[^^4]}
            <Const 0x205ce 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x1c)']|[^^4]|[##0]}
            <Const 0x205d2 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x1c)']|[^^4]|[##0]|[##0]}
            <Call 0x205d6 0x10466>                                              {[-2-]|[4, '(A6-0x1c)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 205dc-205de StackAdj>                       Δ+14               {[-2-]|[-2-]}
            <MI 205de  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Pointer.fp 0x205e0 <LVAR -0x018 @ 1(r)>>        Δ-4                {[4, '(A6-0x1c)']|[@@-24]}
            <Call 0x205e2 0x2046a>                                              {[4, '(A6-0x1c)']|[@@-24]}
            <POP 205e6-205e8 StackAdj>                       Δ+8                {}
            <MI 205e8  MOVE.B  (A6-0x18),D0>                                    {}
            <MI 205ea  CMP.B   #0x01,D0>                                        {}
            <MI 205ec  BEQ     0x20672>                                         {}
        <POP 205f0-205f8 Naked>                              Σ0         ↓ →0x20602
            <MI 205f0  TST.B   0x20df3>                                         {}
            <MI 205f6  BNE     0x20602>                                         {}
        <POP 205f8-205fa Naked>                              Σ0 Δ-2     ↓
            <Const 0x205f8 0x4.2>                            Δ-2                {[#4]}
        <POP 205fa-20602 Naked>                              Σ-2 Δ+2    →0x20672 ←0x2064a
            <Call 0x205fa 0x203da>                                              {[-2-]}
            <POP 205fe-20600 StackAdj>                       Δ+2                {}
            <MI 20600  BRA     0x20672>                                         {}
        <POP 20602-2064a Naked>                              Σ0         ↓ →0x20650 ←0x205f0
            <Blob 0x20602 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x20606 [2] 0x20dff>                       Δ-2                {[«4""»]|[«2»]}
            <POP 2060c-2060e StackAdj>                       Δ-4                {[«4""»]|[«2»]|[-4-]}
            <Lit 0x2060e 4>                                                     {[«4""»]|[«2»]|[$$P1SF]}
            <POP 20618-2061a StackAdj>                       Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[-2-]}
            <POP 2061a-2061b StackAdj>                       Δ+2                {[«4""»]|[«2»]|[$$P1SF]}
            <Const 0x2061b 0x1.2>                            Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 2061c  MOVE.B  0x20df4,D0>                                      {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 20622  EXTB.W  D0>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <POP 0x20624 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 20626  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']}
            <Pointer.fp 0x20628 <LVAR -0x017 @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]}
            <Pointer.fp 0x2062c <LVAR -0x016 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]}
            <Pointer.fp 0x20630 <LVAR -0x012 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]}
            <Pointer.fp 0x20634 <LVAR -0x00e @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]}
            <Pointer.fp 0x20638 <LVAR -0x00d @>>             Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
            <Call 0x2063c 0x10550>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
                ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
            <POP 20642-20644 StackAdj>                       Δ+34               {}
            <MI 20644  TST.B   (A6-0x17)>                                       {}
            <MI 20648  BEQ     0x20650>                                         {}
        <POP 2064a-20650 Naked>                              Σ0 Δ-2     →0x205fa
            <Const 0x2064a 0x3.2>                            Δ-2                {[#3]}
            <MI 2064e  BRA     0x205fa>                                         {[#3]}
        <POP 20650-20672 Naked>                              Σ0         ↓ ←0x20602
            <MI 20650  MOVE.L  (A6-0x16),-(A7)>              Δ-4                {[4, '(A6-0x16)']}
            <MI 20654  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x16)']|[4, '(A6-0x12)']}
            <MI 20658  MOVE.B  (A6-0xe),-(A7)>               Δ-2                {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']}
            <Blob 0x2065c [8] (A6-0xd)>                      Δ-8                {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']|[«8»]}
            <Call 0x2066c 0x20434>                                              {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']|[«8»]}
            <POP 20670-20672 StackAdj>                       Δ+18               {}
        <POP 20672-206cc Naked>                              Σ0         ↓ →0x2074e ←0x2059a ←0x205fa
            <MI 20672  MOVEQ.L #0x00,D7>                                        {}
            <Blob 0x20674 [16] @>                            Δ-16               {[«16""»]}
            <POP 20686-20688 StackAdj>                       Δ-4                {[«16""»]|[-4-]}
            <Lit 0x20688 15>                                                    {[«16""»]|[$$TEST_FREEZE.FIU]}
            <Pointer.fp 0x20696 <LVAR -0x01c @ 4(r)>>        Δ-4                {[«16""»]|[$$TEST_FREEZE.FIU]|[@@-28]}
            <Call 0x20698 0x10460>                                              {[«16""»]|[$$TEST_FREEZE.FIU]|[@@-28]}
                ExpLoad(a : String; b: Pointer)
            <POP 2069e-206a2 StackAdj>                       Δ+20               {[-4-]}
            <MI 206a2  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <MI 206a4  MOVE.B  D7,-(A7)>                     Δ-2                {[4, '(A6-0x1c)']|[2, 'D7']}
            <Call 0x206a6 0x1046c>                                              {[4, '(A6-0x1c)']|[2, 'D7']}
                ExpInputFlag(exp : Pointer; val : Word)
            <POP 206ac-206ae StackAdj>                       Δ+2                {[4, '(A6-0x1c)']}
            <MI 206ae  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Const 0x206b0 0x1.2>                            Δ-2                {[4, '(A6-0x1c)']|[#1]}
            <Call 0x206b2 0x1046c>                                              {[4, '(A6-0x1c)']|[#1]}
                ExpInputFlag(exp : Pointer; val : Word)
            <POP 206b8-206ba StackAdj>                       Δ+2                {[4, '(A6-0x1c)']}
            <MI 206ba  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Pointer.fp 0x206bc <LVAR -0x018 @ 1(r)>>        Δ-4                {[4, '(A6-0x1c)']|[@@-24]}
            <Call 0x206be 0x2046a>                                              {[4, '(A6-0x1c)']|[@@-24]}
            <POP 206c2-206c4 StackAdj>                       Δ+8                {}
            <MI 206c4  MOVE.B  (A6-0x18),D0>                                    {}
            <MI 206c6  CMP.B   #0x06,D0>                                        {}
            <MI 206c8  BEQ     0x2074e>                                         {}
        <POP 206cc-206d4 Naked>                              Σ0         ↓ →0x206de
            <MI 206cc  TST.B   0x20df3>                                         {}
            <MI 206d2  BNE     0x206de>                                         {}
        <POP 206d4-206d6 Naked>                              Σ0 Δ-2     ↓
            <Const 0x206d4 0x6.2>                            Δ-2                {[#6]}
        <POP 206d6-206de Naked>                              Σ-2 Δ+2    →0x2074e ←0x20726
            <Call 0x206d6 0x203da>                                              {[-2-]}
            <POP 206da-206dc StackAdj>                       Δ+2                {}
            <MI 206dc  BRA     0x2074e>                                         {}
        <POP 206de-20726 Naked>                              Σ0         ↓ →0x2072c ←0x206cc
            <Blob 0x206de [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x206e2 [2] 0x20dff>                       Δ-2                {[«4""»]|[«2»]}
            <POP 206e8-206ea StackAdj>                       Δ-4                {[«4""»]|[«2»]|[-4-]}
            <Lit 0x206ea 4>                                                     {[«4""»]|[«2»]|[$$P1SF]}
            <POP 206f4-206f6 StackAdj>                       Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[-2-]}
            <POP 206f6-206f7 StackAdj>                       Δ+2                {[«4""»]|[«2»]|[$$P1SF]}
            <Const 0x206f7 0x1.2>                            Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 206f8  MOVE.B  0x20df4,D0>                                      {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 206fe  EXTB.W  D0>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <POP 0x20700 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 20702  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']}
            <Pointer.fp 0x20704 <LVAR -0x017 @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]}
            <Pointer.fp 0x20708 <LVAR -0x016 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]}
            <Pointer.fp 0x2070c <LVAR -0x012 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]}
            <Pointer.fp 0x20710 <LVAR -0x00e @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]}
            <Pointer.fp 0x20714 <LVAR -0x00d @>>             Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
            <Call 0x20718 0x10550>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
                ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
            <POP 2071e-20720 StackAdj>                       Δ+34               {}
            <MI 20720  TST.B   (A6-0x17)>                                       {}
            <MI 20724  BEQ     0x2072c>                                         {}
        <POP 20726-2072c Naked>                              Σ0 Δ-2     →0x206d6
            <Const 0x20726 0x5.2>                            Δ-2                {[#5]}
            <MI 2072a  BRA     0x206d6>                                         {[#5]}
        <POP 2072c-2074e Naked>                              Σ0         ↓ ←0x206de
            <MI 2072c  MOVE.L  (A6-0x16),-(A7)>              Δ-4                {[4, '(A6-0x16)']}
            <MI 20730  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x16)']|[4, '(A6-0x12)']}
            <MI 20734  MOVE.B  (A6-0xe),-(A7)>               Δ-2                {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']}
            <Blob 0x20738 [8] (A6-0xd)>                      Δ-8                {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']|[«8»]}
            <Call 0x20748 0x20434>                                              {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']|[«8»]}
            <POP 2074c-2074e StackAdj>                       Δ+18               {}
        <POP 2074e-207b6 Naked>                              Σ0         ↓ →0x207c0 ←0x20672 ←0x206d6
            <Const 0x2074e 0x3.2>                            Δ-2                {[#3]}
            <Const 0x20752 0x2.2>                            Δ-2                {[#3]|[#2]}
            <Call 0x20756 0x1048a>                                              {[#3]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 2075c-2075e StackAdj>                       Δ+4                {}
            <MI 2075e  MOVEQ.L #0x01,D7>                                        {}
            <Blob 0x20760 [16] @>                            Δ-16               {[«16""»]}
            <POP 20772-20774 StackAdj>                       Δ-4                {[«16""»]|[-4-]}
            <Lit 0x20774 15>                                                    {[«16""»]|[$$TEST_FREEZE.FIU]}
            <Pointer.fp 0x20782 <LVAR -0x01c @ 4(r)>>        Δ-4                {[«16""»]|[$$TEST_FREEZE.FIU]|[@@-28]}
            <Call 0x20784 0x10460>                                              {[«16""»]|[$$TEST_FREEZE.FIU]|[@@-28]}
                ExpLoad(a : String; b: Pointer)
            <POP 2078a-2078e StackAdj>                       Δ+20               {[-4-]}
            <MI 2078e  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <MI 20790  MOVE.B  D7,-(A7)>                     Δ-2                {[4, '(A6-0x1c)']|[2, 'D7']}
            <Call 0x20792 0x1046c>                                              {[4, '(A6-0x1c)']|[2, 'D7']}
                ExpInputFlag(exp : Pointer; val : Word)
            <POP 20798-2079a StackAdj>                       Δ+2                {[4, '(A6-0x1c)']}
            <MI 2079a  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Const 0x2079c 0x1.2>                            Δ-2                {[4, '(A6-0x1c)']|[#1]}
            <Call 0x2079e 0x1046c>                                              {[4, '(A6-0x1c)']|[#1]}
                ExpInputFlag(exp : Pointer; val : Word)
            <POP 207a4-207a6 StackAdj>                       Δ+2                {[4, '(A6-0x1c)']}
            <MI 207a6  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Pointer.fp 0x207a8 <LVAR -0x018 @ 1(r)>>        Δ-4                {[4, '(A6-0x1c)']|[@@-24]}
            <Call 0x207aa 0x2046a>                                              {[4, '(A6-0x1c)']|[@@-24]}
            <POP 207ae-207b0 StackAdj>                       Δ+8                {}
            <MI 207b0  MOVE.B  (A6-0x18),D0>                                    {}
            <MI 207b2  CMP.B   #0x01,D0>                                        {}
            <MI 207b4  BNE     0x207c0>                                         {}
        <POP 207b6-207c0 Naked>                              Σ0         →0x20920
            <Call 0x207b6 0x20d12>                                              {}
                exp_RESET.FIU()
            <MI 207bc  BRA     0x20920>                                         {}
        <POP 207c0-207f8 Naked>                              Σ0         ↓ →0x20802 ←0x2074e
            <Call 0x207c0 0x20338>                                              {}
            <Blob 0x207c4 [14] @>                            Δ-14               {[«14""»]}
            <POP 207d0-207d2 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x207d2 14>                                                    {[«14""»]|[$$TEST_PAREG.FIU]}
            <Pointer.fp 0x207de <LVAR -0x01c @ 4(r)>>        Δ-4                {[«14""»]|[$$TEST_PAREG.FIU]|[@@-28]}
            <Call 0x207e0 0x10460>                                              {[«14""»]|[$$TEST_PAREG.FIU]|[@@-28]}
                ExpLoad(a : String; b: Pointer)
            <POP 207e6-207e8 StackAdj>                       Δ+18               {[-4-]}
            <MI 207e8  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Pointer.fp 0x207ea <LVAR -0x018 @ 1(r)>>        Δ-4                {[4, '(A6-0x1c)']|[@@-24]}
            <Call 0x207ec 0x2046a>                                              {[4, '(A6-0x1c)']|[@@-24]}
            <POP 207f0-207f2 StackAdj>                       Δ+8                {}
            <MI 207f2  MOVE.B  (A6-0x18),D0>                                    {}
            <MI 207f4  CMP.B   #0x01,D0>                                        {}
            <MI 207f6  BEQ     0x20802>                                         {}
        <POP 207f8-20802 Naked>                              Σ0         ↓
            <Const 0x207f8 0x7.2>                            Δ-2                {[#7]}
            <Call 0x207fc 0x203da>                                              {[#7]}
            <POP 20800-20802 StackAdj>                       Δ+2                {}
        <POP 20802-2081e Naked>                              Σ0         ↓ →0x20828 ←0x207c0
            <Pointer.fp 0x20802 <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-5]}
            <Pointer.fp 0x20806 <LVAR -0x004 @>>             Δ-4                {[@@-5]|[@@-4]}
            <Pointer.fp 0x2080a <LVAR -0x003 @>>             Δ-4                {[@@-5]|[@@-4]|[@@-3]}
            <Call 0x2080e 0x20c3e>                                              {[@@-5]|[@@-4]|[@@-3]}
                exp_TEST_PAREG.FIU(&Fr, &Sr_1, &Sr_1)
            <POP 20814-20818 StackAdj>                       Δ+12               {}
            <MI 20818  TST.B   (A6-0x5)>                                        {}
            <MI 2081c  BNE     0x20828>                                         {}
        <POP 2081e-20828 Naked>                              Σ0         ↓
            <Const 0x2081e 0x8.2>                            Δ-2                {[#8]}
            <Call 0x20822 0x203da>                                              {[#8]}
            <POP 20826-20828 StackAdj>                       Δ+2                {}
        <POP 20828-20832 Naked>                              Σ0         ↓ →0x2083c ←0x20802
            <POP 20828-2082a StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2082a 0x2035a>                                              {[-2-]}
            <MI 2082e  TST.B   (A7)+>                        Δ+2                {}
            <MI 20830  BNE     0x2083c>                                         {}
        <POP 20832-2083c Naked>                              Σ0         ↓
            <Const 0x20832 0x9.2>                            Δ-2                {[#9]}
            <Call 0x20836 0x203da>                                              {[#9]}
            <POP 2083a-2083c StackAdj>                       Δ+2                {}
        <POP 2083c-20896 Naked>                              Σ0         ↓ →0x208a2 ←0x20828
            <Call 0x2083c 0x20d46>                                              {}
                exp_FREEZE_WORLD.FIU()
            <Blob 0x20842 [18] @>                            Δ-18               {[«18""»]}
            <POP 20852-20854 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x20854 17>                                                    {[«18""»]|[$$TRIGGER_SCOPE.FIU]}
            <Pointer.fp 0x20862 <LVAR -0x01c @ 4(r)>>        Δ-4                {[«18""»]|[$$TRIGGER_SCOPE.FIU]|[@@-28]}
            <Call 0x20864 0x10460>                                              {[«18""»]|[$$TRIGGER_SCOPE.FIU]|[@@-28]}
                ExpLoad(a : String; b: Pointer)
            <POP 2086a-2086e StackAdj>                       Δ+24               {[-2-]}
            <MI 2086e  CLR.B   (A7)>                                            {[-2-]}
            <MI 20870  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x1c)']}
            <Pointer.sp 0x20872 4>                           Δ-4                {[-2-]|[4, '(A6-0x1c)']|[^^4]}
            <Const 0x20876 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x1c)']|[^^4]|[##0]}
            <Const 0x2087a 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x1c)']|[^^4]|[##0]|[##0]}
            <Call 0x2087e 0x10466>                                              {[-2-]|[4, '(A6-0x1c)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 20884-20886 StackAdj>                       Δ+14               {[-2-]|[-2-]}
            <MI 20886  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Pointer.fp 0x20888 <LVAR -0x018 @ 1(r)>>        Δ-4                {[4, '(A6-0x1c)']|[@@-24]}
            <Call 0x2088a 0x2046a>                                              {[4, '(A6-0x1c)']|[@@-24]}
            <POP 2088e-20890 StackAdj>                       Δ+8                {}
            <MI 20890  MOVE.B  (A6-0x18),D0>                                    {}
            <MI 20892  CMP.B   #0x06,D0>                                        {}
            <MI 20894  BNE     0x208a2>                                         {}
        <POP 20896-2089a Naked>                              Σ0 Δ-2     ↓
            <Const 0x20896 0xc.2>                            Δ-2                {[#12]}
        <POP 2089a-208a2 Naked>                              Σ-2 Δ+2    →0x20920 ←0x208aa ←0x208f8
            <Call 0x2089a 0x203da>                                              {[-2-]}
            <POP 2089e-208a0 StackAdj>                       Δ+2                {}
            <MI 208a0  BRA     0x20920>                                         {}
        <POP 208a2-208aa Naked>                              Σ0         ↓ →0x208b0 ←0x2083c
            <MI 208a2  TST.B   0x20df3>                                         {}
            <MI 208a8  BNE     0x208b0>                                         {}
        <POP 208aa-208b0 Naked>                              Σ0 Δ-2     →0x2089a
            <Const 0x208aa 0xb.2>                            Δ-2                {[#11]}
            <MI 208ae  BRA     0x2089a>                                         {[#11]}
        <POP 208b0-208f8 Naked>                              Σ0         ↓ →0x208fe ←0x208a2
            <Blob 0x208b0 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x208b4 [2] 0x20dff>                       Δ-2                {[«4""»]|[«2»]}
            <POP 208ba-208bc StackAdj>                       Δ-4                {[«4""»]|[«2»]|[-4-]}
            <Lit 0x208bc 4>                                                     {[«4""»]|[«2»]|[$$P1SF]}
            <POP 208c6-208c8 StackAdj>                       Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[-2-]}
            <POP 208c8-208c9 StackAdj>                       Δ+2                {[«4""»]|[«2»]|[$$P1SF]}
            <Const 0x208c9 0x1.2>                            Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 208ca  MOVE.B  0x20df4,D0>                                      {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 208d0  EXTB.W  D0>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <POP 0x208d2 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 208d4  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']}
            <Pointer.fp 0x208d6 <LVAR -0x017 @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]}
            <Pointer.fp 0x208da <LVAR -0x016 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]}
            <Pointer.fp 0x208de <LVAR -0x012 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]}
            <Pointer.fp 0x208e2 <LVAR -0x00e @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]}
            <Pointer.fp 0x208e6 <LVAR -0x00d @>>             Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
            <Call 0x208ea 0x10550>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-23]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
                ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
            <POP 208f0-208f2 StackAdj>                       Δ+34               {}
            <MI 208f2  TST.B   (A6-0x17)>                                       {}
            <MI 208f6  BEQ     0x208fe>                                         {}
        <POP 208f8-208fe Naked>                              Σ0 Δ-2     →0x2089a
            <Const 0x208f8 0xa.2>                            Δ-2                {[#10]}
            <MI 208fc  BRA     0x2089a>                                         {[#10]}
        <POP 208fe-20920 Naked>                              Σ0         ↓ ←0x208b0
            <MI 208fe  MOVE.L  (A6-0x16),-(A7)>              Δ-4                {[4, '(A6-0x16)']}
            <MI 20902  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x16)']|[4, '(A6-0x12)']}
            <MI 20906  MOVE.B  (A6-0xe),-(A7)>               Δ-2                {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']}
            <Blob 0x2090a [8] (A6-0xd)>                      Δ-8                {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']|[«8»]}
            <Call 0x2091a 0x20434>                                              {[4, '(A6-0x16)']|[4, '(A6-0x12)']|[2, '(A6-0xe)']|[«8»]}
            <POP 2091e-20920 StackAdj>                       Δ+18               {}
        <POP 20920-2095e Naked>                              Σ0         ↓ →0x20968 ←0x207b6 ←0x2089a
            <Blob 0x20920 [26] @>                            Δ-26               {[«26""»]}
            <POP 20932-20934 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x20934 25>                                                    {[«26""»]|[$$TEST_DISABLE_MYFREEZE.FIU]}
            <Pointer.fp 0x20942 <LVAR -0x01c @ 4(r)>>        Δ-4                {[«26""»]|[$$TEST_DISABLE_MYFREEZE.FIU]|[@@-28]}
            <Call 0x20944 0x10460>                                              {[«26""»]|[$$TEST_DISABLE_MYFREEZE.FIU]|[@@-28]}
                ExpLoad(a : String; b: Pointer)
            <POP 2094a-2094e StackAdj>                       Δ+30               {[-4-]}
            <MI 2094e  MOVE.L  (A6-0x1c),(A7)>                                  {[4, '(A6-0x1c)']}
            <Pointer.fp 0x20950 <LVAR -0x018 @ 1(r)>>        Δ-4                {[4, '(A6-0x1c)']|[@@-24]}
            <Call 0x20952 0x2046a>                                              {[4, '(A6-0x1c)']|[@@-24]}
            <POP 20956-20958 StackAdj>                       Δ+8                {}
            <MI 20958  MOVE.B  (A6-0x18),D0>                                    {}
            <MI 2095a  CMP.B   #0x01,D0>                                        {}
            <MI 2095c  BEQ     0x20968>                                         {}
        <POP 2095e-20968 Naked>                              Σ0         ↓
            <Const 0x2095e 0xd.2>                            Δ-2                {[#13]}
            <Call 0x20962 0x203da>                                              {[#13]}
            <POP 20966-20968 StackAdj>                       Δ+2                {}
        <POP 20968-2096e Naked>                              Σ0         ↓ ←0x20920
            <Call 0x20968 0x20d12>                                              {}
                exp_RESET.FIU()
        <POP 2096e-20976 Epilogue>                           Σ0         

0x20976


@ 20976
        <LVAR -0x00b @>
        <LVAR -0x00c @ 1(r)>
        <LVAR -0x010 @ 4(r)>
        <LVAR -0x014 @ 4(r)>
        <LVAR -0x016 @ 1(r)>
        <LVAR -0x01c @>
        <LVAR -0x022 @>
        <LVAR -0x02a @>
        <LVAR -0x02b @>
        <LVAR -0x033 @>
        <LVAR -0x03c @>
        <LVAR -0x045 @>
        <LVAR -0x046 @>
        <LVAR -0x047 @>
        <LVAR -0x048 @ 1(r)>
    <POP 20976-20acc Body>                                   Δ+2        
        <POP 20976-2098c Prologue>                           Σ0         ↓
        <POP 2098c-2099a RegCacheLoad>                       Σ0         ↓
        <POP 2099a-209b0 Naked>                              Σ0         ↓ →0x209b8
            <Pointer.fp 0x2099a <LVAR -0x048 @ 1(r)>>        Δ-4                {[@@-72]}
            <Pointer.fp 0x2099c <LVAR -0x047 @>>             Δ-4                {[@@-72]|[@@-71]}
            <Pointer.fp 0x209a0 <LVAR -0x046 @>>             Δ-4                {[@@-72]|[@@-71]|[@@-70]}
            <Call 0x209a4 0x20c3e>                                              {[@@-72]|[@@-71]|[@@-70]}
                exp_TEST_PAREG.FIU(&Fr, &Sr_1, &Sr_1)
            <POP 209aa-209ac StackAdj>                       Δ+12               {}
            <MI 209ac  TST.B   (A6-0x48)>                                       {}
            <MI 209ae  BNE     0x209b8>                                         {}
        <POP 209b0-209b8 Naked>                              Σ0         ↓
            <Const 0x209b0 0x8.2>                            Δ-2                {[#8]}
            <Call 0x209b4 0x203da>                                              {[#8]}
            <POP 209b6-209b8 StackAdj>                       Δ+2                {}
        <POP 209b8-209c2 Naked>                              Σ0         ↓ →0x209ca ←0x2099a
            <POP 209b8-209ba StackAdj>                       Δ-2                {[-2-]}
            <Call 0x209ba 0x2035a>                                              {[-2-]}
            <MI 209be  TST.B   (A7)+>                        Δ+2                {}
            <MI 209c0  BNE     0x209ca>                                         {}
        <POP 209c2-209ca Naked>                              Σ0         ↓
            <Const 0x209c2 0x9.2>                            Δ-2                {[#9]}
            <Call 0x209c6 0x203da>                                              {[#9]}
            <POP 209c8-209ca StackAdj>                       Δ+2                {}
        <POP 209ca-209e0 Naked>                              Σ0         ↓ →0x209e8 ←0x209b8
            <Pointer.fp 0x209ca <LVAR -0x048 @ 1(r)>>        Δ-4                {[@@-72]}
            <Pointer.fp 0x209cc <LVAR -0x045 @>>             Δ-4                {[@@-72]|[@@-69]}
            <Pointer.fp 0x209d0 <LVAR -0x03c @>>             Δ-4                {[@@-72]|[@@-69]|[@@-60]}
            <Call 0x209d4 0x20cce>                                              {[@@-72]|[@@-69]|[@@-60]}
                exp_TEST_MAR_SCAN_CHAIN.FIU(&Fr, &Sr_1_4_4, &Sr_1_4_4)
            <POP 209da-209dc StackAdj>                       Δ+12               {}
            <MI 209dc  TST.B   (A6-0x48)>                                       {}
            <MI 209de  BNE     0x209e8>                                         {}
        <POP 209e0-209e8 Naked>                              Σ0         ↓
            <Const 0x209e0 0xe.2>                            Δ-2                {[#14]}
            <Call 0x209e4 0x203da>                                              {[#14]}
            <POP 209e6-209e8 StackAdj>                       Δ+2                {}
        <POP 209e8-209fe Naked>                              Σ0         ↓ →0x20a06 ←0x209ca
            <Pointer.fp 0x209e8 <LVAR -0x048 @ 1(r)>>        Δ-4                {[@@-72]}
            <Pointer.fp 0x209ea <LVAR -0x033 @>>             Δ-4                {[@@-72]|[@@-51]}
            <Pointer.fp 0x209ee <LVAR -0x02a @>>             Δ-4                {[@@-72]|[@@-51]|[@@-42]}
            <Call 0x209f2 0x20cf6>                                              {[@@-72]|[@@-51]|[@@-42]}
                exp_TEST_MDR.FIU(&Fr, &Sr_8, &Sr_8)
            <POP 209f8-209fa StackAdj>                       Δ+12               {}
            <MI 209fa  TST.B   (A6-0x48)>                                       {}
            <MI 209fc  BNE     0x20a06>                                         {}
        <POP 209fe-20a06 Naked>                              Σ0         ↓
            <Const 0x209fe 0xf.2>                            Δ-2                {[#15]}
            <Call 0x20a02 0x203da>                                              {[#15]}
            <POP 20a04-20a06 StackAdj>                       Δ+2                {}
        <POP 20a06-20a1e Naked>                              Σ0         ↓ →0x20aa8 ←0x209e8
            <Pointer.fp 0x20a06 <LVAR -0x048 @ 1(r)>>        Δ-4                {[@@-72]}
            <Pointer.fp 0x20a08 <LVAR -0x022 @>>             Δ-4                {[@@-72]|[@@-34]}
            <Pointer.fp 0x20a0c <LVAR -0x01c @>>             Δ-4                {[@@-72]|[@@-34]|[@@-28]}
            <Call 0x20a10 0x20c22>                                              {[@@-72]|[@@-34]|[@@-28]}
                exp_TEST_UIR.FIU(&Fr, &Sr_6, &Sr_6)
            <POP 20a16-20a18 StackAdj>                       Δ+12               {}
            <MI 20a18  TST.B   (A6-0x48)>                                       {}
            <MI 20a1a  BNE     0x20aa8>                                         {}
        <POP 20a1e-20a26 Naked>                              Σ0         ↓ →0x20a30
            <MI 20a1e  TST.B   0x20df3>                                         {}
            <MI 20a24  BNE     0x20a30>                                         {}
        <POP 20a26-20a2a Naked>                              Σ0 Δ-2     ↓
            <Const 0x20a26 0x11.2>                           Δ-2                {[#17]}
        <POP 20a2a-20a30 Naked>                              Σ-2 Δ+2    →0x20aa8 ←0x20a80
            <Call 0x20a2a 0x203da>                                              {[-2-]}
            <POP 20a2c-20a2e StackAdj>                       Δ+2                {}
            <MI 20a2e  BRA     0x20aa8>                                         {}
        <POP 20a30-20a80 Naked>                              Σ0         ↓ →0x20a86 ←0x20a1e
            <Blob 0x20a30 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x20a34 [2] 0x20dff>                       Δ-2                {[«4""»]|[«2»]}
            <POP 20a3a-20a3c StackAdj>                       Δ-4                {[«4""»]|[«2»]|[-4-]}
            <Lit 0x20a3c 4>                                                     {[«4""»]|[«2»]|[$$P1SF]}
            <POP 20a4c-20a4e StackAdj>                       Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[-2-]}
            <POP 20a4e-20a4f StackAdj>                       Δ+2                {[«4""»]|[«2»]|[$$P1SF]}
            <Const 0x20a4f 0x1.2>                            Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 20a50  MOVE.B  0x20df4,D0>                                      {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 20a56  EXTB.W  D0>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <POP 0x20a58 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[«2»]|[$$P1SF]|[#1]}
            <MI 20a5a  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']}
            <Pointer.fp 0x20a5c <LVAR -0x016 @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]}
            <Pointer.fp 0x20a60 <LVAR -0x014 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]}
            <Pointer.fp 0x20a64 <LVAR -0x010 @ 4(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]}
            <Pointer.fp 0x20a68 <LVAR -0x00c @ 1(r)>>        Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-12]}
            <Pointer.fp 0x20a6c <LVAR -0x00b @>>             Δ-4                {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-12]|[@@-11]}
            <Call 0x20a70 0x10550>                                              {[«4""»]|[«2»]|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-12]|[@@-11]}
                ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
            <POP 20a76-20a7a StackAdj>                       Δ+34               {}
            <MI 20a7a  TST.B   (A6-0x16)>                                       {}
            <MI 20a7e  BEQ     0x20a86>                                         {}
        <POP 20a80-20a86 Naked>                              Σ0 Δ-2     →0x20a2a
            <Const 0x20a80 0x10.2>                           Δ-2                {[#16]}
            <MI 20a84  BRA     0x20a2a>                                         {[#16]}
        <POP 20a86-20aa8 Naked>                              Σ0         ↓ ←0x20a30
            <MI 20a86  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0x14)']}
            <MI 20a8a  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x10)']}
            <MI 20a8e  MOVE.B  (A6-0xc),-(A7)>               Δ-2                {[4, '(A6-0x14)']|[4, '(A6-0x10)']|[2, '(A6-0xc)']}
            <Blob 0x20a92 [8] (A6-0xb)>                      Δ-8                {[4, '(A6-0x14)']|[4, '(A6-0x10)']|[2, '(A6-0xc)']|[«8»]}
            <Call 0x20aa2 0x20434>                                              {[4, '(A6-0x14)']|[4, '(A6-0x10)']|[2, '(A6-0xc)']|[«8»]}
            <POP 20aa6-20aa8 StackAdj>                       Δ+18               {}
        <POP 20aa8-20abe Naked>                              Σ0         ↓ →0x20ac4 ←0x20a06 ←0x20a2a
            <Pointer.fp 0x20aa8 <LVAR -0x048 @ 1(r)>>        Δ-4                {[@@-72]}
            <Pointer.fp 0x20aaa <LVAR -0x047 @>>             Δ-4                {[@@-72]|[@@-71]}
            <Pointer.fp 0x20aae <LVAR -0x02b @>>             Δ-4                {[@@-72]|[@@-71]|[@@-43]}
            <Call 0x20ab2 0x20caa>                                              {[@@-72]|[@@-71]|[@@-43]}
                exp_TEST_MAR_TO_UIR.FIU(&Fr, &Sr_1, &Sr_1)
            <POP 20ab8-20aba StackAdj>                       Δ+12               {}
            <MI 20aba  TST.B   (A6-0x48)>                                       {}
            <MI 20abc  BNE     0x20ac4>                                         {}
        <POP 20abe-20ac4 Naked>                              Σ0         ↓
            <Const 0x20abe 0x12.2>                           Δ-2                {[#18]}
            <Call 0x20ac0 0x203da>                                              {[#18]}
            <POP 20ac2-20ac4 StackAdj>                       Δ+2                {}
        <POP 20ac4-20acc Epilogue>                           Σ0         ←0x20aa8

0x20acc


@ 20acc
        <LVAR -0x004 @>
        <LVAR -0x005 @ 1(r)>
        <LVAR -0x007 @>
        <LVAR -0x008 @>
    <POP 20acc-20b36 Body>                                              
        <POP 20acc-20ae2 Prologue>                           Σ0         ↓
        <POP 20ae2-20ae6 RegCacheLoad>                       Σ0         ↓
        <POP 20ae6-20b02 Naked>                              Σ0         ↓ →0x20b0c
            <Pointer.fp 0x20ae6 <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-5]}
            <Pointer.fp 0x20ae8 <LVAR -0x004 @>>             Δ-4                {[@@-5]|[@@-4]}
            <Pointer.fp 0x20aec <LVAR -0x008 @>>             Δ-4                {[@@-5]|[@@-4]|[@@-8]}
            <Pointer.fp 0x20af0 <LVAR -0x007 @>>             Δ-4                {[@@-5]|[@@-4]|[@@-8]|[@@-7]}
            <Call 0x20af4 0x20c5c>                                              {[@@-5]|[@@-4]|[@@-8]|[@@-7]}
                exp_TEST_NOVRAM_DATA.FIU(&Fr, &Sr_1, &Sr_1, &Sr_1)
            <POP 20afa-20afe StackAdj>                       Δ+16               {}
            <MI 20afe  TST.B   (A6-0x5)>                                        {}
            <MI 20b00  BNE     0x20b0c>                                         {}
        <POP 20b02-20b0c Naked>                              Σ0         ↓
            <Const 0x20b02 0x15.2>                           Δ-2                {[#21]}
            <Call 0x20b06 0x203da>                                              {[#21]}
            <POP 20b0a-20b0c StackAdj>                       Δ+2                {}
        <POP 20b0c-20b24 Naked>                              Σ0         ↓ →0x20b2e ←0x20ae6
            <Pointer.fp 0x20b0c <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-5]}
            <Pointer.fp 0x20b0e <LVAR -0x004 @>>             Δ-4                {[@@-5]|[@@-4]}
            <Pointer.fp 0x20b12 <LVAR -0x007 @>>             Δ-4                {[@@-5]|[@@-4]|[@@-7]}
            <Call 0x20b16 0x20c82>                                              {[@@-5]|[@@-4]|[@@-7]}
                exp_TEST_NOVRAM_ADDRESS.FIU(&Fr, &Sr_1, &Sr_1)
            <POP 20b1c-20b20 StackAdj>                       Δ+12               {}
            <MI 20b20  TST.B   (A6-0x5)>                                        {}
            <MI 20b22  BNE     0x20b2e>                                         {}
        <POP 20b24-20b2e Naked>                              Σ0         ↓
            <Const 0x20b24 0x16.2>                           Δ-2                {[#22]}
            <Call 0x20b28 0x203da>                                              {[#22]}
            <POP 20b2c-20b2e StackAdj>                       Δ+2                {}
        <POP 20b2e-20b36 Epilogue>                           Σ0         ←0x20b0c

0x20b36


@ 20b36
START
    <POP 20b36--0001 Body>                                              
        <POP 20b36-20b40 Prologue>                           Σ0         
        <POP 20b40-20b58 RegCacheLoad>                       Σ0         ↓
        <POP 20b58-20bba Naked>                              Σ0         ↓
            <Call 0x20b58 0x10398>                                              {}
                FSCALL_10398
            <Const 0x20b5e 0x20df3.4>                        Δ-4                {[##134643]}
            <Const 0x20b64 0x20df4.4>                        Δ-4                {[##134643]|[##134644]}
            <Call 0x20b66 0x10544>                                              {[##134643]|[##134644]}
                IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
            <POP 20b6c-20b6e StackAdj>                       Δ+8                {}
            <Const 0x20b6e 0xf.4>                            Δ-4                {[##15]}
            <Call 0x20b72 0x104d8>                                              {[##15]}
                ExpInit(a : Long)
            <POP 20b78-20b7a StackAdj>                       Δ+2                {[-2-]}
            <POP 20b7a-20b7b StackAdj>                       Δ+2                {}
            <Blob 0x20b7b [2] 0x20df4>                       Δ-2                {[«2»]}
            <Call 0x20b7c 0x104d2>                                              {[«2»]}
                SetExpInitDone(a : Byte)
            <POP 20b82-20b83 StackAdj>                       Δ+2        ↓       {}
            <Blob 0x20b83 [6] @>                             Δ-6                {[«6""»]}
            <POP 20b92-20b94 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x20b94 5>                                                     {[«6""»]|[$$P1FIU]}
            <MI 20ba4  MOVE.L  (A7)+,0x20de2>                Δ+4                {[«6""»]}
            <POP 20ba6-20ba8 StackAdj>                       Δ+6                {}
            <Const 0x20ba8 0x20de6.4>                        Δ-4                {[##134630]}
            <Call 0x20baa 0x102b8>                                              {[##134630]}
                NewString(VAR a : String)
            <POP 20bb0-20bb2 StackAdj>                       Δ+4                {}
            <MI 20bb2  CLR.B   0x20dea>                                         {}
            <MI 20bb8  MOVEQ.L #0x00,D0>                                        {}
        <POP 20bba-20bd6 Naked>                              Σ0         ↓ →0x20bba ←0x20bba
            <MI 20bba  MOVE.L  D0,0x20df6>                                      {}
            <POP 0x20bc0 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 20bc6  LEA.L   0x20dda,A0>                                      {}
            <MI 20bcc  CLR.B   (A0+D0.L+#0x11)>                                 {}
            <MI 20bd0  ADDQ.L  #0x1,D0>                                         {}
            <MI 20bd2  CMP.L   #0x07,D0>                                        {}
            <MI 20bd4  BLE     0x20bba>                                         {}
        <POP 20bd6-20c1c Naked>                              Σ0         ↓
            <MI 20bd6  MOVE.B  #0x05,0x20dff>                                   {}
            <Call 0x20bdc 0x20338>                                              {}
            <Call 0x20be0 0x204d0>                                              {}
            <Call 0x20be4 0x2056a>                                              {}
            <Call 0x20be8 0x20976>                                              {}
            <Call 0x20bec 0x20acc>                                              {}
            <Call 0x20bf0 0x20338>                                              {}
            <Const 0x20bf4 0x1.2>                            Δ-2                {[#1]}
            <Blob 0x20bf6 [4] 0x20de2>                       Δ-4                {[#1]|[«4»]}
            <Blob 0x20bf8 [4] 0x20de6>                       Δ-4                {[#1]|[«4»]|[«4»]}
            <Blob 0x20bfa [2] 0x20dea>                       Δ-2                {[#1]|[«4»]|[«4»]|[«2»]}
            <Blob 0x20c00 [8] 0x20deb>                       Δ-8                {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
            <Call 0x20c12 0x1054a>                                              {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20c18-20c1c StackAdj>                       Δ+20               {}
        <POP 20c1c-20c22 Naked>                              Σ0         
            <Call 0x20c1c 0x10284>                                              {}
                ?exit

0x20d72


@ 20d72
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 20d72-20dda Body>                                              
        <POP 20d72-20d88 Prologue>                           Σ0         ↓
        <POP 20d88-20dd2 Naked>                              Σ0         ↓
            <Blob 0x20d88 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x20d94 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 20d98-20d9a StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x20d9a 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 20dac-20dae StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20dae  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20db2  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20db4  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20db6  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x20db8 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 20dbe-20dc0 StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x20dc0 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20dc6-20dc8 StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x20dc8 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 20dce-20dd2 StackAdj>                       Δ+20               {}
        <POP 20dd2-20dda Epilogue>                           Σ0         

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.fe612353aebf086e
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 0b 36              |   6    |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 0e 0a              |        |		.PTR	0x20e0a
00020010					code.end:
00020010 00 02 0d da              |        |		.PTR	0x20dda
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 0d 72              |   r    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 01 fc              |        |		.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 52 45 53 45 54 2e 46 49  |RESET.FI|		.TXT	'RESET.FIU '
00020168 54 52 49 47 47 45 52 5f  |TRIGGER_|		.TXT	'TRIGGER_SCOPE.FIU '
0002017a 50 31 53 46              |P1SF    |		.TXT	'P1SF'
0002017e 54 45 53 54 5f 46 52 45  |TEST_FRE|		.TXT	'TEST_FREEZE.FIU '
0002018e 50 31 53 46              |P1SF    |		.TXT	'P1SF'
00020192 54 45 53 54 5f 46 52 45  |TEST_FRE|		.TXT	'TEST_FREEZE.FIU '
000201a2 54 45 53 54 5f 50 41 52  |TEST_PAR|		.TXT	'TEST_PAREG.FIU'
000201b0 54 52 49 47 47 45 52 5f  |TRIGGER_|		.TXT	'TRIGGER_SCOPE.FIU '
000201c2 50 31 53 46              |P1SF    |		.TXT	'P1SF'
000201c6 54 45 53 54 5f 44 49 53  |TEST_DIS|		.TXT	'TEST_DISABLE_MYFREEZE.FIU '
000201e0 50 31 53 46              |P1SF    |		.TXT	'P1SF'
000201e4 50 31 46 49 55 20        |P1FIU   |		.TXT	'P1FIU '
000201ea fe 01 fd 01 fb 01        |        |		.XXX[0x6]
000201f0 f7 01 ef 01 df 01 bf 01  |        |		.XXX[0x8]
000201f8 7f 01 ff 00              |        |		.XXX[0x4]
000201fc ; --------------------------------------------------------------------------------------
000201fc ; OMSI PASCAL Function
000201fc ;    <LVAR  0x00e 1(r)>
000201fc ;    <LVAR  0x00a 4(r)>
000201fc ;    <LVAR  0x008 1(r)>
000201fc ; --------------------------------------------------------------------------------------
000201fc					EXP_FAIL:
000201fc 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
00020200 bf d5                    |        |		CMPA.L	(A5),A7
00020202 62 06                    |b       |		BHI	0x2020a
00020204 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020208 4e 76                    |Nv      |		TRAPV
0002020a de fc 00 74              |   t    |		ADDA.W	#0x74,A7
0002020e 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00020212 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00020218 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
0002021e 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020220 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
00020222 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
00020224 78 12                    |x       |		MOVEQ.L	#0x12,D4
00020226 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
00020228 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
0002022e 41 fa ff 16              |A       |		LEA.L	0x20146,A0
00020232 70 08                    |p       |		MOVEQ.L	#0x08,D0
00020234 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020236 51 c8 ff fc              |Q       |		DBF	D0,0x20234
0002023a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002023c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020240 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020242 3f 04                    |?       |		MOVE.W	D4,-(A7)
00020244 4e 93                    |N       |		JSR	(A3)
00020246 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020248 4e 94                    |N       |		JSR	(A4)
0002024a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002024c 20 4f                    | O      |		MOVEA.L	A7,A0
0002024e 43 fa fe ba              |C       |		LEA.L	0x2010a,A1
00020252 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020254 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020256 51 c8 ff fc              |Q       |		DBF	D0,0x20254
0002025a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002025c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020260 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020262 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020264 4e 93                    |N       |		JSR	(A3)
00020266 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020268 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
0002026c 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
00020272 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020274 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002027a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002027c 4e 94                    |N       |		JSR	(A4)
0002027e de c4                    |        |		ADDA.W	D4,A7
00020280 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
00020284 b0 c1                    |        |		CMPA.W	D1,A0
00020286 67 48                    |gH      |		BEQ	0x202d0
00020288 9e c5                    |        |		SUBA.W	D5,A7
0002028a 22 4f                    |"O      |		MOVEA.L	A7,A1
0002028c 45 fa fe 8a              |E       |		LEA.L	0x20118,A2
00020290 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020292 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020294 51 c8 ff fc              |Q       |		DBF	D0,0x20292
00020298 9e c3                    |        |		SUBA.W	D3,A7
0002029a 22 4f                    |"O      |		MOVEA.L	A7,A1
0002029c 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
000202a0 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
000202a2 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000202a4 51 c8 ff fc              |Q       |		DBF	D0,0x202a2
000202a8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202aa 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
000202ae 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202b0 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202b2 4e 93                    |N       |		JSR	(A3)
000202b4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000202b6 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000202ba 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202bc 3f 03                    |?       |		MOVE.W	D3,-(A7)
000202be 4e 93                    |N       |		JSR	(A3)
000202c0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202c2 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000202c8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202ca 4e 94                    |N       |		JSR	(A4)
000202cc de fc 00 30              |   0    |		ADDA.W	#0x30,A7
000202d0 9e c5                    |        |		SUBA.W	D5,A7
000202d2 20 4f                    | O      |		MOVEA.L	A7,A0
000202d4 43 fa fe 50              |C  P    |		LEA.L	0x20126,A1
000202d8 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000202da 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000202dc 51 c8 ff fc              |Q       |		DBF	D0,0x202da
000202e0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202e2 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000202e6 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202e8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202ea 4e 93                    |N       |		JSR	(A3)
000202ec 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202ee 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000202f2 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
000202f8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202fa 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020300 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020302 4e 94                    |N       |		JSR	(A4)
00020304 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00020306 20 4f                    | O      |		MOVEA.L	A7,A0
00020308 43 fa fe 3c              |C  <    |		LEA.L	0x20146,A1
0002030c 70 16                    |p       |		MOVEQ.L	#0x16,D0
0002030e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020310 51 c8 ff fc              |Q       |		DBF	D0,0x2030e
00020314 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020318 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002031a 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002031e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020320 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
00020324 4e 93                    |N       |		JSR	(A3)
00020326 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020328 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002032e de c3                    |        |		ADDA.W	D3,A7
00020330 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00020334 4e 5e                    |N^      |		UNLK	A6
00020336 4e 75                    |Nu      |		RTS
00020338 ; --------------------------------------------------------------------------------------
00020338 ; OMSI PASCAL Function
00020338 ; --------------------------------------------------------------------------------------
00020338 4e 56 ff fc              |NV      |		LINK.W	A6,#0xfffc
0002033c bf d5                    |        |		CMPA.L	(A5),A7
0002033e 62 06                    |b       |		BHI	0x20346
00020340 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020344 4e 76                    |Nv      |		TRAPV
00020346 de fc 00 04              |        |		ADDA.W	#0x4,A7
0002034a 4e b9 00 01 05 b6        |N       |		JSR	R1000_Reset_L(void)
00020350 4e b9 00 01 05 bc        |N       |		JSR	R1000_Reset_H(void)
00020356 4e 5e                    |N^      |		UNLK	A6
00020358 4e 75                    |Nu      |		RTS
0002035a ; --------------------------------------------------------------------------------------
0002035a ; OMSI PASCAL Function
0002035a ;    <LVAR  0x008 1(w)>
0002035a ;    <LVAR -0x001 @>
0002035a ;    <LVAR -0x002 @ 1(r)>
0002035a ;    <LVAR -0x003 @>
0002035a ; --------------------------------------------------------------------------------------
0002035a 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
0002035e bf d5                    |        |		CMPA.L	(A5),A7
00020360 62 06                    |b       |		BHI	0x20368
00020362 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020366 4e 76                    |Nv      |		TRAPV
00020368 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
0002036c 48 e7 e3 80              |H       |		MOVEM.L	A0+D7+D6+D2+D1+D0,-(A7)
00020370 74 08                    |t       |		MOVEQ.L	#0x08,D2
00020372 7e ff                    |~       |		MOVEQ.L	#-0x01,D7
00020374 52 87                    |R       |		ADDQ.L	#0x1,D7
00020376 be 82                    |        |		CMP.L	D2,D7
00020378 63 02                    |c       |		BLS	0x2037c
0002037a 4e 4f                    |NO      |		TRAP	#15
0002037c 20 07                    |        |		MOVE.L	D7,D0
0002037e e3 80                    |        |		ASL.L	#0x1,D0
00020380 41 fa fe 68              |A  h    |		LEA.L	0x201ea,A0
00020384 1f 30 08 00              | 0      |		MOVE.B	(A0+D0.L),-(A7)
00020388 42 27                    |B'      |		CLR.B	-(A7)
0002038a 4e b9 00 02 0d 28        |N    (  |		JSR	exp_LOAD_PAREG.FIU(Sw_1, Sw_1)
00020390 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020392 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00020396 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
0002039a 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002039e 48 6e ff ff              |Hn      |		PEA.L	(A6-0x1)
000203a2 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
000203a8 de fc 00 0e              |        |		ADDA.W	#0xe,A7
000203ac 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000203ae 41 fa fe 3a              |A  :    |		LEA.L	0x201ea,A0
000203b2 12 2e ff fe              | .      |		MOVE.B	(A6-0x2),D1
000203b6 b2 30 08 01              | 0      |		CMP.B	(A0+D0.L+#0x1),D1
000203ba 66 02                    |f       |		BNE	0x203be
000203bc 52 06                    |R       |		ADDQ.B	#0x1,D6
000203be 4a 06                    |J       |		TST.B	D6
000203c0 67 04                    |g       |		BEQ	0x203c6
000203c2 be 82                    |        |		CMP.L	D2,D7
000203c4 66 ae                    |f       |		BNE	0x20374
000203c6 10 06                    |        |		MOVE.B	D6,D0
000203c8 48 80                    |H       |		EXTB.W	D0
000203ca 41 bc 00 01              |A       |		CHK.W	#0x1,D0
000203ce 1d 40 00 08              | @      |		MOVE.B	D0,(A6+0x8)
000203d2 4c df 01 c7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D6+D7+A0
000203d6 4e 5e                    |N^      |		UNLK	A6
000203d8 4e 75                    |Nu      |		RTS
000203da ; --------------------------------------------------------------------------------------
000203da ; OMSI PASCAL Function
000203da ;    <LVAR  0x008 1(r)>
000203da ; --------------------------------------------------------------------------------------
000203da 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
000203de bf d5                    |        |		CMPA.L	(A5),A7
000203e0 62 06                    |b       |		BHI	0x203e8
000203e2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000203e6 4e 76                    |Nv      |		TRAPV
000203e8 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
000203ec 48 e7 80 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D0,-(A7)
000203f0 45 f9 00 02 0d eb        |E       |		LEA.L	0x20deb,A2
000203f6 47 f9 00 02 0d ea        |G       |		LEA.L	0x20dea,A3
000203fc 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
00020400 16 ae 00 08              |        |		MOVE.B	(A6+0x8),(A3)
00020404 42 27                    |B'      |		CLR.B	-(A7)
00020406 2f 39 00 02 0d e2        |/9      |		MOVE.L	0x20de2,-(A7)
0002040c 2f 39 00 02 0d e6        |/9      |		MOVE.L	0x20de6,-(A7)
00020412 1f 13                    |        |		MOVE.B	(A3),-(A7)
00020414 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020416 20 4f                    | O      |		MOVEA.L	A7,A0
00020418 22 4a                    |"J      |		MOVEA.L	A2,A1
0002041a 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002041c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002041e 51 c8 ff fc              |Q       |		DBF	D0,0x2041c
00020422 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020428 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002042c 4c df 0f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3
00020430 4e 5e                    |N^      |		UNLK	A6
00020432 4e 75                    |Nu      |		RTS
00020434 ; --------------------------------------------------------------------------------------
00020434 ; OMSI PASCAL Function
00020434 ;    <LVAR  0x016 4(r)>
00020434 ;    <LVAR  0x012 4(r)>
00020434 ;    <LVAR  0x010 1(r)>
00020434 ;    <LVAR  0x00c 4(r)>
00020434 ;    <LVAR  0x008 4(r)>
00020434 ; --------------------------------------------------------------------------------------
00020434 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
00020438 bf d5                    |        |		CMPA.L	(A5),A7
0002043a 62 06                    |b       |		BHI	0x20442
0002043c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020440 4e 76                    |Nv      |		TRAPV
00020442 de fc 00 18              |        |		ADDA.W	#0x18,A7
00020446 42 27                    |B'      |		CLR.B	-(A7)
00020448 2f 2e 00 16              |/.      |		MOVE.L	(A6+0x16),-(A7)
0002044c 2f 2e 00 12              |/.      |		MOVE.L	(A6+0x12),-(A7)
00020450 1f 2e 00 10              | .      |		MOVE.B	(A6+0x10),-(A7)
00020454 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020458 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002045c 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020462 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020466 4e 5e                    |N^      |		UNLK	A6
00020468 4e 75                    |Nu      |		RTS
0002046a ; --------------------------------------------------------------------------------------
0002046a ; OMSI PASCAL Function
0002046a ;    <LVAR  0x00c @ 4(r)>
0002046a ;    <LVAR  0x008 4(r)>
0002046a ;    <LVAR -0x007 @>
0002046a ;    <LVAR -0x008 @>
0002046a ; --------------------------------------------------------------------------------------
0002046a 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
0002046e bf d5                    |        |		CMPA.L	(A5),A7
00020470 62 06                    |b       |		BHI	0x20478
00020472 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020476 4e 76                    |Nv      |		TRAPV
00020478 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
0002047c 48 e7 c1 80              |H       |		MOVEM.L	A0+D7+D1+D0,-(A7)
00020480 72 03                    |r       |		MOVEQ.L	#0x03,D1
00020482 1f 01                    |        |		MOVE.B	D1,-(A7)
00020484 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020488 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
0002048e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020490 48 6e 00 0c              |Hn      |		PEA.L	(A6+0xc)
00020494 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
0002049a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002049c 2e 3c ff ff fc 18        |.<      |		MOVE.L	#0xfffffc18,D7
000204a2 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000204a6 1f 01                    |        |		MOVE.B	D1,-(A7)
000204a8 48 50                    |HP      |		PEA.L	(A0)
000204aa 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000204ae 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
000204b2 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
000204b8 de fc 00 0e              |        |		ADDA.W	#0xe,A7
000204bc 52 87                    |R       |		ADDQ.L	#0x1,D7
000204be 67 08                    |g       |		BEQ	0x204c8
000204c0 10 10                    |        |		MOVE.B	(A0),D0
000204c2 0c 00 00 01              |        |		CMPI.B	#0x01,D0
000204c6 66 da                    |f       |		BNE	0x204a2
000204c8 4c df 01 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0
000204cc 4e 5e                    |N^      |		UNLK	A6
000204ce 4e 75                    |Nu      |		RTS
000204d0 ; --------------------------------------------------------------------------------------
000204d0 ; OMSI PASCAL Function
000204d0 ;    <LVAR -0x004 @ 4(r)>
000204d0 ;    <LVAR -0x006 @>
000204d0 ;    <LVAR -0x007 @>
000204d0 ;    <LVAR -0x008 @ 1(r)>
000204d0 ; --------------------------------------------------------------------------------------
000204d0 4e 56 ff c6              |NV      |		LINK.W	A6,#0xffc6
000204d4 bf d5                    |        |		CMPA.L	(A5),A7
000204d6 62 06                    |b       |		BHI	0x204de
000204d8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204dc 4e 76                    |Nv      |		TRAPV
000204de de fc 00 32              |   2    |		ADDA.W	#0x32,A7
000204e2 48 e7 e0 e0              |H       |		MOVEM.L	A2+A1+A0+D2+D1+D0,-(A7)
000204e6 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
000204ea 72 01                    |r       |		MOVEQ.L	#0x01,D1
000204ec 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
000204ee 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
000204f2 48 52                    |HR      |		PEA.L	(A2)
000204f4 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
000204f8 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
000204fc 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
00020502 de c2                    |        |		ADDA.W	D2,A7
00020504 10 12                    |        |		MOVE.B	(A2),D0
00020506 0c 00 00 05              |        |		CMPI.B	#0x05,D0
0002050a 67 08                    |g       |		BEQ	0x20514
0002050c 1f 01                    |        |		MOVE.B	D1,-(A7)
0002050e 4e ba fe ca              |N       |		JSR	0x203da
00020512 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020514 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
00020518 20 4f                    | O      |		MOVEA.L	A7,A0
0002051a 43 fa fc 42              |C  B    |		LEA.L	0x2015e,A1
0002051e 70 08                    |p       |		MOVEQ.L	#0x08,D0
00020520 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020522 51 c8 ff fc              |Q       |		DBF	D0,0x20520
00020526 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020528 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002052c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002052e 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
00020532 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020538 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002053a 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002053e 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
00020544 de c2                    |        |		ADDA.W	D2,A7
00020546 2e ae ff fc              |.       |		MOVE.L	(A6-0x4),(A7)
0002054a 48 52                    |HR      |		PEA.L	(A2)
0002054c 4e ba ff 1c              |N       |		JSR	0x2046a
00020550 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020552 10 12                    |        |		MOVE.B	(A2),D0
00020554 b0 01                    |        |		CMP.B	D1,D0
00020556 67 0a                    |g       |		BEQ	0x20562
00020558 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
0002055c 4e ba fe 7c              |N  |    |		JSR	0x203da
00020560 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020562 4c df 07 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2
00020566 4e 5e                    |N^      |		UNLK	A6
00020568 4e 75                    |Nu      |		RTS
0002056a ; --------------------------------------------------------------------------------------
0002056a ; OMSI PASCAL Function
0002056a ;    <LVAR -0x003 @>
0002056a ;    <LVAR -0x004 @>
0002056a ;    <LVAR -0x005 @ 1(r)>
0002056a ;    <LVAR -0x00d @>
0002056a ;    <LVAR -0x00e @ 1(r)>
0002056a ;    <LVAR -0x012 @ 4(r)>
0002056a ;    <LVAR -0x016 @ 4(r)>
0002056a ;    <LVAR -0x017 @ 1(r)>
0002056a ;    <LVAR -0x018 @ 1(r)>
0002056a ;    <LVAR -0x01c @ 4(r)>
0002056a ; --------------------------------------------------------------------------------------
0002056a 4e 56 ff 86              |NV      |		LINK.W	A6,#0xff86
0002056e bf d5                    |        |		CMPA.L	(A5),A7
00020570 62 06                    |b       |		BHI	0x20578
00020572 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020576 4e 76                    |Nv      |		TRAPV
00020578 de fc 00 5e              |   ^    |		ADDA.W	#0x5e,A7
0002057c 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020580 45 ee ff e4              |E       |		LEA.L	(A6-0x1c),A2
00020584 47 ee ff e8              |G       |		LEA.L	(A6-0x18),A3
00020588 49 f9 00 01 02 c4        |I       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A4
0002058e 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020590 74 12                    |t       |		MOVEQ.L	#0x12,D2
00020592 76 04                    |v       |		MOVEQ.L	#0x04,D3
00020594 78 0e                    |x       |		MOVEQ.L	#0x0e,D4
00020596 7a 22                    |z"      |		MOVEQ.L	#0x22,D5
00020598 7c 06                    ||       |		MOVEQ.L	#0x06,D6
0002059a 9e c2                    |        |		SUBA.W	D2,A7
0002059c 20 4f                    | O      |		MOVEA.L	A7,A0
0002059e 43 fa fb c8              |C       |		LEA.L	0x20168,A1
000205a2 70 10                    |p       |		MOVEQ.L	#0x10,D0
000205a4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000205a6 51 c8 ff fc              |Q       |		DBF	D0,0x205a4
000205aa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000205ac 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000205b0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000205b2 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
000205b6 4e 94                    |N       |		JSR	(A4)
000205b8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000205ba 48 52                    |HR      |		PEA.L	(A2)
000205bc 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000205c2 de fc 00 18              |        |		ADDA.W	#0x18,A7
000205c6 42 17                    |B       |		CLR.B	(A7)
000205c8 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000205ca 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000205ce 48 78 00 00              |Hx      |		PEA.L	0x0
000205d2 48 78 00 00              |Hx      |		PEA.L	0x0
000205d6 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
000205dc de c4                    |        |		ADDA.W	D4,A7
000205de 2e 92                    |.       |		MOVE.L	(A2),(A7)
000205e0 48 53                    |HS      |		PEA.L	(A3)
000205e2 4e ba fe 86              |N       |		JSR	0x2046a
000205e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000205e8 10 13                    |        |		MOVE.B	(A3),D0
000205ea b0 01                    |        |		CMP.B	D1,D0
000205ec 67 00 00 84              |g       |		BEQ	0x20672
000205f0 4a 39 00 02 0d f3        |J9      |		TST.B	0x20df3
000205f6 66 0a                    |f       |		BNE	0x20602
000205f8 1f 03                    |        |		MOVE.B	D3,-(A7)
000205fa 4e ba fd de              |N       |		JSR	0x203da
000205fe 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020600 60 70                    |`p      |		BRA	0x20672
00020602 2f 3a fb 76              |/: v    |		MOVE.L	0x2017a,-(A7)
00020606 1f 39 00 02 0d ff        | 9      |		MOVE.B	0x20dff,-(A7)
0002060c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002060e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020612 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020614 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020616 4e 94                    |N       |		JSR	(A4)
00020618 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002061a 1e 81                    |        |		MOVE.B	D1,(A7)
0002061c 10 39 00 02 0d f4        | 9      |		MOVE.B	0x20df4,D0
00020622 48 80                    |H       |		EXTB.W	D0
00020624 41 81                    |A       |		CHK.W	D1,D0
00020626 1f 00                    |        |		MOVE.B	D0,-(A7)
00020628 48 6e ff e9              |Hn      |		PEA.L	(A6-0x17)
0002062c 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
00020630 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00020634 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00020638 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
0002063c 4e b9 00 01 05 50        |N    P  |		JSR	?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
00020642 de c5                    |        |		ADDA.W	D5,A7
00020644 4a 2e ff e9              |J.      |		TST.B	(A6-0x17)
00020648 67 06                    |g       |		BEQ	0x20650
0002064a 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
0002064e 60 aa                    |`       |		BRA	0x205fa
00020650 2f 2e ff ea              |/.      |		MOVE.L	(A6-0x16),-(A7)
00020654 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
00020658 1f 2e ff f2              | .      |		MOVE.B	(A6-0xe),-(A7)
0002065c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002065e 20 4f                    | O      |		MOVEA.L	A7,A0
00020660 43 ee ff f3              |C       |		LEA.L	(A6-0xd),A1
00020664 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020666 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020668 51 c8 ff fc              |Q       |		DBF	D0,0x20666
0002066c 4e ba fd c6              |N       |		JSR	0x20434
00020670 de c2                    |        |		ADDA.W	D2,A7
00020672 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020674 9e fc 00 10              |        |		SUBA.W	#0x10,A7
00020678 20 4f                    | O      |		MOVEA.L	A7,A0
0002067a 43 fa fb 02              |C       |		LEA.L	0x2017e,A1
0002067e 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00020680 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020682 51 c8 ff fc              |Q       |		DBF	D0,0x20680
00020686 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020688 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002068c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002068e 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
00020692 4e 94                    |N       |		JSR	(A4)
00020694 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020696 48 52                    |HR      |		PEA.L	(A2)
00020698 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
0002069e de fc 00 14              |        |		ADDA.W	#0x14,A7
000206a2 2e 92                    |.       |		MOVE.L	(A2),(A7)
000206a4 1f 07                    |        |		MOVE.B	D7,-(A7)
000206a6 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
000206ac 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000206ae 2e 92                    |.       |		MOVE.L	(A2),(A7)
000206b0 1f 01                    |        |		MOVE.B	D1,-(A7)
000206b2 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
000206b8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000206ba 2e 92                    |.       |		MOVE.L	(A2),(A7)
000206bc 48 53                    |HS      |		PEA.L	(A3)
000206be 4e ba fd aa              |N       |		JSR	0x2046a
000206c2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000206c4 10 13                    |        |		MOVE.B	(A3),D0
000206c6 b0 06                    |        |		CMP.B	D6,D0
000206c8 67 00 00 84              |g       |		BEQ	0x2074e
000206cc 4a 39 00 02 0d f3        |J9      |		TST.B	0x20df3
000206d2 66 0a                    |f       |		BNE	0x206de
000206d4 1f 06                    |        |		MOVE.B	D6,-(A7)
000206d6 4e ba fd 02              |N       |		JSR	0x203da
000206da 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000206dc 60 70                    |`p      |		BRA	0x2074e
000206de 2f 3a fa ae              |/:      |		MOVE.L	0x2018e,-(A7)
000206e2 1f 39 00 02 0d ff        | 9      |		MOVE.B	0x20dff,-(A7)
000206e8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000206ea 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000206ee 3f 01                    |?       |		MOVE.W	D1,-(A7)
000206f0 3f 03                    |?       |		MOVE.W	D3,-(A7)
000206f2 4e 94                    |N       |		JSR	(A4)
000206f4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000206f6 1e 81                    |        |		MOVE.B	D1,(A7)
000206f8 10 39 00 02 0d f4        | 9      |		MOVE.B	0x20df4,D0
000206fe 48 80                    |H       |		EXTB.W	D0
00020700 41 81                    |A       |		CHK.W	D1,D0
00020702 1f 00                    |        |		MOVE.B	D0,-(A7)
00020704 48 6e ff e9              |Hn      |		PEA.L	(A6-0x17)
00020708 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
0002070c 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00020710 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00020714 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00020718 4e b9 00 01 05 50        |N    P  |		JSR	?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
0002071e de c5                    |        |		ADDA.W	D5,A7
00020720 4a 2e ff e9              |J.      |		TST.B	(A6-0x17)
00020724 67 06                    |g       |		BEQ	0x2072c
00020726 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
0002072a 60 aa                    |`       |		BRA	0x206d6
0002072c 2f 2e ff ea              |/.      |		MOVE.L	(A6-0x16),-(A7)
00020730 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
00020734 1f 2e ff f2              | .      |		MOVE.B	(A6-0xe),-(A7)
00020738 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002073a 20 4f                    | O      |		MOVEA.L	A7,A0
0002073c 43 ee ff f3              |C       |		LEA.L	(A6-0xd),A1
00020740 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020742 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020744 51 c8 ff fc              |Q       |		DBF	D0,0x20742
00020748 4e ba fc ea              |N       |		JSR	0x20434
0002074c de c2                    |        |		ADDA.W	D2,A7
0002074e 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00020752 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020756 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
0002075c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002075e 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00020760 9e fc 00 10              |        |		SUBA.W	#0x10,A7
00020764 20 4f                    | O      |		MOVEA.L	A7,A0
00020766 43 fa fa 2a              |C  *    |		LEA.L	0x20192,A1
0002076a 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
0002076c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002076e 51 c8 ff fc              |Q       |		DBF	D0,0x2076c
00020772 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020774 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020778 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002077a 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
0002077e 4e 94                    |N       |		JSR	(A4)
00020780 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020782 48 52                    |HR      |		PEA.L	(A2)
00020784 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
0002078a de fc 00 14              |        |		ADDA.W	#0x14,A7
0002078e 2e 92                    |.       |		MOVE.L	(A2),(A7)
00020790 1f 07                    |        |		MOVE.B	D7,-(A7)
00020792 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
00020798 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002079a 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002079c 1f 01                    |        |		MOVE.B	D1,-(A7)
0002079e 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
000207a4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000207a6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000207a8 48 53                    |HS      |		PEA.L	(A3)
000207aa 4e ba fc be              |N       |		JSR	0x2046a
000207ae 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207b0 10 13                    |        |		MOVE.B	(A3),D0
000207b2 b0 01                    |        |		CMP.B	D1,D0
000207b4 66 0a                    |f       |		BNE	0x207c0
000207b6 4e b9 00 02 0d 12        |N       |		JSR	exp_RESET.FIU()
000207bc 60 00 01 62              |`  b    |		BRA	0x20920
000207c0 4e ba fb 76              |N  v    |		JSR	0x20338
000207c4 41 fa f9 ea              |A       |		LEA.L	0x201b0,A0
000207c8 70 06                    |p       |		MOVEQ.L	#0x06,D0
000207ca 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000207cc 51 c8 ff fc              |Q       |		DBF	D0,0x207ca
000207d0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000207d2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000207d6 3f 01                    |?       |		MOVE.W	D1,-(A7)
000207d8 3f 04                    |?       |		MOVE.W	D4,-(A7)
000207da 4e 94                    |N       |		JSR	(A4)
000207dc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207de 48 52                    |HR      |		PEA.L	(A2)
000207e0 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000207e6 de c2                    |        |		ADDA.W	D2,A7
000207e8 2e 92                    |.       |		MOVE.L	(A2),(A7)
000207ea 48 53                    |HS      |		PEA.L	(A3)
000207ec 4e ba fc 7c              |N  |    |		JSR	0x2046a
000207f0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207f2 10 13                    |        |		MOVE.B	(A3),D0
000207f4 b0 01                    |        |		CMP.B	D1,D0
000207f6 67 0a                    |g       |		BEQ	0x20802
000207f8 1f 3c 00 07              | <      |		MOVE.B	#0x07,-(A7)
000207fc 4e ba fb dc              |N       |		JSR	0x203da
00020800 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020802 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020806 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002080a 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
0002080e 4e b9 00 02 0c 3e        |N    >  |		JSR	exp_TEST_PAREG.FIU(&Fr, &Sr_1, &Sr_1)
00020814 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020818 4a 2e ff fb              |J.      |		TST.B	(A6-0x5)
0002081c 66 0a                    |f       |		BNE	0x20828
0002081e 1f 3c 00 08              | <      |		MOVE.B	#0x08,-(A7)
00020822 4e ba fb b6              |N       |		JSR	0x203da
00020826 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020828 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002082a 4e ba fb 2e              |N  .    |		JSR	0x2035a
0002082e 4a 1f                    |J       |		TST.B	(A7)+
00020830 66 0a                    |f       |		BNE	0x2083c
00020832 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
00020836 4e ba fb a2              |N       |		JSR	0x203da
0002083a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002083c 4e b9 00 02 0d 46        |N    F  |		JSR	exp_FREEZE_WORLD.FIU()
00020842 9e c2                    |        |		SUBA.W	D2,A7
00020844 20 4f                    | O      |		MOVEA.L	A7,A0
00020846 43 fa f9 68              |C  h    |		LEA.L	0x201b0,A1
0002084a 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002084c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002084e 51 c8 ff fc              |Q       |		DBF	D0,0x2084c
00020852 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020854 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020858 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002085a 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
0002085e 4e 94                    |N       |		JSR	(A4)
00020860 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020862 48 52                    |HR      |		PEA.L	(A2)
00020864 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
0002086a de fc 00 18              |        |		ADDA.W	#0x18,A7
0002086e 42 17                    |B       |		CLR.B	(A7)
00020870 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00020872 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020876 48 78 00 00              |Hx      |		PEA.L	0x0
0002087a 48 78 00 00              |Hx      |		PEA.L	0x0
0002087e 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020884 de c4                    |        |		ADDA.W	D4,A7
00020886 2e 92                    |.       |		MOVE.L	(A2),(A7)
00020888 48 53                    |HS      |		PEA.L	(A3)
0002088a 4e ba fb de              |N       |		JSR	0x2046a
0002088e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020890 10 13                    |        |		MOVE.B	(A3),D0
00020892 b0 06                    |        |		CMP.B	D6,D0
00020894 66 0c                    |f       |		BNE	0x208a2
00020896 1f 3c 00 0c              | <      |		MOVE.B	#0x0c,-(A7)
0002089a 4e ba fb 3e              |N  >    |		JSR	0x203da
0002089e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000208a0 60 7e                    |`~      |		BRA	0x20920
000208a2 4a 39 00 02 0d f3        |J9      |		TST.B	0x20df3
000208a8 66 06                    |f       |		BNE	0x208b0
000208aa 1f 3c 00 0b              | <      |		MOVE.B	#0x0b,-(A7)
000208ae 60 ea                    |`       |		BRA	0x2089a
000208b0 2f 3a f9 10              |/:      |		MOVE.L	0x201c2,-(A7)
000208b4 1f 39 00 02 0d ff        | 9      |		MOVE.B	0x20dff,-(A7)
000208ba 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000208bc 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000208c0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000208c2 3f 03                    |?       |		MOVE.W	D3,-(A7)
000208c4 4e 94                    |N       |		JSR	(A4)
000208c6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000208c8 1e 81                    |        |		MOVE.B	D1,(A7)
000208ca 10 39 00 02 0d f4        | 9      |		MOVE.B	0x20df4,D0
000208d0 48 80                    |H       |		EXTB.W	D0
000208d2 41 81                    |A       |		CHK.W	D1,D0
000208d4 1f 00                    |        |		MOVE.B	D0,-(A7)
000208d6 48 6e ff e9              |Hn      |		PEA.L	(A6-0x17)
000208da 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
000208de 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
000208e2 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
000208e6 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
000208ea 4e b9 00 01 05 50        |N    P  |		JSR	?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
000208f0 de c5                    |        |		ADDA.W	D5,A7
000208f2 4a 2e ff e9              |J.      |		TST.B	(A6-0x17)
000208f6 67 06                    |g       |		BEQ	0x208fe
000208f8 1f 3c 00 0a              | <      |		MOVE.B	#0x0a,-(A7)
000208fc 60 9c                    |`       |		BRA	0x2089a
000208fe 2f 2e ff ea              |/.      |		MOVE.L	(A6-0x16),-(A7)
00020902 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
00020906 1f 2e ff f2              | .      |		MOVE.B	(A6-0xe),-(A7)
0002090a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002090c 20 4f                    | O      |		MOVEA.L	A7,A0
0002090e 43 ee ff f3              |C       |		LEA.L	(A6-0xd),A1
00020912 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020914 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020916 51 c8 ff fc              |Q       |		DBF	D0,0x20914
0002091a 4e ba fb 18              |N       |		JSR	0x20434
0002091e de c2                    |        |		ADDA.W	D2,A7
00020920 9e fc 00 1a              |        |		SUBA.W	#0x1a,A7
00020924 20 4f                    | O      |		MOVEA.L	A7,A0
00020926 43 fa f8 9e              |C       |		LEA.L	0x201c6,A1
0002092a 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002092c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002092e 51 c8 ff fc              |Q       |		DBF	D0,0x2092c
00020932 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020934 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020938 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002093a 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002093e 4e 94                    |N       |		JSR	(A4)
00020940 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020942 48 52                    |HR      |		PEA.L	(A2)
00020944 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
0002094a de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002094e 2e 92                    |.       |		MOVE.L	(A2),(A7)
00020950 48 53                    |HS      |		PEA.L	(A3)
00020952 4e ba fb 16              |N       |		JSR	0x2046a
00020956 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020958 10 13                    |        |		MOVE.B	(A3),D0
0002095a b0 01                    |        |		CMP.B	D1,D0
0002095c 67 0a                    |g       |		BEQ	0x20968
0002095e 1f 3c 00 0d              | <      |		MOVE.B	#0x0d,-(A7)
00020962 4e ba fa 76              |N  v    |		JSR	0x203da
00020966 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020968 4e b9 00 02 0d 12        |N       |		JSR	exp_RESET.FIU()
0002096e 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00020972 4e 5e                    |N^      |		UNLK	A6
00020974 4e 75                    |Nu      |		RTS
00020976 ; --------------------------------------------------------------------------------------
00020976 ; OMSI PASCAL Function
00020976 ;    <LVAR -0x00b @>
00020976 ;    <LVAR -0x00c @ 1(r)>
00020976 ;    <LVAR -0x010 @ 4(r)>
00020976 ;    <LVAR -0x014 @ 4(r)>
00020976 ;    <LVAR -0x016 @ 1(r)>
00020976 ;    <LVAR -0x01c @>
00020976 ;    <LVAR -0x022 @>
00020976 ;    <LVAR -0x02a @>
00020976 ;    <LVAR -0x02b @>
00020976 ;    <LVAR -0x033 @>
00020976 ;    <LVAR -0x03c @>
00020976 ;    <LVAR -0x045 @>
00020976 ;    <LVAR -0x046 @>
00020976 ;    <LVAR -0x047 @>
00020976 ;    <LVAR -0x048 @ 1(r)>
00020976 ; --------------------------------------------------------------------------------------
00020976 4e 56 ff 72              |NV r    |		LINK.W	A6,#0xff72
0002097a bf d5                    |        |		CMPA.L	(A5),A7
0002097c 62 06                    |b       |		BHI	0x20984
0002097e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020982 4e 76                    |Nv      |		TRAPV
00020984 de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00020988 48 e7 f0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
0002098c 45 ee ff b8              |E       |		LEA.L	(A6-0x48),A2
00020990 47 fa fa 48              |G  H    |		LEA.L	0x203da,A3
00020994 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
00020996 74 01                    |t       |		MOVEQ.L	#0x01,D2
00020998 76 12                    |v       |		MOVEQ.L	#0x12,D3
0002099a 48 52                    |HR      |		PEA.L	(A2)
0002099c 48 6e ff b9              |Hn      |		PEA.L	(A6-0x47)
000209a0 48 6e ff ba              |Hn      |		PEA.L	(A6-0x46)
000209a4 4e b9 00 02 0c 3e        |N    >  |		JSR	exp_TEST_PAREG.FIU(&Fr, &Sr_1, &Sr_1)
000209aa de c1                    |        |		ADDA.W	D1,A7
000209ac 4a 12                    |J       |		TST.B	(A2)
000209ae 66 08                    |f       |		BNE	0x209b8
000209b0 1f 3c 00 08              | <      |		MOVE.B	#0x08,-(A7)
000209b4 4e 93                    |N       |		JSR	(A3)
000209b6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209b8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000209ba 4e ba f9 9e              |N       |		JSR	0x2035a
000209be 4a 1f                    |J       |		TST.B	(A7)+
000209c0 66 08                    |f       |		BNE	0x209ca
000209c2 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
000209c6 4e 93                    |N       |		JSR	(A3)
000209c8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209ca 48 52                    |HR      |		PEA.L	(A2)
000209cc 48 6e ff bb              |Hn      |		PEA.L	(A6-0x45)
000209d0 48 6e ff c4              |Hn      |		PEA.L	(A6-0x3c)
000209d4 4e b9 00 02 0c ce        |N       |		JSR	exp_TEST_MAR_SCAN_CHAIN.FIU(&Fr, &Sr_1_4_4, &Sr_1_4_4)
000209da de c1                    |        |		ADDA.W	D1,A7
000209dc 4a 12                    |J       |		TST.B	(A2)
000209de 66 08                    |f       |		BNE	0x209e8
000209e0 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
000209e4 4e 93                    |N       |		JSR	(A3)
000209e6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209e8 48 52                    |HR      |		PEA.L	(A2)
000209ea 48 6e ff cd              |Hn      |		PEA.L	(A6-0x33)
000209ee 48 6e ff d6              |Hn      |		PEA.L	(A6-0x2a)
000209f2 4e b9 00 02 0c f6        |N       |		JSR	exp_TEST_MDR.FIU(&Fr, &Sr_8, &Sr_8)
000209f8 de c1                    |        |		ADDA.W	D1,A7
000209fa 4a 12                    |J       |		TST.B	(A2)
000209fc 66 08                    |f       |		BNE	0x20a06
000209fe 1f 3c 00 0f              | <      |		MOVE.B	#0x0f,-(A7)
00020a02 4e 93                    |N       |		JSR	(A3)
00020a04 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a06 48 52                    |HR      |		PEA.L	(A2)
00020a08 48 6e ff de              |Hn      |		PEA.L	(A6-0x22)
00020a0c 48 6e ff e4              |Hn      |		PEA.L	(A6-0x1c)
00020a10 4e b9 00 02 0c 22        |N    "  |		JSR	exp_TEST_UIR.FIU(&Fr, &Sr_6, &Sr_6)
00020a16 de c1                    |        |		ADDA.W	D1,A7
00020a18 4a 12                    |J       |		TST.B	(A2)
00020a1a 66 00 00 8c              |f       |		BNE	0x20aa8
00020a1e 4a 39 00 02 0d f3        |J9      |		TST.B	0x20df3
00020a24 66 0a                    |f       |		BNE	0x20a30
00020a26 1f 3c 00 11              | <      |		MOVE.B	#0x11,-(A7)
00020a2a 4e 93                    |N       |		JSR	(A3)
00020a2c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a2e 60 78                    |`x      |		BRA	0x20aa8
00020a30 2f 3a f7 ae              |/:      |		MOVE.L	0x201e0,-(A7)
00020a34 1f 39 00 02 0d ff        | 9      |		MOVE.B	0x20dff,-(A7)
00020a3a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020a3c 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020a40 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020a42 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020a46 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020a4c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020a4e 1e 82                    |        |		MOVE.B	D2,(A7)
00020a50 10 39 00 02 0d f4        | 9      |		MOVE.B	0x20df4,D0
00020a56 48 80                    |H       |		EXTB.W	D0
00020a58 41 82                    |A       |		CHK.W	D2,D0
00020a5a 1f 00                    |        |		MOVE.B	D0,-(A7)
00020a5c 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
00020a60 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00020a64 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00020a68 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00020a6c 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
00020a70 4e b9 00 01 05 50        |N    P  |		JSR	?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
00020a76 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00020a7a 4a 2e ff ea              |J.      |		TST.B	(A6-0x16)
00020a7e 67 06                    |g       |		BEQ	0x20a86
00020a80 1f 3c 00 10              | <      |		MOVE.B	#0x10,-(A7)
00020a84 60 a4                    |`       |		BRA	0x20a2a
00020a86 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
00020a8a 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
00020a8e 1f 2e ff f4              | .      |		MOVE.B	(A6-0xc),-(A7)
00020a92 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020a94 20 4f                    | O      |		MOVEA.L	A7,A0
00020a96 43 ee ff f5              |C       |		LEA.L	(A6-0xb),A1
00020a9a 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020a9c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020a9e 51 c8 ff fc              |Q       |		DBF	D0,0x20a9c
00020aa2 4e ba f9 90              |N       |		JSR	0x20434
00020aa6 de c3                    |        |		ADDA.W	D3,A7
00020aa8 48 52                    |HR      |		PEA.L	(A2)
00020aaa 48 6e ff b9              |Hn      |		PEA.L	(A6-0x47)
00020aae 48 6e ff d5              |Hn      |		PEA.L	(A6-0x2b)
00020ab2 4e b9 00 02 0c aa        |N       |		JSR	exp_TEST_MAR_TO_UIR.FIU(&Fr, &Sr_1, &Sr_1)
00020ab8 de c1                    |        |		ADDA.W	D1,A7
00020aba 4a 12                    |J       |		TST.B	(A2)
00020abc 66 06                    |f       |		BNE	0x20ac4
00020abe 1f 03                    |        |		MOVE.B	D3,-(A7)
00020ac0 4e 93                    |N       |		JSR	(A3)
00020ac2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ac4 4c df 0f 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1+A2+A3
00020ac8 4e 5e                    |N^      |		UNLK	A6
00020aca 4e 75                    |Nu      |		RTS
00020acc ; --------------------------------------------------------------------------------------
00020acc ; OMSI PASCAL Function
00020acc ;    <LVAR -0x004 @>
00020acc ;    <LVAR -0x005 @ 1(r)>
00020acc ;    <LVAR -0x007 @>
00020acc ;    <LVAR -0x008 @>
00020acc ; --------------------------------------------------------------------------------------
00020acc 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00020ad0 bf d5                    |        |		CMPA.L	(A5),A7
00020ad2 62 06                    |b       |		BHI	0x20ada
00020ad4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020ad8 4e 76                    |Nv      |		TRAPV
00020ada de fc 00 18              |        |		ADDA.W	#0x18,A7
00020ade 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
00020ae2 41 ee ff fb              |A       |		LEA.L	(A6-0x5),A0
00020ae6 48 50                    |HP      |		PEA.L	(A0)
00020ae8 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020aec 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00020af0 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
00020af4 4e b9 00 02 0c 5c        |N    \  |		JSR	exp_TEST_NOVRAM_DATA.FIU(&Fr, &Sr_1, &Sr_1, &Sr_1)
00020afa de fc 00 10              |        |		ADDA.W	#0x10,A7
00020afe 4a 10                    |J       |		TST.B	(A0)
00020b00 66 0a                    |f       |		BNE	0x20b0c
00020b02 1f 3c 00 15              | <      |		MOVE.B	#0x15,-(A7)
00020b06 4e ba f8 d2              |N       |		JSR	0x203da
00020b0a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b0c 48 50                    |HP      |		PEA.L	(A0)
00020b0e 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020b12 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
00020b16 4e b9 00 02 0c 82        |N       |		JSR	exp_TEST_NOVRAM_ADDRESS.FIU(&Fr, &Sr_1, &Sr_1)
00020b1c de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020b20 4a 10                    |J       |		TST.B	(A0)
00020b22 66 0a                    |f       |		BNE	0x20b2e
00020b24 1f 3c 00 16              | <      |		MOVE.B	#0x16,-(A7)
00020b28 4e ba f8 b0              |N       |		JSR	0x203da
00020b2c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b2e 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
00020b32 4e 5e                    |N^      |		UNLK	A6
00020b34 4e 75                    |Nu      |		RTS
00020b36 ; --------------------------------------------------------------------------------------
00020b36 ; OMSI PASCAL Function
00020b36 ; --------------------------------------------------------------------------------------
00020b36					START:
00020b36 4f fa 00 08              |O       |		LEA.L	MAIN,A7
00020b3a 4e f9 00 01 02 80        |N       |		JMP	?start_program
00020b40					MAIN:
00020b40 45 f9 00 02 0d f4        |E       |		LEA.L	0x20df4,A2
00020b46 47 f9 00 02 0d e2        |G       |		LEA.L	0x20de2,A3
00020b4c 49 f9 00 02 0d e6        |I       |		LEA.L	0x20de6,A4
00020b52 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020b54 74 05                    |t       |		MOVEQ.L	#0x05,D2
00020b56 76 07                    |v       |		MOVEQ.L	#0x07,D3
00020b58 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
00020b5e 48 79 00 02 0d f3        |Hy      |		PEA.L	0x20df3
00020b64 48 52                    |HR      |		PEA.L	(A2)
00020b66 4e b9 00 01 05 44        |N    D  |		JSR	IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
00020b6c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020b6e 48 78 00 0f              |Hx      |		PEA.L	0xf
00020b72 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00020b78 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b7a 1e 92                    |        |		MOVE.B	(A2),(A7)
00020b7c 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
00020b82 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b84 20 4f                    | O      |		MOVEA.L	A7,A0
00020b86 43 fa f6 5c              |C  \    |		LEA.L	0x201e4,A1
00020b8a 70 04                    |p       |		MOVEQ.L	#0x04,D0
00020b8c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020b8e 51 c8 ff fc              |Q       |		DBF	D0,0x20b8c
00020b92 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b94 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020b98 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020b9a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020b9c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020ba2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020ba4 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00020ba6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020ba8 48 54                    |HT      |		PEA.L	(A4)
00020baa 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00020bb0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020bb2 42 39 00 02 0d ea        |B9      |		CLR.B	0x20dea
00020bb8 70 00                    |p       |		MOVEQ.L	#0x00,D0
00020bba 23 c0 00 02 0d f6        |#       |		MOVE.L	D0,0x20df6
00020bc0 b0 83                    |        |		CMP.L	D3,D0
00020bc2 63 02                    |c       |		BLS	0x20bc6
00020bc4 4e 4f                    |NO      |		TRAP	#15
00020bc6 41 f9 00 02 0d da        |A       |		LEA.L	0x20dda,A0
00020bcc 42 30 08 11              |B0      |		CLR.B	(A0+D0.L+#0x11)
00020bd0 52 80                    |R       |		ADDQ.L	#0x1,D0
00020bd2 b0 83                    |        |		CMP.L	D3,D0
00020bd4 6f e4                    |o       |		BLE	0x20bba
00020bd6 13 c2 00 02 0d ff        |        |		MOVE.B	D2,0x20dff
00020bdc 4e ba f7 5a              |N  Z    |		JSR	0x20338
00020be0 4e ba f8 ee              |N       |		JSR	0x204d0
00020be4 4e ba f9 84              |N       |		JSR	0x2056a
00020be8 4e ba fd 8c              |N       |		JSR	0x20976
00020bec 4e ba fe de              |N       |		JSR	0x20acc
00020bf0 4e ba f7 46              |N  F    |		JSR	0x20338
00020bf4 1f 01                    |        |		MOVE.B	D1,-(A7)
00020bf6 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00020bf8 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00020bfa 1f 39 00 02 0d ea        | 9      |		MOVE.B	0x20dea,-(A7)
00020c00 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020c02 20 4f                    | O      |		MOVEA.L	A7,A0
00020c04 43 f9 00 02 0d eb        |C       |		LEA.L	0x20deb,A1
00020c0a 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020c0c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020c0e 51 c8 ff fc              |Q       |		DBF	D0,0x20c0c
00020c12 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020c18 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020c1c 4e b9 00 01 02 84        |N       |		JSR	?exit
00020c22					exp_TEST_UIR.FIU(&Fr, &Sr_6, &Sr_6):
00020c22 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020c28 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020c2a 0c 54 45 53 54 5f 55 49  | TEST_UI|		.TXT	12,'TEST_UIR.FIU'
00020c37 00                       |        |		.CONST	0x0
00020c38 03                       |        |		.CONST	0x3			; DIPROC address
00020c39 03                       |        |		.CONST	0x3			; Output Parameters
00020c3a 00                       |        |		.CONST	0x0			; Input Parameters
00020c3b 08                       |        |		.CONST	0x8			; Out arg flag
00020c3c 05                       |        |		.CONST	0x5			; Out arg [6]
00020c3d 05                       |        |		.CONST	0x5			; Out arg [6]
00020c3e					exp_TEST_PAREG.FIU(&Fr, &Sr_1, &Sr_1):
00020c3e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020c44 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020c46 0e 54 45 53 54 5f 50 41  | TEST_PA|		.TXT	14,'TEST_PAREG.FIU'
00020c55 00                       |        |		.CONST	0x0
00020c56 03                       |        |		.CONST	0x3			; DIPROC address
00020c57 03                       |        |		.CONST	0x3			; Output Parameters
00020c58 00                       |        |		.CONST	0x0			; Input Parameters
00020c59 08                       |        |		.CONST	0x8			; Out arg flag
00020c5a 00                       |        |		.CONST	0x0			; Out arg [1]
00020c5b 00                       |        |		.CONST	0x0			; Out arg [1]
00020c5c					exp_TEST_NOVRAM_DATA.FIU(&Fr, &Sr_1, &Sr_1, &Sr_1):
00020c5c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020c62 00 18                    |        |		.CONST	0x0018			; Stack-delta
00020c64 14 54 45 53 54 5f 4e 4f  | TEST_NO|		.TXT	20,'TEST_NOVRAM_DATA.FIU'
00020c79 00                       |        |		.CONST	0x0
00020c7a 03                       |        |		.CONST	0x3			; DIPROC address
00020c7b 04                       |        |		.CONST	0x4			; Output Parameters
00020c7c 00                       |        |		.CONST	0x0			; Input Parameters
00020c7d 08                       |        |		.CONST	0x8			; Out arg flag
00020c7e 00                       |        |		.CONST	0x0			; Out arg [1]
00020c7f 00                       |        |		.CONST	0x0			; Out arg [1]
00020c80 00                       |        |		.CONST	0x0			; Out arg [1]
00020c81 00                       |        |		.PAD	0x0
00020c82					exp_TEST_NOVRAM_ADDRESS.FIU(&Fr, &Sr_1, &Sr_1):
00020c82 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020c88 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020c8a 17 54 45 53 54 5f 4e 4f  | TEST_NO|		.TXT	23,'TEST_NOVRAM_ADDRESS.FIU'
00020ca2 00                       |        |		.CONST	0x0
00020ca3 03                       |        |		.CONST	0x3			; DIPROC address
00020ca4 03                       |        |		.CONST	0x3			; Output Parameters
00020ca5 00                       |        |		.CONST	0x0			; Input Parameters
00020ca6 08                       |        |		.CONST	0x8			; Out arg flag
00020ca7 00                       |        |		.CONST	0x0			; Out arg [1]
00020ca8 00                       |        |		.CONST	0x0			; Out arg [1]
00020ca9 00                       |        |		.PAD	0x0
00020caa					exp_TEST_MAR_TO_UIR.FIU(&Fr, &Sr_1, &Sr_1):
00020caa 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020cb0 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020cb2 13 54 45 53 54 5f 4d 41  | TEST_MA|		.TXT	19,'TEST_MAR_TO_UIR.FIU'
00020cc6 00                       |        |		.CONST	0x0
00020cc7 03                       |        |		.CONST	0x3			; DIPROC address
00020cc8 03                       |        |		.CONST	0x3			; Output Parameters
00020cc9 00                       |        |		.CONST	0x0			; Input Parameters
00020cca 08                       |        |		.CONST	0x8			; Out arg flag
00020ccb 00                       |        |		.CONST	0x0			; Out arg [1]
00020ccc 00                       |        |		.CONST	0x0			; Out arg [1]
00020ccd 00                       |        |		.PAD	0x0
00020cce					exp_TEST_MAR_SCAN_CHAIN.FIU(&Fr, &Sr_1_4_4, &Sr_1_4_4):
00020cce 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020cd4 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020cd6 17 54 45 53 54 5f 4d 41  | TEST_MA|		.TXT	23,'TEST_MAR_SCAN_CHAIN.FIU'
00020cee 00                       |        |		.CONST	0x0
00020cef 03                       |        |		.CONST	0x3			; DIPROC address
00020cf0 03                       |        |		.CONST	0x3			; Output Parameters
00020cf1 00                       |        |		.CONST	0x0			; Input Parameters
00020cf2 08                       |        |		.CONST	0x8			; Out arg flag
00020cf3 0a                       |        |		.CONST	0xa			; Out arg [1, 4, 4]
00020cf4 0a                       |        |		.CONST	0xa			; Out arg [1, 4, 4]
00020cf5 00                       |        |		.PAD	0x0
00020cf6					exp_TEST_MDR.FIU(&Fr, &Sr_8, &Sr_8):
00020cf6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020cfc 00 14                    |        |		.CONST	0x0014			; Stack-delta
00020cfe 0c 54 45 53 54 5f 4d 44  | TEST_MD|		.TXT	12,'TEST_MDR.FIU'
00020d0b 00                       |        |		.CONST	0x0
00020d0c 03                       |        |		.CONST	0x3			; DIPROC address
00020d0d 03                       |        |		.CONST	0x3			; Output Parameters
00020d0e 00                       |        |		.CONST	0x0			; Input Parameters
00020d0f 08                       |        |		.CONST	0x8			; Out arg flag
00020d10 07                       |        |		.CONST	0x7			; Out arg [8]
00020d11 07                       |        |		.CONST	0x7			; Out arg [8]
00020d12					exp_RESET.FIU():
00020d12 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d18 00 08                    |        |		.CONST	0x0008			; Stack-delta
00020d1a 09 52 45 53 45 54 2e 46  | RESET.F|		.TXT	9,'RESET.FIU'
00020d24 00                       |        |		.CONST	0x0
00020d25 03                       |        |		.CONST	0x3			; DIPROC address
00020d26 00                       |        |		.CONST	0x0			; Output Parameters
00020d27 00                       |        |		.CONST	0x0			; Input Parameters
00020d28					exp_LOAD_PAREG.FIU(Sw_1, Sw_1):
00020d28 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d2e 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00020d30 0e 4c 4f 41 44 5f 50 41  | LOAD_PA|		.TXT	14,'LOAD_PAREG.FIU'
00020d3f 00                       |        |		.CONST	0x0
00020d40 03                       |        |		.CONST	0x3			; DIPROC address
00020d41 00                       |        |		.CONST	0x0			; Output Parameters
00020d42 02                       |        |		.CONST	0x2			; Input Parameters
00020d43 00                       |        |		.CONST	0x0			; In arg [1]
00020d44 00                       |        |		.CONST	0x0			; In arg [1]
00020d45 00                       |        |		.PAD	0x0
00020d46					exp_FREEZE_WORLD.FIU():
00020d46 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00020d4c 00 08                    |        |		.CONST	0x0008			; Stack-delta
00020d4e 10 46 52 45 45 5a 45 5f  | FREEZE_|		.TXT	16,'FREEZE_WORLD.FIU'
00020d5f 00                       |        |		.CONST	0x0
00020d60 03                       |        |		.CONST	0x3			; DIPROC address
00020d61 00                       |        |		.CONST	0x0			; Output Parameters
00020d62 00                       |        |		.CONST	0x0			; Input Parameters
00020d63 00                       |        |		.PAD	0x0
00020d64 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
00020d72 ; --------------------------------------------------------------------------------------
00020d72 ; OMSI PASCAL Function
00020d72 ;    <LVAR  0x008 1(r)>
00020d72 ; --------------------------------------------------------------------------------------
00020d72					PROG_FAIL:
00020d72 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00020d76 bf d5                    |        |		CMPA.L	(A5),A7
00020d78 62 06                    |b       |		BHI	0x20d80
00020d7a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020d7e 4e 76                    |Nv      |		TRAPV
00020d80 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00020d84 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00020d88 41 fa ff e8              |A       |		LEA.L	PROG_FAIL,A0
00020d8c 70 06                    |p       |		MOVEQ.L	#0x06,D0
00020d8e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020d90 51 c8 ff fc              |Q       |		DBF	D0,0x20d8e
00020d94 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00020d98 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020d9a 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00020d9e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020da2 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00020da6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020dac 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020dae 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020db2 48 80                    |H       |		EXTB.W	D0
00020db4 48 c0                    |H       |		EXTW.L	D0
00020db6 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020db8 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00020dbe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020dc0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020dc6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020dc8 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020dce de fc 00 14              |        |		ADDA.W	#0x14,A7
00020dd2 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00020dd6 4e 5e                    |N^      |		UNLK	A6
00020dd8 4e 75                    |Nu      |		RTS