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

⟦4cd4b112a⟧ M200

    Length: 6144 (0x1800)
    Types: M200
    Notes: @(#)P1DCOMM,2.0,89/10/03,17:18:19, M200_PROGRAM
    Names: »P1DCOMM.M200«

Derivation

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

Disassembly

0x20200


@ 20200
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 20200-2033c Body>                                              
        <POP 20200-20216 Prologue>                           Σ0         ↓
        <POP 20216-2022c RegCacheLoad>                       Σ0         ↓
        <POP 2022c-2028c Naked>                              Σ0         ↓ →0x202d4
            <Call 0x2022c 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x20232 [18] @>                            Δ-18               {[«18""»]}
            <POP 2023e-20240 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x20240 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x2024c 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 2024e-2024f StackAdj>                       Δ+22       ↓       {}
            <Blob 0x2024f [14] @>                            Δ-14               {[«14""»]}
            <POP 2025e-20260 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x20260 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 2026a-2026c StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 2026c  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x20270 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 20276-20278 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x20278 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2027e-20280 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20280 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20282-20284 StackAdj>                       Δ+18               {}
            <MI 20284  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 20288  CMPA.W  #0x01,A0>                                        {}
            <MI 2028a  BEQ     0x202d4>                                         {}
        <POP 2028c-202d4 Naked>                              Σ0         ↓
            <Blob 0x2028c [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x2029c [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 202ac-202ae StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x202ae 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 202b8-202ba StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x202ba>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x202ba 12>                      Δ-4        
                <Const 0x202be 0x1.2>                        Δ-2        
                <Const 0x202c0 0x1e.2>                       Δ-2        
                <Call 0x202c2 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 202c4-202c6 StackAdj>                   Δ+8        
            <Call 0x202c6 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 202cc-202ce StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x202ce 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 202d0-202d4 StackAdj>                       Δ+48               {}
        <POP 202d4-20334 Naked>                              Σ0         ↓ ←0x2022c
            <Blob 0x202d4 [14] @>                            Δ-14               {[«14""»]}
            <POP 202e4-202e6 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x202e6 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 202f0-202f2 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 202f2  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x202f6 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 202fc-202fe StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x202fe 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20304-20306 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20306 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20308-20309 StackAdj>                       Δ+18       ↓       {}
            <Blob 0x20309 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x20318 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 2031c-2031e StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x2031e 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x2032c 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 20332-20334 StackAdj>                       Δ+30               {}
        <POP 20334-2033c Epilogue>                           Σ0         

0x2033c


@ 2033c
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 2033c-203a4 Body>                                              
        <POP 2033c-20352 Prologue>                           Σ0         ↓
        <POP 20352-2039c Naked>                              Σ0         ↓
            <Blob 0x20352 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x2035e 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 20362-20364 StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x20364 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 20376-20378 StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20378  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2037c  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2037e  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20380  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x20382 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 20388-2038a StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x2038a 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20390-20392 StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x20392 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 20398-2039c StackAdj>                       Δ+20               {}
        <POP 2039c-203a4 Epilogue>                           Σ0         

0x203a4


@ 203a4
        <LVAR  0x00a 4(w)>
        <LVAR  0x008 1(r)>
    <POP 203a4-204c6 Body>                                   Δ+20       
        <POP 203a4-203ba Prologue>                           Σ0         ↓
        <POP 203ba-203be RegCacheLoad>                       Σ0         ↓
        <POP 203be-203d8 Naked>                              Σ0         →0x203f4 →0x2040a →0x20420 →0x20460 →0x2044c →0x20474 →0x20474 →0x20474 →0x20474
            <MI 203be  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 203c2  EXTB.W  D0>                                              {}
            <MI 203c4  SUBQ.W  #0x2,D0>                                         {}
            <POP 0x203c6 LimitCheck 0x0 ≤ D0 ≤ 0xd>                             {}
            <MI 203ce  ADD.W   D0,D0>                                           {}
            <MI 203d0  SWITCH  D0.W>                                            {}
        <POP 203f4-2040a Naked>                              Σ0 Δ-4     →0x204a6 ←0x203be
            <POP 203f4-203f6 StackAdj>                       Δ-4                {[-4-]}
            <POP 203f6-203f7 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x203f7 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 203fa  MOVE.B  0x2018f,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20400  MOVE.B  0x20190,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20406  BRA     0x204a6>                                         {[-2-]|[«2""»]}
        <POP 2040a-20420 Naked>                              Σ0 Δ-4     →0x204a6 ←0x203be
            <POP 2040a-2040c StackAdj>                       Δ-4                {[-4-]}
            <POP 2040c-2040d StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2040d [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20410  MOVE.B  0x20193,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20416  MOVE.B  0x20194,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 2041c  BRA     0x204a6>                                         {[-2-]|[«2""»]}
        <POP 20420-2044c Naked>                              Σ0         →0x204be ←0x203be
            <POP 20420-20422 StackAdj>                       Δ-4                {[-4-]}
            <POP 20422-20423 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20423 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20426  MOVE.B  0x2019b,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2042c  MOVE.B  0x2019c,(A7+0x2)>                                {[-2-]|[«2""»]}
            <POP 20432-20434 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[-4-]}
            <Lit 0x20434>                                                       {[-2-]|[«2""»]|[$$…]}
                <Pointer.sp 0x20434 4>                       Δ-4        
                <Const 0x20438 0x1.2>                        Δ-2        
                <Const 0x2043a 0x3.2>                        Δ-2        
                <Call 0x2043c 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20442-20444 StackAdj>                   Δ+8        
            <MI 20444  MOVE.L  (A7)+,(A6+0xa)>               Δ+4                {[-2-]|[«2""»]}
            <POP 20448-2044a StackAdj>                       Δ+4                {}
            <MI 2044a  BRA     0x204be>                                         {}
        <POP 2044c-20460 Naked>                              Σ0 Δ-4     →0x204a6 ←0x203be
            <POP 2044c-2044e StackAdj>                       Δ-4                {[-4-]}
            <POP 2044e-2044f StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2044f [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20452  MOVE.B  0x2019f,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20458  MOVE.B  0x201a0,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 2045e  BRA     0x204a6>                                         {[-2-]|[«2""»]}
        <POP 20460-20474 Naked>                              Σ0 Δ-4     →0x204a6 ←0x203be
            <POP 20460-20462 StackAdj>                       Δ-4                {[-4-]}
            <POP 20462-20463 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20463 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20466  MOVE.B  0x201a3,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2046c  MOVE.B  0x201a4,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20472  BRA     0x204a6>                                         {[-2-]|[«2""»]}
        <POP 20474-20480 Naked>                              Σ0         ↓ →0x20494 ←0x203be ←0x203be ←0x203be ←0x203be
            <POP 20474-20476 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x20476 0x104cc>                                              {[-2-]}
                MemOnly2MB() : Bool
            <MI 2047c  TST.B   (A7)+>                        Δ+2                {}
            <MI 2047e  BEQ     0x20494>                                         {}
        <POP 20480-20494 Naked>                              Σ0 Δ-4     →0x204a6
            <POP 20480-20482 StackAdj>                       Δ-4                {[-4-]}
            <POP 20482-20483 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20483 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20486  MOVE.B  0x201a7,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2048c  MOVE.B  0x201a8,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20492  BRA     0x204a6>                                         {[-2-]|[«2""»]}
        <POP 20494-204a6 Naked>                              Σ0 Δ-4     ↓ ←0x20474
            <POP 20494-20496 StackAdj>                       Δ-4                {[-4-]}
            <POP 20496-20497 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20497 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 2049a  MOVE.B  0x201ab,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 204a0  MOVE.B  0x201ac,(A7+0x2)>                                {[-2-]|[«2""»]}
        <POP 204a6-204be Naked>                              Σ-4 Δ+4    ↓ ←0x203f4 ←0x2040a ←0x2044c ←0x20460 ←0x20480
            <POP 204a6-204a8 StackAdj>                       Δ-4                {[-8-]}
            <Lit 0x204a8>                                                       {[-4-]|[$$…]}
                <Pointer.sp 0x204a8 4>                       Δ-4        
                <Const 0x204ac 0x1.2>                        Δ-2        
                <Const 0x204ae 0x3.2>                        Δ-2        
                <Call 0x204b0 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 204b6-204b8 StackAdj>                   Δ+8        
            <MI 204b8  MOVE.L  (A7)+,(A6+0xa)>               Δ+4                {[-4-]}
            <POP 204bc-204be StackAdj>                       Δ+4                {}
        <POP 204be-204c6 Epilogue>                           Σ0         ←0x20420

0x204c6


@ 204c6
        <LVAR  0x00e 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x003 @>
        <LVAR -0x004 @>
    <POP 204c6-2050e Body>                                              
        <POP 204c6-204dc Prologue>                           Σ0         ↓
        <POP 204dc-204de Naked>                              Σ0         ↓
            <MI 204dc  MOVEQ.L #0x64,D7>                                        {}
        <POP 204de-204fe Naked>                              Σ0         ↓ →0x20506 ←0x204fe
            <MI 204de  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 204e2  MOVE.B  (A6+0xe),-(A7)>               Δ-2                {[2, '(A6+0xe)']}
            <MI 204e6  PEA.L   (A0)>                         Δ-4                {[2, '(A6+0xe)']|[4, '^(A0)']}
            <Pointer.fp 0x204e8 <LVAR -0x004 @>>             Δ-4                {[2, '(A6+0xe)']|[4, '^(A0)']|[@@-4]}
            <Pointer.fp 0x204ec <LVAR -0x003 @>>             Δ-4                {[2, '(A6+0xe)']|[4, '^(A0)']|[@@-4]|[@@-3]}
            <Call 0x204f0 0x10484>                                              {[2, '(A6+0xe)']|[4, '^(A0)']|[@@-4]|[@@-3]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 204f6-204fa StackAdj>                       Δ+14               {}
            <MI 204fa  SUBQ.L  #0x1,D7>                                         {}
            <MI 204fc  BLE     0x20506>                                         {}
        <POP 204fe-20506 Naked>                              Σ0         ↓ →0x204de
            <MI 204fe  MOVE.B  (A0),D0>                                         {}
            <MI 20500  CMP.B   (A6+0xc),D0>                                     {}
            <MI 20504  BNE     0x204de>                                         {}
        <POP 20506-2050e Epilogue>                           Σ0         ←0x204de

0x2050e


@ 2050e
    <POP 2050e-20562 Body>                                              
        <POP 2050e-20524 Prologue>                           Σ0         ↓
        <POP 20524-20526 Naked>                              Σ0         ↓
            <MI 20524  MOVEQ.L #0x0c,D7>                                        {}
        <POP 20526-20536 Naked>                              Σ0         ↓ →0x20552 ←0x20552
            <POP 20526-20528 StackAdj>                       Δ-2                {[-2-]}
            <MI 20528  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[2, 'D7']}
            <Call 0x2052a 0x104c0>                                              {[-2-]|[2, 'D7']}
                HasBoard(diproc_addr: Byte) : Byte
            <POP 20530-20532 StackAdj>                       Δ+2                {[-2-]}
            <MI 20532  TST.B   (A7)+>                        Δ+2                {}
            <MI 20534  BEQ     0x20552>                                         {}
        <POP 20536-20552 Naked>                              Σ0         ↓
            <MI 20536  MOVE.B  D7,D0>                                           {}
            <MI 20538  EXTB.W  D0>                                              {}
            <MI 2053a  LEA.L   0x215b6,A0>                                      {}
            <MI 20540  MOVE.B  #0x01,(A0+D0.W+#0x30)>                           {}
            <MI 20546  ADDQ.L  #0x1,0x215d6>                                    {}
            <MI 2054c  ADDQ.L  #0x1,0x215d2>                                    {}
        <POP 20552-2055a Naked>                              Σ0         ↓ →0x20526 ←0x20526
            <MI 20552  ADDQ.B  #0x1,D7>                                         {}
            <MI 20554  CMPI.B  #0x0f,D7>                                        {}
            <MI 20558  BLE     0x20526>                                         {}
        <POP 2055a-20562 Epilogue>                           Σ0         

0x20562


@ 20562
        <LVAR  0x008 1(r)>
    <POP 20562-205f8 Body>                                              
        <POP 20562-20578 Prologue>                           Σ0         ↓
        <POP 20578-2058c RegCacheLoad>                       Σ0         ↓
        <POP 2058c-205ae Naked>                              Σ0         →0x205ca →0x205ca →0x205ca →0x205ca →0x205ca →0x205de →0x205de →0x205de →0x205de
            <MI 2058c  ADDQ.L  #0x1,0x215da>                                    {}
            <MI 20592  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 20596  EXTB.W  D0>                                              {}
            <MI 20598  MOVE.W  D0,D1>                                           {}
            <MI 2059a  SUBQ.W  #0x2,D1>                                         {}
            <POP 0x2059c LimitCheck 0x0 ≤ D1 ≤ 0xd>                             {}
            <MI 205a4  ADD.W   D1,D1>                                           {}
            <MI 205a6  SWITCH  D1.W>                                            {}
        <POP 205ca-205de Naked>                              Σ0         →0x205f0 ←0x2058c ←0x2058c ←0x2058c ←0x2058c ←0x2058c
            <MI 205ca  ADDQ.L  #0x1,0x215e2>                                    {}
            <MI 205cc  MOVE.L  0x215e2,D1>                                      {}
            <MI 205ce  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x205d0 LimitCheck 0x0 ≤ D1 ≤ 0x7>                             {}
            <MI 205d6  LEA.L   0x215b6,A0>                                      {}
            <MI 205d8  MOVE.B  D0,(A0+D1.L+#0x13)>                              {}
            <MI 205dc  BRA     0x205f0>                                         {}
        <POP 205de-205f0 Naked>                              Σ0         ↓ ←0x2058c ←0x2058c ←0x2058c ←0x2058c
            <MI 205de  ADDQ.L  #0x1,0x215de>                                    {}
            <MI 205e0  MOVE.L  0x215de,D1>                                      {}
            <MI 205e2  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x205e4 LimitCheck 0x0 ≤ D1 ≤ 0x7>                             {}
            <MI 205ea  LEA.L   0x215b6,A0>                                      {}
            <MI 205ec  MOVE.B  D0,(A0+D1.L+#0xb)>                               {}
        <POP 205f0-205f8 Epilogue>                           Σ0         ←0x205ca

0x205f8


@ 205f8
        <LVAR  0x00a 1(rw)>
        <LVAR  0x008 1(r)>
    <POP 205f8-20654 Body>                                   Δ-4        
        <POP 205f8-2060e Prologue>                           Σ0         ↓
        <POP 2060e-2061a Naked>                              Σ0 Δ-4     ↓
            <MI 2060e  CLR.B   (A6+0xa)>                                        {}
            <Blob 0x20612 [4] @>                             Δ-4                {[«4""»]}
            <MI 20618  MOVEQ.L #0x01,D7>                                        {[«4""»]}
        <POP 2061a-2061e Naked>                              Σ-4        ↓ →0x20644 ←0x20640
            <MI 2061a  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2061c  BGT     0x20644>                                         {[-4-]}
        <POP 2061e-2063c Naked>                              Σ-4        ↓ →0x20640
            <MI 2061e  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 20620  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x20622 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {[-4-]}
            <MI 2062c  LEA.L   0x215b6,A0>                                      {[-4-]}
            <MI 20632  MOVE.B  (A0+D0.L+#0x13),D0>                              {[-4-]}
            <MI 20636  CMP.B   (A6+0x8),D0>                                     {[-4-]}
            <MI 2063a  BNE     0x20640>                                         {[-4-]}
        <POP 2063c-20640 Naked>                              Σ-4 Δ+4    →0x2064c
            <POP 2063c-2063e StackAdj>                       Δ+4                {}
            <MI 2063e  BRA     0x2064c>                                         {}
        <POP 20640-20644 Naked>                              Σ-4        ↓ →0x2061a ←0x2061e
            <MI 20640  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 20642  BVC     0x2061a>                                         {[-4-]}
        <POP 20644-2064c Naked>                              Σ-4 Δ+4    ↓ ←0x2061a
            <POP 20644-20646 StackAdj>                       Δ+4                {}
            <MI 20646  MOVE.B  #0x01,(A6+0xa)>                                  {}
        <POP 2064c-20654 Epilogue>                           Σ0         ←0x2063c

0x20654


@ 20654
        <LVAR  0x00a 1(w)>
        <LVAR  0x008 1(r)>
    <POP 20654-206e0 Body>                                              
        <POP 20654-2066a Prologue>                           Σ0         ↓
        <POP 2066a-2066e RegCacheLoad>                       Σ0         ↓
        <POP 2066e-20688 Naked>                              Σ0         →0x206a4 →0x206aa →0x206b0 →0x206b6 →0x206bc →0x206c2 →0x206c8 →0x206ce →0x206d4
            <MI 2066e  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 20672  EXTB.W  D0>                                              {}
            <MI 20674  SUBQ.W  #0x2,D0>                                         {}
            <POP 0x20676 LimitCheck 0x0 ≤ D0 ≤ 0xd>                             {}
            <MI 2067e  ADD.W   D0,D0>                                           {}
            <MI 20680  SWITCH  D0.W>                                            {}
        <POP 206a4-206aa Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206a4  MOVE.B  #0x05,(A6+0xa)>                                  {}
            <MI 206a8  BRA     0x206d8>                                         {}
        <POP 206aa-206b0 Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206aa  MOVE.B  #0x06,(A6+0xa)>                                  {}
            <MI 206ae  BRA     0x206d8>                                         {}
        <POP 206b0-206b6 Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206b0  MOVE.B  #0x2b,(A6+0xa)>                                  {}
            <MI 206b4  BRA     0x206d8>                                         {}
        <POP 206b6-206bc Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206b6  MOVE.B  #0x03,(A6+0xa)>                                  {}
            <MI 206ba  BRA     0x206d8>                                         {}
        <POP 206bc-206c2 Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206bc  MOVE.B  #0x04,(A6+0xa)>                                  {}
            <MI 206c0  BRA     0x206d8>                                         {}
        <POP 206c2-206c8 Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206c2  MOVE.B  #0x07,(A6+0xa)>                                  {}
            <MI 206c6  BRA     0x206d8>                                         {}
        <POP 206c8-206ce Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206c8  MOVE.B  #0x08,(A6+0xa)>                                  {}
            <MI 206cc  BRA     0x206d8>                                         {}
        <POP 206ce-206d4 Naked>                              Σ0         →0x206d8 ←0x2066e
            <MI 206ce  MOVE.B  #0x09,(A6+0xa)>                                  {}
            <MI 206d2  BRA     0x206d8>                                         {}
        <POP 206d4-206d8 Naked>                              Σ0         ↓ ←0x2066e
            <MI 206d4  MOVE.B  #0x0a,(A6+0xa)>                                  {}
        <POP 206d8-206e0 Epilogue>                           Σ0         ←0x206a4 ←0x206aa ←0x206b0 ←0x206b6 ←0x206bc ←0x206c2 ←0x206c8 ←0x206ce

0x206e0


@ 206e0
        <LVAR  0x008 1(r)>
    <POP 206e0-2071c Body>                                              
        <POP 206e0-206f6 Prologue>                           Σ0         ↓
        <POP 206f6-20714 Naked>                              Σ0         ↓
            <MI 206f6  MOVE.L  (A4+0x4),D0>                                     {}
            <POP 0x206fa LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 20704  LEA.L   0x215b6,A0>                                      {}
            <MI 2070a  MOVE.B  (A6+0x8),(A0+D0.L+#0x4d)>                        {}
            <MI 20710  ADDQ.L  #0x1,(A4+0x4)>                                   {}
        <POP 20714-2071c Epilogue>                           Σ0         

0x2071c


@ 2071c
    <POP 2071c-2078e Body>                                              
        <POP 2071c-20732 Prologue>                           Σ0         ↓
        <POP 20732-20738 RegCacheLoad>                       Σ0         ↓
        <POP 20738-20746 Naked>                              Σ0         ↓ →0x20756
            <MI 20738  MOVE.L  0x215da,D0>                                      {}
            <MI 2073e  CMP.L   0x215d2,D0>                                      {}
            <MI 20744  BNE     0x20756>                                         {}
        <POP 20746-20756 Naked>                              Σ0         →0x20786
            <Const 0x20746 0xb.2>                            Δ-2                {[#11]}
            <Call 0x2074a 0x206e0>                                              {[#11]}
            <POP 2074c-2074d StackAdj>                       Δ+2                {}
            <Const 0x2074d 0x1.2>                            Δ-2                {[#1]}
            <Call 0x20750 0x206e0>                                              {[#1]}
            <POP 20752-20754 StackAdj>                       Δ+2                {}
            <MI 20754  BRA     0x20786>                                         {}
        <POP 20756-20762 Naked>                              Σ0         ↓ →0x20786 ←0x20738
            <MI 20756  MOVE.L  0x215de,D1>                                      {}
            <MI 2075c  ADDQ.L  #0x1,D1>                                         {}
            <MI 2075e  CMP.L   D1,D0>                                           {}
            <MI 20760  BNE     0x20786>                                         {}
        <POP 20762-2076e Naked>                              Σ0         ↓ →0x20786
            <MI 20762  MOVE.L  0x215d6,D1>                                      {}
            <MI 20768  ADDQ.L  #0x1,D1>                                         {}
            <MI 2076a  CMP.L   D1,D0>                                           {}
            <MI 2076c  BNE     0x20786>                                         {}
        <POP 2076e-20778 Naked>                              Σ0         ↓ →0x20786
            <MI 2076e  MOVE.B  0x215c9,D0>                                      {}
            <MI 20774  CMP.B   #0x03,D0>                                        {}
            <MI 20776  BNE     0x20786>                                         {}
        <POP 20778-20786 Naked>                              Σ0         ↓
            <Const 0x20778 0xc.2>                            Δ-2                {[#12]}
            <Call 0x2077c 0x206e0>                                              {[#12]}
            <POP 2077e-20780 StackAdj>                       Δ+2                {}
            <MI 20780  MOVE.B  #0x03,0x21602>                                   {}
        <POP 20786-2078e Epilogue>                           Σ0         ←0x20746 ←0x20756 ←0x20762 ←0x2076e

0x2078e


@ 2078e
        <LVAR  0x00c 1(rw)>
        <LVAR  0x00a 1(r)>
        <LVAR  0x008 1(r)>
    <POP 2078e-20832 Body>                                              
        <POP 2078e-207a4 Prologue>                           Σ0         ↓
        <POP 207a4-207bc RegCacheLoad>                       Σ0         ↓
        <POP 207bc-207ca Naked>                              Σ0         ↓ →0x20804
            <MI 207bc  MOVE.B  (A6+0xa),D0>                                     {}
            <MI 207c0  EXTB.W  D0>                                              {}
            <MI 207c2  LEA.L   0x215b6,A0>                                      {}
            <MI 207c4  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 207c8  BEQ     0x20804>                                         {}
        <POP 207ca-207d8 Naked>                              Σ0         ↓ →0x207f4
            <MI 207ca  MOVE.B  (A6+0x8),D1>                                     {}
            <MI 207ce  EXTB.W  D1>                                              {}
            <MI 207d0  LEA.L   0x215b6,A0>                                      {}
            <MI 207d2  TST.B   (A0+D1.W+#0x30)>                                 {}
            <MI 207d6  BEQ     0x207f4>                                         {}
        <POP 207d8-207de Naked>                              Σ0         ↓ →0x207f2
            <MI 207d8  CLR.B   (A6+0xc)>                                        {}
            <MI 207da  CMP.B   0x215c1,D0>                                      {}
            <MI 207dc  BNE     0x207f2>                                         {}
        <POP 207de-207e6 Naked>                              Σ0         ↓ →0x207f2
            <MI 207de  CMP.B   0x215c2,D1>                                      {}
            <MI 207e4  BNE     0x207f2>                                         {}
        <POP 207e6-207f0 Naked>                              Σ0         ↓ →0x207f2
            <MI 207e6  MOVE.L  0x215de,D0>                                      {}
            <MI 207e8  CMPI.L  #0x00000002,D0>                                  {}
            <MI 207ee  BNE     0x207f2>                                         {}
        <POP 207f0-207f2 Naked>                              Σ0         ↓
            <MI 207f0  ADDQ.B  #0x1,(A6+0xc)>                                   {}
        <POP 207f2-207f4 Naked>                              Σ0         →0x20802 ←0x207d8 ←0x207de ←0x207e6
            <MI 207f2  BRA     0x20802>                                         {}
        <POP 207f4-207fa Naked>                              Σ0         ↓ →0x20802 ←0x207ca
            <MI 207f4  CLR.B   (A6+0xc)>                                        {}
            <MI 207f6  CMP.B   0x215c1,D0>                                      {}
            <MI 207f8  BNE     0x20802>                                         {}
        <POP 207fa-20800 Naked>                              Σ0         ↓ →0x20802
            <MI 207fa  MOVE.L  0x215de,D0>                                      {}
            <MI 207fc  CMP.L   #0x01,D0>                                        {}
            <MI 207fe  BNE     0x20802>                                         {}
        <POP 20800-20802 Naked>                              Σ0         ↓
            <MI 20800  ADDQ.B  #0x1,(A6+0xc)>                                   {}
        <POP 20802-20804 Naked>                              Σ0         →0x2082a ←0x207f2 ←0x207f4 ←0x207fa
            <MI 20802  BRA     0x2082a>                                         {}
        <POP 20804-20812 Naked>                              Σ0         ↓ →0x20822 ←0x207bc
            <MI 20804  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 20808  EXTB.W  D0>                                              {}
            <MI 2080a  LEA.L   0x215b6,A0>                                      {}
            <MI 2080c  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20810  BEQ     0x20822>                                         {}
        <POP 20812-20818 Naked>                              Σ0         ↓ →0x20820
            <MI 20812  CLR.B   (A6+0xc)>                                        {}
            <MI 20814  CMP.B   0x215c1,D0>                                      {}
            <MI 20816  BNE     0x20820>                                         {}
        <POP 20818-2081e Naked>                              Σ0         ↓ →0x20820
            <MI 20818  MOVE.L  0x215de,D0>                                      {}
            <MI 2081a  CMP.L   #0x01,D0>                                        {}
            <MI 2081c  BNE     0x20820>                                         {}
        <POP 2081e-20820 Naked>                              Σ0         ↓
            <MI 2081e  ADDQ.B  #0x1,(A6+0xc)>                                   {}
        <POP 20820-20822 Naked>                              Σ0         →0x2082a ←0x20812 ←0x20818
            <MI 20820  BRA     0x2082a>                                         {}
        <POP 20822-20828 Naked>                              Σ0         ↓ →0x2082a ←0x20804
            <MI 20822  CLR.B   (A6+0xc)>                                        {}
            <MI 20824  TST.L   0x215de>                                         {}
            <MI 20826  BNE     0x2082a>                                         {}
        <POP 20828-2082a Naked>                              Σ0         ↓
            <MI 20828  ADDQ.B  #0x1,(A6+0xc)>                                   {}
        <POP 2082a-20832 Epilogue>                           Σ0         ←0x20802 ←0x20820 ←0x20822

0x20832


@ 20832
    <POP 20832-20918 Body>                                              
        <POP 20832-20848 Prologue>                           Σ0         ↓
        <POP 20848-2086a RegCacheLoad>                       Σ0         ↓
        <POP 2086a-2087c Naked>                              Σ0         →0x20888 →0x208be →0x208c0 →0x208e0 →0x2090a →0x2090a
            <MI 2086a  MOVE.L  0x215e2,D0>                                      {}
            <POP 0x2086c LimitCheck 0x0 ≤ D0 ≤ 0x5>                             {}
            <MI 20872  ADD.W   D0,D0>                                           {}
            <MI 20874  SWITCH  D0.W>                                            {}
        <POP 20888-2089c Naked>                              Σ0         ↓ →0x208a0 ←0x2086a
            <POP 20888-2088a StackAdj>                       Δ-2                {[-2-]}
            <Const 0x2088a 0xd.2>                            Δ-2                {[-2-]|[#13]}
            <Const 0x2088e 0xf.2>                            Δ-2                {[-2-]|[#13]|[#15]}
            <Call 0x20892 0x2078e>                                              {[-2-]|[#13]|[#15]}
            <POP 20896-20898 StackAdj>                       Δ+4                {[-2-]}
            <MI 20898  TST.B   (A7)+>                        Δ+2                {}
            <MI 2089a  BEQ     0x208a0>                                         {}
        <POP 2089c-208a0 Naked>                              Σ0         →0x208b6
            <MI 2089c  MOVE.B  #0x04,0x21602>                                   {}
            <MI 2089e  BRA     0x208b6>                                         {}
        <POP 208a0-208b4 Naked>                              Σ0         ↓ →0x208bc ←0x20888
            <POP 208a0-208a2 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x208a2 0xc.2>                            Δ-2                {[-2-]|[#12]}
            <Const 0x208a6 0xe.2>                            Δ-2                {[-2-]|[#12]|[#14]}
            <Call 0x208aa 0x2078e>                                              {[-2-]|[#12]|[#14]}
            <POP 208ae-208b0 StackAdj>                       Δ+4                {[-2-]}
            <MI 208b0  TST.B   (A7)+>                        Δ+2                {}
            <MI 208b2  BEQ     0x208bc>                                         {}
        <POP 208b4-208b6 Naked>                              Σ0         ↓
            <MI 208b4  MOVE.B  #0x05,0x21602>                                   {}
        <POP 208b6-208bc Naked>                              Σ0         ↓ ←0x2089c
            <Const 0x208b6 0x2.2>                            Δ-2                {[#2]}
            <Call 0x208b8 0x206e0>                                              {[#2]}
            <POP 208ba-208bc StackAdj>                       Δ+2                {}
        <POP 208bc-208be Naked>                              Σ0         →0x20910 ←0x208a0
            <MI 208bc  BRA     0x20910>                                         {}
        <POP 208be-208c0 Naked>                              Σ0         →0x20910 ←0x2086a
            <MI 208be  BRA     0x20910>                                         {}
        <POP 208c0-208c6 Naked>                              Σ0         ↓ →0x208de ←0x2086a
            <MI 208c0  MOVE.L  0x215e2,D0>                                      {}
            <MI 208c2  CMP.L   #0x02,D0>                                        {}
            <MI 208c4  BNE     0x208de>                                         {}
        <POP 208c6-208cc Naked>                              Σ0         ↓ →0x208de
            <MI 208c6  MOVE.B  0x215c9,D0>                                      {}
            <MI 208c8  CMP.B   #0x03,D0>                                        {}
            <MI 208ca  BNE     0x208de>                                         {}
        <POP 208cc-208d6 Naked>                              Σ0         ↓ →0x208de
            <MI 208cc  MOVE.B  0x215ca,D0>                                      {}
            <MI 208d2  CMP.B   #0x07,D0>                                        {}
            <MI 208d4  BNE     0x208de>                                         {}
        <POP 208d6-208de Naked>                              Σ0         ↓
            <MI 208d6  MOVE.B  #0x06,0x21602>                                   {}
            <Const 0x208d8 0x2.2>                            Δ-2                {[#2]}
            <Call 0x208da 0x206e0>                                              {[#2]}
            <POP 208dc-208de StackAdj>                       Δ+2                {}
        <POP 208de-208e0 Naked>                              Σ0         →0x20910 ←0x208c0 ←0x208c6 ←0x208cc
            <MI 208de  BRA     0x20910>                                         {}
        <POP 208e0-208e6 Naked>                              Σ0         ↓ →0x20908 ←0x2086a
            <MI 208e0  MOVE.L  0x215e2,D0>                                      {}
            <MI 208e2  CMP.L   #0x03,D0>                                        {}
            <MI 208e4  BNE     0x20908>                                         {}
        <POP 208e6-208ec Naked>                              Σ0         ↓ →0x20908
            <MI 208e6  MOVE.B  0x215c9,D0>                                      {}
            <MI 208e8  CMP.B   #0x02,D0>                                        {}
            <MI 208ea  BNE     0x20908>                                         {}
        <POP 208ec-208f6 Naked>                              Σ0         ↓ →0x20908
            <MI 208ec  MOVE.B  0x215ca,D0>                                      {}
            <MI 208f2  CMP.B   #0x04,D0>                                        {}
            <MI 208f4  BNE     0x20908>                                         {}
        <POP 208f6-20900 Naked>                              Σ0         ↓ →0x20908
            <MI 208f6  MOVE.B  0x215cb,D0>                                      {}
            <MI 208fc  CMP.B   #0x06,D0>                                        {}
            <MI 208fe  BNE     0x20908>                                         {}
        <POP 20900-20908 Naked>                              Σ0         ↓
            <MI 20900  MOVE.B  #0x07,0x21602>                                   {}
            <Const 0x20902 0x2.2>                            Δ-2                {[#2]}
            <Call 0x20904 0x206e0>                                              {[#2]}
            <POP 20906-20908 StackAdj>                       Δ+2                {}
        <POP 20908-2090a Naked>                              Σ0         →0x20910 ←0x208e0 ←0x208e6 ←0x208ec ←0x208f6
            <MI 20908  BRA     0x20910>                                         {}
        <POP 2090a-20910 Naked>                              Σ0         ↓ ←0x2086a ←0x2086a
            <Const 0x2090a 0x2.2>                            Δ-2                {[#2]}
            <Call 0x2090c 0x206e0>                                              {[#2]}
            <POP 2090e-20910 StackAdj>                       Δ+2                {}
        <POP 20910-20918 Epilogue>                           Σ0         ←0x208bc ←0x208be ←0x208de ←0x20908

0x20918


@ 20918
        <LVAR -0x004 4(r)>
        <LVAR -0x008 @>
    <POP 20918-20a6a Body>                                              
        <POP 20918-2092e Prologue>                           Σ0         ↓
        <POP 2092e-20944 RegCacheLoad>                       Σ0         ↓
        <POP 20944-20952 Naked>                              Σ0         ↓ →0x2096c
            <MI 20944  CLR.L   (A6-0x4)>                                        {}
            <MI 20948  MOVE.B  0x215be,D0>                                      {}
            <MI 2094e  CMP.B   #0x05,D0>                                        {}
            <MI 20950  BNE     0x2096c>                                         {}
        <POP 20952-2095c Naked>                              Σ0         ↓ →0x20966
            <MI 20952  CLR.L   D0>                                              {}
            <MI 20954  MOVE.B  0x21602,D0>                                      {}
            <MI 20956  CMPI.W  #0x000c,D0>                                      {}
            <MI 2095a  BEQ     0x20966>                                         {}
        <POP 2095c-20966 Naked>                              Σ0         ↓ →0x2096c
            <MI 2095c  CLR.L   D0>                                              {}
            <MI 2095e  MOVE.B  0x21602,D0>                                      {}
            <MI 20960  CMPI.W  #0x000d,D0>                                      {}
            <MI 20964  BNE     0x2096c>                                         {}
        <POP 20966-2096c Naked>                              Σ0         ↓ ←0x20952
            <MI 20966  LEA.L   (A6-0x8),A4>                                     {}
            <Call 0x20968 0x20832>                                              {}
        <POP 2096c-20974 Naked>                              Σ0         ↓ →0x20986 ←0x20944 ←0x2095c
            <MI 2096c  TST.L   0x215da>                                         {}
            <MI 20972  BEQ     0x20986>                                         {}
        <POP 20974-2097c Naked>                              Σ0         ↓ →0x20986
            <MI 20974  TST.B   0x215c0>                                         {}
            <MI 2097a  BNE     0x20986>                                         {}
        <POP 2097c-20986 Naked>                              Σ0         ↓
            <Const 0x2097c 0x2a.2>                           Δ-2                {[#42]}
            <MI 20980  LEA.L   (A6-0x8),A4>                                     {[#42]}
            <Call 0x20982 0x206e0>                                              {[#42]}
            <POP 20984-20986 StackAdj>                       Δ+2                {}
        <POP 20986-20994 Naked>                              Σ0         ↓ →0x209a6 ←0x2096c ←0x20974
            <MI 20986  MOVE.L  0x215da,D0>                                      {}
            <MI 2098c  CMPI.L  #0x00000001,D0>                                  {}
            <MI 20992  BLE     0x209a6>                                         {}
        <POP 20994-2099c Naked>                              Σ0         ↓ →0x209a6
            <MI 20994  CMP.L   0x215d2,D0>                                      {}
            <MI 2099a  BNE     0x209a6>                                         {}
        <POP 2099c-209a6 Naked>                              Σ0         ↓
            <Const 0x2099c 0x2b.2>                           Δ-2                {[#43]}
            <MI 209a0  LEA.L   (A6-0x8),A4>                                     {[#43]}
            <Call 0x209a2 0x206e0>                                              {[#43]}
            <POP 209a4-209a6 StackAdj>                       Δ+2                {}
        <POP 209a6-209ae Naked>                              Σ0         ↓ →0x20a06 ←0x20986 ←0x20994
            <MI 209a6  TST.L   0x215de>                                         {}
            <MI 209ac  BLE     0x20a06>                                         {}
        <POP 209ae-209bc Naked>                              Σ0         ↓ →0x209c8
            <MI 209ae  MOVE.L  0x215de,D0>                                      {}
            <MI 209b4  CMP.L   0x215d6,D0>                                      {}
            <MI 209ba  BNE     0x209c8>                                         {}
        <POP 209bc-209c8 Naked>                              Σ0         →0x20a06
            <Const 0x209bc 0x28.2>                           Δ-2                {[#40]}
            <MI 209c0  LEA.L   (A6-0x8),A4>                                     {[#40]}
            <Call 0x209c2 0x206e0>                                              {[#40]}
            <POP 209c4-209c6 StackAdj>                       Δ+2                {}
            <MI 209c6  BRA     0x20a06>                                         {}
        <POP 209c8-209cc Naked>                              Σ0 Δ-4     ↓ ←0x209ae
            <MI 209c8  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 209ca  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 209cc-209d0 Naked>                              Σ-4        ↓ →0x20a04 ←0x209d0
            <MI 209cc  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 209ce  BGT     0x20a04>                                         {[-4-]}
        <POP 209d0-20a04 Naked>                              Σ-4        ↓ →0x209cc
            <POP 209d0-209d2 StackAdj>                       Δ-2                {[-6-]}
            <MI 209d2  MOVE.L  D7,D0>                                           {[-6-]}
            <MI 209d4  SUBQ.L  #0x1,D0>                                         {[-6-]}
            <POP 0x209d6 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {[-6-]}
            <MI 209dc  LEA.L   0x215b6,A0>                                      {[-6-]}
            <MI 209e2  MOVE.B  (A0+D0.L+#0xb),D1>                               {[-6-]}
            <MI 209e6  EXTB.W  D1>                                              {[-6-]}
            <POP 0x209e8 LimitCheck 0x0 ≤ D1 ≤ 0xf>                             {[-6-]}
            <MI 209ea  MOVE.B  D1,-(A7)>                     Δ-2                {[-6-]|[2, 'D1']}
            <Call 0x209ec 0x20654>                                              {[-6-]|[2, 'D1']}
            <POP 209f0-209f2 StackAdj>                       Δ+2                {[-6-]}
            <MI 209f2  MOVE.B  (A7),D0>                                         {[-6-]}
            <MI 209f4  EXTB.W  D0>                                              {[-6-]}
            <POP 0x209f6 LimitCheck 0x0 ≤ D0 ≤ 0x4f>                            {[-6-]}
            <MI 209f8  MOVE.B  D0,(A7)>                                         {[-6-]}
            <MI 209fa  LEA.L   (A6-0x8),A4>                                     {[-6-]}
            <Call 0x209fc 0x206e0>                                              {[-6-]}
            <POP 209fe-20a00 StackAdj>                       Δ+2                {[-4-]}
            <MI 20a00  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 20a02  BVC     0x209cc>                                         {[-4-]}
        <POP 20a04-20a06 Naked>                              Σ-4 Δ+4    ↓ ←0x209cc
            <POP 20a04-20a06 StackAdj>                       Δ+4                {}
        <POP 20a06-20a0e Naked>                              Σ0         ↓ →0x20a62 ←0x209a6 ←0x209bc
            <MI 20a06  TST.L   0x215e2>                                         {}
            <MI 20a0c  BLE     0x20a62>                                         {}
        <POP 20a0e-20a18 Naked>                              Σ0         ↓ →0x20a24
            <MI 20a0e  MOVE.L  0x215e2,D0>                                      {}
            <MI 20a14  CMP.L   #0x05,D0>                                        {}
            <MI 20a16  BNE     0x20a24>                                         {}
        <POP 20a18-20a24 Naked>                              Σ0         →0x20a62
            <Const 0x20a18 0x29.2>                           Δ-2                {[#41]}
            <MI 20a1c  LEA.L   (A6-0x8),A4>                                     {[#41]}
            <Call 0x20a1e 0x206e0>                                              {[#41]}
            <POP 20a20-20a22 StackAdj>                       Δ+2                {}
            <MI 20a22  BRA     0x20a62>                                         {}
        <POP 20a24-20a28 Naked>                              Σ0 Δ-4     ↓ ←0x20a0e
            <MI 20a24  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 20a26  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 20a28-20a2c Naked>                              Σ-4        ↓ →0x20a60 ←0x20a2c
            <MI 20a28  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 20a2a  BGT     0x20a60>                                         {[-4-]}
        <POP 20a2c-20a60 Naked>                              Σ-4        ↓ →0x20a28
            <POP 20a2c-20a2e StackAdj>                       Δ-2                {[-6-]}
            <MI 20a2e  MOVE.L  D7,D0>                                           {[-6-]}
            <MI 20a30  SUBQ.L  #0x1,D0>                                         {[-6-]}
            <POP 0x20a32 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {[-6-]}
            <MI 20a38  LEA.L   0x215b6,A0>                                      {[-6-]}
            <MI 20a3e  MOVE.B  (A0+D0.L+#0x13),D1>                              {[-6-]}
            <MI 20a42  EXTB.W  D1>                                              {[-6-]}
            <POP 0x20a44 LimitCheck 0x0 ≤ D1 ≤ 0xf>                             {[-6-]}
            <MI 20a46  MOVE.B  D1,-(A7)>                     Δ-2                {[-6-]|[2, 'D1']}
            <Call 0x20a48 0x20654>                                              {[-6-]|[2, 'D1']}
            <POP 20a4c-20a4e StackAdj>                       Δ+2                {[-6-]}
            <MI 20a4e  MOVE.B  (A7),D0>                                         {[-6-]}
            <MI 20a50  EXTB.W  D0>                                              {[-6-]}
            <POP 0x20a52 LimitCheck 0x0 ≤ D0 ≤ 0x4f>                            {[-6-]}
            <MI 20a54  MOVE.B  D0,(A7)>                                         {[-6-]}
            <MI 20a56  LEA.L   (A6-0x8),A4>                                     {[-6-]}
            <Call 0x20a58 0x206e0>                                              {[-6-]}
            <POP 20a5a-20a5c StackAdj>                       Δ+2                {[-4-]}
            <MI 20a5c  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 20a5e  BVC     0x20a28>                                         {[-4-]}
        <POP 20a60-20a62 Naked>                              Σ-4 Δ+4    ↓ ←0x20a28
            <POP 20a60-20a62 StackAdj>                       Δ+4                {}
        <POP 20a62-20a6a Epilogue>                           Σ0         ←0x20a06 ←0x20a18

0x20a6a


@ 20a6a
    <POP 20a6a-20a8c Body>                                              
        <POP 20a6a-20a7c Prologue>                           Σ0         ↓
        <POP 20a7c-20a88 Naked>                              Σ0         ↓
            <Call 0x20a7c 0x105b6>                                              {}
                R1000_Reset_L(void)
            <Call 0x20a82 0x105bc>                                              {}
                R1000_Reset_H(void)
        <POP 20a88-20a8c Epilogue>                           Σ0         

0x20a8c


@ 20a8c
        <LVAR  0x008 1(r)>
        <LVAR -0x003 1(rw)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 4(r)>
        <LVAR -0x00c @ 4(r)>
        <LVAR -0x010 @ 4(r)>
        <LVAR -0x014 @ 4(r)>
        <LVAR -0x016 @ 1(rw)>
    <POP 20a8c-20bd0 Body>                                   Δ+20       
        <POP 20a8c-20aa2 Prologue>                           Σ0         ↓
        <POP 20aa2-20ab2 RegCacheLoad>                       Σ0         ↓
        <POP 20ab2-20aca Naked>                              Σ0         ↓ →0x20b76
            <Call 0x20ab2 0x20a6a>                                              {}
            <MI 20ab6  MOVE.B  (A6+0x8),0x21602>                                {}
            <Call 0x20aba 0x20918>                                              {}
            <MI 20abe  MOVE.B  #0x01,(A6-0x16)>                                 {}
            <MI 20ac0  TST.B   0x215f9>                                         {}
            <MI 20ac6  BEQ     0x20b76>                                         {}
        <POP 20aca-20ad2 Naked>                              Σ0         ↓ →0x20b76
            <MI 20aca  TST.B   (A6+0x8)>                                        {}
            <MI 20ace  BEQ     0x20b76>                                         {}
        <POP 20ad2-20ade Naked>                              Σ0         ↓ →0x20b22
            <MI 20ad2  MOVE.B  #0x05,(A6-0x3)>                                  {}
            <MI 20ad6  TST.B   0x215bf>                                         {}
            <MI 20adc  BEQ     0x20b22>                                         {}
        <POP 20ade-20b22 Naked>                              Σ0         ↓
            <Blob 0x20ade [4] @>                             Δ-4                {[«4""»]}
            <MI 20ae2  MOVE.B  (A6-0x3),-(A7)>               Δ-2                {[«4""»]|[2, '(A6-0x3)']}
            <POP 20ae4-20ae6 StackAdj>                       Δ-4                {[«4""»]|[2, '(A6-0x3)']|[-4-]}
            <Lit 0x20ae6 4>                                                     {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]}
            <POP 20af6-20af8 StackAdj>                       Δ-2                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[-2-]}
            <POP 20af8-20af9 StackAdj>                       Δ+2                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]}
            <Const 0x20af9 0x1.2>                            Δ-2                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]}
            <MI 20afa  MOVE.B  0x215f7,D0>                                      {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]}
            <MI 20b00  EXTB.W  D0>                                              {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]}
            <POP 0x20b02 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]}
            <MI 20b04  MOVE.B  D0,-(A7)>                     Δ-2                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']}
            <Pointer.fp 0x20b06 <LVAR -0x016 @ 1(rw)>>       Δ-4                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]}
            <Pointer.fp 0x20b08 <LVAR -0x014 @ 4(r)>>        Δ-4                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]}
            <Pointer.fp 0x20b0c <LVAR -0x010 @ 4(r)>>        Δ-4                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]}
            <Pointer.fp 0x20b10 <LVAR -0x004 @ 1(r)>>        Δ-4                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-4]}
            <Pointer.fp 0x20b14 <LVAR -0x00c @ 4(r)>>        Δ-4                {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-4]|[@@-12]}
            <Call 0x20b18 0x10550>                                              {[«4""»]|[2, '(A6-0x3)']|[$$P1SF]|[#1]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-4]|[@@-12]}
                ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
            <POP 20b1e-20b22 StackAdj>                       Δ+34               {}
        <POP 20b22-20b26 Naked>                              Σ0         ↓ →0x20b76 ←0x20ad2
            <MI 20b22  TST.B   (A6-0x16)>                                       {}
            <MI 20b24  BEQ     0x20b76>                                         {}
        <POP 20b26-20b76 Naked>                              Σ0         ↓
            <Blob 0x20b26 [8] @>                             Δ-8                {[«8""»]}
            <MI 20b36  MOVE.B  (A6-0x3),-(A7)>               Δ-2                {[«8""»]|[2, '(A6-0x3)']}
            <POP 20b38-20b3a StackAdj>                       Δ-4                {[«8""»]|[2, '(A6-0x3)']|[-4-]}
            <Lit 0x20b3a 7>                                                     {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]}
            <POP 20b4a-20b4c StackAdj>                       Δ-2                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]}
            <MI 20b4c  CLR.B   (A7)>                                            {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]}
            <MI 20b4e  MOVE.B  0x215f7,D0>                                      {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]}
            <MI 20b54  EXTB.W  D0>                                              {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]}
            <POP 0x20b56 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]}
            <MI 20b58  MOVE.B  D0,-(A7)>                     Δ-2                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']}
            <Pointer.fp 0x20b5a <LVAR -0x016 @ 1(rw)>>       Δ-4                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']|[@@-22]}
            <Pointer.fp 0x20b5c <LVAR -0x014 @ 4(r)>>        Δ-4                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']|[@@-22]|[@@-20]}
            <Pointer.fp 0x20b60 <LVAR -0x010 @ 4(r)>>        Δ-4                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]}
            <Pointer.fp 0x20b64 <LVAR -0x004 @ 1(r)>>        Δ-4                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-4]}
            <Pointer.fp 0x20b68 <LVAR -0x00c @ 4(r)>>        Δ-4                {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-4]|[@@-12]}
            <Call 0x20b6c 0x10550>                                              {[«8""»]|[2, '(A6-0x3)']|[$$P1DCOMM]|[-2-]|[2, 'D0']|[@@-22]|[@@-20]|[@@-16]|[@@-4]|[@@-12]}
                ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
            <POP 20b72-20b76 StackAdj>                       Δ+38               {}
        <POP 20b76-20b7a Naked>                              Σ0         ↓ →0x20ba8 ←0x20ab2 ←0x20aca ←0x20b22
            <MI 20b76  TST.B   (A6-0x16)>                                       {}
            <MI 20b78  BEQ     0x20ba8>                                         {}
        <POP 20b7a-20ba8 Naked>                              Σ0 Δ-20    →0x20bbe
            <MI 20b7a  MOVE.B  0x215f8,D0>                                      {}
            <MI 20b80  EXTB.W  D0>                                              {}
            <POP 0x20b82 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20b84  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Blob 0x20b86 [4] @>                             Δ-4                {[2, 'D0']|[«4""»]}
            <Blob 0x20b8c [4] @>                             Δ-4                {[2, 'D0']|[«4""»]|[«4""»]}
            <Blob 0x20b92 [2] @>                             Δ-2                {[2, 'D0']|[«4""»]|[«4""»]|[«2""»]}
            <Blob 0x20b94 [8] @>                             Δ-8                {[2, 'D0']|[«4""»]|[«4""»]|[«2""»]|[«8""»]}
            <MI 20ba6  BRA     0x20bbe>                                         {[2, 'D0']|[«4""»]|[«4""»]|[«2""»]|[«8""»]}
        <POP 20ba8-20bbe Naked>                              Σ0 Δ-20    ↓ ←0x20b76
            <MI 20ba8  MOVE.B  (A6-0x16),-(A7)>              Δ-2                {[2, '(A6-0x16)']}
            <MI 20baa  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[2, '(A6-0x16)']|[4, '(A6-0x14)']}
            <MI 20bae  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[2, '(A6-0x16)']|[4, '(A6-0x14)']|[4, '(A6-0x10)']}
            <MI 20bb2  MOVE.B  (A6-0x4),-(A7)>               Δ-2                {[2, '(A6-0x16)']|[4, '(A6-0x14)']|[4, '(A6-0x10)']|[2, '(A6-0x4)']}
            <MI 20bb6  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[2, '(A6-0x16)']|[4, '(A6-0x14)']|[4, '(A6-0x10)']|[2, '(A6-0x4)']|[4, '(A6-0x8)']}
            <MI 20bba  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[2, '(A6-0x16)']|[4, '(A6-0x14)']|[4, '(A6-0x10)']|[2, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '(A6-0xc)']}
        <POP 20bbe-20bc8 Naked>                              Σ-20 Δ+20  ↓ ←0x20b7a
            <Call 0x20bbe 0x1054a>                                              {[-20-]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20bc4-20bc8 StackAdj>                       Δ+20               {}
        <POP 20bc8-20bd0 Epilogue>                           Σ0         

0x20bd0


@ 20bd0
    <POP 20bd0-20ce0 Body>                                              
        <POP 20bd0-20be6 Prologue>                           Σ0         ↓
        <POP 20be6-20c04 RegCacheLoad>                       Σ0         ↓
        <POP 20c04-20c06 Naked>                              Σ0         ↓
            <MI 20c04  MOVEQ.L #0x00,D7>                                        {}
        <POP 20c06-20c16 Naked>                              Σ0         ↓ →0x20c06 ←0x20c06
            <MI 20c06  MOVE.B  D7,D0>                                           {}
            <MI 20c08  EXTB.W  D0>                                              {}
            <MI 20c0a  LEA.L   0x215b6,A0>                                      {}
            <MI 20c0c  CLR.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20c10  ADDQ.B  #0x1,D7>                                         {}
            <MI 20c12  CMP.B   #0x0f,D7>                                        {}
            <MI 20c14  BLE     0x20c06>                                         {}
        <POP 20c16-20c38 Naked>                              Σ0         →0x20c58 →0x20c58 →0x20c64 →0x20c64 →0x20c64 →0x20c6e →0x20c64 →0x20c64 →0x20c8c →0x20c90 →0x20c94 →0x20cb0 →0x20cca →0x20cca →0x20cca →0x20cca
            <MI 20c16  MOVE.L  #0x01,0x215d2>                                   {}
            <MI 20c18  CLR.L   0x215d6>                                         {}
            <MI 20c1e  MOVE.B  0x215be,D0>                                      {}
            <MI 20c24  EXTB.W  D0>                                              {}
            <MI 20c26  MOVE.W  D0,D1>                                           {}
            <POP 0x20c28 LimitCheck 0x0 ≤ D1 ≤ 0xf>                             {}
            <MI 20c2e  ADD.W   D1,D1>                                           {}
            <MI 20c30  SWITCH  D1.W>                                            {}
        <POP 20c58-20c64 Naked>                              Σ0         →0x20cd8 ←0x20c16 ←0x20c16
            <Const 0x20c58 0x2.2>                            Δ-2                {[#2]}
            <Call 0x20c5c 0x20a8c>                                              {[#2]}
            <POP 20c60-20c62 StackAdj>                       Δ+2                {}
            <MI 20c62  BRA     0x20cd8>                                         {}
        <POP 20c64-20c6e Naked>                              Σ0         →0x20cd8 ←0x20c16 ←0x20c16 ←0x20c16 ←0x20c16 ←0x20c16
            <POP 0x20c64 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {}
            <MI 20c66  LEA.L   0x215b6,A0>                                      {}
            <MI 20c68  MOVE.B  #0x01,(A0+D0.W+#0x30)>                           {}
            <MI 20c6c  BRA     0x20cd8>                                         {}
        <POP 20c6e-20c86 Naked>                              Σ0         ↓ ←0x20c16
            <MI 20c6e  MOVE.B  #0x01,0x215e8>                                   {}
            <MI 20c70  MOVE.B  #0x01,0x215e9>                                   {}
            <MI 20c72  MOVE.B  #0x01,0x215ea>                                   {}
            <MI 20c78  MOVE.B  #0x01,0x215ec>                                   {}
            <MI 20c7e  MOVE.B  #0x01,0x215ed>                                   {}
            <MI 20c84  MOVE.L  #0x05,0x215d2>                                   {}
        <POP 20c86-20c8c Naked>                              Σ0         →0x20cd8 ←0x20c8c ←0x20c90
            <Call 0x20c86 0x2050e>                                              {}
            <MI 20c8a  BRA     0x20cd8>                                         {}
        <POP 20c8c-20c90 Naked>                              Σ0         →0x20c86 ←0x20c16
            <MI 20c8c  CLR.L   0x215d2>                                         {}
            <MI 20c8e  BRA     0x20c86>                                         {}
        <POP 20c90-20c94 Naked>                              Σ0         →0x20c86 ←0x20c16
            <MI 20c90  MOVE.B  #0x01,0x215e9>                                   {}
            <MI 20c92  BRA     0x20c86>                                         {}
        <POP 20c94-20cb0 Naked>                              Σ0         →0x20cd8 ←0x20c16
            <MI 20c94  MOVE.B  #0x01,0x215e8>                                   {}
            <MI 20c96  MOVE.B  #0x01,0x215ea>                                   {}
            <MI 20c9c  MOVE.B  #0x01,0x215ec>                                   {}
            <MI 20ca2  MOVE.B  #0x01,0x215ed>                                   {}
            <MI 20ca8  MOVE.L  #0x4,0x215d2>                                    {}
            <MI 20cae  BRA     0x20cd8>                                         {}
        <POP 20cb0-20cca Naked>                              Σ0         →0x20cd8 ←0x20c16
            <MI 20cb0  MOVE.B  #0x01,0x215e8>                                   {}
            <MI 20cb2  MOVE.B  #0x01,0x215e9>                                   {}
            <MI 20cb4  MOVE.B  #0x01,0x215ea>                                   {}
            <MI 20cba  MOVE.B  #0x01,0x215ec>                                   {}
            <MI 20cc0  MOVE.B  #0x01,0x215ed>                                   {}
            <MI 20cc6  MOVE.L  #0x05,0x215d2>                                   {}
            <MI 20cc8  BRA     0x20cd8>                                         {}
        <POP 20cca-20cd8 Naked>                              Σ0         ↓ ←0x20c16 ←0x20c16 ←0x20c16 ←0x20c16
            <POP 0x20cca LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {}
            <MI 20ccc  LEA.L   0x215b6,A0>                                      {}
            <MI 20cce  MOVE.B  #0x01,(A0+D0.W+#0x30)>                           {}
            <MI 20cd2  MOVE.L  #0x01,0x215d6>                                   {}
        <POP 20cd8-20ce0 Epilogue>                           Σ0         ←0x20c58 ←0x20c64 ←0x20c86 ←0x20c94 ←0x20cb0

0x20ce0


@ 20ce0
        <LVAR -0x001 @ 1(r)>
        <LVAR -0x002 @>
        <LVAR -0x003 @>
    <POP 20ce0-20d72 Body>                                   Δ+4        
        <POP 20ce0-20cf6 Prologue>                           Σ0         ↓
        <POP 20cf6-20cfc RegCacheLoad>                       Σ0         ↓
        <POP 20cfc-20d00 Naked>                              Σ0         ↓
            <MI 20cfc  CLR.L   0x215da>                                         {}
            <MI 20cfe  MOVEQ.L #0x02,D7>                                        {}
        <POP 20d00-20d10 Naked>                              Σ0         ↓ →0x20d36 ←0x20d36
            <MI 20d00  MOVE.B  D7,D0>                                           {}
            <MI 20d02  EXTB.W  D0>                                              {}
            <MI 20d04  LEA.L   0x215b6,A0>                                      {}
            <MI 20d0a  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20d0e  BEQ     0x20d36>                                         {}
        <POP 20d10-20d2e Naked>                              Σ0         ↓ →0x20d36
            <MI 20d10  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Pointer.fp 0x20d12 <LVAR -0x003 @>>             Δ-4                {[2, 'D7']|[@@-3]}
            <Pointer.fp 0x20d16 <LVAR -0x002 @>>             Δ-4                {[2, 'D7']|[@@-3]|[@@-2]}
            <Pointer.fp 0x20d1a <LVAR -0x001 @ 1(r)>>        Δ-4                {[2, 'D7']|[@@-3]|[@@-2]|[@@-1]}
            <Call 0x20d1e 0x10484>                                              {[2, 'D7']|[@@-3]|[@@-2]|[@@-1]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 20d24-20d28 StackAdj>                       Δ+14               {}
            <MI 20d28  TST.B   (A6-0x1)>                                        {}
            <MI 20d2c  BNE     0x20d36>                                         {}
        <POP 20d2e-20d36 Naked>                              Σ0         ↓
            <MI 20d2e  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x20d30 0x20562>                                              {[2, 'D7']}
            <POP 20d34-20d36 StackAdj>                       Δ+2                {}
        <POP 20d36-20d3e Naked>                              Σ0         ↓ →0x20d00 ←0x20d00 ←0x20d10
            <MI 20d36  ADDQ.B  #0x1,D7>                                         {}
            <MI 20d38  CMPI.B  #0x0f,D7>                                        {}
            <MI 20d3c  BLE     0x20d00>                                         {}
        <POP 20d3e-20d48 Naked>                              Σ0         ↓ →0x20d4e
            <MI 20d3e  MOVE.L  0x215da,D0>                                      {}
            <MI 20d40  CMPI.L  #0x00000001,D0>                                  {}
            <MI 20d46  BNE     0x20d4e>                                         {}
        <POP 20d48-20d4e Naked>                              Σ0 Δ-2     →0x20d64
            <Const 0x20d48 0xb.2>                            Δ-2                {[#11]}
            <MI 20d4c  BRA     0x20d64>                                         {[#11]}
        <POP 20d4e-20d56 Naked>                              Σ0         ↓ →0x20d5c ←0x20d3e
            <MI 20d4e  CMP.L   0x215d2,D0>                                      {}
            <MI 20d54  BNE     0x20d5c>                                         {}
        <POP 20d56-20d5c Naked>                              Σ0 Δ-2     →0x20d64
            <Const 0x20d56 0x9.2>                            Δ-2                {[#9]}
            <MI 20d5a  BRA     0x20d64>                                         {[#9]}
        <POP 20d5c-20d60 Naked>                              Σ0         ↓ →0x20d6a ←0x20d4e
            <MI 20d5c  TST.L   D0>                                              {}
            <MI 20d5e  BEQ     0x20d6a>                                         {}
        <POP 20d60-20d64 Naked>                              Σ0 Δ-2     ↓
            <Const 0x20d60 0xa.2>                            Δ-2                {[#10]}
        <POP 20d64-20d6a Naked>                              Σ-2 Δ+2    ↓ ←0x20d48 ←0x20d56
            <Call 0x20d64 0x20a8c>                                              {[-2-]}
            <POP 20d68-20d6a StackAdj>                       Δ+2                {}
        <POP 20d6a-20d72 Epilogue>                           Σ0         ←0x20d5c

0x20d72


@ 20d72
        <LVAR -0x001 @>
        <LVAR -0x002 @>
        <LVAR -0x003 @ 1(r)>
    <POP 20d72-20e06 Body>                                   Δ+4        
        <POP 20d72-20d88 Prologue>                           Σ0         ↓
        <POP 20d88-20d90 RegCacheLoad>                       Σ0         ↓
        <POP 20d90-20d94 Naked>                              Σ0         ↓
            <MI 20d90  CLR.L   0x215da>                                         {}
            <MI 20d92  MOVEQ.L #0x02,D7>                                        {}
        <POP 20d94-20da4 Naked>                              Σ0         ↓ →0x20dcc ←0x20dcc
            <MI 20d94  MOVE.B  D7,D0>                                           {}
            <MI 20d96  EXTB.W  D0>                                              {}
            <MI 20d98  LEA.L   0x215b6,A0>                                      {}
            <MI 20d9e  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20da2  BEQ     0x20dcc>                                         {}
        <POP 20da4-20dc4 Naked>                              Σ0         ↓ →0x20dcc
            <MI 20da4  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Pointer.fp 0x20da6 <LVAR -0x003 @ 1(r)>>        Δ-4                {[2, 'D7']|[@@-3]}
            <Pointer.fp 0x20daa <LVAR -0x002 @>>             Δ-4                {[2, 'D7']|[@@-3]|[@@-2]}
            <Pointer.fp 0x20dae <LVAR -0x001 @>>             Δ-4                {[2, 'D7']|[@@-3]|[@@-2]|[@@-1]}
            <Call 0x20db2 0x10484>                                              {[2, 'D7']|[@@-3]|[@@-2]|[@@-1]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 20db8-20dba StackAdj>                       Δ+14               {}
            <MI 20dba  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 20dbe  CMPI.B  #0x05,D0>                                        {}
            <MI 20dc2  BEQ     0x20dcc>                                         {}
        <POP 20dc4-20dcc Naked>                              Σ0         ↓
            <MI 20dc4  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x20dc6 0x20562>                                              {[2, 'D7']}
            <POP 20dca-20dcc StackAdj>                       Δ+2                {}
        <POP 20dcc-20dd4 Naked>                              Σ0         ↓ →0x20d94 ←0x20d94 ←0x20da4
            <MI 20dcc  ADDQ.B  #0x1,D7>                                         {}
            <MI 20dce  CMPI.B  #0x0f,D7>                                        {}
            <MI 20dd2  BLE     0x20d94>                                         {}
        <POP 20dd4-20dde Naked>                              Σ0         ↓ →0x20de2
            <MI 20dd4  MOVE.L  0x215da,D0>                                      {}
            <MI 20dd6  CMPI.L  #0x00000001,D0>                                  {}
            <MI 20ddc  BNE     0x20de2>                                         {}
        <POP 20dde-20de2 Naked>                              Σ0 Δ-2     →0x20df8
            <Const 0x20dde 0xe.2>                            Δ-2                {[#14]}
            <MI 20de0  BRA     0x20df8>                                         {[#14]}
        <POP 20de2-20dea Naked>                              Σ0         ↓ →0x20df0 ←0x20dd4
            <MI 20de2  CMP.L   0x215d2,D0>                                      {}
            <MI 20de8  BNE     0x20df0>                                         {}
        <POP 20dea-20df0 Naked>                              Σ0 Δ-2     →0x20df8
            <Const 0x20dea 0xc.2>                            Δ-2                {[#12]}
            <MI 20dee  BRA     0x20df8>                                         {[#12]}
        <POP 20df0-20df4 Naked>                              Σ0         ↓ →0x20dfe ←0x20de2
            <MI 20df0  TST.L   D0>                                              {}
            <MI 20df2  BEQ     0x20dfe>                                         {}
        <POP 20df4-20df8 Naked>                              Σ0 Δ-2     ↓
            <Const 0x20df4 0xd.2>                            Δ-2                {[#13]}
        <POP 20df8-20dfe Naked>                              Σ-2 Δ+2    ↓ ←0x20dde ←0x20dea
            <Call 0x20df8 0x20a8c>                                              {[-2-]}
            <POP 20dfc-20dfe StackAdj>                       Δ+2                {}
        <POP 20dfe-20e06 Epilogue>                           Σ0         ←0x20df0

0x20e06


@ 20e06
        <LVAR -0x001 @>
        <LVAR -0x002 @>
        <LVAR -0x003 @ 1(r)>
    <POP 20e06-20ea8 Body>                                   Δ+4        
        <POP 20e06-20e1c Prologue>                           Σ0         ↓
        <POP 20e1c-20e24 RegCacheLoad>                       Σ0         ↓
        <POP 20e24-20e28 Naked>                              Σ0         ↓
            <MI 20e24  CLR.L   0x215da>                                         {}
            <MI 20e26  MOVEQ.L #0x02,D7>                                        {}
        <POP 20e28-20e38 Naked>                              Σ0         ↓ →0x20e70 ←0x20e70
            <MI 20e28  MOVE.B  D7,D0>                                           {}
            <MI 20e2a  EXTB.W  D0>                                              {}
            <MI 20e2c  LEA.L   0x215b6,A0>                                      {}
            <MI 20e32  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20e36  BEQ     0x20e70>                                         {}
        <POP 20e38-20e68 Naked>                              Σ0         ↓ →0x20e70
            <MI 20e38  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Const 0x20e3a 0x2.2>                            Δ-2                {[2, 'D7']|[#2]}
            <Call 0x20e3e 0x1048a>                                              {[2, 'D7']|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 20e44-20e46 StackAdj>                       Δ+2                {[2, 'D7']}
            <MI 20e46  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Pointer.fp 0x20e48 <LVAR -0x003 @ 1(r)>>        Δ-4                {[-2-]|[@@-3]}
            <Pointer.fp 0x20e4c <LVAR -0x002 @>>             Δ-4                {[-2-]|[@@-3]|[@@-2]}
            <Pointer.fp 0x20e50 <LVAR -0x001 @>>             Δ-4                {[-2-]|[@@-3]|[@@-2]|[@@-1]}
            <Call 0x20e54 0x10484>                                              {[-2-]|[@@-3]|[@@-2]|[@@-1]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 20e5a-20e5e StackAdj>                       Δ+14               {}
            <MI 20e5e  MOVE.B  (A6-0x3),D0>                                     {}
            <MI 20e62  CMPI.B  #0x05,D0>                                        {}
            <MI 20e66  BEQ     0x20e70>                                         {}
        <POP 20e68-20e70 Naked>                              Σ0         ↓
            <MI 20e68  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x20e6a 0x20562>                                              {[2, 'D7']}
            <POP 20e6e-20e70 StackAdj>                       Δ+2                {}
        <POP 20e70-20e76 Naked>                              Σ0         ↓ →0x20e28 ←0x20e28 ←0x20e38
            <MI 20e70  ADDQ.B  #0x1,D7>                                         {}
            <MI 20e72  CMP.B   #0x0f,D7>                                        {}
            <MI 20e74  BLE     0x20e28>                                         {}
        <POP 20e76-20e80 Naked>                              Σ0         ↓ →0x20e86
            <MI 20e76  MOVE.L  0x215da,D0>                                      {}
            <MI 20e78  CMPI.L  #0x00000001,D0>                                  {}
            <MI 20e7e  BNE     0x20e86>                                         {}
        <POP 20e80-20e86 Naked>                              Σ0 Δ-2     →0x20e9a
            <Const 0x20e80 0x11.2>                           Δ-2                {[#17]}
            <MI 20e84  BRA     0x20e9a>                                         {[#17]}
        <POP 20e86-20e8e Naked>                              Σ0         ↓ →0x20e92 ←0x20e76
            <MI 20e86  CMP.L   0x215d2,D0>                                      {}
            <MI 20e8c  BNE     0x20e92>                                         {}
        <POP 20e8e-20e92 Naked>                              Σ0 Δ-2     →0x20e9a
            <Const 0x20e8e 0xf.2>                            Δ-2                {[#15]}
            <MI 20e90  BRA     0x20e9a>                                         {[#15]}
        <POP 20e92-20e96 Naked>                              Σ0         ↓ →0x20ea0 ←0x20e86
            <MI 20e92  TST.L   D0>                                              {}
            <MI 20e94  BEQ     0x20ea0>                                         {}
        <POP 20e96-20e9a Naked>                              Σ0 Δ-2     ↓
            <Const 0x20e96 0x10.2>                           Δ-2                {[#16]}
        <POP 20e9a-20ea0 Naked>                              Σ-2 Δ+2    ↓ ←0x20e80 ←0x20e8e
            <Call 0x20e9a 0x20a8c>                                              {[-2-]}
            <POP 20e9e-20ea0 StackAdj>                       Δ+2                {}
        <POP 20ea0-20ea8 Epilogue>                           Σ0         ←0x20e92

0x20ea8


@ 20ea8
        <LVAR -0x006 @ 4(r)>
        <LVAR -0x008 @>
        <LVAR -0x009 @>
        <LVAR -0x00a @ 1(r)>
    <POP 20ea8-20fa4 Body>                                   Δ+4        
        <POP 20ea8-20ebe Prologue>                           Σ0         ↓
        <POP 20ebe-20eca RegCacheLoad>                       Σ0         ↓
        <POP 20eca-20ece Naked>                              Σ0         ↓
            <MI 20eca  CLR.L   0x215da>                                         {}
            <MI 20ecc  MOVEQ.L #0x02,D7>                                        {}
        <POP 20ece-20ee0 Naked>                              Σ0         ↓ →0x20f6a ←0x20f6a
            <MI 20ece  MOVE.B  D7,D0>                                           {}
            <MI 20ed0  EXTB.W  D0>                                              {}
            <MI 20ed2  LEA.L   0x215b6,A0>                                      {}
            <MI 20ed8  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20edc  BEQ     0x20f6a>                                         {}
        <POP 20ee0-20f62 Naked>                              Σ0         ↓ →0x20f6a
            <Blob 0x20ee0 [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x20ee4 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x20ee8 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <POP 20eec-20eee StackAdj>                       Δ-8                {[«2""»]|[«2""»]|[«2""»]|[-8-]}
            <Lit 0x20eee 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$RESET.]}
            <POP 20efe-20f00 StackAdj>                       Δ-6                {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$RESET.]|[-6-]}
            <MI 20f00  MOVE.B  D7,(A7)>                                         {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$RESET.]|[-6-]}
            <Call 0x20f02 0x203a4>                                              {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$RESET.]|[-6-]}
            <POP 20f06-20f08 StackAdj>                       Δ+2                {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$RESET.]|[-4-]}
            <Call 0x20f08 0x102d0>                                              {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$RESET.]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20f0e-20f10 StackAdj>                       Δ+8                {[«2""»]|[«2""»]|[«2""»]|[-4-]}
            <MI 20f10  MOVEA.L (A7)+,A4>                     Δ+4                {[«2""»]|[«2""»]|[«2""»]}
            <POP 20f12-20f14 StackAdj>                       Δ+2                {[«2""»]|[«2""»]}
            <MI 20f14  MOVE.L  A4,(A7)>                                         {[4, 'A4']}
            <Pointer.fp 0x20f16 <LVAR -0x006 @ 4(r)>>        Δ-4                {[4, 'A4']|[@@-6]}
            <Call 0x20f18 0x10460>                                              {[4, 'A4']|[@@-6]}
                ExpLoad(a : String; b: Pointer)
            <POP 20f1e-20f20 StackAdj>                       Δ+6                {[-2-]}
            <MI 20f20  MOVE.B  D7,(A7)>                                         {[-2-]}
            <MI 20f22  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x6)']}
            <Call 0x20f24 0x1047e>                                              {[-2-]|[4, '(A6-0x6)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 20f2a-20f2c StackAdj>                       Δ+6                {}
            <Pointer.fp 0x20f2c <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x20f2e 0x10496>                                              {[@@-6]}
                ExpClose(exp : Pointer)
            <POP 20f34-20f36 StackAdj>                       Δ+4                {}
            <Const 0x20f36 0x186.4>                          Δ-4                {[##390]}
            <Call 0x20f3a 0x10224>                                              {[##390]}
                KC12_Sleep(dur: Long)
            <POP 20f40-20f42 StackAdj>                       Δ+4                {}
            <MI 20f42  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Pointer.fp 0x20f44 <LVAR -0x00a @ 1(r)>>        Δ-4                {[2, 'D7']|[@@-10]}
            <Pointer.fp 0x20f48 <LVAR -0x009 @>>             Δ-4                {[2, 'D7']|[@@-10]|[@@-9]}
            <Pointer.fp 0x20f4c <LVAR -0x008 @>>             Δ-4                {[2, 'D7']|[@@-10]|[@@-9]|[@@-8]}
            <Call 0x20f50 0x10484>                                              {[2, 'D7']|[@@-10]|[@@-9]|[@@-8]}
                DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
            <POP 20f56-20f5a StackAdj>                       Δ+14               {}
            <MI 20f5a  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 20f5e  CMP.B   #0x01,D0>                                        {}
            <MI 20f60  BEQ     0x20f6a>                                         {}
        <POP 20f62-20f6a Naked>                              Σ0         ↓
            <MI 20f62  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x20f64 0x20562>                                              {[2, 'D7']}
            <POP 20f68-20f6a StackAdj>                       Δ+2                {}
        <POP 20f6a-20f74 Naked>                              Σ0         ↓ →0x20ece ←0x20ece ←0x20ee0
            <MI 20f6a  ADDQ.B  #0x1,D7>                                         {}
            <MI 20f6c  CMPI.B  #0x0f,D7>                                        {}
            <MI 20f70  BLE     0x20ece>                                         {}
        <POP 20f74-20f7a Naked>                              Σ0         ↓ →0x20f80
            <MI 20f74  MOVE.L  0x215da,D0>                                      {}
            <MI 20f76  CMP.L   #0x01,D0>                                        {}
            <MI 20f78  BNE     0x20f80>                                         {}
        <POP 20f7a-20f80 Naked>                              Σ0 Δ-2     →0x20f96
            <Const 0x20f7a 0x14.2>                           Δ-2                {[#20]}
            <MI 20f7e  BRA     0x20f96>                                         {[#20]}
        <POP 20f80-20f88 Naked>                              Σ0         ↓ →0x20f8e ←0x20f74
            <MI 20f80  CMP.L   0x215d2,D0>                                      {}
            <MI 20f86  BNE     0x20f8e>                                         {}
        <POP 20f88-20f8e Naked>                              Σ0 Δ-2     →0x20f96
            <Const 0x20f88 0x12.2>                           Δ-2                {[#18]}
            <MI 20f8c  BRA     0x20f96>                                         {[#18]}
        <POP 20f8e-20f92 Naked>                              Σ0         ↓ →0x20f9c ←0x20f80
            <MI 20f8e  TST.L   D0>                                              {}
            <MI 20f90  BEQ     0x20f9c>                                         {}
        <POP 20f92-20f96 Naked>                              Σ0 Δ-2     ↓
            <Const 0x20f92 0x13.2>                           Δ-2                {[#19]}
        <POP 20f96-20f9c Naked>                              Σ-2 Δ+2    ↓ ←0x20f7a ←0x20f88
            <Call 0x20f96 0x20a8c>                                              {[-2-]}
            <POP 20f9a-20f9c StackAdj>                       Δ+2                {}
        <POP 20f9c-20fa4 Epilogue>                           Σ0         ←0x20f8e

0x20fa4


@ 20fa4
        <LVAR -0x006 @ 4(r)>
        <LVAR -0x00a @ 1(r)>
    <POP 20fa4-210a6 Body>                                   Δ+4        
        <POP 20fa4-20fba Prologue>                           Σ0         ↓
        <POP 20fba-20fc6 RegCacheLoad>                       Σ0         ↓
        <POP 20fc6-20fca Naked>                              Σ0         ↓
            <MI 20fc6  CLR.L   0x215da>                                         {}
            <MI 20fc8  MOVEQ.L #0x02,D7>                                        {}
        <POP 20fca-20fdc Naked>                              Σ0         ↓ →0x2106c ←0x2106c
            <MI 20fca  MOVE.B  D7,D0>                                           {}
            <MI 20fcc  EXTB.W  D0>                                              {}
            <MI 20fce  LEA.L   0x215b6,A0>                                      {}
            <MI 20fd4  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 20fd8  BEQ     0x2106c>                                         {}
        <POP 20fdc-21064 Naked>                              Σ0         ↓ →0x2106c
            <Blob 0x20fdc [14] @>                            Δ-14               {[«14""»]}
            <POP 20fe8-20fea StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x20fea 14>                                                    {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]}
            <POP 20ffa-20ffc StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-6-]}
            <MI 20ffc  MOVE.B  D7,(A7)>                                         {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-6-]}
            <Call 0x20ffe 0x203a4>                                              {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-6-]}
            <POP 21002-21004 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-4-]}
            <Call 0x21004 0x102d0>                                              {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2100a-2100c StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <MI 2100c  MOVEA.L (A7)+,A4>                     Δ+4                {[«14""»]}
            <POP 2100e-21012 StackAdj>                       Δ+10               {[-4-]}
            <MI 21012  MOVE.L  A4,(A7)>                                         {[4, 'A4']}
            <Pointer.fp 0x21014 <LVAR -0x006 @ 4(r)>>        Δ-4                {[4, 'A4']|[@@-6]}
            <Call 0x21016 0x10460>                                              {[4, 'A4']|[@@-6]}
                ExpLoad(a : String; b: Pointer)
            <POP 2101c-2101e StackAdj>                       Δ+6                {[-2-]}
            <MI 2101e  CLR.B   (A7)>                                            {[-2-]}
            <MI 21020  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x6)']}
            <Pointer.sp 0x21022 4>                           Δ-4                {[-2-]|[4, '(A6-0x6)']|[^^4]}
            <Const 0x21026 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]}
            <Const 0x2102a 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
            <Call 0x2102e 0x10466>                                              {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 21034-21038 StackAdj>                       Δ+16               {[-2-]}
            <MI 21038  MOVE.B  D7,(A7)>                                         {[-2-]}
            <MI 2103a  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x6)']}
            <Call 0x2103c 0x1047e>                                              {[-2-]|[4, '(A6-0x6)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 21042-21044 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x21044 <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x21046 0x10496>                                              {[@@-6]}
                ExpClose(exp : Pointer)
            <POP 2104c-2104e StackAdj>                       Δ+2                {[-2-]}
            <MI 2104e  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x21050 0x1.2>                            Δ-2                {[-2-]|[#1]}
            <Pointer.fp 0x21052 <LVAR -0x00a @ 1(r)>>        Δ-4                {[-2-]|[#1]|[@@-10]}
            <Call 0x21056 0x204c6>                                              {[-2-]|[#1]|[@@-10]}
            <POP 2105a-2105c StackAdj>                       Δ+8                {}
            <MI 2105c  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 21060  CMP.B   #0x01,D0>                                        {}
            <MI 21062  BEQ     0x2106c>                                         {}
        <POP 21064-2106c Naked>                              Σ0         ↓
            <MI 21064  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x21066 0x20562>                                              {[2, 'D7']}
            <POP 2106a-2106c StackAdj>                       Δ+2                {}
        <POP 2106c-21076 Naked>                              Σ0         ↓ →0x20fca ←0x20fca ←0x20fdc
            <MI 2106c  ADDQ.B  #0x1,D7>                                         {}
            <MI 2106e  CMPI.B  #0x0f,D7>                                        {}
            <MI 21072  BLE     0x20fca>                                         {}
        <POP 21076-2107c Naked>                              Σ0         ↓ →0x21082
            <MI 21076  MOVE.L  0x215da,D0>                                      {}
            <MI 21078  CMP.L   #0x01,D0>                                        {}
            <MI 2107a  BNE     0x21082>                                         {}
        <POP 2107c-21082 Naked>                              Σ0 Δ-2     →0x21098
            <Const 0x2107c 0x17.2>                           Δ-2                {[#23]}
            <MI 21080  BRA     0x21098>                                         {[#23]}
        <POP 21082-2108a Naked>                              Σ0         ↓ →0x21090 ←0x21076
            <MI 21082  CMP.L   0x215d2,D0>                                      {}
            <MI 21088  BNE     0x21090>                                         {}
        <POP 2108a-21090 Naked>                              Σ0 Δ-2     →0x21098
            <Const 0x2108a 0x15.2>                           Δ-2                {[#21]}
            <MI 2108e  BRA     0x21098>                                         {[#21]}
        <POP 21090-21094 Naked>                              Σ0         ↓ →0x2109e ←0x21082
            <MI 21090  TST.L   D0>                                              {}
            <MI 21092  BEQ     0x2109e>                                         {}
        <POP 21094-21098 Naked>                              Σ0 Δ-2     ↓
            <Const 0x21094 0x16.2>                           Δ-2                {[#22]}
        <POP 21098-2109e Naked>                              Σ-2 Δ+2    ↓ ←0x2107c ←0x2108a
            <Call 0x21098 0x20a8c>                                              {[-2-]}
            <POP 2109c-2109e StackAdj>                       Δ+2                {}
        <POP 2109e-210a6 Epilogue>                           Σ0         ←0x21090

0x210a6


@ 210a6
        <LVAR -0x006 @ 4(r)>
        <LVAR -0x00a @ 1(r)>
    <POP 210a6-21210 Body>                                   Δ+8        
        <POP 210a6-210bc Prologue>                           Σ0         ↓
        <POP 210bc-210d0 RegCacheLoad>                       Σ0         ↓
        <POP 210d0-210d4 Naked>                              Σ0         ↓
            <MI 210d0  CLR.L   0x215da>                                         {}
            <MI 210d2  MOVEQ.L #0x02,D7>                                        {}
        <POP 210d4-210e6 Naked>                              Σ0         ↓ →0x21172 ←0x21172
            <MI 210d4  MOVE.B  D7,D0>                                           {}
            <MI 210d6  EXTB.W  D0>                                              {}
            <MI 210d8  LEA.L   0x215b6,A0>                                      {}
            <MI 210de  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 210e2  BEQ     0x21172>                                         {}
        <POP 210e6-2116a Naked>                              Σ0         ↓ →0x21172
            <Blob 0x210e6 [14] @>                            Δ-14               {[«14""»]}
            <POP 210f2-210f4 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x210f4 14>                                                    {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]}
            <POP 21104-21106 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-6-]}
            <MI 21106  MOVE.B  D7,(A7)>                                         {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-6-]}
            <Call 0x21108 0x203a4>                                              {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-6-]}
            <POP 2110c-2110e StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-4-]}
            <Call 0x2110e 0x102d0>                                              {[«14""»]|[-4-]|[$$TRIGGER_SCOPE.]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21114-21116 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <MI 21116  MOVEA.L (A7)+,A4>                     Δ+4                {[«14""»]}
            <POP 21118-2111c StackAdj>                       Δ+10               {[-4-]}
            <MI 2111c  MOVE.L  A4,(A7)>                                         {[4, 'A4']}
            <Pointer.fp 0x2111e <LVAR -0x006 @ 4(r)>>        Δ-4                {[4, 'A4']|[@@-6]}
            <Call 0x21120 0x10460>                                              {[4, 'A4']|[@@-6]}
                ExpLoad(a : String; b: Pointer)
            <POP 21126-21128 StackAdj>                       Δ+6                {[-2-]}
            <POP 21128-21129 StackAdj>                       Δ+2                {}
            <Const 0x21129 0x1.2>                            Δ-2                {[#1]}
            <MI 2112a  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[#1]|[4, '(A6-0x6)']}
            <Pointer.sp 0x2112c 4>                           Δ-4                {[#1]|[4, '(A6-0x6)']|[^^4]}
            <Const 0x21130 0x0.4>                            Δ-4                {[#1]|[4, '(A6-0x6)']|[^^4]|[##0]}
            <Const 0x21134 0x0.4>                            Δ-4                {[#1]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
            <Call 0x21138 0x10466>                                              {[#1]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 2113e-21142 StackAdj>                       Δ+16               {[#1]}
            <MI 21142  MOVE.B  D7,(A7)>                                         {[-2-]}
            <MI 21144  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x6)']}
            <Call 0x21146 0x1047e>                                              {[-2-]|[4, '(A6-0x6)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 2114c-2114e StackAdj>                       Δ+6                {}
            <Pointer.fp 0x2114e <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x21150 0x10496>                                              {[@@-6]}
                ExpClose(exp : Pointer)
            <POP 21156-21158 StackAdj>                       Δ+2                {[-2-]}
            <MI 21158  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x2115a 0x2.2>                            Δ-2                {[-2-]|[#2]}
            <Pointer.fp 0x2115c <LVAR -0x00a @ 1(r)>>        Δ-4                {[-2-]|[#2]|[@@-10]}
            <Call 0x2115e 0x204c6>                                              {[-2-]|[#2]|[@@-10]}
            <POP 21162-21164 StackAdj>                       Δ+8                {}
            <MI 21164  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 21166  CMP.B   #0x02,D0>                                        {}
            <MI 21168  BEQ     0x21172>                                         {}
        <POP 2116a-21172 Naked>                              Σ0         ↓
            <MI 2116a  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x2116c 0x20562>                                              {[2, 'D7']}
            <POP 21170-21172 StackAdj>                       Δ+2                {}
        <POP 21172-2117a Naked>                              Σ0         ↓ →0x210d4 ←0x210d4 ←0x210e6
            <MI 21172  ADDQ.B  #0x1,D7>                                         {}
            <MI 21174  CMP.B   #0x0f,D7>                                        {}
            <MI 21176  BLE     0x210d4>                                         {}
        <POP 2117a-21180 Naked>                              Σ0         ↓ →0x21186
            <MI 2117a  MOVE.L  0x215da,D0>                                      {}
            <MI 2117c  CMP.L   #0x01,D0>                                        {}
            <MI 2117e  BNE     0x21186>                                         {}
        <POP 21180-21186 Naked>                              Σ0 Δ-2     →0x2119c
            <Const 0x21180 0x1a.2>                           Δ-2                {[#26]}
            <MI 21184  BRA     0x2119c>                                         {[#26]}
        <POP 21186-2118e Naked>                              Σ0         ↓ →0x21194 ←0x2117a
            <MI 21186  CMP.L   0x215d2,D0>                                      {}
            <MI 2118c  BNE     0x21194>                                         {}
        <POP 2118e-21194 Naked>                              Σ0 Δ-2     →0x2119c
            <Const 0x2118e 0x18.2>                           Δ-2                {[#24]}
            <MI 21192  BRA     0x2119c>                                         {[#24]}
        <POP 21194-21198 Naked>                              Σ0         ↓ →0x211a2 ←0x21186
            <MI 21194  TST.L   D0>                                              {}
            <MI 21196  BEQ     0x211a2>                                         {}
        <POP 21198-2119c Naked>                              Σ0 Δ-2     ↓
            <Const 0x21198 0x19.2>                           Δ-2                {[#25]}
        <POP 2119c-211a2 Naked>                              Σ-2 Δ+2    ↓ ←0x21180 ←0x2118e
            <Call 0x2119c 0x20a8c>                                              {[-2-]}
            <POP 211a0-211a2 StackAdj>                       Δ+2                {}
        <POP 211a2-211a4 Naked>                              Σ0         ↓ ←0x21194
            <MI 211a2  MOVEQ.L #0x02,D7>                                        {}
        <POP 211a4-211b4 Naked>                              Σ0         ↓ →0x211da ←0x211da
            <MI 211a4  MOVE.B  D7,D0>                                           {}
            <MI 211a6  EXTB.W  D0>                                              {}
            <MI 211a8  LEA.L   0x215b6,A0>                                      {}
            <MI 211ae  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 211b2  BEQ     0x211da>                                         {}
        <POP 211b4-211d2 Naked>                              Σ0         ↓ →0x211da
            <MI 211b4  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Const 0x211b6 0x1.2>                            Δ-2                {[2, 'D7']|[#1]}
            <Call 0x211b8 0x1048a>                                              {[2, 'D7']|[#1]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 211be-211c0 StackAdj>                       Δ+2                {[2, 'D7']}
            <MI 211c0  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x211c2 0x1.2>                            Δ-2                {[-2-]|[#1]}
            <Pointer.fp 0x211c4 <LVAR -0x00a @ 1(r)>>        Δ-4                {[-2-]|[#1]|[@@-10]}
            <Call 0x211c6 0x204c6>                                              {[-2-]|[#1]|[@@-10]}
            <POP 211ca-211cc StackAdj>                       Δ+8                {}
            <MI 211cc  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 211ce  CMP.B   #0x01,D0>                                        {}
            <MI 211d0  BEQ     0x211da>                                         {}
        <POP 211d2-211da Naked>                              Σ0         ↓
            <MI 211d2  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x211d4 0x20562>                                              {[2, 'D7']}
            <POP 211d8-211da StackAdj>                       Δ+2                {}
        <POP 211da-211e0 Naked>                              Σ0         ↓ →0x211a4 ←0x211a4 ←0x211b4
            <MI 211da  ADDQ.B  #0x1,D7>                                         {}
            <MI 211dc  CMP.B   #0x0f,D7>                                        {}
            <MI 211de  BLE     0x211a4>                                         {}
        <POP 211e0-211e6 Naked>                              Σ0         ↓ →0x211ec
            <MI 211e0  MOVE.L  0x215da,D0>                                      {}
            <MI 211e2  CMP.L   #0x01,D0>                                        {}
            <MI 211e4  BNE     0x211ec>                                         {}
        <POP 211e6-211ec Naked>                              Σ0 Δ-2     →0x21202
            <Const 0x211e6 0x1d.2>                           Δ-2                {[#29]}
            <MI 211ea  BRA     0x21202>                                         {[#29]}
        <POP 211ec-211f4 Naked>                              Σ0         ↓ →0x211fa ←0x211e0
            <MI 211ec  CMP.L   0x215d2,D0>                                      {}
            <MI 211f2  BNE     0x211fa>                                         {}
        <POP 211f4-211fa Naked>                              Σ0 Δ-2     →0x21202
            <Const 0x211f4 0x1b.2>                           Δ-2                {[#27]}
            <MI 211f8  BRA     0x21202>                                         {[#27]}
        <POP 211fa-211fe Naked>                              Σ0         ↓ →0x21208 ←0x211ec
            <MI 211fa  TST.L   D0>                                              {}
            <MI 211fc  BEQ     0x21208>                                         {}
        <POP 211fe-21202 Naked>                              Σ0 Δ-2     ↓
            <Const 0x211fe 0x1c.2>                           Δ-2                {[#28]}
        <POP 21202-21208 Naked>                              Σ-2 Δ+2    ↓ ←0x211e6 ←0x211f4
            <Call 0x21202 0x20a8c>                                              {[-2-]}
            <POP 21206-21208 StackAdj>                       Δ+2                {}
        <POP 21208-21210 Epilogue>                           Σ0         ←0x211fa

0x21210


@ 21210
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x007 @ 1(r)>
    <POP 21210-21344 Body>                                   Δ+8        
        <POP 21210-21226 Prologue>                           Σ0         ↓
        <POP 21226-21240 RegCacheLoad>                       Σ0         ↓
        <POP 21240-21244 Naked>                              Σ0         ↓
            <MI 21240  CLR.L   0x215da>                                         {}
            <MI 21242  MOVEQ.L #0x02,D7>                                        {}
        <POP 21244-21250 Naked>                              Σ0         ↓ →0x212ac ←0x212ac
            <MI 21244  MOVE.B  D7,D0>                                           {}
            <MI 21246  EXTB.W  D0>                                              {}
            <MI 21248  LEA.L   0x215b6,A0>                                      {}
            <MI 2124a  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 2124e  BEQ     0x212ac>                                         {}
        <POP 21250-212a4 Naked>                              Σ0         ↓ →0x212ac
            <Blob 0x21250 [14] @>                            Δ-14               {[«14""»]}
            <POP 2125c-2125e StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x2125e 14>                                                    {[«14""»]|[$$TEST_PAUSE.SEQ]}
            <Pointer.fp 0x21270 <LVAR -0x004 @ 4(r)>>        Δ-4                {[«14""»]|[$$TEST_PAUSE.SEQ]|[@@-4]}
            <Call 0x21272 0x10460>                                              {[«14""»]|[$$TEST_PAUSE.SEQ]|[@@-4]}
                ExpLoad(a : String; b: Pointer)
            <POP 21278-2127c StackAdj>                       Δ+20               {[-2-]}
            <MI 2127c  MOVE.B  D7,(A7)>                                         {[-2-]}
            <MI 2127e  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x4)']}
            <Call 0x21280 0x1047e>                                              {[-2-]|[4, '(A6-0x4)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 21286-21288 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x21288 <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-4]}
            <Call 0x2128a 0x10496>                                              {[@@-4]}
                ExpClose(exp : Pointer)
            <POP 21290-21292 StackAdj>                       Δ+2                {[-2-]}
            <MI 21292  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x21294 0x3.2>                            Δ-2                {[-2-]|[#3]}
            <Pointer.fp 0x21296 <LVAR -0x007 @ 1(r)>>        Δ-4                {[-2-]|[#3]|[@@-7]}
            <Call 0x21298 0x204c6>                                              {[-2-]|[#3]|[@@-7]}
            <POP 2129c-2129e StackAdj>                       Δ+8                {}
            <MI 2129e  MOVE.B  (A6-0x7),D0>                                     {}
            <MI 212a0  CMP.B   #0x03,D0>                                        {}
            <MI 212a2  BEQ     0x212ac>                                         {}
        <POP 212a4-212ac Naked>                              Σ0         ↓
            <MI 212a4  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x212a6 0x20562>                                              {[2, 'D7']}
            <POP 212aa-212ac StackAdj>                       Δ+2                {}
        <POP 212ac-212b2 Naked>                              Σ0         ↓ →0x21244 ←0x21244 ←0x21250
            <MI 212ac  ADDQ.B  #0x1,D7>                                         {}
            <MI 212ae  CMP.B   #0x0f,D7>                                        {}
            <MI 212b0  BLE     0x21244>                                         {}
        <POP 212b2-212b8 Naked>                              Σ0         ↓ →0x212be
            <MI 212b2  MOVE.L  0x215da,D0>                                      {}
            <MI 212b4  CMP.L   #0x01,D0>                                        {}
            <MI 212b6  BNE     0x212be>                                         {}
        <POP 212b8-212be Naked>                              Σ0 Δ-2     →0x212d4
            <Const 0x212b8 0x20.2>                           Δ-2                {[#32]}
            <MI 212bc  BRA     0x212d4>                                         {[#32]}
        <POP 212be-212c6 Naked>                              Σ0         ↓ →0x212cc ←0x212b2
            <MI 212be  CMP.L   0x215d2,D0>                                      {}
            <MI 212c4  BNE     0x212cc>                                         {}
        <POP 212c6-212cc Naked>                              Σ0 Δ-2     →0x212d4
            <Const 0x212c6 0x1e.2>                           Δ-2                {[#30]}
            <MI 212ca  BRA     0x212d4>                                         {[#30]}
        <POP 212cc-212d0 Naked>                              Σ0         ↓ →0x212da ←0x212be
            <MI 212cc  TST.L   D0>                                              {}
            <MI 212ce  BEQ     0x212da>                                         {}
        <POP 212d0-212d4 Naked>                              Σ0 Δ-2     ↓
            <Const 0x212d0 0x1f.2>                           Δ-2                {[#31]}
        <POP 212d4-212da Naked>                              Σ-2 Δ+2    ↓ ←0x212b8 ←0x212c6
            <Call 0x212d4 0x20a8c>                                              {[-2-]}
            <POP 212d8-212da StackAdj>                       Δ+2                {}
        <POP 212da-212dc Naked>                              Σ0         ↓ ←0x212cc
            <MI 212da  MOVEQ.L #0x02,D7>                                        {}
        <POP 212dc-212e8 Naked>                              Σ0         ↓ →0x2130e ←0x2130e
            <MI 212dc  MOVE.B  D7,D0>                                           {}
            <MI 212de  EXTB.W  D0>                                              {}
            <MI 212e0  LEA.L   0x215b6,A0>                                      {}
            <MI 212e2  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 212e6  BEQ     0x2130e>                                         {}
        <POP 212e8-21306 Naked>                              Σ0         ↓ →0x2130e
            <MI 212e8  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <MI 212ea  CLR.B   -(A7)>                        Δ-2                {[2, 'D7']|[#0]}
            <Call 0x212ec 0x1048a>                                              {[2, 'D7']|[#0]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 212f2-212f4 StackAdj>                       Δ+2                {[2, 'D7']}
            <MI 212f4  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x212f6 0x1.2>                            Δ-2                {[-2-]|[#1]}
            <Pointer.fp 0x212f8 <LVAR -0x007 @ 1(r)>>        Δ-4                {[-2-]|[#1]|[@@-7]}
            <Call 0x212fa 0x204c6>                                              {[-2-]|[#1]|[@@-7]}
            <POP 212fe-21300 StackAdj>                       Δ+8                {}
            <MI 21300  MOVE.B  (A6-0x7),D0>                                     {}
            <MI 21302  CMP.B   #0x01,D0>                                        {}
            <MI 21304  BEQ     0x2130e>                                         {}
        <POP 21306-2130e Naked>                              Σ0         ↓
            <MI 21306  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x21308 0x20562>                                              {[2, 'D7']}
            <POP 2130c-2130e StackAdj>                       Δ+2                {}
        <POP 2130e-21314 Naked>                              Σ0         ↓ →0x212dc ←0x212dc ←0x212e8
            <MI 2130e  ADDQ.B  #0x1,D7>                                         {}
            <MI 21310  CMP.B   #0x0f,D7>                                        {}
            <MI 21312  BLE     0x212dc>                                         {}
        <POP 21314-2131a Naked>                              Σ0         ↓ →0x21320
            <MI 21314  MOVE.L  0x215da,D0>                                      {}
            <MI 21316  CMP.L   #0x01,D0>                                        {}
            <MI 21318  BNE     0x21320>                                         {}
        <POP 2131a-21320 Naked>                              Σ0 Δ-2     →0x21336
            <Const 0x2131a 0x23.2>                           Δ-2                {[#35]}
            <MI 2131e  BRA     0x21336>                                         {[#35]}
        <POP 21320-21328 Naked>                              Σ0         ↓ →0x2132e ←0x21314
            <MI 21320  CMP.L   0x215d2,D0>                                      {}
            <MI 21326  BNE     0x2132e>                                         {}
        <POP 21328-2132e Naked>                              Σ0 Δ-2     →0x21336
            <Const 0x21328 0x21.2>                           Δ-2                {[#33]}
            <MI 2132c  BRA     0x21336>                                         {[#33]}
        <POP 2132e-21332 Naked>                              Σ0         ↓ →0x2133c ←0x21320
            <MI 2132e  TST.L   D0>                                              {}
            <MI 21330  BEQ     0x2133c>                                         {}
        <POP 21332-21336 Naked>                              Σ0 Δ-2     ↓
            <Const 0x21332 0x22.2>                           Δ-2                {[#34]}
        <POP 21336-2133c Naked>                              Σ-2 Δ+2    ↓ ←0x2131a ←0x21328
            <Call 0x21336 0x20a8c>                                              {[-2-]}
            <POP 2133a-2133c StackAdj>                       Δ+2                {}
        <POP 2133c-21344 Epilogue>                           Σ0         ←0x2132e

0x21344


@ 21344
        <LVAR -0x006 @ 4(r)>
        <LVAR -0x00a @ 1(r)>
    <POP 21344-21478 Body>                                   Δ+4        
        <POP 21344-2135a Prologue>                           Σ0         ↓
        <POP 2135a-21370 RegCacheLoad>                       Σ0         ↓
        <POP 21370-21374 Naked>                              Σ0         ↓
            <MI 21370  CLR.L   0x215da>                                         {}
            <MI 21372  MOVEQ.L #0x02,D7>                                        {}
        <POP 21374-21382 Naked>                              Σ0         ↓ →0x2140e ←0x2140e
            <MI 21374  MOVE.B  D7,D0>                                           {}
            <MI 21376  EXTB.W  D0>                                              {}
            <MI 21378  LEA.L   0x215b6,A0>                                      {}
            <MI 2137a  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 2137e  BEQ     0x2140e>                                         {}
        <POP 21382-21406 Naked>                              Σ0         ↓ →0x2140e
            <Blob 0x21382 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21386 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x2138a [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 2138e-21390 StackAdj>                       Δ-8                {[«4""»]|[«4""»]|[«4""»]|[-8-]}
            <Lit 0x21390 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$TEST_FREEZE.]}
            <POP 213a0-213a2 StackAdj>                       Δ-6                {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$TEST_FREEZE.]|[-6-]}
            <MI 213a2  MOVE.B  D7,(A7)>                                         {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$TEST_FREEZE.]|[-6-]}
            <Call 0x213a4 0x203a4>                                              {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$TEST_FREEZE.]|[-6-]}
            <POP 213a8-213aa StackAdj>                       Δ+2                {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$TEST_FREEZE.]|[-4-]}
            <Call 0x213aa 0x102d0>                                              {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$TEST_FREEZE.]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 213b0-213b2 StackAdj>                       Δ+8                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <MI 213b2  MOVEA.L (A7)+,A4>                     Δ+4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 213b4-213b6 StackAdj>                       Δ+8                {[«4""»]}
            <MI 213b6  MOVE.L  A4,(A7)>                                         {[4, 'A4']}
            <Pointer.fp 0x213b8 <LVAR -0x006 @ 4(r)>>        Δ-4                {[4, 'A4']|[@@-6]}
            <Call 0x213ba 0x10460>                                              {[4, 'A4']|[@@-6]}
                ExpLoad(a : String; b: Pointer)
            <POP 213c0-213c2 StackAdj>                       Δ+4                {[4, 'A4']}
            <MI 213c2  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 213c4  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0x6)']|[#0]}
            <Call 0x213c6 0x1046c>                                              {[4, '(A6-0x6)']|[#0]}
                ExpInputFlag(exp : Pointer; val : Word)
            <POP 213cc-213ce StackAdj>                       Δ+2                {[4, '(A6-0x6)']}
            <MI 213ce  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <Const 0x213d0 0x1.2>                            Δ-2                {[4, '(A6-0x6)']|[#1]}
            <Call 0x213d2 0x1046c>                                              {[4, '(A6-0x6)']|[#1]}
                ExpInputFlag(exp : Pointer; val : Word)
            <POP 213d8-213da StackAdj>                       Δ+4                {[-2-]}
            <MI 213da  MOVE.B  D7,(A7)>                                         {[-2-]}
            <MI 213dc  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x6)']}
            <Call 0x213de 0x1047e>                                              {[-2-]|[4, '(A6-0x6)']}
                ExpXmit(adr : Byte; b : Pointer)
            <POP 213e4-213e6 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x213e6 <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x213e8 0x10496>                                              {[@@-6]}
                ExpClose(exp : Pointer)
            <POP 213ee-213f0 StackAdj>                       Δ+2                {[-2-]}
            <MI 213f0  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x213f2 0x6.2>                            Δ-2                {[-2-]|[#6]}
            <Pointer.fp 0x213f4 <LVAR -0x00a @ 1(r)>>        Δ-4                {[-2-]|[#6]|[@@-10]}
            <Call 0x213f8 0x204c6>                                              {[-2-]|[#6]|[@@-10]}
            <POP 213fc-213fe StackAdj>                       Δ+8                {}
            <MI 213fe  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 21402  CMP.B   #0x06,D0>                                        {}
            <MI 21404  BEQ     0x2140e>                                         {}
        <POP 21406-2140e Naked>                              Σ0         ↓
            <MI 21406  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x21408 0x20562>                                              {[2, 'D7']}
            <POP 2140c-2140e StackAdj>                       Δ+2                {}
        <POP 2140e-21416 Naked>                              Σ0         ↓ →0x21374 ←0x21374 ←0x21382
            <MI 2140e  ADDQ.B  #0x1,D7>                                         {}
            <MI 21410  CMP.B   #0x0f,D7>                                        {}
            <MI 21412  BLE     0x21374>                                         {}
        <POP 21416-2141c Naked>                              Σ0         ↓ →0x21422
            <MI 21416  MOVE.L  0x215da,D0>                                      {}
            <MI 21418  CMP.L   #0x01,D0>                                        {}
            <MI 2141a  BNE     0x21422>                                         {}
        <POP 2141c-21422 Naked>                              Σ0 Δ-2     →0x21438
            <Const 0x2141c 0x26.2>                           Δ-2                {[#38]}
            <MI 21420  BRA     0x21438>                                         {[#38]}
        <POP 21422-2142a Naked>                              Σ0         ↓ →0x21430 ←0x21416
            <MI 21422  CMP.L   0x215d2,D0>                                      {}
            <MI 21428  BNE     0x21430>                                         {}
        <POP 2142a-21430 Naked>                              Σ0 Δ-2     →0x21438
            <Const 0x2142a 0x24.2>                           Δ-2                {[#36]}
            <MI 2142e  BRA     0x21438>                                         {[#36]}
        <POP 21430-21434 Naked>                              Σ0         ↓ →0x2143e ←0x21422
            <MI 21430  TST.L   D0>                                              {}
            <MI 21432  BEQ     0x2143e>                                         {}
        <POP 21434-21438 Naked>                              Σ0 Δ-2     ↓
            <Const 0x21434 0x25.2>                           Δ-2                {[#37]}
        <POP 21438-2143e Naked>                              Σ-2 Δ+2    ↓ ←0x2141c ←0x2142a
            <Call 0x21438 0x20a8c>                                              {[-2-]}
            <POP 2143c-2143e StackAdj>                       Δ+2                {}
        <POP 2143e-21440 Naked>                              Σ0         ↓ ←0x21430
            <MI 2143e  MOVEQ.L #0x02,D7>                                        {}
        <POP 21440-2144c Naked>                              Σ0         ↓ →0x2146a ←0x2146a
            <MI 21440  MOVE.B  D7,D0>                                           {}
            <MI 21442  EXTB.W  D0>                                              {}
            <MI 21444  LEA.L   0x215b6,A0>                                      {}
            <MI 21446  TST.B   (A0+D0.W+#0x30)>                                 {}
            <MI 2144a  BEQ     0x2146a>                                         {}
        <POP 2144c-2146a Naked>                              Σ0         ↓
            <MI 2144c  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Const 0x2144e 0x2.2>                            Δ-2                {[2, 'D7']|[#2]}
            <Call 0x21452 0x1048a>                                              {[2, 'D7']|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 21458-2145a StackAdj>                       Δ+2                {[2, 'D7']}
            <MI 2145a  MOVE.B  D7,(A7)>                                         {[-2-]}
            <Const 0x2145c 0x5.2>                            Δ-2                {[-2-]|[#5]}
            <Pointer.fp 0x21460 <LVAR -0x00a @ 1(r)>>        Δ-4                {[-2-]|[#5]|[@@-10]}
            <Call 0x21464 0x204c6>                                              {[-2-]|[#5]|[@@-10]}
            <POP 21468-2146a StackAdj>                       Δ+8                {}
        <POP 2146a-21470 Naked>                              Σ0         ↓ →0x21440 ←0x21440
            <MI 2146a  ADDQ.B  #0x1,D7>                                         {}
            <MI 2146c  CMP.B   #0x0f,D7>                                        {}
            <MI 2146e  BLE     0x21440>                                         {}
        <POP 21470-21478 Epilogue>                           Σ0         

0x21478


@ 21478
START
    <POP 21478--0001 Body>                                              
        <POP 21478-21482 Prologue>                           Σ0         
        <POP 21482-21498 RegCacheLoad>                       Σ0         ↓
        <POP 21498-214e4 Naked>                              Σ0         ↓
            <Call 0x21498 0x10398>                                              {}
                FSCALL_10398
            <Const 0x2149e 0x215f6.4>                        Δ-4                {[##136694]}
            <Const 0x214a0 0x215f9.4>                        Δ-4                {[##136694]|[##136697]}
            <Const 0x214a6 0x215f7.4>                        Δ-4                {[##136694]|[##136697]|[##136695]}
            <Call 0x214a8 0x10556>                                              {[##136694]|[##136697]|[##136695]}
                ?IPC_GetStd(MOD a : Pointer; VAR b : Bool ; VAR c : Bool)
            <POP 214ae-214b2 StackAdj>                       Δ+12               {}
            <Const 0x214b2 0x0.4>                            Δ-4                {[##0]}
            <Call 0x214b6 0x104d8>                                              {[##0]}
                ExpInit(a : Long)
            <POP 214bc-214be StackAdj>                       Δ+2                {[-2-]}
            <POP 214be-214bf StackAdj>                       Δ+2                {}
            <Blob 0x214bf [2] @>                             Δ-2                {[«2""»]}
            <Call 0x214c0 0x104d2>                                              {[«2""»]}
                SetExpInitDone(a : Byte)
            <POP 214c6-214c8 StackAdj>                       Δ+2                {}
            <MI 214c8  CLR.L   D0>                                              {}
            <MI 214ca  MOVE.B  0x215f6,D0>                                      {}
            <MI 214cc  MOVE.L  D0,0x2160c>                                      {}
            <MI 214d2  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <MI 214d4  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 214d6  EXTB.W  D0>                                              {}
            <POP 0x214d8 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {}
            <MI 214dc  MOVE.B  D0,0x215be>                                      {}
            <MI 214e2  MOVEQ.L #0x00,D0>                                        {}
        <POP 214e4-21500 Naked>                              Σ0         ↓ →0x214e4 ←0x214e4
            <MI 214e4  MOVE.L  D0,0x215da>                                      {}
            <POP 0x214ea LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 214f0  LEA.L   0x215b6,A0>                                      {}
            <MI 214f6  CLR.B   (A0+D0.L+#0x4d)>                                 {}
            <MI 214fa  ADDQ.L  #0x1,D0>                                         {}
            <MI 214fc  CMP.L   #0x07,D0>                                        {}
            <MI 214fe  BLE     0x214e4>                                         {}
        <POP 21500-215b0 Naked>                              Σ0         ↓
            <MI 21500  CLR.L   0x215da>                                         {}
            <MI 21506  CLR.L   0x215de>                                         {}
            <MI 2150c  CLR.L   0x215e2>                                         {}
            <MI 21512  CLR.B   0x215f8>                                         {}
            <Blob 0x21518 [8] @>                             Δ-8                {[«8""»]}
            <POP 21528-2152a StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Lit 0x2152a 7>                                                     {[«8""»]|[$$P1DCOMM]}
            <MI 2153a  MOVE.L  (A7)+,0x215fa>                Δ+4                {[«8""»]}
            <POP 21540-21542 StackAdj>                       Δ+6                {[-2-]}
            <POP 21542-21543 StackAdj>                       Δ+2                {}
            <Blob 0x21543 [2] @>                             Δ-2                {[«2""»]}
            <POP 21546-21548 StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x21548 2>                                                     {[«2""»]|[$$__]}
            <MI 2155a  MOVE.L  (A7)+,0x215fe>                Δ+4                {[«2""»]}
            <POP 21560-21562 StackAdj>                       Δ+2                {}
            <MI 21562  CLR.B   0x21602>                                         {}
            <MI 21568  CLR.B   0x215bf>                                         {}
            <MI 2156a  CLR.B   0x215c0>                                         {}
            <Call 0x21570 0x20bd0>                                              {}
            <Call 0x21574 0x20a6a>                                              {}
            <Call 0x21578 0x20ce0>                                              {}
            <Call 0x2157c 0x20d72>                                              {}
            <Call 0x21580 0x20e06>                                              {}
            <Call 0x21584 0x20ea8>                                              {}
            <MI 21588  MOVE.B  #0x01,0x215c0>                                   {}
            <MI 2158e  MOVE.B  #0x01,0x215bf>                                   {}
            <Call 0x21590 0x20fa4>                                              {}
            <Call 0x21594 0x210a6>                                              {}
            <Call 0x21598 0x21344>                                              {}
            <MI 2159c  CLR.B   0x215bf>                                         {}
            <Call 0x2159e 0x21210>                                              {}
            <MI 215a2  MOVE.B  #0x01,0x215f8>                                   {}
            <MI 215a8  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Call 0x215aa 0x20a8c>                                              {[#0]}
            <POP 215ae-215b0 StackAdj>                       Δ+2                {}
        <POP 215b0-215b6 Naked>                              Σ0         
            <Call 0x215b0 0x10284>                                              {}
                ?exit

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.4cd4b112a7cb4f1c
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 14 78              |   x    |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 16 12              |        |		.PTR	0x21612
00020010					code.end:
00020010 00 02 15 b6              |        |		.PTR	0x215b6
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 03 3c              |   <    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 02 00              |        |		.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 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
0002016c 40 28 23 29              |@(#)    |		.XXX[0x4]
00020170 50 31 44 43 4f 4d 4d 2c  |P1DCOMM,|		.XXX[0x18]
00020178 32 2e 30 2c 38 39 2f 31  |2.0,89/1|
00020180 30 2f 30 33 2c 31 37 3a  |0/03,17:|
00020188 31 38 3a 31 39 5c        |18:19\  |		.XXX[0x6]
0002018e 53 45                    |SE      |		.TXT	'SE'
00020190 51 20                    |Q       |		.XXX[0x2]
00020192 46 49                    |FI      |		.TXT	'FI'
00020194 55 20 53 59              |U SY    |		.XXX[0x4]
00020198 53 20                    |S       |		.XXX[0x2]
0002019a 49 4f                    |IO      |		.TXT	'IO'
0002019c 43 20                    |C       |		.XXX[0x2]
0002019e 56 41                    |VA      |		.TXT	'VA'
000201a0 4c 20                    |L       |		.XXX[0x2]
000201a2 54 59                    |TY      |		.TXT	'TY'
000201a4 50 20                    |P       |		.XXX[0x2]
000201a6 4d 45                    |ME      |		.TXT	'ME'
000201a8 4d 20                    |M       |		.XXX[0x2]
000201aa 4d 33                    |M3      |		.TXT	'M3'
000201ac 32 20                    |2       |		.XXX[0x2]
000201ae 50 31 53 46              |P1SF    |		.TXT	'P1SF'
000201b2 50 31 44 43 4f 4d 4d 20  |P1DCOMM |		.TXT	'P1DCOMM '
000201ba 52 45                    |RE      |		.TXT	'RE'
000201bc 53 45                    |SE      |		.TXT	'SE'
000201be 54 2e                    |T.      |		.TXT	'T.'
000201c0 54 52 49 47 47 45 52 5f  |TRIGGER_|		.TXT	'TRIGGER_SCOPE.'
000201ce 54 52 49 47 47 45 52 5f  |TRIGGER_|		.TXT	'TRIGGER_SCOPE.'
000201dc 54 45 53 54 5f 50 41 55  |TEST_PAU|		.TXT	'TEST_PAUSE.SEQ'
000201ea 54 45 53 54              |TEST    |		.TXT	'TEST'
000201ee 5f 46 52 45              |_FRE    |		.TXT	'_FRE'
000201f2 45 5a 45 2e              |EZE.    |		.TXT	'EZE.'
000201f6 50 31 44 43 4f 4d 4d 20  |P1DCOMM |		.TXT	'P1DCOMM '
000201fe 5f 5f                    |__      |		.TXT	'__'
00020200 ; --------------------------------------------------------------------------------------
00020200 ; OMSI PASCAL Function
00020200 ;    <LVAR  0x00e 1(r)>
00020200 ;    <LVAR  0x00a 4(r)>
00020200 ;    <LVAR  0x008 1(r)>
00020200 ; --------------------------------------------------------------------------------------
00020200					EXP_FAIL:
00020200 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
00020204 bf d5                    |        |		CMPA.L	(A5),A7
00020206 62 06                    |b       |		BHI	0x2020e
00020208 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002020c 4e 76                    |Nv      |		TRAPV
0002020e de fc 00 74              |   t    |		ADDA.W	#0x74,A7
00020212 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00020216 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002021c 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
00020222 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020224 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
00020226 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
00020228 78 12                    |x       |		MOVEQ.L	#0x12,D4
0002022a 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
0002022c 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00020232 41 fa ff 12              |A       |		LEA.L	0x20146,A0
00020236 70 08                    |p       |		MOVEQ.L	#0x08,D0
00020238 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002023a 51 c8 ff fc              |Q       |		DBF	D0,0x20238
0002023e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020240 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020244 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020246 3f 04                    |?       |		MOVE.W	D4,-(A7)
00020248 4e 93                    |N       |		JSR	(A3)
0002024a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002024c 4e 94                    |N       |		JSR	(A4)
0002024e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020250 20 4f                    | O      |		MOVEA.L	A7,A0
00020252 43 fa fe b6              |C       |		LEA.L	0x2010a,A1
00020256 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020258 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002025a 51 c8 ff fc              |Q       |		DBF	D0,0x20258
0002025e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020260 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020264 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020266 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020268 4e 93                    |N       |		JSR	(A3)
0002026a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002026c 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
00020270 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
00020276 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020278 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002027e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020280 4e 94                    |N       |		JSR	(A4)
00020282 de c4                    |        |		ADDA.W	D4,A7
00020284 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
00020288 b0 c1                    |        |		CMPA.W	D1,A0
0002028a 67 48                    |gH      |		BEQ	0x202d4
0002028c 9e c5                    |        |		SUBA.W	D5,A7
0002028e 22 4f                    |"O      |		MOVEA.L	A7,A1
00020290 45 fa fe 86              |E       |		LEA.L	0x20118,A2
00020294 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020296 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020298 51 c8 ff fc              |Q       |		DBF	D0,0x20296
0002029c 9e c3                    |        |		SUBA.W	D3,A7
0002029e 22 4f                    |"O      |		MOVEA.L	A7,A1
000202a0 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
000202a4 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
000202a6 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000202a8 51 c8 ff fc              |Q       |		DBF	D0,0x202a6
000202ac 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202ae 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
000202b2 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202b4 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202b6 4e 93                    |N       |		JSR	(A3)
000202b8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000202ba 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000202be 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202c0 3f 03                    |?       |		MOVE.W	D3,-(A7)
000202c2 4e 93                    |N       |		JSR	(A3)
000202c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202c6 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000202cc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202ce 4e 94                    |N       |		JSR	(A4)
000202d0 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
000202d4 9e c5                    |        |		SUBA.W	D5,A7
000202d6 20 4f                    | O      |		MOVEA.L	A7,A0
000202d8 43 fa fe 4c              |C  L    |		LEA.L	0x20126,A1
000202dc 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000202de 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000202e0 51 c8 ff fc              |Q       |		DBF	D0,0x202de
000202e4 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000202e6 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000202ea 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202ec 3f 02                    |?       |		MOVE.W	D2,-(A7)
000202ee 4e 93                    |N       |		JSR	(A3)
000202f0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202f2 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000202f6 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
000202fc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000202fe 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020304 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020306 4e 94                    |N       |		JSR	(A4)
00020308 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002030a 20 4f                    | O      |		MOVEA.L	A7,A0
0002030c 43 fa fe 38              |C  8    |		LEA.L	0x20146,A1
00020310 70 16                    |p       |		MOVEQ.L	#0x16,D0
00020312 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020314 51 c8 ff fc              |Q       |		DBF	D0,0x20312
00020318 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
0002031c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002031e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020322 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020324 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
00020328 4e 93                    |N       |		JSR	(A3)
0002032a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002032c 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020332 de c3                    |        |		ADDA.W	D3,A7
00020334 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00020338 4e 5e                    |N^      |		UNLK	A6
0002033a 4e 75                    |Nu      |		RTS
0002033c ; --------------------------------------------------------------------------------------
0002033c ; OMSI PASCAL Function
0002033c ;    <LVAR  0x008 1(r)>
0002033c ; --------------------------------------------------------------------------------------
0002033c					PROG_FAIL:
0002033c 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00020340 bf d5                    |        |		CMPA.L	(A5),A7
00020342 62 06                    |b       |		BHI	0x2034a
00020344 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020348 4e 76                    |Nv      |		TRAPV
0002034a de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
0002034e 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00020352 41 fa fe 18              |A       |		LEA.L	0x2016c,A0
00020356 70 06                    |p       |		MOVEQ.L	#0x06,D0
00020358 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002035a 51 c8 ff fc              |Q       |		DBF	D0,0x20358
0002035e 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00020362 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020364 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00020368 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002036c 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00020370 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020376 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020378 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
0002037c 48 80                    |H       |		EXTB.W	D0
0002037e 48 c0                    |H       |		EXTW.L	D0
00020380 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020382 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00020388 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002038a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020390 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020392 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020398 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002039c 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000203a0 4e 5e                    |N^      |		UNLK	A6
000203a2 4e 75                    |Nu      |		RTS
000203a4 ; --------------------------------------------------------------------------------------
000203a4 ; OMSI PASCAL Function
000203a4 ;    <LVAR  0x00a 4(w)>
000203a4 ;    <LVAR  0x008 1(r)>
000203a4 ; --------------------------------------------------------------------------------------
000203a4 4e 56 ff de              |NV      |		LINK.W	A6,#0xffde
000203a8 bf d5                    |        |		CMPA.L	(A5),A7
000203aa 62 06                    |b       |		BHI	0x203b2
000203ac 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000203b0 4e 76                    |Nv      |		TRAPV
000203b2 de fc 00 20              |        |		ADDA.W	#0x20,A7
000203b6 48 e7 e0 00              |H       |		MOVEM.L	D2+D1+D0,-(A7)
000203ba 72 01                    |r       |		MOVEQ.L	#0x01,D1
000203bc 74 03                    |t       |		MOVEQ.L	#0x03,D2
000203be 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000203c2 48 80                    |H       |		EXTB.W	D0
000203c4 55 40                    |U@      |		SUBQ.W	#0x2,D0
000203c6 0c 40 00 0d              | @      |		CMPI.W	#0x000d,D0
000203ca 63 02                    |c       |		BLS	0x203ce
000203cc					switch@0x203d0[0x3]:
000203cc					switch@0x203d0[0x6]:
000203cc					switch@0x203d0[0x7]:
000203cc					switch@0x203d0[0x8]:
000203cc					switch@0x203d0[0x9]:
000203cc 4e 4e                    |NN      |		TRAP	#14
000203ce d0 40                    | @      |		ADD.W	D0,D0
000203d0 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
000203d8 00 1c                    |        |		.CONST	0x1c			; [0x0] -> 0x203f4
000203da 00 32                    | 2      |		.CONST	0x32			; [0x1] -> 0x2040a
000203dc 00 48                    | H      |		.CONST	0x48			; [0x2] -> 0x20420
000203de ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x203cc
000203e0 00 88                    |        |		.CONST	0x88			; [0x4] -> 0x20460
000203e2 00 74                    | t      |		.CONST	0x74			; [0x5] -> 0x2044c
000203e4 ff f4                    |        |		.CONST	0xfff4			; [0x6] -> 0x203cc
000203e6 ff f4                    |        |		.CONST	0xfff4			; [0x7] -> 0x203cc
000203e8 ff f4                    |        |		.CONST	0xfff4			; [0x8] -> 0x203cc
000203ea ff f4                    |        |		.CONST	0xfff4			; [0x9] -> 0x203cc
000203ec 00 9c                    |        |		.CONST	0x9c			; [0xa] -> 0x20474
000203ee 00 9c                    |        |		.CONST	0x9c			; [0xb] -> 0x20474
000203f0 00 9c                    |        |		.CONST	0x9c			; [0xc] -> 0x20474
000203f2 00 9c                    |        |		.CONST	0x9c			; [0xd] -> 0x20474
000203f4					switch@0x203d0[0x0]:
000203f4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000203f6 1e ba fd 96              |        |		MOVE.B	0x2018e,(A7)
000203fa 1f 7a fd 93 00 01        | z      |		MOVE.B	0x2018f,(A7+0x1)
00020400 1f 7a fd 8e 00 02        | z      |		MOVE.B	0x20190,(A7+0x2)
00020406 60 00 00 9e              |`       |		BRA	0x204a6
0002040a					switch@0x203d0[0x1]:
0002040a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002040c 1e ba fd 84              |        |		MOVE.B	0x20192,(A7)
00020410 1f 7a fd 81 00 01        | z      |		MOVE.B	0x20193,(A7+0x1)
00020416 1f 7a fd 7c 00 02        | z |    |		MOVE.B	0x20194,(A7+0x2)
0002041c 60 00 00 88              |`       |		BRA	0x204a6
00020420					switch@0x203d0[0x2]:
00020420 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020422 1e ba fd 76              |   v    |		MOVE.B	0x2019a,(A7)
00020426 1f 7a fd 73 00 01        | z s    |		MOVE.B	0x2019b,(A7+0x1)
0002042c 1f 7a fd 6e 00 02        | z n    |		MOVE.B	0x2019c,(A7+0x2)
00020432 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020434 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020438 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002043a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002043c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020442 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020444 2d 5f 00 0a              |-_      |		MOVE.L	(A7)+,(A6+0xa)
00020448 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002044a 60 72                    |`r      |		BRA	0x204be
0002044c					switch@0x203d0[0x5]:
0002044c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002044e 1e ba fd 4e              |   N    |		MOVE.B	0x2019e,(A7)
00020452 1f 7a fd 4b 00 01        | z K    |		MOVE.B	0x2019f,(A7+0x1)
00020458 1f 7a fd 46 00 02        | z F    |		MOVE.B	0x201a0,(A7+0x2)
0002045e 60 46                    |`F      |		BRA	0x204a6
00020460					switch@0x203d0[0x4]:
00020460 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020462 1e ba fd 3e              |   >    |		MOVE.B	0x201a2,(A7)
00020466 1f 7a fd 3b 00 01        | z ;    |		MOVE.B	0x201a3,(A7+0x1)
0002046c 1f 7a fd 36 00 02        | z 6    |		MOVE.B	0x201a4,(A7+0x2)
00020472 60 32                    |`2      |		BRA	0x204a6
00020474					switch@0x203d0[0xa]:
00020474					switch@0x203d0[0xb]:
00020474					switch@0x203d0[0xc]:
00020474					switch@0x203d0[0xd]:
00020474 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020476 4e b9 00 01 04 cc        |N       |		JSR	MemOnly2MB() : Bool
0002047c 4a 1f                    |J       |		TST.B	(A7)+
0002047e 67 14                    |g       |		BEQ	0x20494
00020480 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020482 1e ba fd 22              |   "    |		MOVE.B	0x201a6,(A7)
00020486 1f 7a fd 1f 00 01        | z      |		MOVE.B	0x201a7,(A7+0x1)
0002048c 1f 7a fd 1a 00 02        | z      |		MOVE.B	0x201a8,(A7+0x2)
00020492 60 12                    |`       |		BRA	0x204a6
00020494 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020496 1e ba fd 12              |        |		MOVE.B	0x201aa,(A7)
0002049a 1f 7a fd 0f 00 01        | z      |		MOVE.B	0x201ab,(A7+0x1)
000204a0 1f 7a fd 0a 00 02        | z      |		MOVE.B	0x201ac,(A7+0x2)
000204a6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000204a8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000204ac 3f 01                    |?       |		MOVE.W	D1,-(A7)
000204ae 3f 02                    |?       |		MOVE.W	D2,-(A7)
000204b0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000204b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000204b8 2d 5f 00 0a              |-_      |		MOVE.L	(A7)+,(A6+0xa)
000204bc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000204be 4c df 00 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2
000204c2 4e 5e                    |N^      |		UNLK	A6
000204c4 4e 75                    |Nu      |		RTS
000204c6 ; --------------------------------------------------------------------------------------
000204c6 ; OMSI PASCAL Function
000204c6 ;    <LVAR  0x00e 1(r)>
000204c6 ;    <LVAR  0x00c 1(r)>
000204c6 ;    <LVAR  0x008 4(r)>
000204c6 ;    <LVAR -0x003 @>
000204c6 ;    <LVAR -0x004 @>
000204c6 ; --------------------------------------------------------------------------------------
000204c6 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
000204ca bf d5                    |        |		CMPA.L	(A5),A7
000204cc 62 06                    |b       |		BHI	0x204d4
000204ce 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204d2 4e 76                    |Nv      |		TRAPV
000204d4 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
000204d8 48 e7 81 80              |H       |		MOVEM.L	A0+D7+D0,-(A7)
000204dc 7e 64                    |~d      |		MOVEQ.L	#0x64,D7
000204de 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000204e2 1f 2e 00 0e              | .      |		MOVE.B	(A6+0xe),-(A7)
000204e6 48 50                    |HP      |		PEA.L	(A0)
000204e8 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000204ec 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
000204f0 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
000204f6 de fc 00 0e              |        |		ADDA.W	#0xe,A7
000204fa 53 87                    |S       |		SUBQ.L	#0x1,D7
000204fc 6f 08                    |o       |		BLE	0x20506
000204fe 10 10                    |        |		MOVE.B	(A0),D0
00020500 b0 2e 00 0c              | .      |		CMP.B	(A6+0xc),D0
00020504 66 d8                    |f       |		BNE	0x204de
00020506 4c df 01 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0
0002050a 4e 5e                    |N^      |		UNLK	A6
0002050c 4e 75                    |Nu      |		RTS
0002050e ; --------------------------------------------------------------------------------------
0002050e ; OMSI PASCAL Function
0002050e ; --------------------------------------------------------------------------------------
0002050e 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
00020512 bf d5                    |        |		CMPA.L	(A5),A7
00020514 62 06                    |b       |		BHI	0x2051c
00020516 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002051a 4e 76                    |Nv      |		TRAPV
0002051c de fc 00 18              |        |		ADDA.W	#0x18,A7
00020520 48 e7 81 80              |H       |		MOVEM.L	A0+D7+D0,-(A7)
00020524 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
00020526 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020528 1f 07                    |        |		MOVE.B	D7,-(A7)
0002052a 4e b9 00 01 04 c0        |N       |		JSR	HasBoard(diproc_addr: Byte) : Byte
00020530 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020532 4a 1f                    |J       |		TST.B	(A7)+
00020534 67 1c                    |g       |		BEQ	0x20552
00020536 10 07                    |        |		MOVE.B	D7,D0
00020538 48 80                    |H       |		EXTB.W	D0
0002053a 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020540 11 bc 00 01 00 30        |     0  |		MOVE.B	#0x01,(A0+D0.W+#0x30)
00020546 52 b9 00 02 15 d6        |R       |		ADDQ.L	#0x1,0x215d6
0002054c 52 b9 00 02 15 d2        |R       |		ADDQ.L	#0x1,0x215d2
00020552 52 07                    |R       |		ADDQ.B	#0x1,D7
00020554 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00020558 6f cc                    |o       |		BLE	0x20526
0002055a 4c df 01 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0
0002055e 4e 5e                    |N^      |		UNLK	A6
00020560 4e 75                    |Nu      |		RTS
00020562 ; --------------------------------------------------------------------------------------
00020562 ; OMSI PASCAL Function
00020562 ;    <LVAR  0x008 1(r)>
00020562 ; --------------------------------------------------------------------------------------
00020562 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc
00020566 bf d5                    |        |		CMPA.L	(A5),A7
00020568 62 06                    |b       |		BHI	0x20570
0002056a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002056e 4e 76                    |Nv      |		TRAPV
00020570 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00020574 48 e7 e0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D2+D1+D0,-(A7)
00020578 43 f9 00 02 15 e2        |C       |		LEA.L	0x215e2,A1
0002057e 45 f9 00 02 15 b6        |E       |		LEA.L	0x215b6,A2
00020584 47 f9 00 02 15 de        |G       |		LEA.L	0x215de,A3
0002058a 74 07                    |t       |		MOVEQ.L	#0x07,D2
0002058c 52 b9 00 02 15 da        |R       |		ADDQ.L	#0x1,0x215da
00020592 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020596 48 80                    |H       |		EXTB.W	D0
00020598 32 00                    |2       |		MOVE.W	D0,D1
0002059a 55 41                    |UA      |		SUBQ.W	#0x2,D1
0002059c 0c 41 00 0d              | A      |		CMPI.W	#0x000d,D1
000205a0 63 02                    |c       |		BLS	0x205a4
000205a2					switch@0x205a6[0x3]:
000205a2					switch@0x205a6[0x6]:
000205a2					switch@0x205a6[0x7]:
000205a2					switch@0x205a6[0x8]:
000205a2					switch@0x205a6[0x9]:
000205a2 4e 4e                    |NN      |		TRAP	#14
000205a4 d2 41                    | A      |		ADD.W	D1,D1
000205a6 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
000205ae 00 1c                    |        |		.CONST	0x1c			; [0x0] -> 0x205ca
000205b0 00 1c                    |        |		.CONST	0x1c			; [0x1] -> 0x205ca
000205b2 00 1c                    |        |		.CONST	0x1c			; [0x2] -> 0x205ca
000205b4 ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x205a2
000205b6 00 1c                    |        |		.CONST	0x1c			; [0x4] -> 0x205ca
000205b8 00 1c                    |        |		.CONST	0x1c			; [0x5] -> 0x205ca
000205ba ff f4                    |        |		.CONST	0xfff4			; [0x6] -> 0x205a2
000205bc ff f4                    |        |		.CONST	0xfff4			; [0x7] -> 0x205a2
000205be ff f4                    |        |		.CONST	0xfff4			; [0x8] -> 0x205a2
000205c0 ff f4                    |        |		.CONST	0xfff4			; [0x9] -> 0x205a2
000205c2 00 30                    | 0      |		.CONST	0x30			; [0xa] -> 0x205de
000205c4 00 30                    | 0      |		.CONST	0x30			; [0xb] -> 0x205de
000205c6 00 30                    | 0      |		.CONST	0x30			; [0xc] -> 0x205de
000205c8 00 30                    | 0      |		.CONST	0x30			; [0xd] -> 0x205de
000205ca					switch@0x205a6[0x0]:
000205ca					switch@0x205a6[0x1]:
000205ca					switch@0x205a6[0x2]:
000205ca					switch@0x205a6[0x4]:
000205ca					switch@0x205a6[0x5]:
000205ca 52 91                    |R       |		ADDQ.L	#0x1,(A1)
000205cc 22 11                    |"       |		MOVE.L	(A1),D1
000205ce 53 81                    |S       |		SUBQ.L	#0x1,D1
000205d0 b2 82                    |        |		CMP.L	D2,D1
000205d2 63 02                    |c       |		BLS	0x205d6
000205d4 4e 4f                    |NO      |		TRAP	#15
000205d6 20 4a                    | J      |		MOVEA.L	A2,A0
000205d8 11 80 18 13              |        |		MOVE.B	D0,(A0+D1.L+#0x13)
000205dc 60 12                    |`       |		BRA	0x205f0
000205de					switch@0x205a6[0xa]:
000205de					switch@0x205a6[0xb]:
000205de					switch@0x205a6[0xc]:
000205de					switch@0x205a6[0xd]:
000205de 52 93                    |R       |		ADDQ.L	#0x1,(A3)
000205e0 22 13                    |"       |		MOVE.L	(A3),D1
000205e2 53 81                    |S       |		SUBQ.L	#0x1,D1
000205e4 b2 82                    |        |		CMP.L	D2,D1
000205e6 63 02                    |c       |		BLS	0x205ea
000205e8 4e 4f                    |NO      |		TRAP	#15
000205ea 20 4a                    | J      |		MOVEA.L	A2,A0
000205ec 11 80 18 0b              |        |		MOVE.B	D0,(A0+D1.L+#0xb)
000205f0 4c df 0f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3
000205f4 4e 5e                    |N^      |		UNLK	A6
000205f6 4e 75                    |Nu      |		RTS
000205f8 ; --------------------------------------------------------------------------------------
000205f8 ; OMSI PASCAL Function
000205f8 ;    <LVAR  0x00a 1(rw)>
000205f8 ;    <LVAR  0x008 1(r)>
000205f8 ; --------------------------------------------------------------------------------------
000205f8 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2		; Spelunked
000205fc bf d5                    |        |		CMPA.L	(A5),A7
000205fe 62 06                    |b       |		BHI	0x20606
00020600 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020604 4e 76                    |Nv      |		TRAPV
00020606 de fc 00 18              |        |		ADDA.W	#0x18,A7
0002060a 48 e7 81 80              |H       |		MOVEM.L	A0+D7+D0,-(A7)
0002060e 42 2e 00 0a              |B.      |		CLR.B	(A6+0xa)
00020612 2f 39 00 02 15 e2        |/9      |		MOVE.L	0x215e2,-(A7)
00020618 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002061a be 97                    |        |		CMP.L	(A7),D7
0002061c 6e 26                    |n&      |		BGT	0x20644
0002061e 20 07                    |        |		MOVE.L	D7,D0
00020620 53 80                    |S       |		SUBQ.L	#0x1,D0
00020622 0c 80 00 00 00 07        |        |		CMPI.L	#0x00000007,D0
00020628 63 02                    |c       |		BLS	0x2062c
0002062a 4e 4f                    |NO      |		TRAP	#15
0002062c 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020632 10 30 08 13              | 0      |		MOVE.B	(A0+D0.L+#0x13),D0
00020636 b0 2e 00 08              | .      |		CMP.B	(A6+0x8),D0
0002063a 66 04                    |f       |		BNE	0x20640
0002063c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002063e 60 0c                    |`       |		BRA	0x2064c
00020640 52 87                    |R       |		ADDQ.L	#0x1,D7
00020642 68 d6                    |h       |		BVC	0x2061a
00020644 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020646 1d 7c 00 01 00 0a        | |      |		MOVE.B	#0x01,(A6+0xa)
0002064c 4c df 01 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0
00020650 4e 5e                    |N^      |		UNLK	A6
00020652 4e 75                    |Nu      |		RTS
00020654 ; --------------------------------------------------------------------------------------
00020654 ; OMSI PASCAL Function
00020654 ;    <LVAR  0x00a 1(w)>
00020654 ;    <LVAR  0x008 1(r)>
00020654 ; --------------------------------------------------------------------------------------
00020654 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2
00020658 bf d5                    |        |		CMPA.L	(A5),A7
0002065a 62 06                    |b       |		BHI	0x20662
0002065c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020660 4e 76                    |Nv      |		TRAPV
00020662 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020666 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002066a 41 ee 00 0a              |A       |		LEA.L	(A6+0xa),A0
0002066e 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020672 48 80                    |H       |		EXTB.W	D0
00020674 55 40                    |U@      |		SUBQ.W	#0x2,D0
00020676 0c 40 00 0d              | @      |		CMPI.W	#0x000d,D0
0002067a 63 02                    |c       |		BLS	0x2067e
0002067c					switch@0x20680[0x3]:
0002067c					switch@0x20680[0x6]:
0002067c					switch@0x20680[0x7]:
0002067c					switch@0x20680[0x8]:
0002067c					switch@0x20680[0x9]:
0002067c 4e 4e                    |NN      |		TRAP	#14
0002067e d0 40                    | @      |		ADD.W	D0,D0
00020680 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00020688 00 1c                    |        |		.CONST	0x1c			; [0x0] -> 0x206a4
0002068a 00 22                    | "      |		.CONST	0x22			; [0x1] -> 0x206aa
0002068c 00 28                    | (      |		.CONST	0x28			; [0x2] -> 0x206b0
0002068e ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x2067c
00020690 00 2e                    | .      |		.CONST	0x2e			; [0x4] -> 0x206b6
00020692 00 34                    | 4      |		.CONST	0x34			; [0x5] -> 0x206bc
00020694 ff f4                    |        |		.CONST	0xfff4			; [0x6] -> 0x2067c
00020696 ff f4                    |        |		.CONST	0xfff4			; [0x7] -> 0x2067c
00020698 ff f4                    |        |		.CONST	0xfff4			; [0x8] -> 0x2067c
0002069a ff f4                    |        |		.CONST	0xfff4			; [0x9] -> 0x2067c
0002069c 00 3a                    | :      |		.CONST	0x3a			; [0xa] -> 0x206c2
0002069e 00 40                    | @      |		.CONST	0x40			; [0xb] -> 0x206c8
000206a0 00 46                    | F      |		.CONST	0x46			; [0xc] -> 0x206ce
000206a2 00 4c                    | L      |		.CONST	0x4c			; [0xd] -> 0x206d4
000206a4					switch@0x20680[0x0]:
000206a4 10 bc 00 05              |        |		MOVE.B	#0x05,(A0)
000206a8 60 2e                    |`.      |		BRA	0x206d8
000206aa					switch@0x20680[0x1]:
000206aa 10 bc 00 06              |        |		MOVE.B	#0x06,(A0)
000206ae 60 28                    |`(      |		BRA	0x206d8
000206b0					switch@0x20680[0x2]:
000206b0 10 bc 00 2b              |   +    |		MOVE.B	#0x2b,(A0)
000206b4 60 22                    |`"      |		BRA	0x206d8
000206b6					switch@0x20680[0x4]:
000206b6 10 bc 00 03              |        |		MOVE.B	#0x03,(A0)
000206ba 60 1c                    |`       |		BRA	0x206d8
000206bc					switch@0x20680[0x5]:
000206bc 10 bc 00 04              |        |		MOVE.B	#0x04,(A0)
000206c0 60 16                    |`       |		BRA	0x206d8
000206c2					switch@0x20680[0xa]:
000206c2 10 bc 00 07              |        |		MOVE.B	#0x07,(A0)
000206c6 60 10                    |`       |		BRA	0x206d8
000206c8					switch@0x20680[0xb]:
000206c8 10 bc 00 08              |        |		MOVE.B	#0x08,(A0)
000206cc 60 0a                    |`       |		BRA	0x206d8
000206ce					switch@0x20680[0xc]:
000206ce 10 bc 00 09              |        |		MOVE.B	#0x09,(A0)
000206d2 60 04                    |`       |		BRA	0x206d8
000206d4					switch@0x20680[0xd]:
000206d4 10 bc 00 0a              |        |		MOVE.B	#0x0a,(A0)
000206d8 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000206dc 4e 5e                    |N^      |		UNLK	A6
000206de 4e 75                    |Nu      |		RTS
000206e0 ; --------------------------------------------------------------------------------------
000206e0 ; OMSI PASCAL Function
000206e0 ;    <LVAR  0x008 1(r)>
000206e0 ; --------------------------------------------------------------------------------------
000206e0 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2		; Spelunked
000206e4 bf d5                    |        |		CMPA.L	(A5),A7
000206e6 62 06                    |b       |		BHI	0x206ee
000206e8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000206ec 4e 76                    |Nv      |		TRAPV
000206ee de fc 00 0c              |        |		ADDA.W	#0xc,A7
000206f2 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
000206f6 20 2c 00 04              | ,      |		MOVE.L	(A4+0x4),D0
000206fa 0c 80 00 00 00 07        |        |		CMPI.L	#0x00000007,D0
00020700 63 02                    |c       |		BLS	0x20704
00020702 4e 4f                    |NO      |		TRAP	#15
00020704 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
0002070a 11 ae 00 08 08 4d        |     M  |		MOVE.B	(A6+0x8),(A0+D0.L+#0x4d)
00020710 52 ac 00 04              |R       |		ADDQ.L	#0x1,(A4+0x4)
00020714 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00020718 4e 5e                    |N^      |		UNLK	A6
0002071a 4e 75                    |Nu      |		RTS
0002071c ; --------------------------------------------------------------------------------------
0002071c ; OMSI PASCAL Function
0002071c ; --------------------------------------------------------------------------------------
0002071c 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6		; Spelunked
00020720 bf d5                    |        |		CMPA.L	(A5),A7
00020722 62 06                    |b       |		BHI	0x2072a
00020724 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020728 4e 76                    |Nv      |		TRAPV
0002072a de fc 00 1a              |        |		ADDA.W	#0x1a,A7
0002072e 48 e7 e0 80              |H       |		MOVEM.L	A0+D2+D1+D0,-(A7)
00020732 41 fa ff ac              |A       |		LEA.L	0x206e0,A0
00020736 74 03                    |t       |		MOVEQ.L	#0x03,D2
00020738 20 39 00 02 15 da        | 9      |		MOVE.L	0x215da,D0
0002073e b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00020744 66 10                    |f       |		BNE	0x20756
00020746 1f 3c 00 0b              | <      |		MOVE.B	#0x0b,-(A7)
0002074a 4e 90                    |N       |		JSR	(A0)
0002074c 1e bc 00 01              |        |		MOVE.B	#0x01,(A7)
00020750 4e 90                    |N       |		JSR	(A0)
00020752 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020754 60 30                    |`0      |		BRA	0x20786
00020756 22 39 00 02 15 de        |"9      |		MOVE.L	0x215de,D1
0002075c 52 81                    |R       |		ADDQ.L	#0x1,D1
0002075e b0 81                    |        |		CMP.L	D1,D0
00020760 66 24                    |f$      |		BNE	0x20786
00020762 22 39 00 02 15 d6        |"9      |		MOVE.L	0x215d6,D1
00020768 52 81                    |R       |		ADDQ.L	#0x1,D1
0002076a b0 81                    |        |		CMP.L	D1,D0
0002076c 66 18                    |f       |		BNE	0x20786
0002076e 10 39 00 02 15 c9        | 9      |		MOVE.B	0x215c9,D0
00020774 b0 02                    |        |		CMP.B	D2,D0
00020776 66 0e                    |f       |		BNE	0x20786
00020778 1f 3c 00 0c              | <      |		MOVE.B	#0x0c,-(A7)
0002077c 4e 90                    |N       |		JSR	(A0)
0002077e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020780 13 c2 00 02 16 02        |        |		MOVE.B	D2,0x21602
00020786 4c df 01 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0
0002078a 4e 5e                    |N^      |		UNLK	A6
0002078c 4e 75                    |Nu      |		RTS
0002078e ; --------------------------------------------------------------------------------------
0002078e ; OMSI PASCAL Function
0002078e ;    <LVAR  0x00c 1(rw)>
0002078e ;    <LVAR  0x00a 1(r)>
0002078e ;    <LVAR  0x008 1(r)>
0002078e ; --------------------------------------------------------------------------------------
0002078e 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
00020792 bf d5                    |        |		CMPA.L	(A5),A7
00020794 62 06                    |b       |		BHI	0x2079c
00020796 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002079a 4e 76                    |Nv      |		TRAPV
0002079c de fc 00 28              |   (    |		ADDA.W	#0x28,A7
000207a0 48 e7 e0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D2+D1+D0,-(A7)
000207a4 43 ee 00 0c              |C       |		LEA.L	(A6+0xc),A1
000207a8 45 f9 00 02 15 de        |E       |		LEA.L	0x215de,A2
000207ae 47 f9 00 02 15 b6        |G       |		LEA.L	0x215b6,A3
000207b4 49 f9 00 02 15 c1        |I       |		LEA.L	0x215c1,A4
000207ba 74 01                    |t       |		MOVEQ.L	#0x01,D2
000207bc 10 2e 00 0a              | .      |		MOVE.B	(A6+0xa),D0
000207c0 48 80                    |H       |		EXTB.W	D0
000207c2 20 4b                    | K      |		MOVEA.L	A3,A0
000207c4 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
000207c8 67 3a                    |g:      |		BEQ	0x20804
000207ca 12 2e 00 08              | .      |		MOVE.B	(A6+0x8),D1
000207ce 48 81                    |H       |		EXTB.W	D1
000207d0 20 4b                    | K      |		MOVEA.L	A3,A0
000207d2 4a 30 10 30              |J0 0    |		TST.B	(A0+D1.W+#0x30)
000207d6 67 1c                    |g       |		BEQ	0x207f4
000207d8 42 11                    |B       |		CLR.B	(A1)
000207da b0 14                    |        |		CMP.B	(A4),D0
000207dc 66 14                    |f       |		BNE	0x207f2
000207de b2 39 00 02 15 c2        | 9      |		CMP.B	0x215c2,D1
000207e4 66 0c                    |f       |		BNE	0x207f2
000207e6 20 12                    |        |		MOVE.L	(A2),D0
000207e8 0c 80 00 00 00 02        |        |		CMPI.L	#0x00000002,D0
000207ee 66 02                    |f       |		BNE	0x207f2
000207f0 52 11                    |R       |		ADDQ.B	#0x1,(A1)
000207f2 60 0e                    |`       |		BRA	0x20802
000207f4 42 11                    |B       |		CLR.B	(A1)
000207f6 b0 14                    |        |		CMP.B	(A4),D0
000207f8 66 08                    |f       |		BNE	0x20802
000207fa 20 12                    |        |		MOVE.L	(A2),D0
000207fc b0 82                    |        |		CMP.L	D2,D0
000207fe 66 02                    |f       |		BNE	0x20802
00020800 52 11                    |R       |		ADDQ.B	#0x1,(A1)
00020802 60 26                    |`&      |		BRA	0x2082a
00020804 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020808 48 80                    |H       |		EXTB.W	D0
0002080a 20 4b                    | K      |		MOVEA.L	A3,A0
0002080c 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
00020810 67 10                    |g       |		BEQ	0x20822
00020812 42 11                    |B       |		CLR.B	(A1)
00020814 b0 14                    |        |		CMP.B	(A4),D0
00020816 66 08                    |f       |		BNE	0x20820
00020818 20 12                    |        |		MOVE.L	(A2),D0
0002081a b0 82                    |        |		CMP.L	D2,D0
0002081c 66 02                    |f       |		BNE	0x20820
0002081e 52 11                    |R       |		ADDQ.B	#0x1,(A1)
00020820 60 08                    |`       |		BRA	0x2082a
00020822 42 11                    |B       |		CLR.B	(A1)
00020824 4a 92                    |J       |		TST.L	(A2)
00020826 66 02                    |f       |		BNE	0x2082a
00020828 52 11                    |R       |		ADDQ.B	#0x1,(A1)
0002082a 4c df 1f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3+A4
0002082e 4e 5e                    |N^      |		UNLK	A6
00020830 4e 75                    |Nu      |		RTS
00020832 ; --------------------------------------------------------------------------------------
00020832 ; OMSI PASCAL Function
00020832 ; --------------------------------------------------------------------------------------
00020832 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
00020836 bf d5                    |        |		CMPA.L	(A5),A7
00020838 62 06                    |b       |		BHI	0x20840
0002083a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002083e 4e 76                    |Nv      |		TRAPV
00020840 de fc 00 36              |   6    |		ADDA.W	#0x36,A7
00020844 48 e7 fe f0              |H       |		MOVEM.L	A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020848 41 f9 00 02 16 02        |A       |		LEA.L	0x21602,A0
0002084e 43 f9 00 02 15 e2        |C       |		LEA.L	0x215e2,A1
00020854 45 fa fe 8a              |E       |		LEA.L	0x206e0,A2
00020858 47 f9 00 02 15 c9        |G       |		LEA.L	0x215c9,A3
0002085e 72 02                    |r       |		MOVEQ.L	#0x02,D1
00020860 74 05                    |t       |		MOVEQ.L	#0x05,D2
00020862 76 04                    |v       |		MOVEQ.L	#0x04,D3
00020864 78 03                    |x       |		MOVEQ.L	#0x03,D4
00020866 7a 07                    |z       |		MOVEQ.L	#0x07,D5
00020868 7c 06                    ||       |		MOVEQ.L	#0x06,D6
0002086a 20 11                    |        |		MOVE.L	(A1),D0
0002086c b0 82                    |        |		CMP.L	D2,D0
0002086e 63 02                    |c       |		BLS	0x20872
00020870 4e 4e                    |NN      |		TRAP	#14
00020872 d0 40                    | @      |		ADD.W	D0,D0
00020874 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
0002087c 00 0c                    |        |		.CONST	0xc			; [0x0] -> 0x20888
0002087e 00 42                    | B      |		.CONST	0x42			; [0x1] -> 0x208be
00020880 00 44                    | D      |		.CONST	0x44			; [0x2] -> 0x208c0
00020882 00 64                    | d      |		.CONST	0x64			; [0x3] -> 0x208e0
00020884 00 8e                    |        |		.CONST	0x8e			; [0x4] -> 0x2090a
00020886 00 8e                    |        |		.CONST	0x8e			; [0x5] -> 0x2090a
00020888					switch@0x20874[0x0]:
00020888 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002088a 1f 3c 00 0d              | <      |		MOVE.B	#0x0d,-(A7)
0002088e 1f 3c 00 0f              | <      |		MOVE.B	#0x0f,-(A7)
00020892 4e ba fe fa              |N       |		JSR	0x2078e
00020896 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020898 4a 1f                    |J       |		TST.B	(A7)+
0002089a 67 04                    |g       |		BEQ	0x208a0
0002089c 10 83                    |        |		MOVE.B	D3,(A0)
0002089e 60 16                    |`       |		BRA	0x208b6
000208a0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000208a2 1f 3c 00 0c              | <      |		MOVE.B	#0x0c,-(A7)
000208a6 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
000208aa 4e ba fe e2              |N       |		JSR	0x2078e
000208ae 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208b0 4a 1f                    |J       |		TST.B	(A7)+
000208b2 67 08                    |g       |		BEQ	0x208bc
000208b4 10 82                    |        |		MOVE.B	D2,(A0)
000208b6 1f 01                    |        |		MOVE.B	D1,-(A7)
000208b8 4e 92                    |N       |		JSR	(A2)
000208ba 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000208bc 60 52                    |`R      |		BRA	0x20910
000208be					switch@0x20874[0x1]:
000208be 60 50                    |`P      |		BRA	0x20910
000208c0					switch@0x20874[0x2]:
000208c0 20 11                    |        |		MOVE.L	(A1),D0
000208c2 b0 81                    |        |		CMP.L	D1,D0
000208c4 66 18                    |f       |		BNE	0x208de
000208c6 10 13                    |        |		MOVE.B	(A3),D0
000208c8 b0 04                    |        |		CMP.B	D4,D0
000208ca 66 12                    |f       |		BNE	0x208de
000208cc 10 39 00 02 15 ca        | 9      |		MOVE.B	0x215ca,D0
000208d2 b0 05                    |        |		CMP.B	D5,D0
000208d4 66 08                    |f       |		BNE	0x208de
000208d6 10 86                    |        |		MOVE.B	D6,(A0)
000208d8 1f 01                    |        |		MOVE.B	D1,-(A7)
000208da 4e 92                    |N       |		JSR	(A2)
000208dc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000208de 60 30                    |`0      |		BRA	0x20910
000208e0					switch@0x20874[0x3]:
000208e0 20 11                    |        |		MOVE.L	(A1),D0
000208e2 b0 84                    |        |		CMP.L	D4,D0
000208e4 66 22                    |f"      |		BNE	0x20908
000208e6 10 13                    |        |		MOVE.B	(A3),D0
000208e8 b0 01                    |        |		CMP.B	D1,D0
000208ea 66 1c                    |f       |		BNE	0x20908
000208ec 10 39 00 02 15 ca        | 9      |		MOVE.B	0x215ca,D0
000208f2 b0 03                    |        |		CMP.B	D3,D0
000208f4 66 12                    |f       |		BNE	0x20908
000208f6 10 39 00 02 15 cb        | 9      |		MOVE.B	0x215cb,D0
000208fc b0 06                    |        |		CMP.B	D6,D0
000208fe 66 08                    |f       |		BNE	0x20908
00020900 10 85                    |        |		MOVE.B	D5,(A0)
00020902 1f 01                    |        |		MOVE.B	D1,-(A7)
00020904 4e 92                    |N       |		JSR	(A2)
00020906 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020908 60 06                    |`       |		BRA	0x20910
0002090a					switch@0x20874[0x4]:
0002090a					switch@0x20874[0x5]:
0002090a 1f 01                    |        |		MOVE.B	D1,-(A7)
0002090c 4e 92                    |N       |		JSR	(A2)
0002090e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020910 4c df 0f 7f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3
00020914 4e 5e                    |N^      |		UNLK	A6
00020916 4e 75                    |Nu      |		RTS
00020918 ; --------------------------------------------------------------------------------------
00020918 ; OMSI PASCAL Function
00020918 ;    <LVAR -0x004 4(r)>
00020918 ;    <LVAR -0x008 @>
00020918 ; --------------------------------------------------------------------------------------
00020918 4e 56 ff b4              |NV      |		LINK.W	A6,#0xffb4
0002091c bf d5                    |        |		CMPA.L	(A5),A7
0002091e 62 06                    |b       |		BHI	0x20926
00020920 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020924 4e 76                    |Nv      |		TRAPV
00020926 de fc 00 44              |   D    |		ADDA.W	#0x44,A7
0002092a 48 e7 fd f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
0002092e 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
00020932 45 fa fd ac              |E       |		LEA.L	0x206e0,A2
00020936 47 f9 00 02 16 02        |G       |		LEA.L	0x21602,A3
0002093c 74 05                    |t       |		MOVEQ.L	#0x05,D2
0002093e 76 07                    |v       |		MOVEQ.L	#0x07,D3
00020940 78 0f                    |x       |		MOVEQ.L	#0x0f,D4
00020942 7a 4f                    |zO      |		MOVEQ.L	#0x4f,D5
00020944 42 ae ff fc              |B       |		CLR.L	(A6-0x4)
00020948 10 39 00 02 15 be        | 9      |		MOVE.B	0x215be,D0
0002094e b0 02                    |        |		CMP.B	D2,D0
00020950 66 1a                    |f       |		BNE	0x2096c
00020952 42 80                    |B       |		CLR.L	D0
00020954 10 13                    |        |		MOVE.B	(A3),D0
00020956 0c 40 00 0c              | @      |		CMPI.W	#0x000c,D0
0002095a 67 0a                    |g       |		BEQ	0x20966
0002095c 42 80                    |B       |		CLR.L	D0
0002095e 10 13                    |        |		MOVE.B	(A3),D0
00020960 0c 40 00 0d              | @      |		CMPI.W	#0x000d,D0
00020964 66 06                    |f       |		BNE	0x2096c
00020966 28 49                    |(I      |		MOVEA.L	A1,A4
00020968 4e ba fe c8              |N       |		JSR	0x20832
0002096c 4a b9 00 02 15 da        |J       |		TST.L	0x215da
00020972 67 12                    |g       |		BEQ	0x20986
00020974 4a 39 00 02 15 c0        |J9      |		TST.B	0x215c0
0002097a 66 0a                    |f       |		BNE	0x20986
0002097c 1f 3c 00 2a              | < *    |		MOVE.B	#0x2a,-(A7)
00020980 28 49                    |(I      |		MOVEA.L	A1,A4
00020982 4e 92                    |N       |		JSR	(A2)
00020984 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020986 20 39 00 02 15 da        | 9      |		MOVE.L	0x215da,D0
0002098c 0c 80 00 00 00 01        |        |		CMPI.L	#0x00000001,D0
00020992 6f 12                    |o       |		BLE	0x209a6
00020994 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
0002099a 66 0a                    |f       |		BNE	0x209a6
0002099c 1f 3c 00 2b              | < +    |		MOVE.B	#0x2b,-(A7)
000209a0 28 49                    |(I      |		MOVEA.L	A1,A4
000209a2 4e 92                    |N       |		JSR	(A2)
000209a4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209a6 4a b9 00 02 15 de        |J       |		TST.L	0x215de
000209ac 6f 58                    |oX      |		BLE	0x20a06
000209ae 20 39 00 02 15 de        | 9      |		MOVE.L	0x215de,D0
000209b4 b0 b9 00 02 15 d6        |        |		CMP.L	0x215d6,D0
000209ba 66 0c                    |f       |		BNE	0x209c8
000209bc 1f 3c 00 28              | < (    |		MOVE.B	#0x28,-(A7)
000209c0 28 49                    |(I      |		MOVEA.L	A1,A4
000209c2 4e 92                    |N       |		JSR	(A2)
000209c4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209c6 60 3e                    |`>      |		BRA	0x20a06
000209c8 2f 00                    |/       |		MOVE.L	D0,-(A7)
000209ca 7e 01                    |~       |		MOVEQ.L	#0x01,D7
000209cc be 97                    |        |		CMP.L	(A7),D7
000209ce 6e 34                    |n4      |		BGT	0x20a04
000209d0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000209d2 20 07                    |        |		MOVE.L	D7,D0
000209d4 53 80                    |S       |		SUBQ.L	#0x1,D0
000209d6 b0 83                    |        |		CMP.L	D3,D0
000209d8 63 02                    |c       |		BLS	0x209dc
000209da 4e 4f                    |NO      |		TRAP	#15
000209dc 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
000209e2 12 30 08 0b              | 0      |		MOVE.B	(A0+D0.L+#0xb),D1
000209e6 48 81                    |H       |		EXTB.W	D1
000209e8 43 84                    |C       |		CHK.W	D4,D1
000209ea 1f 01                    |        |		MOVE.B	D1,-(A7)
000209ec 4e ba fc 66              |N  f    |		JSR	0x20654
000209f0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209f2 10 17                    |        |		MOVE.B	(A7),D0
000209f4 48 80                    |H       |		EXTB.W	D0
000209f6 41 85                    |A       |		CHK.W	D5,D0
000209f8 1e 80                    |        |		MOVE.B	D0,(A7)
000209fa 28 49                    |(I      |		MOVEA.L	A1,A4
000209fc 4e 92                    |N       |		JSR	(A2)
000209fe 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a00 52 87                    |R       |		ADDQ.L	#0x1,D7
00020a02 68 c8                    |h       |		BVC	0x209cc
00020a04 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a06 4a b9 00 02 15 e2        |J       |		TST.L	0x215e2
00020a0c 6f 54                    |oT      |		BLE	0x20a62
00020a0e 20 39 00 02 15 e2        | 9      |		MOVE.L	0x215e2,D0
00020a14 b0 82                    |        |		CMP.L	D2,D0
00020a16 66 0c                    |f       |		BNE	0x20a24
00020a18 1f 3c 00 29              | < )    |		MOVE.B	#0x29,-(A7)
00020a1c 28 49                    |(I      |		MOVEA.L	A1,A4
00020a1e 4e 92                    |N       |		JSR	(A2)
00020a20 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a22 60 3e                    |`>      |		BRA	0x20a62
00020a24 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020a26 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00020a28 be 97                    |        |		CMP.L	(A7),D7
00020a2a 6e 34                    |n4      |		BGT	0x20a60
00020a2c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a2e 20 07                    |        |		MOVE.L	D7,D0
00020a30 53 80                    |S       |		SUBQ.L	#0x1,D0
00020a32 b0 83                    |        |		CMP.L	D3,D0
00020a34 63 02                    |c       |		BLS	0x20a38
00020a36 4e 4f                    |NO      |		TRAP	#15
00020a38 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020a3e 12 30 08 13              | 0      |		MOVE.B	(A0+D0.L+#0x13),D1
00020a42 48 81                    |H       |		EXTB.W	D1
00020a44 43 84                    |C       |		CHK.W	D4,D1
00020a46 1f 01                    |        |		MOVE.B	D1,-(A7)
00020a48 4e ba fc 0a              |N       |		JSR	0x20654
00020a4c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a4e 10 17                    |        |		MOVE.B	(A7),D0
00020a50 48 80                    |H       |		EXTB.W	D0
00020a52 41 85                    |A       |		CHK.W	D5,D0
00020a54 1e 80                    |        |		MOVE.B	D0,(A7)
00020a56 28 49                    |(I      |		MOVEA.L	A1,A4
00020a58 4e 92                    |N       |		JSR	(A2)
00020a5a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a5c 52 87                    |R       |		ADDQ.L	#0x1,D7
00020a5e 68 c8                    |h       |		BVC	0x20a28
00020a60 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a62 4c df 1f bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
00020a66 4e 5e                    |N^      |		UNLK	A6
00020a68 4e 75                    |Nu      |		RTS
00020a6a ; --------------------------------------------------------------------------------------
00020a6a ; OMSI PASCAL Function
00020a6a ; --------------------------------------------------------------------------------------
00020a6a 4e 56 ff fc              |NV      |		LINK.W	A6,#0xfffc
00020a6e bf d5                    |        |		CMPA.L	(A5),A7
00020a70 62 06                    |b       |		BHI	0x20a78
00020a72 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a76 4e 76                    |Nv      |		TRAPV
00020a78 de fc 00 04              |        |		ADDA.W	#0x4,A7
00020a7c 4e b9 00 01 05 b6        |N       |		JSR	R1000_Reset_L(void)
00020a82 4e b9 00 01 05 bc        |N       |		JSR	R1000_Reset_H(void)
00020a88 4e 5e                    |N^      |		UNLK	A6
00020a8a 4e 75                    |Nu      |		RTS
00020a8c ; --------------------------------------------------------------------------------------
00020a8c ; OMSI PASCAL Function
00020a8c ;    <LVAR  0x008 1(r)>
00020a8c ;    <LVAR -0x003 1(rw)>
00020a8c ;    <LVAR -0x004 @ 1(r)>
00020a8c ;    <LVAR -0x008 4(r)>
00020a8c ;    <LVAR -0x00c @ 4(r)>
00020a8c ;    <LVAR -0x010 @ 4(r)>
00020a8c ;    <LVAR -0x014 @ 4(r)>
00020a8c ;    <LVAR -0x016 @ 1(rw)>
00020a8c ; --------------------------------------------------------------------------------------
00020a8c 4e 56 ff a4              |NV      |		LINK.W	A6,#0xffa4
00020a90 bf d5                    |        |		CMPA.L	(A5),A7
00020a92 62 06                    |b       |		BHI	0x20a9a
00020a94 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a98 4e 76                    |Nv      |		TRAPV
00020a9a de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00020a9e 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
00020aa2 45 ee ff ea              |E       |		LEA.L	(A6-0x16),A2
00020aa6 47 f9 00 02 16 02        |G       |		LEA.L	0x21602,A3
00020aac 49 ee ff fd              |I       |		LEA.L	(A6-0x3),A4
00020ab0 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020ab2 4e ba ff b6              |N       |		JSR	0x20a6a
00020ab6 16 ae 00 08              |        |		MOVE.B	(A6+0x8),(A3)
00020aba 4e ba fe 5c              |N  \    |		JSR	0x20918
00020abe 14 81                    |        |		MOVE.B	D1,(A2)
00020ac0 4a 39 00 02 15 f9        |J9      |		TST.B	0x215f9
00020ac6 67 00 00 ae              |g       |		BEQ	0x20b76
00020aca 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
00020ace 67 00 00 a6              |g       |		BEQ	0x20b76
00020ad2 18 bc 00 05              |        |		MOVE.B	#0x05,(A4)
00020ad6 4a 39 00 02 15 bf        |J9      |		TST.B	0x215bf
00020adc 67 44                    |gD      |		BEQ	0x20b22
00020ade 2f 3a f6 ce              |/:      |		MOVE.L	0x201ae,-(A7)
00020ae2 1f 14                    |        |		MOVE.B	(A4),-(A7)
00020ae4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020ae6 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020aea 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020aec 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020af0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020af6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020af8 1e 81                    |        |		MOVE.B	D1,(A7)
00020afa 10 39 00 02 15 f7        | 9      |		MOVE.B	0x215f7,D0
00020b00 48 80                    |H       |		EXTB.W	D0
00020b02 41 81                    |A       |		CHK.W	D1,D0
00020b04 1f 00                    |        |		MOVE.B	D0,-(A7)
00020b06 48 52                    |HR      |		PEA.L	(A2)
00020b08 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00020b0c 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00020b10 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020b14 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00020b18 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)
00020b1e de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00020b22 4a 12                    |J       |		TST.B	(A2)
00020b24 67 50                    |gP      |		BEQ	0x20b76
00020b26 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020b28 20 4f                    | O      |		MOVEA.L	A7,A0
00020b2a 43 fa f6 86              |C       |		LEA.L	0x201b2,A1
00020b2e 70 06                    |p       |		MOVEQ.L	#0x06,D0
00020b30 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020b32 51 c8 ff fc              |Q       |		DBF	D0,0x20b30
00020b36 1f 14                    |        |		MOVE.B	(A4),-(A7)
00020b38 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b3a 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020b3e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020b40 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00020b44 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020b4a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020b4c 42 17                    |B       |		CLR.B	(A7)
00020b4e 10 39 00 02 15 f7        | 9      |		MOVE.B	0x215f7,D0
00020b54 48 80                    |H       |		EXTB.W	D0
00020b56 41 81                    |A       |		CHK.W	D1,D0
00020b58 1f 00                    |        |		MOVE.B	D0,-(A7)
00020b5a 48 52                    |HR      |		PEA.L	(A2)
00020b5c 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00020b60 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00020b64 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020b68 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00020b6c 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)
00020b72 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00020b76 4a 12                    |J       |		TST.B	(A2)
00020b78 67 2e                    |g.      |		BEQ	0x20ba8
00020b7a 10 39 00 02 15 f8        | 9      |		MOVE.B	0x215f8,D0
00020b80 48 80                    |H       |		EXTB.W	D0
00020b82 41 81                    |A       |		CHK.W	D1,D0
00020b84 1f 00                    |        |		MOVE.B	D0,-(A7)
00020b86 2f 39 00 02 15 fa        |/9      |		MOVE.L	0x215fa,-(A7)
00020b8c 2f 39 00 02 15 fe        |/9      |		MOVE.L	0x215fe,-(A7)
00020b92 1f 13                    |        |		MOVE.B	(A3),-(A7)
00020b94 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020b96 20 4f                    | O      |		MOVEA.L	A7,A0
00020b98 43 f9 00 02 16 03        |C       |		LEA.L	0x21603,A1
00020b9e 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020ba0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020ba2 51 c8 ff fc              |Q       |		DBF	D0,0x20ba0
00020ba6 60 16                    |`       |		BRA	0x20bbe
00020ba8 1f 12                    |        |		MOVE.B	(A2),-(A7)
00020baa 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
00020bae 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
00020bb2 1f 2e ff fc              | .      |		MOVE.B	(A6-0x4),-(A7)
00020bb6 2f 2e ff f8              |/.      |		MOVE.L	(A6-0x8),-(A7)
00020bba 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
00020bbe 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020bc4 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020bc8 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
00020bcc 4e 5e                    |N^      |		UNLK	A6
00020bce 4e 75                    |Nu      |		RTS
00020bd0 ; --------------------------------------------------------------------------------------
00020bd0 ; OMSI PASCAL Function
00020bd0 ; --------------------------------------------------------------------------------------
00020bd0 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
00020bd4 bf d5                    |        |		CMPA.L	(A5),A7
00020bd6 62 06                    |b       |		BHI	0x20bde
00020bd8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020bdc 4e 76                    |Nv      |		TRAPV
00020bde de fc 00 34              |   4    |		ADDA.W	#0x34,A7
00020be2 48 e7 f9 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7)
00020be6 43 f9 00 02 15 d2        |C       |		LEA.L	0x215d2,A1
00020bec 45 f9 00 02 15 b6        |E       |		LEA.L	0x215b6,A2
00020bf2 47 f9 00 02 15 e8        |G       |		LEA.L	0x215e8,A3
00020bf8 49 f9 00 02 15 e9        |I       |		LEA.L	0x215e9,A4
00020bfe 74 01                    |t       |		MOVEQ.L	#0x01,D2
00020c00 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
00020c02 78 05                    |x       |		MOVEQ.L	#0x05,D4
00020c04 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020c06 10 07                    |        |		MOVE.B	D7,D0
00020c08 48 80                    |H       |		EXTB.W	D0
00020c0a 20 4a                    | J      |		MOVEA.L	A2,A0
00020c0c 42 30 00 30              |B0 0    |		CLR.B	(A0+D0.W+#0x30)
00020c10 52 07                    |R       |		ADDQ.B	#0x1,D7
00020c12 be 03                    |        |		CMP.B	D3,D7
00020c14 6f f0                    |o       |		BLE	0x20c06
00020c16 22 82                    |"       |		MOVE.L	D2,(A1)
00020c18 42 b9 00 02 15 d6        |B       |		CLR.L	0x215d6
00020c1e 10 39 00 02 15 be        | 9      |		MOVE.B	0x215be,D0
00020c24 48 80                    |H       |		EXTB.W	D0
00020c26 32 00                    |2       |		MOVE.W	D0,D1
00020c28 b2 43                    | C      |		CMP.W	D3,D1
00020c2a 63 02                    |c       |		BLS	0x20c2e
00020c2c 4e 4e                    |NN      |		TRAP	#14
00020c2e d2 41                    | A      |		ADD.W	D1,D1
00020c30 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
00020c38 00 20                    |        |		.CONST	0x20			; [0x0] -> 0x20c58
00020c3a 00 20                    |        |		.CONST	0x20			; [0x1] -> 0x20c58
00020c3c 00 2c                    | ,      |		.CONST	0x2c			; [0x2] -> 0x20c64
00020c3e 00 2c                    | ,      |		.CONST	0x2c			; [0x3] -> 0x20c64
00020c40 00 2c                    | ,      |		.CONST	0x2c			; [0x4] -> 0x20c64
00020c42 00 36                    | 6      |		.CONST	0x36			; [0x5] -> 0x20c6e
00020c44 00 2c                    | ,      |		.CONST	0x2c			; [0x6] -> 0x20c64
00020c46 00 2c                    | ,      |		.CONST	0x2c			; [0x7] -> 0x20c64
00020c48 00 54                    | T      |		.CONST	0x54			; [0x8] -> 0x20c8c
00020c4a 00 58                    | X      |		.CONST	0x58			; [0x9] -> 0x20c90
00020c4c 00 5c                    | \      |		.CONST	0x5c			; [0xa] -> 0x20c94
00020c4e 00 78                    | x      |		.CONST	0x78			; [0xb] -> 0x20cb0
00020c50 00 92                    |        |		.CONST	0x92			; [0xc] -> 0x20cca
00020c52 00 92                    |        |		.CONST	0x92			; [0xd] -> 0x20cca
00020c54 00 92                    |        |		.CONST	0x92			; [0xe] -> 0x20cca
00020c56 00 92                    |        |		.CONST	0x92			; [0xf] -> 0x20cca
00020c58					switch@0x20c30[0x0]:
00020c58					switch@0x20c30[0x1]:
00020c58 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020c5c 4e ba fe 2e              |N  .    |		JSR	0x20a8c
00020c60 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020c62 60 74                    |`t      |		BRA	0x20cd8
00020c64					switch@0x20c30[0x2]:
00020c64					switch@0x20c30[0x3]:
00020c64					switch@0x20c30[0x4]:
00020c64					switch@0x20c30[0x6]:
00020c64					switch@0x20c30[0x7]:
00020c64 41 83                    |A       |		CHK.W	D3,D0
00020c66 20 4a                    | J      |		MOVEA.L	A2,A0
00020c68 11 82 00 30              |   0    |		MOVE.B	D2,(A0+D0.W+#0x30)
00020c6c 60 6a                    |`j      |		BRA	0x20cd8
00020c6e					switch@0x20c30[0x5]:
00020c6e 16 82                    |        |		MOVE.B	D2,(A3)
00020c70 18 82                    |        |		MOVE.B	D2,(A4)
00020c72 13 c2 00 02 15 ea        |        |		MOVE.B	D2,0x215ea
00020c78 13 c2 00 02 15 ec        |        |		MOVE.B	D2,0x215ec
00020c7e 13 c2 00 02 15 ed        |        |		MOVE.B	D2,0x215ed
00020c84 22 84                    |"       |		MOVE.L	D4,(A1)
00020c86 4e ba f8 86              |N       |		JSR	0x2050e
00020c8a 60 4c                    |`L      |		BRA	0x20cd8
00020c8c					switch@0x20c30[0x8]:
00020c8c 42 91                    |B       |		CLR.L	(A1)
00020c8e 60 f6                    |`       |		BRA	0x20c86
00020c90					switch@0x20c30[0x9]:
00020c90 18 82                    |        |		MOVE.B	D2,(A4)
00020c92 60 f2                    |`       |		BRA	0x20c86
00020c94					switch@0x20c30[0xa]:
00020c94 16 82                    |        |		MOVE.B	D2,(A3)
00020c96 13 c2 00 02 15 ea        |        |		MOVE.B	D2,0x215ea
00020c9c 13 c2 00 02 15 ec        |        |		MOVE.B	D2,0x215ec
00020ca2 13 c2 00 02 15 ed        |        |		MOVE.B	D2,0x215ed
00020ca8 22 bc 00 00 00 04        |"       |		MOVE.L	#0x4,(A1)
00020cae 60 28                    |`(      |		BRA	0x20cd8
00020cb0					switch@0x20c30[0xb]:
00020cb0 16 82                    |        |		MOVE.B	D2,(A3)
00020cb2 18 82                    |        |		MOVE.B	D2,(A4)
00020cb4 13 c2 00 02 15 ea        |        |		MOVE.B	D2,0x215ea
00020cba 13 c2 00 02 15 ec        |        |		MOVE.B	D2,0x215ec
00020cc0 13 c2 00 02 15 ed        |        |		MOVE.B	D2,0x215ed
00020cc6 22 84                    |"       |		MOVE.L	D4,(A1)
00020cc8 60 0e                    |`       |		BRA	0x20cd8
00020cca					switch@0x20c30[0xc]:
00020cca					switch@0x20c30[0xd]:
00020cca					switch@0x20c30[0xe]:
00020cca					switch@0x20c30[0xf]:
00020cca 41 83                    |A       |		CHK.W	D3,D0
00020ccc 20 4a                    | J      |		MOVEA.L	A2,A0
00020cce 11 82 00 30              |   0    |		MOVE.B	D2,(A0+D0.W+#0x30)
00020cd2 23 c2 00 02 15 d6        |#       |		MOVE.L	D2,0x215d6
00020cd8 4c df 1f 9f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4
00020cdc 4e 5e                    |N^      |		UNLK	A6
00020cde 4e 75                    |Nu      |		RTS
00020ce0 ; --------------------------------------------------------------------------------------
00020ce0 ; OMSI PASCAL Function
00020ce0 ;    <LVAR -0x001 @ 1(r)>
00020ce0 ;    <LVAR -0x002 @>
00020ce0 ;    <LVAR -0x003 @>
00020ce0 ; --------------------------------------------------------------------------------------
00020ce0 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
00020ce4 bf d5                    |        |		CMPA.L	(A5),A7
00020ce6 62 06                    |b       |		BHI	0x20cee
00020ce8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020cec 4e 76                    |Nv      |		TRAPV
00020cee de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00020cf2 48 e7 81 c0              |H       |		MOVEM.L	A1+A0+D7+D0,-(A7)
00020cf6 43 f9 00 02 15 da        |C       |		LEA.L	0x215da,A1
00020cfc 42 91                    |B       |		CLR.L	(A1)
00020cfe 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00020d00 10 07                    |        |		MOVE.B	D7,D0
00020d02 48 80                    |H       |		EXTB.W	D0
00020d04 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020d0a 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
00020d0e 67 26                    |g&      |		BEQ	0x20d36
00020d10 1f 07                    |        |		MOVE.B	D7,-(A7)
00020d12 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020d16 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020d1a 48 6e ff ff              |Hn      |		PEA.L	(A6-0x1)
00020d1e 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
00020d24 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020d28 4a 2e ff ff              |J.      |		TST.B	(A6-0x1)
00020d2c 66 08                    |f       |		BNE	0x20d36
00020d2e 1f 07                    |        |		MOVE.B	D7,-(A7)
00020d30 4e ba f8 30              |N  0    |		JSR	0x20562
00020d34 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020d36 52 07                    |R       |		ADDQ.B	#0x1,D7
00020d38 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00020d3c 6f c2                    |o       |		BLE	0x20d00
00020d3e 20 11                    |        |		MOVE.L	(A1),D0
00020d40 0c 80 00 00 00 01        |        |		CMPI.L	#0x00000001,D0
00020d46 66 06                    |f       |		BNE	0x20d4e
00020d48 1f 3c 00 0b              | <      |		MOVE.B	#0x0b,-(A7)
00020d4c 60 16                    |`       |		BRA	0x20d64
00020d4e b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00020d54 66 06                    |f       |		BNE	0x20d5c
00020d56 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
00020d5a 60 08                    |`       |		BRA	0x20d64
00020d5c 4a 80                    |J       |		TST.L	D0
00020d5e 67 0a                    |g       |		BEQ	0x20d6a
00020d60 1f 3c 00 0a              | <      |		MOVE.B	#0x0a,-(A7)
00020d64 4e ba fd 26              |N  &    |		JSR	0x20a8c
00020d68 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020d6a 4c df 03 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1
00020d6e 4e 5e                    |N^      |		UNLK	A6
00020d70 4e 75                    |Nu      |		RTS
00020d72 ; --------------------------------------------------------------------------------------
00020d72 ; OMSI PASCAL Function
00020d72 ;    <LVAR -0x001 @>
00020d72 ;    <LVAR -0x002 @>
00020d72 ;    <LVAR -0x003 @ 1(r)>
00020d72 ; --------------------------------------------------------------------------------------
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 2a              |   *    |		ADDA.W	#0x2a,A7
00020d84 48 e7 c1 c0              |H       |		MOVEM.L	A1+A0+D7+D1+D0,-(A7)
00020d88 43 f9 00 02 15 da        |C       |		LEA.L	0x215da,A1
00020d8e 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
00020d90 42 91                    |B       |		CLR.L	(A1)
00020d92 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00020d94 10 07                    |        |		MOVE.B	D7,D0
00020d96 48 80                    |H       |		EXTB.W	D0
00020d98 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020d9e 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
00020da2 67 28                    |g(      |		BEQ	0x20dcc
00020da4 1f 07                    |        |		MOVE.B	D7,-(A7)
00020da6 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020daa 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020dae 48 6e ff ff              |Hn      |		PEA.L	(A6-0x1)
00020db2 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
00020db8 de c1                    |        |		ADDA.W	D1,A7
00020dba 10 2e ff fd              | .      |		MOVE.B	(A6-0x3),D0
00020dbe 0c 00 00 05              |        |		CMPI.B	#0x05,D0
00020dc2 67 08                    |g       |		BEQ	0x20dcc
00020dc4 1f 07                    |        |		MOVE.B	D7,-(A7)
00020dc6 4e ba f7 9a              |N       |		JSR	0x20562
00020dca 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020dcc 52 07                    |R       |		ADDQ.B	#0x1,D7
00020dce 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00020dd2 6f c0                    |o       |		BLE	0x20d94
00020dd4 20 11                    |        |		MOVE.L	(A1),D0
00020dd6 0c 80 00 00 00 01        |        |		CMPI.L	#0x00000001,D0
00020ddc 66 04                    |f       |		BNE	0x20de2
00020dde 1f 01                    |        |		MOVE.B	D1,-(A7)
00020de0 60 16                    |`       |		BRA	0x20df8
00020de2 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00020de8 66 06                    |f       |		BNE	0x20df0
00020dea 1f 3c 00 0c              | <      |		MOVE.B	#0x0c,-(A7)
00020dee 60 08                    |`       |		BRA	0x20df8
00020df0 4a 80                    |J       |		TST.L	D0
00020df2 67 0a                    |g       |		BEQ	0x20dfe
00020df4 1f 3c 00 0d              | <      |		MOVE.B	#0x0d,-(A7)
00020df8 4e ba fc 92              |N       |		JSR	0x20a8c
00020dfc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020dfe 4c df 03 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1
00020e02 4e 5e                    |N^      |		UNLK	A6
00020e04 4e 75                    |Nu      |		RTS
00020e06 ; --------------------------------------------------------------------------------------
00020e06 ; OMSI PASCAL Function
00020e06 ;    <LVAR -0x001 @>
00020e06 ;    <LVAR -0x002 @>
00020e06 ;    <LVAR -0x003 @ 1(r)>
00020e06 ; --------------------------------------------------------------------------------------
00020e06 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00020e0a bf d5                    |        |		CMPA.L	(A5),A7
00020e0c 62 06                    |b       |		BHI	0x20e14
00020e0e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020e12 4e 76                    |Nv      |		TRAPV
00020e14 de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
00020e18 48 e7 c1 c0              |H       |		MOVEM.L	A1+A0+D7+D1+D0,-(A7)
00020e1c 43 f9 00 02 15 da        |C       |		LEA.L	0x215da,A1
00020e22 72 0f                    |r       |		MOVEQ.L	#0x0f,D1
00020e24 42 91                    |B       |		CLR.L	(A1)
00020e26 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00020e28 10 07                    |        |		MOVE.B	D7,D0
00020e2a 48 80                    |H       |		EXTB.W	D0
00020e2c 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020e32 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
00020e36 67 38                    |g8      |		BEQ	0x20e70
00020e38 1f 07                    |        |		MOVE.B	D7,-(A7)
00020e3a 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020e3e 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
00020e44 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e46 1e 87                    |        |		MOVE.B	D7,(A7)
00020e48 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020e4c 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020e50 48 6e ff ff              |Hn      |		PEA.L	(A6-0x1)
00020e54 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
00020e5a de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020e5e 10 2e ff fd              | .      |		MOVE.B	(A6-0x3),D0
00020e62 0c 00 00 05              |        |		CMPI.B	#0x05,D0
00020e66 67 08                    |g       |		BEQ	0x20e70
00020e68 1f 07                    |        |		MOVE.B	D7,-(A7)
00020e6a 4e ba f6 f6              |N       |		JSR	0x20562
00020e6e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e70 52 07                    |R       |		ADDQ.B	#0x1,D7
00020e72 be 01                    |        |		CMP.B	D1,D7
00020e74 6f b2                    |o       |		BLE	0x20e28
00020e76 20 11                    |        |		MOVE.L	(A1),D0
00020e78 0c 80 00 00 00 01        |        |		CMPI.L	#0x00000001,D0
00020e7e 66 06                    |f       |		BNE	0x20e86
00020e80 1f 3c 00 11              | <      |		MOVE.B	#0x11,-(A7)
00020e84 60 14                    |`       |		BRA	0x20e9a
00020e86 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00020e8c 66 04                    |f       |		BNE	0x20e92
00020e8e 1f 01                    |        |		MOVE.B	D1,-(A7)
00020e90 60 08                    |`       |		BRA	0x20e9a
00020e92 4a 80                    |J       |		TST.L	D0
00020e94 67 0a                    |g       |		BEQ	0x20ea0
00020e96 1f 3c 00 10              | <      |		MOVE.B	#0x10,-(A7)
00020e9a 4e ba fb f0              |N       |		JSR	0x20a8c
00020e9e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ea0 4c df 03 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1
00020ea4 4e 5e                    |N^      |		UNLK	A6
00020ea6 4e 75                    |Nu      |		RTS
00020ea8 ; --------------------------------------------------------------------------------------
00020ea8 ; OMSI PASCAL Function
00020ea8 ;    <LVAR -0x006 @ 4(r)>
00020ea8 ;    <LVAR -0x008 @>
00020ea8 ;    <LVAR -0x009 @>
00020ea8 ;    <LVAR -0x00a @ 1(r)>
00020ea8 ; --------------------------------------------------------------------------------------
00020ea8 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
00020eac bf d5                    |        |		CMPA.L	(A5),A7
00020eae 62 06                    |b       |		BHI	0x20eb6
00020eb0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020eb4 4e 76                    |Nv      |		TRAPV
00020eb6 de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
00020eba 48 e7 c1 e8              |H       |		MOVEM.L	A4+A2+A1+A0+D7+D1+D0,-(A7)
00020ebe 43 f9 00 02 15 da        |C       |		LEA.L	0x215da,A1
00020ec4 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
00020ec8 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020eca 42 91                    |B       |		CLR.L	(A1)
00020ecc 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00020ece 10 07                    |        |		MOVE.B	D7,D0
00020ed0 48 80                    |H       |		EXTB.W	D0
00020ed2 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020ed8 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
00020edc 67 00 00 8c              |g       |		BEQ	0x20f6a
00020ee0 3f 3a f2 dc              |?:      |		MOVE.W	0x201be,-(A7)
00020ee4 3f 3a f2 d6              |?:      |		MOVE.W	0x201bc,-(A7)
00020ee8 3f 3a f2 d0              |?:      |		MOVE.W	0x201ba,-(A7)
00020eec 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020eee 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020ef2 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020ef4 3f 3c 00 06              |?<      |		MOVE.W	#0x6,-(A7)
00020ef8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020efe 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f00 1e 87                    |        |		MOVE.B	D7,(A7)
00020f02 4e ba f4 a0              |N       |		JSR	0x203a4
00020f06 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f08 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020f0e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f10 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00020f12 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f14 2e 8c                    |.       |		MOVE.L	A4,(A7)
00020f16 48 52                    |HR      |		PEA.L	(A2)
00020f18 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
00020f1e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020f20 1e 87                    |        |		MOVE.B	D7,(A7)
00020f22 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00020f24 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
00020f2a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020f2c 48 52                    |HR      |		PEA.L	(A2)
00020f2e 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
00020f34 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020f36 48 78 01 86              |Hx      |		PEA.L	0x186
00020f3a 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
00020f40 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020f42 1f 07                    |        |		MOVE.B	D7,-(A7)
00020f44 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00020f48 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00020f4c 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00020f50 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
00020f56 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020f5a 10 2e ff f6              | .      |		MOVE.B	(A6-0xa),D0
00020f5e b0 01                    |        |		CMP.B	D1,D0
00020f60 67 08                    |g       |		BEQ	0x20f6a
00020f62 1f 07                    |        |		MOVE.B	D7,-(A7)
00020f64 4e ba f5 fc              |N       |		JSR	0x20562
00020f68 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f6a 52 07                    |R       |		ADDQ.B	#0x1,D7
00020f6c 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00020f70 6f 00 ff 5c              |o  \    |		BLE	0x20ece
00020f74 20 11                    |        |		MOVE.L	(A1),D0
00020f76 b0 81                    |        |		CMP.L	D1,D0
00020f78 66 06                    |f       |		BNE	0x20f80
00020f7a 1f 3c 00 14              | <      |		MOVE.B	#0x14,-(A7)
00020f7e 60 16                    |`       |		BRA	0x20f96
00020f80 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00020f86 66 06                    |f       |		BNE	0x20f8e
00020f88 1f 3c 00 12              | <      |		MOVE.B	#0x12,-(A7)
00020f8c 60 08                    |`       |		BRA	0x20f96
00020f8e 4a 80                    |J       |		TST.L	D0
00020f90 67 0a                    |g       |		BEQ	0x20f9c
00020f92 1f 3c 00 13              | <      |		MOVE.B	#0x13,-(A7)
00020f96 4e ba fa f4              |N       |		JSR	0x20a8c
00020f9a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f9c 4c df 17 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2+A4
00020fa0 4e 5e                    |N^      |		UNLK	A6
00020fa2 4e 75                    |Nu      |		RTS
00020fa4 ; --------------------------------------------------------------------------------------
00020fa4 ; OMSI PASCAL Function
00020fa4 ;    <LVAR -0x006 @ 4(r)>
00020fa4 ;    <LVAR -0x00a @ 1(r)>
00020fa4 ; --------------------------------------------------------------------------------------
00020fa4 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
00020fa8 bf d5                    |        |		CMPA.L	(A5),A7
00020faa 62 06                    |b       |		BHI	0x20fb2
00020fac 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020fb0 4e 76                    |Nv      |		TRAPV
00020fb2 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00020fb6 48 e7 c1 e8              |H       |		MOVEM.L	A4+A2+A1+A0+D7+D1+D0,-(A7)
00020fba 43 ee ff fa              |C       |		LEA.L	(A6-0x6),A1
00020fbe 45 f9 00 02 15 da        |E       |		LEA.L	0x215da,A2
00020fc4 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020fc6 42 92                    |B       |		CLR.L	(A2)
00020fc8 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00020fca 10 07                    |        |		MOVE.B	D7,D0
00020fcc 48 80                    |H       |		EXTB.W	D0
00020fce 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
00020fd4 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
00020fd8 67 00 00 92              |g       |		BEQ	0x2106c
00020fdc 41 fa f1 f0              |A       |		LEA.L	0x201ce,A0
00020fe0 70 06                    |p       |		MOVEQ.L	#0x06,D0
00020fe2 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020fe4 51 c8 ff fc              |Q       |		DBF	D0,0x20fe2
00020fe8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020fea 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020fee 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020ff0 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00020ff4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020ffa 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ffc 1e 87                    |        |		MOVE.B	D7,(A7)
00020ffe 4e ba f3 a4              |N       |		JSR	0x203a4
00021002 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021004 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002100a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002100c 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
0002100e de fc 00 0a              |        |		ADDA.W	#0xa,A7
00021012 2e 8c                    |.       |		MOVE.L	A4,(A7)
00021014 48 51                    |HQ      |		PEA.L	(A1)
00021016 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
0002101c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002101e 42 17                    |B       |		CLR.B	(A7)
00021020 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00021022 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021026 48 78 00 00              |Hx      |		PEA.L	0x0
0002102a 48 78 00 00              |Hx      |		PEA.L	0x0
0002102e 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00021034 de fc 00 10              |        |		ADDA.W	#0x10,A7
00021038 1e 87                    |        |		MOVE.B	D7,(A7)
0002103a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002103c 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
00021042 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021044 48 51                    |HQ      |		PEA.L	(A1)
00021046 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
0002104c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002104e 1e 87                    |        |		MOVE.B	D7,(A7)
00021050 1f 01                    |        |		MOVE.B	D1,-(A7)
00021052 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00021056 4e ba f4 6e              |N  n    |		JSR	0x204c6
0002105a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002105c 10 2e ff f6              | .      |		MOVE.B	(A6-0xa),D0
00021060 b0 01                    |        |		CMP.B	D1,D0
00021062 67 08                    |g       |		BEQ	0x2106c
00021064 1f 07                    |        |		MOVE.B	D7,-(A7)
00021066 4e ba f4 fa              |N       |		JSR	0x20562
0002106a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002106c 52 07                    |R       |		ADDQ.B	#0x1,D7
0002106e 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00021072 6f 00 ff 56              |o  V    |		BLE	0x20fca
00021076 20 12                    |        |		MOVE.L	(A2),D0
00021078 b0 81                    |        |		CMP.L	D1,D0
0002107a 66 06                    |f       |		BNE	0x21082
0002107c 1f 3c 00 17              | <      |		MOVE.B	#0x17,-(A7)
00021080 60 16                    |`       |		BRA	0x21098
00021082 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00021088 66 06                    |f       |		BNE	0x21090
0002108a 1f 3c 00 15              | <      |		MOVE.B	#0x15,-(A7)
0002108e 60 08                    |`       |		BRA	0x21098
00021090 4a 80                    |J       |		TST.L	D0
00021092 67 0a                    |g       |		BEQ	0x2109e
00021094 1f 3c 00 16              | <      |		MOVE.B	#0x16,-(A7)
00021098 4e ba f9 f2              |N       |		JSR	0x20a8c
0002109c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002109e 4c df 17 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2+A4
000210a2 4e 5e                    |N^      |		UNLK	A6
000210a4 4e 75                    |Nu      |		RTS
000210a6 ; --------------------------------------------------------------------------------------
000210a6 ; OMSI PASCAL Function
000210a6 ;    <LVAR -0x006 @ 4(r)>
000210a6 ;    <LVAR -0x00a @ 1(r)>
000210a6 ; --------------------------------------------------------------------------------------
000210a6 4e 56 ff a2              |NV      |		LINK.W	A6,#0xffa2
000210aa bf d5                    |        |		CMPA.L	(A5),A7
000210ac 62 06                    |b       |		BHI	0x210b4
000210ae 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000210b2 4e 76                    |Nv      |		TRAPV
000210b4 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
000210b8 48 e7 f1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D3+D2+D1+D0,-(A7)
000210bc 43 f9 00 02 15 da        |C       |		LEA.L	0x215da,A1
000210c2 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
000210c6 47 ee ff f6              |G       |		LEA.L	(A6-0xa),A3
000210ca 72 01                    |r       |		MOVEQ.L	#0x01,D1
000210cc 74 02                    |t       |		MOVEQ.L	#0x02,D2
000210ce 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
000210d0 42 91                    |B       |		CLR.L	(A1)
000210d2 7e 02                    |~       |		MOVEQ.L	#0x02,D7
000210d4 10 07                    |        |		MOVE.B	D7,D0
000210d6 48 80                    |H       |		EXTB.W	D0
000210d8 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
000210de 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
000210e2 67 00 00 8e              |g       |		BEQ	0x21172
000210e6 41 fa f0 f4              |A       |		LEA.L	0x201dc,A0
000210ea 70 06                    |p       |		MOVEQ.L	#0x06,D0
000210ec 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000210ee 51 c8 ff fc              |Q       |		DBF	D0,0x210ec
000210f2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000210f4 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000210f8 3f 01                    |?       |		MOVE.W	D1,-(A7)
000210fa 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
000210fe 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021104 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021106 1e 87                    |        |		MOVE.B	D7,(A7)
00021108 4e ba f2 9a              |N       |		JSR	0x203a4
0002110c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002110e 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021114 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021116 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00021118 de fc 00 0a              |        |		ADDA.W	#0xa,A7
0002111c 2e 8c                    |.       |		MOVE.L	A4,(A7)
0002111e 48 52                    |HR      |		PEA.L	(A2)
00021120 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
00021126 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021128 1e 81                    |        |		MOVE.B	D1,(A7)
0002112a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002112c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021130 48 78 00 00              |Hx      |		PEA.L	0x0
00021134 48 78 00 00              |Hx      |		PEA.L	0x0
00021138 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
0002113e de fc 00 10              |        |		ADDA.W	#0x10,A7
00021142 1e 87                    |        |		MOVE.B	D7,(A7)
00021144 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021146 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
0002114c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002114e 48 52                    |HR      |		PEA.L	(A2)
00021150 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
00021156 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021158 1e 87                    |        |		MOVE.B	D7,(A7)
0002115a 1f 02                    |        |		MOVE.B	D2,-(A7)
0002115c 48 53                    |HS      |		PEA.L	(A3)
0002115e 4e ba f3 66              |N  f    |		JSR	0x204c6
00021162 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021164 10 13                    |        |		MOVE.B	(A3),D0
00021166 b0 02                    |        |		CMP.B	D2,D0
00021168 67 08                    |g       |		BEQ	0x21172
0002116a 1f 07                    |        |		MOVE.B	D7,-(A7)
0002116c 4e ba f3 f4              |N       |		JSR	0x20562
00021170 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021172 52 07                    |R       |		ADDQ.B	#0x1,D7
00021174 be 03                    |        |		CMP.B	D3,D7
00021176 6f 00 ff 5c              |o  \    |		BLE	0x210d4
0002117a 20 11                    |        |		MOVE.L	(A1),D0
0002117c b0 81                    |        |		CMP.L	D1,D0
0002117e 66 06                    |f       |		BNE	0x21186
00021180 1f 3c 00 1a              | <      |		MOVE.B	#0x1a,-(A7)
00021184 60 16                    |`       |		BRA	0x2119c
00021186 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
0002118c 66 06                    |f       |		BNE	0x21194
0002118e 1f 3c 00 18              | <      |		MOVE.B	#0x18,-(A7)
00021192 60 08                    |`       |		BRA	0x2119c
00021194 4a 80                    |J       |		TST.L	D0
00021196 67 0a                    |g       |		BEQ	0x211a2
00021198 1f 3c 00 19              | <      |		MOVE.B	#0x19,-(A7)
0002119c 4e ba f8 ee              |N       |		JSR	0x20a8c
000211a0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000211a2 7e 02                    |~       |		MOVEQ.L	#0x02,D7
000211a4 10 07                    |        |		MOVE.B	D7,D0
000211a6 48 80                    |H       |		EXTB.W	D0
000211a8 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
000211ae 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
000211b2 67 26                    |g&      |		BEQ	0x211da
000211b4 1f 07                    |        |		MOVE.B	D7,-(A7)
000211b6 1f 01                    |        |		MOVE.B	D1,-(A7)
000211b8 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
000211be 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000211c0 1e 87                    |        |		MOVE.B	D7,(A7)
000211c2 1f 01                    |        |		MOVE.B	D1,-(A7)
000211c4 48 53                    |HS      |		PEA.L	(A3)
000211c6 4e ba f2 fe              |N       |		JSR	0x204c6
000211ca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000211cc 10 13                    |        |		MOVE.B	(A3),D0
000211ce b0 01                    |        |		CMP.B	D1,D0
000211d0 67 08                    |g       |		BEQ	0x211da
000211d2 1f 07                    |        |		MOVE.B	D7,-(A7)
000211d4 4e ba f3 8c              |N       |		JSR	0x20562
000211d8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000211da 52 07                    |R       |		ADDQ.B	#0x1,D7
000211dc be 03                    |        |		CMP.B	D3,D7
000211de 6f c4                    |o       |		BLE	0x211a4
000211e0 20 11                    |        |		MOVE.L	(A1),D0
000211e2 b0 81                    |        |		CMP.L	D1,D0
000211e4 66 06                    |f       |		BNE	0x211ec
000211e6 1f 3c 00 1d              | <      |		MOVE.B	#0x1d,-(A7)
000211ea 60 16                    |`       |		BRA	0x21202
000211ec b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
000211f2 66 06                    |f       |		BNE	0x211fa
000211f4 1f 3c 00 1b              | <      |		MOVE.B	#0x1b,-(A7)
000211f8 60 08                    |`       |		BRA	0x21202
000211fa 4a 80                    |J       |		TST.L	D0
000211fc 67 0a                    |g       |		BEQ	0x21208
000211fe 1f 3c 00 1c              | <      |		MOVE.B	#0x1c,-(A7)
00021202 4e ba f8 88              |N       |		JSR	0x20a8c
00021206 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021208 4c df 1f 8f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D7+A0+A1+A2+A3+A4
0002120c 4e 5e                    |N^      |		UNLK	A6
0002120e 4e 75                    |Nu      |		RTS
00021210 ; --------------------------------------------------------------------------------------
00021210 ; OMSI PASCAL Function
00021210 ;    <LVAR -0x004 @ 4(r)>
00021210 ;    <LVAR -0x007 @ 1(r)>
00021210 ; --------------------------------------------------------------------------------------
00021210 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
00021214 bf d5                    |        |		CMPA.L	(A5),A7
00021216 62 06                    |b       |		BHI	0x2121e
00021218 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002121c 4e 76                    |Nv      |		TRAPV
0002121e de fc 00 4a              |   J    |		ADDA.W	#0x4a,A7
00021222 48 e7 f1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D3+D2+D1+D0,-(A7)
00021226 43 f9 00 02 15 da        |C       |		LEA.L	0x215da,A1
0002122c 45 ee ff f9              |E       |		LEA.L	(A6-0x7),A2
00021230 47 f9 00 02 15 b6        |G       |		LEA.L	0x215b6,A3
00021236 49 ee ff fc              |I       |		LEA.L	(A6-0x4),A4
0002123a 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002123c 74 03                    |t       |		MOVEQ.L	#0x03,D2
0002123e 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
00021240 42 91                    |B       |		CLR.L	(A1)
00021242 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00021244 10 07                    |        |		MOVE.B	D7,D0
00021246 48 80                    |H       |		EXTB.W	D0
00021248 20 4b                    | K      |		MOVEA.L	A3,A0
0002124a 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
0002124e 67 5c                    |g\      |		BEQ	0x212ac
00021250 41 fa ef 98              |A       |		LEA.L	0x201ea,A0
00021254 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021256 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021258 51 c8 ff fc              |Q       |		DBF	D0,0x21256
0002125c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002125e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021262 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021264 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00021268 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002126e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021270 48 54                    |HT      |		PEA.L	(A4)
00021272 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
00021278 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002127c 1e 87                    |        |		MOVE.B	D7,(A7)
0002127e 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00021280 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
00021286 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021288 48 54                    |HT      |		PEA.L	(A4)
0002128a 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
00021290 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021292 1e 87                    |        |		MOVE.B	D7,(A7)
00021294 1f 02                    |        |		MOVE.B	D2,-(A7)
00021296 48 52                    |HR      |		PEA.L	(A2)
00021298 4e ba f2 2c              |N  ,    |		JSR	0x204c6
0002129c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002129e 10 12                    |        |		MOVE.B	(A2),D0
000212a0 b0 02                    |        |		CMP.B	D2,D0
000212a2 67 08                    |g       |		BEQ	0x212ac
000212a4 1f 07                    |        |		MOVE.B	D7,-(A7)
000212a6 4e ba f2 ba              |N       |		JSR	0x20562
000212aa 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000212ac 52 07                    |R       |		ADDQ.B	#0x1,D7
000212ae be 03                    |        |		CMP.B	D3,D7
000212b0 6f 92                    |o       |		BLE	0x21244
000212b2 20 11                    |        |		MOVE.L	(A1),D0
000212b4 b0 81                    |        |		CMP.L	D1,D0
000212b6 66 06                    |f       |		BNE	0x212be
000212b8 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
000212bc 60 16                    |`       |		BRA	0x212d4
000212be b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
000212c4 66 06                    |f       |		BNE	0x212cc
000212c6 1f 3c 00 1e              | <      |		MOVE.B	#0x1e,-(A7)
000212ca 60 08                    |`       |		BRA	0x212d4
000212cc 4a 80                    |J       |		TST.L	D0
000212ce 67 0a                    |g       |		BEQ	0x212da
000212d0 1f 3c 00 1f              | <      |		MOVE.B	#0x1f,-(A7)
000212d4 4e ba f7 b6              |N       |		JSR	0x20a8c
000212d8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000212da 7e 02                    |~       |		MOVEQ.L	#0x02,D7
000212dc 10 07                    |        |		MOVE.B	D7,D0
000212de 48 80                    |H       |		EXTB.W	D0
000212e0 20 4b                    | K      |		MOVEA.L	A3,A0
000212e2 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
000212e6 67 26                    |g&      |		BEQ	0x2130e
000212e8 1f 07                    |        |		MOVE.B	D7,-(A7)
000212ea 42 27                    |B'      |		CLR.B	-(A7)
000212ec 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
000212f2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000212f4 1e 87                    |        |		MOVE.B	D7,(A7)
000212f6 1f 01                    |        |		MOVE.B	D1,-(A7)
000212f8 48 52                    |HR      |		PEA.L	(A2)
000212fa 4e ba f1 ca              |N       |		JSR	0x204c6
000212fe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021300 10 12                    |        |		MOVE.B	(A2),D0
00021302 b0 01                    |        |		CMP.B	D1,D0
00021304 67 08                    |g       |		BEQ	0x2130e
00021306 1f 07                    |        |		MOVE.B	D7,-(A7)
00021308 4e ba f2 58              |N  X    |		JSR	0x20562
0002130c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002130e 52 07                    |R       |		ADDQ.B	#0x1,D7
00021310 be 03                    |        |		CMP.B	D3,D7
00021312 6f c8                    |o       |		BLE	0x212dc
00021314 20 11                    |        |		MOVE.L	(A1),D0
00021316 b0 81                    |        |		CMP.L	D1,D0
00021318 66 06                    |f       |		BNE	0x21320
0002131a 1f 3c 00 23              | < #    |		MOVE.B	#0x23,-(A7)
0002131e 60 16                    |`       |		BRA	0x21336
00021320 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00021326 66 06                    |f       |		BNE	0x2132e
00021328 1f 3c 00 21              | < !    |		MOVE.B	#0x21,-(A7)
0002132c 60 08                    |`       |		BRA	0x21336
0002132e 4a 80                    |J       |		TST.L	D0
00021330 67 0a                    |g       |		BEQ	0x2133c
00021332 1f 3c 00 22              | < "    |		MOVE.B	#0x22,-(A7)
00021336 4e ba f7 54              |N  T    |		JSR	0x20a8c
0002133a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002133c 4c df 1f 8f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D7+A0+A1+A2+A3+A4
00021340 4e 5e                    |N^      |		UNLK	A6
00021342 4e 75                    |Nu      |		RTS
00021344 ; --------------------------------------------------------------------------------------
00021344 ; OMSI PASCAL Function
00021344 ;    <LVAR -0x006 @ 4(r)>
00021344 ;    <LVAR -0x00a @ 1(r)>
00021344 ; --------------------------------------------------------------------------------------
00021344 4e 56 ff a4              |NV      |		LINK.W	A6,#0xffa4
00021348 bf d5                    |        |		CMPA.L	(A5),A7
0002134a 62 06                    |b       |		BHI	0x21352
0002134c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021350 4e 76                    |Nv      |		TRAPV
00021352 de fc 00 4c              |   L    |		ADDA.W	#0x4c,A7
00021356 48 e7 f1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D3+D2+D1+D0,-(A7)
0002135a 43 ee ff fa              |C       |		LEA.L	(A6-0x6),A1
0002135e 45 f9 00 02 15 da        |E       |		LEA.L	0x215da,A2
00021364 47 f9 00 02 15 b6        |G       |		LEA.L	0x215b6,A3
0002136a 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002136c 74 06                    |t       |		MOVEQ.L	#0x06,D2
0002136e 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
00021370 42 92                    |B       |		CLR.L	(A2)
00021372 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00021374 10 07                    |        |		MOVE.B	D7,D0
00021376 48 80                    |H       |		EXTB.W	D0
00021378 20 4b                    | K      |		MOVEA.L	A3,A0
0002137a 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
0002137e 67 00 00 8e              |g       |		BEQ	0x2140e
00021382 2f 3a ee 6e              |/: n    |		MOVE.L	0x201f2,-(A7)
00021386 2f 3a ee 66              |/: f    |		MOVE.L	0x201ee,-(A7)
0002138a 2f 3a ee 5e              |/: ^    |		MOVE.L	0x201ea,-(A7)
0002138e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021390 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021394 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021396 3f 3c 00 0c              |?<      |		MOVE.W	#0xc,-(A7)
0002139a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000213a0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000213a2 1e 87                    |        |		MOVE.B	D7,(A7)
000213a4 4e ba ef fe              |N       |		JSR	0x203a4
000213a8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000213aa 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000213b0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000213b2 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
000213b4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000213b6 2e 8c                    |.       |		MOVE.L	A4,(A7)
000213b8 48 51                    |HQ      |		PEA.L	(A1)
000213ba 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000213c0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213c2 2e 91                    |.       |		MOVE.L	(A1),(A7)
000213c4 42 27                    |B'      |		CLR.B	-(A7)
000213c6 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
000213cc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000213ce 2e 91                    |.       |		MOVE.L	(A1),(A7)
000213d0 1f 01                    |        |		MOVE.B	D1,-(A7)
000213d2 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
000213d8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213da 1e 87                    |        |		MOVE.B	D7,(A7)
000213dc 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000213de 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
000213e4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000213e6 48 51                    |HQ      |		PEA.L	(A1)
000213e8 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
000213ee 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000213f0 1e 87                    |        |		MOVE.B	D7,(A7)
000213f2 1f 02                    |        |		MOVE.B	D2,-(A7)
000213f4 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
000213f8 4e ba f0 cc              |N       |		JSR	0x204c6
000213fc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000213fe 10 2e ff f6              | .      |		MOVE.B	(A6-0xa),D0
00021402 b0 02                    |        |		CMP.B	D2,D0
00021404 67 08                    |g       |		BEQ	0x2140e
00021406 1f 07                    |        |		MOVE.B	D7,-(A7)
00021408 4e ba f1 58              |N  X    |		JSR	0x20562
0002140c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002140e 52 07                    |R       |		ADDQ.B	#0x1,D7
00021410 be 03                    |        |		CMP.B	D3,D7
00021412 6f 00 ff 60              |o  `    |		BLE	0x21374
00021416 20 12                    |        |		MOVE.L	(A2),D0
00021418 b0 81                    |        |		CMP.L	D1,D0
0002141a 66 06                    |f       |		BNE	0x21422
0002141c 1f 3c 00 26              | < &    |		MOVE.B	#0x26,-(A7)
00021420 60 16                    |`       |		BRA	0x21438
00021422 b0 b9 00 02 15 d2        |        |		CMP.L	0x215d2,D0
00021428 66 06                    |f       |		BNE	0x21430
0002142a 1f 3c 00 24              | < $    |		MOVE.B	#0x24,-(A7)
0002142e 60 08                    |`       |		BRA	0x21438
00021430 4a 80                    |J       |		TST.L	D0
00021432 67 0a                    |g       |		BEQ	0x2143e
00021434 1f 3c 00 25              | < %    |		MOVE.B	#0x25,-(A7)
00021438 4e ba f6 52              |N  R    |		JSR	0x20a8c
0002143c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002143e 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00021440 10 07                    |        |		MOVE.B	D7,D0
00021442 48 80                    |H       |		EXTB.W	D0
00021444 20 4b                    | K      |		MOVEA.L	A3,A0
00021446 4a 30 00 30              |J0 0    |		TST.B	(A0+D0.W+#0x30)
0002144a 67 1e                    |g       |		BEQ	0x2146a
0002144c 1f 07                    |        |		MOVE.B	D7,-(A7)
0002144e 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00021452 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
00021458 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002145a 1e 87                    |        |		MOVE.B	D7,(A7)
0002145c 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
00021460 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00021464 4e ba f0 60              |N  `    |		JSR	0x204c6
00021468 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002146a 52 07                    |R       |		ADDQ.B	#0x1,D7
0002146c be 03                    |        |		CMP.B	D3,D7
0002146e 6f d0                    |o       |		BLE	0x21440
00021470 4c df 1f 8f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D7+A0+A1+A2+A3+A4
00021474 4e 5e                    |N^      |		UNLK	A6
00021476 4e 75                    |Nu      |		RTS
00021478 ; --------------------------------------------------------------------------------------
00021478 ; OMSI PASCAL Function
00021478 ; --------------------------------------------------------------------------------------
00021478					START:
00021478 4f fa 00 08              |O       |		LEA.L	MAIN,A7
0002147c 4e f9 00 01 02 80        |N       |		JMP	?start_program
00021482					MAIN:
00021482 45 f9 00 02 15 bf        |E       |		LEA.L	0x215bf,A2
00021488 47 f9 00 02 15 f6        |G       |		LEA.L	0x215f6,A3
0002148e 49 f9 00 02 15 f7        |I       |		LEA.L	0x215f7,A4
00021494 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021496 74 07                    |t       |		MOVEQ.L	#0x07,D2
00021498 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
0002149e 48 53                    |HS      |		PEA.L	(A3)
000214a0 48 79 00 02 15 f9        |Hy      |		PEA.L	0x215f9
000214a6 48 54                    |HT      |		PEA.L	(A4)
000214a8 4e b9 00 01 05 56        |N    V  |		JSR	?IPC_GetStd(MOD a : Pointer; VAR b : Bool ; VAR c : Bool)
000214ae de fc 00 0c              |        |		ADDA.W	#0xc,A7
000214b2 48 78 00 00              |Hx      |		PEA.L	0x0
000214b6 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
000214bc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000214be 1e 94                    |        |		MOVE.B	(A4),(A7)
000214c0 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
000214c6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000214c8 42 80                    |B       |		CLR.L	D0
000214ca 10 13                    |        |		MOVE.B	(A3),D0
000214cc 23 c0 00 02 16 0c        |#       |		MOVE.L	D0,0x2160c
000214d2 1f 00                    |        |		MOVE.B	D0,-(A7)
000214d4 10 1f                    |        |		MOVE.B	(A7)+,D0
000214d6 48 80                    |H       |		EXTB.W	D0
000214d8 41 bc 00 0f              |A       |		CHK.W	#0xf,D0
000214dc 13 c0 00 02 15 be        |        |		MOVE.B	D0,0x215be
000214e2 70 00                    |p       |		MOVEQ.L	#0x00,D0
000214e4 23 c0 00 02 15 da        |#       |		MOVE.L	D0,0x215da
000214ea b0 82                    |        |		CMP.L	D2,D0
000214ec 63 02                    |c       |		BLS	0x214f0
000214ee 4e 4f                    |NO      |		TRAP	#15
000214f0 41 f9 00 02 15 b6        |A       |		LEA.L	0x215b6,A0
000214f6 42 30 08 4d              |B0 M    |		CLR.B	(A0+D0.L+#0x4d)
000214fa 52 80                    |R       |		ADDQ.L	#0x1,D0
000214fc b0 82                    |        |		CMP.L	D2,D0
000214fe 6f e4                    |o       |		BLE	0x214e4
00021500 42 b9 00 02 15 da        |B       |		CLR.L	0x215da
00021506 42 b9 00 02 15 de        |B       |		CLR.L	0x215de
0002150c 42 b9 00 02 15 e2        |B       |		CLR.L	0x215e2
00021512 42 39 00 02 15 f8        |B9      |		CLR.B	0x215f8
00021518 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002151a 20 4f                    | O      |		MOVEA.L	A7,A0
0002151c 43 fa ec d8              |C       |		LEA.L	0x201f6,A1
00021520 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021522 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021524 51 c8 ff fc              |Q       |		DBF	D0,0x21522
00021528 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002152a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002152e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021530 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021532 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021538 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002153a 23 df 00 02 15 fa        |#       |		MOVE.L	(A7)+,0x215fa
00021540 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021542 3e ba ec ba              |>       |		MOVE.W	0x201fe,(A7)
00021546 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021548 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002154c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002154e 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00021552 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021558 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002155a 23 df 00 02 15 fe        |#       |		MOVE.L	(A7)+,0x215fe
00021560 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021562 42 39 00 02 16 02        |B9      |		CLR.B	0x21602
00021568 42 12                    |B       |		CLR.B	(A2)
0002156a 42 39 00 02 15 c0        |B9      |		CLR.B	0x215c0
00021570 4e ba f6 5e              |N  ^    |		JSR	0x20bd0
00021574 4e ba f4 f4              |N       |		JSR	0x20a6a
00021578 4e ba f7 66              |N  f    |		JSR	0x20ce0
0002157c 4e ba f7 f4              |N       |		JSR	0x20d72
00021580 4e ba f8 84              |N       |		JSR	0x20e06
00021584 4e ba f9 22              |N  "    |		JSR	0x20ea8
00021588 13 c1 00 02 15 c0        |        |		MOVE.B	D1,0x215c0
0002158e 14 81                    |        |		MOVE.B	D1,(A2)
00021590 4e ba fa 12              |N       |		JSR	0x20fa4
00021594 4e ba fb 10              |N       |		JSR	0x210a6
00021598 4e ba fd aa              |N       |		JSR	0x21344
0002159c 42 12                    |B       |		CLR.B	(A2)
0002159e 4e ba fc 70              |N  p    |		JSR	0x21210
000215a2 13 c1 00 02 15 f8        |        |		MOVE.B	D1,0x215f8
000215a8 42 27                    |B'      |		CLR.B	-(A7)
000215aa 4e ba f4 e0              |N       |		JSR	0x20a8c
000215ae 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000215b0 4e b9 00 01 02 84        |N       |		JSR	?exit
000215b6 00 00                    |        |		.XXX[0x2]
000215b8 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x28]
000215e0 00 00                    |        |		.XXX[0x2]
000215e2 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
000215e6 00 00                    |        |		.XXX[0x2]
000215e8 00 00 00 00 00 00 00 00  |        |		.XXX[0x8]
000215f0 00 00 00 00 00 00 00     |        |		.XXX[0x7]
000215f7 00 00                    |        |		.CONST	0x0,0x0
000215f9 00                       |        |		.XXX[0x1]
000215fa 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
000215fe 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
00021602 00 00                    |        |		.CONST	0x0,0x0
00021604 00 00 00 00              |        |		.XXX[0x4]
00021608 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x1f8]