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

⟦9192b016c⟧ M200

    Length: 51200 (0xc800)
    Types: M200
    Notes: @(#)BEKINS,3.3,90/12/06,11:11:00, M200_PROGRAM
    Names: »BEKINS.M200«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »BEKINS.M200« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »BEKINS.M200« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »BEKINS.M200« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »BEKINS.M200« 
    └─ ⟦this⟧ »BEKINS.M200« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »BEKINS.M200« 

Disassembly

0x2132c


@ 2132c
        <LVAR  0x008 4(r)>
    <POP 2132c-21388 Body>                                              
        <POP 2132c-21342 Prologue>                           Σ0         ↓
        <POP 21342-21344 RegCacheLoad>                       Σ0         ↓
        <POP 21344-21380 Naked>                              Σ0         ↓
            <Blob 0x21344 [14] @>                            Δ-14               {[«14""»]}
            <POP 21350-21352 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x21352 14>                                                    {[«14""»]|[$$BEKINS.ERRMESS]}
            <POP 21362-21364 StackAdj>                       Δ-4                {[«14""»]|[$$BEKINS.ERRMESS]|[-4-]}
            <MI 21364  MOVE.L  (A6+0x8),(A7)>                                   {[«14""»]|[$$BEKINS.ERRMESS]|[4, '(A6+0x8)']}
            <Call 0x21368 0x10450>                                              {[«14""»]|[$$BEKINS.ERRMESS]|[4, '(A6+0x8)']}
                FS_10450(&, &)
            <POP 2136e-21372 StackAdj>                       Δ+20               {[-2-]}
            <POP 21372-21373 StackAdj>                       Δ+2                {}
            <Const 0x21373 0xe.2>                            Δ-2                {[#14]}
            <Const 0x21374 0x1.4>                            Δ-4                {[#14]|[##1]}
            <Call 0x21378 0x103b8>                                              {[#14]|[##1]}
                PopProgram(status : Byte; msg : String)
            <POP 2137e-21380 StackAdj>                       Δ+6                {}
        <POP 21380-21388 Epilogue>                           Σ0         

0x21388


@ 21388
        <LVAR  0x00a 4(w)>
        <LVAR  0x008 1(r)>
    <POP 21388-213d0 Body>                                              
        <POP 21388-2139e Prologue>                           Σ0         ↓
        <POP 2139e-213b2 Naked>                              Σ0         ↓ →0x213be
            <MI 2139e  CLR.L   D0>                                              {}
            <MI 213a0  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 213a4  LEA.L   0x21160,A0>                                      {}
            <MI 213a8  MOVE.W  D0,D1>                                           {}
            <MI 213aa  LSR.W   #0x3,D1>                                         {}
            <MI 213ac  BTST.B  D0,(A0+D1.W)>                                    {}
            <MI 213b0  BEQ     0x213be>                                         {}
        <POP 213b2-213be Naked>                              Σ0         →0x213c8
            <MI 213b2  SUBI.W  #0x0030,D0>                                      {}
            <MI 213b6  EXTW.L  D0>                                              {}
            <MI 213b8  MOVE.L  D0,(A6+0xa)>                                     {}
            <MI 213bc  BRA     0x213c8>                                         {}
        <POP 213be-213c8 Naked>                              Σ0         ↓ ←0x2139e
            <Const 0x213be 0x23.4>                           Δ-4                {[##35]}
            <Call 0x213c2 0x2132c>                                              {[##35]}
            <POP 213c6-213c8 StackAdj>                       Δ+4                {}
        <POP 213c8-213d0 Epilogue>                           Σ0         ←0x213b2

0x213d0


@ 213d0
        <LVAR  0x00a 4(w)>
        <LVAR  0x008 1(rw)>
    <POP 213d0-21456 Body>                                              
        <POP 213d0-213e6 Prologue>                           Σ0         ↓
        <POP 213e6-213ec RegCacheLoad>                       Σ0         ↓
        <POP 213ec-213fe Naked>                              Σ0         ↓ →0x21406
            <MI 213ec  CLR.L   D0>                                              {}
            <MI 213ee  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 213f0  LEA.L   0x21180,A0>                                      {}
            <MI 213f4  MOVE.W  D0,D1>                                           {}
            <MI 213f6  LSR.W   #0x3,D1>                                         {}
            <MI 213f8  BTST.B  D0,(A0+D1.W)>                                    {}
            <MI 213fc  BEQ     0x21406>                                         {}
        <POP 213fe-21406 Naked>                              Σ0         ↓
            <MI 213fe  SUB.W   #0x20,D0>                                        {}
            <POP 0x21400 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 21404  MOVE.B  D0,(A6+0x8)>                                     {}
        <POP 21406-21418 Naked>                              Σ0         ↓ →0x21424 ←0x213ec
            <MI 21406  CLR.L   D0>                                              {}
            <MI 21408  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 2140a  LEA.L   0x211a0,A0>                                      {}
            <MI 2140e  MOVE.W  D0,D1>                                           {}
            <MI 21410  LSR.W   #0x3,D1>                                         {}
            <MI 21412  BTST.B  D0,(A0+D1.W)>                                    {}
            <MI 21416  BEQ     0x21424>                                         {}
        <POP 21418-2141c Naked>                              Σ0         ↓
            <MI 21418  SUBI.W  #0x0030,D0>                                      {}
        <POP 2141c-21424 Naked>                              Σ0         →0x2144e ←0x2143a
            <MI 2141c  EXTW.L  D0>                                              {}
            <MI 2141e  MOVE.L  D0,(A6+0xa)>                                     {}
            <MI 21422  BRA     0x2144e>                                         {}
        <POP 21424-21430 Naked>                              Σ0         ↓ →0x21434 ←0x21406
            <MI 21424  LEA.L   0x211c0,A0>                                      {}
            <MI 21428  MOVE.W  D0,D1>                                           {}
            <MI 2142a  LSR.W   #0x3,D1>                                         {}
            <MI 2142c  CMP.W   #0x20,D1>                                        {}
            <MI 2142e  BLT     0x21434>                                         {}
        <POP 21430-21434 Naked>                              Σ0         →0x21438
            <MI 21430  MOVEQ.L #0x00,D1>                                        {}
            <MI 21432  BRA     0x21438>                                         {}
        <POP 21434-21438 Naked>                              Σ0         ↓ ←0x21424
            <MI 21434  BTST.B  D0,(A0+D1.W)>                                    {}
        <POP 21438-2143a Naked>                              Σ0         ↓ →0x21444 ←0x21430
            <MI 21438  BEQ     0x21444>                                         {}
        <POP 2143a-21444 Naked>                              Σ0         →0x2141c
            <MI 2143a  SUBI.W  #0x0041,D0>                                      {}
            <MI 2143e  ADDI.W  #0x000a,D0>                                      {}
            <MI 21442  BRA     0x2141c>                                         {}
        <POP 21444-2144e Naked>                              Σ0         ↓ ←0x21438
            <Const 0x21444 0x24.4>                           Δ-4                {[##36]}
            <Call 0x21448 0x2132c>                                              {[##36]}
            <POP 2144c-2144e StackAdj>                       Δ+4                {}
        <POP 2144e-21456 Epilogue>                           Σ0         ←0x2141c

0x21456


@ 21456
    <POP 21456-214e2 Body>                                              
        <POP 21456-2146c Prologue>                           Σ0         ↓
        <POP 2146c-21472 RegCacheLoad>                       Σ0         ↓
        <POP 21472-214da Naked>                              Σ0         ↓
            <Const 0x21472 0xd.2>                            Δ-2                {[#13]}
            <Call 0x21474 0x103d0>                                              {[#13]}
                WriteConsoleChar(chr : char)
            <POP 2147a-2147b StackAdj>                       Δ+2        ↓       {}
            <Blob 0x2147b [40] @>                            Δ-40               {[«40""»]}
            <POP 2148c-2148e StackAdj>                       Δ-4                {[«40""»]|[-4-]}
            <Lit 0x2148e 39>                                                    {[«40""»]|[$$                                      _]}
            <Call 0x2149e 0x103d8>                                              {[«40""»]|[$$                                      _]}
                WriteConsoleString(str : String)
            <POP 214a4-214a5 StackAdj>                       Δ+44       ↓       {}
            <Blob 0x214a5 [40] @>                            Δ-40               {[«40""»]}
            <POP 214b4-214b6 StackAdj>                       Δ-4                {[«40""»]|[-4-]}
            <Lit 0x214b6 39>                                                    {[«40""»]|[$$                                      _]}
            <Call 0x214c6 0x103d8>                                              {[«40""»]|[$$                                      _]}
                WriteConsoleString(str : String)
            <POP 214cc-214d0 StackAdj>                       Δ+42               {[-2-]}
            <POP 214d0-214d1 StackAdj>                       Δ+2                {}
            <Const 0x214d1 0xd.2>                            Δ-2                {[#13]}
            <Call 0x214d2 0x103d0>                                              {[#13]}
                WriteConsoleChar(chr : char)
            <POP 214d8-214da StackAdj>                       Δ+2                {}
        <POP 214da-214e2 Epilogue>                           Σ0         

0x214e2


@ 214e2
    <POP 214e2-21542 Body>                                              
        <POP 214e2-214f8 Prologue>                           Σ0         ↓
        <POP 214f8-214fa RegCacheLoad>                       Σ0         ↓
        <POP 214fa-2153a Naked>                              Σ0         ↓
            <Const 0x214fa 0xd.2>                            Δ-2                {[#13]}
            <Call 0x214fc 0x103d0>                                              {[#13]}
                WriteConsoleChar(chr : char)
            <POP 21502-21504 StackAdj>                       Δ+2                {}
            <Blob 0x21504 [10] @>                            Δ-10               {[«10""»]}
            <POP 21510-21512 StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x21512 10>                                                    {[«10""»]|[$$         _]}
            <Call 0x21526 0x103d8>                                              {[«10""»]|[$$         _]}
                WriteConsoleString(str : String)
            <POP 2152c-21530 StackAdj>                       Δ+12               {[-2-]}
            <POP 21530-21531 StackAdj>                       Δ+2                {}
            <Const 0x21531 0xd.2>                            Δ-2                {[#13]}
            <Call 0x21532 0x103d0>                                              {[#13]}
                WriteConsoleChar(chr : char)
            <POP 21538-2153a StackAdj>                       Δ+2                {}
        <POP 2153a-21542 Epilogue>                           Σ0         

0x21542


@ 21542
    <POP 21542-2159a Body>                                              
        <POP 21542-21558 Prologue>                           Σ0         ↓
        <POP 21558-21564 RegCacheLoad>                       Σ0         ↓
        <POP 21564-21592 Naked>                              Σ0         ↓
            <MI 21564  MOVE.L  #0x9303ff10,D0>                                  {}
            <MI 2156a  MOVE.L  D0,0x2e1c8>                                      {}
            <MI 21570  MOVE.L  D0,0x2e1cc>                                      {}
            <MI 21572  ADDQ.L  #0x2,0x2e1cc>                                    {}
            <MI 21574  MOVE.L  D0,0x2e1d0>                                      {}
            <MI 21576  ADDQ.L  #0x4,0x2e1d0>                                    {}
            <MI 21578  ADDQ.L  #0x6,D0>                                         {}
            <MI 2157a  MOVE.L  D0,0x2e1d4>                                      {}
            <MI 21580  MOVE.L  D0,0x2e1d8>                                      {}
            <MI 21586  MOVE.L  #0x9303e400,D7>                                  {}
            <MI 2158c  MOVE.L  D7,0x2e1dc>                                      {}
        <POP 21592-2159a Epilogue>                           Σ0         

0x2159a


@ 2159a
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x00a @ 4(rw)>
        <LVAR -0x00c @ 2(r)>
    <POP 2159a-21668 Body>                                              
        <POP 2159a-215b0 Prologue>                           Σ0         ↓
        <POP 215b0-215ba RegCacheLoad>                       Σ0         ↓
        <POP 215ba-215c8 Naked>                              Σ0 Δ-4     ↓
            <MI 215ba  MOVEQ.L #0x00,D7>                                        {}
            <MI 215bc  MOVE.L  (A6+0xc),D0>                                     {}
            <MI 215be  ADD.L   (A6+0x8),D0>                                     {}
            <MI 215c2  SUBQ.L  #0x1,D0>                                         {}
            <MI 215c4  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 215c6  MOVE.L  (A6+0xc),D6>                                     {[4, 'D0']}
        <POP 215c8-215ce Naked>                              Σ-4        ↓ →0x2165e ←0x21658
            <MI 215c8  CMP.L   (A7),D6>                                         {[-4-]}
            <MI 215ca  BHI     0x2165e>                                         {[-4-]}
        <POP 215ce-215ea Naked>                              Σ-4        ↓ →0x215f4
            <MI 215ce  MOVE.L  D6,-(A7)>                     Δ-4                {[-4-]|[4, 'D6']}
            <MI 215d0  LEA.L   (A6-0xc),A0>                                     {[-4-]|[4, 'D6']}
            <MI 215d4  MOVE.L  A0,-(A7)>                     Δ-4                {[-4-]|[4, 'D6']|[4, 'A0']}
            <MI 215d6  ADDQ.L  #0x1,(A7)>                                       {[-4-]|[4, 'D6']|[-4-]}
            <Const 0x215d8 0x1.2>                            Δ-2                {[-4-]|[4, 'D6']|[-4-]|[#1]}
            <Call 0x215dc 0x10238>                                              {[-4-]|[4, 'D6']|[-4-]|[#1]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 215e2-215e6 StackAdj>                       Δ+10               {[-4-]}
            <MI 215e6  TST.L   D7>                                              {[-4-]}
            <MI 215e8  BNE     0x215f4>                                         {[-4-]}
        <POP 215ea-215f4 Naked>                              Σ-4        ↓
            <Pointer.fp 0x215ea <LVAR -0x00a @ 4(rw)>>       Δ-4                {[-4-]|[@@-10]}
            <Call 0x215ec 0x102b8>                                              {[-4-]|[@@-10]}
                NewString(VAR a : String)
            <POP 215f2-215f4 StackAdj>                       Δ+4                {[-4-]}
        <POP 215f4-2162e Naked>                              Σ-4        ↓ →0x2163a ←0x215ce
            <POP 215f4-215f6 StackAdj>                       Δ-4                {[-8-]}
            <MI 215f6  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0xa)']}
            <POP 215f8-215fa StackAdj>                       Δ-4                {[-8-]|[4, '(A6-0xa)']|[-4-]}
            <MI 215fa  MOVE.W  (A6-0xc),D0>                                     {[-8-]|[4, '(A6-0xa)']|[-4-]}
            <MI 215fe  ANDI.W  #0x00ff,D0>                                      {[-8-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21602  EXTW.L  D0>                                              {[-8-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21604  MOVE.L  D0,-(A7)>                     Δ-4                {[-8-]|[4, '(A6-0xa)']|[-4-]|[4, 'D0']}
            <Const 0x21606 0x2.4>                            Δ-4                {[-8-]|[4, '(A6-0xa)']|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2160a 0x102e8>                                              {[-8-]|[4, '(A6-0xa)']|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 21610-21612 StackAdj>                       Δ+8                {[-8-]|[4, '(A6-0xa)']|[-4-]}
            <Call 0x21612 0x102d0>                                              {[-8-]|[4, '(A6-0xa)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21618-2161a StackAdj>                       Δ+8                {[-8-]}
            <MI 2161a  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {[-4-]}
            <MI 2161c  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 2161e  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 21620  MOVE.L  D0,D4>                                           {[-4-]}
            <MI 21622  MOVEQ.L #0x04,D3>                                        {[-4-]}
            <Call 0x21624 0x10294>                                              {[-4-]}
                ?divs_d3_d4
            <MI 2162a  TST.L   D3>                                              {[-4-]}
            <MI 2162c  BNE     0x2163a>                                         {[-4-]}
        <POP 2162e-2163a Naked>                              Σ-4        ↓
            <MI 2162e  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0xa)']}
            <Const 0x21630 0x20.2>                           Δ-2                {[-4-]|[4, '(A6-0xa)']|[#32]}
            <Call 0x21632 0x102c0>                                              {[-4-]|[4, '(A6-0xa)']|[#32]}
                AppendChar(MOD b : String; a : char)
            <POP 21638-2163a StackAdj>                       Δ+6                {[-4-]}
        <POP 2163a-21640 Naked>                              Σ-4        ↓ →0x2164c ←0x215f4
            <MI 2163a  MOVE.L  D0,D7>                                           {[-4-]}
            <MI 2163c  CMP.L   #0x20,D7>                                        {[-4-]}
            <MI 2163e  BEQ     0x2164c>                                         {[-4-]}
        <POP 21640-2164c Naked>                              Σ-4        ↓ →0x21658
            <MI 21640  MOVE.L  (A6+0xc),D0>                                     {[-4-]}
            <MI 21642  ADD.L   (A6+0x8),D0>                                     {[-4-]}
            <MI 21646  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <MI 21648  CMP.L   D0,D6>                                           {[-4-]}
            <MI 2164a  BNE     0x21658>                                         {[-4-]}
        <POP 2164c-21658 Naked>                              Σ-4        ↓ ←0x2163a
            <MI 2164c  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0xa)']}
            <Call 0x2164e 0x103e0>                                              {[-4-]|[4, '(A6-0xa)']}
                WriteConsoleStringCrLf(str : String)
            <POP 21654-21656 StackAdj>                       Δ+4                {[-4-]}
            <MI 21656  MOVEQ.L #0x00,D7>                                        {[-4-]}
        <POP 21658-2165e Naked>                              Σ-4        ↓ →0x215c8 ←0x21640
            <MI 21658  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 2165a  BCC     0x215c8>                                         {[-4-]}
        <POP 2165e-21660 Naked>                              Σ-4 Δ+4    ↓ ←0x215c8
            <POP 2165e-21660 StackAdj>                       Δ+4                {}
        <POP 21660-21668 Epilogue>                           Σ0         

0x21668


@ 21668
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x00a 2(r)>
        <LVAR -0x00b 1(r)>
        <LVAR -0x00c 4(w)>
        <LVAR -0x00f 1(r)>
        <LVAR -0x010 1(r) 4(w)>
        <LVAR -0x013 1(r)>
        <LVAR -0x014 2(r) 4(w)>
        <LVAR -0x015 1(r)>
        <LVAR -0x016 1(r)>
        <LVAR -0x017 1(r)>
        <LVAR -0x018 @ 1(r) 4(w)>
    <POP 21668-21c32 Body>                                   Δ+90       
        <POP 21668-2167e Prologue>                           Σ0         ↓
        <POP 2167e-21698 RegCacheLoad>                       Σ0         ↓
        <POP 21698-2184a Naked>                              Σ0         ↓ →0x21874
            <Call 0x21698 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 2169e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x216a2 0x103d8>                                              {[4, '(A6+0x8)']}
                WriteConsoleString(str : String)
            <POP 216a8-216aa StackAdj>                       Δ+4                {}
            <MI 216aa  MOVE.L  (A6+0xc),(A6-0x18)>                              {}
            <MI 216b0  MOVE.L  (A6+0x10),(A6-0x14)>                             {}
            <MI 216b6  MOVE.L  (A6+0x14),(A6-0x10)>                             {}
            <MI 216bc  MOVE.L  (A6+0x18),(A6-0xc)>                              {}
            <MI 216c2  LEA.L   (A6-0x18),A0>                                    {}
            <MI 216c6  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x216c8 0x10.4>                           Δ-4                {[4, 'A0']|[##16]}
            <Call 0x216cc 0x2159a>                                              {[4, 'A0']|[##16]}
            <POP 216d0-216d2 StackAdj>                       Δ+8                {}
            <Blob 0x216d2 [20] @>                            Δ-20               {[«20""»]}
            <POP 216de-216e0 StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x216e0 20>                                                    {[«20""»]|[-4-]|[$$From/To        : 16#]}
            <POP 216ea-216ec StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]}
            <MI 216ec  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]}
            <MI 216ee  MOVE.B  (A6-0x18),D0>                                    {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]}
            <MI 216f2  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]|[4, 'D0']}
            <Const 0x216f4 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x216f8 0x102e8>                                              {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 216fe-21700 StackAdj>                       Δ+8                {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]}
            <Call 0x21700 0x102d0>                                              {[«20""»]|[-4-]|[$$From/To        : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21702-21704 StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x21704 0x103e0>                                              {[«20""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21706-21708 StackAdj>                       Δ+24               {}
            <Blob 0x21708 [20] @>                            Δ-20               {[«20""»]}
            <POP 21714-21716 StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x21716 20>                                                    {[«20""»]|[-4-]|[$$Packet_Length  : 16#]}
            <POP 21720-21722 StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]}
            <MI 21722  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]}
            <MI 21724  MOVE.B  (A6-0x17),D0>                                    {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]}
            <MI 21728  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]|[4, 'D0']}
            <Const 0x2172a 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2172e 0x102e8>                                              {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 21734-21736 StackAdj>                       Δ+8                {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]}
            <Call 0x21736 0x102d0>                                              {[«20""»]|[-4-]|[$$Packet_Length  : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21738-2173a StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x2173a 0x103e0>                                              {[«20""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2173c-2173e StackAdj>                       Δ+24               {}
            <Blob 0x2173e [20] @>                            Δ-20               {[«20""»]}
            <POP 2174a-2174c StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x2174c 20>                                                    {[«20""»]|[-4-]|[$$Excess_Data    : 16#]}
            <POP 21756-21758 StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]}
            <MI 21758  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]}
            <MI 2175a  MOVE.B  (A6-0x16),D0>                                    {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]}
            <MI 2175e  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]|[4, 'D0']}
            <Const 0x21760 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x21764 0x102e8>                                              {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2176a-2176c StackAdj>                       Δ+8                {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]}
            <Call 0x2176c 0x102d0>                                              {[«20""»]|[-4-]|[$$Excess_Data    : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2176e-21770 StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x21770 0x103e0>                                              {[«20""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21772-21774 StackAdj>                       Δ+24               {}
            <Blob 0x21774 [20] @>                            Δ-20               {[«20""»]}
            <POP 21780-21782 StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x21782 20>                                                    {[«20""»]|[-4-]|[$$Packet_ID      : 16#]}
            <POP 2178c-2178e StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]}
            <MI 2178e  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]}
            <MI 21790  MOVE.B  (A6-0x15),D0>                                    {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]}
            <MI 21794  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]|[4, 'D0']}
            <Const 0x21796 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2179a 0x102e8>                                              {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 217a0-217a2 StackAdj>                       Δ+8                {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]}
            <Call 0x217a2 0x102d0>                                              {[«20""»]|[-4-]|[$$Packet_ID      : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 217a4-217a6 StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x217a6 0x103e0>                                              {[«20""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 217a8-217aa StackAdj>                       Δ+24               {}
            <Blob 0x217aa [20] @>                            Δ-20               {[«20""»]}
            <POP 217b6-217b8 StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x217b8 20>                                                    {[«20""»]|[-4-]|[$$Device_Driver  : 16#]}
            <POP 217c2-217c4 StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
            <MI 217c4  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
            <MI 217c6  MOVE.B  (A6-0x13),D0>                                    {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
            <MI 217ca  LSL.B   #0x1,D0>                                         {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
            <MI 217cc  LSR.B   #0x1,D0>                                         {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
            <MI 217ce  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]|[4, 'D0']}
            <Const 0x217d0 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x217d4 0x102e8>                                              {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 217da-217dc StackAdj>                       Δ+8                {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
            <Call 0x217dc 0x102d0>                                              {[«20""»]|[-4-]|[$$Device_Driver  : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 217de-217e0 StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x217e0 0x103e0>                                              {[«20""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 217e2-217e4 StackAdj>                       Δ+24               {}
            <Blob 0x217e4 [20] @>                            Δ-20               {[«20""»]}
            <POP 217f0-217f2 StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x217f2 20>                                                    {[«20""»]|[-4-]|[$$Command_ID     : 16#]}
            <POP 217fc-217fe StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]}
            <MI 217fe  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]}
            <MI 21800  MOVE.B  (A6-0x10),D0>                                    {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]}
            <MI 21804  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]|[4, 'D0']}
            <Const 0x21806 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2180a 0x102e8>                                              {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 21810-21812 StackAdj>                       Δ+8                {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]}
            <Call 0x21812 0x102d0>                                              {[«20""»]|[-4-]|[$$Command_ID     : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21814-21816 StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x21816 0x103e0>                                              {[«20""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21818-21819 StackAdj>                       Δ+24       ↓       {}
            <Blob 0x21819 [18] @>                            Δ-18               {[«18""»]}
            <POP 21828-2182a StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x2182a 17>                                                    {[«18""»]|[$$Flags          :_]}
            <Call 0x21838 0x103d8>                                              {[«18""»]|[$$Flags          :_]}
                WriteConsoleString(str : String)
            <POP 2183e-21842 StackAdj>                       Δ+22               {}
            <MI 21842  MOVE.B  (A6-0xf),D0>                                     {}
            <MI 21846  LSR.B   #0x7,D0>                                         {}
            <MI 21848  BEQ     0x21874>                                         {}
        <POP 2184a-21874 Naked>                              Σ0         ↓
            <Blob 0x2184a [10] @>                            Δ-10               {[«10""»]}
            <POP 2185a-2185c StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x2185c 9>                                                     {[«10""»]|[$$Last_part]}
            <Call 0x2186a 0x103d8>                                              {[«10""»]|[$$Last_part]}
                WriteConsoleString(str : String)
            <POP 21870-21874 StackAdj>                       Δ+14               {}
        <POP 21874-2187e Naked>                              Σ0         ↓ →0x218a0 ←0x21698
            <MI 21874  MOVE.B  (A6-0xf),D0>                                     {}
            <MI 21878  LSL.B   #0x5,D0>                                         {}
            <MI 2187a  LSR.B   #0x7,D0>                                         {}
            <MI 2187c  BEQ     0x218a0>                                         {}
        <POP 2187e-218a0 Naked>                              Σ0         ↓
            <Blob 0x2187e [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21882 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 21886-21888 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Lit 0x21888 8>                                                     {[«4""»]|[«4""»]|[$$, Resume]}
            <Call 0x21896 0x103d8>                                              {[«4""»]|[«4""»]|[$$, Resume]}
                WriteConsoleString(str : String)
            <POP 2189c-218a0 StackAdj>                       Δ+12               {}
        <POP 218a0-218aa Naked>                              Σ0         ↓ →0x218d4 ←0x21874
            <MI 218a0  MOVE.B  (A6-0xf),D0>                                     {}
            <MI 218a4  LSL.B   #0x6,D0>                                         {}
            <MI 218a6  LSR.B   #0x7,D0>                                         {}
            <MI 218a8  BEQ     0x218d4>                                         {}
        <POP 218aa-218d4 Naked>                              Σ0         ↓
            <Blob 0x218aa [10] @>                            Δ-10               {[«10""»]}
            <POP 218ba-218bc StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x218bc 9>                                                     {[«10""»]|[$$, Success]}
            <Call 0x218ca 0x103d8>                                              {[«10""»]|[$$, Success]}
                WriteConsoleString(str : String)
            <POP 218d0-218d4 StackAdj>                       Δ+14               {}
        <POP 218d4-218de Naked>                              Σ0         ↓ →0x21908 ←0x218a0
            <MI 218d4  MOVE.B  (A6-0xf),D0>                                     {}
            <MI 218d8  LSL.B   #0x7,D0>                                         {}
            <MI 218da  LSR.B   #0x7,D0>                                         {}
            <MI 218dc  BEQ     0x21908>                                         {}
        <POP 218de-21908 Naked>                              Σ0         →0x2190e
            <Blob 0x218de [22] @>                            Δ-22               {[«22""»]}
            <POP 218f0-218f2 StackAdj>                       Δ-4                {[«22""»]|[-4-]}
            <Lit 0x218f2 21>                                                    {[«22""»]|[$$, Multi_Part_Response]}
            <Call 0x21900 0x103e0>                                              {[«22""»]|[$$, Multi_Part_Response]}
                WriteConsoleStringCrLf(str : String)
            <POP 21902-21906 StackAdj>                       Δ+26               {}
            <MI 21906  BRA     0x2190e>                                         {}
        <POP 21908-2190e Naked>                              Σ0         ↓ ←0x218d4
            <Call 0x21908 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 2190e-21952 Naked>                              Σ0         →0x21964 →0x219c2 →0x21a0e →0x21a34 →0x21a5e →0x21bb4 →0x21bdc →0x21bf0 →0x21c06 ←0x218de
            <Blob 0x2190e [18] @>                            Δ-18               {[«18""»]}
            <POP 21920-21922 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x21922 17>                                                    {[«18""»]|[$$Response to    :_]}
            <Call 0x21930 0x103d8>                                              {[«18""»]|[$$Response to    :_]}
                WriteConsoleString(str : String)
            <POP 21936-2193a StackAdj>                       Δ+22               {}
            <MI 2193a  MOVE.W  (A6-0x14),D0>                                    {}
            <MI 2193e  LSR.W   #0x7,D0>                                         {}
            <POP 0x21940 LimitCheck 0x0 ≤ D0 ≤ 0x8>                             {}
            <MI 21948  ADD.W   D0,D0>                                           {}
            <MI 2194a  SWITCH  D0.W>                                            {}
        <POP 21964-219ae Naked>                              Σ0 Δ-40    ↓ ←0x2190e
            <Blob 0x21964 [6] @>                             Δ-6                {[«6""»]}
            <POP 21974-21976 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x21976 5>                                                     {[«6""»]|[$$RESET]}
            <Call 0x21984 0x103e0>                                              {[«6""»]|[$$RESET]}
                WriteConsoleStringCrLf(str : String)
            <POP 21986-21988 StackAdj>                       Δ+10               {}
            <Blob 0x21988 [20] @>                            Δ-20               {[«20""»]}
            <POP 21994-21996 StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x21996 20>                                                    {[«20""»]|[-4-]|[$$IOP ENP DRIVER = 16#]}
            <POP 219a0-219a2 StackAdj>                       Δ-4                {[«20""»]|[-4-]|[$$IOP ENP DRIVER = 16#]|[-4-]}
            <MI 219a2  CLR.L   D0>                                              {[«20""»]|[-4-]|[$$IOP ENP DRIVER = 16#]|[-4-]}
            <MI 219a4  MOVE.B  (A6-0xb),D0>                                     {[«20""»]|[-4-]|[$$IOP ENP DRIVER = 16#]|[-4-]}
            <MI 219a8  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-4-]|[$$IOP ENP DRIVER = 16#]|[-4-]|[4, 'D0']}
            <Const 0x219aa 0x2.4>                            Δ-4                {[«20""»]|[-4-]|[$$IOP ENP DRIVER = 16#]|[-4-]|[4, 'D0']|[##2]}
        <POP 219ae-219c2 Naked>                              Σ-40 Δ+40  →0x21c2a ←0x219f2
            <Call 0x219ae 0x102e8>                                              {[-40-]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 219b4-219b6 StackAdj>                       Δ+8                {[-32-]}
            <Call 0x219b6 0x102d0>                                              {[-32-]}
                StringCat2(a, b : String) : String
            <POP 219b8-219ba StackAdj>                       Δ+8                {[-24-]}
            <Call 0x219ba 0x103e0>                                              {[-24-]}
                WriteConsoleStringCrLf(str : String)
            <POP 219bc-219be StackAdj>                       Δ+24               {}
            <MI 219be  BRA     0x21c2a>                                         {}
        <POP 219c2-219f2 Naked>                              Σ0 Δ-20    ↓ ←0x2190e
            <Blob 0x219c2 [6] @>                             Δ-6                {[«6""»]}
            <POP 219d2-219d4 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x219d4 5>                                                     {[«6""»]|[$$WRITE]}
            <Call 0x219e2 0x103e0>                                              {[«6""»]|[$$WRITE]}
                WriteConsoleStringCrLf(str : String)
            <POP 219e4-219e6 StackAdj>                       Δ+10               {}
            <Blob 0x219e6 [20] @>                            Δ-20               {[«20""»]}
        <POP 219f2-21a0e Naked>                              Σ-20 Δ-20  →0x219ae ←0x21a0e
            <POP 219f2-219f4 StackAdj>                       Δ-8                {[-28-]}
            <Lit 0x219f4>                                                       {[-24-]|[$$…]}
                <Pointer.sp 0x219f4 8>                       Δ-4        
                <Const 0x219f8 0x1.2>                        Δ-2        
                <Const 0x219fa 0x14.2>                       Δ-2        
                <Call 0x219fc 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 219fe-21a00 StackAdj>                   Δ+8        
            <POP 219fe-21a00 StackAdj>                       Δ-4                {[-24-]|[$$…]|[-4-]}
            <MI 21a00  CLR.L   D0>                                              {[-24-]|[$$…]|[-4-]}
            <MI 21a02  MOVE.W  (A6-0xa),D0>                                     {[-24-]|[$$…]|[-4-]}
            <MI 21a06  MOVE.L  D0,-(A7)>                     Δ-4                {[-24-]|[$$…]|[-4-]|[4, 'D0']}
            <Const 0x21a08 0x4.4>                            Δ-4                {[-24-]|[$$…]|[-4-]|[4, 'D0']|[##4]}
            <MI 21a0c  BRA     0x219ae>                                         {[-24-]|[$$…]|[-4-]|[4, 'D0']|[##4]}
        <POP 21a0e-21a34 Naked>                              Σ0 Δ-20    →0x219f2 ←0x2190e
            <Blob 0x21a0e [4] @>                             Δ-4                {[«4""»]}
            <POP 21a12-21a14 StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x21a14 4>                                                     {[«4""»]|[$$READ]}
            <Call 0x21a22 0x103e0>                                              {[«4""»]|[$$READ]}
                WriteConsoleStringCrLf(str : String)
            <POP 21a24-21a26 StackAdj>                       Δ+8                {}
            <Blob 0x21a26 [20] @>                            Δ-20               {[«20""»]}
            <MI 21a32  BRA     0x219f2>                                         {[«20""»]}
        <POP 21a34-21a44 Naked>                              Σ0 Δ-10    ↓ ←0x2190e
            <Blob 0x21a34 [10] @>                            Δ-10               {[«10""»]}
        <POP 21a44-21a5e Naked>                              Σ-10 Δ+10  →0x21c2a ←0x21bdc
            <POP 21a44-21a46 StackAdj>                       Δ-4                {[-14-]}
            <Lit 0x21a46>                                                       {[-10-]|[$$…]}
                <Pointer.sp 0x21a46 4>                       Δ-4        
                <Const 0x21a4a 0x1.2>                        Δ-2        
                <Const 0x21a4c 0x9.2>                        Δ-2        
                <Call 0x21a50 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 21a52-21a54 StackAdj>                   Δ+8        
            <Call 0x21a54 0x103e0>                                              {[-10-]|[$$…]}
                WriteConsoleStringCrLf(str : String)
            <POP 21a56-21a5a StackAdj>                       Δ+14               {}
            <MI 21a5a  BRA     0x21c2a>                                         {}
        <POP 21a5e-21a90 Naked>                              Σ0         ↓ →0x21b5a ←0x2190e
            <Blob 0x21a5e [6] @>                             Δ-6                {[«6""»]}
            <POP 21a6e-21a70 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x21a70 5>                                                     {[«6""»]|[$$INPUT]}
            <Call 0x21a7e 0x103e0>                                              {[«6""»]|[$$INPUT]}
                WriteConsoleStringCrLf(str : String)
            <POP 21a80-21a82 StackAdj>                       Δ+10               {}
            <MI 21a82  CLR.L   D0>                                              {}
            <MI 21a84  MOVE.B  (A6-0xb),D0>                                     {}
            <MI 21a88  CMPI.W  #0x00ff,D0>                                      {}
            <MI 21a8c  BNE     0x21b5a>                                         {}
        <POP 21a90-21b5a Naked>                              Σ0         →0x21bb2
            <Blob 0x21a90 [18] @>                            Δ-18               {[«18""»]}
            <POP 21a9c-21a9e StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x21a9e 18>                                                    {[«18""»]|[$$Verbose input page]}
            <Call 0x21aac 0x103e0>                                              {[«18""»]|[$$Verbose input page]}
                WriteConsoleStringCrLf(str : String)
            <POP 21aae-21ab2 StackAdj>                       Δ+22               {}
            <MI 21ab2  MOVE.W  (A6-0xa),D0>                                     {}
            <MI 21ab6  LSR.W   #0x8,D0>                                         {}
            <MI 21ab8  ANDI.W  #0x00ff,D0>                                      {}
            <MI 21abc  CLR.L   D1>                                              {}
            <MI 21abe  MOVE.W  D0,D1>                                           {}
            <MI 21ac0  MOVE.L  D1,D7>                                           {}
            <Blob 0x21ac2 [10] @>                            Δ-10               {[«10""»]}
            <POP 21ad2-21ad4 StackAdj>                       Δ-8                {[«10""»]|[-8-]}
            <Lit 0x21ad4 9>                                                     {[«10""»]|[-4-]|[$$Contains_]}
            <MI 21ae0  MOVE.L  D7,(A7)>                                         {[«10""»]|[-4-]|[4, 'D7']}
            <POP 21ade-21ae0 StackAdj>                       Δ-8                {[«10""»]|[-4-]|[4, 'D7']|[-8-]}
            <Call 0x21ae2 0x102e4>                                              {[«10""»]|[-4-]|[4, 'D7']|[-8-]}
                Long2String(a : Long) : String
            <POP 21ae8-21aea StackAdj>                       Δ+4                {[«10""»]|[-4-]|[4, 'D7']|[-4-]}
            <Call 0x21aea 0x102d0>                                              {[«10""»]|[-4-]|[4, 'D7']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21aec-21aee StackAdj>                       Δ+8                {[«10""»]|[-4-]}
            <Call 0x21aee 0x103d8>                                              {[«10""»]|[-4-]}
                WriteConsoleString(str : String)
            <POP 21af4-21af8 StackAdj>                       Δ+14               {}
            <MI 21af8  MOVE.W  (A6-0xa),D0>                                     {}
            <MI 21afc  ANDI.W  #0x00ff,D0>                                      {}
            <MI 21b00  CLR.L   D1>                                              {}
            <MI 21b02  MOVE.W  D0,D1>                                           {}
            <MI 21b04  MOVE.L  D1,D6>                                           {}
            <Blob 0x21b06 [28] @>                            Δ-28               {[«28""»]}
            <Blob 0x21b12 [34] @>                            Δ-34               {[«28""»]|[«34""»]}
            <POP 21b24-21b26 StackAdj>                       Δ-8                {[«28""»]|[«34""»]|[-8-]}
            <Lit 0x21b26 28>                                                    {[«28""»]|[«34""»]|[-4-]|[$$ flow control signal(s) and_]}
            <MI 21b32  MOVE.L  D6,(A7)>                                         {[«28""»]|[«34""»]|[-4-]|[4, 'D6']}
            <POP 21b30-21b32 StackAdj>                       Δ-8                {[«28""»]|[«34""»]|[-4-]|[4, 'D6']|[-8-]}
            <Call 0x21b34 0x102e4>                                              {[«28""»]|[«34""»]|[-4-]|[4, 'D6']|[-8-]}
                Long2String(a : Long) : String
            <Lit 0x21b3a 33>                                                    {[«28""»]|[«34""»]|[-4-]|[4, 'D6']|[-4-]|[$$ input buffer(s) (decimal values)]}
            <Call 0x21b48 0x102d4>                                              {[«28""»]|[«34""»]|[-4-]|[4, 'D6']|[-4-]|[$$ input buffer(s) (decimal values)]}
                StringCat3(a, b, c : String) : String
            <POP 21b4e-21b52 StackAdj>                       Δ+12               {[«28""»]|[«34""»]|[-4-]}
            <Call 0x21b52 0x103e0>                                              {[«28""»]|[«34""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21b54-21b58 StackAdj>                       Δ+66               {}
            <MI 21b58  BRA     0x21bb2>                                         {}
        <POP 21b5a-21bb2 Naked>                              Σ0         ↓ ←0x21a5e
            <Blob 0x21b5a [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21b5e [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x21b62 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <Blob 0x21b66 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
            <POP 21b6a-21b6c StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x21b6c 16>                                                    {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Terse input page]}
            <Call 0x21b7a 0x103e0>                                              {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Terse input page]}
                WriteConsoleStringCrLf(str : String)
            <POP 21b7c-21b80 StackAdj>                       Δ+16               {[«4""»]}
            <POP 21b80-21b81 StackAdj>                       Δ+4                {}
            <Blob 0x21b81 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21b84 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x21b88 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 21b8c-21b8e StackAdj>                       Δ-8                {[«4""»]|[«4""»]|[«4""»]|[-8-]}
            <Lit 0x21b8e 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]}
            <POP 21b9a-21b9c StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]|[-4-]}
            <MI 21b9c  EXTW.L  D0>                                              {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]|[-4-]}
            <MI 21b9e  MOVE.L  D0,-(A7)>                     Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]|[-4-]|[4, 'D0']}
            <Call 0x21ba0 0x102e4>                                              {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 21ba6-21ba8 StackAdj>                       Δ+4                {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]|[-4-]}
            <Call 0x21ba8 0x102d0>                                              {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$For channel_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21baa-21bac StackAdj>                       Δ+8                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Call 0x21bac 0x103e0>                                              {[«4""»]|[«4""»]|[«4""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21bae-21bb2 StackAdj>                       Δ+16               {}
        <POP 21bb2-21bb4 Naked>                              Σ0         →0x21c2a ←0x21a90
            <MI 21bb2  BRA     0x21c2a>                                         {}
        <POP 21bb4-21bd0 Naked>                              Σ0 Δ-20    ↓ ←0x2190e
            <Blob 0x21bb4 [8] @>                             Δ-8                {[«8""»]}
            <POP 21bc4-21bc6 StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Pointer.sp 0x21bc6 4>                           Δ-4                {[«8""»]|[-4-]|[^^4]}
            <Const 0x21bca 0x1.2>                            Δ-2                {[«8""»]|[-4-]|[^^4]|[#1]}
            <Const 0x21bcc 0x7.2>                            Δ-2                {[«8""»]|[-4-]|[^^4]|[#1]|[#7]}
        <POP 21bd0-21bdc Naked>                              Σ-20 Δ+20  →0x21c2a ←0x21bf0
            <Call 0x21bd0 0x102c4>                                              {[-20-]}
                StringLit(Src : Pointer; Offset: W; Len : W) : String
            <POP 21bd2-21bd4 StackAdj>                       Δ+8                {[-12-]}
            <Call 0x21bd4 0x103e0>                                              {[-12-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21bd6-21bda StackAdj>                       Δ+12               {}
            <MI 21bda  BRA     0x21c2a>                                         {}
        <POP 21bdc-21bf0 Naked>                              Σ0 Δ-10    →0x21a44 ←0x2190e
            <Blob 0x21bdc [10] @>                            Δ-10               {[«10""»]}
            <MI 21bec  BRA     0x21a44>                                         {[«10""»]}
        <POP 21bf0-21c06 Naked>                              Σ0 Δ-20    →0x21bd0 ←0x2190e
            <Blob 0x21bf0 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21bf4 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 21bf8-21bfa StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Pointer.sp 0x21bfa 4>                           Δ-4                {[«4""»]|[«4""»]|[-4-]|[^^4]}
            <Const 0x21bfe 0x1.2>                            Δ-2                {[«4""»]|[«4""»]|[-4-]|[^^4]|[#1]}
            <Const 0x21c00 0x8.2>                            Δ-2                {[«4""»]|[«4""»]|[-4-]|[^^4]|[#1]|[#8]}
            <MI 21c04  BRA     0x21bd0>                                         {[«4""»]|[«4""»]|[-4-]|[^^4]|[#1]|[#8]}
        <POP 21c06-21c2a Naked>                              Σ0         ↓ ←0x2190e
            <Blob 0x21c06 [6] @>                             Δ-6                {[«6""»]}
            <POP 21c16-21c18 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x21c18 5>                                                     {[«6""»]|[$$ABORT]}
            <Call 0x21c26 0x103e0>                                              {[«6""»]|[$$ABORT]}
                WriteConsoleStringCrLf(str : String)
            <POP 21c28-21c2a StackAdj>                       Δ+10               {}
        <POP 21c2a-21c32 Epilogue>                           Σ0         ←0x219ae ←0x21a44 ←0x21bb2 ←0x21bd0

0x21c32


@ 21c32
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 21c32-21c90 Body>                                              
        <POP 21c32-21c48 Prologue>                           Σ0         ↓
        <POP 21c48-21c88 Naked>                              Σ0         ↓
            <Blob 0x21c48 [34] @>                            Δ-34               {[«34""»]}
            <MI 21c5a  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[«34""»]|[4, '(A6+0x14)']}
            <MI 21c5e  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[«34""»]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 21c62  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[«34""»]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 21c66  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«34""»]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 21c6a-21c6c StackAdj>                       Δ-4                {[«34""»]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x21c6c 33>                                                    {[«34""»]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[$$IOP=>R1K response, raw header :_ ]}
            <Call 0x21c80 0x21668>                                              {[«34""»]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[$$IOP=>R1K response, raw header :_ ]}
            <POP 21c84-21c88 StackAdj>                       Δ+54               {}
        <POP 21c88-21c90 Epilogue>                           Σ0         

0x21c90


@ 21c90
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x00a 1(r)>
        <LVAR  0x009 1(r)>
        <LVAR  0x008 4(r)>
    <POP 21c90-21cee Body>                                              
        <POP 21c90-21ca6 Prologue>                           Σ0         ↓
        <POP 21ca6-21ce6 Naked>                              Σ0         ↓
            <MI 21ca6  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[4, '(A6+0x14)']}
            <MI 21caa  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 21cae  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 21cb2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x21cb6 0x21c32>                                              {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 21cba-21cbe StackAdj>                       Δ+16               {}
            <MI 21cbe  CLR.L   D0>                                              {}
            <MI 21cc0  MOVE.B  (A6+0x9),D0>                                     {}
            <MI 21cc4  MULU.W  #0x8,D0>                                         {}
            <MI 21cc8  LEA.L   0x2cc13,A0>                                      {}
            <MI 21cce  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 21cd0  CLR.L   D1>                                              {[4, 'A0']}
            <MI 21cd2  MOVE.B  (A6+0xa),D1>                                     {[4, 'A0']}
            <MI 21cd6  NEG.W   D1>                                              {[4, 'A0']}
            <MI 21cd8  ADD.W   D0,D1>                                           {[4, 'A0']}
            <MI 21cda  CLR.L   D0>                                              {[4, 'A0']}
            <MI 21cdc  MOVE.W  D1,D0>                                           {[4, 'A0']}
            <MI 21cde  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D0']}
            <Call 0x21ce0 0x2159a>                                              {[4, 'A0']|[4, 'D0']}
            <POP 21ce4-21ce6 StackAdj>                       Δ+8                {}
        <POP 21ce6-21cee Epilogue>                           Σ0         

0x21cee


@ 21cee
        <LVAR  0x016 4(r)>
        <LVAR  0x012 @ 4(r)>
        <LVAR  0x010 1(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 21cee-21d4e Body>                                              
        <POP 21cee-21d04 Prologue>                           Σ0         ↓
        <POP 21d04-21d36 Naked>                              Σ0         ↓ →0x21d46
            <MI 21d04  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 21d08  MOVEA.L (A6+0xc),A1>                                     {}
            <MI 21d0c  MOVE.L  (A6+0x16),-(A7)>              Δ-4                {[4, '(A6+0x16)']}
            <Const 0x21d10 0x0.4>                            Δ-4                {[4, '(A6+0x16)']|[##0]}
            <MI 21d14  MOVE.L  (A6+0x12),-(A7)>              Δ-4                {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']}
            <MI 21d18  PEA.L   (A0)>                         Δ-4                {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']|[4, '^(A0)']}
            <MI 21d1a  PEA.L   (A1)>                         Δ-4                {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']|[4, '^(A0)']|[4, '^(A1)']}
            <Call 0x21d1c 0x2befa>                                              {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']|[4, '^(A0)']|[4, '^(A1)']}
            <POP 21d22-21d26 StackAdj>                       Δ+20               {}
            <Pointer.fp 0x21d26 <LVAR  0x012 @ 4(r)>>        Δ-4                {[@@18]}
            <Call 0x21d2a 0x102bc>                                              {[@@18]}
                FreeString(VAR a : String)
            <POP 21d30-21d32 StackAdj>                       Δ+4                {}
            <MI 21d32  TST.B   (A1)>                                            {}
            <MI 21d34  BEQ     0x21d46>                                         {}
        <POP 21d36-21d3c Naked>                              Σ0         ↓ →0x21d46
            <MI 21d36  TST.B   (A6+0x10)>                                       {}
            <MI 21d3a  BNE     0x21d46>                                         {}
        <POP 21d3c-21d46 Naked>                              Σ0         ↓
            <MI 21d3c  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x21d3e 0x102bc>                                              {[4, '^(A0)']}
                FreeString(VAR a : String)
            <POP 21d44-21d46 StackAdj>                       Δ+4                {}
        <POP 21d46-21d4e Epilogue>                           Σ0         ←0x21d04 ←0x21d36

0x21d4e


@ 21d4e
        <LVAR  0x00c 1(rw)>
        <LVAR  0x008 4(r)>
    <POP 21d4e-21d90 Body>                                              
        <POP 21d4e-21d64 Prologue>                           Σ0         ↓
        <POP 21d64-21d84 Naked>                              Σ0         ↓ →0x21d88
            <MI 21d64  CLR.B   (A6+0xc)>                                        {}
            <MI 21d68  MOVE.L  (A6+0x8),D0>                                     {}
            <POP 0x21d6c LimitCheck 0x0 ≤ D0 ≤ 0x1ff>                           {}
            <MI 21d76  ASL.L   #0x1,D0>                                         {}
            <MI 21d78  LEA.L   0x2c794,A0>                                      {}
            <MI 21d7e  TST.W   (A0+D0.L+#0x7e)>                                 {}
            <MI 21d82  BNE     0x21d88>                                         {}
        <POP 21d84-21d88 Naked>                              Σ0         ↓
            <MI 21d84  ADDQ.B  #0x1,(A6+0xc)>                                   {}
        <POP 21d88-21d90 Epilogue>                           Σ0         ←0x21d64

0x21d90


@ 21d90
        <LVAR -0x00a @ 4(rw)>
        <LVAR -0x00e @ 4(r)>
        <LVAR -0x018 4(rw)>
    <POP 21d90-21fbc Body>                                   Δ+8        
        <POP 21d90-21da6 Prologue>                           Σ0         ↓
        <POP 21da6-21db8 RegCacheLoad>                       Σ0         ↓
        <POP 21db8-21dc6 Naked>                              Σ0         ↓
            <MI 21db8  MOVEQ.L #0x00,D5>                                        {}
            <Pointer.fp 0x21dba <LVAR -0x00e @ 4(r)>>        Δ-4                {[@@-14]}
            <Call 0x21dbc 0x102b8>                                              {[@@-14]}
                NewString(VAR a : String)
            <POP 21dc2-21dc4 StackAdj>                       Δ+4                {}
            <MI 21dc4  MOVEQ.L #0x00,D0>                                        {}
        <POP 21dc6-21de2 Naked>                              Σ0 Δ-6     ↓ →0x21dea ←0x21f60
            <MI 21dc6  MOVE.W  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <MI 21dc8  CLR.L   D1>                                              {[2, 'D0']}
            <MI 21dca  MOVE.W  D0,D1>                                           {[2, 'D0']}
            <MI 21dcc  ASL.L   #0x3,D1>                                         {[2, 'D0']}
            <MI 21dce  MOVE.L  D1,(A6-0x18)>                                    {[2, 'D0']}
            <Pointer.fp 0x21dd0 <LVAR -0x00a @ 4(rw)>>       Δ-4                {[2, 'D0']|[@@-10]}
            <Call 0x21dd2 0x102b8>                                              {[2, 'D0']|[@@-10]}
                NewString(VAR a : String)
            <MI 21dd8  MOVE.L  D1,(A7)>                                         {[2, 'D0']|[4, 'D1']}
            <MI 21dda  ADDQ.L  #0x7,(A7)>                                       {[2, 'D0']|[-4-]}
            <MI 21ddc  MOVE.L  D1,D6>                                           {[2, 'D0']|[-4-]}
            <MI 21dde  CMP.L   (A7),D6>                                         {[2, 'D0']|[-4-]}
            <MI 21de0  BHI     0x21dea>                                         {[2, 'D0']|[-4-]}
        <POP 21de2-21de8 Naked>                              Σ-6        →0x21dea
            <MI 21de2  MOVE.L  (A7),D1>                                         {[-6-]}
            <MI 21de4  CMP.L   D1,D6>                                           {[-6-]}
            <MI 21de6  BLT     0x21dea>                                         {[-6-]}
        <POP 21de8-21dea Naked>                              Σ0         
            <MI 21de8  TRAP    #15>                                             {}
        <POP 21dea-21df0 Naked>                              Σ-6        ↓ →0x21e34 ←0x21dc6 ←0x21de2 ←0x21df0
            <MI 21dea  CMP.W   (A7+0x2),D6>                                     {[-6-]}
            <MI 21dee  BHI     0x21e34>                                         {[-6-]}
        <POP 21df0-21e34 Naked>                              Σ-6        ↓ →0x21dea
            <POP 21df0-21df2 StackAdj>                       Δ-4                {[-10-]}
            <MI 21df2  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-10-]|[4, '(A6-0xa)']}
            <POP 21df4-21df6 StackAdj>                       Δ-4                {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <POP 0x21df6 LimitCheck 0x0 ≤ D6 ≤ 0x1ff>                           {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21dfa  CLR.L   D0>                                              {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21dfc  MOVE.W  D6,D0>                                           {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21dfe  ASL.L   #0x1,D0>                                         {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21e00  LEA.L   0x2c794,A0>                                      {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21e06  CLR.L   D1>                                              {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21e08  MOVE.W  (A0+D0.L+#0x7e),D1>                              {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <MI 21e0c  MOVE.L  D1,-(A7)>                     Δ-4                {[-10-]|[4, '(A6-0xa)']|[-4-]|[4, 'D1']}
            <Const 0x21e0e 0x4.4>                            Δ-4                {[-10-]|[4, '(A6-0xa)']|[-4-]|[4, 'D1']|[##4]}
            <Call 0x21e12 0x102e8>                                              {[-10-]|[4, '(A6-0xa)']|[-4-]|[4, 'D1']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 21e18-21e1a StackAdj>                       Δ+8                {[-10-]|[4, '(A6-0xa)']|[-4-]}
            <Call 0x21e1a 0x102d0>                                              {[-10-]|[4, '(A6-0xa)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21e20-21e22 StackAdj>                       Δ+8                {[-10-]}
            <MI 21e22  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {[-6-]}
            <MI 21e24  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-6-]|[4, '(A6-0xa)']}
            <Const 0x21e26 0x20.2>                           Δ-2                {[-6-]|[4, '(A6-0xa)']|[#32]}
            <Call 0x21e28 0x102c0>                                              {[-6-]|[4, '(A6-0xa)']|[#32]}
                AppendChar(MOD b : String; a : char)
            <POP 21e2e-21e30 StackAdj>                       Δ+6                {[-6-]}
            <MI 21e30  ADDQ.W  #0x1,D6>                                         {[-6-]}
            <MI 21e32  BCC     0x21dea>                                         {[-6-]}
        <POP 21e34-21e46 Naked>                              Σ-6 Δ+4    ↓ →0x21e54 ←0x21dea
            <POP 21e34-21e36 StackAdj>                       Δ+2                {[-4-]}
            <MI 21e36  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0xe)']}
            <MI 21e38  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']}
            <Call 0x21e3a 0x102c8>                                              {[-4-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']}
                StringEqual(a, b : String) : Byte
            <POP 21e40-21e42 StackAdj>                       Δ+8                {[-4-]}
            <MI 21e42  TST.B   (A7)+>                        Δ+2                {[-2-]}
            <MI 21e44  BEQ     0x21e54>                                         {[-2-]}
        <POP 21e46-21e54 Naked>                              Σ-2 Δ-4    →0x21f52
            <MI 21e46  ADDQ.L  #0x1,D5>                                         {[-2-]}
            <Pointer.fp 0x21e48 <LVAR -0x00a @ 4(rw)>>       Δ-4                {[-2-]|[@@-10]}
            <Call 0x21e4a 0x102bc>                                              {[-2-]|[@@-10]}
                FreeString(VAR a : String)
            <MI 21e50  BRA     0x21f52>                                         {[-2-]|[@@-10]}
        <POP 21e54-21e58 Naked>                              Σ-2        ↓ →0x21e96 ←0x21e34
            <MI 21e54  TST.L   D5>                                              {[-2-]}
            <MI 21e56  BEQ     0x21e96>                                         {[-2-]}
        <POP 21e58-21e96 Naked>                              Σ-2        ↓
            <Blob 0x21e58 [22] @>                            Δ-22               {[-2-]|[«22""»]}
            <POP 21e68-21e6a StackAdj>                       Δ-8                {[-2-]|[«22""»]|[-8-]}
            <MI 21e6a  MOVE.L  D5,-(A7)>                     Δ-4                {[-2-]|[«22""»]|[-8-]|[4, 'D5']}
            <Call 0x21e6c 0x102e4>                                              {[-2-]|[«22""»]|[-8-]|[4, 'D5']}
                Long2String(a : Long) : String
            <Lit 0x21e72 21>                                                    {[-2-]|[«22""»]|[-8-]|[$$ lines same as above.]}
            <Call 0x21e84 0x102d0>                                              {[-2-]|[«22""»]|[-8-]|[$$ lines same as above.]}
                StringCat2(a, b : String) : String
            <POP 21e8a-21e8c StackAdj>                       Δ+8                {[-2-]|[«22""»]|[-4-]}
            <Call 0x21e8c 0x103e0>                                              {[-2-]|[«22""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21e92-21e96 StackAdj>                       Δ+26               {[-2-]}
        <POP 21e96-21ef4 Naked>                              Σ-2        ↓ ←0x21e54
            <MI 21e96  MOVEQ.L #0x00,D5>                                        {[-2-]}
            <MI 21e98  MOVEA.L (A6-0xe),A0>                                     {[-2-]}
            <MI 21e9a  MOVEA.L (A6-0xa),A1>                                     {[-2-]}
            <BlockMove 128,A1,A0>                                               {[-2-]}
            <Blob 0x21ea4 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <Blob 0x21ea8 [4] @>                             Δ-4                {[-2-]|[«2""»]|[«4""»]}
            <POP 21eac-21eae StackAdj>                       Δ-8                {[-2-]|[«2""»]|[«4""»]|[-8-]}
            <MI 21eae  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[-2-]|[«2""»]|[«4""»]|[-8-]|[4, '(A6-0x18)']}
            <Const 0x21eb0 0x4.4>                            Δ-4                {[-2-]|[«2""»]|[«4""»]|[-8-]|[4, '(A6-0x18)']|[##4]}
            <Call 0x21eb4 0x102e8>                                              {[-2-]|[«2""»]|[«4""»]|[-8-]|[4, '(A6-0x18)']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 21eba-21ebc StackAdj>                       Δ+4                {[-2-]|[«2""»]|[«4""»]|[-8-]|[4, '(A6-0x18)']}
            <Lit 0x21ebc 2>                                                     {[-2-]|[«2""»]|[«4""»]|[-8-]|[$$:_]}
            <POP 21ecc-21ece StackAdj>                       Δ-4                {[-2-]|[«2""»]|[«4""»]|[-8-]|[$$:_]|[-4-]}
            <MI 21ece  MOVE.L  (A6-0xa),(A7)>                                   {[-2-]|[«2""»]|[«4""»]|[-8-]|[$$:_]|[4, '(A6-0xa)']}
            <POP 21ed0-21ed2 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[«4""»]|[-8-]|[$$:_]|[4, '(A6-0xa)']|[-4-]}
            <Lit 0x21ed2 4>                                                     {[-2-]|[«2""»]|[«4""»]|[-8-]|[$$:_]|[4, '(A6-0xa)']|[$$____]}
            <Call 0x21ee4 0x102d8>                                              {[-2-]|[«2""»]|[«4""»]|[-8-]|[$$:_]|[4, '(A6-0xa)']|[$$____]}
                StringCat4(a, b, c, d : String) : String
            <POP 21eea-21eee StackAdj>                       Δ+16               {[-2-]|[«2""»]|[«4""»]|[-4-]}
            <MI 21eee  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {[-2-]|[«2""»]|[«4""»]}
            <POP 21ef0-21ef2 StackAdj>                       Δ+6                {[-2-]}
            <MI 21ef2  MOVEQ.L #0x00,D6>                                        {[-2-]}
        <POP 21ef4-21f1a Naked>                              Σ-2        ↓ →0x21f1c ←0x21f3a
            <MI 21ef4  MOVE.W  D6,D0>                                           {[-2-]}
            <MI 21ef6  LSR.W   #0x1,D0>                                         {[-2-]}
            <MI 21ef8  CLR.L   D1>                                              {[-2-]}
            <MI 21efa  MOVE.W  D0,D1>                                           {[-2-]}
            <MI 21efc  ADD.L   (A6-0x18),D1>                                    {[-2-]}
            <POP 0x21efe LimitCheck 0x0 ≤ D1 ≤ 0x1ff>                           {[-2-]}
            <MI 21f08  ASL.L   #0x1,D1>                                         {[-2-]}
            <MI 21f0a  LEA.L   0x2c794,A0>                                      {[-2-]}
            <MI 21f10  MOVE.W  (A0+D1.L+#0x7e),D7>                              {[-2-]}
            <MI 21f14  MOVE.W  D6,D0>                                           {[-2-]}
            <MI 21f16  AND.W   #0x01,D0>                                        {[-2-]}
            <MI 21f18  BNE     0x21f1c>                                         {[-2-]}
        <POP 21f1a-21f1c Naked>                              Σ-2        ↓
            <MI 21f1a  LSR.W   #0x8,D7>                                         {[-2-]}
        <POP 21f1c-21f24 Naked>                              Σ-2        ↓ →0x21f2a ←0x21ef4
            <MI 21f1c  ANDI.W  #0x00ff,D7>                                      {[-2-]}
            <MI 21f20  CMP.W   #0x20,D7>                                        {[-2-]}
            <MI 21f22  BCS     0x21f2a>                                         {[-2-]}
        <POP 21f24-21f2a Naked>                              Σ-2        ↓ →0x21f32
            <MI 21f24  CMPI.W  #0x007e,D7>                                      {[-2-]}
            <MI 21f28  BLS     0x21f32>                                         {[-2-]}
        <POP 21f2a-21f32 Naked>                              Σ-2 Δ-6    →0x21f3a ←0x21f1c
            <MI 21f2a  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0xa)']}
            <Const 0x21f2c 0x2e.2>                           Δ-2                {[-2-]|[4, '(A6-0xa)']|[#46]}
            <MI 21f30  BRA     0x21f3a>                                         {[-2-]|[4, '(A6-0xa)']|[#46]}
        <POP 21f32-21f3a Naked>                              Σ-2 Δ-6    ↓ ←0x21f24
            <MI 21f32  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0xa)']}
            <POP 0x21f34 LimitCheck 0x0 ≤ D7 ≤ 0xff>                            {[-2-]|[4, '(A6-0xa)']}
            <MI 21f38  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[4, '(A6-0xa)']|[2, 'D7']}
        <POP 21f3a-21f4a Naked>                              Σ-8 Δ+6    ↓ →0x21ef4 ←0x21f2a
            <Call 0x21f3a 0x102c0>                                              {[-8-]}
                AppendChar(MOD b : String; a : char)
            <POP 21f40-21f42 StackAdj>                       Δ+6                {[-2-]}
            <MI 21f42  ADDQ.W  #0x1,D6>                                         {[-2-]}
            <MI 21f44  CMPI.W  #0x000f,D6>                                      {[-2-]}
            <MI 21f48  BLS     0x21ef4>                                         {[-2-]}
        <POP 21f4a-21f52 Naked>                              Σ-2 Δ-4    ↓
            <MI 21f4a  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0xa)']}
            <Call 0x21f4c 0x103e0>                                              {[-2-]|[4, '(A6-0xa)']}
                WriteConsoleStringCrLf(str : String)
        <POP 21f52-21f60 Naked>                              Σ-6 Δ+4    ↓ →0x21f66 ←0x21e46
            <POP 21f52-21f54 StackAdj>                       Δ+4                {[-2-]}
            <MI 21f54  ADDQ.L  #0x8,(A6-0x18)>                                  {[-2-]}
            <MI 21f56  MOVE.W  (A7),D0>                                         {[-2-]}
            <MI 21f58  ADDQ.W  #0x1,D0>                                         {[-2-]}
            <MI 21f5a  CMPI.W  #0x003f,D0>                                      {[-2-]}
            <MI 21f5e  BHI     0x21f66>                                         {[-2-]}
        <POP 21f60-21f66 Naked>                              Σ-2 Δ+2    →0x21dc6
            <POP 21f60-21f62 StackAdj>                       Δ+2                {}
            <MI 21f62  BRA     0x21dc6>                                         {}
        <POP 21f66-21f6c Naked>                              Σ-2 Δ+2    ↓ →0x21faa ←0x21f52
            <POP 21f66-21f68 StackAdj>                       Δ+2                {}
            <MI 21f68  TST.L   D5>                                              {}
            <MI 21f6a  BEQ     0x21faa>                                         {}
        <POP 21f6c-21faa Naked>                              Σ0         ↓
            <Blob 0x21f6c [22] @>                            Δ-22               {[«22""»]}
            <POP 21f7c-21f7e StackAdj>                       Δ-8                {[«22""»]|[-8-]}
            <MI 21f7e  MOVE.L  D5,-(A7)>                     Δ-4                {[«22""»]|[-8-]|[4, 'D5']}
            <Call 0x21f80 0x102e4>                                              {[«22""»]|[-8-]|[4, 'D5']}
                Long2String(a : Long) : String
            <Lit 0x21f86 21>                                                    {[«22""»]|[-8-]|[$$ lines same as above.]}
            <Call 0x21f98 0x102d0>                                              {[«22""»]|[-8-]|[$$ lines same as above.]}
                StringCat2(a, b : String) : String
            <POP 21f9e-21fa0 StackAdj>                       Δ+8                {[«22""»]|[-4-]}
            <Call 0x21fa0 0x103e0>                                              {[«22""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21fa6-21faa StackAdj>                       Δ+26               {}
        <POP 21faa-21fb4 Naked>                              Σ0         ↓ ←0x21f66
            <Pointer.fp 0x21faa <LVAR -0x00e @ 4(r)>>        Δ-4                {[@@-14]}
            <Call 0x21fac 0x102bc>                                              {[@@-14]}
                FreeString(VAR a : String)
            <POP 21fb2-21fb4 StackAdj>                       Δ+4                {}
        <POP 21fb4-21fbc Epilogue>                           Σ0         

0x21fbc


@ 21fbc
        <LVAR  0x008 4(r)>
    <POP 21fbc-220f8 Body>                                              
        <POP 21fbc-21fd2 Prologue>                           Σ0         ↓
        <POP 21fd2-21ff4 RegCacheLoad>                       Σ0         ↓
        <POP 21ff4-2200e Naked>                              Σ0         ↓ →0x2201c
            <MI 21ff4  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 21ff8  MOVE.L  (A0),D0>                                         {}
            <POP 0x21ffa LimitCheck 0x0 ≤ D0 ≤ 0x1ff>                           {}
            <MI 22000  ASL.L   #0x1,D0>                                         {}
            <MI 22002  LEA.L   0x2c794,A1>                                      {}
            <MI 22004  MOVE.W  (A1+D0.L+#0x7e),D0>                              {}
            <MI 22008  CMPI.W  #0x003a,D0>                                      {}
            <MI 2200c  BEQ     0x2201c>                                         {}
        <POP 2200e-2201c Naked>                              Σ0         ↓
            <Call 0x2200e 0x21d90>                                              {}
            <Const 0x22012 0x1.4>                            Δ-4                {[##1]}
            <Call 0x22016 0x2132c>                                              {[##1]}
            <POP 2201a-2201c StackAdj>                       Δ+4                {}
        <POP 2201c-22034 Naked>                              Σ0         ↓ →0x22042 ←0x21ff4
            <MI 2201c  MOVE.L  (A0),D0>                                         {}
            <MI 2201e  ADDQ.L  #0x4,D0>                                         {}
            <POP 0x22020 LimitCheck 0x0 ≤ D0 ≤ 0x1ff>                           {}
            <MI 22026  ASL.L   #0x1,D0>                                         {}
            <MI 22028  LEA.L   0x2c794,A1>                                      {}
            <MI 2202a  MOVE.W  (A1+D0.L+#0x7e),D0>                              {}
            <MI 2202e  CMPI.W  #0x6400,D0>                                      {}
            <MI 22032  BEQ     0x22042>                                         {}
        <POP 22034-22042 Naked>                              Σ0         ↓
            <Call 0x22034 0x21d90>                                              {}
            <Const 0x22038 0x2.4>                            Δ-4                {[##2]}
            <Call 0x2203c 0x2132c>                                              {[##2]}
            <POP 22040-22042 StackAdj>                       Δ+4                {}
        <POP 22042-22050 Naked>                              Σ0         ↓ →0x220e6 ←0x2201c
            <MI 22042  MOVE.B  0x2d02c,D0>                                      {}
            <MI 22048  CMPI.B  #0x02,D0>                                        {}
            <MI 2204c  BGT     0x220e6>                                         {}
        <POP 22050-22054 Naked>                              Σ0         ↓ →0x22080
            <MI 22050  TST.B   0x2c7f0>                                         {}
            <MI 22052  BNE     0x22080>                                         {}
        <POP 22054-22080 Naked>                              Σ0         ↓
            <MI 22054  MOVE.B  #0x01,0x2c7f0>                                   {}
            <Blob 0x22056 [14] @>                            Δ-14               {[«14""»]}
            <POP 22062-22064 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x22064 14>                                                    {[«14""»]|[$$NET_PRINTF =>_]}
            <Call 0x22076 0x103d8>                                              {[«14""»]|[$$NET_PRINTF =>_]}
                WriteConsoleString(str : String)
            <POP 2207c-22080 StackAdj>                       Δ+18               {}
        <POP 22080-2208e Naked>                              Σ0 Δ-4     ↓ ←0x22050
            <MI 22080  MOVE.L  (A0),D0>                                         {}
            <MI 22082  ADDQ.L  #0x6,D0>                                         {}
            <MI 22084  MOVE.L  (A0),-(A7)>                   Δ-4                {[4, '(A0)']}
            <MI 22086  ADDI.L  #0x0000001d,(A7)>                                {[-4-]}
            <MI 2208c  MOVE.L  D0,D7>                                           {[-4-]}
        <POP 2208e-22092 Naked>                              Σ-4        ↓ →0x220e4 ←0x220e0
            <MI 2208e  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 22090  BGT     0x220e4>                                         {[-4-]}
        <POP 22092-220b8 Naked>                              Σ-4        ↓ →0x220c0
            <POP 0x22092 LimitCheck 0x0 ≤ D7 ≤ 0x1ff>                           {[-4-]}
            <MI 22098  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 2209a  ASL.L   #0x1,D0>                                         {[-4-]}
            <MI 2209c  LEA.L   0x2c794,A0>                                      {[-4-]}
            <MI 2209e  MOVE.W  (A0+D0.L+#0x7e),D1>                              {[-4-]}
            <MI 220a2  LSR.W   #0x8,D1>                                         {[-4-]}
            <MI 220a4  AND.W   #0xff,D1>                                        {[-4-]}
            <MI 220a6  MOVE.B  D1,-(A7)>                     Δ-2                {[-4-]|[2, 'D1']}
            <Call 0x220a8 0x103d0>                                              {[-4-]|[2, 'D1']}
                WriteConsoleChar(chr : char)
            <POP 220aa-220ac StackAdj>                       Δ+2                {[-4-]}
            <MI 220ac  MOVE.W  (A0+D0.L+#0x7e),D1>                              {[-4-]}
            <MI 220b0  LSR.W   #0x8,D1>                                         {[-4-]}
            <MI 220b2  AND.W   #0xff,D1>                                        {[-4-]}
            <MI 220b4  CMP.W   #0x0a,D1>                                        {[-4-]}
            <MI 220b6  BNE     0x220c0>                                         {[-4-]}
        <POP 220b8-220c0 Naked>                              Σ-4        ↓
            <Const 0x220b8 0xd.2>                            Δ-2                {[-4-]|[#13]}
            <Call 0x220ba 0x103d0>                                              {[-4-]|[#13]}
                WriteConsoleChar(chr : char)
            <POP 220bc-220be StackAdj>                       Δ+2                {[-4-]}
            <MI 220be  CLR.B   0x2c7f0>                                         {[-4-]}
        <POP 220c0-220d8 Naked>                              Σ-4        ↓ →0x220e0 ←0x22092
            <MI 220c0  MOVE.W  (A0+D0.L+#0x7e),D1>                              {[-4-]}
            <MI 220c4  AND.W   #0xff,D1>                                        {[-4-]}
            <POP 0x220c6 LimitCheck 0x0 ≤ D1 ≤ 0xff>                            {[-4-]}
            <MI 220c8  MOVE.B  D1,-(A7)>                     Δ-2                {[-4-]|[2, 'D1']}
            <Call 0x220ca 0x103d0>                                              {[-4-]|[2, 'D1']}
                WriteConsoleChar(chr : char)
            <POP 220cc-220ce StackAdj>                       Δ+2                {[-4-]}
            <MI 220ce  MOVE.W  (A0+D0.L+#0x7e),D0>                              {[-4-]}
            <MI 220d2  AND.W   #0xff,D0>                                        {[-4-]}
            <MI 220d4  CMP.W   #0x0a,D0>                                        {[-4-]}
            <MI 220d6  BNE     0x220e0>                                         {[-4-]}
        <POP 220d8-220e0 Naked>                              Σ-4        ↓
            <Const 0x220d8 0xd.2>                            Δ-2                {[-4-]|[#13]}
            <Call 0x220da 0x103d0>                                              {[-4-]|[#13]}
                WriteConsoleChar(chr : char)
            <POP 220dc-220de StackAdj>                       Δ+2                {[-4-]}
            <MI 220de  CLR.B   0x2c7f0>                                         {[-4-]}
        <POP 220e0-220e4 Naked>                              Σ-4        ↓ →0x2208e ←0x220c0
            <MI 220e0  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 220e2  BVC     0x2208e>                                         {[-4-]}
        <POP 220e4-220e6 Naked>                              Σ-4 Δ+4    ↓ ←0x2208e
            <POP 220e4-220e6 StackAdj>                       Δ+4                {}
        <POP 220e6-220f0 Naked>                              Σ0         ↓ ←0x22042
            <MI 220e6  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 220ea  ADDI.L  #0x0000001e,(A0)>                                {}
        <POP 220f0-220f8 Epilogue>                           Σ0         

0x220f8


@ 220f8
        <LVAR -0x008 @ 4(r)>
    <POP 220f8-2214a Body>                                              
        <POP 220f8-2210e Prologue>                           Σ0         ↓
        <POP 2210e-22112 RegCacheLoad>                       Σ0         ↓
        <POP 22112-22114 Naked>                              Σ0         ↓
            <MI 22112  CLR.L   (A6-0x8)>                                        {}
        <POP 22114-2212e Naked>                              Σ0         ↓ →0x22142 ←0x22138
            <MI 22114  MOVE.L  (A6-0x8),D0>                                     {}
            <POP 0x22116 LimitCheck 0x0 ≤ D0 ≤ 0x1ff>                           {}
            <MI 22120  ASL.L   #0x1,D0>                                         {}
            <MI 22122  LEA.L   0x2c794,A0>                                      {}
            <MI 22128  TST.W   (A0+D0.L+#0x7e)>                                 {}
            <MI 2212c  BEQ     0x22142>                                         {}
        <POP 2212e-22138 Naked>                              Σ0         ↓ →0x22142
            <MI 2212e  MOVE.L  (A6-0x8),D0>                                     {}
            <MI 22130  CMPI.L  #0x000001ff,D0>                                  {}
            <MI 22136  BGE     0x22142>                                         {}
        <POP 22138-22142 Naked>                              Σ0         →0x22114
            <Pointer.fp 0x22138 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Call 0x2213a 0x21fbc>                                              {[@@-8]}
            <POP 2213e-22140 StackAdj>                       Δ+4                {}
            <MI 22140  BRA     0x22114>                                         {}
        <POP 22142-2214a Epilogue>                           Σ0         ←0x22114 ←0x2212e

0x2214a


@ 2214a
        <LVAR -0x006 @>
        <LVAR -0x008 @ 1(r)>
    <POP 2214a-22238 Body>                                              
        <POP 2214a-22160 Prologue>                           Σ0         ↓
        <POP 22160-22174 RegCacheLoad>                       Σ0         ↓
        <POP 22174-221d6 Naked>                              Σ0         ↓ →0x22230
            <MI 22174  MOVE.B  #0x01,0x2e196>                                   {}
            <Const 0x22178 0x400.4>                          Δ-4                {[##1024]}
            <MI 2217c  LEA.L   0x2d028,A0>                                      {[##1024]}
            <MI 22182  MOVE.L  A0,-(A7)>                     Δ-4                {[##1024]|[4, 'A0']}
            <Const 0x22184 0x4.2>                            Δ-2                {[##1024]|[4, 'A0']|[#4]}
            <Call 0x22186 0x10238>                                              {[##1024]|[4, 'A0']|[#4]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 22188-2218a StackAdj>                       Δ+10               {}
            <Const 0x2218a 0x404.4>                          Δ-4                {[##1028]}
            <MI 2218e  LEA.L   0x2d432,A0>                                      {[##1028]}
            <MI 22194  MOVE.L  A0,-(A7)>                     Δ-4                {[##1028]|[4, 'A0']}
            <Const 0x22196 0x2.2>                            Δ-2                {[##1028]|[4, 'A0']|[#2]}
            <Call 0x22198 0x10238>                                              {[##1028]|[4, 'A0']|[#2]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2219a-2219c StackAdj>                       Δ+10               {}
            <Const 0x2219c 0x406.4>                          Δ-4                {[##1030]}
            <MI 221a0  LEA.L   0x2d438,A0>                                      {[##1030]}
            <MI 221a6  MOVE.L  A0,-(A7)>                     Δ-4                {[##1030]|[4, 'A0']}
            <Const 0x221a8 0x2.2>                            Δ-2                {[##1030]|[4, 'A0']|[#2]}
            <Call 0x221aa 0x10238>                                              {[##1030]|[4, 'A0']|[#2]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 221ac-221ae StackAdj>                       Δ+10               {}
            <Const 0x221ae 0x408.4>                          Δ-4                {[##1032]}
            <MI 221b2  LEA.L   0x2d434,A0>                                      {[##1032]}
            <MI 221b8  MOVE.L  A0,-(A7)>                     Δ-4                {[##1032]|[4, 'A0']}
            <Const 0x221ba 0x4.2>                            Δ-2                {[##1032]|[4, 'A0']|[#4]}
            <Call 0x221bc 0x10238>                                              {[##1032]|[4, 'A0']|[#4]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 221be-221c0 StackAdj>                       Δ+10               {}
            <Const 0x221c0 0x40c.4>                          Δ-4                {[##1036]}
            <MI 221c4  LEA.L   0x2d42e,A0>                                      {[##1036]}
            <MI 221ca  MOVE.L  A0,-(A7)>                     Δ-4                {[##1036]|[4, 'A0']}
            <Const 0x221cc 0x4.2>                            Δ-2                {[##1036]|[4, 'A0']|[#4]}
            <Call 0x221ce 0x10238>                                              {[##1036]|[4, 'A0']|[#4]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 221d0-221d2 StackAdj>                       Δ+10               {}
            <MI 221d2  TST.B   0x2e196>                                         {}
            <MI 221d4  BEQ     0x22230>                                         {}
        <POP 221d6-221d8 Naked>                              Σ0         ↓
            <MI 221d6  MOVEQ.L #0x00,D7>                                        {}
        <POP 221d8-22218 Naked>                              Σ0         ↓ →0x221d8 ←0x221d8
            <POP 0x221d8 LimitCheck 0x0 ≤ D7 ≤ 0x3>                             {}
            <MI 221de  MOVE.L  D7,D4>                                           {}
            <MI 221e0  MOVEQ.L #0x34,D3>                                        {}
            <Call 0x221e2 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 221e8  LEA.L   0x2c794,A0>                                      {}
            <MI 221ee  LEA.L   (A0+D4.L),A0>                                    {}
            <MI 221f2  CLR.B   (A0+0x192e)>                                     {}
            <MI 221f6  CLR.B   (A0+0x192f)>                                     {}
            <MI 221fa  CLR.B   (A0+0x1930)>                                     {}
            <MI 221fe  CLR.W   (A0+0x1932)>                                     {}
            <MI 22202  CLR.W   (A0+0x1934)>                                     {}
            <MI 22206  CLR.L   (A0+0x1936)>                                     {}
            <MI 2220a  CLR.L   (A0+0x193a)>                                     {}
            <MI 2220e  CLR.L   (A0+0x193e)>                                     {}
            <MI 22212  ADDQ.L  #0x1,D7>                                         {}
            <MI 22214  CMP.L   #0x03,D7>                                        {}
            <MI 22216  BLE     0x221d8>                                         {}
        <POP 22218-22230 Naked>                              Σ0         ↓ →0x22218 ←0x22218
            <MI 22218  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Pointer.fp 0x2221a <LVAR -0x008 @ 1(r)>>        Δ-4                {[#0]|[@@-8]}
            <Pointer.fp 0x2221e <LVAR -0x006 @>>             Δ-4                {[#0]|[@@-8]|[@@-6]}
            <Call 0x22222 0x10232>                                              {[#0]|[@@-8]|[@@-6]}
                KERNCALL_19
            <POP 22228-2222a StackAdj>                       Δ+10               {}
            <MI 2222a  TST.B   (A6-0x8)>                                        {}
            <MI 2222e  BNE     0x22218>                                         {}
        <POP 22230-22238 Epilogue>                           Σ0         ←0x22174

0x22238


@ 22238
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 @ 4(r)>
    <POP 22238-2227a Body>                                   Δ+4        
        <POP 22238-2224e Prologue>                           Σ0         ↓
        <POP 2224e-2225a Naked>                              Σ0         ↓ →0x22266
            <MI 2224e  MOVE.B  (A6+0xc),D0>                                     {}
            <MI 22252  CMP.B   0x2d02c,D0>                                      {}
            <MI 22258  BLT     0x22266>                                         {}
        <POP 2225a-22266 Naked>                              Σ0 Δ-4     →0x22270
            <MI 2225a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x2225e 0x103e0>                                              {[4, '(A6+0x8)']}
                WriteConsoleStringCrLf(str : String)
            <MI 22264  BRA     0x22270>                                         {[4, '(A6+0x8)']}
        <POP 22266-22270 Naked>                              Σ0 Δ-4     ↓ ←0x2224e
            <Pointer.fp 0x22266 <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Call 0x2226a 0x102bc>                                              {[@@8]}
                FreeString(VAR a : String)
        <POP 22270-22272 Naked>                              Σ-4 Δ+4    ↓ ←0x2225a
            <POP 22270-22272 StackAdj>                       Δ+4                {}
        <POP 22272-2227a Epilogue>                           Σ0         

0x2227a


@ 2227a
        <LVAR -0x002 @ 2(r)>
        <LVAR -0x004 @ 1(r)>
    <POP 2227a-2234c Body>                                              
        <POP 2227a-22290 Prologue>                           Σ0         ↓
        <POP 22290-22294 RegCacheLoad>                       Σ0         ↓
        <POP 22294-222ac Naked>                              Σ0         ↓ →0x22338 ←0x22338
            <MI 22294  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Pointer.fp 0x22296 <LVAR -0x004 @ 1(r)>>        Δ-4                {[#0]|[@@-4]}
            <Pointer.fp 0x22298 <LVAR -0x002 @ 2(r)>>        Δ-4                {[#0]|[@@-4]|[@@-2]}
            <Call 0x2229c 0x10232>                                              {[#0]|[@@-4]|[@@-2]}
                KERNCALL_19
            <POP 222a2-222a6 StackAdj>                       Δ+10               {}
            <MI 222a6  TST.B   (A6-0x4)>                                        {}
            <MI 222a8  BEQ     0x22338>                                         {}
        <POP 222ac-222b6 Naked>                              Σ0         ↓ →0x222c0
            <MI 222ac  MOVE.W  (A6-0x2),D0>                                     {}
            <MI 222b0  CMPI.W  #0x00ff,D0>                                      {}
            <MI 222b4  BLS     0x222c0>                                         {}
        <POP 222b6-222c0 Naked>                              Σ0         ↓
            <Const 0x222b6 0x3.4>                            Δ-4                {[##3]}
            <Call 0x222ba 0x2132c>                                              {[##3]}
            <POP 222be-222c0 StackAdj>                       Δ+4                {}
        <POP 222c0-22338 Naked>                              Σ0         ↓ ←0x222ac
            <Blob 0x222c0 [18] @>                            Δ-18               {[«18""»]}
            <MI 222cc  CLR.B   -(A7)>                        Δ-2                {[«18""»]|[#0]}
            <POP 222ce-222d0 StackAdj>                       Δ-8                {[«18""»]|[#0]|[-8-]}
            <Lit 0x222d0 18>                                                    {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]}
            <POP 222e2-222e4 StackAdj>                       Δ-4                {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]}
            <MI 222e4  CLR.L   D1>                                              {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]}
            <MI 222e6  MOVE.W  D0,D1>                                           {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]}
            <MI 222e8  MOVE.L  D1,-(A7)>                     Δ-4                {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]|[4, 'D1']}
            <Const 0x222ea 0x1.4>                            Δ-4                {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]|[4, 'D1']|[##1]}
            <Call 0x222ee 0x102e8>                                              {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]|[4, 'D1']|[##1]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 222f4-222f6 StackAdj>                       Δ+8                {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]}
            <Call 0x222f6 0x102d0>                                              {[«18""»]|[#0]|[-4-]|[$$Flushing packet :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 222fc-222fe StackAdj>                       Δ+8                {[«18""»]|[#0]|[-4-]}
            <Call 0x222fe 0x22238>                                              {[«18""»]|[#0]|[-4-]}
            <POP 22302-22306 StackAdj>                       Δ+24               {}
            <POP 0x22306 LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 2230a  MULU.W  #0x34,D0>                                        {}
            <MI 2230e  LEA.L   0x2c794,A0>                                      {}
            <MI 22314  LEA.L   (A0+D0.L),A0>                                    {}
            <MI 22318  CLR.B   (A0+0x192e)>                                     {}
            <MI 2231c  CLR.B   (A0+0x192f)>                                     {}
            <MI 22320  CLR.B   (A0+0x1930)>                                     {}
            <MI 22324  CLR.W   (A0+0x1932)>                                     {}
            <MI 22328  CLR.W   (A0+0x1934)>                                     {}
            <MI 2232c  CLR.L   (A0+0x1936)>                                     {}
            <MI 22330  CLR.L   (A0+0x193a)>                                     {}
            <MI 22334  CLR.L   (A0+0x193e)>                                     {}
        <POP 22338-2233e Naked>                              Σ0         ↓ →0x22294 ←0x22294
            <MI 22338  TST.B   (A6-0x4)>                                        {}
            <MI 2233a  BNE     0x22294>                                         {}
        <POP 2233e-22344 Naked>                              Σ0         ↓
            <MI 2233e  CLR.B   0x2cc12>                                         {}
        <POP 22344-2234c Epilogue>                           Σ0         

0x2234c


@ 2234c
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 4(w)>
        <LVAR -0x008 4(w)>
        <LVAR -0x00c 4(w)>
        <LVAR -0x010 @ 4(w)>
    <POP 2234c-223ca Body>                                              
        <POP 2234c-22362 Prologue>                           Σ0         ↓
        <POP 22362-223c2 Naked>                              Σ0         ↓
            <Blob 0x22362 [18] @>                            Δ-18               {[«18""»]}
            <POP 22374-22376 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x22376 17>                                                    {[«18""»]|[$$Packet header is:]}
            <Call 0x2238a 0x103e0>                                              {[«18""»]|[$$Packet header is:]}
                WriteConsoleStringCrLf(str : String)
            <POP 22390-22394 StackAdj>                       Δ+22               {}
            <MI 22394  MOVE.L  (A6+0x8),(A6-0x10)>                              {}
            <MI 2239a  MOVE.L  (A6+0xc),(A6-0xc)>                               {}
            <MI 223a0  MOVE.L  (A6+0x10),(A6-0x8)>                              {}
            <MI 223a6  MOVE.L  (A6+0x14),(A6-0x4)>                              {}
            <MI 223ac  LEA.L   (A6-0x10),A0>                                    {}
            <MI 223b0  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x223b2 0x10.4>                           Δ-4                {[4, 'A0']|[##16]}
            <Call 0x223b6 0x2159a>                                              {[4, 'A0']|[##16]}
            <POP 223ba-223bc StackAdj>                       Δ+8                {}
            <Call 0x223bc 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 223c2-223ca Epilogue>                           Σ0         

0x223ca


@ 223ca
        <LVAR  0x010 2(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 4(rw)>
        <LVAR -0x016 4(r)>
        <LVAR -0x019 1(r)>
        <LVAR -0x01a 1(r) 4(r)>
        <LVAR -0x01c 1(r)>
        <LVAR -0x01e 4(r)>
        <LVAR -0x01f 1(r)>
        <LVAR -0x020 1(r)>
        <LVAR -0x021 1(r)>
        <LVAR -0x022 @ 4(r)>
        <LVAR -0x02c @ 2(r)>
        <LVAR -0x02e @ 1(r)>
    <POP 223ca-22676 Body>                                              
        <POP 223ca-223e0 Prologue>                           Σ0         ↓
        <POP 223e0-223f0 RegCacheLoad>                       Σ0         ↓
        <POP 223f0-223f2 Naked>                              Σ0         ↓
            <MI 223f0  MOVEQ.L #0x00,D7>                                        {}
        <POP 223f2-2240e Naked>                              Σ0         ↓ →0x225da ←0x225da
            <MI 223f2  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Pointer.fp 0x223f4 <LVAR -0x02e @ 1(r)>>        Δ-4                {[2, 'D7']|[@@-46]}
            <Pointer.fp 0x223f8 <LVAR -0x02c @ 2(r)>>        Δ-4                {[2, 'D7']|[@@-46]|[@@-44]}
            <Call 0x223fc 0x10232>                                              {[2, 'D7']|[@@-46]|[@@-44]}
                KERNCALL_19
            <POP 22402-22406 StackAdj>                       Δ+10               {}
            <MI 22406  TST.B   (A6-0x2e)>                                       {}
            <MI 2240a  BEQ     0x225da>                                         {}
        <POP 2240e-22418 Naked>                              Σ0         ↓ →0x22420
            <MI 2240e  MOVE.W  (A6-0x2c),D0>                                    {}
            <MI 22412  CMPI.W  #0x00ff,D0>                                      {}
            <MI 22416  BLS     0x22420>                                         {}
        <POP 22418-22420 Naked>                              Σ0         ↓
            <Const 0x22418 0x3.4>                            Δ-4                {[##3]}
            <Call 0x2241c 0x2132c>                                              {[##3]}
            <POP 2241e-22420 StackAdj>                       Δ+4                {}
        <POP 22420-22472 Naked>                              Σ0         ↓ →0x2247a ←0x2240e
            <MI 22420  MOVE.W  0x2d438,D1>                                      {}
            <MI 22426  MULU.W  D0,D1>                                           {}
            <MI 22428  ADD.L   0x2d434,D1>                                      {}
            <MI 2242e  MOVE.L  D1,-(A7)>                     Δ-4                {[4, 'D1']}
            <MI 22430  LEA.L   (A6-0x22),A0>                                    {[4, 'D1']}
            <MI 22434  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'D1']|[4, 'A0']}
            <Const 0x22436 0x10.2>                           Δ-2                {[4, 'D1']|[4, 'A0']|[#16]}
            <Call 0x2243a 0x10238>                                              {[4, 'D1']|[4, 'A0']|[#16]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2243c-22440 StackAdj>                       Δ+10               {}
            <MI 22440  CLR.L   D1>                                              {}
            <MI 22442  MOVE.B  (A6-0x1a),D1>                                    {}
            <POP 0x22446 LimitCheck 0x0 ≤ D1 ≤ 0x3>                             {}
            <MI 2244a  MULS.W  #0x34,D1>                                        {}
            <MI 2244e  LEA.L   0x2c794,A0>                                      {}
            <MI 22450  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 22454  LEA.L   (A6-0x22),A1>                                    {}
            <MI 22458  MOVE.L  A1,-(A7)>                     Δ-4                {[4, 'A1']}
            <MI 2245a  MOVE.L  (A0+0x193e),-(A7)>            Δ-4                {[4, 'A1']|[4, '(A0+0x193e)']}
            <Const 0x2245e 0x10.2>                           Δ-2                {[4, 'A1']|[4, '(A0+0x193e)']|[#16]}
            <Call 0x22462 0x10238>                                              {[4, 'A1']|[4, '(A0+0x193e)']|[#16]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 22464-22468 StackAdj>                       Δ+10               {}
            <MI 22468  CLR.L   D1>                                              {}
            <MI 2246a  MOVE.B  (A6-0x1f),D1>                                    {}
            <MI 2246e  CMP.W   D0,D1>                                           {}
            <MI 22470  BEQ     0x2247a>                                         {}
        <POP 22472-2247a Naked>                              Σ0         ↓
            <Const 0x22472 0xd.4>                            Δ-4                {[##13]}
            <Call 0x22476 0x2132c>                                              {[##13]}
            <POP 22478-2247a StackAdj>                       Δ+4                {}
        <POP 2247a-22480 Naked>                              Σ0         ↓ →0x22488 ←0x22420
            <MI 2247a  TST.B   (A6-0x1c)>                                       {}
            <MI 2247e  BEQ     0x22488>                                         {}
        <POP 22480-22488 Naked>                              Σ0         ↓
            <Const 0x22480 0xe.4>                            Δ-4                {[##14]}
            <Call 0x22484 0x2132c>                                              {[##14]}
            <POP 22486-22488 StackAdj>                       Δ+4                {}
        <POP 22488-2248e Naked>                              Σ0         ↓ →0x224c6 ←0x2247a
            <MI 22488  TST.B   (A0+0x192f)>                                     {}
            <MI 2248c  BNE     0x224c6>                                         {}
        <POP 2248e-224c6 Naked>                              Σ0         ↓
            <MI 2248e  MOVE.L  (A6-0x22),(A6-0x12)>                             {}
            <MI 22494  MOVE.L  (A6-0x1e),(A6-0xe)>                              {}
            <MI 2249a  MOVE.L  (A6-0x1a),(A6-0xa)>                              {}
            <MI 224a0  MOVE.L  (A6-0x16),(A6-0x6)>                              {}
            <MI 224a6  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 224aa  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 224ae  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 224b2  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x224b6 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 224ba-224be StackAdj>                       Δ+16               {}
            <Const 0x224be 0xf.4>                            Δ-4                {[##15]}
            <Call 0x224c2 0x2132c>                                              {[##15]}
            <POP 224c4-224c6 StackAdj>                       Δ+4                {}
        <POP 224c6-224dc Naked>                              Σ0 Δ-4     ↓ →0x224e4 ←0x22488
            <MI 224c6  CLR.L   D0>                                              {}
            <MI 224c8  MOVE.B  (A6-0x1a),D0>                                    {}
            <MI 224cc  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 224ce  CLR.L   D2>                                              {[4, 'D0']}
            <MI 224d0  MOVE.W  (A0+0x1932),D2>                                  {[4, 'D0']}
            <MI 224d4  ADD.L   D0,D2>                                           {[4, 'D0']}
            <MI 224d6  EXTW.L  D1>                                              {[4, 'D0']}
            <MI 224d8  CMP.L   D2,D1>                                           {[4, 'D0']}
            <MI 224da  BEQ     0x224e4>                                         {[4, 'D0']}
        <POP 224dc-224e4 Naked>                              Σ-4        ↓
            <Const 0x224dc 0x10.4>                           Δ-4                {[-4-]|[##16]}
            <Call 0x224e0 0x2132c>                                              {[-4-]|[##16]}
            <POP 224e2-224e4 StackAdj>                       Δ+4                {[-4-]}
        <POP 224e4-22500 Naked>                              Σ-4        ↓ →0x22508 ←0x224c6
            <MI 224e4  CLR.L   D1>                                              {[-4-]}
            <MI 224e6  MOVE.W  (A0+0x1932),D1>                                  {[-4-]}
            <MI 224ea  ADDQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x224ec LimitCheck 0x0 ≤ D1 ≤ 0xffff>                          {[-4-]}
            <MI 224f6  MOVE.W  D1,(A0+0x1932)>                                  {[-4-]}
            <MI 224fa  CMP.W   (A0+0x1934),D1>                                  {[-4-]}
            <MI 224fe  BLS     0x22508>                                         {[-4-]}
        <POP 22500-22508 Naked>                              Σ-4        ↓
            <Const 0x22500 0x11.4>                           Δ-4                {[-4-]|[##17]}
            <Call 0x22504 0x2132c>                                              {[-4-]|[##17]}
            <POP 22506-22508 StackAdj>                       Δ+4                {[-4-]}
        <POP 22508-22512 Naked>                              Σ-4        ↓ →0x225d8 ←0x224e4
            <MI 22508  MOVE.B  (A6-0x19),D1>                                    {[-4-]}
            <MI 2250c  LSR.B   #0x7,D1>                                         {[-4-]}
            <MI 2250e  BEQ     0x225d8>                                         {[-4-]}
        <POP 22512-2254a Naked>                              Σ-4        ↓ →0x22590
            <MI 22512  CLR.B   (A0+0x192f)>                                     {[-4-]}
            <MI 22516  MOVE.B  #0x01,(A0+0x192e)>                               {[-4-]}
            <MI 2251c  MOVE.B  (A6-0x19),D1>                                    {[-4-]}
            <MI 22520  LSL.B   #0x6,D1>                                         {[-4-]}
            <MI 22522  LSR.B   #0x7,D1>                                         {[-4-]}
            <MI 22524  MOVE.B  D1,(A0+0x1930)>                                  {[-4-]}
            <MI 22528  CLR.L   D1>                                              {[-4-]}
            <MI 2252a  MOVE.B  (A6-0x21),D1>                                    {[-4-]}
            <MI 2252e  ASL.W   #0x3,D1>                                         {[-4-]}
            <MI 22530  CLR.L   D2>                                              {[-4-]}
            <MI 22532  MOVE.B  (A6-0x20),D2>                                    {[-4-]}
            <MI 22536  NEG.W   D2>                                              {[-4-]}
            <MI 22538  ADD.W   D1,D2>                                           {[-4-]}
            <MI 2253a  MOVE.W  D2,D1>                                           {[-4-]}
            <MI 2253c  EXTW.L  D1>                                              {[-4-]}
            <MI 2253e  MOVE.L  D1,0x2e192>                                      {[-4-]}
            <MI 22544  TST.L   (A0+0x193a)>                                     {[-4-]}
            <MI 22548  BGE     0x22590>                                         {[-4-]}
        <POP 2254a-22552 Naked>                              Σ-4        ↓ →0x2255a
            <MI 2254a  CMPI.L  #0x00000400,D1>                                  {[-4-]}
            <MI 22550  BLE     0x2255a>                                         {[-4-]}
        <POP 22552-2255a Naked>                              Σ-4        ↓
            <Const 0x22552 0x12.4>                           Δ-4                {[-4-]|[##18]}
            <Call 0x22556 0x2132c>                                              {[-4-]|[##18]}
            <POP 22558-2255a StackAdj>                       Δ+4                {[-4-]}
        <POP 2255a-22590 Naked>                              Σ-4        ↓ ←0x2254a
            <MI 2255a  MOVE.L  D0,D4>                                           {[-4-]}
            <MI 2255c  CLR.L   D3>                                              {[-4-]}
            <MI 2255e  MOVE.W  0x2d432,D3>                                      {[-4-]}
            <Call 0x22564 0x10290>                                              {[-4-]}
                ?mulu_d3_d4
            <MI 2256a  MOVE.L  D4,D0>                                           {[-4-]}
            <MI 2256c  ADD.L   0x2d42e,D0>                                      {[-4-]}
            <MI 22572  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <MI 22574  MOVE.L  (A0+0x1936),-(A7)>            Δ-4                {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']}
            <MI 22578  MOVE.L  0x2e192,D0>                                      {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']}
            <POP 0x2257e LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']}
            <MI 22588  MOVE.W  D0,-(A7)>                     Δ-2                {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']|[2, 'D0']}
            <Call 0x2258a 0x10238>                                              {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']|[2, 'D0']}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2258c-22590 StackAdj>                       Δ+10               {[-4-]}
        <POP 22590-22596 Naked>                              Σ-4        ↓ →0x225d8 ←0x22512
            <MI 22590  TST.L   (A0+0x193a)>                                     {[-4-]}
            <MI 22594  BLT     0x225d8>                                         {[-4-]}
        <POP 22596-2259c Naked>                              Σ-4        ↓ →0x225a4
            <MI 22596  CMP.L   (A0+0x193a),D1>                                  {[-4-]}
            <MI 2259a  BLE     0x225a4>                                         {[-4-]}
        <POP 2259c-225a4 Naked>                              Σ-4        ↓
            <Const 0x2259c 0x12.4>                           Δ-4                {[-4-]|[##18]}
            <Call 0x225a0 0x2132c>                                              {[-4-]|[##18]}
            <POP 225a2-225a4 StackAdj>                       Δ+4                {[-4-]}
        <POP 225a4-225d8 Naked>                              Σ-4        ↓ ←0x22596
            <MI 225a4  MOVE.L  (A7),D4>                                         {[-4-]}
            <MI 225a6  CLR.L   D3>                                              {[-4-]}
            <MI 225a8  MOVE.W  0x2d432,D3>                                      {[-4-]}
            <Call 0x225ae 0x10290>                                              {[-4-]}
                ?mulu_d3_d4
            <MI 225b4  MOVE.L  D4,D0>                                           {[-4-]}
            <MI 225b6  ADD.L   0x2d42e,D0>                                      {[-4-]}
            <MI 225bc  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <MI 225be  MOVE.L  (A0+0x1936),-(A7)>            Δ-4                {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']}
            <MI 225c2  MOVE.L  (A0+0x193a),D0>                                  {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']}
            <POP 0x225c6 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']}
            <MI 225d0  MOVE.W  D0,-(A7)>                     Δ-2                {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']|[2, 'D0']}
            <Call 0x225d2 0x10238>                                              {[-4-]|[4, 'D0']|[4, '(A0+0x1936)']|[2, 'D0']}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 225d4-225d8 StackAdj>                       Δ+10               {[-4-]}
        <POP 225d8-225da Naked>                              Σ-4 Δ+4    ↓ ←0x22508 ←0x22590
            <POP 225d8-225da StackAdj>                       Δ+4                {}
        <POP 225da-225e4 Naked>                              Σ0         ↓ →0x223f2 ←0x223f2
            <MI 225da  MOVEQ.L #0x00,D7>                                        {}
            <MI 225dc  TST.B   (A6-0x2e)>                                       {}
            <MI 225e0  BNE     0x223f2>                                         {}
        <POP 225e4-225ec Naked>                              Σ0         ↓
            <MI 225e4  MOVEQ.L #0x01,D7>                                        {}
            <MI 225e6  MOVEQ.L #0x00,D6>                                        {}
            <MI 225e8  MOVEQ.L #0x00,D5>                                        {}
            <MI 225ea  MOVEQ.L #0x00,D0>                                        {}
        <POP 225ec-2262c Naked>                              Σ0         ↓ →0x225ec ←0x225ec
            <POP 0x225ec LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 225f6  MOVE.L  D0,D4>                                           {}
            <MI 225f8  MOVEQ.L #0x34,D3>                                        {}
            <Call 0x225fa 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 22600  LEA.L   0x2c794,A0>                                      {}
            <MI 22602  LEA.L   (A0+D4.L),A0>                                    {}
            <MI 22606  MOVE.B  D6,D1>                                           {}
            <MI 22608  OR.B    (A0+0x192f),D1>                                  {}
            <MI 2260c  EXTB.W  D1>                                              {}
            <POP 0x2260e LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {}
            <MI 22612  MOVE.B  D1,D6>                                           {}
            <MI 22614  MOVE.B  D5,D1>                                           {}
            <MI 22616  OR.B    (A0+0x192e),D1>                                  {}
            <MI 2261a  EXTB.W  D1>                                              {}
            <POP 0x2261c LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {}
            <MI 22620  MOVE.B  D1,D5>                                           {}
            <MI 22622  ADDQ.L  #0x1,D0>                                         {}
            <MI 22624  CMPI.L  #0x00000003,D0>                                  {}
            <MI 2262a  BLE     0x225ec>                                         {}
        <POP 2262c-22644 Naked>                              Σ0         ↓ →0x22662
            <MI 2262c  MOVE.W  (A6+0x10),D0>                                    {}
            <POP 0x22630 LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 22634  MULU.W  #0x34,D0>                                        {}
            <MI 22638  LEA.L   0x2c794,A0>                                      {}
            <MI 2263a  LEA.L   (A0+D0.L),A0>                                    {}
            <MI 2263e  TST.B   (A0+0x192e)>                                     {}
            <MI 22642  BEQ     0x22662>                                         {}
        <POP 22644-22662 Naked>                              Σ0         →0x2266e
            <MI 22644  CLR.B   (A0+0x192e)>                                     {}
            <MI 22648  MOVEA.L (A6+0xc),A1>                                     {}
            <MI 2264c  MOVE.B  #0x01,(A1)>                                      {}
            <MI 22650  MOVEA.L (A6+0x8),A1>                                     {}
            <MI 22654  MOVE.B  (A0+0x1930),D0>                                  {}
            <MI 22658  EXTB.W  D0>                                              {}
            <POP 0x2265a LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 2265e  MOVE.B  D0,(A1)>                                         {}
            <MI 22660  BRA     0x2266e>                                         {}
        <POP 22662-2266e Naked>                              Σ0         ↓ ←0x2262c
            <MI 22662  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22666  CLR.B   (A0)>                                            {}
            <MI 22668  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2266c  CLR.B   (A0)>                                            {}
        <POP 2266e-22676 Epilogue>                           Σ0         ←0x22644

0x22676


@ 22676
        <LVAR  0x00c 2(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
    <POP 22676-226cc Body>                                              
        <POP 22676-2268c Prologue>                           Σ0         ↓
        <POP 2268c-22694 Naked>                              Σ0         ↓ →0x226b2
            <MI 2268c  TST.B   0x2e196>                                         {}
            <MI 22692  BEQ     0x226b2>                                         {}
        <POP 22694-226b0 Naked>                              Σ0         ↓ →0x22694 ←0x22694
            <MI 22694  MOVE.W  (A6+0xc),-(A7)>               Δ-2                {[2, '(A6+0xc)']}
            <Pointer.fp 0x22698 <LVAR -0x002 @ 1(r)>>        Δ-4                {[2, '(A6+0xc)']|[@@-2]}
            <MI 2269c  MOVEA.L (A6+0x8),A0>                                     {[2, '(A6+0xc)']|[@@-2]}
            <MI 226a0  PEA.L   (A0)>                         Δ-4                {[2, '(A6+0xc)']|[@@-2]|[4, '^(A0)']}
            <Call 0x226a2 0x223ca>                                              {[2, '(A6+0xc)']|[@@-2]|[4, '^(A0)']}
            <POP 226a6-226aa StackAdj>                       Δ+10               {}
            <MI 226aa  TST.B   (A6-0x2)>                                        {}
            <MI 226ae  BEQ     0x22694>                                         {}
        <POP 226b0-226b2 Naked>                              Σ0         →0x226c4
            <MI 226b0  BRA     0x226c4>                                         {}
        <POP 226b2-226c4 Naked>                              Σ0         ↓ ←0x2268c
            <MI 226b2  MOVE.W  (A6+0xc),-(A7)>               Δ-2                {[2, '(A6+0xc)']}
            <MI 226b6  MOVEA.L (A6+0x8),A0>                                     {[2, '(A6+0xc)']}
            <MI 226ba  PEA.L   (A0)>                         Δ-4                {[2, '(A6+0xc)']|[4, '^(A0)']}
            <Call 0x226bc 0x10206>                                              {[2, '(A6+0xc)']|[4, '^(A0)']}
                KC03_Wait_Disk_IO(a : W; VAR status : Byte)
            <POP 226c2-226c4 StackAdj>                       Δ+6                {}
        <POP 226c4-226cc Epilogue>                           Σ0         ←0x226b0

0x226cc


@ 226cc
        <LVAR  0x00a 4(w)>
        <LVAR  0x008 2(r)>
        <LVAR -0x014 1(r)>
        <LVAR -0x015 1(r)>
        <LVAR -0x016 @>
    <POP 226cc-22766 Body>                                              
        <POP 226cc-226e2 Prologue>                           Σ0         ↓
        <POP 226e2-2275e Naked>                              Σ0         ↓
            <MI 226e2  MOVE.W  (A6+0x8),D0>                                     {}
            <POP 0x226e6 LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 226ea  MULU.W  #0x34,D0>                                        {}
            <MI 226ee  LEA.L   0x2c794,A0>                                      {}
            <MI 226f4  LEA.L   (A0+D0.L),A0>                                    {}
            <MI 226f8  CLR.L   D0>                                              {}
            <MI 226fa  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 226fe  CLR.L   D1>                                              {}
            <MI 22700  MOVE.W  (A0+0x1932),D1>                                  {}
            <MI 22704  ADD.L   D0,D1>                                           {}
            <MI 22706  SUBQ.L  #0x1,D1>                                         {}
            <MI 22708  MOVE.L  D1,D7>                                           {}
            <MI 2270a  MOVE.L  D7,D4>                                           {}
            <MI 2270c  CLR.L   D3>                                              {}
            <MI 2270e  MOVE.W  0x2d438,D3>                                      {}
            <Call 0x22714 0x10290>                                              {}
                ?mulu_d3_d4
            <MI 2271a  MOVE.L  D4,D0>                                           {}
            <MI 2271c  ADD.L   0x2d434,D0>                                      {}
            <MI 22722  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 22724  LEA.L   (A6-0x16),A1>                                    {[4, 'D0']}
            <MI 22728  MOVE.L  A1,-(A7)>                     Δ-4                {[4, 'D0']|[4, 'A1']}
            <Const 0x2272a 0x10.2>                           Δ-2                {[4, 'D0']|[4, 'A1']|[#16]}
            <Call 0x2272e 0x10238>                                              {[4, 'D0']|[4, 'A1']|[#16]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 22734-22738 StackAdj>                       Δ+10               {}
            <MI 22738  CLR.L   D0>                                              {}
            <MI 2273a  MOVE.B  (A6-0x15),D0>                                    {}
            <MI 2273e  ASL.W   #0x3,D0>                                         {}
            <MI 22740  CLR.L   D1>                                              {}
            <MI 22742  MOVE.B  (A6-0x14),D1>                                    {}
            <MI 22746  NEG.W   D1>                                              {}
            <MI 22748  ADD.W   D0,D1>                                           {}
            <MI 2274a  CLR.L   D0>                                              {}
            <MI 2274c  MOVE.W  (A0+0x1932),D0>                                  {}
            <MI 22750  SUBQ.L  #0x1,D0>                                         {}
            <MI 22752  ASL.L   #0x8,D0>                                         {}
            <MI 22754  ASL.L   #0x2,D0>                                         {}
            <MI 22756  EXTW.L  D1>                                              {}
            <MI 22758  ADD.L   D1,D0>                                           {}
            <MI 2275a  MOVE.L  D0,(A6+0xa)>                                     {}
        <POP 2275e-22766 Epilogue>                           Σ0         

0x22766


@ 22766
        <LVAR  0x01a 4(r)>
        <LVAR  0x016 4(r)>
        <LVAR  0x014 2(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 4(w)>
        <LVAR -0x007 1(w)>
        <LVAR -0x008 1(w) 4(w)>
        <LVAR -0x00a 1(w)>
        <LVAR -0x00c 4(w)>
        <LVAR -0x00d 1(w)>
        <LVAR -0x00e 1(w)>
        <LVAR -0x00f 1(w)>
        <LVAR -0x010 @ 1(w) 4(w)>
    <POP 22766-228dc Body>                                              
        <POP 22766-2277c Prologue>                           Σ0         ↓
        <POP 2277c-2278e RegCacheLoad>                       Σ0         ↓
        <POP 2278e-22798 Naked>                              Σ0         ↓ →0x228c0
            <MI 2278e  TST.B   0x2e196>                                         {}
            <MI 22794  BEQ     0x228c0>                                         {}
        <POP 22798-227b8 Naked>                              Σ0         ↓ →0x227be
            <MI 22798  MOVE.W  (A6+0x14),D0>                                    {}
            <POP 0x2279a LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 2279e  MULU.W  #0x34,D0>                                        {}
            <MI 227a2  LEA.L   0x2c794,A0>                                      {}
            <MI 227a8  LEA.L   (A0+D0.L),A0>                                    {}
            <MI 227ac  MOVE.W  (A6+0x14),D0>                                    {}
            <POP 0x227ae LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 227b0  MOVE.W  D0,D7>                                           {}
            <MI 227b2  TST.B   (A0+0x192f)>                                     {}
            <MI 227b6  BNE     0x227be>                                         {}
        <POP 227b8-227be Naked>                              Σ0         ↓ →0x227c8
            <MI 227b8  TST.B   (A0+0x192e)>                                     {}
            <MI 227bc  BEQ     0x227c8>                                         {}
        <POP 227be-227c8 Naked>                              Σ0         ↓ ←0x22798
            <Const 0x227be 0x13.4>                           Δ-4                {[##19]}
            <Call 0x227c2 0x2132c>                                              {[##19]}
            <POP 227c6-227c8 StackAdj>                       Δ+4                {}
        <POP 227c8-227e4 Naked>                              Σ0         ↓ →0x2280e ←0x227b8
            <MI 227c8  MOVE.B  #0x01,(A0+0x192f)>                               {}
            <MI 227cc  CLR.W   (A0+0x1932)>                                     {}
            <MI 227d0  MOVE.W  #0x01,(A0+0x1934)>                               {}
            <MI 227d4  MOVE.L  (A6+0xc),(A0+0x1936)>                            {}
            <MI 227da  MOVE.L  (A6+0x8),(A0+0x193a)>                            {}
            <MI 227e0  TST.L   (A6+0x10)>                                       {}
            <MI 227e2  BEQ     0x2280e>                                         {}
        <POP 227e4-2280e Naked>                              Σ0         ↓
            <MI 227e4  MOVE.W  0x2d432,D0>                                      {}
            <MI 227ea  MULU.W  D7,D0>                                           {}
            <MI 227ec  MOVE.L  (A6+0x16),-(A7)>              Δ-4                {[4, '(A6+0x16)']}
            <MI 227f0  ADD.L   0x2d42e,D0>                                      {[4, '(A6+0x16)']}
            <MI 227f6  MOVE.L  D0,-(A7)>                     Δ-4                {[4, '(A6+0x16)']|[4, 'D0']}
            <MI 227f8  MOVE.L  (A6+0x10),D0>                                    {[4, '(A6+0x16)']|[4, 'D0']}
            <POP 0x227fa LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[4, '(A6+0x16)']|[4, 'D0']}
            <MI 22804  MOVE.W  D0,-(A7)>                     Δ-2                {[4, '(A6+0x16)']|[4, 'D0']|[2, 'D0']}
            <Call 0x22806 0x10238>                                              {[4, '(A6+0x16)']|[4, 'D0']|[2, 'D0']}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2280c-2280e StackAdj>                       Δ+10               {}
        <POP 2280e-228c0 Naked>                              Σ0         →0x228d4 ←0x227c8
            <MI 2280e  MOVEA.L (A6+0x1a),A1>                                    {}
            <MI 22812  MOVEA.L A1,A2>                                           {}
            <MI 22814  MOVE.L  A2,-(A7)>                     Δ-4                {[4, 'A2']}
            <MI 22816  MOVE.L  (A7),(A0+0x193e)>                                {[4, 'A2']}
            <POP 2281a-2281e StackAdj>                       Δ-12               {[4, 'A2']|[-12-]}
            <MI 2281e  MOVEA.L A7,A0>                                           {[4, 'A2']|[-12-]}
            <BlockMove 16,A1,A0>                                                {[4, 'A2']|[-12-]}
            <MI 22828  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[4, 'A2']|[-8-]}
            <MI 2282c  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {[4, 'A2']|[-4-]}
            <MI 22830  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {[4, 'A2']}
            <MI 22834  MOVE.L  (A7)+,(A6-0x4)>               Δ+4                {}
            <MI 22838  MOVE.B  #0x40,(A6-0x10)>                                 {}
            <MI 2283e  MOVE.L  (A6+0x10),D0>                                    {}
            <MI 22840  ADDQ.L  #0x7,D0>                                         {}
            <MI 22842  MOVE.L  D0,D4>                                           {}
            <MI 22844  MOVEQ.L #0x08,D3>                                        {}
            <Call 0x22846 0x10294>                                              {}
                ?divs_d3_d4
            <POP 0x2284c LimitCheck 0x0 ≤ D4 ≤ 0x80>                            {}
            <MI 22856  MOVE.B  D4,(A6-0xf)>                                     {}
            <MI 2285a  CLR.L   D0>                                              {}
            <MI 2285c  MOVE.B  D4,D0>                                           {}
            <MI 2285e  ASL.W   #0x3,D0>                                         {}
            <MI 22860  EXTW.L  D0>                                              {}
            <MI 22862  SUB.L   (A6+0x10),D0>                                    {}
            <POP 0x22864 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2286a  MOVE.B  D0,(A6-0xe)>                                     {}
            <POP 0x2286e LimitCheck 0x0 ≤ D7 ≤ 0xff>                            {}
            <MI 22870  MOVE.B  D7,(A6-0xd)>                                     {}
            <MI 22874  MOVE.B  #0x0f,(A6-0xa)>                                  {}
            <MI 2287a  MOVE.B  D7,(A6-0x8)>                                     {}
            <MI 2287e  ORI.B   #0x80,(A6-0x7)>                                  {}
            <MI 22884  ANDI.B  #0xfe,(A6-0x7)>                                  {}
            <MI 2288a  MOVE.W  0x2d438,D0>                                      {}
            <MI 22890  MULU.W  D7,D0>                                           {}
            <MI 22892  LEA.L   (A6-0x10),A0>                                    {}
            <MI 22896  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 22898  ADD.L   0x2d434,D0>                                      {[4, 'A0']}
            <MI 2289e  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D0']}
            <Const 0x228a0 0x10.2>                           Δ-2                {[4, 'A0']|[4, 'D0']|[#16]}
            <Call 0x228a4 0x10238>                                              {[4, 'A0']|[4, 'D0']|[#16]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 228aa-228ac StackAdj>                       Δ+10               {}
            <POP 0x228ac LimitCheck 0x0 ≤ D7 ≤ 0xffff>                          {}
            <MI 228b4  MOVE.W  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x228b6 0x10230>                                              {[2, 'D7']}
                KERNCALL_18
            <POP 228bc-228be StackAdj>                       Δ+2                {}
            <MI 228be  BRA     0x228d4>                                         {}
        <POP 228c0-228d4 Naked>                              Σ0         ↓ ←0x2278e
            <MI 228c0  MOVEA.L (A6+0x1a),A0>                                    {}
            <MI 228c4  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <MI 228c6  MOVE.L  (A6+0x16),-(A7)>              Δ-4                {[4, '^(A0)']|[4, '(A6+0x16)']}
            <MI 228ca  MOVE.W  (A6+0x14),-(A7)>              Δ-2                {[4, '^(A0)']|[4, '(A6+0x16)']|[2, '(A6+0x14)']}
            <Call 0x228cc 0x10204>                                              {[4, '^(A0)']|[4, '(A6+0x16)']|[2, '(A6+0x14)']}
                KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 
            <POP 228d2-228d4 StackAdj>                       Δ+10               {}
        <POP 228d4-228dc Epilogue>                           Σ0         ←0x2280e

0x228dc


@ 228dc
        <LVAR -0x006 4(rw)>
        <LVAR -0x007 1(w)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00d 1(w)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x018 4(w)>
        <LVAR -0x01c 4(w)>
        <LVAR -0x020 4(w)>
        <LVAR -0x024 @ 4(w)>
    <POP 228dc-22988 Body>                                              
        <POP 228dc-228f2 Prologue>                           Σ0         ↓
        <POP 228f2-22904 RegCacheLoad>                       Σ0         ↓
        <POP 22904-22970 Naked>                              Σ0         ↓ →0x22980
            <MI 22904  MOVE.L  0x21150,(A6-0x12)>                               {}
            <MI 22908  MOVE.L  0x21154,(A6-0xe)>                                {}
            <MI 2290c  MOVE.L  0x21158,(A6-0xa)>                                {}
            <MI 22910  MOVE.L  0x2115c,(A6-0x6)>                                {}
            <MI 22914  ANDI.B  #0x80,(A6-0xd)>                                  {}
            <MI 2291a  ORI.B   #0x06,(A6-0xd)>                                  {}
            <MI 22920  ANDI.B  #0x80,(A6-0x7)>                                  {}
            <MI 22926  MOVE.L  (A6-0x12),(A6-0x24)>                             {}
            <MI 2292a  MOVE.L  (A6-0xe),(A6-0x20)>                              {}
            <MI 2292e  MOVE.L  (A6-0xa),(A6-0x1c)>                              {}
            <MI 22932  MOVE.L  (A6-0x6),(A6-0x18)>                              {}
            <Const 0x22936 0x9303fc00.4>                     Δ-4                {[##2466511872]}
            <Pointer.fp 0x2293c <LVAR -0x024 @ 4(w)>>        Δ-4                {[##2466511872]|[@@-36]}
            <MI 22940  MOVE.L  (A7+0x4),-(A7)>               Δ-4                {[##2466511872]|[@@-36]|[4, '(A7+0x4)']}
            <Const 0x22944 0x3.2>                            Δ-2                {[##2466511872]|[@@-36]|[4, '(A7+0x4)']|[#3]}
            <Const 0x22946 0x0.4>                            Δ-4                {[##2466511872]|[@@-36]|[4, '(A7+0x4)']|[#3]|[##0]}
            <MI 2294a  MOVE.L  (A7+0xe),-(A7)>               Δ-4                {[##2466511872]|[@@-36]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']}
            <Const 0x2294e 0x0.4>                            Δ-4                {[##2466511872]|[@@-36]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']|[##0]}
            <Call 0x22952 0x22766>                                              {[##2466511872]|[@@-36]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']|[##0]}
            <POP 22956-2295a StackAdj>                       Δ+26               {}
            <Call 0x2295a 0x2227a>                                              {}
            <Const 0x2295e 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x22960 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#3]|[@@-20]}
            <Call 0x22964 0x22676>                                              {[#3]|[@@-20]}
            <POP 22968-2296a StackAdj>                       Δ+6                {}
            <MI 2296a  TST.B   (A6-0x14)>                                       {}
            <MI 2296e  BNE     0x22980>                                         {}
        <POP 22970-22980 Naked>                              Σ0         ↓
            <MI 22970  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 22972  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 22974  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 22976  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x22978 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 2297c-22980 StackAdj>                       Δ+16               {}
        <POP 22980-22988 Epilogue>                           Σ0         ←0x22904

0x22988


@ 22988
        <LVAR  0x008 1(rw)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x004 @>
    <POP 22988-229d4 Body>                                              
        <POP 22988-2299e Prologue>                           Σ0         ↓
        <POP 2299e-229a0 RegCacheLoad>                       Σ0         ↓
        <POP 229a0-229ba Naked>                              Σ0         ↓ →0x229cc
            <MI 229a0  CLR.B   (A6+0x8)>                                        {}
            <Const 0x229a4 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x229a6 <LVAR -0x002 @ 1(r)>>        Δ-4                {[#1]|[@@-2]}
            <Call 0x229aa 0x10212>                                              {[#1]|[@@-2]}
                KC09_PortStatus(Port : Word; VAR b: Byte)
            <POP 229b0-229b2 StackAdj>                       Δ+6                {}
            <MI 229b2  MOVE.B  (A6-0x2),D0>                                     {}
            <MI 229b6  CMP.B   #0x01,D0>                                        {}
            <MI 229b8  BNE     0x229cc>                                         {}
        <POP 229ba-229cc Naked>                              Σ0         ↓
            <Const 0x229ba 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x229bc <LVAR -0x004 @>>             Δ-4                {[#1]|[@@-4]}
            <Call 0x229c0 0x1020e>                                              {[#1]|[@@-4]}
                KC07_PortGetChar(port : Word ; VAR ret : Word)
            <POP 229c6-229c8 StackAdj>                       Δ+6                {}
            <MI 229c8  MOVE.B  #0x01,(A6+0x8)>                                  {}
        <POP 229cc-229d4 Epilogue>                           Σ0         ←0x229a0

0x229d4


@ 229d4
    <POP 229d4-22a2e Body>                                              
        <POP 229d4-229ea Prologue>                           Σ0         ↓
        <POP 229ea-22a1c Naked>                              Σ0         ↓
            <Blob 0x229ea [34] @>                            Δ-34               {[«34""»]}
            <POP 229fc-229fe StackAdj>                       Δ-4                {[«34""»]|[-4-]}
            <Lit 0x229fe 33>                                                    {[«34""»]|[$$Paused, strike any key to procede]}
            <Call 0x22a12 0x103e0>                                              {[«34""»]|[$$Paused, strike any key to procede]}
                WriteConsoleStringCrLf(str : String)
            <POP 22a18-22a1c StackAdj>                       Δ+38               {}
        <POP 22a1c-22a26 Naked>                              Σ0         ↓ →0x22a1c ←0x22a1c
            <POP 22a1c-22a1e StackAdj>                       Δ-2                {[-2-]}
            <Call 0x22a1e 0x22988>                                              {[-2-]}
            <MI 22a22  TST.B   (A7)+>                        Δ+2                {}
            <MI 22a24  BEQ     0x22a1c>                                         {}
        <POP 22a26-22a2e Epilogue>                           Σ0         

0x22a2e


@ 22a2e
        <LVAR  0x008 4(r)>
    <POP 22a2e-22a8a Body>                                              
        <POP 22a2e-22a44 Prologue>                           Σ0         ↓
        <POP 22a44-22a4c RegCacheLoad>                       Σ0         ↓
        <POP 22a4c-22a6a Naked>                              Σ0         ↓ →0x22a72
            <MI 22a4c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Const 0x22a4e 0x20.2>                           Δ-2                {[4, '(A6+0x8)']|[#32]}
            <Call 0x22a52 0x102c0>                                              {[4, '(A6+0x8)']|[#32]}
                AppendChar(MOD b : String; a : char)
            <POP 22a58-22a5a StackAdj>                       Δ+6                {}
            <MI 22a5a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22a5c  MOVE.W  (A0),D0>                                         {}
            <MI 22a5e  EXTW.L  D0>                                              {}
            <MI 22a60  ADD.L   (A4+0x6),D0>                                     {}
            <MI 22a62  CMPI.L  #0x0000004f,D0>                                  {}
            <MI 22a68  BLE     0x22a72>                                         {}
        <POP 22a6a-22a72 Naked>                              Σ0         ↓
            <Call 0x22a6a 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 22a70  CLR.L   (A4+0x6)>                                        {}
        <POP 22a72-22a82 Naked>                              Σ0         ↓ ←0x22a4c
            <MI 22a72  MOVE.W  (A0),D0>                                         {}
            <MI 22a74  EXTW.L  D0>                                              {}
            <MI 22a76  ADD.L   D0,(A4+0x6)>                                     {}
            <MI 22a78  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x22a7a 0x103d8>                                              {[4, '(A6+0x8)']}
                WriteConsoleString(str : String)
            <POP 22a80-22a82 StackAdj>                       Δ+4                {}
        <POP 22a82-22a8a Epilogue>                           Σ0         

0x22a8a


@ 22a8a
        <LVAR  0x008 2(r)>
    <POP 22a8a-22d36 Body>                                              
        <POP 22a8a-22aa0 Prologue>                           Σ0         ↓
        <POP 22aa0-22ab8 RegCacheLoad>                       Σ0         ↓
        <POP 22ab8-22ae8 Naked>                              Σ0         ↓ →0x22b0c
            <MI 22ab8  MOVE.L  #0x1d,(A4+0x6)>                                  {}
            <Blob 0x22ac0 [2] @>                             Δ-2                {[«2""»]}
            <POP 22ac4-22ac6 StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x22ac6 2>                                                     {[«2""»]|[$$,_]}
            <Call 0x22ad4 0x103d8>                                              {[«2""»]|[$$,_]}
                WriteConsoleString(str : String)
            <POP 22ada-22adc StackAdj>                       Δ+6                {}
            <MI 22adc  ADDQ.L  #0x2,(A4+0x6)>                                   {}
            <MI 22ae0  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22ae2  ANDI.W  #0x4000,D0>                                      {}
            <MI 22ae6  BEQ     0x22b0c>                                         {}
        <POP 22ae8-22b0c Naked>                              Σ0         ↓
            <Blob 0x22ae8 [10] @>                            Δ-10               {[«10""»]}
            <POP 22af8-22afa StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x22afa 9>                                                     {[«10""»]|[$$Ss_Zombie]}
            <Call 0x22b06 0x22a2e>                                              {[«10""»]|[$$Ss_Zombie]}
            <POP 22b0a-22b0c StackAdj>                       Δ+14               {}
        <POP 22b0c-22b14 Naked>                              Σ0         ↓ →0x22b30 ←0x22ab8
            <MI 22b0c  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22b0e  ANDI.W  #0x2000,D0>                                      {}
            <MI 22b12  BEQ     0x22b30>                                         {}
        <POP 22b14-22b30 Naked>                              Σ0         ↓
            <Blob 0x22b14 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x22b18 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 22b1c-22b1e StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Lit 0x22b1e 8>                                                     {[«4""»]|[«4""»]|[$$Ss_Alloc]}
            <Call 0x22b2a 0x22a2e>                                              {[«4""»]|[«4""»]|[$$Ss_Alloc]}
            <POP 22b2e-22b30 StackAdj>                       Δ+12               {}
        <POP 22b30-22b38 Naked>                              Σ0         ↓ →0x22b5e ←0x22b0c
            <MI 22b30  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22b32  ANDI.W  #0x0800,D0>                                      {}
            <MI 22b36  BEQ     0x22b5e>                                         {}
        <POP 22b38-22b5e Naked>                              Σ0         ↓
            <Blob 0x22b38 [12] @>                            Δ-12               {[«12""»]}
            <POP 22b48-22b4a StackAdj>                       Δ-4                {[«12""»]|[-4-]}
            <Lit 0x22b4a 11>                                                    {[«12""»]|[$$Ss_Closeing]}
            <Call 0x22b58 0x22a2e>                                              {[«12""»]|[$$Ss_Closeing]}
            <POP 22b5c-22b5e StackAdj>                       Δ+16               {}
        <POP 22b5e-22b66 Naked>                              Σ0         ↓ →0x22b82 ←0x22b30
            <MI 22b5e  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22b60  ANDI.W  #0x0400,D0>                                      {}
            <MI 22b64  BEQ     0x22b82>                                         {}
        <POP 22b66-22b82 Naked>                              Σ0         ↓
            <Blob 0x22b66 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x22b6a [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 22b6e-22b70 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Lit 0x22b70 8>                                                     {[«4""»]|[«4""»]|[$$Ss_Bound]}
            <Call 0x22b7c 0x22a2e>                                              {[«4""»]|[«4""»]|[$$Ss_Bound]}
            <POP 22b80-22b82 StackAdj>                       Δ+12               {}
        <POP 22b82-22b8a Naked>                              Σ0         ↓ →0x22bae ←0x22b5e
            <MI 22b82  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22b84  ANDI.W  #0x0200,D0>                                      {}
            <MI 22b88  BEQ     0x22bae>                                         {}
        <POP 22b8a-22bae Naked>                              Σ0         ↓
            <Blob 0x22b8a [10] @>                            Δ-10               {[«10""»]}
            <POP 22b9a-22b9c StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x22b9c 9>                                                     {[«10""»]|[$$Ss_Atmark]}
            <Call 0x22ba8 0x22a2e>                                              {[«10""»]|[$$Ss_Atmark]}
            <POP 22bac-22bae StackAdj>                       Δ+14               {}
        <POP 22bae-22bb6 Naked>                              Σ0         ↓ →0x22bdc ←0x22b82
            <MI 22bae  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22bb0  ANDI.W  #0x0100,D0>                                      {}
            <MI 22bb4  BEQ     0x22bdc>                                         {}
        <POP 22bb6-22bdc Naked>                              Σ0         ↓
            <Blob 0x22bb6 [8] @>                             Δ-8                {[«8""»]}
            <POP 22bc6-22bc8 StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Lit 0x22bc8 7>                                                     {[«8""»]|[$$Ss_Resv]}
            <Call 0x22bd6 0x22a2e>                                              {[«8""»]|[$$Ss_Resv]}
            <POP 22bda-22bdc StackAdj>                       Δ+12               {}
        <POP 22bdc-22be4 Naked>                              Σ0         ↓ →0x22c08 ←0x22bae
            <MI 22bdc  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22bde  ANDI.W  #0x0080,D0>                                      {}
            <MI 22be2  BEQ     0x22c08>                                         {}
        <POP 22be4-22c08 Naked>                              Σ0         ↓
            <Blob 0x22be4 [10] @>                            Δ-10               {[«10""»]}
            <POP 22bf4-22bf6 StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x22bf6 9>                                                     {[«10""»]|[$$Ss_Broken]}
            <Call 0x22c02 0x22a2e>                                              {[«10""»]|[$$Ss_Broken]}
            <POP 22c06-22c08 StackAdj>                       Δ+14               {}
        <POP 22c08-22c10 Naked>                              Σ0         ↓ →0x22c30 ←0x22bdc
            <MI 22c08  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22c0a  ANDI.W  #0x0020,D0>                                      {}
            <MI 22c0e  BEQ     0x22c30>                                         {}
        <POP 22c10-22c30 Naked>                              Σ0         ↓
            <Blob 0x22c10 [10] @>                            Δ-10               {[«10""»]}
            <POP 22c1c-22c1e StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x22c1e 10>                                                    {[«10""»]|[$$Ss_Nowrite]}
            <Call 0x22c2a 0x22a2e>                                              {[«10""»]|[$$Ss_Nowrite]}
            <POP 22c2e-22c30 StackAdj>                       Δ+14               {}
        <POP 22c30-22c36 Naked>                              Σ0         ↓ →0x22c5a ←0x22c08
            <MI 22c30  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22c32  AND.W   #0x10,D0>                                        {}
            <MI 22c34  BEQ     0x22c5a>                                         {}
        <POP 22c36-22c5a Naked>                              Σ0         ↓
            <Blob 0x22c36 [10] @>                            Δ-10               {[«10""»]}
            <POP 22c46-22c48 StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x22c48 9>                                                     {[«10""»]|[$$Ss_Noread]}
            <Call 0x22c54 0x22a2e>                                              {[«10""»]|[$$Ss_Noread]}
            <POP 22c58-22c5a StackAdj>                       Δ+14               {}
        <POP 22c5a-22c60 Naked>                              Σ0         ↓ →0x22c88 ←0x22c30
            <MI 22c5a  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22c5c  AND.W   #0x08,D0>                                        {}
            <MI 22c5e  BEQ     0x22c88>                                         {}
        <POP 22c60-22c88 Naked>                              Σ0         ↓
            <Blob 0x22c60 [14] @>                            Δ-14               {[«14""»]}
            <POP 22c70-22c72 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x22c72 13>                                                    {[«14""»]|[$$Ss_Connecting]}
            <Call 0x22c80 0x22a2e>                                              {[«14""»]|[$$Ss_Connecting]}
            <POP 22c84-22c88 StackAdj>                       Δ+18               {}
        <POP 22c88-22c90 Naked>                              Σ0         ↓ →0x22cb4 ←0x22c5a
            <MI 22c88  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22c8a  ANDI.W  #0x0004,D0>                                      {}
            <MI 22c8e  BEQ     0x22cb4>                                         {}
        <POP 22c90-22cb4 Naked>                              Σ0         ↓
            <Blob 0x22c90 [10] @>                            Δ-10               {[«10""»]}
            <POP 22ca0-22ca2 StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x22ca2 9>                                                     {[«10""»]|[$$Ss_Listen]}
            <Call 0x22cae 0x22a2e>                                              {[«10""»]|[$$Ss_Listen]}
            <POP 22cb2-22cb4 StackAdj>                       Δ+14               {}
        <POP 22cb4-22cbc Naked>                              Σ0         ↓ →0x22cdc ←0x22c88
            <MI 22cb4  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22cb6  ANDI.W  #0x0002,D0>                                      {}
            <MI 22cba  BEQ     0x22cdc>                                         {}
        <POP 22cbc-22cdc Naked>                              Σ0         ↓
            <Blob 0x22cbc [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x22cc0 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x22cc4 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 22cc8-22cca StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x22cca 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[$$Ss_Connected]}
            <Call 0x22cd6 0x22a2e>                                              {[«4""»]|[«4""»]|[«4""»]|[$$Ss_Connected]}
            <POP 22cda-22cdc StackAdj>                       Δ+16               {}
        <POP 22cdc-22ce2 Naked>                              Σ0         ↓ →0x22d08 ←0x22cb4
            <MI 22cdc  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22cde  AND.W   #0x01,D0>                                        {}
            <MI 22ce0  BEQ     0x22d08>                                         {}
        <POP 22ce2-22d08 Naked>                              Σ0         ↓
            <Blob 0x22ce2 [8] @>                             Δ-8                {[«8""»]}
            <POP 22cf2-22cf4 StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Lit 0x22cf4 7>                                                     {[«8""»]|[$$Ss_Open]}
            <Call 0x22d02 0x22a2e>                                              {[«8""»]|[$$Ss_Open]}
            <POP 22d06-22d08 StackAdj>                       Δ+12               {}
        <POP 22d08-22d0c Naked>                              Σ0         ↓ →0x22d28 ←0x22cdc
            <MI 22d08  TST.W   (A6+0x8)>                                        {}
            <MI 22d0a  BNE     0x22d28>                                         {}
        <POP 22d0c-22d28 Naked>                              Σ0         ↓
            <Blob 0x22d0c [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x22d10 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 22d14-22d16 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Lit 0x22d16 8>                                                     {[«4""»]|[«4""»]|[$$Ss_Avail]}
            <Call 0x22d22 0x22a2e>                                              {[«4""»]|[«4""»]|[$$Ss_Avail]}
            <POP 22d26-22d28 StackAdj>                       Δ+12               {}
        <POP 22d28-22d2e Naked>                              Σ0         ↓ ←0x22d08
            <Call 0x22d28 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 22d2e-22d36 Epilogue>                           Σ0         

0x22d36


@ 22d36
        <LVAR  0x008 1(r)>
    <POP 22d36-22d7a Body>                                   Δ+2        
        <POP 22d36-22d48 Prologue>                           Σ0         ↓
        <POP 22d48-22d4e Naked>                              Σ0         ↓ →0x22d54
            <MI 22d48  TST.B   (A6+0x8)>                                        {}
            <MI 22d4c  BEQ     0x22d54>                                         {}
        <POP 22d4e-22d54 Naked>                              Σ0 Δ-2     →0x22d58
            <Blob 0x22d4e [2] @>                             Δ-2                {[«2""»]}
            <MI 22d52  BRA     0x22d58>                                         {[«2""»]}
        <POP 22d54-22d58 Naked>                              Σ0 Δ-2     ↓ ←0x22d48
            <Blob 0x22d54 [2] @>                             Δ-2                {[«2""»]}
        <POP 22d58-22d76 Naked>                              Σ-2 Δ+2    ↓ ←0x22d4e
            <POP 22d58-22d5a StackAdj>                       Δ-4                {[-6-]}
            <Lit 0x22d5a>                                                       {[-2-]|[$$…]}
                <Pointer.sp 0x22d5a 4>                       Δ-4        
                <Const 0x22d5e 0x1.2>                        Δ-2        
                <Const 0x22d62 0x2.2>                        Δ-2        
                <Call 0x22d66 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 22d6c-22d6e StackAdj>                   Δ+8        
            <Call 0x22d6e 0x103e0>                                              {[-2-]|[$$…]}
                WriteConsoleStringCrLf(str : String)
            <POP 22d74-22d76 StackAdj>                       Δ+6                {}
        <POP 22d76-22d7a Epilogue>                           Σ0         

0x22d7a


@ 22d7a
        <LVAR  0x00c 4(r)>
        <LVAR  0x00a 2(r)>
        <LVAR  0x008 2(r)>
    <POP 22d7a-22efe Body>                                              
        <POP 22d7a-22d90 Prologue>                           Σ0         ↓
        <POP 22d90-22dac RegCacheLoad>                       Σ0         ↓
        <POP 22dac-22db4 Naked>                              Σ0         ↓ →0x22e30
            <MI 22dac  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 22db0  CMP.W   #0x02,D0>                                        {}
            <MI 22db2  BNE     0x22e30>                                         {}
        <POP 22db4-22e30 Naked>                              Σ0         →0x22ef6
            <Blob 0x22db4 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x22db8 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 22dbc-22dbe StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Lit 0x22dbe 8>                                                     {[«4""»]|[«4""»]|[$$AF_INET_]}
            <Call 0x22dca 0x103d8>                                              {[«4""»]|[«4""»]|[$$AF_INET_]}
                WriteConsoleString(str : String)
            <POP 22dcc-22dce StackAdj>                       Δ+8                {[«4""»]}
            <POP 22dce-22dcf StackAdj>                       Δ+4                {}
            <Blob 0x22dcf [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x22dd2 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x22dd6 [16] @>                            Δ-16               {[«4""»]|[«4""»]|[«16""»]}
            <POP 22de6-22de8 StackAdj>                       Δ-8                {[«4""»]|[«4""»]|[«16""»]|[-8-]}
            <Lit 0x22de8 8>                                                     {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]}
            <POP 22df2-22df4 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]}
            <MI 22df4  CLR.L   D0>                                              {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]}
            <MI 22df6  MOVE.W  (A6+0xa),D0>                                     {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]}
            <MI 22dfa  MOVE.L  D0,-(A7)>                     Δ-4                {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, 'D0']}
            <Call 0x22dfc 0x102e4>                                              {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <Lit 0x22e02 15>                                                    {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[$$, IP address =_]}
            <MI 22e0e  MOVE.L  (A6+0xc),(A7)>                                   {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, '(A6+0xc)']}
            <POP 22e0c-22e0e StackAdj>                       Δ-8                {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, '(A6+0xc)']|[-8-]}
            <Const 0x22e12 0x8.4>                            Δ-4                {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, '(A6+0xc)']|[-8-]|[##8]}
            <Call 0x22e16 0x102e8>                                              {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, '(A6+0xc)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 22e18-22e1a StackAdj>                       Δ+8                {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, '(A6+0xc)']|[-4-]}
            <Call 0x22e1a 0x102d8>                                              {[«4""»]|[«4""»]|[«16""»]|[-4-]|[$$, PORT=_]|[-4-]|[4, '(A6+0xc)']|[-4-]}
                StringCat4(a, b, c, d : String) : String
            <POP 22e20-22e22 StackAdj>                       Δ+16               {[«4""»]|[«4""»]|[«16""»]|[-4-]}
            <Call 0x22e22 0x103e0>                                              {[«4""»]|[«4""»]|[«16""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 22e28-22e2c StackAdj>                       Δ+28               {}
            <MI 22e2c  BRA     0x22ef6>                                         {}
        <POP 22e30-22eb2 Naked>                              Σ0         ↓ ←0x22dac
            <Blob 0x22e30 [8] @>                             Δ-8                {[«8""»]}
            <POP 22e40-22e42 StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Lit 0x22e42 7>                                                     {[«8""»]|[$$AF_ETH_]}
            <Call 0x22e50 0x103d8>                                              {[«8""»]|[$$AF_ETH_]}
                WriteConsoleString(str : String)
            <MI 22e52  MOVEA.L A7,A0>                                           {[«8""»]|[$$AF_ETH_]}
            <MI 22e54  LEA.L   0x2070e,A1>                                      {[«8""»]|[$$AF_ETH_]}
            <BlockMove 11,A1,A0>                                                {[«8""»]|[$$AF_ETH_]}
            <Blob 0x22e60 [22] @>                            Δ-22               {[«8""»]|[$$AF_ETH_]|[«22""»]}
            <POP 22e72-22e74 StackAdj>                       Δ-8                {[«8""»]|[$$AF_ETH_]|[«22""»]|[-8-]}
            <Lit 0x22e74>                                                       {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]}
                <Pointer.sp 0x22e74 30>                      Δ-4        
                <Const 0x22e78 0x1.2>                        Δ-2        
                <Const 0x22e7a 0xb.2>                        Δ-2        
                <Call 0x22e7e 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 22e80-22e82 StackAdj>                   Δ+8        
            <POP 22e80-22e82 StackAdj>                       Δ-4                {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]}
            <MI 22e82  CLR.L   D0>                                              {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]}
            <MI 22e84  MOVE.W  (A6+0xa),D0>                                     {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]}
            <MI 22e88  MOVE.L  D0,-(A7)>                     Δ-4                {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]|[4, 'D0']}
            <Const 0x22e8a 0x4.4>                            Δ-4                {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x22e8e 0x102e8>                                              {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 22e90-22e92 StackAdj>                       Δ+4                {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]|[4, 'D0']}
            <Lit 0x22e92 21>                                                    {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]|[$$, ETHERNET address =_]}
            <Call 0x22ea0 0x102d4>                                              {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]|[$$…]|[-4-]|[$$, ETHERNET address =_]}
                StringCat3(a, b, c : String) : String
            <POP 22ea6-22eaa StackAdj>                       Δ+12               {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]}
            <Call 0x22eaa 0x103d8>                                              {[«8""»]|[$$AF_ETH_]|[«22""»]|[-4-]}
                WriteConsoleString(str : String)
            <POP 22eac-22eb0 StackAdj>                       Δ+38               {}
            <MI 22eb0  MOVEQ.L #0x00,D7>                                        {}
        <POP 22eb2-22ed2 Naked>                              Σ0         ↓ →0x22eda ←0x22ef0
            <POP 22eb2-22eb4 StackAdj>                       Δ-4                {[-4-]}
            <POP 0x22eb4 LimitCheck 0x0 ≤ D7 ≤ 0x5>                             {[-4-]}
            <MI 22eba  CLR.L   D0>                                              {[-4-]}
            <MI 22ebc  MOVE.B  (A6+D7.L+#0xc),D0>                               {[-4-]}
            <MI 22ec0  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x22ec2 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x22ec6 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 22ec8-22eca StackAdj>                       Δ+8                {[-4-]}
            <Call 0x22eca 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 22ecc-22ece StackAdj>                       Δ+4                {}
            <MI 22ece  CMP.L   #0x05,D7>                                        {}
            <MI 22ed0  BNE     0x22eda>                                         {}
        <POP 22ed2-22eda Naked>                              Σ0         →0x22ef0
            <Call 0x22ed2 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 22ed8  BRA     0x22ef0>                                         {}
        <POP 22eda-22ef0 Naked>                              Σ0         ↓ ←0x22eb2
            <Blob 0x22eda [2] @>                             Δ-2                {[«2""»]}
            <POP 22ede-22ee0 StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x22ee0 2>                                                     {[«2""»]|[$$- ]}
            <Call 0x22eec 0x103d8>                                              {[«2""»]|[$$- ]}
                WriteConsoleString(str : String)
            <POP 22eee-22ef0 StackAdj>                       Δ+6                {}
        <POP 22ef0-22ef6 Naked>                              Σ0         ↓ →0x22eb2 ←0x22ed2
            <MI 22ef0  ADDQ.L  #0x1,D7>                                         {}
            <MI 22ef2  CMP.L   #0x05,D7>                                        {}
            <MI 22ef4  BLE     0x22eb2>                                         {}
        <POP 22ef6-22efe Epilogue>                           Σ0         ←0x22db4

0x22efe


@ 22efe
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x00c 4(w)>
        <LVAR -0x010 4(w)>
        <LVAR -0x014 4(w)>
        <LVAR -0x018 4(w)>
    <POP 22efe-2301c Body>                                              
        <POP 22efe-22f14 Prologue>                           Σ0         ↓
        <POP 22f14-22f24 RegCacheLoad>                       Σ0         ↓
        <POP 22f24-22f40 Naked>                              Σ0         ↓
            <MI 22f24  MOVE.L  (A6+0x8),(A6-0x18)>                              {}
            <MI 22f2a  MOVE.L  (A6+0xc),(A6-0x14)>                              {}
            <MI 22f30  MOVE.L  (A6+0x10),(A6-0x10)>                             {}
            <MI 22f36  MOVE.L  (A6+0x14),(A6-0xc)>                              {}
            <MI 22f3c  MOVEQ.L #0x01,D6>                                        {}
            <MI 22f3e  MOVEQ.L #0x00,D7>                                        {}
        <POP 22f40-22f4c Naked>                              Σ0         ↓ →0x22f4e ←0x22f4e
            <POP 0x22f40 LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {}
            <MI 22f46  TST.B   (A6+D7.L-#0x18)>                                 {}
            <MI 22f4a  BEQ     0x22f4e>                                         {}
        <POP 22f4c-22f4e Naked>                              Σ0         ↓
            <MI 22f4c  MOVEQ.L #0x00,D6>                                        {}
        <POP 22f4e-22f54 Naked>                              Σ0         ↓ →0x22f40 ←0x22f40
            <MI 22f4e  ADDQ.L  #0x1,D7>                                         {}
            <MI 22f50  CMP.L   #0x0f,D7>                                        {}
            <MI 22f52  BLE     0x22f40>                                         {}
        <POP 22f54-22f58 Naked>                              Σ0         ↓ →0x22f82
            <MI 22f54  TST.B   D6>                                              {}
            <MI 22f56  BEQ     0x22f82>                                         {}
        <POP 22f58-22f82 Naked>                              Σ0         →0x23014
            <Blob 0x22f58 [18] @>                            Δ-18               {[«18""»]}
            <POP 22f64-22f66 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x22f66 18>                                                    {[«18""»]|[$$ is empty (all 0s)]}
            <Call 0x22f74 0x103e0>                                              {[«18""»]|[$$ is empty (all 0s)]}
                WriteConsoleStringCrLf(str : String)
            <POP 22f7a-22f7e StackAdj>                       Δ+22               {}
            <MI 22f7e  BRA     0x23014>                                         {}
        <POP 22f82-22fac Naked>                              Σ0         ↓ ←0x22f54
            <Blob 0x22f82 [26] @>                            Δ-26               {[«26""»]}
            <POP 22f94-22f96 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x22f96 25>                                                    {[«26""»]|[$$ is unknown         : 16#]}
            <Call 0x22fa4 0x103d8>                                              {[«26""»]|[$$ is unknown         : 16#]}
                WriteConsoleString(str : String)
            <POP 22fa6-22faa StackAdj>                       Δ+30               {}
            <MI 22faa  MOVEQ.L #0x00,D7>                                        {}
        <POP 22fac-22fde Naked>                              Σ0         ↓ →0x23008 ←0x23008
            <POP 22fac-22fae StackAdj>                       Δ-4                {[-4-]}
            <POP 0x22fae LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {[-4-]}
            <MI 22fb4  CLR.L   D0>                                              {[-4-]}
            <MI 22fb6  MOVE.B  (A6+D7.L-#0x18),D0>                              {[-4-]}
            <MI 22fba  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x22fbc 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x22fc0 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 22fc6-22fc8 StackAdj>                       Δ+8                {[-4-]}
            <Call 0x22fc8 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 22fca-22fcc StackAdj>                       Δ+4                {}
            <MI 22fcc  MOVE.L  D7,D0>                                           {}
            <MI 22fce  ADDQ.L  #0x1,D0>                                         {}
            <MI 22fd0  MOVE.L  D0,D4>                                           {}
            <MI 22fd2  MOVEQ.L #0x04,D3>                                        {}
            <Call 0x22fd4 0x10294>                                              {}
                ?divs_d3_d4
            <MI 22fda  TST.L   D3>                                              {}
            <MI 22fdc  BNE     0x23008>                                         {}
        <POP 22fde-22fe2 Naked>                              Σ0         ↓ →0x23008
            <MI 22fde  CMP.L   #0x0f,D7>                                        {}
            <MI 22fe0  BEQ     0x23008>                                         {}
        <POP 22fe2-23008 Naked>                              Σ0         ↓
            <Blob 0x22fe2 [6] @>                             Δ-6                {[«6""»]}
            <POP 22ff2-22ff4 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x22ff4 5>                                                     {[«6""»]|[$$, 16#]}
            <Call 0x23002 0x103d8>                                              {[«6""»]|[$$, 16#]}
                WriteConsoleString(str : String)
            <POP 23004-23008 StackAdj>                       Δ+10               {}
        <POP 23008-2300e Naked>                              Σ0         ↓ →0x22fac ←0x22fac ←0x22fde
            <MI 23008  ADDQ.L  #0x1,D7>                                         {}
            <MI 2300a  CMP.L   #0x0f,D7>                                        {}
            <MI 2300c  BLE     0x22fac>                                         {}
        <POP 2300e-23014 Naked>                              Σ0         ↓
            <Call 0x2300e 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 23014-2301c Epilogue>                           Σ0         ←0x22f58

0x2301c


@ 2301c
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 4(r)>
        <LVAR -0x008 4(r)>
        <LVAR -0x00a 2(r)>
        <LVAR -0x00e 4(r)>
        <LVAR -0x010 2(r)>
        <LVAR -0x014 4(r)>
        <LVAR -0x018 4(r)>
        <LVAR -0x01c 4(r)>
        <LVAR -0x01e 2(r)>
        <LVAR -0x01f 1(r)>
        <LVAR -0x020 1(r)>
        <LVAR -0x021 1(r)>
        <LVAR -0x022 1(r)>
        <LVAR -0x026 @ 4(r)>
        <LVAR -0x02e 4(r)>
        <LVAR -0x032 4(r)>
        <LVAR -0x036 4(r)>
        <LVAR -0x03a 2(r) 4(r)>
        <LVAR -0x03e 4(r)>
        <LVAR -0x042 4(r)>
        <LVAR -0x046 4(r)>
        <LVAR -0x04a 2(r) 4(r)>
        <LVAR -0x04e 4(r)>
        <LVAR -0x051 1(r)>
        <LVAR -0x052 1(r)>
        <LVAR -0x056 4(r)>
        <LVAR -0x05a 4(r)>
        <LVAR -0x05e 4(r)>
        <LVAR -0x062 4(r)>
        <LVAR -0x066 2(r)>
        <LVAR -0x068 2(r)>
        <LVAR -0x06a 2(r)>
        <LVAR -0x072 4(r)>
        <LVAR -0x074 2(r)>
        <LVAR -0x076 2(r)>
        <LVAR -0x078 2(r)>
        <LVAR -0x07a @ 2(r)>
        <LVAR -0x088 @ 2(w)>
    <POP 2301c-23b48 Body>                                   Δ+42       
        <POP 2301c-23032 Prologue>                           Σ0         ↓
        <POP 23032-2303e RegCacheLoad>                       Σ0         ↓
        <POP 2303e-230c4 Naked>                              Σ0         ↓
            <Blob 0x2303e [32] @>                            Δ-32               {[«32""»]}
            <POP 2304a-2304c StackAdj>                       Δ-8                {[«32""»]|[-8-]}
            <Lit 0x2304c 32>                                                    {[«32""»]|[-4-]|[$$IOP Channel structure address =_]}
            <MI 2305a  MOVE.L  (A6+0x8),(A7)>                                   {[«32""»]|[-4-]|[4, '(A6+0x8)']}
            <POP 23058-2305a StackAdj>                       Δ-8                {[«32""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
            <Const 0x2305e 0x6.4>                            Δ-4                {[«32""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##6]}
            <Call 0x23062 0x102e8>                                              {[«32""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##6]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23064-23066 StackAdj>                       Δ+8                {[«32""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
            <Call 0x23066 0x102d0>                                              {[«32""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2306c-2306e StackAdj>                       Δ+8                {[«32""»]|[-4-]}
            <Call 0x2306e 0x103e0>                                              {[«32""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23074-23078 StackAdj>                       Δ+36               {}
            <MI 23078  MOVE.L  (A6+0xc),D4>                                     {}
            <MI 2307c  MOVEQ.L #0x50,D3>                                        {}
            <Call 0x2307e 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 23084  MOVE.L  (A6+0x10),D5>                                    {}
            <MI 23088  ADD.L   D4,D5>                                           {}
            <Blob 0x2308a [32] @>                            Δ-32               {[«32""»]}
            <POP 23096-23098 StackAdj>                       Δ-8                {[«32""»]|[-8-]}
            <Lit 0x23098 32>                                                    {[«32""»]|[-4-]|[$$ENP Channel structure address =_]}
            <MI 230a6  MOVE.L  D5,(A7)>                                         {[«32""»]|[-4-]|[4, 'D5']}
            <POP 230a4-230a6 StackAdj>                       Δ-8                {[«32""»]|[-4-]|[4, 'D5']|[-8-]}
            <Const 0x230a8 0x6.4>                            Δ-4                {[«32""»]|[-4-]|[4, 'D5']|[-8-]|[##6]}
            <Call 0x230ac 0x102e8>                                              {[«32""»]|[-4-]|[4, 'D5']|[-8-]|[##6]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 230ae-230b0 StackAdj>                       Δ+8                {[«32""»]|[-4-]|[4, 'D5']|[-4-]}
            <Call 0x230b0 0x102d0>                                              {[«32""»]|[-4-]|[4, 'D5']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 230b6-230b8 StackAdj>                       Δ+8                {[«32""»]|[-4-]}
            <Call 0x230b8 0x103e0>                                              {[«32""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 230be-230c2 StackAdj>                       Δ+36               {}
            <MI 230c2  MOVEQ.L #0x00,D6>                                        {}
        <POP 230c4-23102 Naked>                              Σ0         →0x23106 →0x23130 ←0x2314a
            <MI 230c4  MOVE.L  D6,D0>                                           {}
            <MI 230c6  ASL.L   #0x1,D0>                                         {}
            <MI 230c8  MOVE.L  D5,D1>                                           {}
            <MI 230ca  ADD.L   D0,D1>                                           {}
            <MI 230cc  MOVE.L  D1,D4>                                           {}
            <MI 230ce  MOVE.L  #0x100,D3>                                       {}
            <Call 0x230d4 0x10294>                                              {}
                ?divs_d3_d4
            <POP 0x230da LimitCheck 0x0 ≤ D4 ≤ 0xffff>                          {}
            <MI 230e4  MOVE.W  D4,(A6-0x88)>                                    {}
            <MI 230e8  MOVE.B  0x2d8b2,D2>                                      {}
            <MI 230ee  EXTB.W  D2>                                              {}
            <POP 0x230f0 LimitCheck 0x0 ≤ D2 ≤ 0x1>                             {}
            <MI 230f8  ADD.W   D2,D2>                                           {}
            <MI 230fa  SWITCH  D2.W>                                            {}
        <POP 23106-23130 Naked>                              Σ0 Δ-10    →0x2314a ←0x230c4
            <MI 23106  MOVE.L  D1,D4>                                           {}
            <MI 23108  MOVE.L  #0x400,D3>                                       {}
            <Call 0x2310e 0x10294>                                              {}
                ?divs_d3_d4
            <MI 23114  MOVE.L  D3,-(A7)>                     Δ-4                {[4, 'D3']}
            <MI 23116  MOVE.L  0x2c7c0,D7>                                      {[4, 'D3']}
            <MI 2311c  ADD.L   (A7)+,D7>                     Δ+4                {}
            <MI 2311e  LEA.L   (A6-0x88),A0>                                    {}
            <MI 23122  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x23124 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Blob 0x23128 [4] 0x2c7a4>                       Δ-4                {[4, 'A0']|[#1]|[«4»]}
            <MI 2312e  BRA     0x2314a>                                         {[4, 'A0']|[#1]|[«4»]}
        <POP 23130-2314a Naked>                              Σ0 Δ-10    ↓ ←0x230c4
            <MI 23130  MOVE.L  D3,-(A7)>                     Δ-4                {[4, 'D3']}
            <MI 23132  MOVE.L  0x2e1dc,D7>                                      {[4, 'D3']}
            <MI 23138  ADD.L   (A7)+,D7>                     Δ+4                {}
            <MI 2313a  LEA.L   (A6-0x88),A0>                                    {}
            <MI 2313e  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x23140 0x1.2>                            Δ-2                {[4, 'A0']|[#1]}
            <Blob 0x23144 [4] 0x2e1cc>                       Δ-4                {[4, 'A0']|[#1]|[«4»]}
        <POP 2314a-23188 Naked>                              Σ-10 Δ+10  ↓ →0x230c4 ←0x23106
            <Const 0x2314a 0x5.2>                            Δ-2                {[-10-]|[#5]}
            <Const 0x2314e 0x2.2>                            Δ-2                {[-10-]|[#5]|[#2]}
            <Call 0x23152 0x1023a>                                              {[-10-]|[#5]|[#2]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 23158-2315c StackAdj>                       Δ+10               {[-4-]}
            <MI 2315c  MOVE.L  D7,(A7)>                                         {[4, 'D7']}
            <Const 0x2315e 0x5.2>                            Δ-2                {[4, 'D7']|[#5]}
            <MI 23162  LEA.L   (A6-0x7a),A0>                                    {[4, 'D7']|[#5]}
            <MI 23166  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'D7']|[#5]|[4, 'A0']}
            <MI 23168  ADD.L   D0,(A7)>                                         {[4, 'D7']|[#5]|[-4-]}
            <Const 0x2316a 0x1.2>                            Δ-2                {[4, 'D7']|[#5]|[-4-]|[#1]}
            <Const 0x2316e 0x2.2>                            Δ-2                {[4, 'D7']|[#5]|[-4-]|[#1]|[#2]}
            <Call 0x23172 0x1023a>                                              {[4, 'D7']|[#5]|[-4-]|[#1]|[#2]}
                KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
            <POP 23178-2317c StackAdj>                       Δ+14               {}
            <MI 2317c  ADDQ.L  #0x1,D6>                                         {}
            <MI 2317e  CMPI.L  #0x00000028,D6>                                  {}
            <MI 23184  BLE     0x230c4>                                         {}
        <POP 23188-23aa6 Naked>                              Σ0         ↓ →0x23aac
            <MI 23188  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <MI 2318c  LEA.L   (A6-0x26),A0>                                    {[4, '(A6+0x8)']}
            <MI 23190  MOVE.L  A0,-(A7)>                     Δ-4                {[4, '(A6+0x8)']|[4, 'A0']}
            <Const 0x23192 0x26.2>                           Δ-2                {[4, '(A6+0x8)']|[4, 'A0']|[#38]}
            <Call 0x23196 0x10238>                                              {[4, '(A6+0x8)']|[4, 'A0']|[#38]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2319c-2319d StackAdj>                       Δ+10       ↓       {}
            <Blob 0x2319d [26] @>                            Δ-26               {[«26""»]}
            <POP 231ae-231b0 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x231b0 25>                                                    {[«26""»]|[-4-]|[$$eccb_rx_link        : 16#]}
            <MI 231be  MOVE.L  (A6-0x26),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x26)']}
            <POP 231bc-231be StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x26)']|[-8-]}
            <Const 0x231c2 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x26)']|[-8-]|[##8]}
            <Call 0x231c6 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x26)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 231c8-231ca StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x26)']|[-4-]}
            <Call 0x231ca 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x26)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 231d0-231d2 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x231d2 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 231d8-231dc StackAdj>                       Δ+26               {[-4-]}
            <POP 231dc-231dd StackAdj>                       Δ+4                {}
            <Blob 0x231dd [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x231e0 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x231e4 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 231e8-231ea StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x231ea 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[$$eccb_flags :]}
            <Call 0x231fa 0x103e0>                                              {[«4""»]|[«4""»]|[«4""»]|[$$eccb_flags :]}
                WriteConsoleStringCrLf(str : String)
            <POP 23200-23201 StackAdj>                       Δ+16       ↓       {}
            <Blob 0x23201 [26] @>                            Δ-26               {[«26""»]}
            <POP 23212-23214 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x23214 25>                                                    {[«26""»]|[$$   b_ecf_exists       =>_]}
            <Call 0x23224 0x103d8>                                              {[«26""»]|[$$   b_ecf_exists       =>_]}
                WriteConsoleString(str : String)
            <POP 2322a-2322e StackAdj>                       Δ+30               {}
            <MI 2322e  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 23232  LSR.B   #0x7,D0>                                         {}
            <MI 23234  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x23236 0x22d36>                                              {[2, 'D0']}
            <POP 2323a-2323b StackAdj>                       Δ+2        ↓       {}
            <Blob 0x2323b [26] @>                            Δ-26               {[«26""»]}
            <POP 2324c-2324e StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2324e 25>                                                    {[«26""»]|[$$   b_ecf_tx_flush     =>_]}
            <Call 0x2325e 0x103d8>                                              {[«26""»]|[$$   b_ecf_tx_flush     =>_]}
                WriteConsoleString(str : String)
            <POP 23264-23268 StackAdj>                       Δ+30               {}
            <MI 23268  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 2326c  LSL.B   #0x1,D0>                                         {}
            <MI 2326e  LSR.B   #0x7,D0>                                         {}
            <MI 23270  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x23272 0x22d36>                                              {[2, 'D0']}
            <POP 23276-23277 StackAdj>                       Δ+2        ↓       {}
            <Blob 0x23277 [26] @>                            Δ-26               {[«26""»]}
            <POP 23288-2328a StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2328a 25>                                                    {[«26""»]|[$$   b_ecf_on_input     =>_]}
            <Call 0x2329a 0x103d8>                                              {[«26""»]|[$$   b_ecf_on_input     =>_]}
                WriteConsoleString(str : String)
            <POP 232a0-232a4 StackAdj>                       Δ+30               {}
            <MI 232a4  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 232a8  LSL.B   #0x2,D0>                                         {}
            <MI 232aa  LSR.B   #0x7,D0>                                         {}
            <MI 232ac  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x232ae 0x22d36>                                              {[2, 'D0']}
            <POP 232b2-232b3 StackAdj>                       Δ+2        ↓       {}
            <Blob 0x232b3 [26] @>                            Δ-26               {[«26""»]}
            <POP 232c4-232c6 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x232c6 25>                                                    {[«26""»]|[$$   b_ecf_continuation =>_]}
            <Call 0x232d6 0x103d8>                                              {[«26""»]|[$$   b_ecf_continuation =>_]}
                WriteConsoleString(str : String)
            <POP 232dc-232e0 StackAdj>                       Δ+30               {}
            <MI 232e0  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 232e4  LSL.B   #0x3,D0>                                         {}
            <MI 232e6  LSR.B   #0x7,D0>                                         {}
            <MI 232e8  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x232ea 0x22d36>                                              {[2, 'D0']}
            <POP 232ee-232ef StackAdj>                       Δ+2        ↓       {}
            <Blob 0x232ef [26] @>                            Δ-26               {[«26""»]}
            <POP 23300-23302 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x23302 25>                                                    {[«26""»]|[$$   b_ecf_xoff_med     =>_]}
            <Call 0x23312 0x103d8>                                              {[«26""»]|[$$   b_ecf_xoff_med     =>_]}
                WriteConsoleString(str : String)
            <POP 23318-2331c StackAdj>                       Δ+30               {}
            <MI 2331c  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 23320  LSL.B   #0x4,D0>                                         {}
            <MI 23322  LSR.B   #0x7,D0>                                         {}
            <MI 23324  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x23326 0x22d36>                                              {[2, 'D0']}
            <POP 2332a-2332b StackAdj>                       Δ+2        ↓       {}
            <Blob 0x2332b [26] @>                            Δ-26               {[«26""»]}
            <POP 2333c-2333e StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2333e 25>                                                    {[«26""»]|[$$   b_ecf_xoff_short   =>_]}
            <Call 0x2334e 0x103d8>                                              {[«26""»]|[$$   b_ecf_xoff_short   =>_]}
                WriteConsoleString(str : String)
            <POP 23354-23358 StackAdj>                       Δ+30               {}
            <MI 23358  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 2335c  LSL.B   #0x5,D0>                                         {}
            <MI 2335e  LSR.B   #0x7,D0>                                         {}
            <MI 23360  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x23362 0x22d36>                                              {[2, 'D0']}
            <POP 23366-23367 StackAdj>                       Δ+2        ↓       {}
            <Blob 0x23367 [26] @>                            Δ-26               {[«26""»]}
            <POP 23378-2337a StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2337a 25>                                                    {[«26""»]|[$$   b_ecf_tx_gathering =>_]}
            <Call 0x2338a 0x103d8>                                              {[«26""»]|[$$   b_ecf_tx_gathering =>_]}
                WriteConsoleString(str : String)
            <POP 23390-23394 StackAdj>                       Δ+30               {}
            <MI 23394  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 23398  LSL.B   #0x6,D0>                                         {}
            <MI 2339a  LSR.B   #0x7,D0>                                         {}
            <MI 2339c  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x2339e 0x22d36>                                              {[2, 'D0']}
            <POP 233a2-233a3 StackAdj>                       Δ+2        ↓       {}
            <Blob 0x233a3 [26] @>                            Δ-26               {[«26""»]}
            <POP 233b4-233b6 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x233b6 25>                                                    {[«26""»]|[$$   b_ecf_rx_gathering =>_]}
            <Call 0x233c6 0x103d8>                                              {[«26""»]|[$$   b_ecf_rx_gathering =>_]}
                WriteConsoleString(str : String)
            <POP 233cc-233d0 StackAdj>                       Δ+30               {}
            <MI 233d0  MOVE.B  (A6-0x22),D0>                                    {}
            <MI 233d4  LSL.B   #0x7,D0>                                         {}
            <MI 233d6  LSR.B   #0x7,D0>                                         {}
            <MI 233d8  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x233da 0x22d36>                                              {[2, 'D0']}
            <POP 233de-233df StackAdj>                       Δ+2        ↓       {}
            <Blob 0x233df [26] @>                            Δ-26               {[«26""»]}
            <POP 233f0-233f2 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x233f2 25>                                                    {[«26""»]|[-4-]|[$$eccb_credits        : 16#]}
            <POP 23400-23402 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]}
            <MI 23402  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]}
            <MI 23404  MOVE.B  (A6-0x21),D0>                                    {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]}
            <MI 23408  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]|[4, 'D0']}
            <Const 0x2340a 0x2.4>                            Δ-4                {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2340e 0x102e8>                                              {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23410-23412 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]}
            <Call 0x23412 0x102d0>                                              {[«26""»]|[-4-]|[$$eccb_credits        : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23418-2341a StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x2341a 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23420-23421 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23421 [26] @>                            Δ-26               {[«26""»]}
            <POP 23430-23432 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23432 25>                                                    {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]}
            <POP 23440-23442 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]}
            <MI 23442  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]}
            <MI 23444  MOVE.B  (A6-0x20),D0>                                    {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]}
            <MI 23448  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]|[4, 'D0']}
            <Const 0x2344a 0x2.4>                            Δ-4                {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2344e 0x102e8>                                              {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23450-23452 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]}
            <Call 0x23452 0x102d0>                                              {[«26""»]|[-4-]|[$$eccb_shorts_in_use  : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23458-2345a StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x2345a 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23460-23461 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23461 [26] @>                            Δ-26               {[«26""»]}
            <POP 23470-23472 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23472 25>                                                    {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]}
            <POP 23480-23482 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]}
            <MI 23482  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]}
            <MI 23484  MOVE.B  (A6-0x1f),D0>                                    {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]}
            <MI 23488  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]|[4, 'D0']}
            <Const 0x2348a 0x2.4>                            Δ-4                {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x2348e 0x102e8>                                              {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23490-23492 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]}
            <Call 0x23492 0x102d0>                                              {[«26""»]|[-4-]|[$$eccb_mediums_in_use : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23498-2349a StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x2349a 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 234a0-234a1 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x234a1 [26] @>                            Δ-26               {[«26""»]}
            <POP 234b0-234b2 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x234b2 25>                                                    {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]}
            <POP 234c0-234c2 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]}
            <MI 234c2  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]}
            <MI 234c4  MOVE.W  (A6-0x1e),D0>                                    {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]}
            <MI 234c8  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]|[4, 'D0']}
            <Const 0x234ca 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x234ce 0x102e8>                                              {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 234d0-234d2 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]}
            <Call 0x234d2 0x102d0>                                              {[«26""»]|[-4-]|[$$eccb_channel_number : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 234d8-234da StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x234da 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 234e0-234e1 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x234e1 [26] @>                            Δ-26               {[«26""»]}
            <POP 234f0-234f2 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x234f2 25>                                                    {[«26""»]|[-4-]|[$$eccb_cstruct        : 16#]}
            <MI 23500  MOVE.L  (A6-0x1c),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x1c)']}
            <POP 234fe-23500 StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x1c)']|[-8-]}
            <Const 0x23504 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x1c)']|[-8-]|[##8]}
            <Call 0x23508 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x1c)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2350a-2350c StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x1c)']|[-4-]}
            <Call 0x2350c 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x1c)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23512-23514 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23514 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2351a-2351b StackAdj>                       Δ+30       ↓       {}
            <Blob 0x2351b [26] @>                            Δ-26               {[«26""»]}
            <POP 2352a-2352c StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2352c 25>                                                    {[«26""»]|[-4-]|[$$eccb_huge_tx_base   : 16#]}
            <MI 2353a  MOVE.L  (A6-0x18),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x18)']}
            <POP 23538-2353a StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x18)']|[-8-]}
            <Const 0x2353e 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x18)']|[-8-]|[##8]}
            <Call 0x23542 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x18)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23544-23546 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x18)']|[-4-]}
            <Call 0x23546 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x18)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2354c-2354e StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x2354e 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23554-23555 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23555 [26] @>                            Δ-26               {[«26""»]}
            <POP 23564-23566 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23566 25>                                                    {[«26""»]|[-4-]|[$$eccb_huge_tx_next   : 16#]}
            <MI 23574  MOVE.L  (A6-0x14),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x14)']}
            <POP 23572-23574 StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x14)']|[-8-]}
            <Const 0x23578 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x14)']|[-8-]|[##8]}
            <Call 0x2357c 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x14)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2357e-23580 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x14)']|[-4-]}
            <Call 0x23580 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x14)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23586-23588 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23588 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2358e-2358f StackAdj>                       Δ+30       ↓       {}
            <Blob 0x2358f [26] @>                            Δ-26               {[«26""»]}
            <POP 2359e-235a0 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x235a0 25>                                                    {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]}
            <POP 235ae-235b0 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]}
            <MI 235b0  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]}
            <MI 235b2  MOVE.W  (A6-0x10),D0>                                    {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]}
            <MI 235b6  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]|[4, 'D0']}
            <Const 0x235b8 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x235bc 0x102e8>                                              {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 235be-235c0 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]}
            <Call 0x235c0 0x102d0>                                              {[«26""»]|[-4-]|[$$eccb_huge_tx_left   : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 235c6-235c8 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x235c8 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 235ce-235cf StackAdj>                       Δ+30       ↓       {}
            <Blob 0x235cf [26] @>                            Δ-26               {[«26""»]}
            <POP 235de-235e0 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x235e0 25>                                                    {[«26""»]|[-4-]|[$$eccb_huge_rx_next   : 16#]}
            <MI 235ee  MOVE.L  (A6-0xe),(A7)>                                   {[«26""»]|[-4-]|[4, '(A6-0xe)']}
            <POP 235ec-235ee StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0xe)']|[-8-]}
            <Const 0x235f2 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0xe)']|[-8-]|[##8]}
            <Call 0x235f6 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0xe)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 235f8-235fa StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0xe)']|[-4-]}
            <Call 0x235fa 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0xe)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23600-23602 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23602 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23608-23609 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23609 [26] @>                            Δ-26               {[«26""»]}
            <POP 23618-2361a StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2361a 25>                                                    {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]}
            <POP 23628-2362a StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]}
            <MI 2362a  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]}
            <MI 2362c  MOVE.W  (A6-0xa),D0>                                     {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]}
            <MI 23630  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]|[4, 'D0']}
            <Const 0x23632 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x23636 0x102e8>                                              {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23638-2363a StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]}
            <Call 0x2363a 0x102d0>                                              {[«26""»]|[-4-]|[$$eccb_huge_rx_left   : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23640-23642 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23642 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23648-23649 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23649 [26] @>                            Δ-26               {[«26""»]}
            <POP 23658-2365a StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2365a 25>                                                    {[«26""»]|[-4-]|[$$eccb_rx_buffer_head : 16#]}
            <MI 23668  MOVE.L  (A6-0x8),(A7)>                                   {[«26""»]|[-4-]|[4, '(A6-0x8)']}
            <POP 23666-23668 StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x8)']|[-8-]}
            <Const 0x2366c 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x8)']|[-8-]|[##8]}
            <Call 0x23670 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x8)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23672-23674 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x8)']|[-4-]}
            <Call 0x23674 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x8)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2367a-2367c StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x2367c 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23682-23683 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23683 [26] @>                            Δ-26               {[«26""»]}
            <POP 23692-23694 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23694 25>                                                    {[«26""»]|[-4-]|[$$eccb_rx_buffer_tail : 16#]}
            <MI 236a2  MOVE.L  (A6-0x4),(A7)>                                   {[«26""»]|[-4-]|[4, '(A6-0x4)']}
            <POP 236a0-236a2 StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
            <Const 0x236a6 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[##8]}
            <Call 0x236aa 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 236ac-236ae StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
            <Call 0x236ae 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 236b4-236b6 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x236b6 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 236bc-236bd StackAdj>                       Δ+30       ↓       {}
            <Blob 0x236bd [26] @>                            Δ-26               {[«26""»]}
            <POP 236cc-236ce StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x236ce 25>                                                    {[«26""»]|[-4-]|[$$c_state             : 16#]}
            <POP 236dc-236de StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]}
            <MI 236de  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]}
            <MI 236e0  MOVE.W  (A6-0x7a),D0>                                    {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]}
            <MI 236e4  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]|[4, 'D0']}
            <Const 0x236e6 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x236ea 0x102e8>                                              {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 236ec-236ee StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]}
            <Call 0x236ee 0x102d0>                                              {[«26""»]|[-4-]|[$$c_state             : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 236f4-236f6 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x236f6 0x103d8>                                              {[«26""»]|[-4-]}
                WriteConsoleString(str : String)
            <POP 236fc-23700 StackAdj>                       Δ+28               {[-2-]}
            <MI 23700  MOVE.W  (A6-0x7a),(A7)>                                  {[2, '(A6-0x7a)']}
            <MI 23704  LEA.L   (A6-0x88),A4>                                    {[2, '(A6-0x7a)']}
            <Call 0x23708 0x22a8a>                                              {[2, '(A6-0x7a)']}
            <POP 2370c-2370d StackAdj>                       Δ+2        ↓       {}
            <Blob 0x2370d [26] @>                            Δ-26               {[«26""»]}
            <POP 2371e-23720 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23720 25>                                                    {[«26""»]|[-4-]|[$$c_hstate            : 16#]}
            <POP 2372e-23730 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]}
            <MI 23730  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]}
            <MI 23732  MOVE.W  (A6-0x78),D0>                                    {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]}
            <MI 23736  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]|[4, 'D0']}
            <Const 0x23738 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x2373c 0x102e8>                                              {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2373e-23740 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]}
            <Call 0x23740 0x102d0>                                              {[«26""»]|[-4-]|[$$c_hstate            : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23746-23748 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23748 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2374e-2374f StackAdj>                       Δ+30       ↓       {}
            <Blob 0x2374f [26] @>                            Δ-26               {[«26""»]}
            <POP 2375e-23760 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23760 25>                                                    {[«26""»]|[-4-]|[$$c_options           : 16#]}
            <POP 2376e-23770 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]}
            <MI 23770  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]}
            <MI 23772  MOVE.W  (A6-0x76),D0>                                    {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]}
            <MI 23776  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]|[4, 'D0']}
            <Const 0x23778 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x2377c 0x102e8>                                              {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2377e-23780 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]}
            <Call 0x23780 0x102d0>                                              {[«26""»]|[-4-]|[$$c_options           : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23786-23788 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23788 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2378e-2378f StackAdj>                       Δ+30       ↓       {}
            <Blob 0x2378f [26] @>                            Δ-26               {[«26""»]}
            <POP 2379e-237a0 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x237a0 25>                                                    {[«26""»]|[-4-]|[$$c_inflight          : 16#]}
            <POP 237ae-237b0 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]}
            <MI 237b0  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]}
            <MI 237b2  MOVE.W  (A6-0x74),D0>                                    {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]}
            <MI 237b6  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]|[4, 'D0']}
            <Const 0x237b8 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x237bc 0x102e8>                                              {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 237be-237c0 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]}
            <Call 0x237c0 0x102d0>                                              {[«26""»]|[-4-]|[$$c_inflight          : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 237c6-237c8 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x237c8 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 237ce-237cf StackAdj>                       Δ+30       ↓       {}
            <Blob 0x237cf [26] @>                            Δ-26               {[«26""»]}
            <POP 237de-237e0 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x237e0 25>                                                    {[«26""»]|[-4-]|[$$c_opbfr             : 16#]}
            <MI 237ee  MOVE.L  (A6-0x72),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x72)']}
            <POP 237ec-237ee StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x72)']|[-8-]}
            <Const 0x237f2 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x72)']|[-8-]|[##8]}
            <Call 0x237f6 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x72)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 237f8-237fa StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x72)']|[-4-]}
            <Call 0x237fa 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x72)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23800-23802 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23802 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23808-23809 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23809 [26] @>                            Δ-26               {[«26""»]}
            <POP 23818-2381a StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2381a 25>                                                    {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]}
            <POP 23828-2382a StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]}
            <MI 2382a  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]}
            <MI 2382c  MOVE.W  (A6-0x6a),D0>                                    {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]}
            <MI 23830  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]|[4, 'D0']}
            <Const 0x23832 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x23836 0x102e8>                                              {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23838-2383a StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]}
            <Call 0x2383a 0x102d0>                                              {[«26""»]|[-4-]|[$$c_tohost.rdidx      : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23840-23842 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23842 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23848-23849 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23849 [26] @>                            Δ-26               {[«26""»]}
            <POP 23858-2385a StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2385a 25>                                                    {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]}
            <POP 23868-2386a StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]}
            <MI 2386a  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]}
            <MI 2386c  MOVE.W  (A6-0x68),D0>                                    {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]}
            <MI 23870  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]|[4, 'D0']}
            <Const 0x23872 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x23876 0x102e8>                                              {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23878-2387a StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]}
            <Call 0x2387a 0x102d0>                                              {[«26""»]|[-4-]|[$$c_tohost.wrtidx     : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23880-23882 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23882 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23888-23889 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23889 [26] @>                            Δ-26               {[«26""»]}
            <POP 23898-2389a StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2389a 25>                                                    {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]}
            <POP 238a8-238aa StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]}
            <MI 238aa  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]}
            <MI 238ac  MOVE.W  (A6-0x66),D0>                                    {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]}
            <MI 238b0  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]|[4, 'D0']}
            <Const 0x238b2 0x4.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x238b6 0x102e8>                                              {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 238b8-238ba StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]}
            <Call 0x238ba 0x102d0>                                              {[«26""»]|[-4-]|[$$c_tohost.size       : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 238c0-238c2 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x238c2 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 238c8-238c9 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x238c9 [26] @>                            Δ-26               {[«26""»]}
            <POP 238d8-238da StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x238da 25>                                                    {[«26""»]|[-4-]|[$$c_tohost.slots      : 16#]}
            <MI 238e8  MOVE.L  (A6-0x62),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x62)']}
            <POP 238e6-238e8 StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x62)']|[-8-]}
            <Const 0x238ec 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x62)']|[-8-]|[##8]}
            <Call 0x238f0 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x62)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 238f2-238f4 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x62)']|[-4-]}
            <Call 0x238f4 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x62)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 238fa-238fc StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x238fc 0x103d8>                                              {[«26""»]|[-4-]}
                WriteConsoleString(str : String)
            <POP 23902-23903 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23903 [6] @>                             Δ-6                {[«6""»]}
            <POP 23914-23916 StackAdj>                       Δ-8                {[«6""»]|[-8-]}
            <Lit 0x23916 5>                                                     {[«6""»]|[-4-]|[$$, 16#]}
            <MI 23924  MOVE.L  (A6-0x5e),(A7)>                                  {[«6""»]|[-4-]|[4, '(A6-0x5e)']}
            <POP 23922-23924 StackAdj>                       Δ-8                {[«6""»]|[-4-]|[4, '(A6-0x5e)']|[-8-]}
            <Const 0x23928 0x8.4>                            Δ-4                {[«6""»]|[-4-]|[4, '(A6-0x5e)']|[-8-]|[##8]}
            <Call 0x2392c 0x102e8>                                              {[«6""»]|[-4-]|[4, '(A6-0x5e)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2392e-23930 StackAdj>                       Δ+8                {[«6""»]|[-4-]|[4, '(A6-0x5e)']|[-4-]}
            <Call 0x23930 0x102d0>                                              {[«6""»]|[-4-]|[4, '(A6-0x5e)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23936-23938 StackAdj>                       Δ+8                {[«6""»]|[-4-]}
            <Call 0x23938 0x103d8>                                              {[«6""»]|[-4-]}
                WriteConsoleString(str : String)
            <POP 2393e-2393f StackAdj>                       Δ+10       ↓       {}
            <Blob 0x2393f [6] @>                             Δ-6                {[«6""»]}
            <POP 2394e-23950 StackAdj>                       Δ-8                {[«6""»]|[-8-]}
            <Lit 0x23950 5>                                                     {[«6""»]|[-4-]|[$$, 16#]}
            <MI 2395e  MOVE.L  (A6-0x5a),(A7)>                                  {[«6""»]|[-4-]|[4, '(A6-0x5a)']}
            <POP 2395c-2395e StackAdj>                       Δ-8                {[«6""»]|[-4-]|[4, '(A6-0x5a)']|[-8-]}
            <Const 0x23962 0x8.4>                            Δ-4                {[«6""»]|[-4-]|[4, '(A6-0x5a)']|[-8-]|[##8]}
            <Call 0x23966 0x102e8>                                              {[«6""»]|[-4-]|[4, '(A6-0x5a)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23968-2396a StackAdj>                       Δ+8                {[«6""»]|[-4-]|[4, '(A6-0x5a)']|[-4-]}
            <Call 0x2396a 0x102d0>                                              {[«6""»]|[-4-]|[4, '(A6-0x5a)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23970-23972 StackAdj>                       Δ+8                {[«6""»]|[-4-]}
            <Call 0x23972 0x103d8>                                              {[«6""»]|[-4-]}
                WriteConsoleString(str : String)
            <POP 23978-23979 StackAdj>                       Δ+10       ↓       {}
            <Blob 0x23979 [6] @>                             Δ-6                {[«6""»]}
            <POP 23988-2398a StackAdj>                       Δ-8                {[«6""»]|[-8-]}
            <Lit 0x2398a 5>                                                     {[«6""»]|[-4-]|[$$, 16#]}
            <MI 23998  MOVE.L  (A6-0x56),(A7)>                                  {[«6""»]|[-4-]|[4, '(A6-0x56)']}
            <POP 23996-23998 StackAdj>                       Δ-8                {[«6""»]|[-4-]|[4, '(A6-0x56)']|[-8-]}
            <Const 0x2399c 0x8.4>                            Δ-4                {[«6""»]|[-4-]|[4, '(A6-0x56)']|[-8-]|[##8]}
            <Call 0x239a0 0x102e8>                                              {[«6""»]|[-4-]|[4, '(A6-0x56)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 239a2-239a4 StackAdj>                       Δ+8                {[«6""»]|[-4-]|[4, '(A6-0x56)']|[-4-]}
            <Call 0x239a4 0x102d0>                                              {[«6""»]|[-4-]|[4, '(A6-0x56)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 239aa-239ac StackAdj>                       Δ+8                {[«6""»]|[-4-]}
            <Call 0x239ac 0x103e0>                                              {[«6""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 239b2-239b3 StackAdj>                       Δ+10       ↓       {}
            <Blob 0x239b3 [26] @>                            Δ-26               {[«26""»]}
            <POP 239c4-239c6 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x239c6 25>                                                    {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]}
            <POP 239d4-239d6 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]}
            <MI 239d6  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]}
            <MI 239d8  MOVE.B  (A6-0x52),D0>                                    {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]}
            <MI 239dc  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]|[4, 'D0']}
            <Const 0x239de 0x2.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x239e2 0x102e8>                                              {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 239e4-239e6 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]}
            <Call 0x239e6 0x102d0>                                              {[«26""»]|[-4-]|[$$c_sring.rdidx       : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 239ec-239ee StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x239ee 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 239f4-239f5 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x239f5 [26] @>                            Δ-26               {[«26""»]}
            <POP 23a04-23a06 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23a06 25>                                                    {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]}
            <POP 23a14-23a16 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]}
            <MI 23a16  CLR.L   D0>                                              {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]}
            <MI 23a18  MOVE.B  (A6-0x51),D0>                                    {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]}
            <MI 23a1c  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]|[4, 'D0']}
            <Const 0x23a1e 0x2.4>                            Δ-4                {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]|[4, 'D0']|[##2]}
            <Call 0x23a22 0x102e8>                                              {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23a24-23a26 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]}
            <Call 0x23a26 0x102d0>                                              {[«26""»]|[-4-]|[$$c_sring.wrtidx      : 16#]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23a2c-23a2e StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23a2e 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23a34-23a35 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23a35 [26] @>                            Δ-26               {[«26""»]}
            <POP 23a44-23a46 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x23a46 25>                                                    {[«26""»]|[-4-]|[$$c_so                : 16#]}
            <MI 23a54  MOVE.L  (A6-0x4e),(A7)>                                  {[«26""»]|[-4-]|[4, '(A6-0x4e)']}
            <POP 23a52-23a54 StackAdj>                       Δ-8                {[«26""»]|[-4-]|[4, '(A6-0x4e)']|[-8-]}
            <Const 0x23a58 0x8.4>                            Δ-4                {[«26""»]|[-4-]|[4, '(A6-0x4e)']|[-8-]|[##8]}
            <Call 0x23a5c 0x102e8>                                              {[«26""»]|[-4-]|[4, '(A6-0x4e)']|[-8-]|[##8]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23a5e-23a60 StackAdj>                       Δ+8                {[«26""»]|[-4-]|[4, '(A6-0x4e)']|[-4-]}
            <Call 0x23a60 0x102d0>                                              {[«26""»]|[-4-]|[4, '(A6-0x4e)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23a66-23a68 StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x23a68 0x103e0>                                              {[«26""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23a6e-23a6f StackAdj>                       Δ+30       ↓       {}
            <Blob 0x23a6f [16] @>                            Δ-16               {[«16""»]}
            <POP 23a80-23a82 StackAdj>                       Δ-4                {[«16""»]|[-4-]}
            <Lit 0x23a82 15>                                                    {[«16""»]|[$$Remote SOCKADDR]}
            <Call 0x23a92 0x103e0>                                              {[«16""»]|[$$Remote SOCKADDR]}
                WriteConsoleStringCrLf(str : String)
            <POP 23a98-23a9c StackAdj>                       Δ+20               {}
            <MI 23a9c  MOVE.W  (A6-0x4a),D0>                                    {}
            <MI 23aa0  CMPI.W  #0x0002,D0>                                      {}
            <MI 23aa4  BEQ     0x23aac>                                         {}
        <POP 23aa6-23aac Naked>                              Σ0         ↓ →0x23ac2
            <MI 23aa6  CMPI.W  #0x000c,D0>                                      {}
            <MI 23aaa  BNE     0x23ac2>                                         {}
        <POP 23aac-23ac2 Naked>                              Σ0 Δ-16    →0x23ad6 ←0x23188
            <MI 23aac  MOVE.L  (A6-0x3e),-(A7)>              Δ-4                {[4, '(A6-0x3e)']}
            <MI 23ab0  MOVE.L  (A6-0x42),-(A7)>              Δ-4                {[4, '(A6-0x3e)']|[4, '(A6-0x42)']}
            <MI 23ab4  MOVE.L  (A6-0x46),-(A7)>              Δ-4                {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']}
            <MI 23ab8  MOVE.L  (A6-0x4a),-(A7)>              Δ-4                {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']|[4, '(A6-0x4a)']}
            <Call 0x23abc 0x22d7a>                                              {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']|[4, '(A6-0x4a)']}
            <MI 23ac0  BRA     0x23ad6>                                         {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']|[4, '(A6-0x4a)']}
        <POP 23ac2-23ad6 Naked>                              Σ0 Δ-16    ↓ ←0x23aa6
            <MI 23ac2  MOVE.L  (A6-0x3e),-(A7)>              Δ-4                {[4, '(A6-0x3e)']}
            <MI 23ac6  MOVE.L  (A6-0x42),-(A7)>              Δ-4                {[4, '(A6-0x3e)']|[4, '(A6-0x42)']}
            <MI 23aca  MOVE.L  (A6-0x46),-(A7)>              Δ-4                {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']}
            <MI 23ace  MOVE.L  (A6-0x4a),-(A7)>              Δ-4                {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']|[4, '(A6-0x4a)']}
            <Call 0x23ad2 0x22efe>                                              {[4, '(A6-0x3e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']|[4, '(A6-0x4a)']}
        <POP 23ad6-23b0c Naked>                              Σ-16 Δ+16  ↓ →0x23b12 ←0x23aac
            <POP 23ad6-23ada StackAdj>                       Δ+16               {}
            <Blob 0x23ada [14] @>                            Δ-14               {[«14""»]}
            <POP 23ae6-23ae8 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x23ae8 14>                                                    {[«14""»]|[$$Local SOCKADDR]}
            <Call 0x23af8 0x103e0>                                              {[«14""»]|[$$Local SOCKADDR]}
                WriteConsoleStringCrLf(str : String)
            <POP 23afe-23b02 StackAdj>                       Δ+18               {}
            <MI 23b02  MOVE.W  (A6-0x3a),D0>                                    {}
            <MI 23b06  CMPI.W  #0x0002,D0>                                      {}
            <MI 23b0a  BEQ     0x23b12>                                         {}
        <POP 23b0c-23b12 Naked>                              Σ0         ↓ →0x23b28
            <MI 23b0c  CMPI.W  #0x000c,D0>                                      {}
            <MI 23b10  BNE     0x23b28>                                         {}
        <POP 23b12-23b28 Naked>                              Σ0 Δ-16    →0x23b3c ←0x23ad6
            <MI 23b12  MOVE.L  (A6-0x2e),-(A7)>              Δ-4                {[4, '(A6-0x2e)']}
            <MI 23b16  MOVE.L  (A6-0x32),-(A7)>              Δ-4                {[4, '(A6-0x2e)']|[4, '(A6-0x32)']}
            <MI 23b1a  MOVE.L  (A6-0x36),-(A7)>              Δ-4                {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']}
            <MI 23b1e  MOVE.L  (A6-0x3a),-(A7)>              Δ-4                {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']|[4, '(A6-0x3a)']}
            <Call 0x23b22 0x22d7a>                                              {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']|[4, '(A6-0x3a)']}
            <MI 23b26  BRA     0x23b3c>                                         {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']|[4, '(A6-0x3a)']}
        <POP 23b28-23b3c Naked>                              Σ0 Δ-16    ↓ ←0x23b0c
            <MI 23b28  MOVE.L  (A6-0x2e),-(A7)>              Δ-4                {[4, '(A6-0x2e)']}
            <MI 23b2c  MOVE.L  (A6-0x32),-(A7)>              Δ-4                {[4, '(A6-0x2e)']|[4, '(A6-0x32)']}
            <MI 23b30  MOVE.L  (A6-0x36),-(A7)>              Δ-4                {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']}
            <MI 23b34  MOVE.L  (A6-0x3a),-(A7)>              Δ-4                {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']|[4, '(A6-0x3a)']}
            <Call 0x23b38 0x22efe>                                              {[4, '(A6-0x2e)']|[4, '(A6-0x32)']|[4, '(A6-0x36)']|[4, '(A6-0x3a)']}
        <POP 23b3c-23b40 Naked>                              Σ-16 Δ+16  ↓ ←0x23b12
            <POP 23b3c-23b40 StackAdj>                       Δ+16               {}
        <POP 23b40-23b48 Epilogue>                           Σ0         

0x23b48


@ 23b48
    <POP 23b48-23bd0 Body>                                              
        <POP 23b48-23b5e Prologue>                           Σ0         ↓
        <POP 23b5e-23b64 RegCacheLoad>                       Σ0         ↓
        <POP 23b64-23b72 Naked>                              Σ0         ↓ →0x23ba6
            <MI 23b64  MOVE.L  0x2d014,D0>                                      {}
            <MI 23b6a  CMPI.L  #0x9303fc00,D0>                                  {}
            <MI 23b70  BNE     0x23ba6>                                         {}
        <POP 23b72-23ba6 Naked>                              Σ0         →0x23bc8
            <Blob 0x23b72 [60] @>                            Δ-60               {[«60""»]}
            <POP 23b84-23b86 StackAdj>                       Δ-4                {[«60""»]|[-4-]}
            <Lit 0x23b86 59>                                                    {[«60""»]|[$$ERROR - The program does not have configuration information]}
            <Call 0x23b9a 0x103e0>                                              {[«60""»]|[$$ERROR - The program does not have configuration information]}
                WriteConsoleStringCrLf(str : String)
            <POP 23ba0-23ba4 StackAdj>                       Δ+64               {}
            <MI 23ba4  BRA     0x23bc8>                                         {}
        <POP 23ba6-23bc8 Naked>                              Σ0         ↓ ←0x23b64
            <MI 23ba6  MOVE.L  0x2c7c4,D4>                                      {}
            <MI 23ba8  MOVEQ.L #0x26,D3>                                        {}
            <Call 0x23baa 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 23bb0  ADD.L   D4,D0>                                           {}
            <MI 23bb2  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 23bb4  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <Blob 0x23bb6 [4] 0x2e1a8>                       Δ-4                {[«4»]}
            <Blob 0x23bbc [4] 0x2c7c4>                       Δ-4                {[«4»]|[«4»]}
            <MI 23bbe  MOVE.L  A4,-(A7)>                     Δ-4                {[«4»]|[«4»]|[4, 'A4']}
            <Call 0x23bc0 0x2301c>                                              {[«4»]|[«4»]|[4, 'A4']}
            <POP 23bc4-23bc8 StackAdj>                       Δ+12               {}
        <POP 23bc8-23bd0 Epilogue>                           Σ0         ←0x23b72

0x23bd0


@ 23bd0
        <LVAR  0x008 4(r)>
        <LVAR -0x03c @>
    <POP 23bd0-23c74 Body>                                              
        <POP 23bd0-23be6 Prologue>                           Σ0         ↓
        <POP 23be6-23be8 RegCacheLoad>                       Σ0         ↓
        <POP 23be8-23c08 Naked>                              Σ0         ↓
            <MI 23be8  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 23bec-23bf0 StackAdj>                       Δ-60               {[-60-]}
            <MI 23bf0  MOVEA.L A7,A1>                                           {[-60-]}
            <BlockMove 60,A0,A1>                                                {[-60-]}
            <MI 23bfa  LEA.L   (A6-0x3c),A0>                                    {[-60-]}
            <POP 23bfe-23c06 StackPop>                       Δ+60               {[-60-]}
                <BlockMove 60,A7,A0>                         Δ+60       
            <MI 23c06  MOVEQ.L #0x00,D7>                                        {[-60-]}
        <POP 23c08-23c3e Naked>                              Σ0         ↓ →0x23c60 ←0x23c60
            <POP 23c08-23c0a StackAdj>                       Δ-4                {[-4-]}
            <POP 0x23c0a LimitCheck 0x0 ≤ D7 ≤ 0x3b>                            {[-4-]}
            <MI 23c10  CLR.L   D0>                                              {[-4-]}
            <MI 23c12  MOVE.B  (A6+D7.L-#0x3c),D0>                              {[-4-]}
            <MI 23c16  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x23c18 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x23c1c 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23c22-23c24 StackAdj>                       Δ+8                {[-4-]}
            <Call 0x23c24 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 23c2a-23c2c StackAdj>                       Δ+4                {}
            <MI 23c2c  MOVE.L  D7,D0>                                           {}
            <MI 23c2e  ADDQ.L  #0x1,D0>                                         {}
            <MI 23c30  MOVE.L  D0,D4>                                           {}
            <MI 23c32  MOVEQ.L #0x04,D3>                                        {}
            <Call 0x23c34 0x10294>                                              {}
                ?divs_d3_d4
            <MI 23c3a  TST.L   D3>                                              {}
            <MI 23c3c  BNE     0x23c60>                                         {}
        <POP 23c3e-23c4c Naked>                              Σ0         ↓ →0x23c54
            <MI 23c3e  MOVE.L  D0,D4>                                           {}
            <MI 23c40  MOVEQ.L #0x20,D3>                                        {}
            <Call 0x23c42 0x10294>                                              {}
                ?divs_d3_d4
            <MI 23c48  TST.L   D3>                                              {}
            <MI 23c4a  BNE     0x23c54>                                         {}
        <POP 23c4c-23c54 Naked>                              Σ0         →0x23c60
            <Call 0x23c4c 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 23c52  BRA     0x23c60>                                         {}
        <POP 23c54-23c60 Naked>                              Σ0         ↓ ←0x23c3e
            <Const 0x23c54 0x20.2>                           Δ-2                {[#32]}
            <Call 0x23c58 0x103d0>                                              {[#32]}
                WriteConsoleChar(chr : char)
            <POP 23c5e-23c60 StackAdj>                       Δ+2                {}
        <POP 23c60-23c66 Naked>                              Σ0         ↓ →0x23c08 ←0x23c08 ←0x23c4c
            <MI 23c60  ADDQ.L  #0x1,D7>                                         {}
            <MI 23c62  CMP.L   #0x3b,D7>                                        {}
            <MI 23c64  BLE     0x23c08>                                         {}
        <POP 23c66-23c6c Naked>                              Σ0         ↓
            <Call 0x23c66 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 23c6c-23c74 Epilogue>                           Σ0         

0x23c74


@ 23c74
    <POP 23c74-23d08 Body>                                              
        <POP 23c74-23c8a Prologue>                           Σ0         ↓
        <POP 23c8a-23c8c RegCacheLoad>                       Σ0         ↓
        <POP 23c8c-23c9c Naked>                              Σ0         ↓
            <MI 23c8c  MOVEA.L A4,A0>                                           {}
            <MI 23c8e  LEA.L   (A4+0x62),A1>                                    {}
            <BlockMove 82,A1,A0>                                                {}
            <MI 23c9a  MOVEQ.L #0x00,D7>                                        {}
        <POP 23c9c-23cd2 Naked>                              Σ0         ↓ →0x23cf4 ←0x23cf4
            <POP 23c9c-23c9e StackAdj>                       Δ-4                {[-4-]}
            <POP 0x23c9e LimitCheck 0x0 ≤ D7 ≤ 0x51>                            {[-4-]}
            <MI 23ca4  CLR.L   D0>                                              {[-4-]}
            <MI 23ca6  MOVE.B  (A4+D7.L),D0>                                    {[-4-]}
            <MI 23caa  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x23cac 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x23cb0 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23cb6-23cb8 StackAdj>                       Δ+8                {[-4-]}
            <Call 0x23cb8 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 23cbe-23cc0 StackAdj>                       Δ+4                {}
            <MI 23cc0  MOVE.L  D7,D0>                                           {}
            <MI 23cc2  ADDQ.L  #0x1,D0>                                         {}
            <MI 23cc4  MOVE.L  D0,D4>                                           {}
            <MI 23cc6  MOVEQ.L #0x04,D3>                                        {}
            <Call 0x23cc8 0x10294>                                              {}
                ?divs_d3_d4
            <MI 23cce  TST.L   D3>                                              {}
            <MI 23cd0  BNE     0x23cf4>                                         {}
        <POP 23cd2-23ce0 Naked>                              Σ0         ↓ →0x23ce8
            <MI 23cd2  MOVE.L  D0,D4>                                           {}
            <MI 23cd4  MOVEQ.L #0x20,D3>                                        {}
            <Call 0x23cd6 0x10294>                                              {}
                ?divs_d3_d4
            <MI 23cdc  TST.L   D3>                                              {}
            <MI 23cde  BNE     0x23ce8>                                         {}
        <POP 23ce0-23ce8 Naked>                              Σ0         →0x23cf4
            <Call 0x23ce0 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 23ce6  BRA     0x23cf4>                                         {}
        <POP 23ce8-23cf4 Naked>                              Σ0         ↓ ←0x23cd2
            <Const 0x23ce8 0x20.2>                           Δ-2                {[#32]}
            <Call 0x23cec 0x103d0>                                              {[#32]}
                WriteConsoleChar(chr : char)
            <POP 23cf2-23cf4 StackAdj>                       Δ+2                {}
        <POP 23cf4-23cfa Naked>                              Σ0         ↓ →0x23c9c ←0x23c9c ←0x23ce0
            <MI 23cf4  ADDQ.L  #0x1,D7>                                         {}
            <MI 23cf6  CMP.L   #0x51,D7>                                        {}
            <MI 23cf8  BLE     0x23c9c>                                         {}
        <POP 23cfa-23d00 Naked>                              Σ0         ↓
            <Call 0x23cfa 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 23d00-23d08 Epilogue>                           Σ0         

0x23d08


@ 23d08
        <LVAR  0x008 @>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x04c 1(r)>
        <LVAR -0x054 @>
        <LVAR -0x058 4(rw)>
        <LVAR -0x05c 4(rw)>
        <LVAR -0x060 4(rw)>
        <LVAR -0x064 @ 4(rw)>
    <POP 23d08-23e08 Body>                                              
        <POP 23d08-23d1e Prologue>                           Σ0         ↓
        <POP 23d1e-23d2a RegCacheLoad>                       Σ0         ↓
        <POP 23d2a-23d80 Naked>                              Σ0         ↓ →0x23da0
            <MI 23d2a  LEA.L   (A6-0x54),A0>                                    {}
            <MI 23d2c  LEA.L   (A6+0x8),A1>                                     {}
            <BlockMove 82,A1,A0>                                                {}
            <MI 23d38  MOVE.L  0x21020,(A6-0x64)>                               {}
            <MI 23d3c  MOVE.L  0x21024,(A6-0x60)>                               {}
            <MI 23d42  MOVE.L  0x21028,(A6-0x5c)>                               {}
            <MI 23d48  MOVE.L  0x2102c,(A6-0x58)>                               {}
            <Pointer.fp 0x23d4e <LVAR -0x064 @ 4(rw)>>       Δ-4                {[@@-100]}
            <MI 23d50  LEA.L   (A6-0x54),A0>                                    {[@@-100]}
            <MI 23d52  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-100]|[4, 'A0']}
            <Const 0x23d54 0x3.2>                            Δ-2                {[@@-100]|[4, 'A0']|[#3]}
            <Const 0x23d56 0x52.4>                           Δ-4                {[@@-100]|[4, 'A0']|[#3]|[##82]}
            <MI 23d5a  LEA.L   (A6-0x54),A0>                                    {[@@-100]|[4, 'A0']|[#3]|[##82]}
            <MI 23d5c  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-100]|[4, 'A0']|[#3]|[##82]|[4, 'A0']}
            <Const 0x23d5e 0x52.4>                           Δ-4                {[@@-100]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <Call 0x23d62 0x22766>                                              {[@@-100]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <POP 23d66-23d6a StackAdj>                       Δ+22               {}
            <Call 0x23d6a 0x2227a>                                              {}
            <Const 0x23d6e 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x23d70 <LVAR -0x002 @ 1(r)>>        Δ-4                {[#3]|[@@-2]}
            <Call 0x23d74 0x22676>                                              {[#3]|[@@-2]}
            <POP 23d78-23d7a StackAdj>                       Δ+6                {}
            <MI 23d7a  TST.B   (A6-0x2)>                                        {}
            <MI 23d7e  BNE     0x23da0>                                         {}
        <POP 23d80-23da0 Naked>                              Σ0         ↓
            <MI 23d80  MOVE.L  (A6-0x58),-(A7)>              Δ-4                {[4, '(A6-0x58)']}
            <MI 23d84  MOVE.L  (A6-0x5c),-(A7)>              Δ-4                {[4, '(A6-0x58)']|[4, '(A6-0x5c)']}
            <MI 23d88  MOVE.L  (A6-0x60),-(A7)>              Δ-4                {[4, '(A6-0x58)']|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 23d8c  MOVE.L  (A6-0x64),-(A7)>              Δ-4                {[4, '(A6-0x58)']|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[4, '(A6-0x64)']}
            <Call 0x23d8e 0x2234c>                                              {[4, '(A6-0x58)']|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[4, '(A6-0x64)']}
            <POP 23d92-23d96 StackAdj>                       Δ+16               {}
            <Const 0x23d96 0x1e.4>                           Δ-4                {[##30]}
            <Call 0x23d9a 0x2132c>                                              {[##30]}
            <POP 23d9e-23da0 StackAdj>                       Δ+4                {}
        <POP 23da0-23da6 Naked>                              Σ0         ↓ →0x23e00 ←0x23d2a
            <MI 23da0  TST.B   (A6-0x4c)>                                       {}
            <MI 23da4  BEQ     0x23e00>                                         {}
        <POP 23da6-23e00 Naked>                              Σ0         ↓
            <Blob 0x23da6 [38] @>                            Δ-38               {[«38""»]}
            <POP 23db6-23db8 StackAdj>                       Δ-4                {[«38""»]|[-4-]}
            <Lit 0x23db8 37>                                                    {[«38""»]|[$$configure failed, completion code = $]}
            <Call 0x23dcc 0x103d8>                                              {[«38""»]|[$$configure failed, completion code = $]}
                WriteConsoleString(str : String)
            <POP 23dd2-23dd4 StackAdj>                       Δ+38               {[-4-]}
            <MI 23dd4  CLR.L   D0>                                              {[-4-]}
            <MI 23dd6  MOVE.B  (A6-0x4c),D0>                                    {[-4-]}
            <MI 23dda  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x23ddc 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x23de0 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 23de6-23de8 StackAdj>                       Δ+8                {[-4-]}
            <Call 0x23de8 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 23dee-23df0 StackAdj>                       Δ+4                {}
            <Call 0x23df0 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Const 0x23df6 0x1f.4>                           Δ-4                {[##31]}
            <Call 0x23dfa 0x2132c>                                              {[##31]}
            <POP 23dfe-23e00 StackAdj>                       Δ+4                {}
        <POP 23e00-23e08 Epilogue>                           Σ0         ←0x23da0

0x23e08


@ 23e08
        <LVAR  0x008 1(w)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 2(r) 4(w)>
        <LVAR -0x00c 4(w)>
        <LVAR -0x010 4(w)>
        <LVAR -0x014 @ 4(w)>
    <POP 23e08-23e76 Body>                                              
        <POP 23e08-23e1e Prologue>                           Σ0         ↓
        <POP 23e1e-23e24 RegCacheLoad>                       Σ0         ↓
        <POP 23e24-23e6e Naked>                              Σ0         ↓
            <MI 23e24  MOVE.L  0x21040,(A6-0x14)>                               {}
            <MI 23e2a  MOVE.L  0x21044,(A6-0x10)>                               {}
            <MI 23e30  MOVE.L  0x21048,(A6-0xc)>                                {}
            <MI 23e36  MOVE.L  0x2104c,(A6-0x8)>                                {}
            <MI 23e3c  CLR.W   (A6-0x8)>                                        {}
            <Const 0x23e40 0x0.4>                            Δ-4                {[##0]}
            <Pointer.fp 0x23e42 <LVAR -0x014 @ 4(w)>>        Δ-4                {[##0]|[@@-20]}
            <MI 23e46  MOVE.L  (A7+0x4),-(A7)>               Δ-4                {[##0]|[@@-20]|[4, '(A7+0x4)']}
            <Const 0x23e4a 0x3.2>                            Δ-2                {[##0]|[@@-20]|[4, '(A7+0x4)']|[#3]}
            <Const 0x23e4c 0x0.4>                            Δ-4                {[##0]|[@@-20]|[4, '(A7+0x4)']|[#3]|[##0]}
            <MI 23e4e  MOVE.L  (A7+0xe),-(A7)>               Δ-4                {[##0]|[@@-20]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']}
            <Const 0x23e52 0x0.4>                            Δ-4                {[##0]|[@@-20]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']|[##0]}
            <Call 0x23e54 0x22766>                                              {[##0]|[@@-20]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']|[##0]}
            <POP 23e58-23e5c StackAdj>                       Δ+24               {[-2-]}
            <POP 23e5c-23e5d StackAdj>                       Δ+2                {}
            <Const 0x23e5d 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x23e5e <LVAR -0x004 @ 1(r)>>        Δ-4                {[#3]|[@@-4]}
            <Call 0x23e62 0x22676>                                              {[#3]|[@@-4]}
            <POP 23e66-23e68 StackAdj>                       Δ+6                {}
            <MI 23e68  MOVE.B  (A6-0x4),(A6+0x8)>                               {}
        <POP 23e6e-23e76 Epilogue>                           Σ0         

0x23e76


@ 23e76
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x040 @>
        <LVAR -0x04c 4(w)>
        <LVAR -0x050 4(w)>
        <LVAR -0x054 4(w)>
        <LVAR -0x058 @ 4(w)>
        <LVAR -0x0fc @>
        <LVAR -0x138 @>
    <POP 23e76-240d4 Body>                                              
        <POP 23e76-23e8c Prologue>                           Σ0         ↓
        <POP 23e8c-23ea4 RegCacheLoad>                       Σ0         ↓
        <POP 23ea4-23eae Naked>                              Σ0         ↓ →0x23ee0
            <POP 23ea4-23ea6 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x23ea6 0x23e08>                                              {[-2-]}
            <MI 23eaa  TST.B   (A7)+>                        Δ+2                {}
            <MI 23eac  BNE     0x23ee0>                                         {}
        <POP 23eae-23ede Naked>                              Σ0         →0x240c0
            <Blob 0x23eae [30] @>                            Δ-30               {[«30""»]}
            <POP 23ec0-23ec2 StackAdj>                       Δ-4                {[«30""»]|[-4-]}
            <Lit 0x23ec2 29>                                                    {[«30""»]|[$$IOP EXOS driver is not active]}
            <Call 0x23ed0 0x103e0>                                              {[«30""»]|[$$IOP EXOS driver is not active]}
                WriteConsoleStringCrLf(str : String)
            <POP 23ed6-23eda StackAdj>                       Δ+34               {}
            <MI 23eda  BRA     0x240c0>                                         {}
        <POP 23ee0-23f5e Naked>                              Σ0         ↓ →0x23f68 ←0x23ea4
            <Blob 0x23ee0 [42] @>                            Δ-42               {[«42""»]}
            <POP 23eec-23eee StackAdj>                       Δ-4                {[«42""»]|[-4-]}
            <Lit 0x23eee 42>                                                    {[«42""»]|[$$The default network controller is EXOS-204]}
            <Call 0x23efc 0x103e0>                                              {[«42""»]|[$$The default network controller is EXOS-204]}
                WriteConsoleStringCrLf(str : String)
            <POP 23f02-23f06 StackAdj>                       Δ+46               {}
            <MI 23f06  LEA.L   (A6-0xfc),A0>                                    {}
            <MI 23f0a  LEA.L   0x21070,A1>                                      {}
            <BlockMove 82,A1,A0>                                                {}
            <MI 23f16  MOVE.L  0x21020,(A6-0x58)>                               {}
            <MI 23f1a  MOVE.L  0x21024,(A6-0x54)>                               {}
            <MI 23f20  MOVE.L  0x21028,(A6-0x50)>                               {}
            <MI 23f26  MOVE.L  0x2102c,(A6-0x4c)>                               {}
            <Pointer.fp 0x23f2c <LVAR -0x058 @ 4(w)>>        Δ-4                {[@@-88]}
            <MI 23f2e  LEA.L   (A6-0xfc),A0>                                    {[@@-88]}
            <MI 23f32  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-88]|[4, 'A0']}
            <Const 0x23f34 0x3.2>                            Δ-2                {[@@-88]|[4, 'A0']|[#3]}
            <Const 0x23f36 0x52.4>                           Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##82]}
            <MI 23f3a  LEA.L   (A6-0xfc),A0>                                    {[@@-88]|[4, 'A0']|[#3]|[##82]}
            <MI 23f3e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##82]|[4, 'A0']}
            <Const 0x23f40 0x52.4>                           Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <Call 0x23f44 0x22766>                                              {[@@-88]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <POP 23f48-23f4c StackAdj>                       Δ+22               {}
            <Call 0x23f4c 0x2227a>                                              {}
            <Const 0x23f50 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x23f52 <LVAR -0x004 @ 1(r)>>        Δ-4                {[#3]|[@@-4]}
            <Call 0x23f54 0x22676>                                              {[#3]|[@@-4]}
            <POP 23f58-23f5a StackAdj>                       Δ+6                {}
            <MI 23f5a  TST.B   (A6-0x4)>                                        {}
            <MI 23f5c  BNE     0x23f68>                                         {}
        <POP 23f5e-23f68 Naked>                              Σ0         ↓
            <Const 0x23f5e 0xa.4>                            Δ-4                {[##10]}
            <Call 0x23f62 0x2132c>                                              {[##10]}
            <POP 23f66-23f68 StackAdj>                       Δ+4                {}
        <POP 23f68-23fbc Naked>                              Σ0         ↓ →0x23fc6 ←0x23ee0
            <MI 23f68  LEA.L   (A6-0x40),A0>                                    {}
            <MI 23f6c  LEA.L   0x21114,A1>                                      {}
            <BlockMove 60,A1,A0>                                                {}
            <MI 23f78  MOVE.L  0x21030,(A6-0x58)>                               {}
            <MI 23f7c  MOVE.L  0x21034,(A6-0x54)>                               {}
            <MI 23f82  MOVE.L  0x21038,(A6-0x50)>                               {}
            <MI 23f88  MOVE.L  0x2103c,(A6-0x4c)>                               {}
            <Pointer.fp 0x23f8e <LVAR -0x058 @ 4(w)>>        Δ-4                {[@@-88]}
            <MI 23f90  LEA.L   (A6-0x40),A0>                                    {[@@-88]}
            <MI 23f94  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-88]|[4, 'A0']}
            <Const 0x23f96 0x3.2>                            Δ-2                {[@@-88]|[4, 'A0']|[#3]}
            <Const 0x23f98 0x3c.4>                           Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##60]}
            <MI 23f9c  LEA.L   (A6-0x40),A0>                                    {[@@-88]|[4, 'A0']|[#3]|[##60]}
            <MI 23fa0  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##60]|[4, 'A0']}
            <Const 0x23fa2 0x3c.4>                           Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##60]|[4, 'A0']|[##60]}
            <Call 0x23fa6 0x22766>                                              {[@@-88]|[4, 'A0']|[#3]|[##60]|[4, 'A0']|[##60]}
            <POP 23faa-23fae StackAdj>                       Δ+20               {[-2-]}
            <POP 23fae-23faf StackAdj>                       Δ+2                {}
            <Const 0x23faf 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x23fb0 <LVAR -0x004 @ 1(r)>>        Δ-4                {[#3]|[@@-4]}
            <Call 0x23fb2 0x22676>                                              {[#3]|[@@-4]}
            <POP 23fb6-23fb8 StackAdj>                       Δ+6                {}
            <MI 23fb8  TST.B   (A6-0x4)>                                        {}
            <MI 23fba  BNE     0x23fc6>                                         {}
        <POP 23fbc-23fc6 Naked>                              Σ0         ↓
            <Const 0x23fbc 0xc.4>                            Δ-4                {[##12]}
            <Call 0x23fc0 0x2132c>                                              {[##12]}
            <POP 23fc4-23fc6 StackAdj>                       Δ+4                {}
        <POP 23fc6-24004 Naked>                              Σ0         ↓ ←0x23f68
            <MI 23fc6  LEA.L   (A6-0x138),A0>                                   {}
            <MI 23fca  LEA.L   (A6-0x40),A1>                                    {}
            <BlockMove 60,A1,A0>                                                {}
            <Blob 0x23fd6 [24] @>                            Δ-24               {[«24""»]}
            <POP 23fe8-23fea StackAdj>                       Δ-4                {[«24""»]|[-4-]}
            <Lit 0x23fea 23>                                                    {[«24""»]|[$$Ethernet Address (hex)_]}
            <Call 0x23ff8 0x103d8>                                              {[«24""»]|[$$Ethernet Address (hex)_]}
                WriteConsoleString(str : String)
            <POP 23ffe-24002 StackAdj>                       Δ+28               {}
            <MI 24002  MOVEQ.L #0x0c,D7>                                        {}
        <POP 24004-24030 Naked>                              Σ0         ↓ →0x2404a ←0x2404a
            <POP 24004-24006 StackAdj>                       Δ-4                {[-4-]}
            <POP 0x24006 LimitCheck 0x0 ≤ D7 ≤ 0x3b>                            {[-4-]}
            <MI 2400c  LEA.L   (A6-0x138),A0>                                   {[-4-]}
            <MI 24010  CLR.L   D0>                                              {[-4-]}
            <MI 24012  MOVE.B  (A0+D7.L),D0>                                    {[-4-]}
            <MI 24016  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x24018 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x2401c 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 24022-24024 StackAdj>                       Δ+8                {[-4-]}
            <Call 0x24024 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 2402a-2402c StackAdj>                       Δ+4                {}
            <MI 2402c  CMP.L   #0x11,D7>                                        {}
            <MI 2402e  BEQ     0x2404a>                                         {}
        <POP 24030-2404a Naked>                              Σ0         ↓
            <Blob 0x24030 [2] @>                             Δ-2                {[«2""»]}
            <POP 24034-24036 StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x24036 2>                                                     {[«2""»]|[$$- ]}
            <Call 0x24042 0x103d8>                                              {[«2""»]|[$$- ]}
                WriteConsoleString(str : String)
            <POP 24048-2404a StackAdj>                       Δ+6                {}
        <POP 2404a-24050 Naked>                              Σ0         ↓ →0x24004 ←0x24004
            <MI 2404a  ADDQ.L  #0x1,D7>                                         {}
            <MI 2404c  CMP.L   #0x11,D7>                                        {}
            <MI 2404e  BLE     0x24004>                                         {}
        <POP 24050-24078 Naked>                              Σ0         ↓
            <Blob 0x24050 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x24054 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x24058 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 2405c-2405e StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x2405e 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[$$, (decimal)_]}
            <Call 0x2406c 0x103d8>                                              {[«4""»]|[«4""»]|[«4""»]|[$$, (decimal)_]}
                WriteConsoleString(str : String)
            <POP 24072-24076 StackAdj>                       Δ+16               {}
            <MI 24076  MOVEQ.L #0x0c,D7>                                        {}
        <POP 24078-240a0 Naked>                              Σ0         ↓ →0x240ba ←0x240ba
            <POP 24078-2407a StackAdj>                       Δ-4                {[-4-]}
            <POP 0x2407a LimitCheck 0x0 ≤ D7 ≤ 0x3b>                            {[-4-]}
            <MI 24080  LEA.L   (A6-0x138),A0>                                   {[-4-]}
            <MI 24084  CLR.L   D0>                                              {[-4-]}
            <MI 24086  MOVE.B  (A0+D7.L),D0>                                    {[-4-]}
            <MI 2408a  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Call 0x2408c 0x102e4>                                              {[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 24092-24094 StackAdj>                       Δ+4                {[-4-]}
            <Call 0x24094 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 2409a-2409c StackAdj>                       Δ+4                {}
            <MI 2409c  CMP.L   #0x11,D7>                                        {}
            <MI 2409e  BEQ     0x240ba>                                         {}
        <POP 240a0-240ba Naked>                              Σ0         ↓
            <Blob 0x240a0 [2] @>                             Δ-2                {[«2""»]}
            <POP 240a4-240a6 StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x240a6 2>                                                     {[«2""»]|[$$. ]}
            <Call 0x240b2 0x103d8>                                              {[«2""»]|[$$. ]}
                WriteConsoleString(str : String)
            <POP 240b8-240ba StackAdj>                       Δ+6                {}
        <POP 240ba-240c0 Naked>                              Σ0         ↓ →0x24078 ←0x24078
            <MI 240ba  ADDQ.L  #0x1,D7>                                         {}
            <MI 240bc  CMP.L   #0x11,D7>                                        {}
            <MI 240be  BLE     0x24078>                                         {}
        <POP 240c0-240cc Naked>                              Σ0         ↓ ←0x23eae
            <Call 0x240c0 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 240c6  CLR.B   0x2c7d4>                                         {}
        <POP 240cc-240d4 Epilogue>                           Σ0         

0x240d4


@ 240d4
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x00a @ 4(rw)>
        <LVAR -0x00c @>
        <LVAR -0x010 @ 4(r)>
    <POP 240d4-241ec Body>                                              
        <POP 240d4-240ea Prologue>                           Σ0         ↓
        <POP 240ea-240f8 RegCacheLoad>                       Σ0         ↓
        <POP 240f8-2413c Naked>                              Σ0         ↓ →0x241d4
            <Blob 0x240f8 [14] @>                            Δ-14               {[«14""»]}
            <POP 24104-24106 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x24106 14>                                                    {[«14""»]|[$$TCP_IP_HOST_ID]}
            <MI 24118  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {[«14""»]}
            <POP 2411a-2411e StackAdj>                       Δ+10               {[-4-]}
            <MI 2411e  MOVE.L  (A6-0xa),(A7)>                                   {[4, '(A6-0xa)']}
            <MI 24120  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0xa)']|[#0]}
            <MI 24122  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0xa)']|[#0]|[#0]}
            <Const 0x24124 0x0.4>                            Δ-4                {[4, '(A6-0xa)']|[#0]|[#0]|[##0]}
            <Pointer.fp 0x24128 <LVAR -0x002 @ 1(r)>>        Δ-4                {[4, '(A6-0xa)']|[#0]|[#0]|[##0]|[@@-2]}
            <Pointer.fp 0x2412a <LVAR -0x010 @ 4(r)>>        Δ-4                {[4, '(A6-0xa)']|[#0]|[#0]|[##0]|[@@-2]|[@@-16]}
            <Call 0x2412c 0x10380>                                              {[4, '(A6-0xa)']|[#0]|[#0]|[##0]|[@@-2]|[@@-16]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 24132-24136 StackAdj>                       Δ+20               {}
            <MI 24136  TST.B   (A6-0x2)>                                        {}
            <MI 24138  BNE     0x241d4>                                         {}
        <POP 2413c-2417a Naked>                              Σ0         ↓
            <MI 2413c  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 24140  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x24142 0x102b8>                                              {[4, '^(A0)']}
                NewString(VAR a : String)
            <MI 24148  MOVE.L  (A6-0x10),(A7)>                                  {[4, '(A6-0x10)']}
            <MI 2414a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x10)']|[4, '^(A0)']}
            <Pointer.fp 0x2414c <LVAR -0x00c @>>             Δ-4                {[4, '(A6-0x10)']|[4, '^(A0)']|[@@-12]}
            <Call 0x24150 0x1043c>                                              {[4, '(A6-0x10)']|[4, '^(A0)']|[@@-12]}
                FileReadLine(file : File; VAR a : String; VAR b : Byte)
            <POP 24156-2415a StackAdj>                       Δ+12               {}
            <MI 2415a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2415e  MOVE.B  #0x01,(A0)>                                      {}
            <MI 24160  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x24162 0x2.2>                            Δ-2                {[#0]|[#2]}
            <Const 0x24166 0x1.4>                            Δ-4                {[#0]|[#2]|[##1]}
            <Pointer.fp 0x2416a <LVAR -0x002 @ 1(r)>>        Δ-4                {[#0]|[#2]|[##1]|[@@-2]}
            <Pointer.fp 0x2416c <LVAR -0x010 @ 4(r)>>        Δ-4                {[#0]|[#2]|[##1]|[@@-2]|[@@-16]}
            <Call 0x2416e 0x1038c>                                              {[#0]|[#2]|[##1]|[@@-2]|[@@-16]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 24174-24178 StackAdj>                       Δ+16               {}
            <MI 24178  MOVEQ.L #0x01,D7>                                        {}
        <POP 2417a-24188 Naked>                              Σ0         ↓ →0x241d2 ←0x241d0
            <MI 2417a  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2417e  MOVEA.L (A0),A0>                                         {}
            <MI 24180  MOVE.W  (A0),D0>                                         {}
            <MI 24182  EXTW.L  D0>                                              {}
            <MI 24184  CMP.L   D0,D7>                                           {}
            <MI 24186  BGE     0x241d2>                                         {}
        <POP 24188-2418c Naked>                              Σ0         ↓ →0x241d2
            <MI 24188  TST.L   D0>                                              {}
            <MI 2418a  BLE     0x241d2>                                         {}
        <POP 2418c-241ae Naked>                              Σ0         ↓ →0x241b4
            <MI 2418c  MOVE.L  D7,D0>                                           {}
            <MI 2418e  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x24190 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {}
            <MI 2419a  CLR.L   D1>                                              {}
            <MI 2419c  MOVE.B  (A0+D0.L+#0x2),D1>                               {}
            <MI 241a0  LEA.L   0x211e0,A1>                                      {}
            <MI 241a4  MOVE.W  D1,D0>                                           {}
            <MI 241a6  LSR.W   #0x3,D0>                                         {}
            <MI 241a8  BTST.B  D1,(A1+D0.W)>                                    {}
            <MI 241ac  BNE     0x241b4>                                         {}
        <POP 241ae-241b4 Naked>                              Σ0         ↓ →0x241b8
            <MI 241ae  CMPI.B  #0x2e,D1>                                        {}
            <MI 241b2  BNE     0x241b8>                                         {}
        <POP 241b4-241b8 Naked>                              Σ0         →0x241d0 ←0x2418c
            <MI 241b4  ADDQ.L  #0x1,D7>                                         {}
            <MI 241b6  BRA     0x241d0>                                         {}
        <POP 241b8-241d0 Naked>                              Σ0         ↓ ←0x241ae
            <POP 0x241b8 LimitCheck -0x8000 ≤ D7 ≤ 0x7fff>                      {}
            <MI 241ce  MOVE.W  D7,(A0)>                                         {}
        <POP 241d0-241d2 Naked>                              Σ0         →0x2417a ←0x241b4
            <MI 241d0  BRA     0x2417a>                                         {}
        <POP 241d2-241d4 Naked>                              Σ0         →0x241da ←0x2417a ←0x24188
            <MI 241d2  BRA     0x241da>                                         {}
        <POP 241d4-241da Naked>                              Σ0         ↓ ←0x240f8
            <MI 241d4  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 241d8  CLR.B   (A0)>                                            {}
        <POP 241da-241e4 Naked>                              Σ0         ↓ ←0x241d2
            <Pointer.fp 0x241da <LVAR -0x00a @ 4(rw)>>       Δ-4                {[@@-10]}
            <Call 0x241dc 0x102bc>                                              {[@@-10]}
                FreeString(VAR a : String)
            <POP 241e2-241e4 StackAdj>                       Δ+4                {}
        <POP 241e4-241ec Epilogue>                           Σ0         

0x241ec


@ 241ec
        <LVAR  0x00c 4(w)>
        <LVAR  0x008 4(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x004 1(rw)>
        <LVAR -0x008 @ 4(rw)>
    <POP 241ec-24354 Body>                                              
        <POP 241ec-24202 Prologue>                           Σ0         ↓
        <POP 24202-24210 RegCacheLoad>                       Σ0         ↓
        <POP 24210-24250 Naked>                              Σ0         ↓ →0x2425a
            <POP 24210-24212 StackAdj>                       Δ-4                {[-4-]}
            <POP 24212-24213 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x24213 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 24216  MOVE.B  0x20aa5,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2421c  MOVE.B  0x20aa6,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 24222  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']}
            <POP 24226-24228 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x24228>                                                       {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
                <Pointer.sp 0x24228 8>                       Δ-4        
                <Const 0x2422c 0x1.2>                        Δ-2        
                <Const 0x24230 0x3.2>                        Δ-2        
                <Call 0x24234 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2423a-2423c StackAdj>                   Δ+8        
            <POP 2423a-2423c StackAdj>                       Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
            <POP 2423c-2423d StackAdj>                       Δ+2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
            <Const 0x2423d 0x1.2>                            Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]}
            <Pointer.fp 0x24240 <LVAR -0x003 @ 1(r)>>        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-3]}
            <Pointer.fp 0x24242 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-3]|[@@-8]}
            <Call 0x24244 0x21cee>                                              {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-3]|[@@-8]}
            <POP 24248-2424c StackAdj>                       Δ+22               {}
            <MI 2424c  TST.B   (A6-0x3)>                                        {}
            <MI 2424e  BNE     0x2425a>                                         {}
        <POP 24250-2425a Naked>                              Σ0         ↓
            <Pointer.fp 0x24250 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Pointer.fp 0x24252 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-8]|[@@-3]}
            <Call 0x24254 0x240d4>                                              {[@@-8]|[@@-3]}
            <POP 24258-2425a StackAdj>                       Δ+8                {}
        <POP 2425a-2425e Naked>                              Σ0         ↓ →0x24262 ←0x24210 ←0x24336
            <MI 2425a  TST.B   (A6-0x3)>                                        {}
            <MI 2425c  BEQ     0x24262>                                         {}
        <POP 2425e-24262 Naked>                              Σ0         →0x24298
            <MI 2425e  CLR.B   (A6-0x3)>                                        {}
            <MI 24260  BRA     0x24298>                                         {}
        <POP 24262-24298 Naked>                              Σ0         ↓ ←0x2425a
            <Blob 0x24262 [54] @>                            Δ-54               {[«54""»]}
            <POP 24274-24276 StackAdj>                       Δ-8                {[«54""»]|[-8-]}
            <Lit 0x24276 53>                                                    {[«54""»]|[-4-]|[$$Enter IP address of this machine [089.064.003.007] :_]}
            <Call 0x2428a 0x103e4>                                              {[«54""»]|[-4-]|[$$Enter IP address of this machine [089.064.003.007] :_]}
                AskConsoleString(prompt : String) : String
            <POP 24290-24292 StackAdj>                       Δ+4                {[«54""»]|[-4-]}
            <MI 24292  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {[«54""»]}
            <POP 24294-24298 StackAdj>                       Δ+54               {}
        <POP 24298-2429e Naked>                              Σ0         ↓ →0x242a8 ←0x2425e
            <MI 24298  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 2429a  TST.W   (A0)>                                            {}
            <MI 2429c  BNE     0x242a8>                                         {}
        <POP 2429e-242a8 Naked>                              Σ0         →0x24336
            <MI 2429e  MOVE.L  #0x59400307,0x2d024>                             {}
            <MI 242a4  BRA     0x24336>                                         {}
        <POP 242a8-242bc Naked>                              Σ0 Δ-4     ↓ ←0x24298
            <MI 242a8  CLR.L   0x2d024>                                         {}
            <MI 242aa  MOVEQ.L #0x00,D7>                                        {}
            <MI 242ac  MOVEQ.L #0x00,D6>                                        {}
            <MI 242ae  MOVE.L  #0x1000000,D5>                                   {}
            <MI 242b4  MOVE.W  (A0),D0>                                         {}
            <MI 242b6  EXTW.L  D0>                                              {}
            <MI 242b8  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 242ba  MOVEQ.L #0x01,D0>                                        {[4, 'D0']}
        <POP 242bc-242c0 Naked>                              Σ-4        ↓ →0x24318 ←0x24314
            <MI 242bc  CMP.L   (A7),D0>                                         {[-4-]}
            <MI 242be  BGT     0x24318>                                         {[-4-]}
        <POP 242c0-242da Naked>                              Σ-4        ↓ →0x242fc
            <MI 242c0  MOVEA.L (A6-0x8),A0>                                     {[-4-]}
            <MI 242c2  MOVE.L  D0,D1>                                           {[-4-]}
            <MI 242c4  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x242c6 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 242d0  MOVE.B  (A0+D1.L+#0x2),D2>                               {[-4-]}
            <MI 242d4  CMPI.B  #0x2e,D2>                                        {[-4-]}
            <MI 242d8  BNE     0x242fc>                                         {[-4-]}
        <POP 242da-242fc Naked>                              Σ-4        →0x24314
            <MI 242da  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 242dc  MOVE.L  D5,D4>                                           {[-4-]}
            <MI 242de  MOVE.L  D7,D3>                                           {[-4-]}
            <Call 0x242e0 0x1028c>                                              {[-4-]}
                ?muls_d3_d4
            <MI 242e6  ADD.L   D4,0x2d024>                                      {[-4-]}
            <MI 242e8  MOVE.L  D5,D4>                                           {[-4-]}
            <MI 242ea  MOVE.L  #0x100,D3>                                       {[-4-]}
            <Call 0x242f0 0x10294>                                              {[-4-]}
                ?divs_d3_d4
            <MI 242f6  MOVE.L  D4,D5>                                           {[-4-]}
            <MI 242f8  MOVEQ.L #0x00,D7>                                        {[-4-]}
            <MI 242fa  BRA     0x24314>                                         {[-4-]}
        <POP 242fc-24314 Naked>                              Σ-4        ↓ ←0x242c0
            <MI 242fc  MOVE.L  D7,D4>                                           {[-4-]}
            <MI 242fe  MOVEQ.L #0x0a,D3>                                        {[-4-]}
            <Call 0x24300 0x1028c>                                              {[-4-]}
                ?muls_d3_d4
            <POP 24306-24308 StackAdj>                       Δ-4                {[-8-]}
            <MI 24308  MOVE.B  D2,-(A7)>                     Δ-2                {[-8-]|[2, 'D2']}
            <Call 0x2430a 0x21388>                                              {[-8-]|[2, 'D2']}
            <POP 2430e-24310 StackAdj>                       Δ+2                {[-8-]}
            <MI 24310  MOVE.L  D4,D7>                                           {[-8-]}
            <MI 24312  ADD.L   (A7)+,D7>                     Δ+4                {[-4-]}
        <POP 24314-24318 Naked>                              Σ-4        ↓ →0x242bc ←0x242da
            <MI 24314  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 24316  BVC     0x242bc>                                         {[-4-]}
        <POP 24318-24332 Naked>                              Σ-4 Δ+4    ↓ →0x24336 ←0x242bc
            <POP 24318-2431a StackAdj>                       Δ+4                {}
            <MI 2431a  MOVE.L  D5,D4>                                           {}
            <MI 2431c  MOVE.L  D7,D3>                                           {}
            <Call 0x2431e 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 24324  ADD.L   D4,0x2d024>                                      {}
            <MI 24326  CLR.B   (A6-0x4)>                                        {}
            <MI 2432a  CMPI.L  #0x00000003,D6>                                  {}
            <MI 24330  BNE     0x24336>                                         {}
        <POP 24332-24336 Naked>                              Σ0         ↓
            <MI 24332  ADDQ.B  #0x1,(A6-0x4)>                                   {}
        <POP 24336-24348 Naked>                              Σ0         ↓ →0x2425a ←0x2429e ←0x24318
            <Pointer.fp 0x24336 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Call 0x24338 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 2433e-24340 StackAdj>                       Δ+4                {}
            <MI 24340  TST.B   (A6-0x4)>                                        {}
            <MI 24344  BEQ     0x2425a>                                         {}
        <POP 24348-2434c Naked>                              Σ0         ↓
            <MI 24348  MOVE.L  0x2d024,(A6+0xc)>                                {}
        <POP 2434c-24354 Epilogue>                           Σ0         

0x24354


@ 24354
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x003 1(w)>
        <LVAR -0x004 1(w)>
        <LVAR -0x005 1(w)>
        <LVAR -0x006 1(w) 4(rw)>
        <LVAR -0x007 1(w)>
        <LVAR -0x008 1(w)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00d 1(w)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x018 4(w)>
        <LVAR -0x01c 4(w)>
        <LVAR -0x020 4(w)>
        <LVAR -0x024 @ 4(w)>
    <POP 24354-24460 Body>                                              
        <POP 24354-2436a Prologue>                           Σ0         ↓
        <POP 2436a-24384 RegCacheLoad>                       Σ0         ↓
        <POP 24384-243dc Naked>                              Σ0         ↓ →0x243de
            <MI 24384  MOVE.L  0x21150,(A6-0x12)>                               {}
            <MI 24388  MOVE.L  0x21154,(A6-0xe)>                                {}
            <MI 2438c  MOVE.L  0x21158,(A6-0xa)>                                {}
            <MI 24392  MOVE.L  0x2115c,(A6-0x6)>                                {}
            <MI 24396  ANDI.B  #0x80,(A6-0xd)>                                  {}
            <MI 2439c  ORI.B   #0x06,(A6-0xd)>                                  {}
            <MI 243a2  ANDI.B  #0x80,(A6-0x7)>                                  {}
            <MI 243a8  ORI.B   #0x02,(A6-0x7)>                                  {}
            <MI 243ae  MOVE.L  (A6+0x10),D4>                                    {}
            <MI 243b2  MOVE.L  #0x100,D3>                                       {}
            <Call 0x243b4 0x10294>                                              {}
                ?divs_d3_d4
            <MI 243b6  MOVE.L  D3,-(A7)>                     Δ-4                {[4, 'D3']}
            <MI 243b8  MOVE.L  D4,-(A7)>                     Δ-4                {[4, 'D3']|[4, 'D4']}
            <MI 243ba  MOVE.L  #0x100,D3>                                       {[4, 'D3']|[4, 'D4']}
            <Call 0x243bc 0x10294>                                              {[4, 'D3']|[4, 'D4']}
                ?divs_d3_d4
            <MI 243be  MOVE.B  D3,(A6-0x8)>                                     {[4, 'D3']|[4, 'D4']}
            <MI 243c2  MOVE.L  (A7)+,D0>                     Δ+4                {[4, 'D3']}
            <MI 243c4  MOVE.L  (A7)+,D1>                     Δ+4                {}
            <MI 243c6  MOVE.B  D1,(A6-0x6)>                                     {}
            <MI 243c8  MOVE.L  (A6+0xc),D4>                                     {}
            <MI 243cc  MOVE.L  #0x10000,D3>                                     {}
            <Call 0x243d2 0x10294>                                              {}
                ?divs_d3_d4
            <MI 243d4  DIVS.W  #0x100,D4>                                       {}
            <MI 243d6  SWAP.W  D4>                                              {}
            <MI 243d8  TST.W   D4>                                              {}
            <MI 243da  BGE     0x243de>                                         {}
        <POP 243dc-243de Naked>                              Σ0         ↓
            <MI 243dc  ADD.W   #0x100,D4>                                       {}
        <POP 243de-24446 Naked>                              Σ0         ↓ →0x24458 ←0x24384
            <MI 243de  MOVE.B  D4,(A6-0x5)>                                     {}
            <MI 243e2  MOVE.L  (A6+0xc),D4>                                     {}
            <MI 243e6  MOVE.L  #0x100,D3>                                       {}
            <Call 0x243e8 0x10294>                                              {}
                ?divs_d3_d4
            <MI 243ea  MOVE.L  D3,-(A7)>                     Δ-4                {[4, 'D3']}
            <MI 243ec  MOVE.L  D4,-(A7)>                     Δ-4                {[4, 'D3']|[4, 'D4']}
            <MI 243ee  MOVE.L  #0x100,D3>                                       {[4, 'D3']|[4, 'D4']}
            <Call 0x243f0 0x10294>                                              {[4, 'D3']|[4, 'D4']}
                ?divs_d3_d4
            <MI 243f2  MOVE.B  D3,(A6-0x4)>                                     {[4, 'D3']|[4, 'D4']}
            <MI 243f6  MOVE.L  (A7)+,D0>                     Δ+4                {[4, 'D3']}
            <MI 243f8  MOVE.L  (A7)+,D1>                     Δ+4                {}
            <MI 243fa  MOVE.B  D1,(A6-0x3)>                                     {}
            <MI 243fe  MOVE.L  (A6-0x12),(A6-0x24)>                             {}
            <MI 24402  MOVE.L  (A6-0xe),(A6-0x20)>                              {}
            <MI 24406  MOVE.L  (A6-0xa),(A6-0x1c)>                              {}
            <MI 2440c  MOVE.L  (A6-0x6),(A6-0x18)>                              {}
            <Pointer.fp 0x24410 <LVAR -0x024 @ 4(w)>>        Δ-4                {[@@-36]}
            <Const 0x24414 0x9303fc00.4>                     Δ-4                {[@@-36]|[##2466511872]}
            <Const 0x2441a 0x1.2>                            Δ-2                {[@@-36]|[##2466511872]|[#1]}
            <Const 0x2441c 0x0.4>                            Δ-4                {[@@-36]|[##2466511872]|[#1]|[##0]}
            <MI 24420  LEA.L   0x2d8c2,A0>                                      {[@@-36]|[##2466511872]|[#1]|[##0]}
            <MI 24426  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-36]|[##2466511872]|[#1]|[##0]|[4, 'A0']}
            <MI 24428  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[@@-36]|[##2466511872]|[#1]|[##0]|[4, 'A0']|[4, '(A6+0x8)']}
            <Call 0x2442c 0x22766>                                              {[@@-36]|[##2466511872]|[#1]|[##0]|[4, 'A0']|[4, '(A6+0x8)']}
            <POP 24430-24434 StackAdj>                       Δ+20               {[-2-]}
            <POP 24434-24435 StackAdj>                       Δ+2                {}
            <Const 0x24435 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x24436 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#1]|[@@-20]}
            <Call 0x2443a 0x22676>                                              {[#1]|[@@-20]}
            <POP 2443e-24440 StackAdj>                       Δ+6                {}
            <MI 24440  TST.B   (A6-0x14)>                                       {}
            <MI 24444  BNE     0x24458>                                         {}
        <POP 24446-24458 Naked>                              Σ0         ↓
            <MI 24446  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 24448  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 2444c  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 2444e  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x24450 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 24454-24458 StackAdj>                       Δ+16               {}
        <POP 24458-24460 Epilogue>                           Σ0         ←0x243de

0x24460


@ 24460
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x003 1(w)>
        <LVAR -0x004 1(w)>
        <LVAR -0x005 1(w)>
        <LVAR -0x006 1(w) 4(rw)>
        <LVAR -0x007 1(w)>
        <LVAR -0x008 1(w)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00d 1(w)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x018 4(w)>
        <LVAR -0x01c 4(w)>
        <LVAR -0x020 4(w)>
        <LVAR -0x024 @ 4(w)>
    <POP 24460-24562 Body>                                              
        <POP 24460-24476 Prologue>                           Σ0         ↓
        <POP 24476-24488 RegCacheLoad>                       Σ0         ↓
        <POP 24488-244e2 Naked>                              Σ0         ↓ →0x244e4
            <MI 24488  MOVE.L  0x21150,(A6-0x12)>                               {}
            <MI 2448e  MOVE.L  0x21154,(A6-0xe)>                                {}
            <MI 24494  MOVE.L  0x21158,(A6-0xa)>                                {}
            <MI 2449a  MOVE.L  0x2115c,(A6-0x6)>                                {}
            <MI 2449e  ANDI.B  #0x80,(A6-0xd)>                                  {}
            <MI 244a4  ORI.B   #0x06,(A6-0xd)>                                  {}
            <MI 244aa  ANDI.B  #0x80,(A6-0x7)>                                  {}
            <MI 244b0  OR.B    #0x01,(A6-0x7)>                                  {}
            <MI 244b4  MOVE.L  (A6+0xc),D4>                                     {}
            <MI 244b8  MOVE.L  #0x100,D3>                                       {}
            <Call 0x244ba 0x10294>                                              {}
                ?divs_d3_d4
            <MI 244bc  MOVE.L  D3,-(A7)>                     Δ-4                {[4, 'D3']}
            <MI 244be  MOVE.L  D4,-(A7)>                     Δ-4                {[4, 'D3']|[4, 'D4']}
            <MI 244c0  MOVE.L  #0x100,D3>                                       {[4, 'D3']|[4, 'D4']}
            <Call 0x244c2 0x10294>                                              {[4, 'D3']|[4, 'D4']}
                ?divs_d3_d4
            <MI 244c4  MOVE.B  D3,(A6-0x8)>                                     {[4, 'D3']|[4, 'D4']}
            <MI 244c8  MOVE.L  (A7)+,D0>                     Δ+4                {[4, 'D3']}
            <MI 244ca  MOVE.L  (A7)+,D1>                     Δ+4                {}
            <MI 244cc  MOVE.B  D1,(A6-0x6)>                                     {}
            <MI 244ce  MOVE.L  (A6+0x8),D4>                                     {}
            <MI 244d2  MOVE.L  #0x10000,D3>                                     {}
            <Call 0x244d8 0x10294>                                              {}
                ?divs_d3_d4
            <MI 244da  DIVS.W  #0x100,D4>                                       {}
            <MI 244dc  SWAP.W  D4>                                              {}
            <MI 244de  TST.W   D4>                                              {}
            <MI 244e0  BGE     0x244e4>                                         {}
        <POP 244e2-244e4 Naked>                              Σ0         ↓
            <MI 244e2  ADD.W   #0x100,D4>                                       {}
        <POP 244e4-24550 Naked>                              Σ0         ↓ →0x2455a ←0x24488
            <MI 244e4  MOVE.B  D4,(A6-0x5)>                                     {}
            <MI 244e8  MOVE.L  (A6+0x8),D4>                                     {}
            <MI 244ec  MOVE.L  #0x100,D3>                                       {}
            <Call 0x244ee 0x10294>                                              {}
                ?divs_d3_d4
            <MI 244f0  MOVE.L  D3,-(A7)>                     Δ-4                {[4, 'D3']}
            <MI 244f2  MOVE.L  D4,-(A7)>                     Δ-4                {[4, 'D3']|[4, 'D4']}
            <MI 244f4  MOVE.L  #0x100,D3>                                       {[4, 'D3']|[4, 'D4']}
            <Call 0x244f6 0x10294>                                              {[4, 'D3']|[4, 'D4']}
                ?divs_d3_d4
            <MI 244f8  MOVE.B  D3,(A6-0x4)>                                     {[4, 'D3']|[4, 'D4']}
            <MI 244fc  MOVE.L  (A7)+,D0>                     Δ+4                {[4, 'D3']}
            <MI 244fe  MOVE.L  (A7)+,D1>                     Δ+4                {}
            <MI 24500  MOVE.B  D1,(A6-0x3)>                                     {}
            <MI 24504  MOVE.L  (A6-0x12),(A6-0x24)>                             {}
            <MI 2450a  MOVE.L  (A6-0xe),(A6-0x20)>                              {}
            <MI 24510  MOVE.L  (A6-0xa),(A6-0x1c)>                              {}
            <MI 24516  MOVE.L  (A6-0x6),(A6-0x18)>                              {}
            <Pointer.fp 0x2451a <LVAR -0x024 @ 4(w)>>        Δ-4                {[@@-36]}
            <MI 2451e  LEA.L   0x2dcc2,A0>                                      {[@@-36]}
            <MI 24524  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-36]|[4, 'A0']}
            <Const 0x24526 0x1.2>                            Δ-2                {[@@-36]|[4, 'A0']|[#1]}
            <MI 24528  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[@@-36]|[4, 'A0']|[#1]|[4, '(A6+0xc)']}
            <Const 0x2452c 0x9303fc00.4>                     Δ-4                {[@@-36]|[4, 'A0']|[#1]|[4, '(A6+0xc)']|[##2466511872]}
            <Const 0x24532 0x0.4>                            Δ-4                {[@@-36]|[4, 'A0']|[#1]|[4, '(A6+0xc)']|[##2466511872]|[##0]}
            <Call 0x24536 0x22766>                                              {[@@-36]|[4, 'A0']|[#1]|[4, '(A6+0xc)']|[##2466511872]|[##0]}
            <POP 2453a-2453e StackAdj>                       Δ+20               {[-2-]}
            <POP 2453e-2453f StackAdj>                       Δ+2                {}
            <Const 0x2453f 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x24540 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#1]|[@@-20]}
            <Call 0x24544 0x22676>                                              {[#1]|[@@-20]}
            <POP 24548-2454a StackAdj>                       Δ+6                {}
            <MI 2454a  TST.B   (A6-0x14)>                                       {}
            <MI 2454e  BNE     0x2455a>                                         {}
        <POP 24550-2455a Naked>                              Σ0         ↓
            <Const 0x24550 0x24.4>                           Δ-4                {[##36]}
            <Call 0x24554 0x2132c>                                              {[##36]}
            <POP 24558-2455a StackAdj>                       Δ+4                {}
        <POP 2455a-24562 Epilogue>                           Σ0         ←0x244e4

0x24562


@ 24562
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 24562-245b2 Body>                                              
        <POP 24562-24578 Prologue>                           Σ0         ↓
        <POP 24578-245aa Naked>                              Σ0         ↓
            <MI 24578  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[4, '(A6+0x10)']}
            <MI 2457c  LEA.L   0x2dcc2,A0>                                      {[4, '(A6+0x10)']}
            <MI 24582  MOVE.L  A0,-(A7)>                     Δ-4                {[4, '(A6+0x10)']|[4, 'A0']}
            <MI 24584  MOVE.L  (A6+0x8),D0>                                     {[4, '(A6+0x10)']|[4, 'A0']}
            <POP 0x24588 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[4, '(A6+0x10)']|[4, 'A0']}
            <MI 24592  MOVE.W  D0,-(A7)>                     Δ-2                {[4, '(A6+0x10)']|[4, 'A0']|[2, 'D0']}
            <Call 0x24594 0x10238>                                              {[4, '(A6+0x10)']|[4, 'A0']|[2, 'D0']}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2459a-2459c StackAdj>                       Δ+6                {[4, '(A6+0x10)']}
            <MI 2459c  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <MI 245a0  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0x8)']|[4, '(A6+0xc)']}
            <Call 0x245a4 0x24460>                                              {[4, '(A6+0x8)']|[4, '(A6+0xc)']}
            <POP 245a8-245aa StackAdj>                       Δ+8                {}
        <POP 245aa-245b2 Epilogue>                           Σ0         

0x245b2


@ 245b2
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 245b2-24608 Body>                                              
        <POP 245b2-245c8 Prologue>                           Σ0         ↓
        <POP 245c8-245cc RegCacheLoad>                       Σ0         ↓
        <POP 245cc-24600 Naked>                              Σ0         ↓
            <MI 245cc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <MI 245ce  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[4, '(A6+0x8)']|[4, '(A6+0x10)']}
            <MI 245d2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']|[4, '(A6+0x10)']|[4, '(A6+0x8)']}
            <Call 0x245d4 0x24354>                                              {[4, '(A6+0x8)']|[4, '(A6+0x10)']|[4, '(A6+0x8)']}
            <POP 245d8-245dc StackAdj>                       Δ+12               {}
            <MI 245dc  LEA.L   0x2d8c2,A0>                                      {}
            <MI 245e2  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 245e4  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, 'A0']|[4, '(A6+0xc)']}
            <MI 245e8  MOVE.L  (A6+0x8),D0>                                     {[4, 'A0']|[4, '(A6+0xc)']}
            <POP 0x245ea LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[4, 'A0']|[4, '(A6+0xc)']}
            <MI 245f4  MOVE.W  D0,-(A7)>                     Δ-2                {[4, 'A0']|[4, '(A6+0xc)']|[2, 'D0']}
            <Call 0x245f6 0x10238>                                              {[4, 'A0']|[4, '(A6+0xc)']|[2, 'D0']}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 245fc-24600 StackAdj>                       Δ+10               {}
        <POP 24600-24608 Epilogue>                           Σ0         

0x24608


@ 24608
    <POP 24608-24724 Body>                                              
        <POP 24608-2461e Prologue>                           Σ0         ↓
        <POP 2461e-24638 RegCacheLoad>                       Σ0         ↓
        <POP 24638-24672 Naked>                              Σ0         ↓
            <MI 24638  LEA.L   0x1200,A0>                                       {}
            <MI 2463c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2463e  LEA.L   0x2e198,A0>                                      {[4, 'A0']}
            <MI 24640  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x24642 0x20.4>                           Δ-4                {[4, 'A0']|[4, 'A0']|[##32]}
            <Call 0x24646 0x245b2>                                              {[4, 'A0']|[4, 'A0']|[##32]}
            <POP 2464a-2464b StackAdj>                       Δ+12       ↓       {}
            <Blob 0x2464b [24] @>                            Δ-24               {[«24""»]}
            <POP 2465a-2465c StackAdj>                       Δ-4                {[«24""»]|[-4-]}
            <Lit 0x2465c 23>                                                    {[«24""»]|[$$Ethernet Address (hex)_]}
            <Call 0x2466a 0x103d8>                                              {[«24""»]|[$$Ethernet Address (hex)_]}
                WriteConsoleString(str : String)
            <POP 2466c-24670 StackAdj>                       Δ+28               {}
            <MI 24670  MOVEQ.L #0x00,D7>                                        {}
        <POP 24672-24698 Naked>                              Σ0         ↓ →0x246ae ←0x246ae
            <POP 24672-24674 StackAdj>                       Δ-4                {[-4-]}
            <POP 0x24674 LimitCheck 0x0 ≤ D7 ≤ 0x5>                             {[-4-]}
            <MI 2467a  LEA.L   0x2e198,A0>                                      {[-4-]}
            <MI 2467c  CLR.L   D0>                                              {[-4-]}
            <MI 2467e  MOVE.B  (A0+D7.L+#0x18),D0>                              {[-4-]}
            <MI 24682  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x24684 0x2.4>                            Δ-4                {[-4-]|[4, 'D0']|[##2]}
            <Call 0x24688 0x102e8>                                              {[-4-]|[4, 'D0']|[##2]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 2468e-24690 StackAdj>                       Δ+8                {[-4-]}
            <Call 0x24690 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 24692-24694 StackAdj>                       Δ+4                {}
            <MI 24694  CMP.L   #0x05,D7>                                        {}
            <MI 24696  BEQ     0x246ae>                                         {}
        <POP 24698-246ae Naked>                              Σ0         ↓
            <Blob 0x24698 [2] @>                             Δ-2                {[«2""»]}
            <POP 2469c-2469e StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x2469e 2>                                                     {[«2""»]|[$$- ]}
            <Call 0x246aa 0x103d8>                                              {[«2""»]|[$$- ]}
                WriteConsoleString(str : String)
            <POP 246ac-246ae StackAdj>                       Δ+6                {}
        <POP 246ae-246b4 Naked>                              Σ0         ↓ →0x24672 ←0x24672
            <MI 246ae  ADDQ.L  #0x1,D7>                                         {}
            <MI 246b0  CMP.L   #0x05,D7>                                        {}
            <MI 246b2  BLE     0x24672>                                         {}
        <POP 246b4-246d6 Naked>                              Σ0         ↓
            <Blob 0x246b4 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x246b8 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x246bc [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 246c0-246c2 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x246c2 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[$$, (decimal)_]}
            <Call 0x246ce 0x103d8>                                              {[«4""»]|[«4""»]|[«4""»]|[$$, (decimal)_]}
                WriteConsoleString(str : String)
            <POP 246d0-246d4 StackAdj>                       Δ+16               {}
            <MI 246d4  MOVEQ.L #0x00,D7>                                        {}
        <POP 246d6-246f8 Naked>                              Σ0         ↓ →0x24710 ←0x24716
            <POP 246d6-246d8 StackAdj>                       Δ-4                {[-4-]}
            <POP 0x246d8 LimitCheck 0x0 ≤ D7 ≤ 0x5>                             {[-4-]}
            <MI 246de  LEA.L   0x2e198,A0>                                      {[-4-]}
            <MI 246e0  CLR.L   D0>                                              {[-4-]}
            <MI 246e2  MOVE.B  (A0+D7.L+#0x18),D0>                              {[-4-]}
            <MI 246e6  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Call 0x246e8 0x102e4>                                              {[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 246ee-246f0 StackAdj>                       Δ+4                {[-4-]}
            <Call 0x246f0 0x103d8>                                              {[-4-]}
                WriteConsoleString(str : String)
            <POP 246f2-246f4 StackAdj>                       Δ+4                {}
            <MI 246f4  CMP.L   #0x05,D7>                                        {}
            <MI 246f6  BEQ     0x24710>                                         {}
        <POP 246f8-24710 Naked>                              Σ0         →0x24716
            <Blob 0x246f8 [2] @>                             Δ-2                {[«2""»]}
            <POP 246fc-246fe StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x246fe 2>                                                     {[«2""»]|[$$. ]}
            <Call 0x2470a 0x103d8>                                              {[«2""»]|[$$. ]}
                WriteConsoleString(str : String)
            <POP 2470c-2470e StackAdj>                       Δ+6                {}
            <MI 2470e  BRA     0x24716>                                         {}
        <POP 24710-24716 Naked>                              Σ0         ↓ ←0x246d6
            <Call 0x24710 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 24716-2471c Naked>                              Σ0         ↓ →0x246d6 ←0x246f8
            <MI 24716  ADDQ.L  #0x1,D7>                                         {}
            <MI 24718  CMP.L   #0x05,D7>                                        {}
            <MI 2471a  BLE     0x246d6>                                         {}
        <POP 2471c-24724 Epilogue>                           Σ0         

0x24724


@ 24724
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x00a 4(w)>
        <LVAR -0x00e 4(w)>
        <LVAR -0x012 4(w)>
        <LVAR -0x016 4(w)>
        <LVAR -0x01a 4(r)>
        <LVAR -0x01e 4(r)>
        <LVAR -0x022 @ 4(w)>
        <LVAR -0x026 4(r)>
        <LVAR -0x02a 4(w)>
        <LVAR -0x02e 4(w)>
        <LVAR -0x032 4(r)>
        <LVAR -0x036 4(w)>
        <LVAR -0x03a 4(w)>
        <LVAR -0x03e 4(w)>
        <LVAR -0x042 4(w)>
        <LVAR -0x046 4(w)>
        <LVAR -0x04a 4(w)>
        <LVAR -0x04e 4(w)>
        <LVAR -0x052 4(w)>
        <LVAR -0x053 1(w)>
        <LVAR -0x054 1(w)>
        <LVAR -0x055 1(w)>
        <LVAR -0x056 1(w)>
        <LVAR -0x05a 4(w)>
        <LVAR -0x05e @ 4(w)>
        <LVAR -0x060 @ 1(r)>
        <LVAR -0x062 @ 2(w)>
        <LVAR -0x066 @ 4(rw)>
        <LVAR -0x072 @ 4(rw)>
        <LVAR -0x074 @>
        <LVAR -0x078 4(rw)>
        <LVAR -0x07c 4(rw)>
        <LVAR -0x080 @ 4(r)>
        <LVAR -0x084 @ 4(r)>
    <POP 24724-24ba2 Body>                                              
        <POP 24724-2473a Prologue>                           Σ0         ↓
        <POP 2473a-2474a RegCacheLoad>                       Σ0         ↓
        <POP 2474a-24780 Naked>                              Σ0         ↓ →0x247aa
            <Blob 0x2474a [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x2474e [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <MI 24752  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']}
            <POP 24756-24758 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x24758 8>                                                     {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]}
            <POP 24766-24768 StackAdj>                       Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]|[-2-]}
            <POP 24768-24769 StackAdj>                       Δ+2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]}
            <Const 0x24769 0x1.2>                            Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]|[#1]}
            <Pointer.fp 0x2476c <LVAR -0x002 @ 1(r)>>        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]|[#1]|[@@-2]}
            <Pointer.fp 0x24770 <LVAR -0x072 @ 4(rw)>>       Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]|[#1]|[@@-2]|[@@-114]}
            <Call 0x24772 0x21cee>                                              {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$FILENAME]|[#1]|[@@-2]|[@@-114]}
            <POP 24776-2477a StackAdj>                       Δ+26               {}
            <MI 2477a  TST.B   (A6-0x2)>                                        {}
            <MI 2477e  BNE     0x247aa>                                         {}
        <POP 24780-247aa Naked>                              Σ0         ↓
            <Blob 0x24780 [10] @>                            Δ-10               {[«10""»]}
            <POP 24792-24794 StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x24794 9>                                                     {[«10""»]|[$$ENPCODE.S]}
            <MI 247a4  MOVE.L  (A7)+,(A6-0x72)>              Δ+4                {[«10""»]}
            <POP 247a6-247aa StackAdj>                       Δ+10               {}
        <POP 247aa-24828 Naked>                              Σ0         ↓ →0x24832 ←0x2474a
            <POP 247aa-247ac StackAdj>                       Δ-4                {[-4-]}
            <MI 247ac  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x247b0 0x241ec>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 247b4-247b6 StackAdj>                       Δ+4                {[-4-]}
            <MI 247b6  MOVE.L  (A7)+,0x2d024>                Δ+4                {}
            <MI 247bc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x247c0 0x228dc>                                              {[4, '(A6+0x8)']}
            <POP 247c4-247c5 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x247c5 [58] @>                            Δ-58               {[«58""»]}
            <POP 247d6-247d8 StackAdj>                       Δ-4                {[«58""»]|[-4-]}
            <Lit 0x247d8 57>                                                    {[«58""»]|[$$Delaying for controller to complete self test diagnostics]}
            <Call 0x247e8 0x103d8>                                              {[«58""»]|[$$Delaying for controller to complete self test diagnostics]}
                WriteConsoleString(str : String)
            <POP 247ee-247f2 StackAdj>                       Δ+58               {[-4-]}
            <POP 247f2-247f3 StackAdj>                       Δ+4                {}
            <Const 0x247f3 0x26258.4>                        Δ-4                {[##156248]}
            <Call 0x247f8 0x10224>                                              {[##156248]}
                KC12_Sleep(dur: Long)
            <POP 247fe-24800 StackAdj>                       Δ+4                {}
            <Call 0x24800 0x21456>                                              {}
            <MI 24804  MOVE.L  (A6-0x72),-(A7)>              Δ-4                {[4, '(A6-0x72)']}
            <MI 24806  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0x72)']|[#0]}
            <Const 0x24808 0x1.2>                            Δ-2                {[4, '(A6-0x72)']|[#0]|[#1]}
            <Const 0x2480c 0x0.4>                            Δ-4                {[4, '(A6-0x72)']|[#0]|[#1]|[##0]}
            <Pointer.fp 0x24810 <LVAR -0x060 @ 1(r)>>        Δ-4                {[4, '(A6-0x72)']|[#0]|[#1]|[##0]|[@@-96]}
            <Pointer.fp 0x24814 <LVAR -0x084 @ 4(r)>>        Δ-4                {[4, '(A6-0x72)']|[#0]|[#1]|[##0]|[@@-96]|[@@-132]}
            <Call 0x24818 0x10380>                                              {[4, '(A6-0x72)']|[#0]|[#1]|[##0]|[@@-96]|[@@-132]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 2481e-24822 StackAdj>                       Δ+20               {}
            <MI 24822  TST.B   (A6-0x60)>                                       {}
            <MI 24826  BEQ     0x24832>                                         {}
        <POP 24828-24832 Naked>                              Σ0         ↓
            <Const 0x24828 0x6.4>                            Δ-4                {[##6]}
            <Call 0x2482c 0x2132c>                                              {[##6]}
            <POP 24830-24832 StackAdj>                       Δ+4                {}
        <POP 24832-24876 Naked>                              Σ0         ↓ ←0x247aa
            <Pointer.fp 0x24832 <LVAR -0x072 @ 4(rw)>>       Δ-4                {[@@-114]}
            <Call 0x24834 0x102bc>                                              {[@@-114]}
                FreeString(VAR a : String)
            <POP 2483a-2483c StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2483c <LVAR -0x080 @ 4(r)>>        Δ-4                {[@@-128]}
            <Call 0x2483e 0x102b8>                                              {[@@-128]}
                NewString(VAR a : String)
            <POP 24844-24845 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x24845 [36] @>                            Δ-36               {[«36""»]}
            <POP 24856-24858 StackAdj>                       Δ-4                {[«36""»]|[-4-]}
            <Lit 0x24858 35>                                                    {[«36""»]|[$$Downloading CMC ENP100i controller_]}
            <Call 0x24868 0x103d8>                                              {[«36""»]|[$$Downloading CMC ENP100i controller_]}
                WriteConsoleString(str : String)
            <POP 2486e-24872 StackAdj>                       Δ+40               {}
            <MI 24872  CLR.L   (A6-0x78)>                                       {}
        <POP 24876-24896 Naked>                              Σ0         ↓ →0x249b4 ←0x249b4 ←0x249c2
            <MI 24876  MOVE.L  (A6-0x84),-(A7)>              Δ-4                {[4, '(A6-0x84)']}
            <Pointer.fp 0x2487a <LVAR -0x080 @ 4(r)>>        Δ-4                {[4, '(A6-0x84)']|[@@-128]}
            <Pointer.fp 0x2487c <LVAR -0x074 @>>             Δ-4                {[4, '(A6-0x84)']|[@@-128]|[@@-116]}
            <Call 0x24880 0x1043c>                                              {[4, '(A6-0x84)']|[@@-128]|[@@-116]}
                FileReadLine(file : File; VAR a : String; VAR b : Byte)
            <POP 24886-24888 StackAdj>                       Δ+12               {}
            <MI 24888  MOVEA.L (A6-0x80),A0>                                    {}
            <MI 2488a  MOVE.B  (A0+0x2),D0>                                     {}
            <MI 2488e  CMPI.B  #0x53,D0>                                        {}
            <MI 24892  BNE     0x249b4>                                         {}
        <POP 24896-248a2 Naked>                              Σ0         ↓ →0x249b4
            <MI 24896  MOVE.B  (A0+0x3),D0>                                     {}
            <MI 2489a  CMPI.B  #0x33,D0>                                        {}
            <MI 2489e  BNE     0x249b4>                                         {}
        <POP 248a2-248d2 Naked>                              Σ0         ↓
            <POP 248a2-248a4 StackAdj>                       Δ-4                {[-4-]}
            <MI 248a4  MOVE.B  (A0+0x4),-(A7)>               Δ-2                {[-4-]|[2, '(A0+0x4)']}
            <Call 0x248a8 0x213d0>                                              {[-4-]|[2, '(A0+0x4)']}
            <POP 248ac-248ae StackAdj>                       Δ+2                {[-4-]}
            <MI 248ae  MOVE.L  (A7)+,D3>                     Δ+4                {}
            <MI 248b0  MOVEQ.L #0x10,D4>                                        {}
            <Call 0x248b2 0x1028c>                                              {}
                ?muls_d3_d4
            <POP 248b8-248ba StackAdj>                       Δ-4                {[-4-]}
            <MI 248ba  MOVE.B  (A0+0x5),-(A7)>               Δ-2                {[-4-]|[2, '(A0+0x5)']}
            <Call 0x248be 0x213d0>                                              {[-4-]|[2, '(A0+0x5)']}
            <POP 248c2-248c4 StackAdj>                       Δ+2                {[-4-]}
            <MI 248c4  MOVE.L  D4,D0>                                           {[-4-]}
            <MI 248c6  ADD.L   (A7)+,D0>                     Δ+4                {}
            <MI 248c8  SUBQ.L  #0x5,D0>                                         {}
            <MI 248ca  MOVE.L  D0,(A6-0x7c)>                                    {}
            <MI 248ce  MOVEQ.L #0x00,D5>                                        {}
            <MI 248d0  MOVEQ.L #0x08,D7>                                        {}
        <POP 248d2-24902 Naked>                              Σ0         ↓ →0x248d2 ←0x248d2
            <MI 248d2  MOVEQ.L #0x10,D4>                                        {}
            <MI 248d4  MOVE.L  D5,D3>                                           {}
            <Call 0x248d6 0x1028c>                                              {}
                ?muls_d3_d4
            <POP 248dc-248de StackAdj>                       Δ-4                {[-4-]}
            <MI 248de  MOVEA.L (A6-0x80),A0>                                    {[-4-]}
            <MI 248e0  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 248e2  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x248e4 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 248ee  MOVE.B  (A0+D0.L+#0x2),-(A7)>         Δ-2                {[-4-]|[2, '(A0+D0.L+#0x2)']}
            <Call 0x248f2 0x213d0>                                              {[-4-]|[2, '(A0+D0.L+#0x2)']}
            <POP 248f6-248f8 StackAdj>                       Δ+2                {[-4-]}
            <MI 248f8  MOVE.L  D4,D5>                                           {[-4-]}
            <MI 248fa  ADD.L   (A7)+,D5>                     Δ+4                {}
            <MI 248fc  ADDQ.L  #0x1,D7>                                         {}
            <MI 248fe  CMP.L   #0x0c,D7>                                        {}
            <MI 24900  BLE     0x248d2>                                         {}
        <POP 24902-24908 Naked>                              Σ0         ↓ →0x24920
            <MI 24902  CMP.L   (A6-0x78),D5>                                    {}
            <MI 24906  BLE     0x24920>                                         {}
        <POP 24908-24920 Naked>                              Σ0         ↓
            <Const 0x24908 0x2e.2>                           Δ-2                {[#46]}
            <Call 0x2490c 0x103d0>                                              {[#46]}
                WriteConsoleChar(chr : char)
            <POP 24912-24914 StackAdj>                       Δ+2                {}
            <MI 24914  MOVE.L  D5,(A6-0x78)>                                    {}
            <MI 24918  ADDI.L  #0x00001000,(A6-0x78)>                           {}
        <POP 24920-24928 Naked>                              Σ0         ↓ →0x249b4 ←0x24902
            <MI 24920  TST.L   (A6-0x7c)>                                       {}
            <MI 24924  BLE     0x249b4>                                         {}
        <POP 24928-2492a Naked>                              Σ0         ↓
            <MI 24928  MOVEQ.L #0x00,D6>                                        {}
        <POP 2492a-24930 Naked>                              Σ0         ↓ →0x249a8 ←0x24930
            <MI 2492a  CMP.L   (A6-0x7c),D6>                                    {}
            <MI 2492e  BGE     0x249a8>                                         {}
        <POP 24930-249a8 Naked>                              Σ0         →0x2492a
            <POP 0x24930 LimitCheck 0x0 ≤ D6 ≤ 0x3ff>                           {}
            <MI 2493a  LEA.L   0x2c794,A0>                                      {}
            <MI 24940  LEA.L   (A0+D6.L),A0>                                    {}
            <MI 24944  MOVEA.L (A6-0x80),A1>                                    {}
            <MI 24946  MOVE.L  D6,D0>                                           {}
            <MI 24948  ASL.L   #0x1,D0>                                         {}
            <POP 2494a-2494c StackAdj>                       Δ-4                {[-4-]}
            <MI 2494c  MOVE.L  D0,D1>                                           {[-4-]}
            <MI 2494e  ADDI.L  #0x0000000d,D1>                                  {[-4-]}
            <MI 24954  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x24956 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 24960  MOVE.B  (A1+D1.L+#0x2),-(A7)>         Δ-2                {[-4-]|[2, '(A1+D1.L+#0x2)']}
            <Call 0x24964 0x213d0>                                              {[-4-]|[2, '(A1+D1.L+#0x2)']}
            <POP 24968-2496a StackAdj>                       Δ+2                {[-4-]}
            <MI 2496a  MOVE.L  (A7)+,D3>                     Δ+4                {}
            <MI 2496c  MOVEQ.L #0x10,D4>                                        {}
            <Call 0x2496e 0x1028c>                                              {}
                ?muls_d3_d4
            <POP 24974-24976 StackAdj>                       Δ-4                {[-4-]}
            <MI 24976  ADDI.L  #0x0000000e,D0>                                  {[-4-]}
            <MI 2497c  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x2497e LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 24988  MOVE.B  (A1+D0.L+#0x2),-(A7)>         Δ-2                {[-4-]|[2, '(A1+D0.L+#0x2)']}
            <Call 0x2498c 0x213d0>                                              {[-4-]|[2, '(A1+D0.L+#0x2)']}
            <POP 24990-24992 StackAdj>                       Δ+2                {[-4-]}
            <MI 24992  MOVE.L  D4,D0>                                           {[-4-]}
            <MI 24994  ADD.L   (A7)+,D0>                     Δ+4                {}
            <POP 0x24996 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 249a0  MOVE.B  D0,(A0+0x152e)>                                  {}
            <MI 249a4  ADDQ.L  #0x1,D6>                                         {}
            <MI 249a6  BRA     0x2492a>                                         {}
        <POP 249a8-249b4 Naked>                              Σ0         ↓ ←0x2492a
            <MI 249a8  MOVE.L  (A6-0x7c),-(A7)>              Δ-4                {[4, '(A6-0x7c)']}
            <MI 249ac  MOVE.L  D5,-(A7)>                     Δ-4                {[4, '(A6-0x7c)']|[4, 'D5']}
            <Call 0x249ae 0x24460>                                              {[4, '(A6-0x7c)']|[4, 'D5']}
            <POP 249b2-249b4 StackAdj>                       Δ+8                {}
        <POP 249b4-249c2 Naked>                              Σ0         ↓ →0x24876 ←0x24876 ←0x24896 ←0x24920
            <MI 249b4  MOVEA.L (A6-0x80),A0>                                    {}
            <MI 249b6  MOVE.B  (A0+0x2),D0>                                     {}
            <MI 249ba  CMPI.B  #0x53,D0>                                        {}
            <MI 249be  BNE     0x24876>                                         {}
        <POP 249c2-249ce Naked>                              Σ0         ↓ →0x24876
            <MI 249c2  MOVE.B  (A0+0x3),D0>                                     {}
            <MI 249c6  CMPI.B  #0x37,D0>                                        {}
            <MI 249ca  BNE     0x24876>                                         {}
        <POP 249ce-249da Naked>                              Σ0         ↓
            <Call 0x249ce 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 249d4  CLR.L   (A6-0x66)>                                       {}
            <MI 249d8  MOVEQ.L #0x05,D7>                                        {}
        <POP 249da-24a10 Naked>                              Σ0         ↓ →0x249da ←0x249da
            <MI 249da  MOVEQ.L #0x10,D4>                                        {}
            <MI 249dc  MOVE.L  (A6-0x66),D3>                                    {}
            <Call 0x249e0 0x10290>                                              {}
                ?mulu_d3_d4
            <POP 249e6-249e8 StackAdj>                       Δ-4                {[-4-]}
            <MI 249e8  MOVEA.L (A6-0x80),A0>                                    {[-4-]}
            <MI 249ea  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 249ec  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x249ee LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 249f8  MOVE.B  (A0+D0.L+#0x2),-(A7)>         Δ-2                {[-4-]|[2, '(A0+D0.L+#0x2)']}
            <Call 0x249fc 0x213d0>                                              {[-4-]|[2, '(A0+D0.L+#0x2)']}
            <POP 24a00-24a02 StackAdj>                       Δ+2                {[-4-]}
            <MI 24a02  MOVE.L  D4,D0>                                           {[-4-]}
            <MI 24a04  ADD.L   (A7)+,D0>                     Δ+4                {}
            <MI 24a06  MOVE.L  D0,(A6-0x66)>                                    {}
            <MI 24a0a  ADDQ.L  #0x1,D7>                                         {}
            <MI 24a0c  CMP.L   #0x0c,D7>                                        {}
            <MI 24a0e  BLE     0x249da>                                         {}
        <POP 24a10-24ab4 Naked>                              Σ0         ↓
            <Pointer.fp 0x24a10 <LVAR -0x080 @ 4(r)>>        Δ-4                {[@@-128]}
            <Call 0x24a12 0x102bc>                                              {[@@-128]}
                FreeString(VAR a : String)
            <POP 24a18-24a1a StackAdj>                       Δ+2                {[-2-]}
            <MI 24a1a  CLR.B   (A7)>                                            {[-2-]}
            <Const 0x24a1c 0x2.2>                            Δ-2                {[-2-]|[#2]}
            <Const 0x24a20 0x1.4>                            Δ-4                {[-2-]|[#2]|[##1]}
            <Pointer.fp 0x24a24 <LVAR -0x060 @ 1(r)>>        Δ-4                {[-2-]|[#2]|[##1]|[@@-96]}
            <Pointer.fp 0x24a28 <LVAR -0x084 @ 4(r)>>        Δ-4                {[-2-]|[#2]|[##1]|[@@-96]|[@@-132]}
            <Call 0x24a2c 0x1038c>                                              {[-2-]|[#2]|[##1]|[@@-96]|[@@-132]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 24a32-24a36 StackAdj>                       Δ+16               {}
            <Const 0x24a36 0x0.4>                            Δ-4                {[##0]}
            <MI 24a3a  MOVE.L  (A7),(A6-0x5e)>                                  {[##0]}
            <MI 24a3e  LEA.L   0x2d018,A0>                                      {[##0]}
            <MI 24a44  MOVE.L  A0,-(A7)>                     Δ-4                {[##0]|[4, 'A0']}
            <MI 24a46  MOVE.L  (A7)+,(A6-0x5a)>              Δ+4                {[##0]}
            <MI 24a4a  ADDI.L  #0xe0000000,(A6-0x5a)>                           {[##0]}
            <MI 24a52  MOVE.B  0x21218,(A6-0x56)>                               {[##0]}
            <MI 24a58  MOVE.B  0x21219,(A6-0x55)>                               {[##0]}
            <MI 24a5e  MOVE.B  0x2121a,(A6-0x54)>                               {[##0]}
            <MI 24a64  ANDI.B  #0x7f,(A6-0x53)>                                 {[##0]}
            <MI 24a6a  ANDI.B  #0xbf,(A6-0x53)>                                 {[##0]}
            <MI 24a70  ANDI.B  #0xdf,(A6-0x53)>                                 {[##0]}
            <MI 24a76  ORI.B   #0x10,(A6-0x53)>                                 {[##0]}
            <MI 24a7c  ANDI.B  #0xf7,(A6-0x53)>                                 {[##0]}
            <MI 24a82  ANDI.B  #0xfb,(A6-0x53)>                                 {[##0]}
            <MI 24a88  ANDI.B  #0xfd,(A6-0x53)>                                 {[##0]}
            <MI 24a8e  ANDI.B  #0xfe,(A6-0x53)>                                 {[##0]}
            <MI 24a94  MOVE.L  (A7),(A6-0x52)>                                  {[##0]}
            <MI 24a98  MOVE.L  (A7),(A6-0x4e)>                                  {[##0]}
            <MI 24a9c  LEA.L   0x1140,A0>                                       {[##0]}
            <MI 24aa0  MOVE.L  A0,-(A7)>                     Δ-4                {[##0]|[4, 'A0']}
            <MI 24aa2  MOVE.L  (A7)+,(A6-0x4a)>              Δ+4                {[##0]}
            <MI 24aa6  ADDI.L  #0xe0000000,(A6-0x4a)>                           {[##0]}
            <MI 24aae  MOVE.L  (A7)+,(A6-0x22)>              Δ+4                {}
            <MI 24ab2  MOVEQ.L #0x01,D7>                                        {}
        <POP 24ab4-24ad4 Naked>                              Σ0         ↓ →0x24ab4 ←0x24ab4
            <MI 24ab4  MOVE.L  D7,D0>                                           {}
            <MI 24ab6  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x24ab8 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 24ac2  LEA.L   (A6-0x84),A0>                                    {}
            <MI 24ac6  CLR.B   (A0+D0.L+#0x66)>                                 {}
            <MI 24aca  ADDQ.L  #0x1,D7>                                         {}
            <MI 24acc  CMPI.L  #0x00000008,D7>                                  {}
            <MI 24ad2  BLE     0x24ab4>                                         {}
        <POP 24ad4-24b9a Naked>                              Σ0         ↓
            <MI 24ad4  MOVE.L  (A6-0x1e),(A6-0x16)>                             {}
            <MI 24ada  MOVE.L  (A6-0x1a),(A6-0x12)>                             {}
            <MI 24ae0  MOVE.L  (A6-0x1e),(A6-0xe)>                              {}
            <MI 24ae6  MOVE.L  (A6-0x1a),(A6-0xa)>                              {}
            <Const 0x24aec 0x0.4>                            Δ-4                {[##0]}
            <MI 24af0  MOVE.L  (A7),(A6-0x46)>                                  {[##0]}
            <MI 24af4  MOVE.L  (A7),(A6-0x42)>                                  {[##0]}
            <MI 24af8  MOVE.L  (A7),(A6-0x3e)>                                  {[##0]}
            <MI 24afc  MOVE.L  (A7),(A6-0x3a)>                                  {[##0]}
            <MI 24b00  MOVE.L  (A7),(A6-0x36)>                                  {[##0]}
            <MI 24b04  CLR.L   (A6-0x32)>                                       {[##0]}
            <MI 24b08  MOVE.L  #0xf0,(A6-0x2e)>                                 {[##0]}
            <MI 24b10  MOVE.L  (A7)+,(A6-0x2a)>              Δ+4                {}
            <MI 24b14  CLR.L   (A6-0x26)>                                       {}
            <MI 24b18  LEA.L   (A6-0x5e),A0>                                    {}
            <MI 24b1c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 24b1e  LEA.L   0x1100,A0>                                       {[4, 'A0']}
            <MI 24b22  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x24b24 0x3c.4>                           Δ-4                {[4, 'A0']|[4, 'A0']|[##60]}
            <Call 0x24b28 0x24562>                                              {[4, 'A0']|[4, 'A0']|[##60]}
            <POP 24b2c-24b2e StackAdj>                       Δ+12               {}
            <MI 24b2e  LEA.L   0x2d024,A0>                                      {}
            <MI 24b34  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 24b36  LEA.L   0x2d018,A0>                                      {[4, 'A0']}
            <MI 24b3c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x24b3e 0x4.4>                            Δ-4                {[4, 'A0']|[4, 'A0']|[##4]}
            <Call 0x24b42 0x24562>                                              {[4, 'A0']|[4, 'A0']|[##4]}
            <POP 24b46-24b48 StackAdj>                       Δ+12               {}
            <MI 24b48  LEA.L   (A6-0x22),A0>                                    {}
            <MI 24b4c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 24b4e  LEA.L   0x1140,A0>                                       {[4, 'A0']}
            <MI 24b52  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x24b54 0x1c.4>                           Δ-4                {[4, 'A0']|[4, 'A0']|[##28]}
            <Call 0x24b58 0x24562>                                              {[4, 'A0']|[4, 'A0']|[##28]}
            <POP 24b5c-24b5e StackAdj>                       Δ+12               {}
            <MI 24b5e  LEA.L   (A6-0x66),A0>                                    {}
            <MI 24b62  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x24b64 0x1004.4>                         Δ-4                {[4, 'A0']|[##4100]}
            <Const 0x24b68 0x4.4>                            Δ-4                {[4, 'A0']|[##4100]|[##4]}
            <Call 0x24b6c 0x24562>                                              {[4, 'A0']|[##4100]|[##4]}
            <POP 24b70-24b72 StackAdj>                       Δ+12               {}
            <MI 24b72  MOVE.W  #0x8080,(A6-0x62)>                               {}
            <MI 24b78  LEA.L   (A6-0x62),A0>                                    {}
            <MI 24b7c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x24b7e 0x1000.4>                         Δ-4                {[4, 'A0']|[##4096]}
            <Const 0x24b82 0x2.4>                            Δ-4                {[4, 'A0']|[##4096]|[##2]}
            <Call 0x24b86 0x24562>                                              {[4, 'A0']|[##4096]|[##2]}
            <POP 24b8a-24b8c StackAdj>                       Δ+8                {[4, 'A0']}
            <POP 24b8c-24b8d StackAdj>                       Δ+4                {}
            <Const 0x24b8d 0x1312c.4>                        Δ-4                {[##78124]}
            <Call 0x24b92 0x10224>                                              {[##78124]}
                KC12_Sleep(dur: Long)
            <POP 24b98-24b9a StackAdj>                       Δ+4                {}
        <POP 24b9a-24ba2 Epilogue>                           Σ0         

0x24ba2


@ 24ba2
        <LVAR  0x008 4(rw)>
        <LVAR -0x004 @ 1(r)>
    <POP 24ba2-24c08 Body>                                              
        <POP 24ba2-24bb8 Prologue>                           Σ0         ↓
        <POP 24bb8-24bc2 RegCacheLoad>                       Σ0         ↓
        <POP 24bc2-24bc4 Naked>                              Σ0         ↓
            <Call 0x24bc2 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 24bc4-24bdc Naked>                              Σ0         ↓ →0x24bf6 ←0x24bf6
            <MI 24bc4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <MI 24bc8  LEA.L   (A6-0x4),A0>                                     {[4, '(A6+0x8)']}
            <MI 24bca  MOVE.L  A0,-(A7)>                     Δ-4                {[4, '(A6+0x8)']|[4, 'A0']}
            <Const 0x24bcc 0x1.4>                            Δ-4                {[4, '(A6+0x8)']|[4, 'A0']|[##1]}
            <Call 0x24bd0 0x245b2>                                              {[4, '(A6+0x8)']|[4, 'A0']|[##1]}
            <POP 24bd4-24bd8 StackAdj>                       Δ+12               {}
            <MI 24bd8  TST.B   (A6-0x4)>                                        {}
            <MI 24bda  BEQ     0x24bf6>                                         {}
        <POP 24bdc-24be8 Naked>                              Σ0         ↓ →0x24bec
            <MI 24bdc  CLR.L   D0>                                              {}
            <MI 24bde  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 24be0  CMPI.L  #0x0000000a,D0>                                  {}
            <MI 24be6  BNE     0x24bec>                                         {}
        <POP 24be8-24bec Naked>                              Σ0         →0x24bf6
            <Call 0x24be8 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 24bea  BRA     0x24bf6>                                         {}
        <POP 24bec-24bf6 Naked>                              Σ0         ↓ ←0x24bdc
            <MI 24bec  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x24bee 0x103d0>                                              {[2, 'D0']}
                WriteConsoleChar(chr : char)
            <POP 24bf4-24bf6 StackAdj>                       Δ+2                {}
        <POP 24bf6-24bfe Naked>                              Σ0         ↓ →0x24bc4 ←0x24bc4 ←0x24be8
            <MI 24bf6  ADDQ.L  #0x1,(A6+0x8)>                                   {}
            <MI 24bfa  TST.B   (A6-0x4)>                                        {}
            <MI 24bfc  BNE     0x24bc4>                                         {}
        <POP 24bfe-24c00 Naked>                              Σ0         ↓
            <Call 0x24bfe 0x103dc>                                              {}
                WriteConsoleCrLf(void)
        <POP 24c00-24c08 Epilogue>                           Σ0         

0x24c08


@ 24c08
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(w)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 2(r)>
        <LVAR -0x004 2(r)>
        <LVAR -0x006 2(r)>
        <LVAR -0x008 2(r)>
        <LVAR -0x00c 4(r)>
        <LVAR -0x010 4(r)>
        <LVAR -0x012 2(r)>
        <LVAR -0x014 2(w)>
        <LVAR -0x018 4(w)>
        <LVAR -0x01a 2(r)>
        <LVAR -0x01c 2(r)>
        <LVAR -0x020 @ 4(r)>
    <POP 24c08-24cca Body>                                              
        <POP 24c08-24c1e Prologue>                           Σ0         ↓
        <POP 24c1e-24c22 RegCacheLoad>                       Σ0         ↓
        <POP 24c22-24c36 Naked>                              Σ0         ↓ →0x24c3a ←0x24c36 ←0x24c3a
            <MI 24c22  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 24c26  MOVE.L  (A0),D0>                                         {}
            <MI 24c28  ANDI.L  #0x000000ff,D0>                                  {}
            <MI 24c2e  ADD.W   #0x20,D0>                                        {}
            <MI 24c30  CMPI.W  #0x00ff,D0>                                      {}
            <MI 24c34  BLE     0x24c3a>                                         {}
        <POP 24c36-24c3a Naked>                              Σ0         →0x24c22
            <MI 24c36  ADDQ.L  #0x1,(A0)>                                       {}
            <MI 24c38  BRA     0x24c22>                                         {}
        <POP 24c3a-24cc2 Naked>                              Σ0         ↓ →0x24c22 ←0x24c22
            <MI 24c3a  MOVEA.L (A6+0x14),A1>                                    {}
            <MI 24c3e  MOVEA.L A0,A2>                                           {}
            <MI 24c40  MOVE.L  A2,-(A7)>                     Δ-4                {[4, 'A2']}
            <MI 24c42  MOVE.L  (A1),-(A7)>                   Δ-4                {[4, 'A2']|[4, '(A1)']}
            <MI 24c44  SUBI.L  #0x00e00000,(A7)>                                {[4, 'A2']|[-4-]}
            <Const 0x24c4a 0x4.4>                            Δ-4                {[4, 'A2']|[-4-]|[##4]}
            <Call 0x24c4e 0x24562>                                              {[4, 'A2']|[-4-]|[##4]}
            <POP 24c52-24c54 StackAdj>                       Δ+12               {}
            <MI 24c54  CLR.L   (A6-0x20)>                                       {}
            <MI 24c58  CLR.W   (A6-0x1c)>                                       {}
            <MI 24c5c  CLR.W   (A6-0x1a)>                                       {}
            <MI 24c60  MOVE.L  (A0),(A6-0x18)>                                  {}
            <MI 24c64  ADD.L   #0x20,(A6-0x18)>                                 {}
            <MI 24c68  MOVE.L  (A6+0x8),D0>                                     {}
            <POP 0x24c6c LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 24c76  MOVE.W  D0,(A6-0x14)>                                    {}
            <MI 24c7a  CLR.W   (A6-0x12)>                                       {}
            <MI 24c7e  CLR.L   (A6-0x10)>                                       {}
            <MI 24c82  CLR.L   (A6-0xc)>                                        {}
            <MI 24c86  CLR.W   (A6-0x8)>                                        {}
            <MI 24c8a  CLR.W   (A6-0x6)>                                        {}
            <MI 24c8e  CLR.W   (A6-0x4)>                                        {}
            <MI 24c92  CLR.W   (A6-0x2)>                                        {}
            <MI 24c96  LEA.L   (A6-0x20),A2>                                    {}
            <MI 24c9a  MOVE.L  A2,-(A7)>                     Δ-4                {[4, 'A2']}
            <MI 24c9c  MOVE.L  (A0),-(A7)>                   Δ-4                {[4, 'A2']|[4, '(A0)']}
            <MI 24c9e  SUBI.L  #0x00e00000,(A7)>                                {[4, 'A2']|[-4-]}
            <Const 0x24ca4 0x20.4>                           Δ-4                {[4, 'A2']|[-4-]|[##32]}
            <Call 0x24ca8 0x24562>                                              {[4, 'A2']|[-4-]|[##32]}
            <POP 24cac-24cae StackAdj>                       Δ+12               {}
            <MI 24cae  MOVE.L  (A0),(A1)>                                       {}
            <MI 24cb0  ADD.L   #0x20,(A0)>                                      {}
            <MI 24cb2  MOVE.L  (A0),D0>                                         {}
            <MI 24cb4  ADD.L   (A6+0x8),D0>                                     {}
            <MI 24cb8  MOVE.L  D0,(A0)>                                         {}
            <MI 24cba  SUBQ.L  #0x1,(A6+0xc)>                                   {}
            <MI 24cbe  BNE     0x24c22>                                         {}
        <POP 24cc2-24cca Epilogue>                           Σ0         

0x24cca


@ 24cca
        <LVAR  0x010 4(r)>
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x009 1(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x006 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 @ 4(rw)>
    <POP 24cca-24de0 Body>                                              
        <POP 24cca-24ce0 Prologue>                           Σ0         ↓
        <POP 24ce0-24d00 RegCacheLoad>                       Σ0         ↓
        <POP 24d00-24dae Naked>                              Σ0         ↓ →0x24db8
            <MI 24d00  MOVE.L  0x21150,0x2c7f2>                                 {}
            <MI 24d04  MOVE.L  0x21154,0x2c7f6>                                 {}
            <MI 24d08  MOVE.L  0x21158,0x2c7fa>                                 {}
            <MI 24d0c  MOVE.L  0x2115c,0x2c7fe>                                 {}
            <MI 24d10  AND.B   #0x80,0x2c7f7>                                   {}
            <MI 24d16  ORI.B   #0x06,0x2c7f7>                                   {}
            <MI 24d1e  MOVE.L  (A6+0x10),D0>                                    {}
            <POP 0x24d22 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 24d2c  MOVE.B  D0,0x2c7fc>                                      {}
            <MI 24d32  AND.B   #0x80,0x2c7fd>                                   {}
            <MI 24d38  ORI.B   #0x04,0x2c7fd>                                   {}
            <MI 24d40  MOVE.B  (A6+0xe),D0>                                     {}
            <MI 24d44  AND.B   #0x7f,0x2c7fe>                                   {}
            <MI 24d46  LSL.B   #0x7,D0>                                         {}
            <MI 24d48  OR.B    D0,0x2c7fe>                                      {}
            <MI 24d4a  MOVE.B  (A6+0x9),0x2c7ff>                                {}
            <MI 24d52  MOVE.L  (A6+0xa),D0>                                     {}
            <POP 0x24d56 LimitCheck 0x0 ≤ D0 ≤ 0x7f>                            {}
            <MI 24d5c  AND.B   #0x80,0x2c7fe>                                   {}
            <MI 24d62  OR.B    D0,0x2c7fe>                                      {}
            <MI 24d68  MOVE.L  0x2c7f2,(A6-0x12)>                               {}
            <MI 24d6c  MOVE.L  0x2c7f6,(A6-0xe)>                                {}
            <MI 24d70  MOVE.L  0x2c7fa,(A6-0xa)>                                {}
            <MI 24d74  MOVE.L  0x2c7fe,(A6-0x6)>                                {}
            <Pointer.fp 0x24d78 <LVAR -0x012 @ 4(rw)>>       Δ-4                {[@@-18]}
            <Const 0x24d7c 0x9303fc00.4>                     Δ-4                {[@@-18]|[##2466511872]}
            <Const 0x24d82 0x2.2>                            Δ-2                {[@@-18]|[##2466511872]|[#2]}
            <Const 0x24d84 0x0.4>                            Δ-4                {[@@-18]|[##2466511872]|[#2]|[##0]}
            <MI 24d88  LEA.L   0x2cc13,A0>                                      {[@@-18]|[##2466511872]|[#2]|[##0]}
            <MI 24d8e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[##2466511872]|[#2]|[##0]|[4, 'A0']}
            <Const 0x24d90 0xffffffff.4>                     Δ-4                {[@@-18]|[##2466511872]|[#2]|[##0]|[4, 'A0']|[##4294967295]}
            <Call 0x24d94 0x22766>                                              {[@@-18]|[##2466511872]|[#2]|[##0]|[4, 'A0']|[##4294967295]}
            <POP 24d98-24d9c StackAdj>                       Δ+20               {[-2-]}
            <POP 24d9c-24d9d StackAdj>                       Δ+2                {}
            <Const 0x24d9d 0x2.2>                            Δ-2                {[#2]}
            <Pointer.fp 0x24d9e <LVAR -0x002 @ 1(r)>>        Δ-4                {[#2]|[@@-2]}
            <Call 0x24da2 0x22676>                                              {[#2]|[@@-2]}
            <POP 24da6-24da8 StackAdj>                       Δ+6                {}
            <MI 24da8  TST.B   (A6-0x2)>                                        {}
            <MI 24dac  BNE     0x24db8>                                         {}
        <POP 24dae-24db8 Naked>                              Σ0         ↓
            <Const 0x24dae 0x26.4>                           Δ-4                {[##38]}
            <Call 0x24db2 0x2132c>                                              {[##38]}
            <POP 24db6-24db8 StackAdj>                       Δ+4                {}
        <POP 24db8-24dd8 Naked>                              Σ0         ↓ ←0x24d00
            <MI 24db8  MOVE.L  (A6-0x12),0x2c7da>                               {}
            <MI 24dc0  MOVE.L  (A6-0xe),0x2c7de>                                {}
            <MI 24dc8  MOVE.L  (A6-0xa),0x2c7e2>                                {}
            <MI 24dd0  MOVE.L  (A6-0x6),0x2c7e6>                                {}
        <POP 24dd8-24de0 Epilogue>                           Σ0         

0x24de0


@ 24de0
        <LVAR -0x00e @ 4(rw)>
        <LVAR -0x012 @ 4(w)>
        <LVAR -0x03e 4(r)>
        <LVAR -0x052 @>
        <LVAR -0x056 @ 4(w)>
        <LVAR -0x058 @ 1(r)>
        <LVAR -0x05c @ 4(w)>
        <LVAR -0x060 @ 4(w)>
        <LVAR -0x068 4(w)>
        <LVAR -0x06c 4(w)>
        <LVAR -0x070 4(w)>
        <LVAR -0x074 @ 4(w)>
        <LVAR -0x079 1(w)>
        <LVAR -0x07a 1(w)>
        <LVAR -0x07b 1(w)>
        <LVAR -0x07c 4(rw)>
        <LVAR -0x07d 1(w)>
        <LVAR -0x07e 1(w)>
        <LVAR -0x080 4(rw)>
        <LVAR -0x083 1(w)>
        <LVAR -0x084 4(rw)>
        <LVAR -0x088 4(rw)>
    <POP 24de0-2522a Body>                                              
        <POP 24de0-24df6 Prologue>                           Σ0         ↓
        <POP 24df6-24e04 RegCacheLoad>                       Σ0         ↓
        <POP 24e04-24e52 Naked>                              Σ0         ↓
            <MI 24e04  MOVE.W  #0x2,0x2d83a>                                    {}
            <MI 24e08  MOVE.W  #0x1,0x2d83c>                                    {}
            <MI 24e10  CLR.L   0x2d83e>                                         {}
            <MI 24e16  MOVE.L  #0x3,0x2d842>                                    {}
            <MI 24e20  MOVE.B  #0x69,0x2d846>                                   {}
            <MI 24e28  MOVE.B  #0x66,0x2d847>                                   {}
            <MI 24e30  MOVE.B  #0x5f,0x2d848>                                   {}
            <MI 24e38  MOVE.B  #0x74,0x2d849>                                   {}
            <MI 24e40  MOVE.B  #0x63,0x2d84a>                                   {}
            <MI 24e48  MOVE.B  #0x70,0x2d84b>                                   {}
            <MI 24e50  MOVEQ.L #0x07,D0>                                        {}
        <POP 24e52-24e70 Naked>                              Σ0         ↓ →0x24e52 ←0x24e52
            <MI 24e52  MOVE.L  D0,D1>                                           {}
            <MI 24e54  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x24e56 LimitCheck 0x0 ≤ D1 ≤ 0xb>                             {}
            <MI 24e60  LEA.L   0x2c794,A0>                                      {}
            <MI 24e62  LEA.L   (A0+D1.L),A0>                                    {}
            <MI 24e66  CLR.B   (A0+0x10b2)>                                     {}
            <MI 24e6a  ADDQ.L  #0x1,D0>                                         {}
            <MI 24e6c  CMP.L   #0x0c,D0>                                        {}
            <MI 24e6e  BLE     0x24e52>                                         {}
        <POP 24e70-24ec6 Naked>                              Σ0         ↓
            <MI 24e70  MOVE.W  #0x2,0x2d852>                                    {}
            <MI 24e78  MOVE.W  #0x2,0x2d854>                                    {}
            <MI 24e80  MOVE.L  #0x3,0x2d856>                                    {}
            <MI 24e8a  MOVE.L  #0x3,0x2d85a>                                    {}
            <MI 24e94  MOVE.B  #0x69,0x2d85e>                                   {}
            <MI 24e9c  MOVE.B  #0x66,0x2d85f>                                   {}
            <MI 24ea4  MOVE.B  #0x5f,0x2d860>                                   {}
            <MI 24eac  MOVE.B  #0x75,0x2d861>                                   {}
            <MI 24eb4  MOVE.B  #0x64,0x2d862>                                   {}
            <MI 24ebc  MOVE.B  #0x70,0x2d863>                                   {}
            <MI 24ec4  MOVEQ.L #0x07,D0>                                        {}
        <POP 24ec6-24ee4 Naked>                              Σ0         ↓ →0x24ec6 ←0x24ec6
            <MI 24ec6  MOVE.L  D0,D1>                                           {}
            <MI 24ec8  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x24eca LimitCheck 0x0 ≤ D1 ≤ 0xb>                             {}
            <MI 24ed4  LEA.L   0x2c794,A0>                                      {}
            <MI 24ed6  LEA.L   (A0+D1.L),A0>                                    {}
            <MI 24eda  CLR.B   (A0+0x10ca)>                                     {}
            <MI 24ede  ADDQ.L  #0x1,D0>                                         {}
            <MI 24ee0  CMP.L   #0x0c,D0>                                        {}
            <MI 24ee2  BLE     0x24ec6>                                         {}
        <POP 24ee4-24f3a Naked>                              Σ0         ↓
            <MI 24ee4  MOVE.W  #0x2,0x2d86a>                                    {}
            <MI 24eec  MOVE.W  #0x3,0x2d86c>                                    {}
            <MI 24ef4  MOVE.L  #0x6,0x2d86e>                                    {}
            <MI 24efe  MOVE.L  #0x1,0x2d872>                                    {}
            <MI 24f08  MOVE.B  #0x69,0x2d876>                                   {}
            <MI 24f10  MOVE.B  #0x66,0x2d877>                                   {}
            <MI 24f18  MOVE.B  #0x5f,0x2d878>                                   {}
            <MI 24f20  MOVE.B  #0x72,0x2d879>                                   {}
            <MI 24f28  MOVE.B  #0x69,0x2d87a>                                   {}
            <MI 24f30  MOVE.B  #0x70,0x2d87b>                                   {}
            <MI 24f38  MOVEQ.L #0x07,D0>                                        {}
        <POP 24f3a-24f58 Naked>                              Σ0         ↓ →0x24f3a ←0x24f3a
            <MI 24f3a  MOVE.L  D0,D1>                                           {}
            <MI 24f3c  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x24f3e LimitCheck 0x0 ≤ D1 ≤ 0xb>                             {}
            <MI 24f48  LEA.L   0x2c794,A0>                                      {}
            <MI 24f4a  LEA.L   (A0+D1.L),A0>                                    {}
            <MI 24f4e  CLR.B   (A0+0x10e2)>                                     {}
            <MI 24f52  ADDQ.L  #0x1,D0>                                         {}
            <MI 24f54  CMP.L   #0x0c,D0>                                        {}
            <MI 24f56  BLE     0x24f3a>                                         {}
        <POP 24f58-24fac Naked>                              Σ0         ↓
            <MI 24f58  MOVE.W  #0x0c,0x2d882>                                   {}
            <MI 24f5e  MOVE.W  #0x3,0x2d884>                                    {}
            <MI 24f66  MOVE.L  #0x8,0x2d886>                                    {}
            <MI 24f70  MOVE.L  #0x2,0x2d88a>                                    {}
            <MI 24f7a  MOVE.B  #0x69,0x2d88e>                                   {}
            <MI 24f82  MOVE.B  #0x66,0x2d88f>                                   {}
            <MI 24f8a  MOVE.B  #0x5f,0x2d890>                                   {}
            <MI 24f92  MOVE.B  #0x65,0x2d891>                                   {}
            <MI 24f9a  MOVE.B  #0x74,0x2d892>                                   {}
            <MI 24fa2  MOVE.B  #0x68,0x2d893>                                   {}
            <MI 24faa  MOVEQ.L #0x07,D0>                                        {}
        <POP 24fac-24fca Naked>                              Σ0         ↓ →0x24fac ←0x24fac
            <MI 24fac  MOVE.L  D0,D1>                                           {}
            <MI 24fae  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x24fb0 LimitCheck 0x0 ≤ D1 ≤ 0xb>                             {}
            <MI 24fba  LEA.L   0x2c794,A0>                                      {}
            <MI 24fbc  LEA.L   (A0+D1.L),A0>                                    {}
            <MI 24fc0  CLR.B   (A0+0x10fa)>                                     {}
            <MI 24fc4  ADDQ.L  #0x1,D0>                                         {}
            <MI 24fc6  CMP.L   #0x0c,D0>                                        {}
            <MI 24fc8  BLE     0x24fac>                                         {}
        <POP 24fca-24fe4 Naked>                              Σ0         ↓
            <MI 24fca  CLR.W   0x2d89a>                                         {}
            <MI 24fd0  CLR.W   0x2d89c>                                         {}
            <MI 24fd6  CLR.L   0x2d89e>                                         {}
            <MI 24fdc  CLR.L   0x2d8a2>                                         {}
            <MI 24fe2  MOVEQ.L #0x01,D0>                                        {}
        <POP 24fe4-25002 Naked>                              Σ0         ↓ →0x24fe4 ←0x24fe4
            <MI 24fe4  MOVE.L  D0,D1>                                           {}
            <MI 24fe6  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x24fe8 LimitCheck 0x0 ≤ D1 ≤ 0xb>                             {}
            <MI 24ff2  LEA.L   0x2c794,A0>                                      {}
            <MI 24ff4  LEA.L   (A0+D1.L),A0>                                    {}
            <MI 24ff8  CLR.B   (A0+0x1112)>                                     {}
            <MI 24ffc  ADDQ.L  #0x1,D0>                                         {}
            <MI 24ffe  CMP.L   #0x0c,D0>                                        {}
            <MI 25000  BLE     0x24fe4>                                         {}
        <POP 25002-250ae Naked>                              Σ0         ↓ →0x250b8
            <MI 25002  LEA.L   0x2d83a,A0>                                      {}
            <MI 25004  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x25006 0x1230.4>                         Δ-4                {[4, 'A0']|[##4656]}
            <Const 0x2500a 0x78.4>                           Δ-4                {[4, 'A0']|[##4656]|[##120]}
            <Call 0x2500e 0x24562>                                              {[4, 'A0']|[##4656]|[##120]}
            <POP 25012-25014 StackAdj>                       Δ+12               {}
            <MI 25014  MOVE.L  0x21150,(A6-0x88)>                               {}
            <MI 2501a  MOVE.L  0x21154,(A6-0x84)>                               {}
            <MI 25020  MOVE.L  0x21158,(A6-0x80)>                               {}
            <MI 25026  MOVE.L  0x2115c,(A6-0x7c)>                               {}
            <MI 2502c  ANDI.B  #0x80,(A6-0x83)>                                 {}
            <MI 25032  ORI.B   #0x06,(A6-0x83)>                                 {}
            <MI 25038  MOVE.B  #0x08,(A6-0x7e)>                                 {}
            <MI 2503e  ANDI.B  #0x80,(A6-0x7d)>                                 {}
            <MI 25044  ORI.B   #0x03,(A6-0x7d)>                                 {}
            <MI 2504a  MOVE.B  #0x02,(A6-0x7b)>                                 {}
            <MI 25050  MOVE.B  #0x02,(A6-0x7a)>                                 {}
            <MI 25056  MOVE.B  #0x02,(A6-0x79)>                                 {}
            <MI 2505c  MOVE.L  (A6-0x88),(A6-0x74)>                             {}
            <MI 25062  MOVE.L  (A6-0x84),(A6-0x70)>                             {}
            <MI 25068  MOVE.L  (A6-0x80),(A6-0x6c)>                             {}
            <MI 2506e  MOVE.L  (A6-0x7c),(A6-0x68)>                             {}
            <Const 0x25074 0x9303fc00.4>                     Δ-4                {[##2466511872]}
            <Pointer.fp 0x2507a <LVAR -0x074 @ 4(w)>>        Δ-4                {[##2466511872]|[@@-116]}
            <MI 2507e  MOVE.L  (A7+0x4),-(A7)>               Δ-4                {[##2466511872]|[@@-116]|[4, '(A7+0x4)']}
            <Const 0x25082 0x1.2>                            Δ-2                {[##2466511872]|[@@-116]|[4, '(A7+0x4)']|[#1]}
            <Const 0x25086 0x0.4>                            Δ-4                {[##2466511872]|[@@-116]|[4, '(A7+0x4)']|[#1]|[##0]}
            <MI 2508a  MOVE.L  (A7+0xe),-(A7)>               Δ-4                {[##2466511872]|[@@-116]|[4, '(A7+0x4)']|[#1]|[##0]|[4, '(A7+0xe)']}
            <Const 0x2508e 0x0.4>                            Δ-4                {[##2466511872]|[@@-116]|[4, '(A7+0x4)']|[#1]|[##0]|[4, '(A7+0xe)']|[##0]}
            <Call 0x25092 0x22766>                                              {[##2466511872]|[@@-116]|[4, '(A7+0x4)']|[#1]|[##0]|[4, '(A7+0xe)']|[##0]}
            <POP 25096-2509a StackAdj>                       Δ+24               {[-2-]}
            <POP 2509a-2509b StackAdj>                       Δ+2                {}
            <Const 0x2509b 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x2509e <LVAR -0x058 @ 1(r)>>        Δ-4                {[#1]|[@@-88]}
            <Call 0x250a2 0x22676>                                              {[#1]|[@@-88]}
            <POP 250a6-250a8 StackAdj>                       Δ+6                {}
            <MI 250a8  TST.B   (A6-0x58)>                                       {}
            <MI 250ac  BNE     0x250b8>                                         {}
        <POP 250ae-250b8 Naked>                              Σ0         ↓
            <Const 0x250ae 0x25.4>                           Δ-4                {[##37]}
            <Call 0x250b2 0x2132c>                                              {[##37]}
            <POP 250b6-250b8 StackAdj>                       Δ+4                {}
        <POP 250b8-25164 Naked>                              Σ0         ↓ →0x251a4 ←0x25002
            <MI 250b8  LEA.L   0x1200,A0>                                       {}
            <MI 250bc  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 250be  LEA.L   0x2e198,A0>                                      {[4, 'A0']}
            <MI 250c4  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x250c6 0x20.4>                           Δ-4                {[4, 'A0']|[4, 'A0']|[##32]}
            <Call 0x250ca 0x245b2>                                              {[4, 'A0']|[4, 'A0']|[##32]}
            <POP 250ce-250d0 StackAdj>                       Δ+12               {}
            <MI 250d0  MOVE.L  0x2e1a0,D5>                                      {}
            <MI 250d6  ANDI.L  #0x000fffff,D5>                                  {}
            <MI 250dc  ADD.L   0x2e1a4,D5>                                      {}
            <MI 250e2  MOVE.L  D5,-(A7)>                     Δ-4                {[4, 'D5']}
            <MI 250e4  LEA.L   0x2d014,A0>                                      {[4, 'D5']}
            <MI 250ea  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'D5']|[4, 'A0']}
            <Const 0x250ec 0x4.4>                            Δ-4                {[4, 'D5']|[4, 'A0']|[##4]}
            <Call 0x250f0 0x245b2>                                              {[4, 'D5']|[4, 'A0']|[##4]}
            <POP 250f4-250f6 StackAdj>                       Δ+12               {}
            <MI 250f6  LEA.L   0x1100,A0>                                       {}
            <MI 250fa  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 250fc  LEA.L   (A6-0x52),A0>                                    {[4, 'A0']}
            <MI 25100  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x25102 0x3c.4>                           Δ-4                {[4, 'A0']|[4, 'A0']|[##60]}
            <Call 0x25106 0x245b2>                                              {[4, 'A0']|[4, 'A0']|[##60]}
            <POP 2510a-2510c StackAdj>                       Δ+12               {}
            <MI 2510c  MOVE.L  (A6-0x3e),D6>                                    {}
            <MI 25110  ANDI.L  #0x000fffff,D6>                                  {}
            <MI 25116  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']}
            <MI 25118  LEA.L   (A6-0x12),A0>                                    {[4, 'D6']}
            <MI 2511c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'D6']|[4, 'A0']}
            <Const 0x2511e 0x4.4>                            Δ-4                {[4, 'D6']|[4, 'A0']|[##4]}
            <Call 0x25122 0x245b2>                                              {[4, 'D6']|[4, 'A0']|[##4]}
            <POP 25126-25128 StackAdj>                       Δ+12               {}
            <MI 25128  ANDI.L  #0x000fffff,(A6-0x12)>                           {}
            <MI 25130  MOVE.L  0x2e1a0,D4>                                      {}
            <MI 25136  MOVEQ.L #0x20,D3>                                        {}
            <Call 0x25138 0x10294>                                              {}
                ?divs_d3_d4
            <MI 2513e  NEG.W   D3>                                              {}
            <MI 25140  ADDI.W  #0x0020,D3>                                      {}
            <MI 25144  ANDI.W  #0x001f,D3>                                      {}
            <MI 25148  EXTW.L  D3>                                              {}
            <MI 2514a  MOVE.L  D3,D7>                                           {}
            <MI 2514c  MOVE.L  0x2e1a0,(A6-0xe)>                                {}
            <MI 25154  ADD.L   D7,(A6-0xe)>                                     {}
            <MI 25158  MOVE.L  (A6-0xe),D0>                                     {}
            <MI 2515c  CMP.L   0x2e1a0,D0>                                      {}
            <MI 25162  BEQ     0x251a4>                                         {}
        <POP 25164-251a4 Naked>                              Σ0         ↓
            <MI 25164  LEA.L   (A6-0xe),A0>                                     {}
            <MI 25168  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2516a  LEA.L   0x2e198,A0>                                      {[4, 'A0']}
            <MI 25170  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <MI 25172  ADDQ.L  #0x8,(A7)>                                       {[4, 'A0']|[-4-]}
            <Const 0x25174 0x4.4>                            Δ-4                {[4, 'A0']|[-4-]|[##4]}
            <Call 0x25178 0x24562>                                              {[4, 'A0']|[-4-]|[##4]}
            <POP 2517c-2517e StackAdj>                       Δ+12               {}
            <MI 2517e  MOVE.L  0x2e1a4,(A6-0x60)>                               {}
            <MI 25186  SUB.L   D7,(A6-0x60)>                                    {}
            <MI 2518a  LEA.L   (A6-0x60),A0>                                    {}
            <MI 2518e  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 25190  LEA.L   0x2e198,A0>                                      {[4, 'A0']}
            <MI 25196  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <MI 25198  ADD.L   #0x0c,(A7)>                                      {[4, 'A0']|[-4-]}
            <Const 0x2519a 0x4.4>                            Δ-4                {[4, 'A0']|[-4-]|[##4]}
            <Call 0x2519e 0x24562>                                              {[4, 'A0']|[-4-]|[##4]}
            <POP 251a2-251a4 StackAdj>                       Δ+12               {}
        <POP 251a4-25222 Naked>                              Σ0         ↓ ←0x250b8
            <MI 251a4  MOVE.L  (A6-0xe),(A6-0x56)>                              {}
            <MI 251aa  LEA.L   0x1200,A0>                                       {}
            <MI 251ae  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 251b0  MOVE.L  (A7)+,(A6-0x5c)>              Δ+4                {}
            <MI 251b4  ADDQ.L  #0x8,(A6-0x5c)>                                  {}
            <MI 251b8  ADDI.L  #0x00e00000,(A6-0x5c)>                           {}
            <Pointer.fp 0x251c0 <LVAR -0x05c @ 4(w)>>        Δ-4                {[@@-92]}
            <Pointer.fp 0x251c4 <LVAR -0x056 @ 4(w)>>        Δ-4                {[@@-92]|[@@-86]}
            <Const 0x251c8 0xb.4>                            Δ-4                {[@@-92]|[@@-86]|[##11]}
            <Const 0x251cc 0x0.4>                            Δ-4                {[@@-92]|[@@-86]|[##11]|[##0]}
            <Call 0x251d0 0x24c08>                                              {[@@-92]|[@@-86]|[##11]|[##0]}
            <POP 251d4-251d8 StackAdj>                       Δ+16               {}
            <Pointer.fp 0x251d8 <LVAR -0x05c @ 4(w)>>        Δ-4                {[@@-92]}
            <Pointer.fp 0x251dc <LVAR -0x056 @ 4(w)>>        Δ-4                {[@@-92]|[@@-86]}
            <Const 0x251e0 0xb.4>                            Δ-4                {[@@-92]|[@@-86]|[##11]}
            <Const 0x251e4 0x43a.4>                          Δ-4                {[@@-92]|[@@-86]|[##11]|[##1082]}
            <Call 0x251e8 0x24c08>                                              {[@@-92]|[@@-86]|[##11]|[##1082]}
            <POP 251ec-251f0 StackAdj>                       Δ+16               {}
            <Pointer.fp 0x251f0 <LVAR -0x05c @ 4(w)>>        Δ-4                {[@@-92]}
            <Pointer.fp 0x251f4 <LVAR -0x056 @ 4(w)>>        Δ-4                {[@@-92]|[@@-86]}
            <Const 0x251f8 0x1.4>                            Δ-4                {[@@-92]|[@@-86]|[##1]}
            <Const 0x251fc 0x2432.4>                         Δ-4                {[@@-92]|[@@-86]|[##1]|[##9266]}
            <Call 0x25200 0x24c08>                                              {[@@-92]|[@@-86]|[##1]|[##9266]}
            <POP 25204-25208 StackAdj>                       Δ+16               {}
            <Const 0x25208 0x0.4>                            Δ-4                {[##0]}
            <MI 2520c  CLR.B   -(A7)>                        Δ-2                {[##0]|[#0]}
            <Const 0x2520e 0x0.4>                            Δ-4                {[##0]|[#0]|[##0]}
            <MI 25212  CLR.W   -(A7)>                        Δ-2                {[##0]|[#0]|[##0]|[#0]}
            <Call 0x25214 0x24cca>                                              {[##0]|[#0]|[##0]|[#0]}
            <POP 25218-2521a StackAdj>                       Δ+12               {}
            <MI 2521a  MOVE.B  #0x01,0x2c7d4>                                   {}
        <POP 25222-2522a Epilogue>                           Σ0         

0x2522a


@ 2522a
        <LVAR  0x008 4(r)>
    <POP 2522a-25290 Body>                                              
        <POP 2522a-25240 Prologue>                           Σ0         ↓
        <POP 25240-25246 RegCacheLoad>                       Σ0         ↓
        <POP 25246-25288 Naked>                              Σ0         ↓
            <Blob 0x25246 [42] @>                            Δ-42               {[«42""»]}
            <POP 25256-25258 StackAdj>                       Δ-4                {[«42""»]|[-4-]}
            <Lit 0x25258 41>                                                    {[«42""»]|[$$The default network controller is ENP100i]}
            <Call 0x2526c 0x103e0>                                              {[«42""»]|[$$The default network controller is ENP100i]}
                WriteConsoleStringCrLf(str : String)
            <POP 25272-25274 StackAdj>                       Δ+42               {[-4-]}
            <MI 25274  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x25276 0x24724>                                              {[4, '(A6+0x8)']}
            <MI 2527a  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x2527c 0x24de0>                                              {[4, '(A6+0x8)']}
            <MI 25280  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x25282 0x24608>                                              {[4, '(A6+0x8)']}
            <POP 25286-25288 StackAdj>                       Δ+4                {}
        <POP 25288-25290 Epilogue>                           Σ0         

0x25290


@ 25290
        <LVAR -0x004 @>
        <LVAR -0x04c 4(w)>
        <LVAR -0x050 4(w)>
        <LVAR -0x054 4(w)>
        <LVAR -0x058 @ 4(w)>
        <LVAR -0x0fc @>
    <POP 25290-2530a Body>                                              
        <POP 25290-252a6 Prologue>                           Σ0         ↓
        <POP 252a6-252ac RegCacheLoad>                       Σ0         ↓
        <POP 252ac-25302 Naked>                              Σ0         ↓
            <MI 252ac  LEA.L   (A6-0xfc),A0>                                    {}
            <MI 252ae  LEA.L   0x21070,A1>                                      {}
            <BlockMove 82,A1,A0>                                                {}
            <MI 252ba  MOVE.L  0x21020,(A6-0x58)>                               {}
            <MI 252c0  MOVE.L  0x21024,(A6-0x54)>                               {}
            <MI 252c6  MOVE.L  0x21028,(A6-0x50)>                               {}
            <MI 252cc  MOVE.L  0x2102c,(A6-0x4c)>                               {}
            <Pointer.fp 0x252d2 <LVAR -0x058 @ 4(w)>>        Δ-4                {[@@-88]}
            <MI 252d6  LEA.L   (A6-0xfc),A0>                                    {[@@-88]}
            <MI 252d8  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-88]|[4, 'A0']}
            <Const 0x252da 0x3.2>                            Δ-2                {[@@-88]|[4, 'A0']|[#3]}
            <Const 0x252dc 0x52.4>                           Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##82]}
            <MI 252e0  LEA.L   (A6-0xfc),A0>                                    {[@@-88]|[4, 'A0']|[#3]|[##82]}
            <MI 252e2  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##82]|[4, 'A0']}
            <Const 0x252e4 0x52.4>                           Δ-4                {[@@-88]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <Call 0x252e8 0x22766>                                              {[@@-88]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <POP 252ec-252f0 StackAdj>                       Δ+20               {[-2-]}
            <POP 252f0-252f1 StackAdj>                       Δ+2                {}
            <Const 0x252f1 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x252f2 <LVAR -0x004 @>>             Δ-4                {[#3]|[@@-4]}
            <Call 0x252f6 0x22676>                                              {[#3]|[@@-4]}
            <POP 252fa-252fc StackAdj>                       Δ+6                {}
            <MI 252fc  CLR.B   0x2c7d4>                                         {}
        <POP 25302-2530a Epilogue>                           Σ0         

0x2530a


@ 2530a
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x006 4(w)>
        <LVAR -0x00a 4(w)>
        <LVAR -0x00e 4(w)>
        <LVAR -0x012 @ 4(w)>
        <LVAR -0x064 @>
    <POP 2530a-253a0 Body>                                              
        <POP 2530a-25320 Prologue>                           Σ0         ↓
        <POP 25320-25326 RegCacheLoad>                       Σ0         ↓
        <POP 25326-25380 Naked>                              Σ0         ↓ →0x2538a
            <MI 25326  LEA.L   (A6-0x64),A0>                                    {}
            <MI 25328  LEA.L   0x21070,A1>                                      {}
            <BlockMove 82,A1,A0>                                                {}
            <MI 25334  MOVE.L  0x21020,(A6-0x12)>                               {}
            <MI 2533a  MOVE.L  0x21024,(A6-0xe)>                                {}
            <MI 25340  MOVE.L  0x21028,(A6-0xa)>                                {}
            <MI 25346  MOVE.L  0x2102c,(A6-0x6)>                                {}
            <Pointer.fp 0x2534c <LVAR -0x012 @ 4(w)>>        Δ-4                {[@@-18]}
            <MI 25350  LEA.L   (A6-0x64),A0>                                    {[@@-18]}
            <MI 25352  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']}
            <Const 0x25354 0x3.2>                            Δ-2                {[@@-18]|[4, 'A0']|[#3]}
            <Const 0x25356 0x52.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##82]}
            <MI 2535a  LEA.L   (A6-0x64),A0>                                    {[@@-18]|[4, 'A0']|[#3]|[##82]}
            <MI 2535c  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##82]|[4, 'A0']}
            <Const 0x2535e 0x52.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <Call 0x25362 0x22766>                                              {[@@-18]|[4, 'A0']|[#3]|[##82]|[4, 'A0']|[##82]}
            <POP 25366-2536a StackAdj>                       Δ+22               {}
            <Call 0x2536a 0x2227a>                                              {}
            <Const 0x2536e 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x25370 <LVAR -0x002 @ 1(r)>>        Δ-4                {[#3]|[@@-2]}
            <Call 0x25374 0x22676>                                              {[#3]|[@@-2]}
            <POP 25378-2537a StackAdj>                       Δ+6                {}
            <MI 2537a  TST.B   (A6-0x2)>                                        {}
            <MI 2537e  BNE     0x2538a>                                         {}
        <POP 25380-2538a Naked>                              Σ0         ↓
            <Const 0x25380 0xa.4>                            Δ-4                {[##10]}
            <Call 0x25384 0x2132c>                                              {[##10]}
            <POP 25388-2538a StackAdj>                       Δ+4                {}
        <POP 2538a-25398 Naked>                              Σ0         ↓ ←0x25326
            <MI 2538a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2538c 0x1.4>                            Δ-4                {[#0]|[##1]}
            <Call 0x25390 0x103b8>                                              {[#0]|[##1]}
                PopProgram(status : Byte; msg : String)
            <POP 25396-25398 StackAdj>                       Δ+6                {}
        <POP 25398-253a0 Epilogue>                           Σ0         

0x253a0


@ 253a0
    <POP 253a0-253f0 Body>                                              
        <POP 253a0-253b6 Prologue>                           Σ0         ↓
        <POP 253b6-253e8 Naked>                              Σ0         ↓
            <Blob 0x253b6 [60] @>                            Δ-60               {[«60""»]}
            <POP 253c8-253ca StackAdj>                       Δ-4                {[«60""»]|[-4-]}
            <Lit 0x253ca 59>                                                    {[«60""»]|[$$TERMINATE not yet supported for ENP100i ethernet controller]}
            <Call 0x253de 0x103e0>                                              {[«60""»]|[$$TERMINATE not yet supported for ENP100i ethernet controller]}
                WriteConsoleStringCrLf(str : String)
            <POP 253e4-253e8 StackAdj>                       Δ+64               {}
        <POP 253e8-253f0 Epilogue>                           Σ0         

0x253f0


@ 253f0
    <POP 253f0-25488 Body>                                              
        <POP 253f0-25406 Prologue>                           Σ0         ↓
        <POP 25406-2541a RegCacheLoad>                       Σ0         ↓
        <POP 2541a-2541e Naked>                              Σ0         ↓ →0x25428
            <MI 2541a  TST.B   0x2cc12>                                         {}
            <MI 2541c  BEQ     0x25428>                                         {}
        <POP 2541e-25428 Naked>                              Σ0         ↓
            <Const 0x2541e 0x5.4>                            Δ-4                {[##5]}
            <Call 0x25422 0x2132c>                                              {[##5]}
            <POP 25426-25428 StackAdj>                       Δ+4                {}
        <POP 25428-25480 Naked>                              Σ0         ↓ ←0x2541a
            <MI 25428  MOVE.L  0x2121c,0x2c802>                                 {}
            <MI 2542c  MOVE.L  0x21220,0x2c806>                                 {}
            <MI 25434  MOVE.L  0x21224,0x2c80a>                                 {}
            <MI 2543c  MOVE.L  0x21228,0x2c80e>                                 {}
            <MI 25444  CLR.L   D0>                                              {}
            <MI 25446  MOVE.W  0x2d432,D0>                                      {}
            <MI 2544c  ADD.L   0x2d42e,D0>                                      {}
            <MI 25452  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 25454  CLR.W   -(A7)>                        Δ-2                {[4, 'D0']|[#0]}
            <Const 0x25456 0x200.2>                          Δ-2                {[4, 'D0']|[#0]|[#512]}
            <Call 0x2545a 0x10236>                                              {[4, 'D0']|[#0]|[#512]}
                KERNCALL_1b
            <POP 25460-25462 StackAdj>                       Δ+8                {}
            <Const 0x25462 0x2c802.4>                        Δ-4                {[##182274]}
            <MI 25464  LEA.L   0x2c812,A0>                                      {[##182274]}
            <MI 25466  MOVE.L  A0,-(A7)>                     Δ-4                {[##182274]|[4, 'A0']}
            <Const 0x25468 0x1.2>                            Δ-2                {[##182274]|[4, 'A0']|[#1]}
            <Const 0x2546a 0x0.4>                            Δ-4                {[##182274]|[4, 'A0']|[#1]|[##0]}
            <MI 2546e  LEA.L   0x2c812,A0>                                      {[##182274]|[4, 'A0']|[#1]|[##0]}
            <MI 25470  MOVE.L  A0,-(A7)>                     Δ-4                {[##182274]|[4, 'A0']|[#1]|[##0]|[4, 'A0']}
            <Const 0x25472 0x400.4>                          Δ-4                {[##182274]|[4, 'A0']|[#1]|[##0]|[4, 'A0']|[##1024]}
            <Call 0x25476 0x22766>                                              {[##182274]|[4, 'A0']|[#1]|[##0]|[4, 'A0']|[##1024]}
            <POP 2547a-2547e StackAdj>                       Δ+22               {}
            <MI 2547e  MOVE.B  #0x01,0x2cc12>                                   {}
        <POP 25480-25488 Epilogue>                           Σ0         

0x25488


@ 25488
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x00c @ 1(r)>
    <POP 25488-2554e Body>                                              
        <POP 25488-2549e Prologue>                           Σ0         ↓
        <POP 2549e-254a8 RegCacheLoad>                       Σ0         ↓
        <POP 254a8-254ac Naked>                              Σ0         ↓ →0x254b6
            <MI 254a8  TST.B   0x2cc12>                                         {}
            <MI 254aa  BNE     0x254b6>                                         {}
        <POP 254ac-254b6 Naked>                              Σ0         ↓
            <Const 0x254ac 0x6.4>                            Δ-4                {[##6]}
            <Call 0x254b0 0x2132c>                                              {[##6]}
            <POP 254b4-254b6 StackAdj>                       Δ+4                {}
        <POP 254b6-254be Naked>                              Σ0         ↓ →0x254cc ←0x254a8
            <MI 254b6  MOVE.L  (A6+0x8),D0>                                     {}
            <MI 254ba  CMP.L   #0x0a,D0>                                        {}
            <MI 254bc  BLE     0x254cc>                                         {}
        <POP 254be-254cc Naked>                              Σ0         →0x254ce
            <MI 254be  MOVE.L  D0,D4>                                           {}
            <MI 254c0  MOVEQ.L #0x0a,D3>                                        {}
            <Call 0x254c2 0x10294>                                              {}
                ?divs_d3_d4
            <MI 254c8  MOVE.L  D4,D6>                                           {}
            <MI 254ca  BRA     0x254ce>                                         {}
        <POP 254cc-254ce Naked>                              Σ0         ↓ ←0x254b6
            <MI 254cc  MOVEQ.L #0x01,D6>                                        {}
        <POP 254ce-254d2 Naked>                              Σ0 Δ-4     ↓ ←0x254be
            <MI 254ce  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']}
            <MI 254d0  MOVEQ.L #0x01,D7>                                        {[4, 'D6']}
        <POP 254d2-254d6 Naked>                              Σ-4        ↓ →0x25544 ←0x25540
            <MI 254d2  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 254d4  BGT     0x25544>                                         {[-4-]}
        <POP 254d6-254f8 Naked>                              Σ-4        ↓ →0x25540
            <Const 0x254d6 0x186.4>                          Δ-4                {[-4-]|[##390]}
            <Call 0x254da 0x10224>                                              {[-4-]|[##390]}
                KC12_Sleep(dur: Long)
            <POP 254e0-254e2 StackAdj>                       Δ+2                {[-4-]|[-2-]}
            <POP 254e2-254e3 StackAdj>                       Δ+2                {[-4-]}
            <Const 0x254e3 0x1.2>                            Δ-2                {[-4-]|[#1]}
            <Pointer.fp 0x254e4 <LVAR -0x00c @ 1(r)>>        Δ-4                {[-4-]|[#1]|[@@-12]}
            <Pointer.fp 0x254e8 <LVAR -0x002 @ 1(r)>>        Δ-4                {[-4-]|[#1]|[@@-12]|[@@-2]}
            <Call 0x254ec 0x223ca>                                              {[-4-]|[#1]|[@@-12]|[@@-2]}
            <POP 254f0-254f2 StackAdj>                       Δ+10               {[-4-]}
            <MI 254f2  TST.B   (A6-0xc)>                                        {[-4-]}
            <MI 254f6  BEQ     0x25540>                                         {[-4-]}
        <POP 254f8-25500 Naked>                              Σ-4        ↓ →0x2552a
            <MI 254f8  CLR.B   0x2cc12>                                         {[-4-]}
            <MI 254fa  TST.B   (A6-0x2)>                                        {[-4-]}
            <MI 254fe  BNE     0x2552a>                                         {[-4-]}
        <POP 25500-2552a Naked>                              Σ-4        ↓
            <Blob 0x25500 [4] 0x2c80e>                       Δ-4                {[-4-]|[«4»]}
            <Blob 0x25506 [4] 0x2c80a>                       Δ-4                {[-4-]|[«4»]|[«4»]}
            <Blob 0x2550c [4] 0x2c806>                       Δ-4                {[-4-]|[«4»]|[«4»]|[«4»]}
            <Blob 0x25512 [4] 0x2c802>                       Δ-4                {[-4-]|[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x25518 0x2234c>                                              {[-4-]|[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 2551c-25520 StackAdj>                       Δ+16               {[-4-]}
            <Const 0x25520 0x15.4>                           Δ-4                {[-4-]|[##21]}
            <Call 0x25524 0x2132c>                                              {[-4-]|[##21]}
            <POP 25528-2552a StackAdj>                       Δ+4                {[-4-]}
        <POP 2552a-25534 Naked>                              Σ-4        ↓ →0x25538 ←0x254f8
            <MI 2552a  MOVE.B  0x2d02c,D0>                                      {[-4-]}
            <MI 25530  CMP.B   #0x01,D0>                                        {[-4-]}
            <MI 25532  BGT     0x25538>                                         {[-4-]}
        <POP 25534-25538 Naked>                              Σ-4        ↓
            <Call 0x25534 0x21d90>                                              {[-4-]}
        <POP 25538-25540 Naked>                              Σ-4        ↓ ←0x2552a
            <Call 0x25538 0x220f8>                                              {[-4-]}
            <Call 0x2553c 0x253f0>                                              {[-4-]}
        <POP 25540-25544 Naked>                              Σ-4        ↓ →0x254d2 ←0x254d6
            <MI 25540  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 25542  BVC     0x254d2>                                         {[-4-]}
        <POP 25544-25546 Naked>                              Σ-4 Δ+4    ↓ ←0x254d2
            <POP 25544-25546 StackAdj>                       Δ+4                {}
        <POP 25546-2554e Epilogue>                           Σ0         

0x2554e


@ 2554e
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x00c @ 1(r)>
    <POP 2554e-2560a Body>                                              
        <POP 2554e-25564 Prologue>                           Σ0         ↓
        <POP 25564-25574 RegCacheLoad>                       Σ0         ↓
        <POP 25574-25578 Naked>                              Σ0         ↓ →0x25580
            <MI 25574  TST.B   0x2cc12>                                         {}
            <MI 25576  BNE     0x25580>                                         {}
        <POP 25578-25580 Naked>                              Σ0         ↓
            <Const 0x25578 0x7.4>                            Δ-4                {[##7]}
            <Call 0x2557c 0x2132c>                                              {[##7]}
            <POP 2557e-25580 StackAdj>                       Δ+4                {}
        <POP 25580-25588 Naked>                              Σ0         ↓ →0x25596 ←0x25574
            <MI 25580  MOVE.L  (A6+0x8),D0>                                     {}
            <MI 25584  CMP.L   #0x0a,D0>                                        {}
            <MI 25586  BLE     0x25596>                                         {}
        <POP 25588-25596 Naked>                              Σ0         →0x25598
            <MI 25588  MOVE.L  D0,D4>                                           {}
            <MI 2558a  MOVEQ.L #0x0a,D3>                                        {}
            <Call 0x2558c 0x10294>                                              {}
                ?divs_d3_d4
            <MI 25592  MOVE.L  D4,D6>                                           {}
            <MI 25594  BRA     0x25598>                                         {}
        <POP 25596-25598 Naked>                              Σ0         ↓ ←0x25580
            <MI 25596  MOVEQ.L #0x01,D6>                                        {}
        <POP 25598-2559c Naked>                              Σ0         ↓ ←0x25588
            <MI 25598  MOVEQ.L #0x00,D7>                                        {}
            <MI 2559a  CLR.B   (A6-0xc)>                                        {}
        <POP 2559c-255bc Naked>                              Σ0         ↓ →0x255ec ←0x255f2
            <Const 0x2559c 0x186.4>                          Δ-4                {[##390]}
            <Call 0x255a0 0x10224>                                              {[##390]}
                KC12_Sleep(dur: Long)
            <POP 255a6-255a8 StackAdj>                       Δ+2                {[-2-]}
            <POP 255a8-255a9 StackAdj>                       Δ+2                {}
            <Const 0x255a9 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x255ac <LVAR -0x00c @ 1(r)>>        Δ-4                {[#1]|[@@-12]}
            <Pointer.fp 0x255ae <LVAR -0x002 @ 1(r)>>        Δ-4                {[#1]|[@@-12]|[@@-2]}
            <Call 0x255b2 0x223ca>                                              {[#1]|[@@-12]|[@@-2]}
            <POP 255b6-255b8 StackAdj>                       Δ+10               {}
            <MI 255b8  TST.B   (A6-0xc)>                                        {}
            <MI 255ba  BEQ     0x255ec>                                         {}
        <POP 255bc-255c4 Naked>                              Σ0         ↓ →0x255ec
            <MI 255bc  CLR.B   0x2cc12>                                         {}
            <MI 255be  TST.B   (A6-0x2)>                                        {}
            <MI 255c2  BNE     0x255ec>                                         {}
        <POP 255c4-255ec Naked>                              Σ0         ↓
            <Blob 0x255c4 [4] 0x2c80e>                       Δ-4                {[«4»]}
            <Blob 0x255ca [4] 0x2c80a>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x255d0 [4] 0x2c806>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x255d6 [4] 0x2c802>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x255dc 0x2234c>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 255e0-255e4 StackAdj>                       Δ+16               {}
            <Const 0x255e4 0x16.4>                           Δ-4                {[##22]}
            <Call 0x255e8 0x2132c>                                              {[##22]}
            <POP 255ea-255ec StackAdj>                       Δ+4                {}
        <POP 255ec-255f2 Naked>                              Σ0         ↓ →0x255f6 ←0x2559c ←0x255bc
            <MI 255ec  ADDQ.L  #0x1,D7>                                         {}
            <MI 255ee  TST.B   (A6-0xc)>                                        {}
            <MI 255f0  BNE     0x255f6>                                         {}
        <POP 255f2-255f6 Naked>                              Σ0         ↓ →0x2559c
            <MI 255f2  CMP.L   D6,D7>                                           {}
            <MI 255f4  BNE     0x2559c>                                         {}
        <POP 255f6-255fa Naked>                              Σ0         ↓ →0x25602 ←0x255ec
            <MI 255f6  TST.B   (A6-0xc)>                                        {}
            <MI 255f8  BNE     0x25602>                                         {}
        <POP 255fa-25602 Naked>                              Σ0         ↓
            <Const 0x255fa 0x9.4>                            Δ-4                {[##9]}
            <Call 0x255fe 0x2132c>                                              {[##9]}
            <POP 25600-25602 StackAdj>                       Δ+4                {}
        <POP 25602-2560a Epilogue>                           Σ0         ←0x255f6

0x2560a


@ 2560a
        <LVAR  0x00e 4(r)>
        <LVAR  0x00c 2(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @ 4(rw)>
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x012 @ 1(r)>
    <POP 2560a-2571e Body>                                   Δ+4        
        <POP 2560a-25620 Prologue>                           Σ0         ↓
        <POP 25620-25630 RegCacheLoad>                       Σ0         ↓
        <POP 25630-25638 Naked>                              Σ0         ↓ →0x25646
            <MI 25630  MOVE.L  (A6+0xe),D0>                                     {}
            <MI 25634  CMP.L   #0x0a,D0>                                        {}
            <MI 25636  BLE     0x25646>                                         {}
        <POP 25638-25646 Naked>                              Σ0         →0x25648
            <MI 25638  MOVE.L  D0,D4>                                           {}
            <MI 2563a  MOVEQ.L #0x0a,D3>                                        {}
            <Call 0x2563c 0x10294>                                              {}
                ?divs_d3_d4
            <MI 25642  MOVE.L  D4,D5>                                           {}
            <MI 25644  BRA     0x25648>                                         {}
        <POP 25646-25648 Naked>                              Σ0         ↓ ←0x25630
            <MI 25646  MOVEQ.L #0x01,D5>                                        {}
        <POP 25648-2564c Naked>                              Σ0         ↓ ←0x25638
            <MI 25648  MOVEQ.L #0x00,D6>                                        {}
            <MI 2564a  MOVEQ.L #0x00,D7>                                        {}
        <POP 2564c-25672 Naked>                              Σ0         ↓ →0x256fe ←0x25704
            <Const 0x2564c 0x186.4>                          Δ-4                {[##390]}
            <Call 0x25650 0x10224>                                              {[##390]}
                KC12_Sleep(dur: Long)
            <POP 25656-25658 StackAdj>                       Δ+2                {[-2-]}
            <POP 25658-25659 StackAdj>                       Δ+2                {}
            <Const 0x25659 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x2565c <LVAR -0x012 @ 1(r)>>        Δ-4                {[#1]|[@@-18]}
            <Pointer.fp 0x25660 <LVAR -0x008 @ 1(r)>>        Δ-4                {[#1]|[@@-18]|[@@-8]}
            <Call 0x25664 0x223ca>                                              {[#1]|[@@-18]|[@@-8]}
            <POP 25668-2566a StackAdj>                       Δ+10               {}
            <MI 2566a  TST.B   (A6-0x12)>                                       {}
            <MI 2566e  BEQ     0x256fe>                                         {}
        <POP 25672-25680 Naked>                              Σ0         ↓ →0x25688
            <MI 25672  CLR.B   0x2cc12>                                         {}
            <MI 25678  CLR.L   (A6-0x6)>                                        {}
            <MI 2567a  TST.B   (A6-0x8)>                                        {}
            <MI 2567e  BNE     0x25688>                                         {}
        <POP 25680-25688 Naked>                              Σ0         ↓
            <Const 0x25680 0x4.4>                            Δ-4                {[##4]}
            <Call 0x25684 0x2132c>                                              {[##4]}
            <POP 25686-25688 StackAdj>                       Δ+4                {}
        <POP 25688-256a6 Naked>                              Σ0         ↓ →0x256d6 ←0x25672 ←0x256ec
            <MI 25688  MOVE.L  (A6-0x6),D0>                                     {}
            <MI 2568a  ADDQ.L  #0x4,D0>                                         {}
            <POP 0x2568c LimitCheck 0x0 ≤ D0 ≤ 0x1ff>                           {}
            <MI 25696  ASL.L   #0x1,D0>                                         {}
            <MI 25698  LEA.L   0x2c794,A0>                                      {}
            <MI 2569a  MOVE.W  (A0+D0.L+#0x7e),D0>                              {}
            <MI 2569e  LSR.W   #0x8,D0>                                         {}
            <MI 256a0  CMP.W   (A6+0xc),D0>                                     {}
            <MI 256a4  BNE     0x256d6>                                         {}
        <POP 256a6-256d6 Naked>                              Σ0         →0x256ec
            <MI 256a6  MOVEQ.L #0x01,D7>                                        {}
            <MI 256a8  MOVE.L  (A6-0x6),D0>                                     {}
            <POP 0x256aa LimitCheck 0x0 ≤ D0 ≤ 0x1ff>                           {}
            <MI 256b4  ASL.L   #0x1,D0>                                         {}
            <MI 256b6  LEA.L   0x2c794,A0>                                      {}
            <MI 256b8  LEA.L   (A0+D0.L+#0x7e),A0>                              {}
            <MI 256bc  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 256be  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, 'A0']|[4, '(A6+0x8)']}
            <Const 0x256c2 0x3c.2>                           Δ-2                {[4, 'A0']|[4, '(A6+0x8)']|[#60]}
            <Call 0x256c6 0x10238>                                              {[4, 'A0']|[4, '(A6+0x8)']|[#60]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 256cc-256ce StackAdj>                       Δ+10               {}
            <MI 256ce  ADDI.L  #0x0000001e,(A6-0x6)>                            {}
            <MI 256d4  BRA     0x256ec>                                         {}
        <POP 256d6-256dc Naked>                              Σ0         ↓ →0x256e4 ←0x25688
            <MI 256d6  CMPI.W  #0x0064,D0>                                      {}
            <MI 256da  BNE     0x256e4>                                         {}
        <POP 256dc-256e4 Naked>                              Σ0 Δ-4     →0x256ea
            <Pointer.fp 0x256dc <LVAR -0x006 @ 4(rw)>>       Δ-4                {[@@-6]}
            <Call 0x256de 0x21fbc>                                              {[@@-6]}
            <MI 256e2  BRA     0x256ea>                                         {[@@-6]}
        <POP 256e4-256ea Naked>                              Σ0 Δ-4     ↓ ←0x256d6
            <Const 0x256e4 0x8.4>                            Δ-4                {[##8]}
            <Call 0x256e8 0x2132c>                                              {[##8]}
        <POP 256ea-256ec Naked>                              Σ-4 Δ+4    ↓ ←0x256dc
            <POP 256ea-256ec StackAdj>                       Δ+4                {}
        <POP 256ec-256fa Naked>                              Σ0         ↓ →0x25688 ←0x256a6
            <POP 256ec-256ee StackAdj>                       Δ-2                {[-2-]}
            <MI 256ee  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x6)']}
            <Call 0x256f0 0x21d4e>                                              {[-2-]|[4, '(A6-0x6)']}
            <POP 256f4-256f6 StackAdj>                       Δ+4                {[-2-]}
            <MI 256f6  TST.B   (A7)+>                        Δ+2                {}
            <MI 256f8  BEQ     0x25688>                                         {}
        <POP 256fa-256fe Naked>                              Σ0         ↓
            <Call 0x256fa 0x253f0>                                              {}
        <POP 256fe-25704 Naked>                              Σ0         ↓ →0x2570a ←0x2564c
            <MI 256fe  ADDQ.L  #0x1,D6>                                         {}
            <MI 25700  TST.B   D7>                                              {}
            <MI 25702  BNE     0x2570a>                                         {}
        <POP 25704-2570a Naked>                              Σ0         ↓ →0x2564c
            <MI 25704  CMP.L   D5,D6>                                           {}
            <MI 25706  BNE     0x2564c>                                         {}
        <POP 2570a-2570e Naked>                              Σ0         ↓ →0x25716 ←0x256fe
            <MI 2570a  TST.B   D7>                                              {}
            <MI 2570c  BNE     0x25716>                                         {}
        <POP 2570e-25716 Naked>                              Σ0         ↓
            <Const 0x2570e 0x9.4>                            Δ-4                {[##9]}
            <Call 0x25712 0x2132c>                                              {[##9]}
            <POP 25714-25716 StackAdj>                       Δ+4                {}
        <POP 25716-2571e Epilogue>                           Σ0         ←0x2570a

0x2571e


@ 2571e
        <LVAR -0x004 2(w)>
        <LVAR -0x006 2(w) 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 @ 4(rw)>
        <LVAR -0x014 @ 1(r)>
    <POP 2571e-25804 Body>                                              
        <POP 2571e-25734 Prologue>                           Σ0         ↓
        <POP 25734-25748 RegCacheLoad>                       Σ0         ↓
        <POP 25748-257c0 Naked>                              Σ0         ↓ →0x257fc
            <Blob 0x25748 [18] @>                            Δ-18               {[«18""»]}
            <Const 0x2575a 0x1.2>                            Δ-2                {[«18""»]|[#1]}
            <POP 2575c-2575e StackAdj>                       Δ-4                {[«18""»]|[#1]|[-4-]}
            <Lit 0x2575e 17>                                                    {[«18""»]|[#1]|[$$Procedure CONNECT]}
            <Call 0x25770 0x22238>                                              {[«18""»]|[#1]|[$$Procedure CONNECT]}
            <POP 25774-25776 StackAdj>                       Δ+24               {}
            <MI 25776  MOVE.L  0x21040,(A6-0x12)>                               {}
            <MI 2577a  MOVE.L  0x21044,(A6-0xe)>                                {}
            <MI 25780  MOVE.L  0x21048,(A6-0xa)>                                {}
            <MI 25786  MOVE.L  0x2104c,(A6-0x6)>                                {}
            <MI 2578a  MOVE.W  #0x101,(A6-0x6)>                                 {}
            <MI 2578e  MOVE.W  0x2e1b8,(A6-0x4)>                                {}
            <Const 0x25796 0x0.4>                            Δ-4                {[##0]}
            <Pointer.fp 0x25798 <LVAR -0x012 @ 4(rw)>>       Δ-4                {[##0]|[@@-18]}
            <MI 2579a  MOVE.L  (A7+0x4),-(A7)>               Δ-4                {[##0]|[@@-18]|[4, '(A7+0x4)']}
            <Const 0x2579e 0x3.2>                            Δ-2                {[##0]|[@@-18]|[4, '(A7+0x4)']|[#3]}
            <Const 0x257a0 0x0.4>                            Δ-4                {[##0]|[@@-18]|[4, '(A7+0x4)']|[#3]|[##0]}
            <MI 257a2  MOVE.L  (A7+0xe),-(A7)>               Δ-4                {[##0]|[@@-18]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']}
            <Const 0x257a6 0x0.4>                            Δ-4                {[##0]|[@@-18]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']|[##0]}
            <Call 0x257a8 0x22766>                                              {[##0]|[@@-18]|[4, '(A7+0x4)']|[#3]|[##0]|[4, '(A7+0xe)']|[##0]}
            <POP 257ac-257ae StackAdj>                       Δ+24               {[-2-]}
            <POP 257ae-257af StackAdj>                       Δ+2                {}
            <Const 0x257af 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x257b0 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#3]|[@@-20]}
            <Call 0x257b4 0x22676>                                              {[#3]|[@@-20]}
            <POP 257b8-257ba StackAdj>                       Δ+6                {}
            <MI 257ba  TST.B   (A6-0x14)>                                       {}
            <MI 257be  BNE     0x257fc>                                         {}
        <POP 257c0-257fc Naked>                              Σ0         ↓
            <Blob 0x257c0 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x257cc 0x4.2>                            Δ-2                {[«14""»]|[#4]}
            <POP 257d0-257d2 StackAdj>                       Δ-4                {[«14""»]|[#4]|[-4-]}
            <Lit 0x257d2 14>                                                    {[«14""»]|[#4]|[$$connect failed]}
            <Call 0x257e4 0x22238>                                              {[«14""»]|[#4]|[$$connect failed]}
            <POP 257e8-257ea StackAdj>                       Δ+16               {[-4-]}
            <MI 257ea  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 257ec  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 257f0  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 257f4  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x257f6 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 257fa-257fc StackAdj>                       Δ+16               {}
        <POP 257fc-25804 Epilogue>                           Σ0         ←0x25748

0x25804


@ 25804
        <LVAR  0x00c 4(w)>
        <LVAR  0x008 4(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 @ 4(rw)>
    <POP 25804-259a8 Body>                                              
        <POP 25804-2581a Prologue>                           Σ0         ↓
        <POP 2581a-2582a RegCacheLoad>                       Σ0         ↓
        <POP 2582a-2589c Naked>                              Σ0         ↓ →0x258aa
            <POP 2582a-2582c StackAdj>                       Δ-4                {[-4-]}
            <POP 2582c-2582d StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2582d [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 25830  MOVE.B  0x20b39,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 25836  MOVE.B  0x20b3a,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 2583c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']}
            <POP 25840-25842 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x25842>                                                       {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
                <Pointer.sp 0x25842 8>                       Δ-4        
                <Const 0x25846 0x1.2>                        Δ-2        
                <Const 0x2584a 0x3.2>                        Δ-2        
                <Call 0x2584e 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 25854-25856 StackAdj>                   Δ+8        
            <POP 25854-25856 StackAdj>                       Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
            <MI 25856  CLR.B   (A7)>                                            {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
            <Pointer.fp 0x25858 <LVAR -0x004 @ 1(r)>>        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]|[@@-4]}
            <Pointer.fp 0x2585c <LVAR -0x008 @ 4(rw)>>       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]|[@@-4]|[@@-8]}
            <Call 0x2585e 0x21cee>                                              {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]|[@@-4]|[@@-8]}
            <POP 25862-25866 StackAdj>                       Δ+20               {[-2-]}
            <POP 25866-25867 StackAdj>                       Δ+2                {}
            <Blob 0x25867 [2] @>                             Δ-2                {[«2""»]}
            <MI 2586a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 2586e-25870 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x25870 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$IP]}
            <POP 25882-25884 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$IP]|[-2-]}
            <POP 25884-25885 StackAdj>                       Δ+2                {[«2""»]|[4, '(A6+0x8)']|[$$IP]}
            <Const 0x25885 0x1.2>                            Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$IP]|[#1]}
            <Pointer.fp 0x25888 <LVAR -0x003 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$IP]|[#1]|[@@-3]}
            <Pointer.fp 0x2588c <LVAR -0x008 @ 4(rw)>>       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$IP]|[#1]|[@@-3]|[@@-8]}
            <Call 0x2588e 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$IP]|[#1]|[@@-3]|[@@-8]}
            <POP 25892-25896 StackAdj>                       Δ+20               {}
            <MI 25896  TST.B   (A6-0x4)>                                        {}
            <MI 2589a  BEQ     0x258aa>                                         {}
        <POP 2589c-258a4 Naked>                              Σ0         ↓ →0x2599c
            <MI 2589c  TST.B   (A6-0x4)>                                        {}
            <MI 258a0  BEQ     0x2599c>                                         {}
        <POP 258a4-258aa Naked>                              Σ0         ↓ →0x2599c
            <MI 258a4  TST.B   0x2e1c6>                                         {}
            <MI 258a6  BNE     0x2599c>                                         {}
        <POP 258aa-258b0 Naked>                              Σ0         ↓ →0x258b6 ←0x2582a ←0x2598c
            <MI 258aa  TST.B   (A6-0x3)>                                        {}
            <MI 258ae  BEQ     0x258b6>                                         {}
        <POP 258b0-258b6 Naked>                              Σ0         →0x258ec
            <MI 258b0  CLR.B   (A6-0x3)>                                        {}
            <MI 258b4  BRA     0x258ec>                                         {}
        <POP 258b6-258ec Naked>                              Σ0         ↓ ←0x258aa
            <Blob 0x258b6 [30] @>                            Δ-30               {[«30""»]}
            <POP 258c8-258ca StackAdj>                       Δ-8                {[«30""»]|[-8-]}
            <Lit 0x258ca 29>                                                    {[«30""»]|[-4-]|[$$Enter IP address of server :_]}
            <Call 0x258de 0x103e4>                                              {[«30""»]|[-4-]|[$$Enter IP address of server :_]}
                AskConsoleString(prompt : String) : String
            <POP 258e4-258e6 StackAdj>                       Δ+4                {[«30""»]|[-4-]}
            <MI 258e6  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {[«30""»]}
            <POP 258e8-258ec StackAdj>                       Δ+30               {}
        <POP 258ec-25916 Naked>                              Σ0 Δ-4     ↓ ←0x258b0
            <MI 258ec  CLR.L   0x2d018>                                         {}
            <MI 258ee  MOVEQ.L #0x00,D7>                                        {}
            <MI 258f0  MOVEQ.L #0x00,D6>                                        {}
            <MI 258f2  MOVE.L  #0x1000000,D5>                                   {}
            <MI 258f8  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <POP 258fa-258fc StackAdj>                       Δ-4                {[#0]|[-4-]}
            <MI 258fc  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[#0]|[-4-]|[4, '(A6-0x8)']}
            <Call 0x258fe 0x102cc>                                              {[#0]|[-4-]|[4, '(A6-0x8)']}
                StringDup(a : String) : String
            <POP 25904-25906 StackAdj>                       Δ+4                {[#0]|[-4-]}
            <Call 0x25906 0x22238>                                              {[#0]|[-4-]}
            <POP 2590a-2590c StackAdj>                       Δ+6                {}
            <MI 2590c  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 2590e  MOVE.W  (A0),D0>                                         {}
            <MI 25910  EXTW.L  D0>                                              {}
            <MI 25912  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 25914  MOVEQ.L #0x01,D0>                                        {[4, 'D0']}
        <POP 25916-2591a Naked>                              Σ-4        ↓ →0x25972 ←0x2596e
            <MI 25916  CMP.L   (A7),D0>                                         {[-4-]}
            <MI 25918  BGT     0x25972>                                         {[-4-]}
        <POP 2591a-25934 Naked>                              Σ-4        ↓ →0x25956
            <MI 2591a  MOVEA.L (A6-0x8),A0>                                     {[-4-]}
            <MI 2591c  MOVE.L  D0,D1>                                           {[-4-]}
            <MI 2591e  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x25920 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 2592a  MOVE.B  (A0+D1.L+#0x2),D2>                               {[-4-]}
            <MI 2592e  CMPI.B  #0x2e,D2>                                        {[-4-]}
            <MI 25932  BNE     0x25956>                                         {[-4-]}
        <POP 25934-25956 Naked>                              Σ-4        →0x2596e
            <MI 25934  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 25936  MOVE.L  D5,D4>                                           {[-4-]}
            <MI 25938  MOVE.L  D7,D3>                                           {[-4-]}
            <Call 0x2593a 0x1028c>                                              {[-4-]}
                ?muls_d3_d4
            <MI 25940  ADD.L   D4,0x2d018>                                      {[-4-]}
            <MI 25942  MOVE.L  D5,D4>                                           {[-4-]}
            <MI 25944  MOVE.L  #0x100,D3>                                       {[-4-]}
            <Call 0x2594a 0x10294>                                              {[-4-]}
                ?divs_d3_d4
            <MI 25950  MOVE.L  D4,D5>                                           {[-4-]}
            <MI 25952  MOVEQ.L #0x00,D7>                                        {[-4-]}
            <MI 25954  BRA     0x2596e>                                         {[-4-]}
        <POP 25956-2596e Naked>                              Σ-4        ↓ ←0x2591a
            <MI 25956  MOVE.L  D7,D4>                                           {[-4-]}
            <MI 25958  MOVEQ.L #0x0a,D3>                                        {[-4-]}
            <Call 0x2595a 0x1028c>                                              {[-4-]}
                ?muls_d3_d4
            <POP 25960-25962 StackAdj>                       Δ-4                {[-8-]}
            <MI 25962  MOVE.B  D2,-(A7)>                     Δ-2                {[-8-]|[2, 'D2']}
            <Call 0x25964 0x21388>                                              {[-8-]|[2, 'D2']}
            <POP 25968-2596a StackAdj>                       Δ+2                {[-8-]}
            <MI 2596a  MOVE.L  D4,D7>                                           {[-8-]}
            <MI 2596c  ADD.L   (A7)+,D7>                     Δ+4                {[-4-]}
        <POP 2596e-25972 Naked>                              Σ-4        ↓ →0x25916 ←0x25934
            <MI 2596e  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 25970  BVC     0x25916>                                         {[-4-]}
        <POP 25972-2598a Naked>                              Σ-4 Δ+4    ↓ →0x2598c ←0x25916
            <POP 25972-25974 StackAdj>                       Δ+4                {}
            <MI 25974  MOVE.L  D5,D4>                                           {}
            <MI 25976  MOVE.L  D7,D3>                                           {}
            <Call 0x25978 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 2597e  ADD.L   D4,0x2d018>                                      {}
            <MI 25980  CLR.B   0x2e1c6>                                         {}
            <MI 25982  CMPI.L  #0x00000003,D6>                                  {}
            <MI 25988  BNE     0x2598c>                                         {}
        <POP 2598a-2598c Naked>                              Σ0         ↓
            <MI 2598a  ADDQ.B  #0x1,0x2e1c6>                                    {}
        <POP 2598c-2599c Naked>                              Σ0         ↓ →0x258aa ←0x25972
            <Pointer.fp 0x2598c <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Call 0x2598e 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 25994-25996 StackAdj>                       Δ+4                {}
            <MI 25996  TST.B   0x2e1c6>                                         {}
            <MI 25998  BEQ     0x258aa>                                         {}
        <POP 2599c-259a0 Naked>                              Σ0         ↓ ←0x2589c ←0x258a4
            <MI 2599c  MOVE.L  0x2d018,(A6+0xc)>                                {}
        <POP 259a0-259a8 Epilogue>                           Σ0         

0x259a8


@ 259a8
        <LVAR  0x008 4(r)>
        <LVAR -0x006 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 @ 2(r) 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x047 1(r)>
        <LVAR -0x050 @>
        <LVAR -0x068 4(w)>
        <LVAR -0x076 2(w)>
        <LVAR -0x078 @>
    <POP 259a8-25b12 Body>                                              
        <POP 259a8-259be Prologue>                           Σ0         ↓
        <POP 259be-259d6 RegCacheLoad>                       Σ0         ↓
        <POP 259d6-25a6c Naked>                              Σ0         ↓ →0x25aa8
            <Blob 0x259d6 [20] @>                            Δ-20               {[«20""»]}
            <Const 0x259e6 0x1.2>                            Δ-2                {[«20""»]|[#1]}
            <POP 259e8-259ea StackAdj>                       Δ-4                {[«20""»]|[#1]|[-4-]}
            <Lit 0x259ea 19>                                                    {[«20""»]|[#1]|[$$Procedure SOCONNECT]}
            <Call 0x259f8 0x22238>                                              {[«20""»]|[#1]|[$$Procedure SOCONNECT]}
            <POP 259fa-259fe StackAdj>                       Δ+26               {}
            <MI 259fe  LEA.L   (A6-0x78),A0>                                    {}
            <MI 25a02  LEA.L   0x2122c,A1>                                      {}
            <BlockMove 40,A1,A0>                                                {}
            <MI 25a0e  MOVE.W  0x2e1b8,(A6-0x76)>                               {}
            <POP 25a16-25a18 StackAdj>                       Δ-4                {[-4-]}
            <MI 25a18  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x25a1c 0x25804>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 25a20-25a22 StackAdj>                       Δ+4                {[-4-]}
            <MI 25a22  MOVE.L  (A7)+,(A6-0x68)>              Δ+4                {}
            <MI 25a26  MOVE.L  0x21030,(A6-0x12)>                               {}
            <MI 25a2a  MOVE.L  0x21034,(A6-0xe)>                                {}
            <MI 25a30  MOVE.L  0x21038,(A6-0xa)>                                {}
            <MI 25a36  MOVE.L  0x2103c,(A6-0x6)>                                {}
            <Pointer.fp 0x25a3c <LVAR -0x012 @ 2(r) 4(rw)>>  Δ-4                {[@@-18]}
            <MI 25a3e  LEA.L   (A6-0x78),A0>                                    {[@@-18]}
            <MI 25a42  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']}
            <Const 0x25a44 0x3.2>                            Δ-2                {[@@-18]|[4, 'A0']|[#3]}
            <Const 0x25a46 0x28.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]}
            <MI 25a4a  LEA.L   (A6-0x50),A0>                                    {[@@-18]|[4, 'A0']|[#3]|[##40]}
            <MI 25a4e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']}
            <Const 0x25a50 0x3c.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']|[##60]}
            <Call 0x25a54 0x22766>                                              {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']|[##60]}
            <POP 25a58-25a5a StackAdj>                       Δ+20               {[-2-]}
            <POP 25a5a-25a5b StackAdj>                       Δ+2                {}
            <Const 0x25a5b 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x25a5c <LVAR -0x014 @ 1(r)>>        Δ-4                {[#3]|[@@-20]}
            <Call 0x25a60 0x22676>                                              {[#3]|[@@-20]}
            <POP 25a64-25a66 StackAdj>                       Δ+6                {}
            <MI 25a66  TST.B   (A6-0x14)>                                       {}
            <MI 25a6a  BNE     0x25aa8>                                         {}
        <POP 25a6c-25aa8 Naked>                              Σ0         →0x25b0a
            <Blob 0x25a6c [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x25a70 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x25a74 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <Blob 0x25a78 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
            <Const 0x25a7c 0x4.2>                            Δ-2                {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#4]}
            <POP 25a7e-25a80 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#4]|[-4-]}
            <Lit 0x25a80 16>                                                    {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#4]|[$$soconnect failed]}
            <Call 0x25a8c 0x22238>                                              {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#4]|[$$soconnect failed]}
            <POP 25a8e-25a92 StackAdj>                       Δ+18               {[«4""»]}
            <MI 25a92  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 25a96  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 25a9a  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 25a9e  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x25aa0 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 25aa4-25aa6 StackAdj>                       Δ+16               {}
            <MI 25aa6  BRA     0x25b0a>                                         {}
        <POP 25aa8-25ab0 Naked>                              Σ0         ↓ →0x25ac6 ←0x259d6
            <MI 25aa8  MOVE.W  (A6-0x12),D0>                                    {}
            <MI 25aaa  ANDI.W  #0x00ff,D0>                                      {}
            <MI 25aae  BNE     0x25ac6>                                         {}
        <POP 25ab0-25ac6 Naked>                              Σ0         ↓
            <Const 0x25ab0 0x1388.4>                         Δ-4                {[##5000]}
            <Const 0x25ab4 0x34.2>                           Δ-2                {[##5000]|[#52]}
            <MI 25ab8  LEA.L   (A6-0x50),A0>                                    {[##5000]|[#52]}
            <MI 25abc  MOVE.L  A0,-(A7)>                     Δ-4                {[##5000]|[#52]|[4, 'A0']}
            <Call 0x25abe 0x2560a>                                              {[##5000]|[#52]|[4, 'A0']}
            <POP 25ac2-25ac6 StackAdj>                       Δ+10               {}
        <POP 25ac6-25acc Naked>                              Σ0         ↓ →0x25b0a ←0x25aa8
            <MI 25ac6  TST.B   (A6-0x47)>                                       {}
            <MI 25aca  BEQ     0x25b0a>                                         {}
        <POP 25acc-25b0a Naked>                              Σ0         ↓
            <Blob 0x25acc [32] @>                            Δ-32               {[«32""»]}
            <Const 0x25ad8 0x4.2>                            Δ-2                {[«32""»]|[#4]}
            <POP 25ada-25adc StackAdj>                       Δ-4                {[«32""»]|[#4]|[-4-]}
            <Lit 0x25adc 32>                                                    {[«32""»]|[#4]|[$$SOCONNECT REQUEST ended in error]}
            <Call 0x25aea 0x22238>                                              {[«32""»]|[#4]|[$$SOCONNECT REQUEST ended in error]}
            <POP 25aec-25af0 StackAdj>                       Δ+38               {}
            <MI 25af0  LEA.L   (A6-0x50),A0>                                    {}
            <MI 25af4  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x25af6 0x28.4>                           Δ-4                {[4, 'A0']|[##40]}
            <Call 0x25afa 0x2159a>                                              {[4, 'A0']|[##40]}
            <POP 25afe-25b00 StackAdj>                       Δ+8                {}
            <Const 0x25b00 0xb.4>                            Δ-4                {[##11]}
            <Call 0x25b04 0x2132c>                                              {[##11]}
            <POP 25b08-25b0a StackAdj>                       Δ+4                {}
        <POP 25b0a-25b12 Epilogue>                           Σ0         ←0x25a6c ←0x25ac6

0x25b12


@ 25b12
        <LVAR -0x006 2(w) 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 @ 2(r) 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x047 1(r)>
        <LVAR -0x050 @>
        <LVAR -0x076 2(w)>
        <LVAR -0x078 @>
    <POP 25b12-25c28 Body>                                              
        <POP 25b12-25b28 Prologue>                           Σ0         ↓
        <POP 25b28-25b38 RegCacheLoad>                       Σ0         ↓
        <POP 25b38-25bc8 Naked>                              Σ0         ↓ →0x25be6
            <Blob 0x25b38 [18] @>                            Δ-18               {[«18""»]}
            <Const 0x25b4a 0x1.2>                            Δ-2                {[«18""»]|[#1]}
            <POP 25b4c-25b4e StackAdj>                       Δ-4                {[«18""»]|[#1]|[-4-]}
            <Lit 0x25b4e 17>                                                    {[«18""»]|[#1]|[$$Procedure SOCLOSE]}
            <Call 0x25b60 0x22238>                                              {[«18""»]|[#1]|[$$Procedure SOCLOSE]}
            <POP 25b64-25b68 StackAdj>                       Δ+24               {}
            <MI 25b68  LEA.L   (A6-0x78),A0>                                    {}
            <MI 25b6c  LEA.L   0x21254,A1>                                      {}
            <BlockMove 40,A1,A0>                                                {}
            <MI 25b78  MOVE.W  0x2e1b8,(A6-0x76)>                               {}
            <MI 25b80  MOVE.L  0x21030,(A6-0x12)>                               {}
            <MI 25b84  MOVE.L  0x21034,(A6-0xe)>                                {}
            <MI 25b8a  MOVE.L  0x21038,(A6-0xa)>                                {}
            <MI 25b90  MOVE.L  0x2103c,(A6-0x6)>                                {}
            <MI 25b94  MOVE.W  #0x201,(A6-0x6)>                                 {}
            <Pointer.fp 0x25b98 <LVAR -0x012 @ 2(r) 4(rw)>>  Δ-4                {[@@-18]}
            <MI 25b9a  LEA.L   (A6-0x78),A0>                                    {[@@-18]}
            <MI 25b9e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']}
            <Const 0x25ba0 0x3.2>                            Δ-2                {[@@-18]|[4, 'A0']|[#3]}
            <Const 0x25ba2 0x28.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]}
            <MI 25ba6  LEA.L   (A6-0x50),A0>                                    {[@@-18]|[4, 'A0']|[#3]|[##40]}
            <MI 25ba8  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']}
            <Const 0x25baa 0x3c.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']|[##60]}
            <Call 0x25bae 0x22766>                                              {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']|[##60]}
            <POP 25bb2-25bb6 StackAdj>                       Δ+20               {[-2-]}
            <POP 25bb6-25bb7 StackAdj>                       Δ+2                {}
            <Const 0x25bb7 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x25bb8 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#3]|[@@-20]}
            <Call 0x25bbc 0x22676>                                              {[#3]|[@@-20]}
            <POP 25bc0-25bc2 StackAdj>                       Δ+6                {}
            <MI 25bc2  TST.B   (A6-0x14)>                                       {}
            <MI 25bc6  BNE     0x25be6>                                         {}
        <POP 25bc8-25be6 Naked>                              Σ0         ↓
            <MI 25bc8  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 25bca  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 25bce  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 25bd2  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x25bd4 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 25bd8-25bdc StackAdj>                       Δ+16               {}
            <Const 0x25bdc 0x20.4>                           Δ-4                {[##32]}
            <Call 0x25be0 0x2132c>                                              {[##32]}
            <POP 25be4-25be6 StackAdj>                       Δ+4                {}
        <POP 25be6-25bee Naked>                              Σ0         ↓ →0x25c02 ←0x25b38
            <MI 25be6  MOVE.W  (A6-0x12),D0>                                    {}
            <MI 25be8  ANDI.W  #0x00ff,D0>                                      {}
            <MI 25bec  BNE     0x25c02>                                         {}
        <POP 25bee-25c02 Naked>                              Σ0         ↓
            <Const 0x25bee 0x1388.4>                         Δ-4                {[##5000]}
            <Const 0x25bf2 0x38.2>                           Δ-2                {[##5000]|[#56]}
            <MI 25bf6  LEA.L   (A6-0x50),A0>                                    {[##5000]|[#56]}
            <MI 25bf8  MOVE.L  A0,-(A7)>                     Δ-4                {[##5000]|[#56]|[4, 'A0']}
            <Call 0x25bfa 0x2560a>                                              {[##5000]|[#56]|[4, 'A0']}
            <POP 25bfe-25c02 StackAdj>                       Δ+10               {}
        <POP 25c02-25c08 Naked>                              Σ0         ↓ →0x25c20 ←0x25be6
            <MI 25c02  TST.B   (A6-0x47)>                                       {}
            <MI 25c06  BEQ     0x25c20>                                         {}
        <POP 25c08-25c20 Naked>                              Σ0         ↓
            <MI 25c08  LEA.L   (A6-0x50),A0>                                    {}
            <MI 25c0a  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x25c0c 0x28.4>                           Δ-4                {[4, 'A0']|[##40]}
            <Call 0x25c10 0x2159a>                                              {[4, 'A0']|[##40]}
            <POP 25c14-25c16 StackAdj>                       Δ+8                {}
            <Const 0x25c16 0x21.4>                           Δ-4                {[##33]}
            <Call 0x25c1a 0x2132c>                                              {[##33]}
            <POP 25c1e-25c20 StackAdj>                       Δ+4                {}
        <POP 25c20-25c28 Epilogue>                           Σ0         ←0x25c02

0x25c28


@ 25c28
        <LVAR -0x006 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 @ 2(r) 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x047 1(r)>
        <LVAR -0x04e 2(r)>
        <LVAR -0x050 @>
        <LVAR -0x078 @>
    <POP 25c28-25d72 Body>                                              
        <POP 25c28-25c3e Prologue>                           Σ0         ↓
        <POP 25c3e-25c54 RegCacheLoad>                       Σ0         ↓
        <POP 25c54-25cd0 Naked>                              Σ0         ↓ →0x25cfa
            <Blob 0x25c54 [18] @>                            Δ-18               {[«18""»]}
            <Const 0x25c60 0x1.2>                            Δ-2                {[«18""»]|[#1]}
            <POP 25c62-25c64 StackAdj>                       Δ-4                {[«18""»]|[#1]|[-4-]}
            <Lit 0x25c64 18>                                                    {[«18""»]|[#1]|[$$Procedure SOSOCKET]}
            <Call 0x25c72 0x22238>                                              {[«18""»]|[#1]|[$$Procedure SOSOCKET]}
            <POP 25c74-25c78 StackAdj>                       Δ+24               {}
            <MI 25c78  LEA.L   (A6-0x78),A0>                                    {}
            <MI 25c7c  LEA.L   0x2127c,A1>                                      {}
            <BlockMove 40,A1,A0>                                                {}
            <MI 25c88  MOVE.L  0x21030,(A6-0x12)>                               {}
            <MI 25c8c  MOVE.L  0x21034,(A6-0xe)>                                {}
            <MI 25c92  MOVE.L  0x21038,(A6-0xa)>                                {}
            <MI 25c98  MOVE.L  0x2103c,(A6-0x6)>                                {}
            <Pointer.fp 0x25c9e <LVAR -0x012 @ 2(r) 4(rw)>>  Δ-4                {[@@-18]}
            <MI 25ca0  LEA.L   (A6-0x78),A0>                                    {[@@-18]}
            <MI 25ca4  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']}
            <Const 0x25ca6 0x3.2>                            Δ-2                {[@@-18]|[4, 'A0']|[#3]}
            <Const 0x25ca8 0x28.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]}
            <MI 25cac  LEA.L   (A6-0x50),A0>                                    {[@@-18]|[4, 'A0']|[#3]|[##40]}
            <MI 25cb0  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']}
            <Const 0x25cb2 0x3c.4>                           Δ-4                {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']|[##60]}
            <Call 0x25cb6 0x22766>                                              {[@@-18]|[4, 'A0']|[#3]|[##40]|[4, 'A0']|[##60]}
            <POP 25cba-25cbe StackAdj>                       Δ+20               {[-2-]}
            <POP 25cbe-25cbf StackAdj>                       Δ+2                {}
            <Const 0x25cbf 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x25cc0 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#3]|[@@-20]}
            <Call 0x25cc4 0x22676>                                              {[#3]|[@@-20]}
            <POP 25cc8-25cca StackAdj>                       Δ+6                {}
            <MI 25cca  TST.B   (A6-0x14)>                                       {}
            <MI 25cce  BNE     0x25cfa>                                         {}
        <POP 25cd0-25cfa Naked>                              Σ0         →0x25d6a
            <Blob 0x25cd0 [34] @>                            Δ-34               {[«34""»]}
            <Const 0x25ce0 0x4.2>                            Δ-2                {[«34""»]|[#4]}
            <POP 25ce2-25ce4 StackAdj>                       Δ-4                {[«34""»]|[#4]|[-4-]}
            <Lit 0x25ce4 33>                                                    {[«34""»]|[#4]|[$$Sosocket packet header /= success]}
            <Call 0x25cf2 0x22238>                                              {[«34""»]|[#4]|[$$Sosocket packet header /= success]}
            <POP 25cf4-25cf8 StackAdj>                       Δ+40               {}
            <MI 25cf8  BRA     0x25d6a>                                         {}
        <POP 25cfa-25d02 Naked>                              Σ0         ↓ →0x25d0c ←0x25c54
            <MI 25cfa  MOVE.W  (A6-0x12),D0>                                    {}
            <MI 25cfc  ANDI.W  #0x00ff,D0>                                      {}
            <MI 25d00  BNE     0x25d0c>                                         {}
        <POP 25d02-25d0c Naked>                              Σ0         ↓
            <Const 0x25d02 0x17.4>                           Δ-4                {[##23]}
            <Call 0x25d06 0x2132c>                                              {[##23]}
            <POP 25d0a-25d0c StackAdj>                       Δ+4                {}
        <POP 25d0c-25d12 Naked>                              Σ0         ↓ →0x25d62 ←0x25cfa
            <MI 25d0c  TST.B   (A6-0x47)>                                       {}
            <MI 25d10  BEQ     0x25d62>                                         {}
        <POP 25d12-25d62 Naked>                              Σ0         →0x25d6a
            <Blob 0x25d12 [32] @>                            Δ-32               {[«32""»]}
            <Const 0x25d24 0x4.2>                            Δ-2                {[«32""»]|[#4]}
            <POP 25d26-25d28 StackAdj>                       Δ-4                {[«32""»]|[#4]|[-4-]}
            <Lit 0x25d28 31>                                                    {[«32""»]|[#4]|[$$sosocket request ended in error]}
            <Call 0x25d36 0x22238>                                              {[«32""»]|[#4]|[$$sosocket request ended in error]}
            <POP 25d38-25d3a StackAdj>                       Δ+34               {[-4-]}
            <MI 25d3a  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 25d3e  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 25d42  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 25d46  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x25d48 0x2234c>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 25d4c-25d50 StackAdj>                       Δ+16               {}
            <MI 25d50  LEA.L   (A6-0x50),A0>                                    {}
            <MI 25d54  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Const 0x25d56 0x28.4>                           Δ-4                {[4, 'A0']|[##40]}
            <Call 0x25d5a 0x2159a>                                              {[4, 'A0']|[##40]}
            <POP 25d5e-25d60 StackAdj>                       Δ+8                {}
            <MI 25d60  BRA     0x25d6a>                                         {}
        <POP 25d62-25d6a Naked>                              Σ0         ↓ ←0x25d0c
            <MI 25d62  MOVE.W  (A6-0x4e),0x2e1b8>                               {}
        <POP 25d6a-25d72 Epilogue>                           Σ0         ←0x25cd0 ←0x25d12

0x25d72


@ 25d72
        <LVAR  0x008 @ 4(r)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x006 2(w)>
        <LVAR -0x008 2(w) 4(rw)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 @ 4(rw)>
    <POP 25d72-25ef0 Body>                                              
        <POP 25d72-25d88 Prologue>                           Σ0         ↓
        <POP 25d88-25da0 RegCacheLoad>                       Σ0         ↓
        <POP 25da0-25e04 Naked>                              Σ0 Δ-4     ↓
            <Blob 0x25da0 [22] @>                            Δ-22               {[«22""»]}
            <Const 0x25db2 0x1.2>                            Δ-2                {[«22""»]|[#1]}
            <POP 25db4-25db6 StackAdj>                       Δ-4                {[«22""»]|[#1]|[-4-]}
            <Lit 0x25db6 21>                                                    {[«22""»]|[#1]|[$$Procedure SEND_STRING]}
            <Call 0x25dc4 0x22238>                                              {[«22""»]|[#1]|[$$Procedure SEND_STRING]}
            <POP 25dc6-25dc7 StackAdj>                       Δ+28       ↓       {}
            <Blob 0x25dc7 [14] @>                            Δ-14               {[«14""»]}
            <MI 25dd6  CLR.B   -(A7)>                        Δ-2                {[«14""»]|[#0]}
            <POP 25dd8-25dda StackAdj>                       Δ-8                {[«14""»]|[#0]|[-8-]}
            <Lit 0x25dda 13>                                                    {[«14""»]|[#0]|[-4-]|[$$   sending :_]}
            <MI 25de4  MOVE.L  (A6+0x8),(A7)>                                   {[«14""»]|[#0]|[-4-]|[4, '(A6+0x8)']}
            <POP 25de2-25de4 StackAdj>                       Δ-8                {[«14""»]|[#0]|[-4-]|[4, '(A6+0x8)']|[-8-]}
            <Call 0x25de6 0x102cc>                                              {[«14""»]|[#0]|[-4-]|[4, '(A6+0x8)']|[-8-]}
                StringDup(a : String) : String
            <POP 25dec-25dee StackAdj>                       Δ+4                {[«14""»]|[#0]|[-4-]|[4, '(A6+0x8)']|[-4-]}
            <Call 0x25dee 0x102d0>                                              {[«14""»]|[#0]|[-4-]|[4, '(A6+0x8)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 25df4-25df6 StackAdj>                       Δ+8                {[«14""»]|[#0]|[-4-]}
            <Call 0x25df6 0x22238>                                              {[«14""»]|[#0]|[-4-]}
            <POP 25df8-25dfa StackAdj>                       Δ+20               {}
            <MI 25dfa  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 25dfc  MOVE.W  (A0),D0>                                         {}
            <MI 25dfe  EXTW.L  D0>                                              {}
            <MI 25e00  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 25e02  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 25e04-25e08 Naked>                              Σ-4        ↓ →0x25e3a ←0x25e08
            <MI 25e04  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 25e06  BGT     0x25e3a>                                         {[-4-]}
        <POP 25e08-25e3a Naked>                              Σ-4        ↓ →0x25e04
            <MI 25e08  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 25e0a  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x25e0c LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {[-4-]}
            <MI 25e16  LEA.L   0x2c794,A0>                                      {[-4-]}
            <MI 25e1c  LEA.L   (A0+D0.L),A0>                                    {[-4-]}
            <MI 25e20  MOVEA.L (A6+0x8),A1>                                     {[-4-]}
            <MI 25e22  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 25e24  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x25e26 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 25e30  MOVE.B  (A1+D0.L+#0x2),(A0+0x899)>                       {[-4-]}
            <MI 25e36  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 25e38  BVC     0x25e04>                                         {[-4-]}
        <POP 25e3a-25ea8 Naked>                              Σ-4 Δ+4    ↓ →0x25ee8 ←0x25e04
            <POP 25e3a-25e3c StackAdj>                       Δ+4                {}
            <MI 25e3c  MOVE.L  0x21060,(A6-0x14)>                               {}
            <MI 25e42  MOVE.L  0x21064,(A6-0x10)>                               {}
            <MI 25e48  MOVE.L  0x21068,(A6-0xc)>                                {}
            <MI 25e4e  MOVE.L  0x2106c,(A6-0x8)>                                {}
            <MI 25e54  MOVE.W  #0x301,(A6-0x8)>                                 {}
            <MI 25e5a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 25e5c  MOVE.W  (A0),D0>                                         {}
            <POP 0x25e5e LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 25e66  MOVE.W  D0,(A6-0x6)>                                     {}
            <Pointer.fp 0x25e6a <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Call 0x25e6c 0x102bc>                                              {[@@8]}
                FreeString(VAR a : String)
            <POP 25e72-25e74 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x25e74 <LVAR -0x014 @ 4(rw)>>       Δ-4                {[@@-20]}
            <MI 25e78  LEA.L   0x2d02d,A0>                                      {[@@-20]}
            <MI 25e7e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-20]|[4, 'A0']}
            <Const 0x25e80 0x3.2>                            Δ-2                {[@@-20]|[4, 'A0']|[#3]}
            <MI 25e82  CLR.L   D1>                                              {[@@-20]|[4, 'A0']|[#3]}
            <MI 25e84  MOVE.W  D0,D1>                                           {[@@-20]|[4, 'A0']|[#3]}
            <MI 25e86  MOVE.L  D1,-(A7)>                     Δ-4                {[@@-20]|[4, 'A0']|[#3]|[4, 'D1']}
            <Const 0x25e88 0x0.4>                            Δ-4                {[@@-20]|[4, 'A0']|[#3]|[4, 'D1']|[##0]}
            <Const 0x25e8c 0x0.4>                            Δ-4                {[@@-20]|[4, 'A0']|[#3]|[4, 'D1']|[##0]|[##0]}
            <Call 0x25e90 0x22766>                                              {[@@-20]|[4, 'A0']|[#3]|[4, 'D1']|[##0]|[##0]}
            <POP 25e94-25e96 StackAdj>                       Δ+20               {[-2-]}
            <POP 25e96-25e97 StackAdj>                       Δ+2                {}
            <Const 0x25e97 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x25e98 <LVAR -0x004 @ 1(r)>>        Δ-4                {[#3]|[@@-4]}
            <Call 0x25e9c 0x22676>                                              {[#3]|[@@-4]}
            <POP 25ea0-25ea2 StackAdj>                       Δ+6                {}
            <MI 25ea2  TST.B   (A6-0x4)>                                        {}
            <MI 25ea6  BNE     0x25ee8>                                         {}
        <POP 25ea8-25ee8 Naked>                              Σ0         ↓
            <Blob 0x25ea8 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x25eb8 0x4.2>                            Δ-2                {[«14""»]|[#4]}
            <POP 25ebc-25ebe StackAdj>                       Δ-4                {[«14""»]|[#4]|[-4-]}
            <Lit 0x25ebe 13>                                                    {[«14""»]|[#4]|[$$sosend failed]}
            <Call 0x25eca 0x22238>                                              {[«14""»]|[#4]|[$$sosend failed]}
            <POP 25ecc-25ed0 StackAdj>                       Δ+16               {[-4-]}
            <MI 25ed0  MOVE.L  (A6-0x8),(A7)>                                   {[4, '(A6-0x8)']}
            <MI 25ed4  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0xc)']}
            <MI 25ed8  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 25edc  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <Call 0x25ee0 0x2234c>                                              {[4, '(A6-0x8)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <POP 25ee4-25ee8 StackAdj>                       Δ+16               {}
        <POP 25ee8-25ef0 Epilogue>                           Σ0         ←0x25e3a

0x25ef0


@ 25ef0
        <LVAR  0x008 4(w)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x006 @ 4(r)>
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x00a 2(rw)>
        <LVAR -0x00c 2(w) 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 4(rw)>
        <LVAR -0x018 @ 4(rw)>
    <POP 25ef0-26090 Body>                                              
        <POP 25ef0-25f06 Prologue>                           Σ0         ↓
        <POP 25f06-25f20 RegCacheLoad>                       Σ0         ↓
        <POP 25f20-25f92 Naked>                              Σ0         ↓ →0x25faa
            <Blob 0x25f20 [20] @>                            Δ-20               {[«20""»]}
            <Const 0x25f2c 0x1.2>                            Δ-2                {[«20""»]|[#1]}
            <POP 25f2e-25f30 StackAdj>                       Δ-4                {[«20""»]|[#1]|[-4-]}
            <Lit 0x25f30 20>                                                    {[«20""»]|[#1]|[$$Procedure GET_STRING]}
            <Call 0x25f40 0x22238>                                              {[«20""»]|[#1]|[$$Procedure GET_STRING]}
            <POP 25f44-25f48 StackAdj>                       Δ+26               {}
            <MI 25f48  MOVE.L  0x21050,(A6-0x18)>                               {}
            <MI 25f4c  MOVE.L  0x21054,(A6-0x14)>                               {}
            <MI 25f50  MOVE.L  0x21058,(A6-0x10)>                               {}
            <MI 25f54  MOVE.L  0x2105c,(A6-0xc)>                                {}
            <MI 25f58  MOVE.W  #0x401,(A6-0xc)>                                 {}
            <MI 25f5c  MOVE.W  #0x01,(A6-0xa)>                                  {}
            <Pointer.fp 0x25f60 <LVAR -0x018 @ 4(rw)>>       Δ-4                {[@@-24]}
            <Const 0x25f62 0x0.4>                            Δ-4                {[@@-24]|[##0]}
            <Const 0x25f66 0x3.2>                            Δ-2                {[@@-24]|[##0]|[#3]}
            <MI 25f68  CLR.L   D0>                                              {[@@-24]|[##0]|[#3]}
            <MI 25f6a  MOVE.W  (A6-0xa),D0>                                     {[@@-24]|[##0]|[#3]}
            <MI 25f6e  MOVE.L  D0,-(A7)>                     Δ-4                {[@@-24]|[##0]|[#3]|[4, 'D0']}
            <MI 25f70  LEA.L   (A6-0x2),A0>                                     {[@@-24]|[##0]|[#3]|[4, 'D0']}
            <MI 25f74  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-24]|[##0]|[#3]|[4, 'D0']|[4, 'A0']}
            <Const 0x25f76 0x1.4>                            Δ-4                {[@@-24]|[##0]|[#3]|[4, 'D0']|[4, 'A0']|[##1]}
            <Call 0x25f7a 0x22766>                                              {[@@-24]|[##0]|[#3]|[4, 'D0']|[4, 'A0']|[##1]}
            <POP 25f7e-25f80 StackAdj>                       Δ+20               {[-2-]}
            <POP 25f80-25f81 StackAdj>                       Δ+2                {}
            <Const 0x25f81 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x25f82 <LVAR -0x008 @ 1(r)>>        Δ-4                {[#3]|[@@-8]}
            <Call 0x25f86 0x22676>                                              {[#3]|[@@-8]}
            <POP 25f8a-25f8c StackAdj>                       Δ+6                {}
            <MI 25f8c  TST.B   (A6-0x8)>                                        {}
            <MI 25f90  BNE     0x25faa>                                         {}
        <POP 25f92-25faa Naked>                              Σ0         ↓
            <MI 25f92  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[4, '(A6-0xc)']}
            <MI 25f94  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 25f96  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <MI 25f98  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Call 0x25f9a 0x2234c>                                              {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <POP 25f9e-25fa0 StackAdj>                       Δ+16               {}
            <Const 0x25fa0 0x18.4>                           Δ-4                {[##24]}
            <Call 0x25fa4 0x2132c>                                              {[##24]}
            <POP 25fa8-25faa StackAdj>                       Δ+4                {}
        <POP 25faa-25fb2 Naked>                              Σ0         ↓ →0x25fbc ←0x25f20
            <MI 25faa  MOVE.B  (A6-0x2),D0>                                     {}
            <MI 25fae  CMP.B   #0x3a,D0>                                        {}
            <MI 25fb0  BEQ     0x25fbc>                                         {}
        <POP 25fb2-25fbc Naked>                              Σ0         ↓
            <Const 0x25fb2 0x19.4>                           Δ-4                {[##25]}
            <Call 0x25fb6 0x2132c>                                              {[##25]}
            <POP 25fba-25fbc StackAdj>                       Δ+4                {}
        <POP 25fbc-25fca Naked>                              Σ0         ↓ ←0x25faa
            <Pointer.fp 0x25fbc <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x25fc0 0x102b8>                                              {[@@-6]}
                NewString(VAR a : String)
            <POP 25fc6-25fc8 StackAdj>                       Δ+4                {}
            <MI 25fc8  MOVEQ.L #0x00,D7>                                        {}
        <POP 25fca-26014 Naked>                              Σ0         ↓ →0x2602c ←0x26046
            <MI 25fca  MOVE.L  0x21050,(A6-0x18)>                               {}
            <MI 25fce  MOVE.L  0x21054,(A6-0x14)>                               {}
            <MI 25fd2  MOVE.L  0x21058,(A6-0x10)>                               {}
            <MI 25fd6  MOVE.L  0x2105c,(A6-0xc)>                                {}
            <MI 25fda  MOVE.W  #0x401,(A6-0xc)>                                 {}
            <MI 25fde  MOVE.W  #0x01,(A6-0xa)>                                  {}
            <Pointer.fp 0x25fe2 <LVAR -0x018 @ 4(rw)>>       Δ-4                {[@@-24]}
            <Const 0x25fe4 0x0.4>                            Δ-4                {[@@-24]|[##0]}
            <Const 0x25fe8 0x3.2>                            Δ-2                {[@@-24]|[##0]|[#3]}
            <MI 25fea  CLR.L   D0>                                              {[@@-24]|[##0]|[#3]}
            <MI 25fec  MOVE.W  (A6-0xa),D0>                                     {[@@-24]|[##0]|[#3]}
            <MI 25ff0  MOVE.L  D0,-(A7)>                     Δ-4                {[@@-24]|[##0]|[#3]|[4, 'D0']}
            <MI 25ff2  LEA.L   (A6-0x2),A0>                                     {[@@-24]|[##0]|[#3]|[4, 'D0']}
            <MI 25ff6  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-24]|[##0]|[#3]|[4, 'D0']|[4, 'A0']}
            <Const 0x25ff8 0x1.4>                            Δ-4                {[@@-24]|[##0]|[#3]|[4, 'D0']|[4, 'A0']|[##1]}
            <Call 0x25ffc 0x22766>                                              {[@@-24]|[##0]|[#3]|[4, 'D0']|[4, 'A0']|[##1]}
            <POP 26000-26002 StackAdj>                       Δ+20               {[-2-]}
            <POP 26002-26003 StackAdj>                       Δ+2                {}
            <Const 0x26003 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x26004 <LVAR -0x008 @ 1(r)>>        Δ-4                {[#3]|[@@-8]}
            <Call 0x26008 0x22676>                                              {[#3]|[@@-8]}
            <POP 2600c-2600e StackAdj>                       Δ+6                {}
            <MI 2600e  TST.B   (A6-0x8)>                                        {}
            <MI 26012  BNE     0x2602c>                                         {}
        <POP 26014-2602c Naked>                              Σ0         ↓
            <MI 26014  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[4, '(A6-0xc)']}
            <MI 26016  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 26018  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <MI 2601a  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Call 0x2601c 0x2234c>                                              {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <POP 26020-26022 StackAdj>                       Δ+16               {}
            <Const 0x26022 0x18.4>                           Δ-4                {[##24]}
            <Call 0x26026 0x2132c>                                              {[##24]}
            <POP 2602a-2602c StackAdj>                       Δ+4                {}
        <POP 2602c-26034 Naked>                              Σ0         ↓ →0x26044 ←0x25fca
            <MI 2602c  MOVE.B  (A6-0x2),D0>                                     {}
            <MI 26030  CMP.B   #0x3a,D0>                                        {}
            <MI 26032  BEQ     0x26044>                                         {}
        <POP 26034-26044 Naked>                              Σ0         →0x26046
            <MI 26034  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 26038  MOVE.B  D0,-(A7)>                     Δ-2                {[4, '(A6-0x6)']|[2, 'D0']}
            <Call 0x2603a 0x102c0>                                              {[4, '(A6-0x6)']|[2, 'D0']}
                AppendChar(MOD b : String; a : char)
            <POP 26040-26042 StackAdj>                       Δ+6                {}
            <MI 26042  BRA     0x26046>                                         {}
        <POP 26044-26046 Naked>                              Σ0         ↓ ←0x2602c
            <MI 26044  MOVEQ.L #0x01,D7>                                        {}
        <POP 26046-2604a Naked>                              Σ0         ↓ →0x25fca ←0x26034
            <MI 26046  TST.B   D7>                                              {}
            <MI 26048  BEQ     0x25fca>                                         {}
        <POP 2604a-26088 Naked>                              Σ0         ↓
            <Blob 0x2604a [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x2604e [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <MI 26052  CLR.B   -(A7)>                        Δ-2                {[«4""»]|[«4""»]|[#0]}
            <POP 26054-26056 StackAdj>                       Δ-8                {[«4""»]|[«4""»]|[#0]|[-8-]}
            <Lit 0x26056 8>                                                     {[«4""»]|[«4""»]|[#0]|[-4-]|[$$   got:_]}
            <MI 26066  MOVE.L  (A6-0x6),(A7)>                                   {[«4""»]|[«4""»]|[#0]|[-4-]|[4, '(A6-0x6)']}
            <POP 26060-26066 StackAdj>                       Δ-8                {[«4""»]|[«4""»]|[#0]|[-4-]|[4, '(A6-0x6)']|[-8-]}
            <Call 0x2606a 0x102cc>                                              {[«4""»]|[«4""»]|[#0]|[-4-]|[4, '(A6-0x6)']|[-8-]}
                StringDup(a : String) : String
            <POP 26070-26072 StackAdj>                       Δ+4                {[«4""»]|[«4""»]|[#0]|[-4-]|[4, '(A6-0x6)']|[-4-]}
            <Call 0x26072 0x102d0>                                              {[«4""»]|[«4""»]|[#0]|[-4-]|[4, '(A6-0x6)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 26078-2607a StackAdj>                       Δ+8                {[«4""»]|[«4""»]|[#0]|[-4-]}
            <Call 0x2607a 0x22238>                                              {[«4""»]|[«4""»]|[#0]|[-4-]}
            <POP 2607e-26082 StackAdj>                       Δ+14               {}
            <MI 26082  MOVE.L  (A6-0x6),(A6+0x8)>                               {}
        <POP 26088-26090 Epilogue>                           Σ0         

0x26090


@ 26090
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x00a 2(w)>
        <LVAR -0x00c 2(w) 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 4(rw)>
        <LVAR -0x016 2(r)>
        <LVAR -0x018 @ 2(r) 4(rw)>
    <POP 26090-26190 Body>                                              
        <POP 26090-260a6 Prologue>                           Σ0         ↓
        <POP 260a6-260b8 RegCacheLoad>                       Σ0         ↓
        <POP 260b8-260e4 Naked>                              Σ0         ↓
            <Blob 0x260b8 [30] @>                            Δ-30               {[«30""»]}
            <Const 0x260c4 0x1.2>                            Δ-2                {[«30""»]|[#1]}
            <POP 260c6-260c8 StackAdj>                       Δ-4                {[«30""»]|[#1]|[-4-]}
            <Lit 0x260c8 30>                                                    {[«30""»]|[#1]|[$$Procedure GET_A_PAGE_FROM_exos]}
            <Call 0x260da 0x22238>                                              {[«30""»]|[#1]|[$$Procedure GET_A_PAGE_FROM_exos]}
            <POP 260de-260e2 StackAdj>                       Δ+36               {}
            <MI 260e2  MOVEQ.L #0x00,D7>                                        {}
        <POP 260e4-260ea Naked>                              Σ0         ↓ →0x26182 ←0x26164
            <MI 260e4  CMP.L   #0x400,D7>                                       {}
            <MI 260e6  BEQ     0x26182>                                         {}
        <POP 260ea-26146 Naked>                              Σ0         ↓ →0x26164
            <MI 260ea  MOVE.L  0x21050,(A6-0x18)>                               {}
            <MI 260ee  MOVE.L  0x21054,(A6-0x14)>                               {}
            <MI 260f4  MOVE.L  0x21058,(A6-0x10)>                               {}
            <MI 260fa  MOVE.L  0x2105c,(A6-0xc)>                                {}
            <MI 260fe  MOVE.W  #0x401,(A6-0xc)>                                 {}
            <MI 26102  MOVE.L  #0x400,D0>                                       {}
            <MI 26104  SUB.L   D7,D0>                                           {}
            <POP 0x26106 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 26110  MOVE.W  D0,(A6-0xa)>                                     {}
            <Pointer.fp 0x26114 <LVAR -0x018 @ 2(r) 4(rw)>>  Δ-4                {[@@-24]}
            <Const 0x26116 0x0.4>                            Δ-4                {[@@-24]|[##0]}
            <Const 0x2611a 0x3.2>                            Δ-2                {[@@-24]|[##0]|[#3]}
            <Const 0x2611c 0x0.4>                            Δ-4                {[@@-24]|[##0]|[#3]|[##0]}
            <MI 26120  LEA.L   0x2d43a,A0>                                      {[@@-24]|[##0]|[#3]|[##0]}
            <MI 26126  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-24]|[##0]|[#3]|[##0]|[4, 'A0']}
            <MI 26128  ADD.L   D7,(A7)>                                         {[@@-24]|[##0]|[#3]|[##0]|[-4-]}
            <MI 2612a  MOVE.L  D0,-(A7)>                     Δ-4                {[@@-24]|[##0]|[#3]|[##0]|[-4-]|[4, 'D0']}
            <Call 0x2612c 0x22766>                                              {[@@-24]|[##0]|[#3]|[##0]|[-4-]|[4, 'D0']}
            <POP 26130-26134 StackAdj>                       Δ+20               {[-2-]}
            <POP 26134-26135 StackAdj>                       Δ+2                {}
            <Const 0x26135 0x3.2>                            Δ-2                {[#3]}
            <Pointer.fp 0x26136 <LVAR -0x008 @ 1(r)>>        Δ-4                {[#3]|[@@-8]}
            <Call 0x2613a 0x22676>                                              {[#3]|[@@-8]}
            <POP 2613e-26140 StackAdj>                       Δ+6                {}
            <MI 26140  TST.B   (A6-0x8)>                                        {}
            <MI 26144  BNE     0x26164>                                         {}
        <POP 26146-26164 Naked>                              Σ0         ↓
            <MI 26146  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[4, '(A6-0xc)']}
            <MI 26148  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 2614c  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <MI 26150  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Call 0x26152 0x2234c>                                              {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <POP 26156-2615a StackAdj>                       Δ+16               {}
            <Const 0x2615a 0x18.4>                           Δ-4                {[##24]}
            <Call 0x2615e 0x2132c>                                              {[##24]}
            <POP 26162-26164 StackAdj>                       Δ+4                {}
        <POP 26164-26182 Naked>                              Σ0         →0x260e4 ←0x260ea
            <MI 26164  MOVE.W  (A6-0x18),D0>                                    {}
            <MI 26166  ANDI.W  #0x00ff,D0>                                      {}
            <MI 2616a  ASL.W   #0x3,D0>                                         {}
            <MI 2616c  CLR.L   D1>                                              {}
            <MI 2616e  MOVE.W  D0,D1>                                           {}
            <MI 26170  ADD.L   D1,D7>                                           {}
            <MI 26172  MOVE.W  (A6-0x16),D0>                                    {}
            <MI 26176  LSR.W   #0x8,D0>                                         {}
            <MI 26178  CLR.L   D1>                                              {}
            <MI 2617a  MOVE.W  D0,D1>                                           {}
            <MI 2617c  SUB.L   D1,D7>                                           {}
            <MI 2617e  BRA     0x260e4>                                         {}
        <POP 26182-26188 Naked>                              Σ0         ↓ ←0x260e4
            <MI 26182  ADD.L   #0x400,0x2e1c2>                                  {}
        <POP 26188-26190 Epilogue>                           Σ0         

0x26190


@ 26190
    <POP 26190-26222 Body>                                              
        <POP 26190-261a6 Prologue>                           Σ0         ↓
        <POP 261a6-261ca Naked>                              Σ0         ↓
            <MI 261a6  MOVE.L  0x2c7c4,D4>                                      {}
            <MI 261ac  MOVEQ.L #0x50,D3>                                        {}
            <Call 0x261ae 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 261b4  MOVE.L  0x2e1a8,D5>                                      {}
            <MI 261ba  ADD.L   D4,D5>                                           {}
            <MI 261bc  ADDI.L  #0x00000028,D5>                                  {}
            <MI 261c2  ANDI.L  #0x000fffff,D5>                                  {}
            <MI 261c8  MOVEQ.L #0x00,D7>                                        {}
        <POP 261ca-261ec Naked>                              Σ0         ↓ →0x261ee ←0x26208
            <Const 0x261ca 0x2.4>                            Δ-4                {[##2]}
            <MI 261ce  MOVE.L  D5,-(A7)>                     Δ-4                {[##2]|[4, 'D5']}
            <Const 0x261d0 0x2.4>                            Δ-4                {[##2]|[4, 'D5']|[##2]}
            <Call 0x261d4 0x24354>                                              {[##2]|[4, 'D5']|[##2]}
            <POP 261d8-261dc StackAdj>                       Δ+12               {}
            <MI 261dc  MOVEQ.L #0x00,D6>                                        {}
            <MI 261de  MOVE.B  0x2d8c2,D0>                                      {}
            <MI 261e4  CMP.B   0x2d8c3,D0>                                      {}
            <MI 261ea  BEQ     0x261ee>                                         {}
        <POP 261ec-261ee Naked>                              Σ0         ↓
            <MI 261ec  ADDQ.B  #0x1,D6>                                         {}
        <POP 261ee-261f2 Naked>                              Σ0         ↓ →0x26200 ←0x261ca
            <MI 261ee  TST.B   D6>                                              {}
            <MI 261f0  BNE     0x26200>                                         {}
        <POP 261f2-26200 Naked>                              Σ0         ↓
            <Const 0x261f2 0x7a1.4>                          Δ-4                {[##1953]}
            <Call 0x261f6 0x10224>                                              {[##1953]}
                KC12_Sleep(dur: Long)
            <POP 261fc-261fe StackAdj>                       Δ+4                {}
            <MI 261fe  ADDQ.L  #0x1,D7>                                         {}
        <POP 26200-26208 Naked>                              Σ0         ↓ →0x2620c ←0x261ee
            <MI 26200  CMPI.L  #0x00000258,D7>                                  {}
            <MI 26206  BEQ     0x2620c>                                         {}
        <POP 26208-2620c Naked>                              Σ0         ↓ →0x261ca
            <MI 26208  TST.B   D6>                                              {}
            <MI 2620a  BEQ     0x261ca>                                         {}
        <POP 2620c-26210 Naked>                              Σ0         ↓ →0x2621a ←0x26200
            <MI 2620c  TST.B   D6>                                              {}
            <MI 2620e  BNE     0x2621a>                                         {}
        <POP 26210-2621a Naked>                              Σ0         ↓
            <Const 0x26210 0x2f.4>                           Δ-4                {[##47]}
            <Call 0x26214 0x2132c>                                              {[##47]}
            <POP 26218-2621a StackAdj>                       Δ+4                {}
        <POP 2621a-26222 Epilogue>                           Σ0         ←0x2620c

0x26222


@ 26222
    <POP 26222-26402 Body>                                              
        <POP 26222-26238 Prologue>                           Σ0         ↓
        <POP 26238-26256 RegCacheLoad>                       Σ0         ↓
        <POP 26256-262a8 Naked>                              Σ0         ↓ →0x26362
            <Blob 0x26256 [28] @>                            Δ-28               {[«28""»]}
            <Const 0x26266 0x1.2>                            Δ-2                {[«28""»]|[#1]}
            <POP 26268-2626a StackAdj>                       Δ-4                {[«28""»]|[#1]|[-4-]}
            <Lit 0x2626a 27>                                                    {[«28""»]|[#1]|[$$Procedure GET_SOME_ENP_DATA]}
            <Call 0x2627a 0x22238>                                              {[«28""»]|[#1]|[$$Procedure GET_SOME_ENP_DATA]}
            <POP 2627e-26282 StackAdj>                       Δ+34               {}
            <Call 0x26282 0x26190>                                              {}
            <Blob 0x26286 [4] 0x2c7c4>                       Δ-4                {[«4»]}
            <Const 0x26288 0x1.2>                            Δ-2                {[«4»]|[#1]}
            <Const 0x2628a 0x1.4>                            Δ-4                {[«4»]|[#1]|[##1]}
            <MI 2628e  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#1]|[##1]|[#0]}
            <Call 0x26290 0x24cca>                                              {[«4»]|[#1]|[##1]|[#0]}
            <POP 26294-26298 StackAdj>                       Δ+12               {}
            <MI 26298  CLR.L   D0>                                              {}
            <MI 2629a  MOVE.B  0x2c7e7,D0>                                      {}
            <MI 262a0  CMPI.W  #0x00ff,D0>                                      {}
            <MI 262a4  BNE     0x26362>                                         {}
        <POP 262a8-262b4 Naked>                              Σ0         ↓ →0x2630a
            <MI 262a8  CLR.L   D0>                                              {}
            <MI 262aa  MOVE.B  0x2cc2e,D0>                                      {}
            <MI 262b0  CMP.W   #0x01,D0>                                        {}
            <MI 262b2  BEQ     0x2630a>                                         {}
        <POP 262b4-262ba Naked>                              Σ0         ↓ →0x2630a
            <MI 262b4  CMPI.W  #0x0003,D0>                                      {}
            <MI 262b8  BEQ     0x2630a>                                         {}
        <POP 262ba-2630a Naked>                              Σ0         ↓
            <Blob 0x262ba [28] @>                            Δ-28               {[«28""»]}
            <POP 262ca-262cc StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x262cc 27>                                                    {[«28""»]|[$$Unexpected buffer received.]}
            <Call 0x262dc 0x103e0>                                              {[«28""»]|[$$Unexpected buffer received.]}
                WriteConsoleStringCrLf(str : String)
            <POP 262e2-262e4 StackAdj>                       Δ+28               {[-4-]}
            <POP 262e4-262e5 StackAdj>                       Δ+4                {}
            <Blob 0x262e5 [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x262ea [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x262f0 [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x262f6 [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x262fc 0x21c90>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 26300-26302 StackAdj>                       Δ+16               {}
            <Const 0x26302 0x2e.4>                           Δ-4                {[##46]}
            <Call 0x26306 0x2132c>                                              {[##46]}
            <POP 26308-2630a StackAdj>                       Δ+4                {}
        <POP 2630a-2630e Naked>                              Σ0         ↓ →0x26316 ←0x262a8 ←0x262b4
            <MI 2630a  TST.L   0x2d8ba>                                         {}
            <MI 2630c  BEQ     0x26316>                                         {}
        <POP 2630e-26316 Naked>                              Σ0         ↓
            <Const 0x2630e 0x30.4>                           Δ-4                {[##48]}
            <Call 0x26312 0x2132c>                                              {[##48]}
            <POP 26314-26316 StackAdj>                       Δ+4                {}
        <POP 26316-26362 Naked>                              Σ0         →0x263e8 ←0x2630a
            <MI 26316  CLR.L   D0>                                              {}
            <MI 26318  MOVE.B  0x2cc1b,D0>                                      {}
            <MI 2631e  ASL.W   #0x8,D0>                                         {}
            <MI 26320  CLR.L   D1>                                              {}
            <MI 26322  MOVE.B  0x2cc1c,D1>                                      {}
            <MI 26328  ADD.W   D0,D1>                                           {}
            <MI 2632a  EXTW.L  D1>                                              {}
            <MI 2632c  MOVE.L  D1,0x2e1be>                                      {}
            <MI 26332  MOVE.L  #0x1c,0x2d020>                                   {}
            <MI 26338  CLR.L   D0>                                              {}
            <MI 2633a  MOVE.B  0x2c7db,D0>                                      {}
            <MI 26340  ASL.W   #0x3,D0>                                         {}
            <MI 26342  CLR.L   D2>                                              {}
            <MI 26344  MOVE.B  0x2c7dc,D2>                                      {}
            <MI 2634a  NEG.W   D2>                                              {}
            <MI 2634c  ADD.W   D0,D2>                                           {}
            <MI 2634e  SUB.W   #0x1c,D2>                                        {}
            <MI 26350  EXTW.L  D2>                                              {}
            <MI 26352  MOVE.L  D2,0x2d01c>                                      {}
            <MI 26358  NEG.L   D2>                                              {}
            <MI 2635a  ADD.L   D1,D2>                                           {}
            <MI 2635c  MOVE.L  D2,0x2d8ba>                                      {}
            <MI 2635e  BRA     0x263e8>                                         {}
        <POP 26362-26368 Naked>                              Σ0         ↓ →0x2638e ←0x26256
            <MI 26362  EXTW.L  D0>                                              {}
            <MI 26364  CMP.L   0x2c7c4,D0>                                      {}
            <MI 26366  BEQ     0x2638e>                                         {}
        <POP 26368-2638e Naked>                              Σ0         ↓
            <Blob 0x26368 [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x2636e [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x26374 [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x2637a [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x26380 0x21c32>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 26384-26386 StackAdj>                       Δ+16               {}
            <Const 0x26386 0x31.4>                           Δ-4                {[##49]}
            <Call 0x2638a 0x2132c>                                              {[##49]}
            <POP 2638c-2638e StackAdj>                       Δ+4                {}
        <POP 2638e-263b6 Naked>                              Σ0         ↓ →0x263e8 ←0x26362
            <MI 2638e  CLR.L   D0>                                              {}
            <MI 26390  MOVE.B  0x2c7db,D0>                                      {}
            <MI 26396  ASL.W   #0x3,D0>                                         {}
            <MI 26398  CLR.L   D1>                                              {}
            <MI 2639a  MOVE.B  0x2c7dc,D1>                                      {}
            <MI 263a0  NEG.W   D1>                                              {}
            <MI 263a2  ADD.W   D0,D1>                                           {}
            <MI 263a4  EXTW.L  D1>                                              {}
            <MI 263a6  MOVE.L  D1,0x2d01c>                                      {}
            <MI 263ac  CLR.L   0x2d020>                                         {}
            <MI 263b2  TST.L   0x2d8ba>                                         {}
            <MI 263b4  BEQ     0x263e8>                                         {}
        <POP 263b6-263bc Naked>                              Σ0         ↓ →0x263c8
            <MI 263b6  MOVE.L  0x2d8ba,D0>                                      {}
            <MI 263b8  CMP.L   #0x400,D0>                                       {}
            <MI 263ba  BLT     0x263c8>                                         {}
        <POP 263bc-263c0 Naked>                              Σ0         ↓ →0x263c8
            <MI 263bc  CMP.L   #0x400,D1>                                       {}
            <MI 263be  BEQ     0x263c8>                                         {}
        <POP 263c0-263c8 Naked>                              Σ0         ↓
            <Const 0x263c0 0x32.4>                           Δ-4                {[##50]}
            <Call 0x263c4 0x2132c>                                              {[##50]}
            <POP 263c6-263c8 StackAdj>                       Δ+4                {}
        <POP 263c8-263ce Naked>                              Σ0         ↓ →0x263de ←0x263b6 ←0x263bc
            <MI 263c8  MOVE.L  0x2d8ba,D0>                                      {}
            <MI 263ca  CMP.L   #0x400,D0>                                       {}
            <MI 263cc  BGE     0x263de>                                         {}
        <POP 263ce-263d6 Naked>                              Σ0         ↓ →0x263de
            <MI 263ce  CMP.L   0x2d01c,D0>                                      {}
            <MI 263d4  BEQ     0x263de>                                         {}
        <POP 263d6-263de Naked>                              Σ0         ↓
            <Const 0x263d6 0x33.4>                           Δ-4                {[##51]}
            <Call 0x263da 0x2132c>                                              {[##51]}
            <POP 263dc-263de StackAdj>                       Δ+4                {}
        <POP 263de-263e8 Naked>                              Σ0         ↓ ←0x263c8 ←0x263ce
            <MI 263de  MOVE.L  0x2d8ba,D0>                                      {}
            <MI 263e0  SUB.L   0x2d01c,D0>                                      {}
            <MI 263e6  MOVE.L  D0,0x2d8ba>                                      {}
        <POP 263e8-263fa Naked>                              Σ0         ↓ ←0x26316 ←0x2638e
            <MI 263e8  MOVE.L  0x2e1c2,D0>                                      {}
            <MI 263ee  ADD.L   0x2d01c,D0>                                      {}
            <MI 263f4  MOVE.L  D0,0x2e1c2>                                      {}
        <POP 263fa-26402 Epilogue>                           Σ0         

0x26402


@ 26402
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 26402-2649e Body>                                              
        <POP 26402-26418 Prologue>                           Σ0         ↓
        <POP 26418-26420 RegCacheLoad>                       Σ0         ↓
        <POP 26420-26450 Naked>                              Σ0         ↓
            <Blob 0x26420 [28] @>                            Δ-28               {[«28""»]}
            <Const 0x26432 0x1.2>                            Δ-2                {[«28""»]|[#1]}
            <POP 26434-26436 StackAdj>                       Δ-4                {[«28""»]|[#1]|[-4-]}
            <Lit 0x26436 27>                                                    {[«28""»]|[#1]|[$$Procedure GET_BUFFERED_DATA]}
            <Call 0x26448 0x22238>                                              {[«28""»]|[#1]|[$$Procedure GET_BUFFERED_DATA]}
            <POP 2644c-26450 StackAdj>                       Δ+34               {}
        <POP 26450-2648c Naked>                              Σ0         ↓ →0x26496 ←0x2648c
            <MI 26450  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 26454  MOVEA.L (A6+0x8),A1>                                     {}
            <MI 26458  MOVE.L  (A1),D0>                                         {}
            <POP 0x2645a LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {}
            <MI 26464  MOVE.L  0x2d020,D1>                                      {}
            <POP 0x26466 LimitCheck 0x0 ≤ D1 ≤ 0x3ff>                           {}
            <MI 26470  LEA.L   0x2c794,A2>                                      {}
            <MI 26476  LEA.L   (A2+D1.L),A2>                                    {}
            <MI 2647a  MOVE.B  (A2+0x47f),(A0+D0.L)>                            {}
            <MI 26480  ADDQ.L  #0x1,0x2d020>                                    {}
            <MI 26482  ADDQ.L  #0x1,(A1)>                                       {}
            <MI 26484  SUBQ.L  #0x1,0x2d01c>                                    {}
            <MI 2648a  BEQ     0x26496>                                         {}
        <POP 2648c-26496 Naked>                              Σ0         ↓ →0x26450
            <MI 2648c  MOVE.L  (A1),D0>                                         {}
            <MI 2648e  CMPI.L  #0x00000400,D0>                                  {}
            <MI 26494  BNE     0x26450>                                         {}
        <POP 26496-2649e Epilogue>                           Σ0         ←0x26450

0x2649e


@ 2649e
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x408 @>
    <POP 2649e-26526 Body>                                              
        <POP 2649e-264b4 Prologue>                           Σ0         ↓
        <POP 264b4-264ba RegCacheLoad>                       Σ0         ↓
        <POP 264ba-264e6 Naked>                              Σ0         ↓
            <Blob 0x264ba [32] @>                            Δ-32               {[«32""»]}
            <Const 0x264c6 0x1.2>                            Δ-2                {[«32""»]|[#1]}
            <POP 264c8-264ca StackAdj>                       Δ-4                {[«32""»]|[#1]|[-4-]}
            <Lit 0x264ca 32>                                                    {[«32""»]|[#1]|[$$Procedure GET_A_PAGE_FROM_ENP100]}
            <Call 0x264dc 0x22238>                                              {[«32""»]|[#1]|[$$Procedure GET_A_PAGE_FROM_ENP100]}
            <POP 264e0-264e4 StackAdj>                       Δ+38               {}
            <MI 264e4  CLR.L   (A6-0x8)>                                        {}
        <POP 264e6-264ee Naked>                              Σ0         ↓ →0x264fc ←0x26500
            <MI 264e6  TST.L   0x2d01c>                                         {}
            <MI 264ec  BEQ     0x264fc>                                         {}
        <POP 264ee-264fc Naked>                              Σ0         →0x26500
            <Pointer.fp 0x264ee <LVAR -0x408 @>>             Δ-4                {[@@-1032]}
            <Pointer.fp 0x264f2 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-1032]|[@@-8]}
            <Call 0x264f4 0x26402>                                              {[@@-1032]|[@@-8]}
            <POP 264f8-264fa StackAdj>                       Δ+8                {}
            <MI 264fa  BRA     0x26500>                                         {}
        <POP 264fc-26500 Naked>                              Σ0         ↓ ←0x264e6
            <Call 0x264fc 0x26222>                                              {}
        <POP 26500-2650a Naked>                              Σ0         ↓ →0x264e6 ←0x264ee
            <MI 26500  MOVE.L  (A6-0x8),D0>                                     {}
            <MI 26502  CMPI.L  #0x00000400,D0>                                  {}
            <MI 26508  BNE     0x264e6>                                         {}
        <POP 2650a-2651e Naked>                              Σ0         ↓
            <MI 2650a  LEA.L   0x2d43a,A0>                                      {}
            <MI 26510  LEA.L   (A6-0x408),A1>                                   {}
            <BlockMove 1024,A1,A0>                                              {}
        <POP 2651e-26526 Epilogue>                           Σ0         

0x26526


@ 26526
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @>
        <LVAR -0x044 @>
        <LVAR -0x045 @ 1(r)>
        <LVAR -0x062 2(w)>
        <LVAR -0x063 1(r)>
        <LVAR -0x064 1(r)>
        <LVAR -0x065 1(r)>
        <LVAR -0x066 1(r) 4(w)>
        <LVAR -0x067 1(rw)>
        <LVAR -0x068 1(rw)>
        <LVAR -0x06a 2(w)>
        <LVAR -0x06c 2(rw)>
        <LVAR -0x08a @>
        <LVAR -0x08e @ 4(rw)>
        <LVAR -0x094 @ 1(r)>
        <LVAR -0x098 @ 4(r)>
        <LVAR -0x09c @ 4(r)>
    <POP 26526-26b42 Body>                                   Δ+4        
        <POP 26526-2653c Prologue>                           Σ0         ↓
        <POP 2653c-26552 RegCacheLoad>                       Σ0         ↓
        <POP 26552-2658c Naked>                              Σ0         ↓ →0x265c8
            <Blob 0x26552 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x26556 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <MI 2655a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']}
            <POP 2655e-26560 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x26560 8>                                                     {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]}
            <POP 2656c-2656e StackAdj>                       Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]|[-2-]}
            <POP 2656e-2656f StackAdj>                       Δ+2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]}
            <Const 0x2656f 0x1.2>                            Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]|[#1]}
            <Const 0x26570 0x2c7ea.4>                        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]|[#1]|[##182250]}
            <Const 0x26576 0x2c7ca.4>                        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]|[#1]|[##182250]|[##182218]}
            <Call 0x2657c 0x21cee>                                              {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$DFS_NAME]|[#1]|[##182250]|[##182218]}
            <POP 26580-26584 StackAdj>                       Δ+26               {}
            <MI 26584  TST.B   0x2c7ea>                                         {}
            <MI 2658a  BNE     0x265c8>                                         {}
        <POP 2658c-265c8 Naked>                              Σ0         ↓
            <POP 2658c-2658e StackAdj>                       Δ-4                {[-4-]}
            <POP 2658e-2658f StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2658f [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 26592  MOVE.B  0x20cef,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 26598  MOVE.B  0x20cf0,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 2659e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']}
            <POP 265a2-265a4 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x265a4>                                                       {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
                <Pointer.sp 0x265a4 8>                       Δ-4        
                <Const 0x265a8 0x1.2>                        Δ-2        
                <Const 0x265aa 0x3.2>                        Δ-2        
                <Call 0x265ae 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 265b0-265b2 StackAdj>                   Δ+8        
            <POP 265b0-265b2 StackAdj>                       Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
            <POP 265b2-265b3 StackAdj>                       Δ+2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
            <Const 0x265b3 0x1.2>                            Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]}
            <Const 0x265b4 0x2c7ea.4>                        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##182250]}
            <Const 0x265ba 0x2c7ca.4>                        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##182250]|[##182218]}
            <Call 0x265c0 0x21cee>                                              {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##182250]|[##182218]}
            <POP 265c4-265c8 StackAdj>                       Δ+22               {}
        <POP 265c8-265d0 Naked>                              Σ0         ↓ →0x265fe ←0x26552
            <MI 265c8  TST.B   0x2c7ea>                                         {}
            <MI 265ce  BNE     0x265fe>                                         {}
        <POP 265d0-265fe Naked>                              Σ0         ↓
            <Blob 0x265d0 [22] @>                            Δ-22               {[«22""»]}
            <POP 265dc-265de StackAdj>                       Δ-8                {[«22""»]|[-8-]}
            <Lit 0x265de 22>                                                    {[«22""»]|[-4-]|[$$Enter DFS file name :_]}
            <Call 0x265ec 0x103e4>                                              {[«22""»]|[-4-]|[$$Enter DFS file name :_]}
                AskConsoleString(prompt : String) : String
            <POP 265f2-265f4 StackAdj>                       Δ+4                {[«22""»]|[-4-]}
            <MI 265f4  MOVE.L  (A7)+,0x2c7ca>                Δ+4                {[«22""»]}
            <POP 265fa-265fe StackAdj>                       Δ+22               {}
        <POP 265fe-26602 Naked>                              Σ0         ↓ ←0x265c8
            <MI 265fe  MOVEQ.L #0x01,D5>                                        {}
            <MI 26600  MOVEQ.L #0x01,D7>                                        {}
        <POP 26602-26620 Naked>                              Σ0         ↓ →0x26602 ←0x26602
            <MI 26602  MOVE.L  D7,D0>                                           {}
            <MI 26604  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x26606 LimitCheck 0x0 ≤ D0 ≤ 0x3f>                            {}
            <MI 26610  LEA.L   (A6-0x9c),A0>                                    {}
            <MI 26612  CLR.B   (A0+D0.L+#0x58)>                                 {}
            <MI 26616  ADDQ.L  #0x1,D7>                                         {}
            <MI 26618  CMPI.L  #0x00000040,D7>                                  {}
            <MI 2661e  BLE     0x26602>                                         {}
        <POP 26620-2663e Naked>                              Σ0 Δ-4     ↓
            <MI 26620  LEA.L   (A6-0x8a),A0>                                    {}
            <MI 26624  LEA.L   (A6-0x44),A1>                                    {}
            <BlockMove 64,A1,A0>                                                {}
            <MI 26630  MOVEA.L 0x2c7ca,A0>                                      {}
            <MI 26636  MOVE.W  (A0),D0>                                         {}
            <MI 26638  EXTW.L  D0>                                              {}
            <MI 2663a  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2663c  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 2663e-26642 Naked>                              Σ-4        ↓ →0x26670 ←0x26642
            <MI 2663e  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 26640  BGT     0x26670>                                         {[-4-]}
        <POP 26642-26670 Naked>                              Σ-4        ↓ →0x2663e
            <MI 26642  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 26644  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x26646 LimitCheck 0x0 ≤ D0 ≤ 0x1d>                            {[-4-]}
            <MI 26650  LEA.L   (A6-0x9c),A0>                                    {[-4-]}
            <MI 26652  MOVEA.L 0x2c7ca,A1>                                      {[-4-]}
            <MI 26658  MOVE.L  D7,D1>                                           {[-4-]}
            <MI 2665a  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x2665c LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 26666  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x12)>                  {[-4-]}
            <MI 2666c  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 2666e  BVC     0x2663e>                                         {[-4-]}
        <POP 26670-266ae Naked>                              Σ-4 Δ+4    ↓ →0x266ba ←0x2663e
            <POP 26670-26672 StackAdj>                       Δ+4                {}
            <MI 26672  CLR.B   0x2c7ea>                                         {}
            <Const 0x26678 0x2c7ca.4>                        Δ-4                {[##182218]}
            <Call 0x2667e 0x102bc>                                              {[##182218]}
                FreeString(VAR a : String)
            <POP 26684-26686 StackAdj>                       Δ+2                {[-2-]}
            <POP 26686-26687 StackAdj>                       Δ+2                {}
            <Blob 0x26687 [2] @>                             Δ-2                {[«2""»]}
            <MI 2668a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 2668e-26690 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x26690 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$K ]}
            <POP 2669a-2669c StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$K ]|[-2-]}
            <MI 2669c  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$K ]|[-2-]}
            <Const 0x2669e 0x2c7eb.4>                        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$K ]|[-2-]|[##182251]}
            <Pointer.fp 0x266a0 <LVAR -0x004 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$K ]|[-2-]|[##182251]|[@@-4]}
            <Call 0x266a4 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$K ]|[-2-]|[##182251]|[@@-4]}
            <POP 266a8-266aa StackAdj>                       Δ+20               {}
            <MI 266aa  TST.B   0x2c7eb>                                         {}
            <MI 266ac  BEQ     0x266ba>                                         {}
        <POP 266ae-266ba Naked>                              Σ0         →0x2679a
            <MI 266ae  MOVE.B  #0x4b,0x2c7ce>                                   {}
            <MI 266b6  BRA     0x2679a>                                         {}
        <POP 266ba-266e2 Naked>                              Σ0         ↓ →0x266ee ←0x26670
            <Blob 0x266ba [2] @>                             Δ-2                {[«2""»]}
            <MI 266be  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 266c2-266c4 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x266c4 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$P ]}
            <POP 266ce-266d0 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$P ]|[-2-]}
            <MI 266d0  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$P ]|[-2-]}
            <Const 0x266d2 0x2c7eb.4>                        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$P ]|[-2-]|[##182251]}
            <Pointer.fp 0x266d4 <LVAR -0x004 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$P ]|[-2-]|[##182251]|[@@-4]}
            <Call 0x266d8 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$P ]|[-2-]|[##182251]|[@@-4]}
            <POP 266dc-266de StackAdj>                       Δ+20               {}
            <MI 266de  TST.B   0x2c7eb>                                         {}
            <MI 266e0  BEQ     0x266ee>                                         {}
        <POP 266e2-266ee Naked>                              Σ0         →0x2679a
            <MI 266e2  MOVE.B  #0x50,0x2c7ce>                                   {}
            <MI 266ea  BRA     0x2679a>                                         {}
        <POP 266ee-26716 Naked>                              Σ0         ↓ →0x26720 ←0x266ba
            <Blob 0x266ee [2] @>                             Δ-2                {[«2""»]}
            <MI 266f2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 266f6-266f8 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x266f8 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$T ]}
            <POP 26702-26704 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$T ]|[-2-]}
            <MI 26704  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$T ]|[-2-]}
            <Const 0x26706 0x2c7eb.4>                        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$T ]|[-2-]|[##182251]}
            <Pointer.fp 0x26708 <LVAR -0x004 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$T ]|[-2-]|[##182251]|[@@-4]}
            <Call 0x2670c 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$T ]|[-2-]|[##182251]|[@@-4]}
            <POP 26710-26712 StackAdj>                       Δ+20               {}
            <MI 26712  TST.B   0x2c7eb>                                         {}
            <MI 26714  BEQ     0x26720>                                         {}
        <POP 26716-26720 Naked>                              Σ0         →0x2679a
            <MI 26716  MOVE.B  #0x54,0x2c7ce>                                   {}
            <MI 2671e  BRA     0x2679a>                                         {}
        <POP 26720-2677c Naked>                              Σ0         ↓ →0x2679a ←0x266ee ←0x26794
            <Blob 0x26720 [30] @>                            Δ-30               {[«30""»]}
            <POP 26732-26734 StackAdj>                       Δ-8                {[«30""»]|[-8-]}
            <Lit 0x26734 29>                                                    {[«30""»]|[-4-]|[$$Enter DFS filetype [K/P/T] :_]}
            <Call 0x26742 0x103e4>                                              {[«30""»]|[-4-]|[$$Enter DFS filetype [K/P/T] :_]}
                AskConsoleString(prompt : String) : String
            <POP 26748-2674a StackAdj>                       Δ+4                {[«30""»]|[-4-]}
            <MI 2674a  MOVE.L  (A7)+,0x2c7d0>                Δ+4                {[«30""»]}
            <POP 26750-26754 StackAdj>                       Δ+30               {}
            <MI 26754  MOVEA.L 0x2c7d0,A0>                                      {}
            <MI 2675a  MOVE.B  (A0+0x2),0x2c7ce>                                {}
            <Const 0x26762 0x2c7d0.4>                        Δ-4                {[##182224]}
            <Call 0x26768 0x102bc>                                              {[##182224]}
                FreeString(VAR a : String)
            <POP 2676e-26770 StackAdj>                       Δ+4                {}
            <MI 26770  MOVE.B  0x2c7ce,D0>                                      {}
            <MI 26776  CMPI.B  #0x6b,D0>                                        {}
            <MI 2677a  BEQ     0x2679a>                                         {}
        <POP 2677c-26782 Naked>                              Σ0         ↓ →0x2679a
            <MI 2677c  CMPI.B  #0x4b,D0>                                        {}
            <MI 26780  BEQ     0x2679a>                                         {}
        <POP 26782-26788 Naked>                              Σ0         ↓ →0x2679a
            <MI 26782  CMPI.B  #0x70,D0>                                        {}
            <MI 26786  BEQ     0x2679a>                                         {}
        <POP 26788-2678e Naked>                              Σ0         ↓ →0x2679a
            <MI 26788  CMPI.B  #0x50,D0>                                        {}
            <MI 2678c  BEQ     0x2679a>                                         {}
        <POP 2678e-26794 Naked>                              Σ0         ↓ →0x2679a
            <MI 2678e  CMPI.B  #0x74,D0>                                        {}
            <MI 26792  BEQ     0x2679a>                                         {}
        <POP 26794-2679a Naked>                              Σ0         ↓ →0x26720
            <MI 26794  CMPI.B  #0x54,D0>                                        {}
            <MI 26798  BNE     0x26720>                                         {}
        <POP 2679a-267c0 Naked>                              Σ0         ↓ →0x267c6 ←0x266ae ←0x266e2 ←0x26716 ←0x26720 ←0x2677c ←0x26782 ←0x26788 ←0x2678e
            <MI 2679a  MOVE.L  0x2c7d6,D0>                                      {}
            <POP 0x267a0 LimitCheck 0x0 ≤ D0 ≤ 0x4000>                          {}
            <MI 267aa  MOVE.W  D0,(A6-0x6c)>                                    {}
            <MI 267ae  MOVE.W  #0x400,(A6-0x6a)>                                {}
            <MI 267b4  MOVE.B  0x2c7ce,D0>                                      {}
            <MI 267ba  CMPI.B  #0x6b,D0>                                        {}
            <MI 267be  BEQ     0x267c6>                                         {}
        <POP 267c0-267c6 Naked>                              Σ0         ↓ →0x267ce
            <MI 267c0  CMPI.B  #0x4b,D0>                                        {}
            <MI 267c4  BNE     0x267ce>                                         {}
        <POP 267c6-267ce Naked>                              Σ0         ↓ ←0x2679a
            <MI 267c6  MOVE.B  #0x01,(A6-0x67)>                                 {}
            <MI 267ca  MOVE.B  #0x01,(A6-0x68)>                                 {}
        <POP 267ce-267da Naked>                              Σ0         ↓ →0x267e0 ←0x267c0
            <MI 267ce  MOVE.B  0x2c7ce,D0>                                      {}
            <MI 267d4  CMPI.B  #0x70,D0>                                        {}
            <MI 267d8  BEQ     0x267e0>                                         {}
        <POP 267da-267e0 Naked>                              Σ0         ↓ →0x267e4
            <MI 267da  CMPI.B  #0x50,D0>                                        {}
            <MI 267de  BNE     0x267e4>                                         {}
        <POP 267e0-267e4 Naked>                              Σ0         ↓ ←0x267ce
            <MI 267e0  MOVE.B  #0x01,(A6-0x67)>                                 {}
        <POP 267e4-26874 Naked>                              Σ0         ↓ →0x2691e ←0x267da
            <MI 267e4  CLR.B   0x2c7eb>                                         {}
            <Pointer.fp 0x267e6 <LVAR -0x098 @ 4(r)>>        Δ-4                {[@@-152]}
            <Call 0x267ea 0x10304>                                              {[@@-152]}
                GetRtc() : TimeStamp
            <POP 267f0-267f2 StackAdj>                       Δ+4                {}
            <MI 267f2  MOVE.L  (A6-0x98),(A6-0x66)>                             {}
            <MI 267f8  MOVE.W  #0x01,(A6-0x62)>                                 {}
            <Blob 0x267fc [30] (A6-0x6c)>                    Δ-30               {[«30»]}
            <POP 26808-2680a StackAdj>                       Δ-4                {[«30»]|[-4-]}
            <Lit 0x2680a>                                                       {[«30»]|[$$…]}
                <Pointer.sp 0x2680a 4>                       Δ-4        
                <Const 0x2680e 0x1.2>                        Δ-2        
                <Const 0x26810 0x1e.2>                       Δ-2        
                <Call 0x26814 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 26816-26818 StackAdj>                   Δ+8        
            <MI 26818  MOVE.L  (A7)+,(A6-0x8e)>              Δ+4                {[«30»]}
            <POP 2681c-26820 StackAdj>                       Δ+26               {[-4-]}
            <MI 26820  MOVE.L  (A6-0x8e),(A7)>                                  {[4, '(A6-0x8e)']}
            <MI 26824  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0x8e)']|[#0]}
            <MI 26826  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0x8e)']|[#0]|[#0]}
            <Const 0x26828 0x1.4>                            Δ-4                {[4, '(A6-0x8e)']|[#0]|[#0]|[##1]}
            <Pointer.fp 0x2682c <LVAR -0x094 @ 1(r)>>        Δ-4                {[4, '(A6-0x8e)']|[#0]|[#0]|[##1]|[@@-148]}
            <Pointer.fp 0x26830 <LVAR -0x09c @ 4(r)>>        Δ-4                {[4, '(A6-0x8e)']|[#0]|[#0]|[##1]|[@@-148]|[@@-156]}
            <Call 0x26832 0x10380>                                              {[4, '(A6-0x8e)']|[#0]|[#0]|[##1]|[@@-148]|[@@-156]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 26838-2683a StackAdj>                       Δ+20               {}
            <Pointer.fp 0x2683a <LVAR -0x08e @ 4(rw)>>       Δ-4                {[@@-142]}
            <Call 0x2683e 0x102bc>                                              {[@@-142]}
                FreeString(VAR a : String)
            <POP 26844-26846 StackAdj>                       Δ+2                {[-2-]}
            <POP 26846-26847 StackAdj>                       Δ+2                {}
            <Blob 0x26847 [2] @>                             Δ-2                {[«2""»]}
            <MI 2684a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 2684e-26850 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x26850 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$O ]}
            <POP 2685a-2685c StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$O ]|[-2-]}
            <MI 2685c  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$O ]|[-2-]}
            <Pointer.fp 0x2685e <LVAR -0x045 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$O ]|[-2-]|[@@-69]}
            <Pointer.fp 0x26862 <LVAR -0x004 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$O ]|[-2-]|[@@-69]|[@@-4]}
            <Call 0x26866 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$O ]|[-2-]|[@@-69]|[@@-4]}
            <POP 2686a-2686c StackAdj>                       Δ+20               {}
            <MI 2686c  TST.B   (A6-0x94)>                                       {}
            <MI 26870  BNE     0x2691e>                                         {}
        <POP 26874-2687a Naked>                              Σ0         ↓ →0x268a4
            <MI 26874  TST.B   (A6-0x45)>                                       {}
            <MI 26878  BEQ     0x268a4>                                         {}
        <POP 2687a-26886 Naked>                              Σ0         ↓ →0x2688a
            <MI 2687a  MOVEA.L (A6-0x9c),A0>                                    {}
            <MI 2687c  MOVE.B  (A0+0x3f),D0>                                    {}
            <MI 26880  LSL.B   #0x7,D0>                                         {}
            <MI 26882  LSR.B   #0x7,D0>                                         {}
            <MI 26884  BEQ     0x2688a>                                         {}
        <POP 26886-2688a Naked>                              Σ0 Δ-2     →0x2688c
            <MI 26886  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 26888  BRA     0x2688c>                                         {[#0]}
        <POP 2688a-2688c Naked>                              Σ0 Δ-2     ↓ ←0x2687a
            <Const 0x2688a 0x2.2>                            Δ-2                {[#2]}
        <POP 2688c-268a4 Naked>                              Σ-2 Δ+2    →0x2691c ←0x26886
            <Const 0x2688c 0x1.2>                            Δ-2                {[-2-]|[#1]}
            <Const 0x2688e 0x1.4>                            Δ-4                {[-2-]|[#1]|[##1]}
            <Pointer.fp 0x26892 <LVAR -0x094 @ 1(r)>>        Δ-4                {[-2-]|[#1]|[##1]|[@@-148]}
            <Pointer.fp 0x26896 <LVAR -0x09c @ 4(r)>>        Δ-4                {[-2-]|[#1]|[##1]|[@@-148]|[@@-156]}
            <Call 0x26898 0x1038c>                                              {[-2-]|[#1]|[##1]|[@@-148]|[@@-156]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 2689e-268a2 StackAdj>                       Δ+16               {}
            <MI 268a2  BRA     0x2691c>                                         {}
        <POP 268a4-268d4 Naked>                              Σ0 Δ-24    ↓ →0x268fe ←0x26874
            <Blob 0x268a4 [24] @>                            Δ-24               {[«24""»]}
            <POP 268b6-268b8 StackAdj>                       Δ-6                {[«24""»]|[-6-]}
            <Lit 0x268b8 23>                                                    {[«24""»]|[-2-]|[$$Overwrite existing file]}
            <POP 268c4-268c6 StackAdj>                       Δ-2                {[«24""»]|[-2-]|[$$Overwrite existing file]|[-2-]}
            <POP 268c6-268c7 StackAdj>                       Δ+2                {[«24""»]|[-2-]|[$$Overwrite existing file]}
            <Const 0x268c7 0x1.2>                            Δ-2                {[«24""»]|[-2-]|[$$Overwrite existing file]|[#1]}
            <Call 0x268c8 0x103f0>                                              {[«24""»]|[-2-]|[$$Overwrite existing file]|[#1]}
                AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
            <POP 268ce-268d0 StackAdj>                       Δ+6                {[«24""»]|[-2-]}
            <MI 268d0  TST.B   (A7)+>                        Δ+2                {[«24""»]}
            <MI 268d2  BEQ     0x268fe>                                         {[«24""»]}
        <POP 268d4-268e0 Naked>                              Σ-24       ↓ →0x268e4
            <MI 268d4  MOVEA.L (A6-0x9c),A0>                                    {[-24-]}
            <MI 268d6  MOVE.B  (A0+0x3f),D0>                                    {[-24-]}
            <MI 268da  LSL.B   #0x7,D0>                                         {[-24-]}
            <MI 268dc  LSR.B   #0x7,D0>                                         {[-24-]}
            <MI 268de  BEQ     0x268e4>                                         {[-24-]}
        <POP 268e0-268e4 Naked>                              Σ-24 Δ-2   →0x268e6
            <MI 268e0  CLR.B   -(A7)>                        Δ-2                {[-24-]|[#0]}
            <MI 268e2  BRA     0x268e6>                                         {[-24-]|[#0]}
        <POP 268e4-268e6 Naked>                              Σ-24 Δ-2   ↓ ←0x268d4
            <Const 0x268e4 0x2.2>                            Δ-2                {[-24-]|[#2]}
        <POP 268e6-268fe Naked>                              Σ-26 Δ+2   →0x26918 ←0x268e0
            <Const 0x268e6 0x1.2>                            Δ-2                {[-26-]|[#1]}
            <Const 0x268e8 0x1.4>                            Δ-4                {[-26-]|[#1]|[##1]}
            <Pointer.fp 0x268ec <LVAR -0x094 @ 1(r)>>        Δ-4                {[-26-]|[#1]|[##1]|[@@-148]}
            <Pointer.fp 0x268f0 <LVAR -0x09c @ 4(r)>>        Δ-4                {[-26-]|[#1]|[##1]|[@@-148]|[@@-156]}
            <Call 0x268f2 0x1038c>                                              {[-26-]|[#1]|[##1]|[@@-148]|[@@-156]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 268f8-268fc StackAdj>                       Δ+16               {[-24-]}
            <MI 268fc  BRA     0x26918>                                         {[-24-]}
        <POP 268fe-26918 Naked>                              Σ-24       ↓ ←0x268a4
            <MI 268fe  CLR.B   -(A7)>                        Δ-2                {[-24-]|[#0]}
            <Const 0x26900 0x1.2>                            Δ-2                {[-24-]|[#0]|[#1]}
            <Const 0x26902 0x1.4>                            Δ-4                {[-24-]|[#0]|[#1]|[##1]}
            <Pointer.fp 0x26906 <LVAR -0x094 @ 1(r)>>        Δ-4                {[-24-]|[#0]|[#1]|[##1]|[@@-148]}
            <Pointer.fp 0x2690a <LVAR -0x09c @ 4(r)>>        Δ-4                {[-24-]|[#0]|[#1]|[##1]|[@@-148]|[@@-156]}
            <Call 0x2690c 0x1038c>                                              {[-24-]|[#0]|[#1]|[##1]|[@@-148]|[@@-156]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 26912-26916 StackAdj>                       Δ+16               {[-24-]}
            <MI 26916  MOVEQ.L #0x00,D5>                                        {[-24-]}
        <POP 26918-2691c Naked>                              Σ-24 Δ+24  ↓ ←0x268e6
            <POP 26918-2691c StackAdj>                       Δ+24               {}
        <POP 2691c-2691e Naked>                              Σ0         →0x26936 ←0x2688c
            <MI 2691c  BRA     0x26936>                                         {}
        <POP 2691e-26936 Naked>                              Σ0         ↓ ←0x267e4
            <MI 2691e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 26920  CLR.B   -(A7)>                        Δ-2                {[#0]|[#0]}
            <Const 0x26922 0x1.4>                            Δ-4                {[#0]|[#0]|[##1]}
            <Pointer.fp 0x26926 <LVAR -0x094 @ 1(r)>>        Δ-4                {[#0]|[#0]|[##1]|[@@-148]}
            <Pointer.fp 0x2692a <LVAR -0x09c @ 4(r)>>        Δ-4                {[#0]|[#0]|[##1]|[@@-148]|[@@-156]}
            <Call 0x2692c 0x1038c>                                              {[#0]|[#0]|[##1]|[@@-148]|[@@-156]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 26932-26936 StackAdj>                       Δ+16               {}
        <POP 26936-2693c Naked>                              Σ0         ↓ →0x26b12 ←0x2691c
            <MI 26936  TST.B   D5>                                              {}
            <MI 26938  BEQ     0x26b12>                                         {}
        <POP 2693c-26966 Naked>                              Σ0         ↓ →0x2696e
            <Blob 0x2693c [30] (A6-0x6c)>                    Δ-30               {[«30»]}
            <POP 26948-2694a StackAdj>                       Δ-4                {[«30»]|[-4-]}
            <Lit 0x2694a>                                                       {[«30»]|[$$…]}
                <Pointer.sp 0x2694a 4>                       Δ-4        
                <Const 0x2694e 0x1.2>                        Δ-2        
                <Const 0x26950 0x1e.2>                       Δ-2        
                <Call 0x26954 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 26956-26958 StackAdj>                   Δ+8        
            <MI 26958  MOVE.L  (A7)+,(A6-0x8e)>              Δ+4                {[«30»]}
            <POP 2695c-26960 StackAdj>                       Δ+30               {}
            <MI 26960  TST.B   (A6-0x67)>                                       {}
            <MI 26964  BEQ     0x2696e>                                         {}
        <POP 26966-2696e Naked>                              Σ0         →0x26972
            <MI 26966  MOVE.W  (A6-0x6c),D0>                                    {}
            <MI 2696a  NEG.W   D0>                                              {}
            <MI 2696c  BRA     0x26972>                                         {}
        <POP 2696e-26972 Naked>                              Σ0         ↓ ←0x2693c
            <MI 2696e  MOVE.W  (A6-0x6c),D0>                                    {}
        <POP 26972-26994 Naked>                              Σ0         ↓ →0x2699e ←0x26966
            <MI 26972  EXTW.L  D0>                                              {}
            <MI 26974  MOVE.L  D0,D6>                                           {}
            <MI 26976  MOVE.L  (A6-0x8e),-(A7)>              Δ-4                {[4, '(A6-0x8e)']}
            <Const 0x2697a 0x1.2>                            Δ-2                {[4, '(A6-0x8e)']|[#1]}
            <Const 0x2697c 0x1.2>                            Δ-2                {[4, '(A6-0x8e)']|[#1]|[#1]}
            <MI 2697e  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6-0x8e)']|[#1]|[#1]|[4, 'D6']}
            <Pointer.fp 0x26980 <LVAR -0x094 @ 1(r)>>        Δ-4                {[4, '(A6-0x8e)']|[#1]|[#1]|[4, 'D6']|[@@-148]}
            <Pointer.fp 0x26984 <LVAR -0x09c @ 4(r)>>        Δ-4                {[4, '(A6-0x8e)']|[#1]|[#1]|[4, 'D6']|[@@-148]|[@@-156]}
            <Call 0x26986 0x10380>                                              {[4, '(A6-0x8e)']|[#1]|[#1]|[4, 'D6']|[@@-148]|[@@-156]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 2698c-2698e StackAdj>                       Δ+20               {}
            <MI 2698e  TST.B   (A6-0x94)>                                       {}
            <MI 26992  BEQ     0x2699e>                                         {}
        <POP 26994-2699e Naked>                              Σ0         ↓
            <Const 0x26994 0x1a.4>                           Δ-4                {[##26]}
            <Call 0x26998 0x2132c>                                              {[##26]}
            <POP 2699c-2699e StackAdj>                       Δ+4                {}
        <POP 2699e-269ee Naked>                              Σ0 Δ-4     ↓ ←0x26972
            <MI 2699e  MOVEA.L (A6-0x9c),A0>                                    {}
            <MI 269a0  MOVE.B  (A6-0x67),D0>                                    {}
            <MI 269a4  ANDI.B  #0xfd,(A0+0x3f)>                                 {}
            <MI 269aa  LSL.B   #0x1,D0>                                         {}
            <MI 269ac  OR.B    D0,(A0+0x3f)>                                    {}
            <MI 269b0  MOVE.B  (A6-0x68),D0>                                    {}
            <MI 269b4  ANDI.B  #0xfb,(A0+0x3f)>                                 {}
            <MI 269ba  LSL.B   #0x2,D0>                                         {}
            <MI 269bc  OR.B    D0,(A0+0x3f)>                                    {}
            <MI 269c0  MOVE.B  (A6-0x66),(A0+0x3a)>                             {}
            <MI 269c6  MOVE.B  (A6-0x65),(A0+0x3b)>                             {}
            <MI 269cc  MOVE.B  (A6-0x64),(A0+0x3c)>                             {}
            <MI 269d2  MOVE.B  (A6-0x63),(A0+0x3d)>                             {}
            <MI 269d8  MOVE.B  #0x01,(A0+0x4c)>                                 {}
            <MI 269dc  CLR.L   0x2e1c2>                                         {}
            <MI 269e2  MOVE.W  (A6-0x6c),D0>                                    {}
            <MI 269e6  SUBQ.W  #0x1,D0>                                         {}
            <MI 269e8  EXTW.L  D0>                                              {}
            <MI 269ea  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 269ec  MOVEQ.L #0x00,D7>                                        {[4, 'D0']}
        <POP 269ee-269f4 Naked>                              Σ-4        ↓ →0x26ada ←0x26ad4
            <MI 269ee  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 269f0  BGT     0x26ada>                                         {[-4-]}
        <POP 269f4-26a1c Naked>                              Σ-4        ↓ →0x26a22
            <Call 0x269f4 0x214e2>                                              {[-4-]}
            <POP 269f8-269fa StackAdj>                       Δ-4                {[-8-]}
            <MI 269fa  MOVE.W  (A6-0x6c),D0>                                    {[-8-]}
            <MI 269fe  EXTW.L  D0>                                              {[-8-]}
            <MI 26a00  SUB.L   D7,D0>                                           {[-8-]}
            <MI 26a02  MOVE.L  D0,-(A7)>                     Δ-4                {[-8-]|[4, 'D0']}
            <Call 0x26a04 0x102e4>                                              {[-8-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 26a0a-26a0c StackAdj>                       Δ+4                {[-8-]}
            <Call 0x26a0c 0x103d8>                                              {[-8-]}
                WriteConsoleString(str : String)
            <POP 26a12-26a14 StackAdj>                       Δ+4                {[-4-]}
            <MI 26a14  TST.B   0x2c7c8>                                         {[-4-]}
            <MI 26a1a  BNE     0x26a22>                                         {[-4-]}
        <POP 26a1c-26a22 Naked>                              Σ-4        →0x26a26
            <Call 0x26a1c 0x26090>                                              {[-4-]}
            <MI 26a20  BRA     0x26a26>                                         {[-4-]}
        <POP 26a22-26a26 Naked>                              Σ-4        ↓ ←0x269f4
            <Call 0x26a22 0x2649e>                                              {[-4-]}
        <POP 26a26-26a32 Naked>                              Σ-4        ↓ →0x26a9a ←0x26a1c
            <MI 26a26  MOVE.W  (A6-0x6c),D0>                                    {[-4-]}
            <MI 26a2a  SUBQ.W  #0x1,D0>                                         {[-4-]}
            <MI 26a2c  EXTW.L  D0>                                              {[-4-]}
            <MI 26a2e  CMP.L   D0,D7>                                           {[-4-]}
            <MI 26a30  BNE     0x26a9a>                                         {[-4-]}
        <POP 26a32-26a9a Naked>                              Σ-4        ↓
            <Call 0x26a32 0x214e2>                                              {[-4-]}
            <Blob 0x26a36 [12] @>                            Δ-12               {[-4-]|[«12""»]}
            <Blob 0x26a48 [36] @>                            Δ-36               {[-4-]|[«12""»]|[«36""»]}
            <POP 26a54-26a56 StackAdj>                       Δ-8                {[-4-]|[«12""»]|[«36""»]|[-8-]}
            <Lit 0x26a56 11>                                                    {[-4-]|[«12""»]|[«36""»]|[-4-]|[$$Retrieved _]}
            <MI 26a62  MOVE.L  (A6-0x8e),(A7)>                                  {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']}
            <POP 26a60-26a62 StackAdj>                       Δ-8                {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-8-]}
            <Call 0x26a66 0x102cc>                                              {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-8-]}
                StringDup(a : String) : String
            <Lit 0x26a6c 36>                                                    {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-4-]|[$$, file size (in bytes decimal) is :_]}
            <POP 26a78-26a79 StackAdj>                       Δ-4                {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-4-]|[$$, file size (in bytes decimal) is :_]|[-4-]}
            <Blob 0x26a79 [4] 0x2e1c2>                       Δ-4                {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-4-]|[$$, file size (in bytes decimal) is :_]|[-4-]|[«4»]}
            <Call 0x26a7e 0x102e4>                                              {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-4-]|[$$, file size (in bytes decimal) is :_]|[-4-]|[«4»]}
                Long2String(a : Long) : String
            <POP 26a84-26a86 StackAdj>                       Δ+4                {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-4-]|[$$, file size (in bytes decimal) is :_]|[-4-]}
            <Call 0x26a86 0x102d8>                                              {[-4-]|[«12""»]|[«36""»]|[-4-]|[4, '(A6-0x8e)']|[-4-]|[$$, file size (in bytes decimal) is :_]|[-4-]}
                StringCat4(a, b, c, d : String) : String
            <POP 26a8c-26a90 StackAdj>                       Δ+16               {[-4-]|[«12""»]|[«36""»]|[-4-]}
            <Call 0x26a90 0x103e0>                                              {[-4-]|[«12""»]|[«36""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 26a96-26a9a StackAdj>                       Δ+52               {[-4-]}
        <POP 26a9a-26aca Naked>                              Σ-4        ↓ →0x26ad4 ←0x26a26
            <MI 26a9a  MOVE.L  (A6-0x9c),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x9c)']}
            <POP 0x26a9c LimitCheck 0x0 ≤ D7 ≤ 0x4000>                          {[-4-]|[4, '(A6-0x9c)']}
            <MI 26aa6  MOVE.W  D7,-(A7)>                     Δ-2                {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']}
            <MI 26aa8  CLR.W   -(A7)>                        Δ-2                {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]}
            <Const 0x26aaa 0x200.2>                          Δ-2                {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]|[#512]}
            <Const 0x26aae 0x1.2>                            Δ-2                {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]|[#512]|[#1]}
            <MI 26ab0  LEA.L   0x2d43a,A0>                                      {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]|[#512]|[#1]}
            <MI 26ab6  MOVE.L  A0,-(A7)>                     Δ-4                {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'A0']}
            <Pointer.fp 0x26ab8 <LVAR -0x094 @ 1(r)>>        Δ-4                {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'A0']|[@@-148]}
            <Call 0x26abc 0x10388>                                              {[-4-]|[4, '(A6-0x9c)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'A0']|[@@-148]}
                WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
            <POP 26ac2-26ac4 StackAdj>                       Δ+20               {[-4-]}
            <MI 26ac4  TST.B   (A6-0x94)>                                       {[-4-]}
            <MI 26ac8  BEQ     0x26ad4>                                         {[-4-]}
        <POP 26aca-26ad4 Naked>                              Σ-4        ↓
            <Const 0x26aca 0x1b.4>                           Δ-4                {[-4-]|[##27]}
            <Call 0x26ace 0x2132c>                                              {[-4-]|[##27]}
            <POP 26ad2-26ad4 StackAdj>                       Δ+4                {[-4-]}
        <POP 26ad4-26ada Naked>                              Σ-4        ↓ →0x269ee ←0x26a9a
            <MI 26ad4  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 26ad6  BVC     0x269ee>                                         {[-4-]}
        <POP 26ada-26b06 Naked>                              Σ-4 Δ+4    ↓ →0x26b10 ←0x269ee
            <POP 26ada-26adc StackAdj>                       Δ+4                {}
            <Pointer.fp 0x26adc <LVAR -0x08e @ 4(rw)>>       Δ-4                {[@@-142]}
            <Call 0x26ae0 0x102bc>                                              {[@@-142]}
                FreeString(VAR a : String)
            <POP 26ae6-26ae8 StackAdj>                       Δ+2                {[-2-]}
            <MI 26ae8  CLR.B   (A7)>                                            {[-2-]}
            <Const 0x26aea 0x1.2>                            Δ-2                {[-2-]|[#1]}
            <Const 0x26aec 0x1.4>                            Δ-4                {[-2-]|[#1]|[##1]}
            <Pointer.fp 0x26af0 <LVAR -0x094 @ 1(r)>>        Δ-4                {[-2-]|[#1]|[##1]|[@@-148]}
            <Pointer.fp 0x26af4 <LVAR -0x09c @ 4(r)>>        Δ-4                {[-2-]|[#1]|[##1]|[@@-148]|[@@-156]}
            <Call 0x26af6 0x1038c>                                              {[-2-]|[#1]|[##1]|[@@-148]|[@@-156]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 26afc-26b00 StackAdj>                       Δ+16               {}
            <MI 26b00  TST.B   (A6-0x94)>                                       {}
            <MI 26b04  BEQ     0x26b10>                                         {}
        <POP 26b06-26b10 Naked>                              Σ0         ↓
            <Const 0x26b06 0x1c.4>                           Δ-4                {[##28]}
            <Call 0x26b0a 0x2132c>                                              {[##28]}
            <POP 26b0e-26b10 StackAdj>                       Δ+4                {}
        <POP 26b10-26b12 Naked>                              Σ0         →0x26b3a ←0x26ada
            <MI 26b10  BRA     0x26b3a>                                         {}
        <POP 26b12-26b1e Naked>                              Σ0 Δ-4     ↓ ←0x26936
            <MI 26b12  MOVE.W  (A6-0x6c),D0>                                    {}
            <MI 26b16  SUBQ.W  #0x1,D0>                                         {}
            <MI 26b18  EXTW.L  D0>                                              {}
            <MI 26b1a  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 26b1c  MOVEQ.L #0x00,D7>                                        {[4, 'D0']}
        <POP 26b1e-26b22 Naked>                              Σ-4        ↓ →0x26b38 ←0x26b34
            <MI 26b1e  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 26b20  BGT     0x26b38>                                         {[-4-]}
        <POP 26b22-26b2a Naked>                              Σ-4        ↓ →0x26b30
            <MI 26b22  TST.B   0x2c7c8>                                         {[-4-]}
            <MI 26b28  BNE     0x26b30>                                         {[-4-]}
        <POP 26b2a-26b30 Naked>                              Σ-4        →0x26b34
            <Call 0x26b2a 0x26090>                                              {[-4-]}
            <MI 26b2e  BRA     0x26b34>                                         {[-4-]}
        <POP 26b30-26b34 Naked>                              Σ-4        ↓ ←0x26b22
            <Call 0x26b30 0x2649e>                                              {[-4-]}
        <POP 26b34-26b38 Naked>                              Σ-4        ↓ →0x26b1e ←0x26b2a
            <MI 26b34  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 26b36  BVC     0x26b1e>                                         {[-4-]}
        <POP 26b38-26b3a Naked>                              Σ-4 Δ+4    ↓ ←0x26b1e
            <POP 26b38-26b3a StackAdj>                       Δ+4                {}
        <POP 26b3a-26b42 Epilogue>                           Σ0         ←0x26b10

0x26b42


@ 26b42
        <LVAR -0x00a @ 4(r)>
    <POP 26b42-26c30 Body>                                              
        <POP 26b42-26b58 Prologue>                           Σ0         ↓
        <POP 26b58-26b6c RegCacheLoad>                       Σ0         ↓
        <POP 26b6c-26bf2 Naked>                              Σ0         ↓
            <Blob 0x26b6c [34] @>                            Δ-34               {[«34""»]}
            <Const 0x26b78 0x2.2>                            Δ-2                {[«34""»]|[#2]}
            <POP 26b7a-26b7c StackAdj>                       Δ-4                {[«34""»]|[#2]|[-4-]}
            <Lit 0x26b7c 34>                                                    {[«34""»]|[#2]|[$$BEKINS     => DOWNLOADING required]}
            <Call 0x26b8a 0x22238>                                              {[«34""»]|[#2]|[$$BEKINS     => DOWNLOADING required]}
            <POP 26b8c-26b8e StackAdj>                       Δ+40               {}
            <Blob 0x26b8e [40] @>                            Δ-40               {[«40""»]}
            <Const 0x26b9a 0x2.2>                            Δ-2                {[«40""»]|[#2]}
            <POP 26b9c-26b9e StackAdj>                       Δ-4                {[«40""»]|[#2]|[-4-]}
            <Lit 0x26b9e 40>                                                    {[«40""»]|[#2]|[$$BEKINS     => CONFIGURE, REMOTE DOWNLOAD]}
            <Call 0x26baa 0x22238>                                              {[«40""»]|[#2]|[$$BEKINS     => CONFIGURE, REMOTE DOWNLOAD]}
            <POP 26bac-26bb0 StackAdj>                       Δ+46               {}
            <Blob 0x26bb0 [82] @>                            Δ-82               {[«82""»]}
            <Call 0x26bbc 0x23d08>                                              {[«82""»]}
            <POP 26bc0-26bc1 StackAdj>                       Δ+82       ↓       {}
            <Blob 0x26bc1 [44] @>                            Δ-44               {[«44""»]}
            <Const 0x26bd2 0x2.2>                            Δ-2                {[«44""»]|[#2]}
            <POP 26bd4-26bd6 StackAdj>                       Δ-4                {[«44""»]|[#2]|[-4-]}
            <Lit 0x26bd6 43>                                                    {[«44""»]|[#2]|[$$BEKINS     => Waiting for revision messages]}
            <Call 0x26be4 0x22238>                                              {[«44""»]|[#2]|[$$BEKINS     => Waiting for revision messages]}
            <POP 26be6-26bea StackAdj>                       Δ+50               {}
            <Call 0x26bea 0x253f0>                                              {}
            <MI 26bee  MOVEQ.L #0x00,D7>                                        {}
            <MI 26bf0  CLR.L   (A6-0xa)>                                        {}
        <POP 26bf2-26bfc Naked>                              Σ0         ↓ ←0x26c14
            <Const 0x26bf2 0x3e8.4>                          Δ-4                {[##1000]}
            <Call 0x26bf6 0x2554e>                                              {[##1000]}
            <POP 26bfa-26bfc StackAdj>                       Δ+4                {}
        <POP 26bfc-26c14 Naked>                              Σ0         ↓ →0x26bfc ←0x26bfc
            <Pointer.fp 0x26bfc <LVAR -0x00a @ 4(r)>>        Δ-4                {[@@-10]}
            <Call 0x26bfe 0x21fbc>                                              {[@@-10]}
            <POP 26c02-26c04 StackAdj>                       Δ+4                {}
            <MI 26c04  ADDQ.L  #0x1,D7>                                         {}
            <POP 26c06-26c08 StackAdj>                       Δ-2                {[-2-]}
            <MI 26c08  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0xa)']}
            <Call 0x26c0a 0x21d4e>                                              {[-2-]|[4, '(A6-0xa)']}
            <POP 26c0e-26c10 StackAdj>                       Δ+4                {[-2-]}
            <MI 26c10  TST.B   (A7)+>                        Δ+2                {}
            <MI 26c12  BEQ     0x26bfc>                                         {}
        <POP 26c14-26c22 Naked>                              Σ0         ↓ →0x26bf2
            <Call 0x26c14 0x253f0>                                              {}
            <MI 26c18  CLR.L   (A6-0xa)>                                        {}
            <MI 26c1a  CMPI.L  #0x00000005,D7>                                  {}
            <MI 26c20  BNE     0x26bf2>                                         {}
        <POP 26c22-26c28 Naked>                              Σ0         ↓
            <MI 26c22  MOVE.B  #0x01,0x2c7d4>                                   {}
        <POP 26c28-26c30 Epilogue>                           Σ0         

0x26c30


@ 26c30
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @>
        <LVAR -0x007 @ 1(r)>
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x020 4(w)>
        <LVAR -0x024 4(w)>
        <LVAR -0x028 4(w)>
        <LVAR -0x02c @ 4(w)>
        <LVAR -0x030 4(rw)>
        <LVAR -0x031 1(w)>
        <LVAR -0x032 1(r)>
        <LVAR -0x033 1(w)>
        <LVAR -0x034 4(rw)>
        <LVAR -0x037 1(w)>
        <LVAR -0x038 4(rw)>
        <LVAR -0x03c 4(rw)>
        <LVAR -0x08c 4(r)>
        <LVAR -0x08d 1(r)>
        <LVAR -0x08e 1(r)>
        <LVAR -0x08f 1(w)>
        <LVAR -0x090 1(w)>
        <LVAR -0x091 1(w)>
        <LVAR -0x092 1(w)>
        <LVAR -0x093 1(w)>
        <LVAR -0x094 1(w)>
        <LVAR -0x098 4(w)>
        <LVAR -0x09c 4(w)>
        <LVAR -0x0a0 4(w)>
        <LVAR -0x0a2 2(w)>
        <LVAR -0x0a4 2(r)>
        <LVAR -0x0a6 2(r)>
        <LVAR -0x0a8 2(r)>
        <LVAR -0x0ac 4(rw)>
        <LVAR -0x0b0 4(r)>
        <LVAR -0x0b2 2(r)>
        <LVAR -0x0b4 2(w)>
        <LVAR -0x0b8 4(r)>
        <LVAR -0x0ba 2(r)>
        <LVAR -0x0bc @ 2(r)>
    <POP 26c30-26e30 Body>                                              
        <POP 26c30-26c46 Prologue>                           Σ0         ↓
        <POP 26c46-26c4c RegCacheLoad>                       Σ0         ↓
        <POP 26c4c-26daa Naked>                              Σ0         ↓ →0x26db4
            <Blob 0x26c4c [28] @>                            Δ-28               {[«28""»]}
            <Const 0x26c58 0x1.2>                            Δ-2                {[«28""»]|[#1]}
            <POP 26c5a-26c5c StackAdj>                       Δ-4                {[«28""»]|[#1]|[-4-]}
            <Lit 0x26c5c 28>                                                    {[«28""»]|[#1]|[$$Procedure DO_GET_TCP_CHANNEL]}
            <Call 0x26c6e 0x22238>                                              {[«28""»]|[#1]|[$$Procedure DO_GET_TCP_CHANNEL]}
            <POP 26c72-26c76 StackAdj>                       Δ+34               {}
            <MI 26c76  CLR.W   (A6-0xbc)>                                       {}
            <MI 26c7a  CLR.W   (A6-0xba)>                                       {}
            <MI 26c7e  CLR.L   (A6-0xb8)>                                       {}
            <MI 26c82  MOVE.W  #0x4,(A6-0xb4)>                                  {}
            <MI 26c88  CLR.W   (A6-0xb2)>                                       {}
            <MI 26c8c  CLR.L   (A6-0xb0)>                                       {}
            <MI 26c90  MOVE.L  #0x34,(A6-0xac)>                                 {}
            <MI 26c98  CLR.W   (A6-0xa8)>                                       {}
            <MI 26c9c  CLR.W   (A6-0xa6)>                                       {}
            <MI 26ca0  CLR.W   (A6-0xa4)>                                       {}
            <MI 26ca4  MOVE.W  #0x05,(A6-0xa2)>                                 {}
            <MI 26ca8  MOVE.L  #0x2c,(A6-0xa0)>                                 {}
            <MI 26cb0  MOVE.L  #0x01,(A6-0x9c)>                                 {}
            <MI 26cb4  MOVE.L  (A6-0xac),(A6-0x98)>                             {}
            <MI 26cba  MOVE.B  #0x69,(A6-0x94)>                                 {}
            <MI 26cc0  MOVE.B  #0x66,(A6-0x93)>                                 {}
            <MI 26cc6  MOVE.B  #0x5f,(A6-0x92)>                                 {}
            <MI 26ccc  MOVE.B  #0x74,(A6-0x91)>                                 {}
            <MI 26cd2  MOVE.B  #0x63,(A6-0x90)>                                 {}
            <MI 26cd8  MOVE.B  #0x70,(A6-0x8f)>                                 {}
            <MI 26cde  CLR.B   (A6-0x8e)>                                       {}
            <MI 26ce2  CLR.B   (A6-0x8d)>                                       {}
            <MI 26ce6  CLR.L   (A6-0x8c)>                                       {}
            <MI 26cea  MOVE.L  0x21150,(A6-0x3c)>                               {}
            <MI 26cf0  MOVE.L  0x21154,(A6-0x38)>                               {}
            <MI 26cf6  MOVE.L  0x21158,(A6-0x34)>                               {}
            <MI 26cfc  MOVE.L  0x2115c,(A6-0x30)>                               {}
            <MI 26d02  ANDI.B  #0x80,(A6-0x37)>                                 {}
            <MI 26d08  OR.B    #0x06,(A6-0x37)>                                 {}
            <MI 26d0c  ANDI.B  #0x80,(A6-0x31)>                                 {}
            <MI 26d12  OR.B    #0x05,(A6-0x31)>                                 {}
            <MI 26d16  CLR.B   (A6-0x32)>                                       {}
            <Blob 0x26d1a [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x26d1e [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x26d22 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <MI 26d26  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']}
            <POP 26d2a-26d2c StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x26d2c 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$RESUME]}
            <POP 26d3a-26d3c StackAdj>                       Δ-2                {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$RESUME]|[-2-]}
            <MI 26d3c  CLR.B   (A7)>                                            {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$RESUME]|[-2-]}
            <Pointer.fp 0x26d3e <LVAR -0x007 @ 1(r)>>        Δ-4                {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$RESUME]|[-2-]|[@@-7]}
            <Pointer.fp 0x26d42 <LVAR -0x006 @>>             Δ-4                {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$RESUME]|[-2-]|[@@-7]|[@@-6]}
            <Call 0x26d46 0x21cee>                                              {[«2""»]|[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$RESUME]|[-2-]|[@@-7]|[@@-6]}
            <POP 26d4a-26d4e StackAdj>                       Δ+24               {}
            <MI 26d4e  MOVE.B  (A6-0x7),D0>                                     {}
            <MI 26d52  ANDI.B  #0xfb,(A6-0x33)>                                 {}
            <MI 26d58  LSL.B   #0x2,D0>                                         {}
            <MI 26d5a  OR.B    D0,(A6-0x33)>                                    {}
            <MI 26d5e  MOVE.L  (A6-0x3c),(A6-0x2c)>                             {}
            <MI 26d64  MOVE.L  (A6-0x38),(A6-0x28)>                             {}
            <MI 26d6a  MOVE.L  (A6-0x34),(A6-0x24)>                             {}
            <MI 26d70  MOVE.L  (A6-0x30),(A6-0x20)>                             {}
            <Pointer.fp 0x26d76 <LVAR -0x02c @ 4(w)>>        Δ-4                {[@@-44]}
            <MI 26d7a  LEA.L   (A6-0xbc),A0>                                    {[@@-44]}
            <MI 26d7e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-44]|[4, 'A0']}
            <Const 0x26d80 0x1.2>                            Δ-2                {[@@-44]|[4, 'A0']|[#1]}
            <Const 0x26d82 0x80.4>                           Δ-4                {[@@-44]|[4, 'A0']|[#1]|[##128]}
            <Const 0x26d86 0x9303fc00.4>                     Δ-4                {[@@-44]|[4, 'A0']|[#1]|[##128]|[##2466511872]}
            <Const 0x26d8c 0x0.4>                            Δ-4                {[@@-44]|[4, 'A0']|[#1]|[##128]|[##2466511872]|[##0]}
            <Call 0x26d90 0x22766>                                              {[@@-44]|[4, 'A0']|[#1]|[##128]|[##2466511872]|[##0]}
            <POP 26d94-26d98 StackAdj>                       Δ+20               {[-2-]}
            <POP 26d98-26d99 StackAdj>                       Δ+2                {}
            <Const 0x26d99 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x26d9a <LVAR -0x008 @ 1(r)>>        Δ-4                {[#1]|[@@-8]}
            <Call 0x26d9e 0x22676>                                              {[#1]|[@@-8]}
            <POP 26da2-26da4 StackAdj>                       Δ+6                {}
            <MI 26da4  TST.B   (A6-0x8)>                                        {}
            <MI 26da8  BNE     0x26db4>                                         {}
        <POP 26daa-26db4 Naked>                              Σ0         ↓
            <Const 0x26daa 0x1e.4>                           Δ-4                {[##30]}
            <Call 0x26dae 0x2132c>                                              {[##30]}
            <POP 26db2-26db4 StackAdj>                       Δ+4                {}
        <POP 26db4-26df0 Naked>                              Σ0         ↓ →0x26e00 ←0x26c4c
            <Const 0x26db4 0x0.4>                            Δ-4                {[##0]}
            <Const 0x26db8 0x1.2>                            Δ-2                {[##0]|[#1]}
            <Const 0x26dba 0x1.4>                            Δ-4                {[##0]|[#1]|[##1]}
            <MI 26dbe  CLR.W   -(A7)>                        Δ-2                {[##0]|[#1]|[##1]|[#0]}
            <Call 0x26dc0 0x24cca>                                              {[##0]|[#1]|[##1]|[#0]}
            <POP 26dc4-26dc8 StackAdj>                       Δ+12               {}
            <MI 26dc8  CLR.L   D0>                                              {}
            <MI 26dca  MOVE.B  0x2cc45,D0>                                      {}
            <MI 26dd0  MULU.W  #0x100,D0>                                       {}
            <MI 26dd4  CLR.L   D1>                                              {}
            <MI 26dd6  MOVE.B  0x2cc46,D1>                                      {}
            <MI 26ddc  ADD.W   D0,D1>                                           {}
            <MI 26dde  CLR.L   D0>                                              {}
            <MI 26de0  MOVE.W  D1,D0>                                           {}
            <MI 26de2  MOVE.L  D0,0x2c7c4>                                      {}
            <MI 26de8  TST.B   0x2d02c>                                         {}
            <MI 26dee  BLE     0x26e00>                                         {}
        <POP 26df0-26df8 Naked>                              Σ0         ↓ →0x26e00
            <MI 26df0  TST.B   0x2cc1d>                                         {}
            <MI 26df6  BNE     0x26e00>                                         {}
        <POP 26df8-26e00 Naked>                              Σ0         ↓ →0x26e28
            <MI 26df8  TST.B   0x2cc1e>                                         {}
            <MI 26dfe  BEQ     0x26e28>                                         {}
        <POP 26e00-26e28 Naked>                              Σ0         ↓ ←0x26db4 ←0x26df0
            <Blob 0x26e00 [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x26e06 [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x26e0c [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x26e12 [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x26e18 0x21c90>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 26e1c-26e20 StackAdj>                       Δ+16               {}
            <Call 0x26e20 0x23b48>                                              {}
            <Call 0x26e24 0x229d4>                                              {}
        <POP 26e28-26e30 Epilogue>                           Σ0         ←0x26df8

0x26e30


@ 26e30
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 4(w)>
        <LVAR -0x00c 4(w)>
        <LVAR -0x010 4(w)>
        <LVAR -0x014 @ 4(w)>
        <LVAR -0x018 4(rw)>
        <LVAR -0x019 1(w)>
        <LVAR -0x01a 1(w)>
        <LVAR -0x01c 4(rw)>
        <LVAR -0x01f 1(w)>
        <LVAR -0x020 4(rw)>
        <LVAR -0x024 4(rw)>
        <LVAR -0x074 4(w)>
        <LVAR -0x075 1(r)>
        <LVAR -0x076 1(r)>
        <LVAR -0x077 1(w)>
        <LVAR -0x078 1(w)>
        <LVAR -0x079 1(w)>
        <LVAR -0x07a 1(w)>
        <LVAR -0x07b 1(w)>
        <LVAR -0x07c 1(w)>
        <LVAR -0x080 4(w)>
        <LVAR -0x084 4(w)>
        <LVAR -0x088 4(w)>
        <LVAR -0x08a 2(w)>
        <LVAR -0x08c 2(r)>
        <LVAR -0x08e 2(w)>
        <LVAR -0x090 2(r)>
        <LVAR -0x094 4(rw)>
        <LVAR -0x098 4(r)>
        <LVAR -0x09a 2(r)>
        <LVAR -0x09c 2(w)>
        <LVAR -0x0a0 4(r)>
        <LVAR -0x0a2 2(r)>
        <LVAR -0x0a4 @ 2(r)>
    <POP 26e30-26fec Body>                                              
        <POP 26e30-26e46 Prologue>                           Σ0         ↓
        <POP 26e46-26e50 RegCacheLoad>                       Σ0         ↓
        <POP 26e50-26f88 Naked>                              Σ0         ↓ →0x26f92
            <Blob 0x26e50 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x26e5c 0x1.2>                            Δ-2                {[«24""»]|[#1]}
            <POP 26e5e-26e60 StackAdj>                       Δ-4                {[«24""»]|[#1]|[-4-]}
            <Lit 0x26e60 24>                                                    {[«24""»]|[#1]|[$$Procedure DO_RESERVE_TCP]}
            <Call 0x26e72 0x22238>                                              {[«24""»]|[#1]|[$$Procedure DO_RESERVE_TCP]}
            <POP 26e76-26e7a StackAdj>                       Δ+30               {}
            <MI 26e7a  CLR.W   (A6-0xa4)>                                       {}
            <MI 26e7e  CLR.W   (A6-0xa2)>                                       {}
            <MI 26e82  CLR.L   (A6-0xa0)>                                       {}
            <MI 26e86  MOVE.W  #0x4,(A6-0x9c)>                                  {}
            <MI 26e8c  CLR.W   (A6-0x9a)>                                       {}
            <MI 26e90  CLR.L   (A6-0x98)>                                       {}
            <MI 26e94  MOVE.L  #0x34,(A6-0x94)>                                 {}
            <MI 26e9c  CLR.W   (A6-0x90)>                                       {}
            <MI 26ea0  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x26ea2 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 26eac  MOVE.W  D0,(A6-0x8e)>                                    {}
            <MI 26eb0  CLR.W   (A6-0x8c)>                                       {}
            <MI 26eb4  MOVE.W  #0x05,(A6-0x8a)>                                 {}
            <MI 26eb8  MOVE.L  #0x2c,(A6-0x88)>                                 {}
            <MI 26ec0  MOVE.L  #0x3,(A6-0x84)>                                  {}
            <MI 26ec8  MOVE.L  (A6-0x94),(A6-0x80)>                             {}
            <MI 26ece  MOVE.B  #0x69,(A6-0x7c)>                                 {}
            <MI 26ed4  MOVE.B  #0x66,(A6-0x7b)>                                 {}
            <MI 26eda  MOVE.B  #0x5f,(A6-0x7a)>                                 {}
            <MI 26ee0  MOVE.B  #0x74,(A6-0x79)>                                 {}
            <MI 26ee6  MOVE.B  #0x63,(A6-0x78)>                                 {}
            <MI 26eec  MOVE.B  #0x70,(A6-0x77)>                                 {}
            <MI 26ef2  CLR.B   (A6-0x76)>                                       {}
            <MI 26ef6  CLR.B   (A6-0x75)>                                       {}
            <MI 26efa  MOVE.L  0x2c7c4,(A6-0x74)>                               {}
            <MI 26efe  MOVE.L  0x21150,(A6-0x24)>                               {}
            <MI 26f04  MOVE.L  0x21154,(A6-0x20)>                               {}
            <MI 26f0a  MOVE.L  0x21158,(A6-0x1c)>                               {}
            <MI 26f10  MOVE.L  0x2115c,(A6-0x18)>                               {}
            <MI 26f16  ANDI.B  #0x80,(A6-0x1f)>                                 {}
            <MI 26f1c  ORI.B   #0x06,(A6-0x1f)>                                 {}
            <MI 26f22  ANDI.B  #0x80,(A6-0x19)>                                 {}
            <MI 26f28  OR.B    #0x05,(A6-0x19)>                                 {}
            <MI 26f2c  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x26f2e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 26f38  MOVE.B  D0,(A6-0x1a)>                                    {}
            <MI 26f3c  MOVE.L  (A6-0x24),(A6-0x14)>                             {}
            <MI 26f42  MOVE.L  (A6-0x20),(A6-0x10)>                             {}
            <MI 26f48  MOVE.L  (A6-0x1c),(A6-0xc)>                              {}
            <MI 26f4e  MOVE.L  (A6-0x18),(A6-0x8)>                              {}
            <Pointer.fp 0x26f54 <LVAR -0x014 @ 4(w)>>        Δ-4                {[@@-20]}
            <MI 26f58  LEA.L   (A6-0xa4),A0>                                    {[@@-20]}
            <MI 26f5c  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-20]|[4, 'A0']}
            <Const 0x26f5e 0x1.2>                            Δ-2                {[@@-20]|[4, 'A0']|[#1]}
            <Const 0x26f60 0x80.4>                           Δ-4                {[@@-20]|[4, 'A0']|[#1]|[##128]}
            <Const 0x26f64 0x9303fc00.4>                     Δ-4                {[@@-20]|[4, 'A0']|[#1]|[##128]|[##2466511872]}
            <Const 0x26f6a 0x0.4>                            Δ-4                {[@@-20]|[4, 'A0']|[#1]|[##128]|[##2466511872]|[##0]}
            <Call 0x26f6e 0x22766>                                              {[@@-20]|[4, 'A0']|[#1]|[##128]|[##2466511872]|[##0]}
            <POP 26f72-26f76 StackAdj>                       Δ+20               {[-2-]}
            <POP 26f76-26f77 StackAdj>                       Δ+2                {}
            <Const 0x26f77 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x26f78 <LVAR -0x004 @ 1(r)>>        Δ-4                {[#1]|[@@-4]}
            <Call 0x26f7c 0x22676>                                              {[#1]|[@@-4]}
            <POP 26f80-26f82 StackAdj>                       Δ+6                {}
            <MI 26f82  TST.B   (A6-0x4)>                                        {}
            <MI 26f86  BNE     0x26f92>                                         {}
        <POP 26f88-26f92 Naked>                              Σ0         ↓
            <Const 0x26f88 0x27.4>                           Δ-4                {[##39]}
            <Call 0x26f8c 0x2132c>                                              {[##39]}
            <POP 26f90-26f92 StackAdj>                       Δ+4                {}
        <POP 26f92-26fac Naked>                              Σ0         ↓ →0x26fbc ←0x26e50
            <Blob 0x26f92 [4] 0x2c7c4>                       Δ-4                {[«4»]}
            <Const 0x26f94 0x1.2>                            Δ-2                {[«4»]|[#1]}
            <Const 0x26f96 0x1.4>                            Δ-4                {[«4»]|[#1]|[##1]}
            <MI 26f9a  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#1]|[##1]|[#0]}
            <Call 0x26f9c 0x24cca>                                              {[«4»]|[#1]|[##1]|[#0]}
            <POP 26fa0-26fa4 StackAdj>                       Δ+12               {}
            <MI 26fa4  TST.B   0x2d02c>                                         {}
            <MI 26faa  BLE     0x26fbc>                                         {}
        <POP 26fac-26fb4 Naked>                              Σ0         ↓ →0x26fbc
            <MI 26fac  TST.B   0x2cc1d>                                         {}
            <MI 26fb2  BNE     0x26fbc>                                         {}
        <POP 26fb4-26fbc Naked>                              Σ0         ↓ →0x26fe4
            <MI 26fb4  TST.B   0x2cc1e>                                         {}
            <MI 26fba  BEQ     0x26fe4>                                         {}
        <POP 26fbc-26fe4 Naked>                              Σ0         ↓ ←0x26f92 ←0x26fac
            <Blob 0x26fbc [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x26fc2 [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x26fc8 [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x26fce [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x26fd4 0x21c90>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 26fd8-26fdc StackAdj>                       Δ+16               {}
            <Call 0x26fdc 0x23b48>                                              {}
            <Call 0x26fe0 0x229d4>                                              {}
        <POP 26fe4-26fec Epilogue>                           Σ0         ←0x26fb4

0x26fec


@ 26fec
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x020 4(w)>
        <LVAR -0x024 4(w)>
        <LVAR -0x028 4(w)>
        <LVAR -0x02c @ 4(w)>
        <LVAR -0x030 4(rw)>
        <LVAR -0x031 1(w)>
        <LVAR -0x032 1(w)>
        <LVAR -0x034 4(rw)>
        <LVAR -0x037 1(w)>
        <LVAR -0x038 4(rw)>
        <LVAR -0x03c 4(rw)>
        <LVAR -0x040 4(w)>
        <LVAR -0x05c 4(r)>
        <LVAR -0x05e 2(r)>
        <LVAR -0x060 2(r)>
        <LVAR -0x07c 4(w)>
        <LVAR -0x07e 2(w)>
        <LVAR -0x080 @ 2(w)>
        <LVAR -0x084 4(w)>
        <LVAR -0x086 2(r)>
        <LVAR -0x088 2(r)>
        <LVAR -0x08a 2(r)>
        <LVAR -0x08c 2(r)>
        <LVAR -0x08d 1(r)>
        <LVAR -0x08e 1(r)>
        <LVAR -0x08f 1(w)>
        <LVAR -0x090 1(w)>
        <LVAR -0x091 1(w)>
        <LVAR -0x092 1(w)>
        <LVAR -0x093 1(w)>
        <LVAR -0x094 1(w)>
        <LVAR -0x098 4(w)>
        <LVAR -0x09c 4(w)>
        <LVAR -0x0a0 4(w)>
        <LVAR -0x0a2 2(w)>
        <LVAR -0x0a4 2(r)>
        <LVAR -0x0a6 2(w)>
        <LVAR -0x0a8 2(r)>
        <LVAR -0x0ac 4(rw)>
        <LVAR -0x0b0 4(r)>
        <LVAR -0x0b2 2(r)>
        <LVAR -0x0b4 2(w)>
        <LVAR -0x0b8 4(r)>
        <LVAR -0x0ba 2(r)>
        <LVAR -0x0bc @ 2(r)>
    <POP 26fec-2724a Body>                                              
        <POP 26fec-27002 Prologue>                           Σ0         ↓
        <POP 27002-27014 RegCacheLoad>                       Σ0         ↓
        <POP 27014-270fc Naked>                              Σ0         ↓
            <Blob 0x27014 [22] @>                            Δ-22               {[«22""»]}
            <Const 0x27026 0x1.2>                            Δ-2                {[«22""»]|[#1]}
            <POP 27028-2702a StackAdj>                       Δ-4                {[«22""»]|[#1]|[-4-]}
            <Lit 0x2702a 21>                                                    {[«22""»]|[#1]|[$$Procedure DO_BIND_TCP]}
            <Call 0x2703c 0x22238>                                              {[«22""»]|[#1]|[$$Procedure DO_BIND_TCP]}
            <POP 27040-27044 StackAdj>                       Δ+28               {}
            <MI 27044  CLR.W   (A6-0xbc)>                                       {}
            <MI 27048  CLR.W   (A6-0xba)>                                       {}
            <MI 2704c  CLR.L   (A6-0xb8)>                                       {}
            <MI 27050  MOVE.W  #0x50,(A6-0xb4)>                                 {}
            <MI 27056  CLR.W   (A6-0xb2)>                                       {}
            <MI 2705a  CLR.L   (A6-0xb0)>                                       {}
            <MI 2705e  MOVE.L  #0x34,(A6-0xac)>                                 {}
            <MI 27066  CLR.W   (A6-0xa8)>                                       {}
            <MI 2706a  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x2706c LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 27072  MOVE.W  D0,(A6-0xa6)>                                    {}
            <MI 27076  CLR.W   (A6-0xa4)>                                       {}
            <MI 2707a  MOVE.W  #0x5,(A6-0xa2)>                                  {}
            <MI 27080  MOVE.L  #0x2c,(A6-0xa0)>                                 {}
            <MI 27088  MOVE.L  #0x4,(A6-0x9c)>                                  {}
            <MI 27090  MOVE.L  (A6-0xac),(A6-0x98)>                             {}
            <MI 27096  MOVE.B  #0x69,(A6-0x94)>                                 {}
            <MI 2709c  MOVE.B  #0x66,(A6-0x93)>                                 {}
            <MI 270a2  MOVE.B  #0x5f,(A6-0x92)>                                 {}
            <MI 270a8  MOVE.B  #0x74,(A6-0x91)>                                 {}
            <MI 270ae  MOVE.B  #0x63,(A6-0x90)>                                 {}
            <MI 270b4  MOVE.B  #0x70,(A6-0x8f)>                                 {}
            <MI 270ba  CLR.B   (A6-0x8e)>                                       {}
            <MI 270be  CLR.B   (A6-0x8d)>                                       {}
            <MI 270c2  CLR.W   (A6-0x8c)>                                       {}
            <MI 270c6  CLR.W   (A6-0x8a)>                                       {}
            <MI 270ca  CLR.W   (A6-0x88)>                                       {}
            <MI 270ce  CLR.W   (A6-0x86)>                                       {}
            <MI 270d2  MOVE.L  0x2c7c4,(A6-0x84)>                               {}
            <MI 270d6  MOVE.W  #0x2,(A6-0x80)>                                  {}
            <MI 270dc  CLR.L   D4>                                              {}
            <MI 270de  MOVE.W  0x2d8b4,D4>                                      {}
            <MI 270e4  MOVE.L  #0xffff,D3>                                      {}
            <Call 0x270e6 0x10298>                                              {}
                ?divu_d3_d4
            <MI 270ec  AND.L   #0xffff,D3>                                      {}
            <MI 270ee  MOVE.W  D3,(A6-0x7e)>                                    {}
            <MI 270f2  MOVE.L  0x2d024,(A6-0x7c)>                               {}
            <MI 270fa  MOVEQ.L #0x00,D7>                                        {}
        <POP 270fc-27110 Naked>                              Σ0         ↓ →0x270fc ←0x270fc
            <POP 0x270fc LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {}
            <MI 27102  LEA.L   (A6-0x80),A0>                                    {}
            <MI 27106  CLR.B   (A0+D7.L+#0x8)>                                  {}
            <MI 2710a  ADDQ.L  #0x1,D7>                                         {}
            <MI 2710c  CMP.L   #0x07,D7>                                        {}
            <MI 2710e  BLE     0x270fc>                                         {}
        <POP 27110-27112 Naked>                              Σ0         ↓
            <MI 27110  MOVEQ.L #0x00,D7>                                        {}
        <POP 27112-27126 Naked>                              Σ0         ↓ →0x27112 ←0x27112
            <POP 0x27112 LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {}
            <MI 27118  LEA.L   (A6-0x80),A0>                                    {}
            <MI 2711c  CLR.B   (A0+D7.L+#0x10)>                                 {}
            <MI 27120  ADDQ.L  #0x1,D7>                                         {}
            <MI 27122  CMP.L   #0x0f,D7>                                        {}
            <MI 27124  BLE     0x27112>                                         {}
        <POP 27126-27134 Naked>                              Σ0         ↓
            <MI 27126  CLR.W   (A6-0x60)>                                       {}
            <MI 2712a  CLR.W   (A6-0x5e)>                                       {}
            <MI 2712e  CLR.L   (A6-0x5c)>                                       {}
            <MI 27132  MOVEQ.L #0x00,D7>                                        {}
        <POP 27134-27144 Naked>                              Σ0         ↓ →0x27134 ←0x27134
            <POP 0x27134 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {}
            <MI 2713a  CLR.B   (A6+D7.L-#0x58)>                                 {}
            <MI 2713e  ADDQ.L  #0x1,D7>                                         {}
            <MI 27140  CMP.L   #0x07,D7>                                        {}
            <MI 27142  BLE     0x27134>                                         {}
        <POP 27144-27146 Naked>                              Σ0         ↓
            <MI 27144  MOVEQ.L #0x00,D7>                                        {}
        <POP 27146-27156 Naked>                              Σ0         ↓ →0x27146 ←0x27146
            <POP 0x27146 LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {}
            <MI 2714c  CLR.B   (A6+D7.L-#0x50)>                                 {}
            <MI 27150  ADDQ.L  #0x1,D7>                                         {}
            <MI 27152  CMP.L   #0x0f,D7>                                        {}
            <MI 27154  BLE     0x27146>                                         {}
        <POP 27156-271e6 Naked>                              Σ0         ↓ →0x271f0
            <MI 27156  MOVE.L  #0x01,(A6-0x40)>                                 {}
            <MI 2715a  MOVE.L  0x21150,(A6-0x3c)>                               {}
            <MI 27160  MOVE.L  0x21154,(A6-0x38)>                               {}
            <MI 27166  MOVE.L  0x21158,(A6-0x34)>                               {}
            <MI 2716c  MOVE.L  0x2115c,(A6-0x30)>                               {}
            <MI 27172  ANDI.B  #0x80,(A6-0x37)>                                 {}
            <MI 27178  ORI.B   #0x06,(A6-0x37)>                                 {}
            <MI 2717e  ANDI.B  #0x80,(A6-0x31)>                                 {}
            <MI 27184  ORI.B   #0x05,(A6-0x31)>                                 {}
            <MI 2718a  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x2718c LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 27196  MOVE.B  D0,(A6-0x32)>                                    {}
            <MI 2719a  MOVE.L  (A6-0x3c),(A6-0x2c)>                             {}
            <MI 271a0  MOVE.L  (A6-0x38),(A6-0x28)>                             {}
            <MI 271a6  MOVE.L  (A6-0x34),(A6-0x24)>                             {}
            <MI 271ac  MOVE.L  (A6-0x30),(A6-0x20)>                             {}
            <Pointer.fp 0x271b2 <LVAR -0x02c @ 4(w)>>        Δ-4                {[@@-44]}
            <MI 271b6  LEA.L   (A6-0xbc),A0>                                    {[@@-44]}
            <MI 271ba  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-44]|[4, 'A0']}
            <Const 0x271bc 0x1.2>                            Δ-2                {[@@-44]|[4, 'A0']|[#1]}
            <Const 0x271be 0x80.4>                           Δ-4                {[@@-44]|[4, 'A0']|[#1]|[##128]}
            <Const 0x271c2 0x9303fc00.4>                     Δ-4                {[@@-44]|[4, 'A0']|[#1]|[##128]|[##2466511872]}
            <Const 0x271c8 0x0.4>                            Δ-4                {[@@-44]|[4, 'A0']|[#1]|[##128]|[##2466511872]|[##0]}
            <Call 0x271cc 0x22766>                                              {[@@-44]|[4, 'A0']|[#1]|[##128]|[##2466511872]|[##0]}
            <POP 271d0-271d4 StackAdj>                       Δ+20               {[-2-]}
            <POP 271d4-271d5 StackAdj>                       Δ+2                {}
            <Const 0x271d5 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x271d6 <LVAR -0x008 @ 1(r)>>        Δ-4                {[#1]|[@@-8]}
            <Call 0x271da 0x22676>                                              {[#1]|[@@-8]}
            <POP 271de-271e0 StackAdj>                       Δ+6                {}
            <MI 271e0  TST.B   (A6-0x8)>                                        {}
            <MI 271e4  BNE     0x271f0>                                         {}
        <POP 271e6-271f0 Naked>                              Σ0         ↓
            <Const 0x271e6 0x1d.4>                           Δ-4                {[##29]}
            <Call 0x271ea 0x2132c>                                              {[##29]}
            <POP 271ee-271f0 StackAdj>                       Δ+4                {}
        <POP 271f0-2720a Naked>                              Σ0         ↓ →0x2721a ←0x27156
            <Blob 0x271f0 [4] 0x2c7c4>                       Δ-4                {[«4»]}
            <Const 0x271f2 0x1.2>                            Δ-2                {[«4»]|[#1]}
            <Const 0x271f4 0x1.4>                            Δ-4                {[«4»]|[#1]|[##1]}
            <MI 271f8  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#1]|[##1]|[#0]}
            <Call 0x271fa 0x24cca>                                              {[«4»]|[#1]|[##1]|[#0]}
            <POP 271fe-27202 StackAdj>                       Δ+12               {}
            <MI 27202  TST.B   0x2d02c>                                         {}
            <MI 27208  BLE     0x2721a>                                         {}
        <POP 2720a-27212 Naked>                              Σ0         ↓ →0x2721a
            <MI 2720a  TST.B   0x2cc1d>                                         {}
            <MI 27210  BNE     0x2721a>                                         {}
        <POP 27212-2721a Naked>                              Σ0         ↓ →0x27242
            <MI 27212  TST.B   0x2cc1e>                                         {}
            <MI 27218  BEQ     0x27242>                                         {}
        <POP 2721a-27242 Naked>                              Σ0         ↓ ←0x271f0 ←0x2720a
            <Blob 0x2721a [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x27220 [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x27226 [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x2722c [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x27232 0x21c90>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 27236-2723a StackAdj>                       Δ+16               {}
            <Call 0x2723a 0x23b48>                                              {}
            <Call 0x2723e 0x229d4>                                              {}
        <POP 27242-2724a Epilogue>                           Σ0         ←0x27212

0x2724a


@ 2724a
        <LVAR  0x008 4(r)>
        <LVAR -0x006 4(rw)>
        <LVAR -0x00a 4(rw)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 4(rw)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x018 4(rw)>
        <LVAR -0x019 1(w)>
        <LVAR -0x01a 1(w)>
        <LVAR -0x01c 4(rw)>
        <LVAR -0x01f 1(w)>
        <LVAR -0x020 4(rw)>
        <LVAR -0x024 4(rw)>
        <LVAR -0x028 4(w)>
        <LVAR -0x044 4(w)>
        <LVAR -0x046 2(w)>
        <LVAR -0x048 2(w)>
        <LVAR -0x064 4(w)>
        <LVAR -0x066 2(w)>
        <LVAR -0x068 2(w)>
        <LVAR -0x06c 4(w)>
        <LVAR -0x06e 2(r)>
        <LVAR -0x070 2(r)>
        <LVAR -0x072 2(r)>
        <LVAR -0x074 2(r)>
        <LVAR -0x076 2(w)>
        <LVAR -0x078 2(r)>
        <LVAR -0x07a 2(rw)>
        <LVAR -0x07c 2(r)>
        <LVAR -0x080 4(w)>
        <LVAR -0x084 4(r)>
        <LVAR -0x086 2(r)>
        <LVAR -0x088 2(w)>
        <LVAR -0x08c 4(r)>
        <LVAR -0x08e 2(r)>
        <LVAR -0x090 @ 2(r)>
        <LVAR -0x09c 4(rw)>
        <LVAR -0x0a0 4(rw)>
        <LVAR -0x0a4 4(rw)>
        <LVAR -0x0a8 @ 4(rw)>
    <POP 2724a-274a2 Body>                                              
        <POP 2724a-27260 Prologue>                           Σ0         ↓
        <POP 27260-2726e RegCacheLoad>                       Σ0         ↓
        <POP 2726e-27316 Naked>                              Σ0         ↓
            <Blob 0x2726e [28] @>                            Δ-28               {[«28""»]}
            <Const 0x2727a 0x1.2>                            Δ-2                {[«28""»]|[#1]}
            <POP 2727c-2727e StackAdj>                       Δ-4                {[«28""»]|[#1]|[-4-]}
            <Lit 0x2727e 28>                                                    {[«28""»]|[#1]|[$$Procedure DO_ACTIVE_OPEN_TCP]}
            <Call 0x27290 0x22238>                                              {[«28""»]|[#1]|[$$Procedure DO_ACTIVE_OPEN_TCP]}
            <POP 27294-27298 StackAdj>                       Δ+34               {}
            <MI 27298  CLR.W   (A6-0x90)>                                       {}
            <MI 2729c  CLR.W   (A6-0x8e)>                                       {}
            <MI 272a0  CLR.L   (A6-0x8c)>                                       {}
            <MI 272a4  MOVE.W  #0x50,(A6-0x88)>                                 {}
            <MI 272aa  CLR.W   (A6-0x86)>                                       {}
            <MI 272ae  CLR.L   (A6-0x84)>                                       {}
            <MI 272b2  MOVE.L  #0x20,(A6-0x80)>                                 {}
            <MI 272ba  CLR.W   (A6-0x7c)>                                       {}
            <MI 272be  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x272c0 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 272ca  MOVE.W  D0,(A6-0x7a)>                                    {}
            <MI 272ce  CLR.W   (A6-0x78)>                                       {}
            <MI 272d2  MOVE.W  #0x02,(A6-0x76)>                                 {}
            <MI 272d6  CLR.W   (A6-0x74)>                                       {}
            <MI 272da  CLR.W   (A6-0x72)>                                       {}
            <MI 272de  CLR.W   (A6-0x70)>                                       {}
            <MI 272e2  CLR.W   (A6-0x6e)>                                       {}
            <MI 272e6  MOVE.L  0x2c7c4,(A6-0x6c)>                               {}
            <MI 272ea  MOVE.W  #0x02,(A6-0x68)>                                 {}
            <MI 272ee  CLR.L   D4>                                              {}
            <MI 272f0  MOVE.W  0x2d8b4,D4>                                      {}
            <MI 272f6  MOVE.L  #0xffff,D3>                                      {}
            <Call 0x272fc 0x10298>                                              {}
                ?divu_d3_d4
            <MI 27302  ANDI.L  #0x0000ffff,D3>                                  {}
            <MI 27308  MOVE.W  D3,(A6-0x66)>                                    {}
            <MI 2730c  MOVE.L  0x2d024,(A6-0x64)>                               {}
            <MI 27314  MOVEQ.L #0x00,D7>                                        {}
        <POP 27316-27326 Naked>                              Σ0         ↓ →0x27316 ←0x27316
            <POP 0x27316 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {}
            <MI 2731c  CLR.B   (A6+D7.L-#0x60)>                                 {}
            <MI 27320  ADDQ.L  #0x1,D7>                                         {}
            <MI 27322  CMP.L   #0x07,D7>                                        {}
            <MI 27324  BLE     0x27316>                                         {}
        <POP 27326-27328 Naked>                              Σ0         ↓
            <MI 27326  MOVEQ.L #0x00,D7>                                        {}
        <POP 27328-27338 Naked>                              Σ0         ↓ →0x27328 ←0x27328
            <POP 0x27328 LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {}
            <MI 2732e  CLR.B   (A6+D7.L-#0x58)>                                 {}
            <MI 27332  ADDQ.L  #0x1,D7>                                         {}
            <MI 27334  CMP.L   #0x0f,D7>                                        {}
            <MI 27336  BLE     0x27328>                                         {}
        <POP 27338-27354 Naked>                              Σ0         ↓
            <MI 27338  MOVE.W  #0x02,(A6-0x48)>                                 {}
            <MI 2733c  MOVE.W  #0x11a,(A6-0x46)>                                {}
            <POP 27342-27344 StackAdj>                       Δ-4                {[-4-]}
            <MI 27344  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x27348 0x25804>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 2734c-2734e StackAdj>                       Δ+4                {[-4-]}
            <MI 2734e  MOVE.L  (A7)+,(A6-0x44)>              Δ+4                {}
            <MI 27352  MOVEQ.L #0x00,D7>                                        {}
        <POP 27354-27364 Naked>                              Σ0         ↓ →0x27354 ←0x27354
            <POP 0x27354 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {}
            <MI 2735a  CLR.B   (A6+D7.L-#0x40)>                                 {}
            <MI 2735e  ADDQ.L  #0x1,D7>                                         {}
            <MI 27360  CMP.L   #0x07,D7>                                        {}
            <MI 27362  BLE     0x27354>                                         {}
        <POP 27364-27366 Naked>                              Σ0         ↓
            <MI 27364  MOVEQ.L #0x00,D7>                                        {}
        <POP 27366-27376 Naked>                              Σ0         ↓ →0x27366 ←0x27366
            <POP 0x27366 LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {}
            <MI 2736c  CLR.B   (A6+D7.L-#0x38)>                                 {}
            <MI 27370  ADDQ.L  #0x1,D7>                                         {}
            <MI 27372  CMP.L   #0x0f,D7>                                        {}
            <MI 27374  BLE     0x27366>                                         {}
        <POP 27376-27408 Naked>                              Σ0         ↓ →0x27438
            <MI 27376  MOVE.L  #0x5,(A6-0x28)>                                  {}
            <MI 2737e  MOVE.L  0x21150,(A6-0x24)>                               {}
            <MI 27384  MOVE.L  0x21154,(A6-0x20)>                               {}
            <MI 2738a  MOVE.L  0x21158,(A6-0x1c)>                               {}
            <MI 27390  MOVE.L  0x2115c,(A6-0x18)>                               {}
            <MI 27396  ANDI.B  #0x80,(A6-0x1f)>                                 {}
            <MI 2739c  ORI.B   #0x06,(A6-0x1f)>                                 {}
            <MI 273a2  ANDI.B  #0x80,(A6-0x19)>                                 {}
            <MI 273a8  ORI.B   #0x05,(A6-0x19)>                                 {}
            <MI 273ae  MOVE.W  (A6-0x7a),D0>                                    {}
            <POP 0x273b2 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 273b6  MOVE.B  D0,(A6-0x1a)>                                    {}
            <MI 273ba  MOVE.L  (A6-0x24),(A6-0xa8)>                             {}
            <MI 273c0  MOVE.L  (A6-0x20),(A6-0xa4)>                             {}
            <MI 273c6  MOVE.L  (A6-0x1c),(A6-0xa0)>                             {}
            <MI 273cc  MOVE.L  (A6-0x18),(A6-0x9c)>                             {}
            <Pointer.fp 0x273d2 <LVAR -0x0a8 @ 4(rw)>>       Δ-4                {[@@-168]}
            <MI 273d6  LEA.L   (A6-0x90),A0>                                    {[@@-168]}
            <MI 273da  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-168]|[4, 'A0']}
            <Const 0x273dc 0x1.2>                            Δ-2                {[@@-168]|[4, 'A0']|[#1]}
            <Const 0x273de 0x6c.4>                           Δ-4                {[@@-168]|[4, 'A0']|[#1]|[##108]}
            <Const 0x273e2 0x9303fc00.4>                     Δ-4                {[@@-168]|[4, 'A0']|[#1]|[##108]|[##2466511872]}
            <Const 0x273e8 0x0.4>                            Δ-4                {[@@-168]|[4, 'A0']|[#1]|[##108]|[##2466511872]|[##0]}
            <Call 0x273ec 0x22766>                                              {[@@-168]|[4, 'A0']|[#1]|[##108]|[##2466511872]|[##0]}
            <POP 273f0-273f4 StackAdj>                       Δ+20               {[-2-]}
            <POP 273f4-273f5 StackAdj>                       Δ+2                {}
            <Const 0x273f5 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x273f6 <LVAR -0x014 @ 1(r)>>        Δ-4                {[#1]|[@@-20]}
            <Call 0x273fa 0x22676>                                              {[#1]|[@@-20]}
            <POP 273fe-27400 StackAdj>                       Δ+6                {}
            <MI 27400  TST.B   0x2d02c>                                         {}
            <MI 27406  BGT     0x27438>                                         {}
        <POP 27408-27438 Naked>                              Σ0         ↓
            <MI 27408  MOVE.L  (A6-0xa8),(A6-0x12)>                             {}
            <MI 2740e  MOVE.L  (A6-0xa4),(A6-0xe)>                              {}
            <MI 27414  MOVE.L  (A6-0xa0),(A6-0xa)>                              {}
            <MI 2741a  MOVE.L  (A6-0x9c),(A6-0x6)>                              {}
            <MI 27420  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 27424  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
            <MI 27428  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
            <MI 2742c  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Call 0x27430 0x21c90>                                              {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <POP 27434-27438 StackAdj>                       Δ+16               {}
        <POP 27438-2743e Naked>                              Σ0         ↓ →0x27448 ←0x27376
            <MI 27438  TST.B   (A6-0x14)>                                       {}
            <MI 2743c  BNE     0x27448>                                         {}
        <POP 2743e-27448 Naked>                              Σ0         ↓
            <Const 0x2743e 0x28.4>                           Δ-4                {[##40]}
            <Call 0x27442 0x2132c>                                              {[##40]}
            <POP 27446-27448 StackAdj>                       Δ+4                {}
        <POP 27448-27462 Naked>                              Σ0         ↓ →0x27472 ←0x27438
            <Blob 0x27448 [4] 0x2c7c4>                       Δ-4                {[«4»]}
            <Const 0x2744a 0x1.2>                            Δ-2                {[«4»]|[#1]}
            <Const 0x2744c 0x1.4>                            Δ-4                {[«4»]|[#1]|[##1]}
            <MI 27450  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#1]|[##1]|[#0]}
            <Call 0x27452 0x24cca>                                              {[«4»]|[#1]|[##1]|[#0]}
            <POP 27456-2745a StackAdj>                       Δ+12               {}
            <MI 2745a  TST.B   0x2d02c>                                         {}
            <MI 27460  BLE     0x27472>                                         {}
        <POP 27462-2746a Naked>                              Σ0         ↓ →0x27472
            <MI 27462  TST.B   0x2cc2f>                                         {}
            <MI 27468  BNE     0x27472>                                         {}
        <POP 2746a-27472 Naked>                              Σ0         ↓ →0x2749a
            <MI 2746a  TST.B   0x2cc30>                                         {}
            <MI 27470  BEQ     0x2749a>                                         {}
        <POP 27472-2749a Naked>                              Σ0         ↓ ←0x27448 ←0x27462
            <Blob 0x27472 [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x27478 [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x2747e [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x27484 [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x2748a 0x21c90>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 2748e-27492 StackAdj>                       Δ+16               {}
            <Call 0x27492 0x23b48>                                              {}
            <Call 0x27496 0x229d4>                                              {}
        <POP 2749a-274a2 Epilogue>                           Σ0         ←0x2746a

0x274a2


@ 274a2
        <LVAR  0x008 4(r)>
        <LVAR -0x00c @>
        <LVAR -0x014 4(rw)>
        <LVAR -0x018 4(rw)>
        <LVAR -0x01c 4(rw)>
        <LVAR -0x020 @ 4(rw)>
        <LVAR -0x022 2(w)>
        <LVAR -0x023 1(w)>
        <LVAR -0x024 1(w) 4(rw)>
        <LVAR -0x025 1(w)>
        <LVAR -0x026 1(w)>
        <LVAR -0x028 4(rw)>
        <LVAR -0x02b 1(w)>
        <LVAR -0x02c 4(rw)>
        <LVAR -0x030 4(rw)>
        <LVAR -0x430 @>
    <POP 274a2-27618 Body>                                              
        <POP 274a2-274b8 Prologue>                           Σ0         ↓
        <POP 274b8-274c6 RegCacheLoad>                       Σ0         ↓
        <POP 274c6-27516 Naked>                              Σ0 Δ-4     ↓
            <Blob 0x274c6 [26] @>                            Δ-26               {[«26""»]}
            <Const 0x274d8 0x1.2>                            Δ-2                {[«26""»]|[#1]}
            <POP 274da-274dc StackAdj>                       Δ-4                {[«26""»]|[#1]|[-4-]}
            <Lit 0x274dc 25>                                                    {[«26""»]|[#1]|[$$Procedure CMC_SEND_STRING]}
            <Call 0x274ee 0x22238>                                              {[«26""»]|[#1]|[$$Procedure CMC_SEND_STRING]}
            <POP 274f2-274f6 StackAdj>                       Δ+32               {}
            <MI 274f6  MOVEA.L (A6+0x8),A0>                                     {}
            <Const 0x274f8 0x1.2>                            Δ-2                {[#1]}
            <POP 274fa-274fc StackAdj>                       Δ-4                {[#1]|[-4-]}
            <MI 274fc  MOVE.L  (A0),-(A7)>                   Δ-4                {[#1]|[-4-]|[4, '(A0)']}
            <Call 0x274fe 0x102cc>                                              {[#1]|[-4-]|[4, '(A0)']}
                StringDup(a : String) : String
            <POP 27504-27506 StackAdj>                       Δ+4                {[#1]|[-4-]}
            <Call 0x27506 0x22238>                                              {[#1]|[-4-]}
            <POP 2750a-2750c StackAdj>                       Δ+6                {}
            <MI 2750c  MOVEA.L (A0),A0>                                         {}
            <MI 2750e  MOVE.W  (A0),D0>                                         {}
            <MI 27510  EXTW.L  D0>                                              {}
            <MI 27512  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 27514  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 27516-2751a Naked>                              Σ-4        ↓ →0x27548 ←0x2751a
            <MI 27516  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 27518  BGT     0x27548>                                         {[-4-]}
        <POP 2751a-27548 Naked>                              Σ-4        ↓ →0x27516
            <MI 2751a  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 2751c  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x2751e LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {[-4-]}
            <MI 27528  LEA.L   (A6-0x430),A0>                                   {[-4-]}
            <MI 2752c  MOVEA.L (A6+0x8),A1>                                     {[-4-]}
            <MI 2752e  MOVEA.L (A1),A1>                                         {[-4-]}
            <MI 27530  MOVE.L  D7,D1>                                           {[-4-]}
            <MI 27532  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x27534 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 2753e  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L)>                        {[-4-]}
            <MI 27544  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 27546  BVC     0x27516>                                         {[-4-]}
        <POP 27548-275f0 Naked>                              Σ-4 Δ+4    ↓ →0x27606 ←0x27516
            <POP 27548-2754a StackAdj>                       Δ+4                {}
            <MI 2754a  MOVE.L  0x21150,(A6-0x30)>                               {}
            <MI 27550  MOVE.L  0x21154,(A6-0x2c)>                               {}
            <MI 27556  MOVE.L  0x21158,(A6-0x28)>                               {}
            <MI 2755c  MOVE.L  0x2115c,(A6-0x24)>                               {}
            <MI 27560  ANDI.B  #0x80,(A6-0x2b)>                                 {}
            <MI 27566  ORI.B   #0x06,(A6-0x2b)>                                 {}
            <MI 2756c  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x27572 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2757c  MOVE.B  D0,(A6-0x26)>                                    {}
            <MI 27580  ANDI.B  #0x80,(A6-0x25)>                                 {}
            <MI 27586  ORI.B   #0x07,(A6-0x25)>                                 {}
            <MI 2758c  MOVE.B  #0x01,(A6-0x24)>                                 {}
            <MI 2758e  MOVE.B  #0x36,(A6-0x23)>                                 {}
            <MI 27594  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 27596  MOVEA.L (A0),A1>                                         {}
            <MI 27598  MOVE.W  (A1),D0>                                         {}
            <POP 0x2759a LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 275a2  MOVE.W  D0,(A6-0x22)>                                    {}
            <MI 275a6  MOVE.L  (A6-0x30),(A6-0x20)>                             {}
            <MI 275aa  MOVE.L  (A6-0x2c),(A6-0x1c)>                             {}
            <MI 275b0  MOVE.L  (A6-0x28),(A6-0x18)>                             {}
            <MI 275b6  MOVE.L  (A6-0x24),(A6-0x14)>                             {}
            <Pointer.fp 0x275ba <LVAR -0x020 @ 4(rw)>>       Δ-4                {[@@-32]}
            <MI 275bc  LEA.L   (A6-0x430),A1>                                   {[@@-32]}
            <MI 275c0  MOVE.L  A1,-(A7)>                     Δ-4                {[@@-32]|[4, 'A1']}
            <Const 0x275c2 0x1.2>                            Δ-2                {[@@-32]|[4, 'A1']|[#1]}
            <MI 275c4  CLR.L   D1>                                              {[@@-32]|[4, 'A1']|[#1]}
            <MI 275c6  MOVE.W  D0,D1>                                           {[@@-32]|[4, 'A1']|[#1]}
            <MI 275c8  MOVE.L  D1,-(A7)>                     Δ-4                {[@@-32]|[4, 'A1']|[#1]|[4, 'D1']}
            <Const 0x275ca 0x9303fc00.4>                     Δ-4                {[@@-32]|[4, 'A1']|[#1]|[4, 'D1']|[##2466511872]}
            <Const 0x275d0 0x0.4>                            Δ-4                {[@@-32]|[4, 'A1']|[#1]|[4, 'D1']|[##2466511872]|[##0]}
            <Call 0x275d4 0x22766>                                              {[@@-32]|[4, 'A1']|[#1]|[4, 'D1']|[##2466511872]|[##0]}
            <POP 275d8-275dc StackAdj>                       Δ+20               {[-2-]}
            <POP 275dc-275dd StackAdj>                       Δ+2                {}
            <Const 0x275dd 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x275de <LVAR -0x00c @>>             Δ-4                {[#1]|[@@-12]}
            <Call 0x275e2 0x22676>                                              {[#1]|[@@-12]}
            <POP 275e6-275e8 StackAdj>                       Δ+6                {}
            <MI 275e8  TST.B   0x2d02c>                                         {}
            <MI 275ee  BGT     0x27606>                                         {}
        <POP 275f0-27606 Naked>                              Σ0         ↓
            <MI 275f0  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0x14)']}
            <MI 275f4  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <MI 275f8  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <MI 275fc  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6-0x20)']}
            <Call 0x275fe 0x21c32>                                              {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6-0x20)']}
            <POP 27602-27606 StackAdj>                       Δ+16               {}
        <POP 27606-27610 Naked>                              Σ0         ↓ ←0x27548
            <MI 27606  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x27608 0x102bc>                                              {[4, '^(A0)']}
                FreeString(VAR a : String)
            <POP 2760e-27610 StackAdj>                       Δ+4                {}
        <POP 27610-27618 Epilogue>                           Σ0         

0x27618


@ 27618
        <LVAR  0x008 4(w)>
        <LVAR -0x008 @ 4(r)>
    <POP 27618-2775a Body>                                              
        <POP 27618-2762e Prologue>                           Σ0         ↓
        <POP 2762e-27640 RegCacheLoad>                       Σ0         ↓
        <POP 27640-2769a Naked>                              Σ0         ↓ →0x276a6
            <Blob 0x27640 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x2764c 0x1.2>                            Δ-2                {[«24""»]|[#1]}
            <POP 2764e-27650 StackAdj>                       Δ-4                {[«24""»]|[#1]|[-4-]}
            <Lit 0x27650 24>                                                    {[«24""»]|[#1]|[$$Procedure CMC_GET_STRING]}
            <Call 0x27662 0x22238>                                              {[«24""»]|[#1]|[$$Procedure CMC_GET_STRING]}
            <POP 27666-2766a StackAdj>                       Δ+30               {}
            <Call 0x2766a 0x26190>                                              {}
            <Pointer.fp 0x2766e <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Call 0x27670 0x102b8>                                              {[@@-8]}
                NewString(VAR a : String)
            <POP 27676-27677 StackAdj>                       Δ+4                {}
            <Blob 0x27677 [4] 0x2c7c4>                       Δ-4                {[«4»]}
            <Const 0x2767c 0x1.2>                            Δ-2                {[«4»]|[#1]}
            <Const 0x2767e 0x1.4>                            Δ-4                {[«4»]|[#1]|[##1]}
            <MI 27682  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#1]|[##1]|[#0]}
            <Call 0x27684 0x24cca>                                              {[«4»]|[#1]|[##1]|[#0]}
            <POP 27688-2768c StackAdj>                       Δ+12               {}
            <MI 2768c  CLR.L   D0>                                              {}
            <MI 2768e  MOVE.B  0x2c7e7,D0>                                      {}
            <MI 27694  CMPI.W  #0x00ff,D0>                                      {}
            <MI 27698  BEQ     0x276a6>                                         {}
        <POP 2769a-276a6 Naked>                              Σ0         →0x276ae
            <MI 2769a  CLR.L   D0>                                              {}
            <MI 2769c  MOVE.W  0x2c7e8,D0>                                      {}
            <MI 276a2  MOVE.L  D0,D6>                                           {}
            <MI 276a4  BRA     0x276ae>                                         {}
        <POP 276a6-276ae Naked>                              Σ0         ↓ ←0x27640
            <Const 0x276a6 0x2e.4>                           Δ-4                {[##46]}
            <Call 0x276aa 0x2132c>                                              {[##46]}
            <POP 276ac-276ae StackAdj>                       Δ+4                {}
        <POP 276ae-276ba Naked>                              Σ0         ↓ →0x276c2 ←0x2769a
            <MI 276ae  CLR.L   D0>                                              {}
            <MI 276b0  MOVE.B  0x2cc13,D0>                                      {}
            <MI 276b6  CMP.W   #0x3a,D0>                                        {}
            <MI 276b8  BEQ     0x276c2>                                         {}
        <POP 276ba-276c2 Naked>                              Σ0         ↓
            <Const 0x276ba 0x19.4>                           Δ-4                {[##25]}
            <Call 0x276be 0x2132c>                                              {[##25]}
            <POP 276c0-276c2 StackAdj>                       Δ+4                {}
        <POP 276c2-276e0 Naked>                              Σ0         ↓ →0x276e8 ←0x276ae
            <MI 276c2  MOVE.L  D6,D0>                                           {}
            <MI 276c4  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x276c6 LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {}
            <MI 276d0  LEA.L   0x2c794,A0>                                      {}
            <MI 276d2  LEA.L   (A0+D0.L),A0>                                    {}
            <MI 276d6  CLR.L   D1>                                              {}
            <MI 276d8  MOVE.B  (A0+0x47f),D1>                                   {}
            <MI 276dc  CMP.W   #0x3a,D1>                                        {}
            <MI 276de  BEQ     0x276e8>                                         {}
        <POP 276e0-276e8 Naked>                              Σ0         ↓
            <Const 0x276e0 0x2a.4>                           Δ-4                {[##42]}
            <Call 0x276e4 0x2132c>                                              {[##42]}
            <POP 276e6-276e8 StackAdj>                       Δ+4                {}
        <POP 276e8-2770a Naked>                              Σ0 Δ-4     ↓ ←0x276c2
            <MI 276e8  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 276ea  MOVE.L  D6,D1>                                           {}
            <MI 276ec  SUBQ.L  #0x2,D1>                                         {}
            <POP 0x276ee LimitCheck -0x8000 ≤ D1 ≤ 0x7fff>                      {}
            <MI 27704  MOVE.W  D1,(A0)>                                         {}
            <MI 27706  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 27708  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 2770a-2770e Naked>                              Σ-4        ↓ →0x27738 ←0x2770e
            <MI 2770a  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2770c  BGT     0x27738>                                         {[-4-]}
        <POP 2770e-27738 Naked>                              Σ-4        ↓ →0x2770a
            <MI 2770e  MOVEA.L (A6-0x8),A0>                                     {[-4-]}
            <MI 27710  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 27712  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x27714 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <POP 0x2771e LimitCheck 0x0 ≤ D7 ≤ 0x3ff>                           {[-4-]}
            <MI 27728  LEA.L   0x2c794,A1>                                      {[-4-]}
            <MI 2772a  LEA.L   (A1+D7.L),A1>                                    {[-4-]}
            <MI 2772e  MOVE.B  (A1+0x47f),(A0+D0.L+#0x2)>                       {[-4-]}
            <MI 27734  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 27736  BVC     0x2770a>                                         {[-4-]}
        <POP 27738-27752 Naked>                              Σ-4 Δ+4    ↓ ←0x2770a
            <POP 27738-2773a StackAdj>                       Δ+4                {}
            <MI 2773a  MOVE.L  (A6-0x8),(A6+0x8)>                               {}
            <Const 0x2773e 0x1.2>                            Δ-2                {[#1]}
            <POP 27740-27742 StackAdj>                       Δ-4                {[#1]|[-4-]}
            <MI 27742  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[#1]|[-4-]|[4, '(A6-0x8)']}
            <Call 0x27744 0x102cc>                                              {[#1]|[-4-]|[4, '(A6-0x8)']}
                StringDup(a : String) : String
            <POP 2774a-2774c StackAdj>                       Δ+4                {[#1]|[-4-]}
            <Call 0x2774c 0x22238>                                              {[#1]|[-4-]}
            <POP 27750-27752 StackAdj>                       Δ+6                {}
        <POP 27752-2775a Epilogue>                           Σ0         

0x2775a


@ 2775a
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 4(rw)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 @ 4(rw)>
        <LVAR -0x018 4(rw)>
        <LVAR -0x019 1(w)>
        <LVAR -0x01a 1(w)>
        <LVAR -0x01c 4(rw)>
        <LVAR -0x01f 1(w)>
        <LVAR -0x020 4(rw)>
        <LVAR -0x024 4(rw)>
        <LVAR -0x026 2(w)>
        <LVAR -0x028 2(r)>
        <LVAR -0x02a 2(w)>
        <LVAR -0x02c 2(r)>
        <LVAR -0x030 4(w)>
        <LVAR -0x034 4(r)>
        <LVAR -0x036 2(r)>
        <LVAR -0x038 2(r)>
        <LVAR -0x03c 4(r)>
        <LVAR -0x03e 2(r)>
        <LVAR -0x040 @ 2(r)>
    <POP 2775a-2791e Body>                                              
        <POP 2775a-27770 Prologue>                           Σ0         ↓
        <POP 27770-27782 RegCacheLoad>                       Σ0         ↓
        <POP 27782-277b4 Naked>                              Σ0         ↓ →0x277f0
            <Blob 0x27782 [20] @>                            Δ-20               {[«20""»]}
            <Const 0x27792 0x1.2>                            Δ-2                {[«20""»]|[#1]}
            <POP 27794-27796 StackAdj>                       Δ-4                {[«20""»]|[#1]|[-4-]}
            <Lit 0x27796 19>                                                    {[«20""»]|[#1]|[$$Procedure CMC_CLOSE]}
            <Call 0x277a8 0x22238>                                              {[«20""»]|[#1]|[$$Procedure CMC_CLOSE]}
            <POP 277ac-277b0 StackAdj>                       Δ+26               {}
            <MI 277b0  TST.B   0x2d02c>                                         {}
            <MI 277b2  BGT     0x277f0>                                         {}
        <POP 277b4-277f0 Naked>                              Σ0         ↓
            <Blob 0x277b4 [16] @>                            Δ-16               {[«16""»]}
            <POP 277c4-277c6 StackAdj>                       Δ-8                {[«16""»]|[-8-]}
            <Lit 0x277c6 15>                                                    {[«16""»]|[-4-]|[$$Closing channel]}
            <POP 277d6-277d7 StackAdj>                       Δ-4                {[«16""»]|[-4-]|[$$Closing channel]|[-4-]}
            <Blob 0x277d7 [4] 0x2c7c4>                       Δ-4                {[«16""»]|[-4-]|[$$Closing channel]|[-4-]|[«4»]}
            <Call 0x277d8 0x102e4>                                              {[«16""»]|[-4-]|[$$Closing channel]|[-4-]|[«4»]}
                Long2String(a : Long) : String
            <POP 277de-277e0 StackAdj>                       Δ+4                {[«16""»]|[-4-]|[$$Closing channel]|[-4-]}
            <Call 0x277e0 0x102d0>                                              {[«16""»]|[-4-]|[$$Closing channel]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 277e6-277e8 StackAdj>                       Δ+8                {[«16""»]|[-4-]}
            <Call 0x277e8 0x103e0>                                              {[«16""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 277ee-277f0 StackAdj>                       Δ+20               {}
        <POP 277f0-278b8 Naked>                              Σ0         ↓ →0x278c2 ←0x27782
            <MI 277f0  CLR.W   (A6-0x40)>                                       {}
            <MI 277f4  CLR.W   (A6-0x3e)>                                       {}
            <MI 277f8  CLR.L   (A6-0x3c)>                                       {}
            <MI 277fc  CLR.W   (A6-0x38)>                                       {}
            <MI 27800  CLR.W   (A6-0x36)>                                       {}
            <MI 27804  CLR.L   (A6-0x34)>                                       {}
            <MI 27808  MOVE.L  #0x20,(A6-0x30)>                                 {}
            <MI 27810  CLR.W   (A6-0x2c)>                                       {}
            <MI 27814  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x27816 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 27820  MOVE.W  D0,(A6-0x2a)>                                    {}
            <MI 27824  CLR.W   (A6-0x28)>                                       {}
            <MI 27828  MOVE.W  #0x4,(A6-0x26)>                                  {}
            <MI 2782e  MOVE.L  0x21150,(A6-0x24)>                               {}
            <MI 27834  MOVE.L  0x21154,(A6-0x20)>                               {}
            <MI 2783a  MOVE.L  0x21158,(A6-0x1c)>                               {}
            <MI 27840  MOVE.L  0x2115c,(A6-0x18)>                               {}
            <MI 27846  ANDI.B  #0x80,(A6-0x1f)>                                 {}
            <MI 2784c  ORI.B   #0x06,(A6-0x1f)>                                 {}
            <MI 27852  ANDI.B  #0x80,(A6-0x19)>                                 {}
            <MI 27858  ORI.B   #0x05,(A6-0x19)>                                 {}
            <MI 2785e  MOVE.L  0x2c7c4,D0>                                      {}
            <POP 0x27860 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2786a  MOVE.B  D0,(A6-0x1a)>                                    {}
            <MI 2786e  MOVE.L  (A6-0x24),(A6-0x14)>                             {}
            <MI 27874  MOVE.L  (A6-0x20),(A6-0x10)>                             {}
            <MI 2787a  MOVE.L  (A6-0x1c),(A6-0xc)>                              {}
            <MI 27880  MOVE.L  (A6-0x18),(A6-0x8)>                              {}
            <Pointer.fp 0x27886 <LVAR -0x014 @ 4(rw)>>       Δ-4                {[@@-20]}
            <MI 2788a  LEA.L   (A6-0x40),A0>                                    {[@@-20]}
            <MI 2788e  MOVE.L  A0,-(A7)>                     Δ-4                {[@@-20]|[4, 'A0']}
            <Const 0x27890 0x1.2>                            Δ-2                {[@@-20]|[4, 'A0']|[#1]}
            <Const 0x27892 0x1c.4>                           Δ-4                {[@@-20]|[4, 'A0']|[#1]|[##28]}
            <Const 0x27896 0x9303fc00.4>                     Δ-4                {[@@-20]|[4, 'A0']|[#1]|[##28]|[##2466511872]}
            <Const 0x2789c 0x0.4>                            Δ-4                {[@@-20]|[4, 'A0']|[#1]|[##28]|[##2466511872]|[##0]}
            <Call 0x278a0 0x22766>                                              {[@@-20]|[4, 'A0']|[#1]|[##28]|[##2466511872]|[##0]}
            <POP 278a4-278a6 StackAdj>                       Δ+20               {[-2-]}
            <POP 278a6-278a7 StackAdj>                       Δ+2                {}
            <Const 0x278a7 0x1.2>                            Δ-2                {[#1]}
            <Pointer.fp 0x278a8 <LVAR -0x004 @ 1(r)>>        Δ-4                {[#1]|[@@-4]}
            <Call 0x278ac 0x22676>                                              {[#1]|[@@-4]}
            <POP 278b0-278b2 StackAdj>                       Δ+6                {}
            <MI 278b2  TST.B   (A6-0x4)>                                        {}
            <MI 278b6  BNE     0x278c2>                                         {}
        <POP 278b8-278c2 Naked>                              Σ0         ↓
            <Const 0x278b8 0x2d.4>                           Δ-4                {[##45]}
            <Call 0x278bc 0x2132c>                                              {[##45]}
            <POP 278c0-278c2 StackAdj>                       Δ+4                {}
        <POP 278c2-278e6 Naked>                              Σ0         ↓ →0x27904 ←0x277f0
            <MI 278c2  MOVE.L  (A6-0x14),0x2c7da>                               {}
            <MI 278ca  MOVE.L  (A6-0x10),0x2c7de>                               {}
            <MI 278d2  MOVE.L  (A6-0xc),0x2c7e2>                                {}
            <MI 278da  MOVE.L  (A6-0x8),0x2c7e6>                                {}
            <MI 278e2  TST.B   0x2d02c>                                         {}
            <MI 278e4  BGT     0x27904>                                         {}
        <POP 278e6-27904 Naked>                              Σ0         ↓
            <Blob 0x278e6 [4] 0x2c7e6>                       Δ-4                {[«4»]}
            <Blob 0x278ec [4] 0x2c7e2>                       Δ-4                {[«4»]|[«4»]}
            <Blob 0x278f2 [4] 0x2c7de>                       Δ-4                {[«4»]|[«4»]|[«4»]}
            <Blob 0x278f8 [4] 0x2c7da>                       Δ-4                {[«4»]|[«4»]|[«4»]|[«4»]}
            <Call 0x278fe 0x21c90>                                              {[«4»]|[«4»]|[«4»]|[«4»]}
            <POP 27902-27904 StackAdj>                       Δ+16               {}
        <POP 27904-27916 Naked>                              Σ0         ↓ ←0x278c2
            <Blob 0x27904 [4] 0x2c7c4>                       Δ-4                {[«4»]}
            <Const 0x27906 0x1.2>                            Δ-2                {[«4»]|[#1]}
            <Const 0x27908 0x1.4>                            Δ-4                {[«4»]|[#1]|[##1]}
            <MI 2790c  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#1]|[##1]|[#0]}
            <Call 0x2790e 0x24cca>                                              {[«4»]|[#1]|[##1]|[#0]}
            <POP 27912-27916 StackAdj>                       Δ+12               {}
        <POP 27916-2791e Epilogue>                           Σ0         

0x2791e


@ 2791e
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 @>
        <LVAR -0x00a @ 1(r)>
        <LVAR -0x010 @ 1(r)>
        <LVAR -0x016 @ 1(r)>
        <LVAR -0x01a @ 4(r)>
        <LVAR -0x01c @ 1(r)>
    <POP 2791e-27ccc Body>                                   Δ+4        
        <POP 2791e-27934 Prologue>                           Σ0         ↓
        <POP 27934-27948 RegCacheLoad>                       Σ0         ↓
        <POP 27948-27952 Naked>                              Σ0         ↓ →0x27a0a
            <MI 27948  TST.B   0x2c7d4>                                         {}
            <MI 2794e  BNE     0x27a0a>                                         {}
        <POP 27952-279ae Naked>                              Σ0         ↓ →0x279b4
            <Blob 0x27952 [2] @>                             Δ-2                {[«2""»]}
            <MI 27956  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 27958-2795a StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x2795a 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$DD]}
            <POP 27964-27966 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]}
            <MI 27966  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]}
            <Pointer.fp 0x27968 <LVAR -0x016 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]|[@@-22]}
            <Pointer.fp 0x2796c <LVAR -0x008 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]|[@@-22]|[@@-8]}
            <Call 0x27970 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]|[@@-22]|[@@-8]}
            <POP 27974-27978 StackAdj>                       Δ+16               {[«2""»]|[-2-]}
            <POP 27978-27979 StackAdj>                       Δ+2                {[«2""»]}
            <Blob 0x27979 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <MI 2797c  MOVE.B  0x20eb1,(A7+0x1)>                                {[«2""»]|[«2""»]}
            <MI 27982  MOVE.B  0x20eb2,(A7+0x2)>                                {[«2""»]|[«2""»]}
            <MI 27988  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']}
            <POP 2798a-2798c StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x2798c 3>                                                     {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]}
            <POP 27996-27998 StackAdj>                       Δ-2                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]}
            <MI 27998  CLR.B   (A7)>                                            {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]}
            <Pointer.fp 0x2799a <LVAR -0x00a @ 1(r)>>        Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]|[@@-10]}
            <Pointer.fp 0x2799e <LVAR -0x008 @>>             Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]|[@@-10]|[@@-8]}
            <Call 0x279a2 0x21cee>                                              {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]|[@@-10]|[@@-8]}
            <POP 279a6-279a8 StackAdj>                       Δ+22               {}
            <MI 279a8  TST.B   (A6-0x16)>                                       {}
            <MI 279ac  BNE     0x279b4>                                         {}
        <POP 279ae-279b4 Naked>                              Σ0         ↓ →0x27a06
            <MI 279ae  TST.B   (A6-0xa)>                                        {}
            <MI 279b2  BEQ     0x27a06>                                         {}
        <POP 279b4-27a06 Naked>                              Σ0         →0x27a0a ←0x27952
            <MI 279b4  MOVE.B  #0x01,0x2c7d4>                                   {}
            <MI 279ba  MOVE.B  #0x01,0x2cc12>                                   {}
            <MI 279c0  CLR.B   0x2e0f6>                                         {}
            <MI 279c6  MOVE.B  #0x01,0x2e0f7>                                   {}
            <MI 279cc  CLR.B   0x2e0f8>                                         {}
            <MI 279d2  CLR.W   0x2e0fa>                                         {}
            <MI 279d8  MOVE.W  #0x01,0x2e0fc>                                   {}
            <MI 279de  LEA.L   0x2c812,A0>                                      {}
            <MI 279e4  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 279e6  MOVE.L  (A7)+,0x2e0fe>                Δ+4                {}
            <MI 279ec  MOVE.L  #0x400,0x2e102>                                  {}
            <MI 279f6  LEA.L   0x2c802,A0>                                      {}
            <MI 279fc  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 279fe  MOVE.L  (A7)+,0x2e106>                Δ+4                {}
            <MI 27a04  BRA     0x27a0a>                                         {}
        <POP 27a06-27a0a Naked>                              Σ0         ↓ ←0x279ae
            <Call 0x27a06 0x26b42>                                              {}
        <POP 27a0a-27a76 Naked>                              Σ0         ↓ →0x27ab2 ←0x27948 ←0x279b4
            <Call 0x27a0a 0x25c28>                                              {}
            <Call 0x27a0e 0x2571e>                                              {}
            <MI 27a12  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x27a14 0x259a8>                                              {[4, '(A6+0x8)']}
            <POP 27a18-27a19 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x27a19 [6] @>                             Δ-6                {[«6""»]}
            <POP 27a28-27a2a StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x27a2a 5>                                                     {[«6""»]|[$$:get:]}
            <Call 0x27a38 0x25d72>                                              {[«6""»]|[$$:get:]}
            <POP 27a3c-27a3e StackAdj>                       Δ+6                {[-4-]}
            <Call 0x27a3e 0x25ef0>                                              {[-4-]}
            <MI 27a42  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <Blob 0x27a44 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x27a48 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <MI 27a4c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']}
            <POP 27a4e-27a50 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x27a50 8>                                                     {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]}
            <POP 27a5c-27a5e StackAdj>                       Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[-2-]}
            <POP 27a5e-27a5f StackAdj>                       Δ+2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]}
            <Const 0x27a5f 0x1.2>                            Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]}
            <Pointer.fp 0x27a60 <LVAR -0x01c @ 1(r)>>        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]|[@@-28]}
            <Pointer.fp 0x27a64 <LVAR -0x01a @ 4(r)>>        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]|[@@-28]|[@@-26]}
            <Call 0x27a68 0x21cee>                                              {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]|[@@-28]|[@@-26]}
            <POP 27a6c-27a70 StackAdj>                       Δ+26               {}
            <MI 27a70  TST.B   (A6-0x1c)>                                       {}
            <MI 27a74  BEQ     0x27ab2>                                         {}
        <POP 27a76-27a7e Naked>                              Σ0 Δ-4     ↓
            <Blob 0x27a76 [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x27a7a [2] @>                             Δ-2                {[«2""»]|[«2""»]}
        <POP 27a7e-27ab2 Naked>                              Σ-4 Δ+4    →0x27b5e ←0x27aea
            <POP 27a7e-27a80 StackAdj>                       Δ-8                {[-12-]}
            <Lit 0x27a80>                                                       {[-8-]|[$$…]}
                <Pointer.sp 0x27a80 10>                      Δ-4        
                <Const 0x27a84 0x1.2>                        Δ-2        
                <Const 0x27a86 0x2.2>                        Δ-2        
                <Call 0x27a88 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 27a8a-27a8c StackAdj>                   Δ+8        
            <POP 27a8a-27a8c StackAdj>                       Δ-4                {[-8-]|[$$…]|[-4-]}
            <MI 27a8c  MOVE.L  (A6-0x1a),(A7)>                                  {[-8-]|[$$…]|[4, '(A6-0x1a)']}
            <POP 27a90-27a92 StackAdj>                       Δ-4                {[-8-]|[$$…]|[4, '(A6-0x1a)']|[-4-]}
            <Lit 0x27a92>                                                       {[-8-]|[$$…]|[4, '(A6-0x1a)']|[$$…]}
                <Pointer.sp 0x27a92 16>                      Δ-4        
                <Const 0x27a96 0x1.2>                        Δ-2        
                <Const 0x27a98 0x2.2>                        Δ-2        
                <Call 0x27a9a 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 27a9c-27a9e StackAdj>                   Δ+8        
            <Call 0x27a9e 0x102d4>                                              {[-8-]|[$$…]|[4, '(A6-0x1a)']|[$$…]}
                StringCat3(a, b, c : String) : String
            <POP 27aa4-27aa6 StackAdj>                       Δ+12               {[-8-]}
            <MI 27aa6  MOVE.L  (A7)+,0x2d8be>                Δ+4                {[-4-]}
            <POP 27aac-27aae StackAdj>                       Δ+4                {}
            <MI 27aae  BRA     0x27b5e>                                         {}
        <POP 27ab2-27aea Naked>                              Σ0         ↓ →0x27af4 ←0x27a0a
            <POP 27ab2-27ab4 StackAdj>                       Δ-4                {[-4-]}
            <POP 27ab4-27ab5 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x27ab5 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 27ab8  MOVE.B  0x20ec7,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 27abe  MOVE.B  0x20ec8,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 27ac4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']}
            <POP 27ac6-27ac8 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x27ac8>                                                       {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
                <Pointer.sp 0x27ac8 8>                       Δ-4        
                <Const 0x27acc 0x1.2>                        Δ-2        
                <Const 0x27ace 0x3.2>                        Δ-2        
                <Call 0x27ad0 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 27ad2-27ad4 StackAdj>                   Δ+8        
            <POP 27ad2-27ad4 StackAdj>                       Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
            <POP 27ad4-27ad5 StackAdj>                       Δ+2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
            <Const 0x27ad5 0x1.2>                            Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]}
            <Pointer.fp 0x27ad6 <LVAR -0x01c @ 1(r)>>        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-28]}
            <Pointer.fp 0x27ada <LVAR -0x01a @ 4(r)>>        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-28]|[@@-26]}
            <Call 0x27ade 0x21cee>                                              {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-28]|[@@-26]}
            <POP 27ae2-27ae4 StackAdj>                       Δ+22               {}
            <MI 27ae4  TST.B   (A6-0x1c)>                                       {}
            <MI 27ae8  BEQ     0x27af4>                                         {}
        <POP 27aea-27af4 Naked>                              Σ0 Δ-4     →0x27a7e
            <Blob 0x27aea [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x27aee [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <MI 27af2  BRA     0x27a7e>                                         {[«2""»]|[«2""»]}
        <POP 27af4-27b5e Naked>                              Σ0         ↓ ←0x27ab2
            <Blob 0x27af4 [2] @>                             Δ-2                {[«2""»]}
            <POP 27af8-27afa StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x27afa 2>                                                     {[«2""»]|[$$:!]}
            <MI 27b06  MOVE.L  (A7)+,0x2d8be>                Δ+4                {[«2""»]}
            <POP 27b0c-27b0e StackAdj>                       Δ+2                {}
            <Blob 0x27b0e [28] @>                            Δ-28               {[«28""»]}
            <POP 27b1a-27b1c StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Blob 0x27b1c [4] 0x2d8be>                       Δ-4                {[«28""»]|[-4-]|[«4»]}
            <POP 27b22-27b24 StackAdj>                       Δ-8                {[«28""»]|[-4-]|[«4»]|[-8-]}
            <Lit 0x27b24 28>                                                    {[«28""»]|[-4-]|[«4»]|[-4-]|[$$Enter full R1000 pathname :_]}
            <Call 0x27b32 0x103e4>                                              {[«28""»]|[-4-]|[«4»]|[-4-]|[$$Enter full R1000 pathname :_]}
                AskConsoleString(prompt : String) : String
            <POP 27b38-27b3a StackAdj>                       Δ+4                {[«28""»]|[-4-]|[«4»]|[-4-]}
            <Call 0x27b3a 0x102d0>                                              {[«28""»]|[-4-]|[«4»]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 27b40-27b42 StackAdj>                       Δ+8                {[«28""»]|[-4-]}
            <MI 27b42  MOVE.L  (A7)+,0x2d8be>                Δ+4                {[«28""»]}
            <POP 27b48-27b4c StackAdj>                       Δ+24               {[-4-]}
            <POP 27b4c-27b4d StackAdj>                       Δ+4                {}
            <Blob 0x27b4d [4] 0x2d8be>                       Δ-4                {[«4»]}
            <Const 0x27b52 0x3a.2>                           Δ-2                {[«4»]|[#58]}
            <Call 0x27b56 0x102c0>                                              {[«4»]|[#58]}
                AppendChar(MOD b : String; a : char)
            <POP 27b5c-27b5e StackAdj>                       Δ+6                {}
        <POP 27b5e-27b98 Naked>                              Σ0 Δ-4     ↓ ←0x27a7e
            <Pointer.fp 0x27b5e <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-4]}
            <Call 0x27b62 0x102b8>                                              {[@@-4]}
                NewString(VAR a : String)
            <POP 27b68-27b6a StackAdj>                       Δ+4                {}
            <MI 27b6a  MOVEA.L (A6-0x4),A0>                                     {}
            <MI 27b6e  MOVEA.L 0x2d8be,A1>                                      {}
            <MI 27b74  MOVE.W  (A1),D0>                                         {}
            <MI 27b76  EXTW.L  D0>                                              {}
            <MI 27b78  SUBQ.L  #0x2,D0>                                         {}
            <POP 0x27b7a LimitCheck -0x8000 ≤ D0 ≤ 0x7fff>                      {}
            <MI 27b90  MOVE.W  D0,(A0)>                                         {}
            <MI 27b92  EXTW.L  D0>                                              {}
            <MI 27b94  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 27b96  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 27b98-27b9c Naked>                              Σ-4        ↓ →0x27bce ←0x27b9c
            <MI 27b98  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 27b9a  BGT     0x27bce>                                         {[-4-]}
        <POP 27b9c-27bce Naked>                              Σ-4        ↓ →0x27b98
            <MI 27b9c  MOVEA.L (A6-0x4),A0>                                     {[-4-]}
            <MI 27ba0  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 27ba2  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x27ba4 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 27bae  MOVEA.L 0x2d8be,A1>                                      {[-4-]}
            <MI 27bb4  MOVE.L  D7,D1>                                           {[-4-]}
            <MI 27bb6  ADDQ.L  #0x1,D1>                                         {[-4-]}
            <MI 27bb8  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x27bba LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 27bc4  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x2)>                   {[-4-]}
            <MI 27bca  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 27bcc  BVC     0x27b98>                                         {[-4-]}
        <POP 27bce-27c0e Naked>                              Σ-4 Δ-4    ↓ →0x27c68 ←0x27b98
            <POP 27bce-27bcf StackAdj>                       Δ+4                {}
            <Blob 0x27bcf [4] 0x2d8be>                       Δ-4                {[«4»]}
            <Call 0x27bd4 0x25d72>                                              {[«4»]}
            <Call 0x27bd8 0x25ef0>                                              {[«4»]}
            <MI 27bdc  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <Blob 0x27bde [8] @>                             Δ-8                {[«8""»]}
            <POP 27bee-27bf0 StackAdj>                       Δ-2                {[«8""»]|[-2-]}
            <MI 27bf0  MOVE.L  A4,-(A7)>                     Δ-4                {[«8""»]|[-2-]|[4, 'A4']}
            <POP 27bf2-27bf4 StackAdj>                       Δ-4                {[«8""»]|[-2-]|[4, 'A4']|[-4-]}
            <Lit 0x27bf4 7>                                                     {[«8""»]|[-2-]|[4, 'A4']|[$$aborted]}
            <Call 0x27c02 0x102c8>                                              {[«8""»]|[-2-]|[4, 'A4']|[$$aborted]}
                StringEqual(a, b : String) : Byte
            <POP 27c08-27c0a StackAdj>                       Δ+8                {[«8""»]|[-2-]}
            <MI 27c0a  TST.B   (A7)+>                        Δ+2                {[«8""»]}
            <MI 27c0c  BEQ     0x27c68>                                         {[«8""»]}
        <POP 27c0e-27c68 Naked>                              Σ-8        →0x27cbe
            <Blob 0x27c0e [14] @>                            Δ-14               {[-8-]|[«14""»]}
            <POP 27c1a-27c1c StackAdj>                       Δ-4                {[-8-]|[«14""»]|[-4-]}
            <Lit 0x27c1c 14>                                                    {[-8-]|[«14""»]|[$$BEKINS.ERRMESS]}
            <Const 0x27c2a 0x1d.4>                           Δ-4                {[-8-]|[«14""»]|[$$BEKINS.ERRMESS]|[##29]}
            <Call 0x27c2e 0x10450>                                              {[-8-]|[«14""»]|[$$BEKINS.ERRMESS]|[##29]}
                FS_10450(&, &)
            <POP 27c34-27c38 StackAdj>                       Δ+18               {[-8-]|[-4-]}
            <POP 27c38-27c39 StackAdj>                       Δ+4                {[-8-]}
            <Blob 0x27c39 [4] @>                             Δ-4                {[-8-]|[«4""»]}
            <POP 27c3c-27c3e StackAdj>                       Δ-8                {[-8-]|[«4""»]|[-8-]}
            <Lit 0x27c3e 4>                                                     {[-8-]|[«4""»]|[-4-]|[$$   _]}
            <POP 27c4a-27c4c StackAdj>                       Δ-4                {[-8-]|[«4""»]|[-4-]|[$$   _]|[-4-]}
            <MI 27c4c  MOVE.L  (A6-0x4),(A7)>                                   {[-8-]|[«4""»]|[-4-]|[$$   _]|[4, '(A6-0x4)']}
            <Call 0x27c50 0x102d0>                                              {[-8-]|[«4""»]|[-4-]|[$$   _]|[4, '(A6-0x4)']}
                StringCat2(a, b : String) : String
            <POP 27c56-27c58 StackAdj>                       Δ+8                {[-8-]|[«4""»]|[-4-]}
            <Call 0x27c58 0x103e0>                                              {[-8-]|[«4""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 27c5e-27c60 StackAdj>                       Δ+8                {[-8-]}
            <Call 0x27c60 0x103dc>                                              {[-8-]}
                WriteConsoleCrLf(void)
            <MI 27c66  BRA     0x27cbe>                                         {[-8-]}
        <POP 27c68-27c8c Naked>                              Σ-8        ↓ →0x27cb6 ←0x27bce
            <Pointer.fp 0x27c68 <LVAR -0x004 @ 4(r)>>        Δ-4                {[-8-]|[@@-4]}
            <Call 0x27c6c 0x102bc>                                              {[-8-]|[@@-4]}
                FreeString(VAR a : String)
            <MI 27c72  MOVE.L  A4,(A7)>                                         {[-8-]|[4, 'A4']}
            <Pointer.fp 0x27c74 <LVAR -0x010 @ 1(r)>>        Δ-4                {[-8-]|[4, 'A4']|[@@-16]}
            <Const 0x27c78 0x2c7d6.4>                        Δ-4                {[-8-]|[4, 'A4']|[@@-16]|[##182230]}
            <Call 0x27c7e 0x102ec>                                              {[-8-]|[4, 'A4']|[@@-16]|[##182230]}
                String2Long(src : String; VAR status : Bool; VAR retval : Long)
            <POP 27c84-27c86 StackAdj>                       Δ+12               {[-8-]}
            <MI 27c86  TST.B   (A6-0x10)>                                       {[-8-]}
            <MI 27c8a  BNE     0x27cb6>                                         {[-8-]}
        <POP 27c8c-27cb6 Naked>                              Σ-8        →0x27cbe
            <Blob 0x27c8c [14] @>                            Δ-14               {[-8-]|[«14""»]}
            <POP 27c98-27c9a StackAdj>                       Δ-4                {[-8-]|[«14""»]|[-4-]}
            <Lit 0x27c9a 14>                                                    {[-8-]|[«14""»]|[$$BEKINS.ERRMESS]}
            <Const 0x27ca8 0x22.4>                           Δ-4                {[-8-]|[«14""»]|[$$BEKINS.ERRMESS]|[##34]}
            <Call 0x27cac 0x10450>                                              {[-8-]|[«14""»]|[$$BEKINS.ERRMESS]|[##34]}
                FS_10450(&, &)
            <POP 27cb2-27cb4 StackAdj>                       Δ+22               {[-8-]}
            <MI 27cb4  BRA     0x27cbe>                                         {[-8-]}
        <POP 27cb6-27cbe Naked>                              Σ-8        ↓ ←0x27c68
            <MI 27cb6  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <Call 0x27cb8 0x26526>                                              {[-8-]|[4, '(A6+0x8)']}
            <POP 27cbc-27cbe StackAdj>                       Δ+4                {[-8-]}
        <POP 27cbe-27cc4 Naked>                              Σ-8 Δ+8    ↓ ←0x27c0e ←0x27c8c
            <POP 27cbe-27cc0 StackAdj>                       Δ+8                {}
            <Call 0x27cc0 0x25b12>                                              {}
        <POP 27cc4-27ccc Epilogue>                           Σ0         

0x27ccc


@ 27ccc
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 @>
        <LVAR -0x00a @ 1(r)>
        <LVAR -0x00e @ 4(rw)>
        <LVAR -0x010 @ 1(r)>
        <LVAR -0x016 @ 1(r)>
        <LVAR -0x01a @ 4(r)>
        <LVAR -0x01c @ 1(r)>
        <LVAR -0x020 @ 4(rw)>
    <POP 27ccc-280b0 Body>                                   Δ+4        
        <POP 27ccc-27ce2 Prologue>                           Σ0         ↓
        <POP 27ce2-27cfa RegCacheLoad>                       Σ0         ↓
        <POP 27cfa-27d04 Naked>                              Σ0         ↓ →0x27d94
            <MI 27cfa  TST.B   0x2c7d4>                                         {}
            <MI 27d00  BNE     0x27d94>                                         {}
        <POP 27d04-27d60 Naked>                              Σ0         ↓ →0x27d66
            <Blob 0x27d04 [2] @>                             Δ-2                {[«2""»]}
            <MI 27d08  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 27d0a-27d0c StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x27d0c 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$DD]}
            <POP 27d16-27d18 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]}
            <MI 27d18  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]}
            <Pointer.fp 0x27d1a <LVAR -0x016 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]|[@@-22]}
            <Pointer.fp 0x27d1e <LVAR -0x008 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]|[@@-22]|[@@-8]}
            <Call 0x27d22 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$DD]|[-2-]|[@@-22]|[@@-8]}
            <POP 27d26-27d2a StackAdj>                       Δ+16               {[«2""»]|[-2-]}
            <POP 27d2a-27d2b StackAdj>                       Δ+2                {[«2""»]}
            <Blob 0x27d2b [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <MI 27d2e  MOVE.B  0x20f17,(A7+0x1)>                                {[«2""»]|[«2""»]}
            <MI 27d34  MOVE.B  0x20f18,(A7+0x2)>                                {[«2""»]|[«2""»]}
            <MI 27d3a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']}
            <POP 27d3c-27d3e StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x27d3e 3>                                                     {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]}
            <POP 27d48-27d4a StackAdj>                       Δ-2                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]}
            <MI 27d4a  CLR.B   (A7)>                                            {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]}
            <Pointer.fp 0x27d4c <LVAR -0x00a @ 1(r)>>        Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]|[@@-10]}
            <Pointer.fp 0x27d50 <LVAR -0x008 @>>             Δ-4                {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]|[@@-10]|[@@-8]}
            <Call 0x27d54 0x21cee>                                              {[«2""»]|[«2""»]|[4, '(A6+0x8)']|[$$USD]|[-2-]|[@@-10]|[@@-8]}
            <POP 27d58-27d5a StackAdj>                       Δ+22               {}
            <MI 27d5a  TST.B   (A6-0x16)>                                       {}
            <MI 27d5e  BNE     0x27d66>                                         {}
        <POP 27d60-27d66 Naked>                              Σ0         ↓ →0x27d6e
            <MI 27d60  TST.B   (A6-0xa)>                                        {}
            <MI 27d64  BEQ     0x27d6e>                                         {}
        <POP 27d66-27d6e Naked>                              Σ0         →0x27d7c ←0x27d04
            <MI 27d66  MOVE.B  #0x01,0x2c7d4>                                   {}
            <MI 27d6c  BRA     0x27d7c>                                         {}
        <POP 27d6e-27d7c Naked>                              Σ0         ↓ ←0x27d60
            <MI 27d6e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x27d70 0x24724>                                              {[4, '(A6+0x8)']}
            <MI 27d74  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x27d76 0x24de0>                                              {[4, '(A6+0x8)']}
            <POP 27d7a-27d7c StackAdj>                       Δ+4                {}
        <POP 27d7c-27d94 Naked>                              Σ0         ↓ ←0x27d66
            <MI 27d7c  LEA.L   0x1200,A0>                                       {}
            <MI 27d80  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 27d82  LEA.L   0x2e198,A0>                                      {[4, 'A0']}
            <MI 27d88  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'A0']}
            <Const 0x27d8a 0x20.4>                           Δ-4                {[4, 'A0']|[4, 'A0']|[##32]}
            <Call 0x27d8e 0x245b2>                                              {[4, 'A0']|[4, 'A0']|[##32]}
            <POP 27d92-27d94 StackAdj>                       Δ+12               {}
        <POP 27d94-27e0e Naked>                              Σ0         ↓ →0x27e4a ←0x27cfa
            <MI 27d94  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x27d96 0x26c30>                                              {[4, '(A6+0x8)']}
            <MI 27d9a  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x27d9c 0x26e30>                                              {[4, '(A6+0x8)']}
            <MI 27da0  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x27da2 0x26fec>                                              {[4, '(A6+0x8)']}
            <MI 27da6  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x27da8 0x2724a>                                              {[4, '(A6+0x8)']}
            <POP 27dac-27dad StackAdj>                       Δ+4        ↓       {}
            <Blob 0x27dad [6] @>                             Δ-6                {[«6""»]}
            <POP 27dbc-27dbe StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x27dbe 5>                                                     {[«6""»]|[$$:get:]}
            <MI 27dcc  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {[«6""»]}
            <POP 27dce-27dd0 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x27dd0 <LVAR -0x00e @ 4(rw)>>       Δ-4                {[@@-14]}
            <Call 0x27dd2 0x274a2>                                              {[@@-14]}
            <Call 0x27dd6 0x27618>                                              {[@@-14]}
            <MI 27dda  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {}
            <Blob 0x27ddc [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x27de0 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <MI 27de4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']}
            <POP 27de6-27de8 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x27de8 8>                                                     {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]}
            <POP 27df4-27df6 StackAdj>                       Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[-2-]}
            <POP 27df6-27df7 StackAdj>                       Δ+2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]}
            <Const 0x27df7 0x1.2>                            Δ-2                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]}
            <Pointer.fp 0x27df8 <LVAR -0x01c @ 1(r)>>        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]|[@@-28]}
            <Pointer.fp 0x27dfc <LVAR -0x01a @ 4(r)>>        Δ-4                {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]|[@@-28]|[@@-26]}
            <Call 0x27e00 0x21cee>                                              {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$R1K_NAME]|[#1]|[@@-28]|[@@-26]}
            <POP 27e04-27e08 StackAdj>                       Δ+26               {}
            <MI 27e08  TST.B   (A6-0x1c)>                                       {}
            <MI 27e0c  BEQ     0x27e4a>                                         {}
        <POP 27e0e-27e16 Naked>                              Σ0 Δ-4     ↓
            <Blob 0x27e0e [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x27e12 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
        <POP 27e16-27e4a Naked>                              Σ-4 Δ+4    →0x27ef6 ←0x27e82
            <POP 27e16-27e18 StackAdj>                       Δ-8                {[-12-]}
            <Lit 0x27e18>                                                       {[-8-]|[$$…]}
                <Pointer.sp 0x27e18 10>                      Δ-4        
                <Const 0x27e1c 0x1.2>                        Δ-2        
                <Const 0x27e1e 0x2.2>                        Δ-2        
                <Call 0x27e20 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 27e22-27e24 StackAdj>                   Δ+8        
            <POP 27e22-27e24 StackAdj>                       Δ-4                {[-8-]|[$$…]|[-4-]}
            <MI 27e24  MOVE.L  (A6-0x1a),(A7)>                                  {[-8-]|[$$…]|[4, '(A6-0x1a)']}
            <POP 27e28-27e2a StackAdj>                       Δ-4                {[-8-]|[$$…]|[4, '(A6-0x1a)']|[-4-]}
            <Lit 0x27e2a>                                                       {[-8-]|[$$…]|[4, '(A6-0x1a)']|[$$…]}
                <Pointer.sp 0x27e2a 16>                      Δ-4        
                <Const 0x27e2e 0x1.2>                        Δ-2        
                <Const 0x27e30 0x2.2>                        Δ-2        
                <Call 0x27e32 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 27e34-27e36 StackAdj>                   Δ+8        
            <Call 0x27e36 0x102d4>                                              {[-8-]|[$$…]|[4, '(A6-0x1a)']|[$$…]}
                StringCat3(a, b, c : String) : String
            <POP 27e3c-27e3e StackAdj>                       Δ+12               {[-8-]}
            <MI 27e3e  MOVE.L  (A7)+,0x2d8be>                Δ+4                {[-4-]}
            <POP 27e44-27e46 StackAdj>                       Δ+4                {}
            <MI 27e46  BRA     0x27ef6>                                         {}
        <POP 27e4a-27e82 Naked>                              Σ0         ↓ →0x27e8c ←0x27d94
            <POP 27e4a-27e4c StackAdj>                       Δ-4                {[-4-]}
            <POP 27e4c-27e4d StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x27e4d [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 27e50  MOVE.B  0x20f2d,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 27e56  MOVE.B  0x20f2e,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 27e5c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']}
            <POP 27e5e-27e60 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x27e60>                                                       {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
                <Pointer.sp 0x27e60 8>                       Δ-4        
                <Const 0x27e64 0x1.2>                        Δ-2        
                <Const 0x27e66 0x3.2>                        Δ-2        
                <Call 0x27e68 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 27e6a-27e6c StackAdj>                   Δ+8        
            <POP 27e6a-27e6c StackAdj>                       Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
            <POP 27e6c-27e6d StackAdj>                       Δ+2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
            <Const 0x27e6d 0x1.2>                            Δ-2                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]}
            <Pointer.fp 0x27e6e <LVAR -0x01c @ 1(r)>>        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-28]}
            <Pointer.fp 0x27e72 <LVAR -0x01a @ 4(r)>>        Δ-4                {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-28]|[@@-26]}
            <Call 0x27e76 0x21cee>                                              {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[@@-28]|[@@-26]}
            <POP 27e7a-27e7c StackAdj>                       Δ+22               {}
            <MI 27e7c  TST.B   (A6-0x1c)>                                       {}
            <MI 27e80  BEQ     0x27e8c>                                         {}
        <POP 27e82-27e8c Naked>                              Σ0 Δ-4     →0x27e16
            <Blob 0x27e82 [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x27e86 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <MI 27e8a  BRA     0x27e16>                                         {[«2""»]|[«2""»]}
        <POP 27e8c-27ef6 Naked>                              Σ0         ↓ ←0x27e4a
            <Blob 0x27e8c [2] @>                             Δ-2                {[«2""»]}
            <POP 27e90-27e92 StackAdj>                       Δ-4                {[«2""»]|[-4-]}
            <Lit 0x27e92 2>                                                     {[«2""»]|[$$:!]}
            <MI 27e9e  MOVE.L  (A7)+,0x2d8be>                Δ+4                {[«2""»]}
            <POP 27ea4-27ea6 StackAdj>                       Δ+2                {}
            <Blob 0x27ea6 [28] @>                            Δ-28               {[«28""»]}
            <POP 27eb2-27eb4 StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Blob 0x27eb4 [4] 0x2d8be>                       Δ-4                {[«28""»]|[-4-]|[«4»]}
            <POP 27eba-27ebc StackAdj>                       Δ-8                {[«28""»]|[-4-]|[«4»]|[-8-]}
            <Lit 0x27ebc 28>                                                    {[«28""»]|[-4-]|[«4»]|[-4-]|[$$Enter full R1000 pathname :_]}
            <Call 0x27eca 0x103e4>                                              {[«28""»]|[-4-]|[«4»]|[-4-]|[$$Enter full R1000 pathname :_]}
                AskConsoleString(prompt : String) : String
            <POP 27ed0-27ed2 StackAdj>                       Δ+4                {[«28""»]|[-4-]|[«4»]|[-4-]}
            <Call 0x27ed2 0x102d0>                                              {[«28""»]|[-4-]|[«4»]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 27ed8-27eda StackAdj>                       Δ+8                {[«28""»]|[-4-]}
            <MI 27eda  MOVE.L  (A7)+,0x2d8be>                Δ+4                {[«28""»]}
            <POP 27ee0-27ee4 StackAdj>                       Δ+24               {[-4-]}
            <POP 27ee4-27ee5 StackAdj>                       Δ+4                {}
            <Blob 0x27ee5 [4] 0x2d8be>                       Δ-4                {[«4»]}
            <Const 0x27eea 0x3a.2>                           Δ-2                {[«4»]|[#58]}
            <Call 0x27eee 0x102c0>                                              {[«4»]|[#58]}
                AppendChar(MOD b : String; a : char)
            <POP 27ef4-27ef6 StackAdj>                       Δ+6                {}
        <POP 27ef6-27f30 Naked>                              Σ0 Δ-4     ↓ ←0x27e16
            <Pointer.fp 0x27ef6 <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-4]}
            <Call 0x27efa 0x102b8>                                              {[@@-4]}
                NewString(VAR a : String)
            <POP 27f00-27f02 StackAdj>                       Δ+4                {}
            <MI 27f02  MOVEA.L (A6-0x4),A0>                                     {}
            <MI 27f06  MOVEA.L 0x2d8be,A1>                                      {}
            <MI 27f0c  MOVE.W  (A1),D0>                                         {}
            <MI 27f0e  EXTW.L  D0>                                              {}
            <MI 27f10  SUBQ.L  #0x2,D0>                                         {}
            <POP 0x27f12 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff>                      {}
            <MI 27f28  MOVE.W  D0,(A0)>                                         {}
            <MI 27f2a  EXTW.L  D0>                                              {}
            <MI 27f2c  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 27f2e  MOVEQ.L #0x01,D7>                                        {[4, 'D0']}
        <POP 27f30-27f34 Naked>                              Σ-4        ↓ →0x27f66 ←0x27f34
            <MI 27f30  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 27f32  BGT     0x27f66>                                         {[-4-]}
        <POP 27f34-27f66 Naked>                              Σ-4        ↓ →0x27f30
            <MI 27f34  MOVEA.L (A6-0x4),A0>                                     {[-4-]}
            <MI 27f38  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 27f3a  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x27f3c LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 27f46  MOVEA.L 0x2d8be,A1>                                      {[-4-]}
            <MI 27f4c  MOVE.L  D7,D1>                                           {[-4-]}
            <MI 27f4e  ADDQ.L  #0x1,D1>                                         {[-4-]}
            <MI 27f50  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x27f52 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 27f5c  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x2)>                   {[-4-]}
            <MI 27f62  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 27f64  BVC     0x27f30>                                         {[-4-]}
        <POP 27f66-27fba Naked>                              Σ-4 Δ+4    ↓ →0x28014 ←0x27f30
            <POP 27f66-27f68 StackAdj>                       Δ+4                {}
            <Const 0x27f68 0x2d8be.4>                        Δ-4                {[##186558]}
            <Call 0x27f6e 0x274a2>                                              {[##186558]}
            <POP 27f72-27f74 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x27f74 <LVAR -0x00e @ 4(rw)>>       Δ-4                {[@@-14]}
            <Call 0x27f76 0x102bc>                                              {[@@-14]}
                FreeString(VAR a : String)
            <Call 0x27f7c 0x27618>                                              {[@@-14]}
            <MI 27f80  MOVE.L  (A7),(A6-0xe)>                                   {[@@-14]}
            <POP 27f82-27f83 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x27f83 [8] @>                             Δ-8                {[«8""»]}
            <POP 27f92-27f94 StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Lit 0x27f94 7>                                                     {[«8""»]|[$$aborted]}
            <MI 27fa2  MOVE.L  (A7)+,(A6-0x20)>              Δ+4                {[«8""»]}
            <POP 27fa6-27fa8 StackAdj>                       Δ+2                {[-6-]}
            <MI 27fa8  MOVE.L  (A6-0xe),(A7)>                                   {[-2-]|[4, '(A6-0xe)']}
            <MI 27faa  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0xe)']|[4, '(A6-0x20)']}
            <Call 0x27fae 0x102c8>                                              {[-2-]|[4, '(A6-0xe)']|[4, '(A6-0x20)']}
                StringEqual(a, b : String) : Byte
            <POP 27fb4-27fb6 StackAdj>                       Δ+8                {[-2-]}
            <MI 27fb6  TST.B   (A7)+>                        Δ+2                {}
            <MI 27fb8  BEQ     0x28014>                                         {}
        <POP 27fba-28014 Naked>                              Σ0         →0x2806a
            <Blob 0x27fba [14] @>                            Δ-14               {[«14""»]}
            <POP 27fc6-27fc8 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x27fc8 14>                                                    {[«14""»]|[$$BEKINS.ERRMESS]}
            <Const 0x27fd6 0x1d.4>                           Δ-4                {[«14""»]|[$$BEKINS.ERRMESS]|[##29]}
            <Call 0x27fda 0x10450>                                              {[«14""»]|[$$BEKINS.ERRMESS]|[##29]}
                FS_10450(&, &)
            <POP 27fe0-27fe4 StackAdj>                       Δ+18               {[-4-]}
            <POP 27fe4-27fe5 StackAdj>                       Δ+4                {}
            <Blob 0x27fe5 [4] @>                             Δ-4                {[«4""»]}
            <POP 27fe8-27fea StackAdj>                       Δ-8                {[«4""»]|[-8-]}
            <Lit 0x27fea 4>                                                     {[«4""»]|[-4-]|[$$   _]}
            <POP 27ff6-27ff8 StackAdj>                       Δ-4                {[«4""»]|[-4-]|[$$   _]|[-4-]}
            <MI 27ff8  MOVE.L  (A6-0x4),(A7)>                                   {[«4""»]|[-4-]|[$$   _]|[4, '(A6-0x4)']}
            <Call 0x27ffc 0x102d0>                                              {[«4""»]|[-4-]|[$$   _]|[4, '(A6-0x4)']}
                StringCat2(a, b : String) : String
            <POP 28002-28004 StackAdj>                       Δ+8                {[«4""»]|[-4-]}
            <Call 0x28004 0x103e0>                                              {[«4""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2800a-2800c StackAdj>                       Δ+8                {}
            <Call 0x2800c 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <MI 28012  BRA     0x2806a>                                         {}
        <POP 28014-28038 Naked>                              Σ0         ↓ →0x28062 ←0x27f66
            <Pointer.fp 0x28014 <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-4]}
            <Call 0x28018 0x102bc>                                              {[@@-4]}
                FreeString(VAR a : String)
            <MI 2801e  MOVE.L  (A6-0xe),(A7)>                                   {[4, '(A6-0xe)']}
            <Pointer.fp 0x28020 <LVAR -0x010 @ 1(r)>>        Δ-4                {[4, '(A6-0xe)']|[@@-16]}
            <Const 0x28024 0x2c7d6.4>                        Δ-4                {[4, '(A6-0xe)']|[@@-16]|[##182230]}
            <Call 0x2802a 0x102ec>                                              {[4, '(A6-0xe)']|[@@-16]|[##182230]}
                String2Long(src : String; VAR status : Bool; VAR retval : Long)
            <POP 28030-28032 StackAdj>                       Δ+12               {}
            <MI 28032  TST.B   (A6-0x10)>                                       {}
            <MI 28036  BNE     0x28062>                                         {}
        <POP 28038-28062 Naked>                              Σ0         →0x2806a
            <Blob 0x28038 [14] @>                            Δ-14               {[«14""»]}
            <POP 28044-28046 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x28046 14>                                                    {[«14""»]|[$$BEKINS.ERRMESS]}
            <Const 0x28054 0x22.4>                           Δ-4                {[«14""»]|[$$BEKINS.ERRMESS]|[##34]}
            <Call 0x28058 0x10450>                                              {[«14""»]|[$$BEKINS.ERRMESS]|[##34]}
                FS_10450(&, &)
            <POP 2805e-28060 StackAdj>                       Δ+22               {}
            <MI 28060  BRA     0x2806a>                                         {}
        <POP 28062-2806a Naked>                              Σ0         ↓ ←0x28014
            <MI 28062  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x28064 0x26526>                                              {[4, '(A6+0x8)']}
            <POP 28068-2806a StackAdj>                       Δ+4                {}
        <POP 2806a-28086 Naked>                              Σ0         ↓ →0x28090 ←0x27fba ←0x28038
            <Pointer.fp 0x2806a <LVAR -0x020 @ 4(rw)>>       Δ-4                {[@@-32]}
            <Call 0x2806e 0x102bc>                                              {[@@-32]}
                FreeString(VAR a : String)
            <POP 28074-28076 StackAdj>                       Δ+4                {}
            <Call 0x28076 0x2775a>                                              {}
            <MI 2807a  MOVE.W  0x2d8b4,D0>                                      {}
            <MI 28080  CMPI.W  #0xfffe,D0>                                      {}
            <MI 28084  BNE     0x28090>                                         {}
        <POP 28086-28090 Naked>                              Σ0         →0x280a8
            <MI 28086  MOVE.W  #0x401,0x2d8b4>                                  {}
            <MI 2808e  BRA     0x280a8>                                         {}
        <POP 28090-280a8 Naked>                              Σ0         ↓ ←0x2806a
            <MI 28090  ADDQ.W  #0x1,D0>                                         {}
            <POP 0x28092 LimitCheck 0x401 ≤ D0 ≤ 0xfffe>                        {}
            <MI 280a2  MOVE.W  D0,0x2d8b4>                                      {}
        <POP 280a8-280b0 Epilogue>                           Σ0         ←0x28086

0x280b0


@ 280b0
    <POP 280b0-28108 Body>                                              
        <POP 280b0-280c6 Prologue>                           Σ0         ↓
        <POP 280c6-280c8 Naked>                              Σ0         ↓
            <MI 280c6  MOVEQ.L #0x00,D7>                                        {}
        <POP 280c8-28100 Naked>                              Σ0         ↓ →0x280c8 ←0x280c8
            <Blob 0x280c8 [14] @>                            Δ-14               {[«14""»]}
            <POP 280d4-280d6 StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x280d6 14>                                                    {[«14""»]|[$$BEKINS.ERRMESS]}
            <POP 280e8-280ea StackAdj>                       Δ-4                {[«14""»]|[$$BEKINS.ERRMESS]|[-4-]}
            <MI 280ea  MOVE.L  D7,(A7)>                                         {[«14""»]|[$$BEKINS.ERRMESS]|[4, 'D7']}
            <Call 0x280ec 0x10450>                                              {[«14""»]|[$$BEKINS.ERRMESS]|[4, 'D7']}
                FS_10450(&, &)
            <POP 280f2-280f6 StackAdj>                       Δ+22               {}
            <MI 280f6  ADDQ.L  #0x1,D7>                                         {}
            <MI 280f8  CMPI.L  #0x00000022,D7>                                  {}
            <MI 280fe  BLE     0x280c8>                                         {}
        <POP 28100-28108 Epilogue>                           Σ0         

0x28108


@ 28108
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @>
        <LVAR -0x008 @ 1(r)>
    <POP 28108-281e6 Body>                                              
        <POP 28108-2811e Prologue>                           Σ0         ↓
        <POP 2811e-2813e RegCacheLoad>                       Σ0         ↓
        <POP 2813e-28164 Naked>                              Σ0         ↓ →0x28168
            <MI 2813e  MOVE.B  #0x03,0x2d02c>                                   {}
            <Blob 0x28140 [2] @>                             Δ-2                {[«2""»]}
            <MI 28144  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 28146-28148 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x28148 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$V ]}
            <POP 28152-28154 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$V ]|[-2-]}
            <MI 28154  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$V ]|[-2-]}
            <Pointer.fp 0x28156 <LVAR -0x008 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$V ]|[-2-]|[@@-8]}
            <Pointer.fp 0x28158 <LVAR -0x006 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$V ]|[-2-]|[@@-8]|[@@-6]}
            <Call 0x2815a 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$V ]|[-2-]|[@@-8]|[@@-6]}
            <POP 2815e-28160 StackAdj>                       Δ+20               {}
            <MI 28160  TST.B   (A6-0x8)>                                        {}
            <MI 28162  BEQ     0x28168>                                         {}
        <POP 28164-28168 Naked>                              Σ0         →0x281de
            <MI 28164  CLR.B   0x2d02c>                                         {}
            <MI 28166  BRA     0x281de>                                         {}
        <POP 28168-2818c Naked>                              Σ0         ↓ →0x28190 ←0x2813e
            <Blob 0x28168 [2] @>                             Δ-2                {[«2""»]}
            <MI 2816c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 2816e-28170 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x28170 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$D ]}
            <POP 2817a-2817c StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$D ]|[-2-]}
            <MI 2817c  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$D ]|[-2-]}
            <Pointer.fp 0x2817e <LVAR -0x008 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$D ]|[-2-]|[@@-8]}
            <Pointer.fp 0x28180 <LVAR -0x006 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$D ]|[-2-]|[@@-8]|[@@-6]}
            <Call 0x28182 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$D ]|[-2-]|[@@-8]|[@@-6]}
            <POP 28186-28188 StackAdj>                       Δ+20               {}
            <MI 28188  TST.B   (A6-0x8)>                                        {}
            <MI 2818a  BEQ     0x28190>                                         {}
        <POP 2818c-28190 Naked>                              Σ0         →0x281de
            <MI 2818c  MOVE.B  #0x01,0x2d02c>                                   {}
            <MI 2818e  BRA     0x281de>                                         {}
        <POP 28190-281b4 Naked>                              Σ0         ↓ →0x281b8 ←0x28168
            <Blob 0x28190 [2] @>                             Δ-2                {[«2""»]}
            <MI 28194  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 28196-28198 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x28198 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$I ]}
            <POP 281a2-281a4 StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$I ]|[-2-]}
            <MI 281a4  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$I ]|[-2-]}
            <Pointer.fp 0x281a6 <LVAR -0x008 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$I ]|[-2-]|[@@-8]}
            <Pointer.fp 0x281a8 <LVAR -0x006 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$I ]|[-2-]|[@@-8]|[@@-6]}
            <Call 0x281aa 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$I ]|[-2-]|[@@-8]|[@@-6]}
            <POP 281ae-281b0 StackAdj>                       Δ+20               {}
            <MI 281b0  TST.B   (A6-0x8)>                                        {}
            <MI 281b2  BEQ     0x281b8>                                         {}
        <POP 281b4-281b8 Naked>                              Σ0         →0x281de
            <MI 281b4  MOVE.B  #0x02,0x2d02c>                                   {}
            <MI 281b6  BRA     0x281de>                                         {}
        <POP 281b8-281dc Naked>                              Σ0         ↓ →0x281de ←0x28190
            <Blob 0x281b8 [2] @>                             Δ-2                {[«2""»]}
            <MI 281bc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«2""»]|[4, '(A6+0x8)']}
            <POP 281be-281c0 StackAdj>                       Δ-4                {[«2""»]|[4, '(A6+0x8)']|[-4-]}
            <Lit 0x281c0 2>                                                     {[«2""»]|[4, '(A6+0x8)']|[$$N ]}
            <POP 281ca-281cc StackAdj>                       Δ-2                {[«2""»]|[4, '(A6+0x8)']|[$$N ]|[-2-]}
            <MI 281cc  CLR.B   (A7)>                                            {[«2""»]|[4, '(A6+0x8)']|[$$N ]|[-2-]}
            <Pointer.fp 0x281ce <LVAR -0x008 @ 1(r)>>        Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$N ]|[-2-]|[@@-8]}
            <Pointer.fp 0x281d0 <LVAR -0x006 @>>             Δ-4                {[«2""»]|[4, '(A6+0x8)']|[$$N ]|[-2-]|[@@-8]|[@@-6]}
            <Call 0x281d2 0x21cee>                                              {[«2""»]|[4, '(A6+0x8)']|[$$N ]|[-2-]|[@@-8]|[@@-6]}
            <POP 281d6-281d8 StackAdj>                       Δ+20               {}
            <MI 281d8  TST.B   (A6-0x8)>                                        {}
            <MI 281da  BEQ     0x281de>                                         {}
        <POP 281dc-281de Naked>                              Σ0         ↓
            <MI 281dc  MOVE.B  #0x03,0x2d02c>                                   {}
        <POP 281de-281e6 Epilogue>                           Σ0         ←0x28164 ←0x2818c ←0x281b4 ←0x281b8

0x281e6


@ 281e6
        <LVAR  0x008 1(rw)>
        <LVAR -0x004 @ 2(r)>
    <POP 281e6-28234 Body>                                              
        <POP 281e6-281fc Prologue>                           Σ0         ↓
        <POP 281fc-28228 Naked>                              Σ0         ↓ →0x2822c
            <Const 0x281fc 0xfffff803.4>                     Δ-4                {[##4294965251]}
            <MI 28200  LEA.L   (A6-0x4),A0>                                     {[##4294965251]}
            <MI 28204  MOVE.L  A0,-(A7)>                     Δ-4                {[##4294965251]|[4, 'A0']}
            <MI 28206  ADDQ.L  #0x1,(A7)>                                       {[##4294965251]|[-4-]}
            <Const 0x28208 0x1.2>                            Δ-2                {[##4294965251]|[-4-]|[#1]}
            <Call 0x2820c 0x10238>                                              {[##4294965251]|[-4-]|[#1]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 28212-28216 StackAdj>                       Δ+10               {}
            <MI 28216  CLR.B   (A6+0x8)>                                        {}
            <MI 2821a  MOVE.W  (A6-0x4),D0>                                     {}
            <MI 2821e  ANDI.W  #0x0070,D0>                                      {}
            <MI 28222  CMPI.W  #0x0020,D0>                                      {}
            <MI 28226  BNE     0x2822c>                                         {}
        <POP 28228-2822c Naked>                              Σ0         ↓
            <MI 28228  ADDQ.B  #0x1,(A6+0x8)>                                   {}
        <POP 2822c-28234 Epilogue>                           Σ0         ←0x281fc

0x28234


@ 28234
    <POP 28234-28358 Body>                                              
        <POP 28234-2824a Prologue>                           Σ0         ↓
        <POP 2824a-28252 RegCacheLoad>                       Σ0         ↓
        <POP 28252-282ca Naked>                              Σ0         ↓ →0x282ce
            <MI 28252  CLR.B   0x2c7d4>                                         {}
            <MI 28258  CLR.B   0x2c7ea>                                         {}
            <MI 2825e  CLR.B   0x2c7eb>                                         {}
            <MI 28264  CLR.B   0x2c7f0>                                         {}
            <MI 2826a  CLR.B   0x2cc12>                                         {}
            <MI 28270  MOVE.L  #0x9303fc00,0x2d014>                             {}
            <MI 2827a  CLR.L   0x2d01c>                                         {}
            <MI 28280  MOVE.B  #0x03,0x2d02c>                                   {}
            <MI 28288  MOVE.W  #0x401,0x2d8b4>                                  {}
            <Blob 0x28290 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x28294 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <POP 28298-2829a StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[-4-]}
            <Lit 0x2829a 8>                                                     {[«4""»]|[«4""»]|[$$BEKINS>_]}
            <MI 282ac  MOVE.L  (A7)+,0x2d8b6>                Δ+4                {[«4""»]|[«4""»]}
            <POP 282b2-282b4 StackAdj>                       Δ+8                {}
            <MI 282b4  CLR.L   0x2d8ba>                                         {}
            <MI 282ba  CLR.B   0x2e1c6>                                         {}
            <POP 282c0-282c2 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x282c2 0x23e08>                                              {[-2-]}
            <MI 282c6  TST.B   (A7)+>                        Δ+2                {}
            <MI 282c8  BEQ     0x282ce>                                         {}
        <POP 282ca-282ce Naked>                              Σ0         →0x282d4
            <MI 282ca  CLR.B   0x2c7c8>                                         {}
            <MI 282cc  BRA     0x282d4>                                         {}
        <POP 282ce-282d4 Naked>                              Σ0         ↓ ←0x28252
            <MI 282ce  MOVE.B  #0x01,0x2c7c8>                                   {}
            <Call 0x282d0 0x21542>                                              {}
        <POP 282d4-28342 Naked>                              Σ0         ↓ →0x2834a ←0x282ca
            <MI 282d4  MOVE.L  #0x9303e00c,0x2c79c>                             {}
            <MI 282de  MOVE.L  #0x9303e102,0x2c7a0>                             {}
            <MI 282e8  MOVE.L  #0x9303e10a,0x2c7a4>                             {}
            <MI 282f2  MOVE.L  #0x9303e008,0x2c7a8>                             {}
            <MI 282fc  MOVE.L  #0x9303e106,0x2c7ac>                             {}
            <MI 28306  MOVE.L  #0x9303e202,0x2c7b0>                             {}
            <MI 28310  MOVE.L  #0x9303fc00,0x2c7b4>                             {}
            <MI 2831a  MOVE.L  #0x9303f800,0x2c7b8>                             {}
            <MI 28324  MOVE.L  #0x9303f400,0x2c7bc>                             {}
            <MI 2832e  MOVE.L  #0x9303f000,0x2c7c0>                             {}
            <POP 28338-2833a StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2833a 0x281e6>                                              {[-2-]}
            <MI 2833e  TST.B   (A7)+>                        Δ+2                {}
            <MI 28340  BEQ     0x2834a>                                         {}
        <POP 28342-2834a Naked>                              Σ0         →0x28350
            <MI 28342  CLR.B   0x2d8b2>                                         {}
            <MI 28348  BRA     0x28350>                                         {}
        <POP 2834a-28350 Naked>                              Σ0         ↓ ←0x282d4
            <MI 2834a  MOVE.B  #0x01,0x2d8b2>                                   {}
        <POP 28350-28358 Epilogue>                           Σ0         ←0x28342

0x28358


@ 28358
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @ 4(rw)>
    <POP 28358-285a0 Body>                                   Δ+12       
        <POP 28358-2836e Prologue>                           Σ0         ↓
        <POP 2836e-28388 RegCacheLoad>                       Σ0         ↓
        <POP 28388-28390 Naked>                              Σ0         ↓
            <MI 28388  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2838c  CLR.B   (A0)>                                            {}
            <MI 2838e  MOVEQ.L #0x00,D7>                                        {}
        <POP 28390-283e8 Naked>                              Σ0         ↓ →0x284c0 ←0x28590
            <MI 28390  MOVE.B  D7,D0>                                           {}
            <MI 28392  EXTB.W  D0>                                              {}
            <MI 28394  MULS.W  #0x0a,D0>                                        {}
            <MI 28396  LEA.L   0x212b4,A0>                                      {}
            <Blob 0x2839a [10] (A0+D0.W)>                    Δ-10               {[«10»]}
            <POP 283aa-283ac StackAdj>                       Δ-4                {[«10»]|[-4-]}
            <Lit 0x283ac>                                                       {[«10»]|[$$…]}
                <Pointer.sp 0x283ac 4>                       Δ-4        
                <Const 0x283b0 0x1.2>                        Δ-2        
                <Const 0x283b2 0xa.2>                        Δ-2        
                <Call 0x283b4 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 283b6-283b8 StackAdj>                   Δ+8        
            <MI 283b8  MOVE.L  (A7)+,(A6-0x6)>               Δ+4                {[«10»]}
            <POP 283bc-283be StackAdj>                       Δ+4                {[-6-]}
            <MI 283be  MOVE.L  (A6-0x6),(A7)>                                   {[-2-]|[4, '(A6-0x6)']}
            <MI 283c2  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x6)']|[4, '(A6+0x10)']}
            <Call 0x283c6 0x102c8>                                              {[-2-]|[4, '(A6-0x6)']|[4, '(A6+0x10)']}
                StringEqual(a, b : String) : Byte
            <POP 283cc-283ce StackAdj>                       Δ+8                {[-2-]}
            <MI 283ce  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 283d0  EXTB.W  D0>                                              {}
            <POP 0x283d2 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 283d4  MOVE.B  D0,D6>                                           {}
            <Pointer.fp 0x283d6 <LVAR -0x006 @ 4(rw)>>       Δ-4                {[@@-6]}
            <Call 0x283da 0x102bc>                                              {[@@-6]}
                FreeString(VAR a : String)
            <POP 283e0-283e2 StackAdj>                       Δ+4                {}
            <MI 283e2  TST.B   D6>                                              {}
            <MI 283e4  BEQ     0x284c0>                                         {}
        <POP 283e8-283ee Naked>                              Σ0         ↓ →0x284c0
            <MI 283e8  TST.B   0x2c7c8>                                         {}
            <MI 283ea  BNE     0x284c0>                                         {}
        <POP 283ee-28402 Naked>                              Σ0         →0x2841a →0x28432 →0x2843c →0x28468 →0x2846e →0x28476 →0x2847c →0x28482 →0x28486 →0x2848a →0x2848c →0x284b2
            <MI 283ee  MOVE.B  D7,D0>                                           {}
            <MI 283f0  EXTB.W  D0>                                              {}
            <POP 0x283f2 LimitCheck 0x0 ≤ D0 ≤ 0xb>                             {}
            <MI 283f8  ADD.W   D0,D0>                                           {}
            <MI 283fa  SWITCH  D0.W>                                            {}
        <POP 2841a-28432 Naked>                              Σ0         →0x284b6 ←0x283ee
            <Blob 0x2841a [82] @>                            Δ-82               {[«82""»]}
            <Call 0x28426 0x23d08>                                              {[«82""»]}
            <POP 2842a-2842e StackAdj>                       Δ+82               {}
            <MI 2842e  BRA     0x284b6>                                         {}
        <POP 28432-28438 Naked>                              Σ0 Δ-4     ↓ ←0x283ee
            <MI 28432  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <Call 0x28434 0x28108>                                              {[4, '(A6+0xc)']}
        <POP 28438-2843c Naked>                              Σ-4 Δ+4    →0x284b6 ←0x2846e
            <POP 28438-2843a StackAdj>                       Δ+4                {}
            <MI 2843a  BRA     0x284b6>                                         {}
        <POP 2843c-28468 Naked>                              Σ0         →0x284b6 ←0x283ee
            <Blob 0x2843c [34] @>                            Δ-34               {[«34""»]}
            <POP 2844e-28450 StackAdj>                       Δ-4                {[«34""»]|[-4-]}
            <Lit 0x28450 33>                                                    {[«34""»]|[$$@(#)BEKINS,3.3,90/12/06,11:11:00\]}
            <Call 0x2845c 0x103e0>                                              {[«34""»]|[$$@(#)BEKINS,3.3,90/12/06,11:11:00\]}
                WriteConsoleStringCrLf(str : String)
            <POP 28462-28466 StackAdj>                       Δ+38               {}
            <MI 28466  BRA     0x284b6>                                         {}
        <POP 28468-2846e Naked>                              Σ0         →0x284b6 ←0x283ee
            <Call 0x28468 0x23e76>                                              {}
            <MI 2846c  BRA     0x284b6>                                         {}
        <POP 2846e-28476 Naked>                              Σ0 Δ-4     →0x28438 ←0x283ee
            <MI 2846e  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <Call 0x28470 0x2791e>                                              {[4, '(A6+0xc)']}
            <MI 28474  BRA     0x28438>                                         {[4, '(A6+0xc)']}
        <POP 28476-2847c Naked>                              Σ0         →0x284b6 ←0x283ee
            <Call 0x28476 0x2530a>                                              {}
            <MI 2847a  BRA     0x284b6>                                         {}
        <POP 2847c-28482 Naked>                              Σ0         →0x284b6 ←0x283ee
            <Call 0x2847c 0x25290>                                              {}
            <MI 28480  BRA     0x284b6>                                         {}
        <POP 28482-28486 Naked>                              Σ0         →0x284b6 ←0x283ee
            <MI 28482  CLR.B   0x2c7c8>                                         {}
            <MI 28484  BRA     0x284b6>                                         {}
        <POP 28486-2848a Naked>                              Σ0         →0x284b6 ←0x283ee
            <MI 28486  MOVE.B  #0x01,0x2c7c8>                                   {}
            <MI 28488  BRA     0x284b6>                                         {}
        <POP 2848a-2848c Naked>                              Σ0         →0x284b6 ←0x283ee
            <MI 2848a  BRA     0x284b6>                                         {}
        <POP 2848c-284b2 Naked>                              Σ0         →0x284b6 ←0x283ee
            <Blob 0x2848c [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x28490 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x28494 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <POP 28498-2849a StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[-4-]}
            <Lit 0x2849a 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[$$no way]}
            <Call 0x284a8 0x103e0>                                              {[«2""»]|[«2""»]|[«2""»]|[$$no way]}
                WriteConsoleStringCrLf(str : String)
            <POP 284ae-284b0 StackAdj>                       Δ+10               {}
            <MI 284b0  BRA     0x284b6>                                         {}
        <POP 284b2-284b6 Naked>                              Σ0         ↓ ←0x283ee
            <Call 0x284b2 0x280b0>                                              {}
        <POP 284b6-284c0 Naked>                              Σ0         →0x28598 ←0x2841a ←0x28438 ←0x2843c ←0x28468 ←0x28476 ←0x2847c ←0x28482 ←0x28486 ←0x2848a ←0x2848c ←0x2858c
            <MI 284b6  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 284ba  MOVE.B  #0x01,(A0)>                                      {}
            <MI 284bc  BRA     0x28598>                                         {}
        <POP 284c0-284c6 Naked>                              Σ0         ↓ →0x28590 ←0x28390 ←0x283e8
            <MI 284c0  TST.B   D6>                                              {}
            <MI 284c2  BEQ     0x28590>                                         {}
        <POP 284c6-284ce Naked>                              Σ0         ↓ →0x28590
            <MI 284c6  MOVE.B  0x2c7c8,D0>                                      {}
            <MI 284c8  CMP.B   #0x01,D0>                                        {}
            <MI 284ca  BNE     0x28590>                                         {}
        <POP 284ce-284e2 Naked>                              Σ0         →0x284fa →0x28524 →0x2852e →0x2855a →0x28562 →0x2856a →0x28570 →0x28572 →0x28576 →0x2857a →0x28580 →0x28588
            <MI 284ce  MOVE.B  D7,D0>                                           {}
            <MI 284d0  EXTB.W  D0>                                              {}
            <POP 0x284d2 LimitCheck 0x0 ≤ D0 ≤ 0xb>                             {}
            <MI 284d8  ADD.W   D0,D0>                                           {}
            <MI 284da  SWITCH  D0.W>                                            {}
        <POP 284fa-28524 Naked>                              Σ0         →0x2858c ←0x284ce
            <Blob 0x284fa [52] @>                            Δ-52               {[«52""»]}
            <POP 28508-2850a StackAdj>                       Δ-4                {[«52""»]|[-4-]}
            <Lit 0x2850a 52>                                                    {[«52""»]|[$$CONFIG not supported for ENP100i ethernet controller]}
            <Call 0x28518 0x103e0>                                              {[«52""»]|[$$CONFIG not supported for ENP100i ethernet controller]}
                WriteConsoleStringCrLf(str : String)
            <POP 2851e-28522 StackAdj>                       Δ+56               {}
            <MI 28522  BRA     0x2858c>                                         {}
        <POP 28524-2852a Naked>                              Σ0 Δ-4     ↓ ←0x284ce
            <MI 28524  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <Call 0x28526 0x28108>                                              {[4, '(A6+0xc)']}
        <POP 2852a-2852e Naked>                              Σ-4 Δ+4    →0x2858c ←0x2855a ←0x28562
            <POP 2852a-2852c StackAdj>                       Δ+4                {}
            <MI 2852c  BRA     0x2858c>                                         {}
        <POP 2852e-2855a Naked>                              Σ0         →0x2858c ←0x284ce
            <Blob 0x2852e [34] @>                            Δ-34               {[«34""»]}
            <POP 28540-28542 StackAdj>                       Δ-4                {[«34""»]|[-4-]}
            <Lit 0x28542 33>                                                    {[«34""»]|[$$@(#)BEKINS,3.3,90/12/06,11:11:00\]}
            <Call 0x2854e 0x103e0>                                              {[«34""»]|[$$@(#)BEKINS,3.3,90/12/06,11:11:00\]}
                WriteConsoleStringCrLf(str : String)
            <POP 28554-28558 StackAdj>                       Δ+38               {}
            <MI 28558  BRA     0x2858c>                                         {}
        <POP 2855a-28562 Naked>                              Σ0 Δ-4     →0x2852a ←0x284ce
            <MI 2855a  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <Call 0x2855c 0x2522a>                                              {[4, '(A6+0xc)']}
            <MI 28560  BRA     0x2852a>                                         {[4, '(A6+0xc)']}
        <POP 28562-2856a Naked>                              Σ0 Δ-4     →0x2852a ←0x284ce
            <MI 28562  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <Call 0x28564 0x27ccc>                                              {[4, '(A6+0xc)']}
            <MI 28568  BRA     0x2852a>                                         {[4, '(A6+0xc)']}
        <POP 2856a-28570 Naked>                              Σ0         →0x2858c ←0x284ce
            <Call 0x2856a 0x253a0>                                              {}
            <MI 2856e  BRA     0x2858c>                                         {}
        <POP 28570-28572 Naked>                              Σ0         →0x2858c ←0x284ce
            <MI 28570  BRA     0x2858c>                                         {}
        <POP 28572-28576 Naked>                              Σ0         →0x2858c ←0x284ce
            <MI 28572  CLR.B   0x2c7c8>                                         {}
            <MI 28574  BRA     0x2858c>                                         {}
        <POP 28576-2857a Naked>                              Σ0         →0x2858c ←0x284ce
            <MI 28576  MOVE.B  #0x01,0x2c7c8>                                   {}
            <MI 28578  BRA     0x2858c>                                         {}
        <POP 2857a-28580 Naked>                              Σ0         →0x2858c ←0x284ce
            <Call 0x2857a 0x23b48>                                              {}
            <MI 2857e  BRA     0x2858c>                                         {}
        <POP 28580-28588 Naked>                              Σ0         →0x2858c ←0x284ce
            <MI 28580  CLR.B   0x2d8b2>                                         {}
            <MI 28586  BRA     0x2858c>                                         {}
        <POP 28588-2858c Naked>                              Σ0         ↓ ←0x284ce
            <Call 0x28588 0x280b0>                                              {}
        <POP 2858c-28590 Naked>                              Σ0         →0x284b6 ←0x284fa ←0x2852a ←0x2852e ←0x2856a ←0x28570 ←0x28572 ←0x28576 ←0x2857a ←0x28580
            <MI 2858c  BRA     0x284b6>                                         {}
        <POP 28590-28598 Naked>                              Σ0         ↓ →0x28390 ←0x284c0 ←0x284c6
            <MI 28590  ADDQ.B  #0x1,D7>                                         {}
            <MI 28592  CMP.B   #0x0b,D7>                                        {}
            <MI 28594  BLE     0x28390>                                         {}
        <POP 28598-285a0 Epilogue>                           Σ0         ←0x284b6

0x285a0


@ 285a0
        <LVAR  0x008 4(r)>
    <POP 285a0-285dc Body>                                              
        <POP 285a0-285b6 Prologue>                           Σ0         ↓
        <POP 285b6-285d4 Naked>                              Σ0         ↓
            <Call 0x285b6 0x10398>                                              {}
                FSCALL_10398
            <MI 285bc  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 285c0  LEA.L   0x21016,A1>                                      {}
            <BlockMove 10,A1,A0>                                                {}
            <Call 0x285cc 0x2214a>                                              {}
            <Call 0x285d0 0x28234>                                              {}
        <POP 285d4-285dc Epilogue>                           Σ0         

0x28c58


@ 28c58
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(w)>
    <POP 28c58-28c9a Body>                                              
        <POP 28c58-28c6e Prologue>                           Σ0         ↓
        <POP 28c6e-28c72 Naked>                              Σ0         ↓
            <MI 28c6e  MOVEA.L (A6+0x8),A4>                                     {}
        <POP 28c72-28c78 Naked>                              Σ0         ↓ →0x28c92 ←0x28c78
            <MI 28c72  CMPA.W  #0x1,A4>                                         {}
            <MI 28c76  BEQ     0x28c92>                                         {}
        <POP 28c78-28c92 Naked>                              Σ0         →0x28c72
            <MI 28c78  MOVE.L  A4,(A6-0x4)>                                     {}
            <MI 28c7c  MOVEA.L (A4+0x8),A4>                                     {}
            <Pointer.fp 0x28c80 <LVAR -0x004 @ 4(w)>>        Δ-4                {[@@-4]}
            <Const 0x28c84 0xc.4>                            Δ-4                {[@@-4]|[##12]}
            <Call 0x28c88 0x102a8>                                              {[@@-4]|[##12]}
                Free2(a : Pointer; b : Long)
            <POP 28c8e-28c90 StackAdj>                       Δ+8                {}
            <MI 28c90  BRA     0x28c72>                                         {}
        <POP 28c92-28c9a Epilogue>                           Σ0         ←0x28c72

0x28c9a


@ 28c9a
        <LVAR  0x008 4(r)>
    <POP 28c9a--0001 Body>                                              
        <POP 28c9a-28cb0 Prologue>                           Σ0         ↓
        <POP 28cb0-28cba Naked>                              Σ0         ↓ →0x28cc4
            <MI 28cb0  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28cb4  CMPA.W  #0x1,A0>                                         {}
            <MI 28cb8  BEQ     0x28cc4>                                         {}
        <POP 28cba-28cc4 Naked>                              Σ0         ↓
            <MI 28cba  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Call 0x28cbc 0x103e0>                                              {[4, 'A0']}
                WriteConsoleStringCrLf(str : String)
            <POP 28cc2-28cc4 StackAdj>                       Δ+4                {}
        <POP 28cc4-28cd2 Naked>                              Σ0         ←0x28cb0
            <POP 28cc4-28cd2 Bailout>                                           {}
                <MI 28cc4  MOVEA.L (A5+0x8),A7>                         
                <MI 28cc8  MOVEA.W #0x0,A6>                             
                <MI 28ccc  JMP     0x2c576>                             

0x28cf8


@ 28cf8
        <LVAR  0x008 1(rw)>
    <POP 28cf8-28d36 Body>                                              
        <POP 28cf8-28d0e Prologue>                           Σ0         ↓
        <POP 28d0e-28d1c Naked>                              Σ0         ↓ →0x28d22
            <MI 28d0e  MOVE.L  0x2f1e8,D0>                                      {}
            <MI 28d14  CMP.L   0x2f1ec,D0>                                      {}
            <MI 28d1a  BLE     0x28d22>                                         {}
        <POP 28d1c-28d22 Naked>                              Σ0         →0x28d2e
            <MI 28d1c  CLR.B   (A6+0x8)>                                        {}
            <MI 28d20  BRA     0x28d2e>                                         {}
        <POP 28d22-28d2e Naked>                              Σ0         ↓ ←0x28d0e
            <MI 28d22  LEA.L   0x2e1e0,A0>                                      {}
            <MI 28d28  MOVE.B  (A0+D0.L+#0x7),(A6+0x8)>                         {}
        <POP 28d2e-28d36 Epilogue>                           Σ0         ←0x28d1c

0x28d36


@ 28d36
        <LVAR  0x008 1(rw)>
    <POP 28d36-28d7a Body>                                              
        <POP 28d36-28d4c Prologue>                           Σ0         ↓
        <POP 28d4c-28d52 RegCacheLoad>                       Σ0         ↓
        <POP 28d52-28d5c Naked>                              Σ0         ↓ →0x28d62
            <MI 28d52  MOVE.L  0x2f1e8,D0>                                      {}
            <MI 28d54  CMP.L   0x2f1ec,D0>                                      {}
            <MI 28d5a  BLE     0x28d62>                                         {}
        <POP 28d5c-28d62 Naked>                              Σ0         →0x28d6e
            <MI 28d5c  CLR.B   (A6+0x8)>                                        {}
            <MI 28d60  BRA     0x28d6e>                                         {}
        <POP 28d62-28d6e Naked>                              Σ0         ↓ ←0x28d52
            <MI 28d62  LEA.L   0x2e1e0,A0>                                      {}
            <MI 28d68  MOVE.B  (A0+D0.L+#0x7),(A6+0x8)>                         {}
        <POP 28d6e-28d72 Naked>                              Σ0         ↓ ←0x28d5c
            <MI 28d6e  ADDQ.L  #0x1,D0>                                         {}
            <MI 28d70  MOVE.L  D0,0x2f1e8>                                      {}
        <POP 28d72-28d7a Epilogue>                           Σ0         

0x28d7a


@ 28d7a
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 28d7a-28e54 Body>                                              
        <POP 28d7a-28d90 Prologue>                           Σ0         ↓
        <POP 28d90-28da2 RegCacheLoad>                       Σ0         ↓
        <POP 28da2-28dae Naked>                              Σ0         ↓ →0x28db8 ←0x28e48
            <POP 28da2-28da4 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x28da4 0x28cf8>                                              {[-2-]}
            <MI 28da8  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 28daa  CMP.B   #0x5b,D0>                                        {}
            <MI 28dac  BNE     0x28db8>                                         {}
        <POP 28dae-28db8 Naked>                              Σ0         →0x28e48
            <Call 0x28dae 0x2c080>                                              {}
            <MI 28db4  BRA     0x28e48>                                         {}
        <POP 28db8-28dc4 Naked>                              Σ0         ↓ →0x28ddc ←0x28da2
            <MI 28db8  MOVE.L  0x2f1e8,D6>                                      {}
            <POP 28dba-28dbc StackAdj>                       Δ-2                {[-2-]}
            <Call 0x28dbc 0x28d36>                                              {[-2-]}
            <MI 28dc0  MOVE.B  (A7)+,D5>                     Δ+2                {}
            <MI 28dc2  BNE     0x28ddc>                                         {}
        <POP 28dc4-28dda Naked>                              Σ0         →0x28e4c
            <MI 28dc4  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 28dc8  LEA.L   0x28bb2,A1>                                      {}
            <BlockMove 8,A1,A0>                                                 {}
            <MI 28dd4  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28dd6  MOVE.B  #0x02,(A0)>                                      {}
            <MI 28dd8  BRA     0x28e4c>                                         {}
        <POP 28ddc-28de0 Naked>                              Σ0         ↓ →0x28de8 ←0x28db8
            <MI 28ddc  CMP.B   #0x2c,D5>                                        {}
            <MI 28dde  BNE     0x28de8>                                         {}
        <POP 28de0-28de8 Naked>                              Σ0         →0x28e38
            <MI 28de0  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28de2  MOVE.B  #0x03,(A0)>                                      {}
            <MI 28de6  BRA     0x28e38>                                         {}
        <POP 28de8-28dec Naked>                              Σ0         ↓ →0x28df4 ←0x28ddc
            <MI 28de8  CMP.B   #0x3b,D5>                                        {}
            <MI 28dea  BNE     0x28df4>                                         {}
        <POP 28dec-28df4 Naked>                              Σ0         →0x28e38
            <MI 28dec  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28dee  MOVE.B  #0x01,(A0)>                                      {}
            <MI 28df2  BRA     0x28e38>                                         {}
        <POP 28df4-28dfa Naked>                              Σ0         ↓ →0x28e00 ←0x28de8
            <MI 28df4  CMPI.B  #0x5d,D5>                                        {}
            <MI 28df8  BNE     0x28e00>                                         {}
        <POP 28dfa-28e00 Naked>                              Σ0         →0x28e38
            <MI 28dfa  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28dfc  MOVE.B  #0x02,(A0)>                                      {}
            <MI 28dfe  BRA     0x28e38>                                         {}
        <POP 28e00-28e04 Naked>                              Σ0         ↓ ←0x28df4
            <MI 28e00  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28e02  CLR.B   (A0)>                                            {}
        <POP 28e04-28e10 Naked>                              Σ0         ↓ →0x28e18 ←0x28e36
            <POP 28e04-28e06 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x28e06 0x28cf8>                                              {[-2-]}
            <MI 28e0a  MOVE.B  (A7)+,D7>                     Δ+2                {}
            <MI 28e0c  CMP.B   #0x5b,D7>                                        {}
            <MI 28e0e  BNE     0x28e18>                                         {}
        <POP 28e10-28e18 Naked>                              Σ0         →0x28e36
            <Call 0x28e10 0x2c080>                                              {}
            <MI 28e16  BRA     0x28e36>                                         {}
        <POP 28e18-28e1c Naked>                              Σ0         ↓ →0x28e2a ←0x28e04
            <MI 28e18  CMP.B   #0x3b,D7>                                        {}
            <MI 28e1a  BEQ     0x28e2a>                                         {}
        <POP 28e1c-28e20 Naked>                              Σ0         ↓ →0x28e2a
            <MI 28e1c  CMP.B   #0x2c,D7>                                        {}
            <MI 28e1e  BEQ     0x28e2a>                                         {}
        <POP 28e20-28e26 Naked>                              Σ0         ↓ →0x28e2a
            <MI 28e20  CMPI.B  #0x5d,D7>                                        {}
            <MI 28e24  BEQ     0x28e2a>                                         {}
        <POP 28e26-28e2a Naked>                              Σ0         ↓ →0x28e2e
            <MI 28e26  TST.B   D7>                                              {}
            <MI 28e28  BNE     0x28e2e>                                         {}
        <POP 28e2a-28e2c Naked>                              Σ0         →0x28e38 ←0x28e18 ←0x28e1c ←0x28e20
            <MI 28e2a  BRA     0x28e38>                                         {}
        <POP 28e2e-28e36 Naked>                              Σ0         ↓ ←0x28e26
            <POP 28e2e-28e30 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x28e30 0x28d36>                                              {[-2-]}
            <MI 28e34  MOVE.B  (A7)+,D7>                     Δ+2                {}
        <POP 28e36-28e38 Naked>                              Σ0         →0x28e04 ←0x28e10
            <MI 28e36  BRA     0x28e04>                                         {}
        <POP 28e38-28e48 Naked>                              Σ0         →0x28e4c ←0x28de0 ←0x28dec ←0x28dfa ←0x28e2a
            <MI 28e38  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 28e3c  MOVE.L  D6,(A0)>                                         {}
            <MI 28e3e  MOVE.L  0x2f1e8,(A0+0x4)>                                {}
            <MI 28e42  SUBQ.L  #0x1,(A0+0x4)>                                   {}
            <MI 28e46  BRA     0x28e4c>                                         {}
        <POP 28e48-28e4c Naked>                              Σ0         →0x28da2 ←0x28dae
            <MI 28e48  BRA     0x28da2>                                         {}
        <POP 28e4c-28e54 Epilogue>                           Σ0         ←0x28dc4 ←0x28e38

0x28e54


@ 28e54
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 1(rw)>
        <LVAR -0x008 4(w)>
        <LVAR -0x00c @ 4(w)>
    <POP 28e54-28ef2 Body>                                              
        <POP 28e54-28e6a Prologue>                           Σ0         ↓
        <POP 28e6a-28e74 RegCacheLoad>                       Σ0         ↓
        <POP 28e74-28e80 Naked>                              Σ0         ↓ →0x28e86
            <MI 28e74  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28e78  MOVE.B  (A0),D0>                                         {}
            <MI 28e7a  CMPI.B  #0x01,D0>                                        {}
            <MI 28e7e  BEQ     0x28e86>                                         {}
        <POP 28e80-28e86 Naked>                              Σ0         ↓ →0x28e94
            <MI 28e80  CMPI.B  #0x02,D0>                                        {}
            <MI 28e84  BNE     0x28e94>                                         {}
        <POP 28e86-28e94 Naked>                              Σ0         →0x28ed0 ←0x28e74
            <MI 28e86  MOVE.L  0x28bb2,(A6-0xc)>                                {}
            <MI 28e8a  MOVE.L  0x28bb6,(A6-0x8)>                                {}
            <MI 28e90  MOVE.B  D0,(A6-0x4)>                                     {}
            <MI 28e92  BRA     0x28ed0>                                         {}
        <POP 28e94-28ea6 Naked>                              Σ0         ↓ →0x28ec2 ←0x28e80 ←0x28eca
            <Pointer.fp 0x28e94 <LVAR -0x00c @ 4(w)>>        Δ-4                {[@@-12]}
            <Pointer.fp 0x28e96 <LVAR -0x004 @ 1(rw)>>       Δ-4                {[@@-12]|[@@-4]}
            <Call 0x28e98 0x28d7a>                                              {[@@-12]|[@@-4]}
            <POP 28e9c-28e9e StackAdj>                       Δ+8                {}
            <MI 28e9e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28ea2  TST.B   (A6-0x4)>                                        {}
            <MI 28ea4  BEQ     0x28ec2>                                         {}
        <POP 28ea6-28eac Naked>                              Σ0         ↓ →0x28ec2
            <MI 28ea6  MOVE.B  (A0),D0>                                         {}
            <MI 28ea8  CMP.B   #0x03,D0>                                        {}
            <MI 28eaa  BNE     0x28ec2>                                         {}
        <POP 28eac-28ec2 Naked>                              Σ0         →0x28eca
            <MI 28eac  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 28eae  EXTB.W  D0>                                              {}
            <POP 0x28eb0 LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 28eb2  MOVE.B  D0,(A0)>                                         {}
            <MI 28eb4  MOVE.L  0x28bb2,(A6-0xc)>                                {}
            <MI 28eb8  MOVE.L  0x28bb6,(A6-0x8)>                                {}
            <MI 28ebe  CLR.B   (A6-0x4)>                                        {}
            <MI 28ec0  BRA     0x28eca>                                         {}
        <POP 28ec2-28eca Naked>                              Σ0         ↓ ←0x28e94 ←0x28ea6
            <MI 28ec2  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 28ec4  EXTB.W  D0>                                              {}
            <POP 0x28ec6 LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 28ec8  MOVE.B  D0,(A0)>                                         {}
        <POP 28eca-28ed0 Naked>                              Σ0         ↓ →0x28e94 ←0x28eac
            <MI 28eca  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 28ecc  CMP.B   #0x03,D0>                                        {}
            <MI 28ece  BEQ     0x28e94>                                         {}
        <POP 28ed0-28eea Naked>                              Σ0         ↓ ←0x28e86
            <MI 28ed0  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 28ed4  LEA.L   (A6-0xc),A1>                                     {}
            <BlockMove 8,A1,A0>                                                 {}
            <MI 28ede  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 28ee2  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 28ee4  EXTB.W  D0>                                              {}
            <POP 0x28ee6 LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 28ee8  MOVE.B  D0,(A0)>                                         {}
        <POP 28eea-28ef2 Epilogue>                           Σ0         

0x28ef2


@ 28ef2
        <LVAR  0x008 4(rw)>
        <LVAR -0x004 1(rw)>
        <LVAR -0x010 2(rw)>
    <POP 28ef2-28ffa Body>                                              
        <POP 28ef2-28f08 Prologue>                           Σ0         ↓
        <POP 28f08-28f16 RegCacheLoad>                       Σ0         ↓
        <POP 28f16-28f2e Naked>                              Σ0 Δ-4     ↓
            <MI 28f16  MOVEQ.L #0x01,D6>                                        {}
            <MI 28f18  CLR.W   (A6-0x10)>                                       {}
            <MI 28f1a  MOVEQ.L #0x01,D5>                                        {}
            <POP 28f1c-28f1e StackAdj>                       Δ-4                {[-4-]}
            <MI 28f1e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x28f20 0x102f0>                                              {[-4-]|[4, '(A6+0x8)']}
                ToUpper(a : String) : String
            <POP 28f26-28f28 StackAdj>                       Δ+4                {[-4-]}
            <MI 28f28  MOVE.L  (A7)+,(A6+0x8)>               Δ+4                {}
            <MI 28f2a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 28f2c  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
        <POP 28f2e-28f3a Naked>                              Σ-4        ↓ →0x28fe8 ←0x28fce
            <MI 28f2e  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 28f30  MOVE.W  (A0),D0>                                         {[-4-]}
            <MI 28f32  EXTW.L  D0>                                              {[-4-]}
            <MI 28f34  CMP.L   D0,D6>                                           {[-4-]}
            <MI 28f36  BGT     0x28fe8>                                         {[-4-]}
        <POP 28f3a-28f4c Naked>                              Σ-4        ↓ →0x28f4e
            <MI 28f3a  CLR.L   D0>                                              {[-4-]}
            <MI 28f3c  MOVE.B  (A0+D6.L+#0x1),D0>                               {[-4-]}
            <MI 28f40  ANDI.W  #0x007f,D0>                                      {[-4-]}
            <MI 28f44  MOVE.B  D0,(A6-0x4)>                                     {[-4-]}
            <MI 28f46  CMPI.B  #0x09,D0>                                        {[-4-]}
            <MI 28f4a  BNE     0x28f4e>                                         {[-4-]}
        <POP 28f4c-28f4e Naked>                              Σ-4        ↓
            <MI 28f4c  MOVE.B  #0x20,(A6-0x4)>                                  {[-4-]}
        <POP 28f4e-28f5a Naked>                              Σ-4        ↓ →0x28f8a ←0x28f3a
            <MI 28f4e  CLR.L   D0>                                              {[-4-]}
            <MI 28f50  MOVE.B  (A6-0x4),D0>                                     {[-4-]}
            <MI 28f52  SUB.W   #0x20,D0>                                        {[-4-]}
            <MI 28f54  CMPI.W  #0x000c,D0>                                      {[-4-]}
            <MI 28f58  BHI     0x28f8a>                                         {[-4-]}
        <POP 28f5a-28f64 Naked>                              Σ-4        →0x28f82 →0x28f7e →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f8a →0x28f86
            <MI 28f5a  ADD.W   D0,D0>                                           {[-4-]}
            <MI 28f5c  SWITCH  D0.W>                                            {[-4-]}
        <POP 28f7e-28f80 Naked>                              Σ-4        →0x28fe8 ←0x28f5a
            <MI 28f7e  BRA     0x28fe8>                                         {[-4-]}
        <POP 28f82-28f86 Naked>                              Σ-4        →0x28f8c ←0x28f5a
            <MI 28f82  MOVEQ.L #0x00,D7>                                        {[-4-]}
            <MI 28f84  BRA     0x28f8c>                                         {[-4-]}
        <POP 28f86-28f8a Naked>                              Σ-4        →0x28f8c ←0x28f5a
            <MI 28f86  MOVEQ.L #0x01,D7>                                        {[-4-]}
            <MI 28f88  BRA     0x28f8c>                                         {[-4-]}
        <POP 28f8a-28f8c Naked>                              Σ-4        ↓ ←0x28f4e ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a ←0x28f5a
            <MI 28f8a  MOVEQ.L #0x02,D7>                                        {[-4-]}
        <POP 28f8c-28fb0 Naked>                              Σ-4        →0x28fb6 →0x28fb8 →0x28fc2 ←0x28f82 ←0x28f86
            <MI 28f8c  MOVEQ.L #0x03,D0>                                        {[-4-]}
            <MI 28f8e  MULS.W  (A6-0x10),D0>                                    {[-4-]}
            <MI 28f90  LEA.L   0x28bba,A0>                                      {[-4-]}
            <MI 28f94  LEA.L   (A0+D0.W),A0>                                    {[-4-]}
            <MI 28f98  CLR.L   D0>                                              {[-4-]}
            <MI 28f9a  MOVE.B  (A0+D7.W),D0>                                    {[-4-]}
            <POP 0x28f9e LimitCheck 0x0 ≤ D0 ≤ 0x2>                             {[-4-]}
            <MI 28fa6  ADD.W   D0,D0>                                           {[-4-]}
            <MI 28fa8  SWITCH  D0.W>                                            {[-4-]}
        <POP 28fb6-28fb8 Naked>                              Σ-4        →0x28fce ←0x28f8c
            <MI 28fb6  BRA     0x28fce>                                         {[-4-]}
        <POP 28fb8-28fc2 Naked>                              Σ-4        →0x28fce ←0x28f8c
            <MI 28fb8  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 28fba  MOVE.B  (A6-0x4),(A0+D5.L+#0x1)>                         {[-4-]}
            <MI 28fbe  ADDQ.L  #0x1,D5>                                         {[-4-]}
            <MI 28fc0  BRA     0x28fce>                                         {[-4-]}
        <POP 28fc2-28fce Naked>                              Σ-4        ↓ ←0x28f8c
            <MI 28fc2  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 28fc4  MOVE.B  #0x2c,(A0+D5.L+#0x1)>                            {[-4-]}
            <MI 28fca  ADDQ.L  #0x1,D5>                                         {[-4-]}
            <MI 28fcc  SUBQ.L  #0x1,D6>                                         {[-4-]}
        <POP 28fce-28fe8 Naked>                              Σ-4        →0x28f2e ←0x28fb6 ←0x28fb8
            <MI 28fce  MOVEQ.L #0x03,D0>                                        {[-4-]}
            <MI 28fd0  MULS.W  (A6-0x10),D0>                                    {[-4-]}
            <MI 28fd2  LEA.L   0x28bc3,A0>                                      {[-4-]}
            <MI 28fd6  LEA.L   (A0+D0.W),A0>                                    {[-4-]}
            <MI 28fda  CLR.L   D0>                                              {[-4-]}
            <MI 28fdc  MOVE.B  (A0+D7.W),D0>                                    {[-4-]}
            <MI 28fe0  MOVE.W  D0,(A6-0x10)>                                    {[-4-]}
            <MI 28fe2  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 28fe4  BRA     0x28f2e>                                         {[-4-]}
        <POP 28fe8-28ff2 Naked>                              Σ-4 Δ+4    ↓ ←0x28f2e ←0x28f7e
            <MI 28fe8  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 28fea  MOVE.L  D5,D0>                                           {[-4-]}
            <MI 28fec  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <MI 28fee  MOVE.W  D0,(A0)>                                         {[-4-]}
            <POP 28ff0-28ff2 StackAdj>                       Δ+4                {}
        <POP 28ff2-28ffa Epilogue>                           Σ0         

0x28ffa


@ 28ffa
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x00a @>
        <LVAR -0x00e @ 4(r)>
        <LVAR -0x014 @ 1(r)>
    <POP 28ffa-290a6 Body>                                              
        <POP 28ffa-29010 Prologue>                           Σ0         ↓
        <POP 29010-29016 RegCacheLoad>                       Σ0         ↓
        <POP 29016-29024 Naked>                              Σ0         ↓ →0x2902c
            <POP 29016-29018 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x29018 0x28cf8>                                              {[-2-]}
            <MI 2901c  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 2901e  CMPI.B  #0x5b,D0>                                        {}
            <MI 29022  BNE     0x2902c>                                         {}
        <POP 29024-2902c Naked>                              Σ0         ↓
            <POP 29024-29026 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x29026 0x28d36>                                              {[-2-]}
            <MI 2902a  MOVE.B  (A7)+,D7>                     Δ+2                {}
        <POP 2902c-29036 Naked>                              Σ0         ↓ ←0x29016
            <MI 2902c  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 29030  MOVE.L  #0x01,(A0)>                                      {}
            <MI 29032  CLR.B   (A6-0x14)>                                       {}
        <POP 29036-29050 Naked>                              Σ0         ↓ →0x29086 ←0x29086
            <Pointer.fp 0x29036 <LVAR -0x00a @>>             Δ-4                {[@@-10]}
            <Pointer.fp 0x2903a <LVAR -0x002 @ 1(r)>>        Δ-4                {[@@-10]|[@@-2]}
            <Pointer.fp 0x2903e <LVAR -0x014 @ 1(r)>>        Δ-4                {[@@-10]|[@@-2]|[@@-20]}
            <Call 0x29042 0x28e54>                                              {[@@-10]|[@@-2]|[@@-20]}
            <POP 29046-2904a StackAdj>                       Δ+12               {}
            <MI 2904a  TST.B   (A6-0x2)>                                        {}
            <MI 2904e  BNE     0x29086>                                         {}
        <POP 29050-2907c Naked>                              Σ0         ↓ →0x29080
            <Pointer.fp 0x29050 <LVAR -0x00e @ 4(r)>>        Δ-4                {[@@-14]}
            <Const 0x29052 0xc.4>                            Δ-4                {[@@-14]|[##12]}
            <Call 0x29056 0x1029c>                                              {[@@-14]|[##12]}
                Malloc1(length : Long) : Pointer
            <POP 2905c-2905e StackAdj>                       Δ+8                {}
            <MI 2905e  MOVEA.L (A6-0xe),A0>                                     {}
            <MI 29060  MOVEA.L A0,A1>                                           {}
            <MI 29062  LEA.L   (A6-0xa),A2>                                     {}
            <BlockMove 8,A2,A1>                                                 {}
            <MI 2906e  MOVE.L  #0x01,(A0+0x8)>                                  {}
            <MI 29072  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 29076  MOVEA.L (A0),A1>                                         {}
            <MI 29078  CMPA.W  #0x01,A1>                                        {}
            <MI 2907a  BNE     0x29080>                                         {}
        <POP 2907c-29080 Naked>                              Σ0         →0x29084
            <MI 2907c  MOVE.L  (A6-0xe),(A0)>                                   {}
            <MI 2907e  BRA     0x29084>                                         {}
        <POP 29080-29084 Naked>                              Σ0         ↓ ←0x29050
            <MI 29080  MOVE.L  (A6-0xe),(A4+0x8)>                               {}
        <POP 29084-29086 Naked>                              Σ0         ↓ ←0x2907c
            <MI 29084  MOVEA.L (A6-0xe),A4>                                     {}
        <POP 29086-2908c Naked>                              Σ0         ↓ →0x29036 ←0x29036
            <MI 29086  TST.B   (A6-0x2)>                                        {}
            <MI 2908a  BEQ     0x29036>                                         {}
        <POP 2908c-2909c Naked>                              Σ0         ↓ →0x2909e
            <MI 2908c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29090  CLR.B   (A0)>                                            {}
            <MI 29092  MOVE.B  (A6-0x2),D0>                                     {}
            <MI 29096  CMPI.B  #0x02,D0>                                        {}
            <MI 2909a  BNE     0x2909e>                                         {}
        <POP 2909c-2909e Naked>                              Σ0         ↓
            <MI 2909c  ADDQ.B  #0x1,(A0)>                                       {}
        <POP 2909e-290a6 Epilogue>                           Σ0         ←0x2908c

0x290a6


@ 290a6
        <LVAR  0x00c 4(w)>
        <LVAR  0x008 4(r)>
    <POP 290a6-290dc Body>                                              
        <POP 290a6-290bc Prologue>                           Σ0         ↓
        <POP 290bc-290c2 Naked>                              Σ0         ↓
            <MI 290bc  MOVEQ.L #-0x01,D7>                                       {}
            <MI 290be  MOVEA.L (A6+0x8),A4>                                     {}
        <POP 290c2-290c8 Naked>                              Σ0         ↓ →0x290d0 ←0x290c8
            <MI 290c2  CMPA.W  #0x1,A4>                                         {}
            <MI 290c6  BEQ     0x290d0>                                         {}
        <POP 290c8-290d0 Naked>                              Σ0         →0x290c2
            <MI 290c8  ADDQ.L  #0x1,D7>                                         {}
            <MI 290ca  MOVEA.L (A4+0x8),A4>                                     {}
            <MI 290ce  BRA     0x290c2>                                         {}
        <POP 290d0-290d4 Naked>                              Σ0         ↓ ←0x290c2
            <MI 290d0  MOVE.L  D7,(A6+0xc)>                                     {}
        <POP 290d4-290dc Epilogue>                           Σ0         

0x290dc


@ 290dc
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 290dc-29168 Body>                                              
        <POP 290dc-290f2 Prologue>                           Σ0         ↓
        <POP 290f2-290f4 RegCacheLoad>                       Σ0         ↓
        <POP 290f4-29108 Naked>                              Σ0         ↓ →0x29160
            <POP 290f4-290f6 StackAdj>                       Δ-4                {[-4-]}
            <MI 290f6  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <Call 0x290fa 0x290a6>                                              {[-4-]|[4, '(A6+0xc)']}
            <POP 290fe-29100 StackAdj>                       Δ+4                {[-4-]}
            <MI 29100  MOVE.L  (A7)+,D0>                     Δ+4                {}
            <MI 29102  CMP.L   (A6+0x8),D0>                                     {}
            <MI 29106  BEQ     0x29160>                                         {}
        <POP 29108-29160 Naked>                              Σ0         ↓
            <MI 29108  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <Call 0x2910c 0x28c58>                                              {[4, '(A6+0xc)']}
            <POP 29110-29112 StackAdj>                       Δ+4                {}
            <Blob 0x29112 [32] @>                            Δ-32               {[«32""»]}
            <Blob 0x2911e [10] (A6+0x1a)>                    Δ-10               {[«32""»]|[«10»]}
            <POP 2912a-2912c StackAdj>                       Δ-8                {[«32""»]|[«10»]|[-8-]}
            <Lit 0x2912c 32>                                                    {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]}
            <POP 2913c-2913e StackAdj>                       Δ-4                {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[-4-]}
            <Lit 0x2913e>                                                       {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
                <Pointer.sp 0x2913e 12>                      Δ-4        
                <Const 0x29142 0x1.2>                        Δ-2        
                <Const 0x29144 0xa.2>                        Δ-2        
                <Call 0x29148 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2914e-29150 StackAdj>                   Δ+8        
            <Call 0x29150 0x102d0>                                              {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 29156-29158 StackAdj>                       Δ+8                {[«32""»]|[«10»]|[-4-]}
            <Call 0x29158 0x28c9a>                                              {[«32""»]|[«10»]|[-4-]}
            <POP 2915c-29160 StackAdj>                       Δ+46               {}
        <POP 29160-29168 Epilogue>                           Σ0         ←0x290f4

0x29168


@ 29168
        <LVAR  0x014 1(rw)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 29168-291ee Body>                                   Δ-4        
        <POP 29168-2917e Prologue>                           Σ0         ↓
        <POP 2917e-29192 Naked>                              Σ0         ↓ →0x291e0
            <MI 2917e  CLR.B   (A6+0x14)>                                       {}
            <MI 29182  MOVE.L  (A6+0x10),D0>                                    {}
            <MI 29186  ADD.L   (A6+0x8),D0>                                     {}
            <MI 2918a  CMP.L   0x2f1ec,D0>                                      {}
            <MI 29190  BGT     0x291e0>                                         {}
        <POP 29192-29198 Naked>                              Σ0 Δ-4     ↓
            <MI 29192  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <MI 29196  MOVEQ.L #0x01,D7>                                        {[4, '(A6+0x8)']}
        <POP 29198-2919c Naked>                              Σ-4        ↓ →0x291de ←0x291da
            <MI 29198  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2919a  BGT     0x291de>                                         {[-4-]}
        <POP 2919c-291d6 Naked>                              Σ-4        ↓ →0x291da
            <MI 2919c  MOVE.L  (A6+0x10),D0>                                    {[-4-]}
            <MI 291a0  ADD.L   D7,D0>                                           {[-4-]}
            <MI 291a2  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x291a4 LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-4-]}
            <MI 291ae  LEA.L   0x2e1e0,A0>                                      {[-4-]}
            <MI 291b4  MOVE.L  (A6+0xc),D1>                                     {[-4-]}
            <MI 291b8  ADD.L   D7,D1>                                           {[-4-]}
            <MI 291ba  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <MI 291bc  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x291be LimitCheck 0x0 ≤ D1 ≤ 0x3e>                            {[-4-]}
            <MI 291c8  LEA.L   0x287b4,A1>                                      {[-4-]}
            <MI 291cc  MOVE.B  (A0+D0.L+#0x8),D0>                               {[-4-]}
            <MI 291d0  CMP.B   (A1+D1.L),D0>                                    {[-4-]}
            <MI 291d4  BEQ     0x291da>                                         {[-4-]}
        <POP 291d6-291da Naked>                              Σ-4 Δ+4    →0x291e6
            <POP 291d6-291d8 StackAdj>                       Δ+4                {}
            <MI 291d8  BRA     0x291e6>                                         {}
        <POP 291da-291de Naked>                              Σ-4        ↓ →0x29198 ←0x2919c
            <MI 291da  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 291dc  BVC     0x29198>                                         {[-4-]}
        <POP 291de-291e0 Naked>                              Σ-4 Δ+4    ↓ ←0x29198
            <POP 291de-291e0 StackAdj>                       Δ+4                {}
        <POP 291e0-291e6 Naked>                              Σ0         ↓ ←0x2917e
            <MI 291e0  MOVE.B  #0x01,(A6+0x14)>                                 {}
        <POP 291e6-291ee Epilogue>                           Σ0         ←0x291d6

0x291ee


@ 291ee
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 291ee-29278 Body>                                              
        <POP 291ee-29204 Prologue>                           Σ0         ↓
        <POP 29204-2920e RegCacheLoad>                       Σ0         ↓
        <POP 2920e-29212 Naked>                              Σ0         ↓ →0x29250
            <MI 2920e  TST.L   (A6+0x8)>                                        {}
            <MI 29210  BGE     0x29250>                                         {}
        <POP 29212-29220 Naked>                              Σ0         ↓ →0x29250
            <MI 29212  MOVE.L  (A6+0x8),D0>                                     {}
            <MI 29214  NEG.L   D0>                                              {}
            <MI 29216  ADD.L   0x2f1ec,D0>                                      {}
            <MI 29218  CMPI.L  #0x00001000,D0>                                  {}
            <MI 2921e  BLE     0x29250>                                         {}
        <POP 29220-29250 Naked>                              Σ0         ↓
            <Blob 0x29220 [28] @>                            Δ-28               {[«28""»]}
            <POP 29232-29234 StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x29234 27>                                                    {[«28""»]|[$$Evaluation buffer overflow.]}
            <Call 0x29248 0x28c9a>                                              {[«28""»]|[$$Evaluation buffer overflow.]}
            <POP 2924c-29250 StackAdj>                       Δ+32               {}
        <POP 29250-29270 Naked>                              Σ0         ↓ ←0x2920e ←0x29212
            <MI 29250  LEA.L   0x2e1e8,A0>                                      {}
            <MI 29256  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Blob 0x29258 [4] 0x2f1ec>                       Δ-4                {[4, 'A0']|[«4»]}
            <MI 2925a  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, 'A0']|[«4»]|[4, '(A6+0xc)']}
            <MI 2925e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x29260 0x10364>                                              {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
                MovStringTail(Base, Len, Ptr, Delta)
            <POP 29266-2926a StackAdj>                       Δ+16               {}
            <MI 2926a  MOVE.L  0x2f1ec,D0>                                      {}
            <MI 2926c  SUB.L   (A6+0x8),D0>                                     {}
            <MI 2926e  MOVE.L  D0,0x2f1ec>                                      {}
        <POP 29270-29278 Epilogue>                           Σ0         

0x29278


@ 29278
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 29278-29302 Body>                                              
        <POP 29278-2928e Prologue>                           Σ0         ↓
        <POP 2928e-29292 RegCacheLoad>                       Σ0         ↓
        <POP 29292-292b2 Naked>                              Σ0 Δ-8     ↓
            <MI 29292  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29296  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 29298  MOVEA.L (A6+0xc),A1>                                     {[4, 'A0']}
            <MI 2929a  MOVE.L  (A1),-(A7)>                   Δ-4                {[4, 'A0']|[4, '(A1)']}
            <MI 2929c  MOVE.W  (A0),D0>                                         {[4, 'A0']|[4, '(A1)']}
            <MI 2929e  EXTW.L  D0>                                              {[4, 'A0']|[4, '(A1)']}
            <MI 292a0  NEG.L   D0>                                              {[4, 'A0']|[4, '(A1)']}
            <MI 292a2  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
            <Call 0x292a4 0x291ee>                                              {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
            <POP 292a8-292aa StackAdj>                       Δ+8                {[4, 'A0']}
            <MI 292aa  MOVE.W  (A0),D0>                                         {[4, 'A0']}
            <MI 292ac  EXTW.L  D0>                                              {[4, 'A0']}
            <MI 292ae  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D0']}
            <MI 292b0  MOVEQ.L #0x01,D7>                                        {[4, 'A0']|[4, 'D0']}
        <POP 292b2-292b6 Naked>                              Σ-8        ↓ →0x292ec ←0x292b6
            <MI 292b2  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 292b4  BGT     0x292ec>                                         {[-8-]}
        <POP 292b6-292ec Naked>                              Σ-8        ↓ →0x292b2
            <MI 292b6  MOVEA.L (A6+0xc),A0>                                     {[-8-]}
            <MI 292b8  MOVE.L  D7,D0>                                           {[-8-]}
            <MI 292ba  ADD.L   (A0),D0>                                         {[-8-]}
            <MI 292bc  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <MI 292be  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x292c0 LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-8-]}
            <MI 292ca  LEA.L   0x2e1e0,A0>                                      {[-8-]}
            <MI 292d0  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 292d2  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x292d4 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-8-]}
            <MI 292de  MOVEA.L (A7+0x4),A1>                                     {[-8-]}
            <MI 292e2  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x8)>                   {[-8-]}
            <MI 292e8  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 292ea  BVC     0x292b2>                                         {[-8-]}
        <POP 292ec-292fa Naked>                              Σ-8 Δ+8    ↓ ←0x292b2
            <POP 292ec-292ee StackAdj>                       Δ+4                {[-4-]}
            <MI 292ee  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 292f0  MOVEA.L (A7),A1>                                         {[-4-]}
            <MI 292f2  MOVE.W  (A1),D0>                                         {[-4-]}
            <MI 292f4  EXTW.L  D0>                                              {[-4-]}
            <MI 292f6  ADD.L   D0,(A0)>                                         {[-4-]}
            <POP 292f8-292fa StackAdj>                       Δ+4                {}
        <POP 292fa-29302 Epilogue>                           Σ0         

0x29302


@ 29302
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 29302-29482 Body>                                              
        <POP 29302-29318 Prologue>                           Σ0         ↓
        <POP 29318-29326 RegCacheLoad>                       Σ0         ↓
        <POP 29326-29338 Naked>                              Σ0         ↓
            <MI 29326  MOVEQ.L #0x00,D7>                                        {}
            <MI 29328  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2932c  CLR.L   (A0)>                                            {}
            <MI 2932e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29330  CLR.L   (A0)>                                            {}
            <MI 29332  MOVE.L  0x2f1e8,D6>                                      {}
        <POP 29338-29358 Naked>                              Σ0         ↓ →0x2942a ←0x29434 ←0x2943a
            <MI 29338  MOVE.L  D6,D0>                                           {}
            <MI 2933a  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x2933c LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {}
            <MI 29346  LEA.L   0x2e1e0,A0>                                      {}
            <MI 2934c  MOVE.B  (A0+D0.L+#0x8),D0>                               {}
            <MI 29350  CMPI.B  #0x5b,D0>                                        {}
            <MI 29354  BNE     0x2942a>                                         {}
        <POP 29358-2936c Naked>                              Σ0         ↓ →0x293ea
            <POP 29358-2935a StackAdj>                       Δ-2                {[-2-]}
            <MI 2935a  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x2935c 0x1.4>                            Δ-4                {[-2-]|[4, 'D6']|[##1]}
            <Const 0x29360 0x3.4>                            Δ-4                {[-2-]|[4, 'D6']|[##1]|[##3]}
            <Call 0x29364 0x29168>                                              {[-2-]|[4, 'D6']|[##1]|[##3]}
            <POP 29366-29368 StackAdj>                       Δ+12               {[-2-]}
            <MI 29368  TST.B   (A7)+>                        Δ+2                {}
            <MI 2936a  BNE     0x293ea>                                         {}
        <POP 2936c-2937e Naked>                              Σ0         ↓ →0x293ea
            <POP 2936c-2936e StackAdj>                       Δ-2                {[-2-]}
            <MI 2936e  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x29370 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##4]}
            <Const 0x29372 0x3.4>                            Δ-4                {[-2-]|[4, 'D6']|[##4]|[##3]}
            <Call 0x29376 0x29168>                                              {[-2-]|[4, 'D6']|[##4]|[##3]}
            <POP 29378-2937a StackAdj>                       Δ+12               {[-2-]}
            <MI 2937a  TST.B   (A7)+>                        Δ+2                {}
            <MI 2937c  BNE     0x293ea>                                         {}
        <POP 2937e-29390 Naked>                              Σ0         ↓ →0x293ea
            <POP 2937e-29380 StackAdj>                       Δ-2                {[-2-]}
            <MI 29380  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x29382 0x7.4>                            Δ-4                {[-2-]|[4, 'D6']|[##7]}
            <Const 0x29386 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##7]|[##4]}
            <Call 0x29388 0x29168>                                              {[-2-]|[4, 'D6']|[##7]|[##4]}
            <POP 2938a-2938c StackAdj>                       Δ+12               {[-2-]}
            <MI 2938c  TST.B   (A7)+>                        Δ+2                {}
            <MI 2938e  BNE     0x293ea>                                         {}
        <POP 29390-293a2 Naked>                              Σ0         ↓ →0x293ea
            <POP 29390-29392 StackAdj>                       Δ-2                {[-2-]}
            <MI 29392  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x29394 0xb.4>                            Δ-4                {[-2-]|[4, 'D6']|[##11]}
            <Const 0x29398 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##11]|[##4]}
            <Call 0x2939a 0x29168>                                              {[-2-]|[4, 'D6']|[##11]|[##4]}
            <POP 2939c-2939e StackAdj>                       Δ+12               {[-2-]}
            <MI 2939e  TST.B   (A7)+>                        Δ+2                {}
            <MI 293a0  BNE     0x293ea>                                         {}
        <POP 293a2-293b4 Naked>                              Σ0         ↓ →0x293ea
            <POP 293a2-293a4 StackAdj>                       Δ-2                {[-2-]}
            <MI 293a4  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x293a6 0xf.4>                            Δ-4                {[-2-]|[4, 'D6']|[##15]}
            <Const 0x293aa 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##15]|[##4]}
            <Call 0x293ac 0x29168>                                              {[-2-]|[4, 'D6']|[##15]|[##4]}
            <POP 293ae-293b0 StackAdj>                       Δ+12               {[-2-]}
            <MI 293b0  TST.B   (A7)+>                        Δ+2                {}
            <MI 293b2  BNE     0x293ea>                                         {}
        <POP 293b4-293c6 Naked>                              Σ0         ↓ →0x293ea
            <POP 293b4-293b6 StackAdj>                       Δ-2                {[-2-]}
            <MI 293b6  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x293b8 0x13.4>                           Δ-4                {[-2-]|[4, 'D6']|[##19]}
            <Const 0x293bc 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##19]|[##4]}
            <Call 0x293be 0x29168>                                              {[-2-]|[4, 'D6']|[##19]|[##4]}
            <POP 293c0-293c2 StackAdj>                       Δ+12               {[-2-]}
            <MI 293c2  TST.B   (A7)+>                        Δ+2                {}
            <MI 293c4  BNE     0x293ea>                                         {}
        <POP 293c6-293d8 Naked>                              Σ0         ↓ →0x293ea
            <POP 293c6-293c8 StackAdj>                       Δ-2                {[-2-]}
            <MI 293c8  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x293ca 0x17.4>                           Δ-4                {[-2-]|[4, 'D6']|[##23]}
            <Const 0x293ce 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##23]|[##4]}
            <Call 0x293d0 0x29168>                                              {[-2-]|[4, 'D6']|[##23]|[##4]}
            <POP 293d2-293d4 StackAdj>                       Δ+12               {[-2-]}
            <MI 293d4  TST.B   (A7)+>                        Δ+2                {}
            <MI 293d6  BNE     0x293ea>                                         {}
        <POP 293d8-293ea Naked>                              Σ0         ↓ →0x293ee
            <POP 293d8-293da StackAdj>                       Δ-2                {[-2-]}
            <MI 293da  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x293dc 0x1b.4>                           Δ-4                {[-2-]|[4, 'D6']|[##27]}
            <Const 0x293e0 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##27]|[##4]}
            <Call 0x293e2 0x29168>                                              {[-2-]|[4, 'D6']|[##27]|[##4]}
            <POP 293e4-293e6 StackAdj>                       Δ+12               {[-2-]}
            <MI 293e6  TST.B   (A7)+>                        Δ+2                {}
            <MI 293e8  BEQ     0x293ee>                                         {}
        <POP 293ea-293ee Naked>                              Σ0         →0x2942a ←0x29358 ←0x2936c ←0x2937e ←0x29390 ←0x293a2 ←0x293b4 ←0x293c6
            <MI 293ea  ADDQ.L  #0x1,D7>                                         {}
            <MI 293ec  BRA     0x2942a>                                         {}
        <POP 293ee-293f2 Naked>                              Σ0         ↓ →0x2940e ←0x293d8
            <MI 293ee  TST.L   D7>                                              {}
            <MI 293f0  BNE     0x2940e>                                         {}
        <POP 293f2-29406 Naked>                              Σ0         ↓ →0x2940e
            <POP 293f2-293f4 StackAdj>                       Δ-2                {[-2-]}
            <MI 293f4  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x293f6 0x1f.4>                           Δ-4                {[-2-]|[4, 'D6']|[##31]}
            <Const 0x293fa 0x5.4>                            Δ-4                {[-2-]|[4, 'D6']|[##31]|[##5]}
            <Call 0x293fe 0x29168>                                              {[-2-]|[4, 'D6']|[##31]|[##5]}
            <POP 29400-29402 StackAdj>                       Δ+12               {[-2-]}
            <MI 29402  TST.B   (A7)+>                        Δ+2                {}
            <MI 29404  BEQ     0x2940e>                                         {}
        <POP 29406-2940a Naked>                              Σ0         ↓
            <MI 29406  MOVEA.L (A6+0xc),A0>                                     {}
        <POP 2940a-2940e Naked>                              Σ0         →0x2942a ←0x29424
            <MI 2940a  MOVE.L  D6,(A0)>                                         {}
            <MI 2940c  BRA     0x2942a>                                         {}
        <POP 2940e-29420 Naked>                              Σ0         ↓ →0x2942a ←0x293ee ←0x293f2
            <POP 2940e-29410 StackAdj>                       Δ-2                {[-2-]}
            <MI 29410  MOVE.L  D6,-(A7)>                     Δ-4                {[-2-]|[4, 'D6']}
            <Const 0x29412 0x24.4>                           Δ-4                {[-2-]|[4, 'D6']|[##36]}
            <Const 0x29416 0x4.4>                            Δ-4                {[-2-]|[4, 'D6']|[##36]|[##4]}
            <Call 0x29418 0x29168>                                              {[-2-]|[4, 'D6']|[##36]|[##4]}
            <POP 2941a-2941c StackAdj>                       Δ+12               {[-2-]}
            <MI 2941c  TST.B   (A7)+>                        Δ+2                {}
            <MI 2941e  BEQ     0x2942a>                                         {}
        <POP 29420-29424 Naked>                              Σ0         ↓ →0x29428
            <MI 29420  TST.L   D7>                                              {}
            <MI 29422  BNE     0x29428>                                         {}
        <POP 29424-29428 Naked>                              Σ0         →0x2940a
            <MI 29424  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29426  BRA     0x2940a>                                         {}
        <POP 29428-2942a Naked>                              Σ0         ↓ ←0x29420
            <MI 29428  SUBQ.L  #0x1,D7>                                         {}
        <POP 2942a-29434 Naked>                              Σ0         ↓ →0x29442 ←0x29338 ←0x293ea ←0x2940a ←0x2940e
            <MI 2942a  ADDQ.L  #0x1,D6>                                         {}
            <MI 2942c  CMP.L   0x2f1ec,D6>                                      {}
            <MI 29432  BGT     0x29442>                                         {}
        <POP 29434-2943a Naked>                              Σ0         ↓ →0x29338
            <MI 29434  TST.L   D7>                                              {}
            <MI 29436  BNE     0x29338>                                         {}
        <POP 2943a-29442 Naked>                              Σ0         ↓ →0x29338
            <MI 2943a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2943c  TST.L   (A0)>                                            {}
            <MI 2943e  BEQ     0x29338>                                         {}
        <POP 29442-2944a Naked>                              Σ0         ↓ →0x2947a ←0x2942a
            <MI 29442  CMP.L   0x2f1ec,D6>                                      {}
            <MI 29448  BLE     0x2947a>                                         {}
        <POP 2944a-2947a Naked>                              Σ0         ↓
            <Blob 0x2944a [28] @>                            Δ-28               {[«28""»]}
            <POP 2945c-2945e StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x2945e 27>                                                    {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
            <Call 0x29472 0x28c9a>                                              {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
            <POP 29476-2947a StackAdj>                       Δ+32               {}
        <POP 2947a-29482 Epilogue>                           Σ0         ←0x29442

0x29482


@ 29482
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 @ 4(rw)>
    <POP 29482-294c8 Body>                                              
        <POP 29482-29498 Prologue>                           Σ0         ↓
        <POP 29498-294a0 RegCacheLoad>                       Σ0         ↓
        <POP 294a0-294ae Naked>                              Σ0         ↓ →0x294b0
            <Pointer.fp 0x294a0 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Pointer.fp 0x294a2 <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-8]|[@@-4]}
            <Call 0x294a4 0x29302>                                              {[@@-8]|[@@-4]}
            <POP 294a8-294aa StackAdj>                       Δ+8                {}
            <MI 294aa  TST.L   (A6-0x8)>                                        {}
            <MI 294ac  BNE     0x294b0>                                         {}
        <POP 294ae-294b0 Naked>                              Σ0         ↓
            <MI 294ae  MOVE.L  (A6-0x4),(A6-0x8)>                               {}
        <POP 294b0-294c0 Naked>                              Σ0         ↓ ←0x294a0
            <MI 294b0  MOVE.L  (A6-0x4),D0>                                     {}
            <MI 294b2  ADDQ.L  #0x5,D0>                                         {}
            <MI 294b4  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 294b6  SUB.L   (A6-0x8),D0>                                     {[4, 'D0']}
            <MI 294b8  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']|[4, 'D0']}
            <Call 0x294ba 0x291ee>                                              {[4, 'D0']|[4, 'D0']}
            <POP 294be-294c0 StackAdj>                       Δ+8                {}
        <POP 294c0-294c8 Epilogue>                           Σ0         

0x294c8


@ 294c8
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 @ 4(r)>
    <POP 294c8-29524 Body>                                              
        <POP 294c8-294de Prologue>                           Σ0         ↓
        <POP 294de-294e6 RegCacheLoad>                       Σ0         ↓
        <POP 294e6-294f4 Naked>                              Σ0         ↓ →0x294fa
            <Pointer.fp 0x294e6 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x294e8 <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-8]|[@@-4]}
            <Call 0x294ea 0x29302>                                              {[@@-8]|[@@-4]}
            <POP 294ee-294f0 StackAdj>                       Δ+8                {}
            <MI 294f0  TST.L   (A6-0x8)>                                        {}
            <MI 294f2  BNE     0x294fa>                                         {}
        <POP 294f4-294fa Naked>                              Σ0         →0x2950c
            <MI 294f4  MOVE.L  (A6-0x4),D0>                                     {}
            <MI 294f6  ADDQ.L  #0x5,D0>                                         {}
            <MI 294f8  BRA     0x2950c>                                         {}
        <POP 294fa-2950c Naked>                              Σ0         ↓ ←0x294e6
            <MI 294fa  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[4, '(A6-0x4)']}
            <MI 294fc  ADDQ.L  #0x5,(A7)>                                       {[-4-]}
            <Const 0x294fe 0x5.4>                            Δ-4                {[-4-]|[##5]}
            <Call 0x29502 0x291ee>                                              {[-4-]|[##5]}
            <POP 29506-29508 StackAdj>                       Δ+8                {}
            <MI 29508  MOVE.L  (A6-0x8),D0>                                     {}
            <MI 2950a  ADDQ.L  #0x6,D0>                                         {}
        <POP 2950c-2951c Naked>                              Σ0         ↓ ←0x294f4
            <MI 2950c  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2950e  SUB.L   0x2f1e8,D0>                                      {[4, 'D0']}
            <MI 29514  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']|[4, 'D0']}
            <Call 0x29516 0x291ee>                                              {[4, 'D0']|[4, 'D0']}
            <POP 2951a-2951c StackAdj>                       Δ+8                {}
        <POP 2951c-29524 Epilogue>                           Σ0         

0x29524


@ 29524
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x00c @ 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 4(rw)>
    <POP 29524-29638 Body>                                              
        <POP 29524-2953a Prologue>                           Σ0         ↓
        <POP 2953a-29552 RegCacheLoad>                       Σ0         ↓
        <POP 29552-29556 Naked>                              Σ0         ↓ →0x29560
            <MI 29552  TST.B   0x2f1fa>                                         {}
            <MI 29554  BEQ     0x29560>                                         {}
        <POP 29556-2955a Naked>                              Σ0         ↓ →0x29560
            <MI 29556  TST.L   0x2f200>                                         {}
            <MI 29558  BNE     0x29560>                                         {}
        <POP 2955a-29560 Naked>                              Σ0         ↓
            <MI 2955a  MOVE.L  (A6+0x8),0x2f200>                                {}
            <MI 2955e  SUBQ.L  #0x1,0x2f200>                                    {}
        <POP 29560-29566 Naked>                              Σ0         ↓ →0x29630 ←0x29552 ←0x29556
            <MI 29560  TST.B   0x2f1fa>                                         {}
            <MI 29562  BNE     0x29630>                                         {}
        <POP 29566-2959a Naked>                              Σ0         ↓ →0x295b4
            <MI 29566  MOVE.L  (A6+0x8),0x2f1e8>                                {}
            <MI 2956a  ADDQ.L  #0x6,0x2f1e8>                                    {}
            <Pointer.fp 0x2956c <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Pointer.fp 0x2956e <LVAR -0x004 @>>             Δ-4                {[@@-8]|[@@-4]}
            <Call 0x29572 0x28ffa>                                              {[@@-8]|[@@-4]}
            <POP 29576-29578 StackAdj>                       Δ+8                {}
            <Blob 0x29578 [10] @>                            Δ-10               {[«10""»]}
            <MI 29584  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[«10""»]|[4, '(A6-0x8)']}
            <Const 0x29586 0x0.4>                            Δ-4                {[«10""»]|[4, '(A6-0x8)']|[##0]}
            <Call 0x2958a 0x290dc>                                              {[«10""»]|[4, '(A6-0x8)']|[##0]}
            <POP 2958e-29592 StackAdj>                       Δ+18               {}
            <MI 29592  TST.B   0x2f204>                                         {}
            <MI 29598  BEQ     0x295b4>                                         {}
        <POP 2959a-295b4 Naked>                              Σ0         →0x295c8
            <POP 2959a-2959c StackAdj>                       Δ-8                {[-8-]}
            <MI 2959c  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0x8)']}
            <Const 0x2959e 0x0.4>                            Δ-4                {[-8-]|[4, '(A6-0x8)']|[##0]}
            <Call 0x295a2 0x299f4>                                              {[-8-]|[4, '(A6-0x8)']|[##0]}
            <POP 295a8-295aa StackAdj>                       Δ+8                {[-8-]}
            <MI 295aa  MOVE.L  (A7)+,(A6-0x14)>              Δ+4                {[-4-]}
            <MI 295ae  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {}
            <MI 295b2  BRA     0x295c8>                                         {}
        <POP 295b4-295c8 Naked>                              Σ0         ↓ ←0x29566
            <POP 295b4-295b6 StackAdj>                       Δ-4                {[-4-]}
            <MI 295b6  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x8)']}
            <Const 0x295b8 0x0.4>                            Δ-4                {[-4-]|[4, '(A6-0x8)']|[##0]}
            <Call 0x295bc 0x299c2>                                              {[-4-]|[4, '(A6-0x8)']|[##0]}
            <POP 295c2-295c4 StackAdj>                       Δ+8                {[-4-]}
            <MI 295c4  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {}
        <POP 295c8-295de Naked>                              Σ0         ↓ →0x29608 ←0x2959a
            <MI 295c8  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <Call 0x295ca 0x28c58>                                              {[4, '(A6-0x8)']}
            <POP 295ce-295d0 StackAdj>                       Δ+4                {}
            <MI 295d0  MOVE.L  0x2f1e8,0x2f1fc>                                 {}
            <MI 295d6  TST.B   0x2f204>                                         {}
            <MI 295dc  BEQ     0x29608>                                         {}
        <POP 295de-29608 Naked>                              Σ0         →0x29630
            <POP 295de-295e0 StackAdj>                       Δ-2                {[-2-]}
            <MI 295e0  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x10)']}
            <MI 295e4  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <Blob 0x295e8 [4] 0x2f20e>                       Δ-4                {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]}
            <Blob 0x295ee [4] 0x2f20a>                       Δ-4                {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
            <Call 0x295f4 0x1032c>                                              {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
                IsEqual(a, b : Quad) : Bool
            <POP 295fa-295fe StackAdj>                       Δ+16               {[-2-]}
            <MI 295fe  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 29600  EXTB.W  D0>                                              {}
            <POP 0x29602 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 29604  MOVE.B  D0,0x2f1fa>                                      {}
            <MI 29606  BRA     0x29630>                                         {}
        <POP 29608-29630 Naked>                              Σ0         ↓ ←0x295c8
            <POP 29608-2960a StackAdj>                       Δ-2                {[-2-]}
            <MI 2960a  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0xc)']}
            <Blob 0x2960e [4] 0x2f206>                       Δ-4                {[-2-]|[4, '(A6-0xc)']|[«4»]}
            <Call 0x29614 0x102c8>                                              {[-2-]|[4, '(A6-0xc)']|[«4»]}
                StringEqual(a, b : String) : Byte
            <POP 2961a-2961c StackAdj>                       Δ+8                {[-2-]}
            <MI 2961c  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 2961e  EXTB.W  D0>                                              {}
            <POP 0x29620 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 29622  MOVE.B  D0,0x2f1fa>                                      {}
            <Pointer.fp 0x29624 <LVAR -0x00c @ 4(rw)>>       Δ-4                {[@@-12]}
            <Call 0x29628 0x102bc>                                              {[@@-12]}
                FreeString(VAR a : String)
            <POP 2962e-29630 StackAdj>                       Δ+4                {}
        <POP 29630-29638 Epilogue>                           Σ0         ←0x29560 ←0x295de

0x29638


@ 29638
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 29638-297ba Body>                                              
        <POP 29638-2964e Prologue>                           Σ0         ↓
        <POP 2964e-29662 RegCacheLoad>                       Σ0         ↓
        <POP 29662-29676 Naked>                              Σ0         ↓
            <MI 29662  CLR.B   0x2f1fa>                                         {}
            <MI 29664  CLR.L   0x2f1fc>                                         {}
            <MI 2966a  CLR.L   0x2f200>                                         {}
            <MI 2966c  MOVEQ.L #0x00,D7>                                        {}
            <MI 2966e  MOVEQ.L #0x00,D6>                                        {}
            <MI 29670  MOVE.L  0x2f1e8,D5>                                      {}
        <POP 29676-2967c Naked>                              Σ0         ↓ →0x2971a ←0x29716
            <MI 29676  TST.L   D6>                                              {}
            <MI 29678  BNE     0x2971a>                                         {}
        <POP 2967c-29686 Naked>                              Σ0         ↓ →0x2971a
            <MI 2967c  CMP.L   0x2f1ec,D5>                                      {}
            <MI 29682  BGT     0x2971a>                                         {}
        <POP 29686-296a4 Naked>                              Σ0         ↓ →0x29710
            <MI 29686  MOVE.L  D5,D0>                                           {}
            <MI 29688  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x2968a LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {}
            <MI 29694  LEA.L   0x2e1e0,A0>                                      {}
            <MI 2969a  MOVE.B  (A0+D0.L+#0x8),D0>                               {}
            <MI 2969e  CMPI.B  #0x5b,D0>                                        {}
            <MI 296a2  BNE     0x29710>                                         {}
        <POP 296a4-296b8 Naked>                              Σ0         ↓ →0x296cc
            <POP 296a4-296a6 StackAdj>                       Δ-2                {[-2-]}
            <MI 296a6  MOVE.L  D5,-(A7)>                     Δ-4                {[-2-]|[4, 'D5']}
            <Const 0x296a8 0x28.4>                           Δ-4                {[-2-]|[4, 'D5']|[##40]}
            <Const 0x296ac 0x5.4>                            Δ-4                {[-2-]|[4, 'D5']|[##40]|[##5]}
            <Call 0x296b0 0x29168>                                              {[-2-]|[4, 'D5']|[##40]|[##5]}
            <POP 296b2-296b4 StackAdj>                       Δ+12               {[-2-]}
            <MI 296b4  TST.B   (A7)+>                        Δ+2                {}
            <MI 296b6  BNE     0x296cc>                                         {}
        <POP 296b8-296cc Naked>                              Σ0         ↓ →0x296d0
            <POP 296b8-296ba StackAdj>                       Δ-2                {[-2-]}
            <MI 296ba  MOVE.L  D5,-(A7)>                     Δ-4                {[-2-]|[4, 'D5']}
            <Const 0x296bc 0x2d.4>                           Δ-4                {[-2-]|[4, 'D5']|[##45]}
            <Const 0x296c0 0x6.4>                            Δ-4                {[-2-]|[4, 'D5']|[##45]|[##6]}
            <Call 0x296c4 0x29168>                                              {[-2-]|[4, 'D5']|[##45]|[##6]}
            <POP 296c6-296c8 StackAdj>                       Δ+12               {[-2-]}
            <MI 296c8  TST.B   (A7)+>                        Δ+2                {}
            <MI 296ca  BEQ     0x296d0>                                         {}
        <POP 296cc-296d0 Naked>                              Σ0         →0x29710 ←0x296a4
            <MI 296cc  ADDQ.L  #0x1,D7>                                         {}
            <MI 296ce  BRA     0x29710>                                         {}
        <POP 296d0-296d4 Naked>                              Σ0         ↓ →0x296f2 ←0x296b8
            <MI 296d0  TST.L   D7>                                              {}
            <MI 296d2  BNE     0x296f2>                                         {}
        <POP 296d4-296e8 Naked>                              Σ0         ↓ →0x296f2
            <POP 296d4-296d6 StackAdj>                       Δ-2                {[-2-]}
            <MI 296d6  MOVE.L  D5,-(A7)>                     Δ-4                {[-2-]|[4, 'D5']}
            <Const 0x296d8 0x33.4>                           Δ-4                {[-2-]|[4, 'D5']|[##51]}
            <Const 0x296dc 0x5.4>                            Δ-4                {[-2-]|[4, 'D5']|[##51]|[##5]}
            <Call 0x296e0 0x29168>                                              {[-2-]|[4, 'D5']|[##51]|[##5]}
            <POP 296e2-296e4 StackAdj>                       Δ+12               {[-2-]}
            <MI 296e4  TST.B   (A7)+>                        Δ+2                {}
            <MI 296e6  BEQ     0x296f2>                                         {}
        <POP 296e8-296f2 Naked>                              Σ0         →0x29710
            <MI 296e8  MOVE.L  D5,-(A7)>                     Δ-4                {[4, 'D5']}
            <Call 0x296ea 0x29524>                                              {[4, 'D5']}
            <POP 296ee-296f0 StackAdj>                       Δ+4                {}
            <MI 296f0  BRA     0x29710>                                         {}
        <POP 296f2-29706 Naked>                              Σ0         ↓ →0x29710 ←0x296d0 ←0x296d4
            <POP 296f2-296f4 StackAdj>                       Δ-2                {[-2-]}
            <MI 296f4  MOVE.L  D5,-(A7)>                     Δ-4                {[-2-]|[4, 'D5']}
            <Const 0x296f6 0x38.4>                           Δ-4                {[-2-]|[4, 'D5']|[##56]}
            <Const 0x296fa 0x8.4>                            Δ-4                {[-2-]|[4, 'D5']|[##56]|[##8]}
            <Call 0x296fe 0x29168>                                              {[-2-]|[4, 'D5']|[##56]|[##8]}
            <POP 29700-29702 StackAdj>                       Δ+12               {[-2-]}
            <MI 29702  TST.B   (A7)+>                        Δ+2                {}
            <MI 29704  BEQ     0x29710>                                         {}
        <POP 29706-2970a Naked>                              Σ0         ↓ →0x2970e
            <MI 29706  TST.L   D7>                                              {}
            <MI 29708  BNE     0x2970e>                                         {}
        <POP 2970a-2970e Naked>                              Σ0         →0x29710
            <MI 2970a  MOVE.L  D5,D6>                                           {}
            <MI 2970c  BRA     0x29710>                                         {}
        <POP 2970e-29710 Naked>                              Σ0         ↓ ←0x29706
            <MI 2970e  SUBQ.L  #0x1,D7>                                         {}
        <POP 29710-29714 Naked>                              Σ0         ↓ →0x29716 ←0x29686 ←0x296cc ←0x296e8 ←0x296f2 ←0x2970a
            <MI 29710  TST.L   D6>                                              {}
            <MI 29712  BNE     0x29716>                                         {}
        <POP 29714-29716 Naked>                              Σ0         ↓
            <MI 29714  ADDQ.L  #0x1,D5>                                         {}
        <POP 29716-2971a Naked>                              Σ0         →0x29676 ←0x29710
            <MI 29716  BRA     0x29676>                                         {}
        <POP 2971a-29722 Naked>                              Σ0         ↓ →0x29730 ←0x29676 ←0x2967c
            <MI 2971a  TST.B   0x2f204>                                         {}
            <MI 29720  BNE     0x29730>                                         {}
        <POP 29722-29730 Naked>                              Σ0         ↓
            <Const 0x29722 0x2f206.4>                        Δ-4                {[##193030]}
            <Call 0x29728 0x102bc>                                              {[##193030]}
                FreeString(VAR a : String)
            <POP 2972e-29730 StackAdj>                       Δ+4                {}
        <POP 29730-29734 Naked>                              Σ0         ↓ →0x2975c ←0x2971a
            <MI 29730  TST.B   0x2f1fa>                                         {}
            <MI 29732  BNE     0x2975c>                                         {}
        <POP 29734-2975c Naked>                              Σ0         ↓
            <Blob 0x29734 [26] @>                            Δ-26               {[«26""»]}
            <POP 29740-29742 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x29742 26>                                                    {[«26""»]|[$$No case alternative found!]}
            <Call 0x29754 0x28c9a>                                              {[«26""»]|[$$No case alternative found!]}
            <POP 29758-2975c StackAdj>                       Δ+30               {}
        <POP 2975c-29760 Naked>                              Σ0         ↓ →0x2978e ←0x29730
            <MI 2975c  TST.L   D6>                                              {}
            <MI 2975e  BNE     0x2978e>                                         {}
        <POP 29760-2978e Naked>                              Σ0         ↓
            <Blob 0x29760 [20] @>                            Δ-20               {[«20""»]}
            <POP 29772-29774 StackAdj>                       Δ-4                {[«20""»]|[-4-]}
            <Lit 0x29774 19>                                                    {[«20""»]|[$$No [ENDCASE] found!]}
            <Call 0x29786 0x28c9a>                                              {[«20""»]|[$$No [ENDCASE] found!]}
            <POP 2978a-2978e StackAdj>                       Δ+24               {}
        <POP 2978e-297a2 Naked>                              Σ0         ↓ →0x297ac ←0x2975c
            <MI 2978e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29792  MOVE.L  D6,(A0)>                                         {}
            <MI 29794  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 29798  MOVE.L  0x2f1fc,(A0)>                                    {}
            <MI 2979e  TST.L   0x2f200>                                         {}
            <MI 297a0  BNE     0x297ac>                                         {}
        <POP 297a2-297ac Naked>                              Σ0         →0x297b2
            <MI 297a2  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 297a6  MOVE.L  D6,(A0)>                                         {}
            <MI 297a8  SUBQ.L  #0x1,(A0)>                                       {}
            <MI 297aa  BRA     0x297b2>                                         {}
        <POP 297ac-297b2 Naked>                              Σ0         ↓ ←0x2978e
            <MI 297ac  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 297b0  MOVE.L  0x2f200,(A0)>                                    {}
        <POP 297b2-297ba Epilogue>                           Σ0         ←0x297a2

0x297ba


@ 297ba
        <LVAR  0x008 4(r)>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x00c @ 4(r)>
        <LVAR -0x010 @ 4(r)>
    <POP 297ba-2982e Body>                                              
        <POP 297ba-297d0 Prologue>                           Σ0         ↓
        <POP 297d0-297da RegCacheLoad>                       Σ0         ↓
        <POP 297da-29826 Naked>                              Σ0         ↓
            <MI 297da  MOVE.L  0x2f1e8,D6>                                      {}
            <MI 297dc  CLR.B   0x2f204>                                         {}
            <MI 297e2  MOVE.L  (A6+0x8),0x2f206>                                {}
            <MI 297ea  MOVE.L  0x2f1e8,D7>                                      {}
            <Pointer.fp 0x297ec <LVAR -0x010 @ 4(r)>>        Δ-4                {[@@-16]}
            <Pointer.fp 0x297ee <LVAR -0x00c @ 4(r)>>        Δ-4                {[@@-16]|[@@-12]}
            <Pointer.fp 0x297f2 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-16]|[@@-12]|[@@-8]}
            <Call 0x297f6 0x29638>                                              {[@@-16]|[@@-12]|[@@-8]}
            <POP 297fa-297fe StackAdj>                       Δ+12               {}
            <MI 297fe  MOVE.L  D6,0x2f1e8>                                      {}
            <MI 29800  MOVE.L  (A6-0x8),D0>                                     {}
            <MI 29804  ADDI.L  #0x00000009,D0>                                  {}
            <MI 2980a  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2980c  SUB.L   (A6-0xc),D0>                                     {[4, 'D0']}
            <MI 29810  SUBQ.L  #0x1,D0>                                         {[4, 'D0']}
            <MI 29812  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']|[4, 'D0']}
            <Call 0x29814 0x291ee>                                              {[4, 'D0']|[4, 'D0']}
            <POP 29818-2981a StackAdj>                       Δ+4                {[4, 'D0']}
            <MI 2981a  MOVE.L  (A6-0x10),(A7)>                                  {[4, '(A6-0x10)']}
            <MI 2981c  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
            <MI 2981e  SUB.L   D7,(A7)>                                         {[4, '(A6-0x10)']|[-4-]}
            <Call 0x29820 0x291ee>                                              {[4, '(A6-0x10)']|[-4-]}
            <POP 29824-29826 StackAdj>                       Δ+8                {}
        <POP 29826-2982e Epilogue>                           Σ0         

0x2982e


@ 2982e
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x00c @ 4(r)>
        <LVAR -0x010 @ 4(r)>
    <POP 2982e-298ac Body>                                              
        <POP 2982e-29844 Prologue>                           Σ0         ↓
        <POP 29844-2984e RegCacheLoad>                       Σ0         ↓
        <POP 2984e-298a4 Naked>                              Σ0         ↓
            <MI 2984e  MOVE.L  0x2f1e8,D6>                                      {}
            <MI 29850  MOVE.B  #0x01,0x2f204>                                   {}
            <MI 29858  MOVE.L  (A6+0x8),0x2f20a>                                {}
            <MI 29860  MOVE.L  (A6+0xc),0x2f20e>                                {}
            <MI 29868  MOVE.L  0x2f1e8,D7>                                      {}
            <Pointer.fp 0x2986a <LVAR -0x010 @ 4(r)>>        Δ-4                {[@@-16]}
            <Pointer.fp 0x2986c <LVAR -0x00c @ 4(r)>>        Δ-4                {[@@-16]|[@@-12]}
            <Pointer.fp 0x29870 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-16]|[@@-12]|[@@-8]}
            <Call 0x29874 0x29638>                                              {[@@-16]|[@@-12]|[@@-8]}
            <POP 29878-2987c StackAdj>                       Δ+12               {}
            <MI 2987c  MOVE.L  D6,0x2f1e8>                                      {}
            <MI 2987e  MOVE.L  (A6-0x8),D0>                                     {}
            <MI 29882  ADDI.L  #0x00000009,D0>                                  {}
            <MI 29888  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2988a  SUB.L   (A6-0xc),D0>                                     {[4, 'D0']}
            <MI 2988e  SUBQ.L  #0x1,D0>                                         {[4, 'D0']}
            <MI 29890  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']|[4, 'D0']}
            <Call 0x29892 0x291ee>                                              {[4, 'D0']|[4, 'D0']}
            <POP 29896-29898 StackAdj>                       Δ+4                {[4, 'D0']}
            <MI 29898  MOVE.L  (A6-0x10),(A7)>                                  {[4, '(A6-0x10)']}
            <MI 2989a  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
            <MI 2989c  SUB.L   D7,(A7)>                                         {[4, '(A6-0x10)']|[-4-]}
            <Call 0x2989e 0x291ee>                                              {[4, '(A6-0x10)']|[-4-]}
            <POP 298a2-298a4 StackAdj>                       Δ+8                {}
        <POP 298a4-298ac Epilogue>                           Σ0         

0x298ac


@ 298ac
        <LVAR  0x010 4(rw)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 298ac-298e4 Body>                                              
        <POP 298ac-298c2 Prologue>                           Σ0         ↓
        <POP 298c2-298c8 Naked>                              Σ0         ↓ →0x298ce
            <MI 298c2  TST.L   (A6+0x8)>                                        {}
            <MI 298c6  BNE     0x298ce>                                         {}
        <POP 298c8-298ce Naked>                              Σ0         →0x298dc
            <MI 298c8  CLR.L   (A6+0x10)>                                       {}
            <MI 298cc  BRA     0x298dc>                                         {}
        <POP 298ce-298dc Naked>                              Σ0         ↓ ←0x298c2
            <MI 298ce  MOVE.L  (A6+0xc),D0>                                     {}
            <MI 298d2  SUB.L   (A6+0x8),D0>                                     {}
            <MI 298d6  ADDQ.L  #0x1,D0>                                         {}
            <MI 298d8  MOVE.L  D0,(A6+0x10)>                                    {}
        <POP 298dc-298e4 Epilogue>                           Σ0         ←0x298c8

0x298e4


@ 298e4
        <LVAR  0x014 4(w)>
        <LVAR  0x010 @ 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 298e4-29946 Body>                                   Δ-4        
        <POP 298e4-298fa Prologue>                           Σ0         ↓
        <POP 298fa-29910 Naked>                              Σ0 Δ-4     ↓
            <MI 298fa  MOVEA.L (A6+0xc),A4>                                     {}
            <MI 298fe  MOVE.L  0x28bb2,(A6+0x10)>                               {}
            <MI 29904  MOVE.L  0x28bb6,(A6+0x14)>                               {}
            <MI 2990a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <MI 2990e  MOVEQ.L #0x00,D7>                                        {[4, '(A6+0x8)']}
        <POP 29910-29914 Naked>                              Σ-4        ↓ →0x2993c ←0x29938
            <MI 29910  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 29912  BGT     0x2993c>                                         {[-4-]}
        <POP 29914-2991a Naked>                              Σ-4        ↓ →0x2991e
            <MI 29914  CMPA.W  #0x1,A4>                                         {[-4-]}
            <MI 29918  BNE     0x2991e>                                         {[-4-]}
        <POP 2991a-2991e Naked>                              Σ-4 Δ+4    →0x2993e
            <POP 2991a-2991c StackAdj>                       Δ+4                {}
            <MI 2991c  BRA     0x2993e>                                         {}
        <POP 2991e-29924 Naked>                              Σ-4        ↓ →0x29934 ←0x29914
            <MI 2991e  CMP.L   (A6+0x8),D7>                                     {[-4-]}
            <MI 29922  BNE     0x29934>                                         {[-4-]}
        <POP 29924-29934 Naked>                              Σ-4        →0x29938
            <MI 29924  LEA.L   (A6+0x10),A0>                                    {[-4-]}
            <MI 29928  MOVEA.L A4,A1>                                           {[-4-]}
            <BlockMove 8,A1,A0>                                                 {[-4-]}
            <MI 29932  BRA     0x29938>                                         {[-4-]}
        <POP 29934-29938 Naked>                              Σ-4        ↓ ←0x2991e
            <MI 29934  MOVEA.L (A4+0x8),A4>                                     {[-4-]}
        <POP 29938-2993c Naked>                              Σ-4        ↓ →0x29910 ←0x29924
            <MI 29938  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 2993a  BVC     0x29910>                                         {[-4-]}
        <POP 2993c-2993e Naked>                              Σ-4 Δ+4    ↓ ←0x29910
            <POP 2993c-2993e StackAdj>                       Δ+4                {}
        <POP 2993e-29946 Epilogue>                           Σ0         ←0x2991a

0x29946


@ 29946
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 @ 4(r)>
    <POP 29946-299c2 Body>                                   Δ-4        
        <POP 29946-2995c Prologue>                           Σ0         ↓
        <POP 2995c-29960 RegCacheLoad>                       Σ0         ↓
        <POP 29960-29978 Naked>                              Σ0 Δ-4     ↓
            <Pointer.fp 0x29960 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Call 0x29962 0x102b8>                                              {[@@-8]}
                NewString(VAR a : String)
            <MI 29968  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[@@-8]|[4, '(A6+0xc)']}
            <MI 2996c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x29970 0x298ac>                                              {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 29974-29976 StackAdj>                       Δ+8                {[@@-8]}
            <MI 29976  MOVEQ.L #0x01,D7>                                        {[@@-8]}
        <POP 29978-2997c Naked>                              Σ-4        ↓ →0x299b4 ←0x299a4
            <MI 29978  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2997a  BGT     0x299b4>                                         {[-4-]}
        <POP 2997c-299a0 Naked>                              Σ-4        ↓ →0x299a4
            <MI 2997c  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 2997e  ADD.L   (A6+0x8),D0>                                     {[-4-]}
            <MI 29982  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <MI 29984  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x29986 LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-4-]}
            <MI 29990  LEA.L   0x2e1e0,A0>                                      {[-4-]}
            <MI 29996  MOVE.B  (A0+D0.L+#0x8),D6>                               {[-4-]}
            <MI 2999a  CMPI.B  #0x2f,D6>                                        {[-4-]}
            <MI 2999e  BNE     0x299a4>                                         {[-4-]}
        <POP 299a0-299a4 Naked>                              Σ-4 Δ+4    →0x299b6
            <POP 299a0-299a2 StackAdj>                       Δ+4                {}
            <MI 299a2  BRA     0x299b6>                                         {}
        <POP 299a4-299b4 Naked>                              Σ-4        ↓ →0x29978 ←0x2997c
            <MI 299a4  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x8)']}
            <MI 299a6  MOVE.B  D6,-(A7)>                     Δ-2                {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
            <Call 0x299a8 0x102c0>                                              {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
                AppendChar(MOD b : String; a : char)
            <POP 299ae-299b0 StackAdj>                       Δ+6                {[-4-]}
            <MI 299b0  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 299b2  BVC     0x29978>                                         {[-4-]}
        <POP 299b4-299b6 Naked>                              Σ-4 Δ+4    ↓ ←0x29978
            <POP 299b4-299b6 StackAdj>                       Δ+4                {}
        <POP 299b6-299ba Naked>                              Σ0         ↓ ←0x299a0
            <MI 299b6  MOVE.L  (A6-0x8),(A6+0x10)>                              {}
        <POP 299ba-299c2 Epilogue>                           Σ0         

0x299c2


@ 299c2
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 299c2-299f4 Body>                                              
        <POP 299c2-299d4 Prologue>                           Σ0         ↓
        <POP 299d4-299f0 Naked>                              Σ0         ↓
            <POP 299d4-299d8 StackAdj>                       Δ-12               {[-12-]}
            <MI 299d8  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']}
            <MI 299dc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x299e0 0x298e4>                                              {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 299e4-299e6 StackAdj>                       Δ+8                {[-12-]}
            <Call 0x299e6 0x29946>                                              {[-12-]}
            <POP 299ea-299ec StackAdj>                       Δ+8                {[-4-]}
            <MI 299ec  MOVE.L  (A7)+,(A6+0x10)>              Δ+4                {}
        <POP 299f0-299f4 Epilogue>                           Σ0         

0x299f4


@ 299f4
        <LVAR  0x014 4(w)>
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 299f4-29a30 Body>                                              
        <POP 299f4-29a06 Prologue>                           Σ0         ↓
        <POP 29a06-29a2c Naked>                              Σ0         ↓
            <POP 29a06-29a0a StackAdj>                       Δ-12               {[-12-]}
            <MI 29a0a  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']}
            <MI 29a0e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x29a12 0x299c2>                                              {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 29a16-29a18 StackAdj>                       Δ+8                {[-12-]}
            <Const 0x29a18 0x10.4>                           Δ-4                {[-12-]|[##16]}
            <Call 0x29a1c 0x10360>                                              {[-12-]|[##16]}
                ?StringToInt64()
            <POP 29a22-29a24 StackAdj>                       Δ+8                {[-8-]}
            <MI 29a24  MOVE.L  (A7)+,(A6+0x10)>              Δ+4                {[-4-]}
            <MI 29a28  MOVE.L  (A7)+,(A6+0x14)>              Δ+4                {}
        <POP 29a2c-29a30 Epilogue>                           Σ0         

0x29a30


@ 29a30
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 29a30-29a64 Body>                                              
        <POP 29a30-29a42 Prologue>                           Σ0         ↓
        <POP 29a42-29a60 Naked>                              Σ0         ↓
            <POP 29a42-29a46 StackAdj>                       Δ-12               {[-12-]}
            <MI 29a46  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']}
            <MI 29a4a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x29a4e 0x299f4>                                              {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 29a52-29a54 StackAdj>                       Δ+8                {[-12-]}
            <Call 0x29a54 0x10350>                                              {[-12-]}
                Quad2Long(a : Quad) : Long
            <POP 29a5a-29a5c StackAdj>                       Δ+8                {[-4-]}
            <MI 29a5c  MOVE.L  (A7)+,(A6+0x10)>              Δ+4                {}
        <POP 29a60-29a64 Epilogue>                           Σ0         

0x29a64


@ 29a64
        <LVAR  0x008 @ 4(r)>
    <POP 29a64-29aec Body>                                              
        <POP 29a64-29a7a Prologue>                           Σ0         ↓
        <POP 29a7a-29a80 RegCacheLoad>                       Σ0         ↓
        <POP 29a80-29a9e Naked>                              Σ0 Δ-8     ↓
            <MI 29a80  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29a84  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Blob 0x29a86 [4] 0x2f1e8>                       Δ-4                {[4, 'A0']|[«4»]}
            <MI 29a88  MOVE.W  (A0),D0>                                         {[4, 'A0']|[«4»]}
            <MI 29a8a  EXTW.L  D0>                                              {[4, 'A0']|[«4»]}
            <MI 29a8c  NEG.L   D0>                                              {[4, 'A0']|[«4»]}
            <MI 29a8e  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[«4»]|[4, 'D0']}
            <Call 0x29a90 0x291ee>                                              {[4, 'A0']|[«4»]|[4, 'D0']}
            <POP 29a94-29a96 StackAdj>                       Δ+8                {[4, 'A0']}
            <MI 29a96  MOVE.W  (A0),D0>                                         {[4, 'A0']}
            <MI 29a98  EXTW.L  D0>                                              {[4, 'A0']}
            <MI 29a9a  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D0']}
            <MI 29a9c  MOVEQ.L #0x01,D7>                                        {[4, 'A0']|[4, 'D0']}
        <POP 29a9e-29aa2 Naked>                              Σ-8        ↓ →0x29ad6 ←0x29aa2
            <MI 29a9e  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 29aa0  BGT     0x29ad6>                                         {[-8-]}
        <POP 29aa2-29ad6 Naked>                              Σ-8        ↓ →0x29a9e
            <MI 29aa2  MOVE.L  D7,D0>                                           {[-8-]}
            <MI 29aa4  ADD.L   0x2f1e8,D0>                                      {[-8-]}
            <MI 29aa6  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <MI 29aa8  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x29aaa LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-8-]}
            <MI 29ab4  LEA.L   0x2e1e0,A0>                                      {[-8-]}
            <MI 29aba  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 29abc  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x29abe LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-8-]}
            <MI 29ac8  MOVEA.L (A7+0x4),A1>                                     {[-8-]}
            <MI 29acc  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x8)>                   {[-8-]}
            <MI 29ad2  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 29ad4  BVC     0x29a9e>                                         {[-8-]}
        <POP 29ad6-29ae4 Naked>                              Σ-8 Δ+8    ↓ ←0x29a9e
            <POP 29ad6-29ad8 StackAdj>                       Δ+8                {}
            <Pointer.fp 0x29ad8 <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Call 0x29adc 0x102bc>                                              {[@@8]}
                FreeString(VAR a : String)
            <POP 29ae2-29ae4 StackAdj>                       Δ+4                {}
        <POP 29ae4-29aec Epilogue>                           Σ0         

0x29aec


@ 29aec
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 29aec-29b20 Body>                                              
        <POP 29aec-29afe Prologue>                           Σ0         ↓
        <POP 29afe-29b1c Naked>                              Σ0         ↓
            <POP 29afe-29b00 StackAdj>                       Δ-4                {[-4-]}
            <MI 29b00  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 29b04  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Const 0x29b08 0x10.4>                           Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
            <Call 0x29b0c 0x1035c>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
                Quad2String(a : Quad; radix : Long ) : String
            <POP 29b12-29b16 StackAdj>                       Δ+12               {[-4-]}
            <Call 0x29b16 0x29a64>                                              {[-4-]}
            <POP 29b1a-29b1c StackAdj>                       Δ+4                {}
        <POP 29b1c-29b20 Epilogue>                           Σ0         

0x29b20


@ 29b20
        <LVAR  0x008 4(r)>
    <POP 29b20-29b4a Body>                                              
        <POP 29b20-29b32 Prologue>                           Σ0         ↓
        <POP 29b32-29b46 Naked>                              Σ0         ↓
            <POP 29b32-29b34 StackAdj>                       Δ-4                {[-4-]}
            <MI 29b34  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x29b38 0x102e4>                                              {[-4-]|[4, '(A6+0x8)']}
                Long2String(a : Long) : String
            <POP 29b3e-29b40 StackAdj>                       Δ+4                {[-4-]}
            <Call 0x29b40 0x29a64>                                              {[-4-]}
            <POP 29b44-29b46 StackAdj>                       Δ+4                {}
        <POP 29b46-29b4a Epilogue>                           Σ0         

0x29b4a


@ 29b4a
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(r)>
        <LVAR -0x008 4(rw)>
    <POP 29b4a-29c1a Body>                                              
        <POP 29b4a-29b60 Prologue>                           Σ0         ↓
        <POP 29b60-29b68 RegCacheLoad>                       Σ0         ↓
        <POP 29b68-29b7a Naked>                              Σ0         ↓
            <MI 29b68  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29b6c  MOVE.L  (A0+0x8),(A6-0x8)>                               {}
            <Pointer.fp 0x29b70 <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-4]}
            <Call 0x29b72 0x102b8>                                              {[@@-4]}
                NewString(VAR a : String)
            <POP 29b78-29b7a StackAdj>                       Δ+4                {}
        <POP 29b7a-29b84 Naked>                              Σ0         ↓ →0x29c08 ←0x29bf0
            <MI 29b7a  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 29b7c  CMPA.W  #0x1,A0>                                         {}
            <MI 29b80  BEQ     0x29c08>                                         {}
        <POP 29b84-29b88 Naked>                              Σ0         ↓ →0x29bf0
            <MI 29b84  TST.L   (A0)>                                            {}
            <MI 29b86  BEQ     0x29bf0>                                         {}
        <POP 29b88-29b92 Naked>                              Σ0 Δ-4     ↓ →0x29ba6
            <MI 29b88  MOVE.L  (A0+0x4),-(A7)>               Δ-4                {[4, '(A0+0x4)']}
            <MI 29b8c  MOVE.L  (A0),D7>                                         {[4, '(A0+0x4)']}
            <MI 29b8e  CMP.L   (A7),D7>                                         {[4, '(A0+0x4)']}
            <MI 29b90  BGT     0x29ba6>                                         {[4, '(A0+0x4)']}
        <POP 29b92-29ba6 Naked>                              Σ-4        ↓
            <MI 29b92  MOVE.L  (A7),D0>                                         {[-4-]}
            <POP 0x29b94 LimitCheck -0x7fffffff ≤ D7>                           {[-4-]}
                <MI 29b94  CMPI.L  #0x80000001,D7>                      
                <MI 29b9a  BLT     0x29ba4>                             
            <POP 0x29b9c LimitCheck D0 ≤ 0x7fffffff>                            {[-4-]}
                <MI 29b9c  CMPI.L  #0x7fffffff,D0>                      
                <MI 29ba2  BLE     0x29ba6>                             
                <MI 29ba4  TRAP    #15>                                 
        <POP 29ba6-29baa Naked>                              Σ-4        ↓ →0x29bee ←0x29b88 ←0x29bea
            <MI 29ba6  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 29ba8  BGT     0x29bee>                                         {[-4-]}
        <POP 29baa-29bd6 Naked>                              Σ-4        ↓ →0x29bea
            <MI 29baa  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x4)']}
            <MI 29bac  MOVE.L  D7,D0>                                           {[-4-]|[4, '(A6-0x4)']}
            <MI 29bae  SUBQ.L  #0x1,D0>                                         {[-4-]|[4, '(A6-0x4)']}
            <POP 0x29bb0 LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-4-]|[4, '(A6-0x4)']}
            <MI 29bba  LEA.L   0x2e1e0,A0>                                      {[-4-]|[4, '(A6-0x4)']}
            <MI 29bc0  MOVE.B  (A0+D0.L+#0x8),-(A7)>         Δ-2                {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
            <Call 0x29bc4 0x102c0>                                              {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
                AppendChar(MOD b : String; a : char)
            <POP 29bca-29bcc StackAdj>                       Δ+6                {[-4-]}
            <MI 29bcc  MOVEA.L (A6-0x4),A0>                                     {[-4-]}
            <MI 29bce  MOVE.W  (A0),D0>                                         {[-4-]}
            <MI 29bd0  CMPI.W  #0x007a,D0>                                      {[-4-]}
            <MI 29bd4  BLT     0x29bea>                                         {[-4-]}
        <POP 29bd6-29bea Naked>                              Σ-4        ↓
            <MI 29bd6  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x4)']}
            <Call 0x29bd8 0x103d8>                                              {[-4-]|[4, '(A6-0x4)']}
                WriteConsoleString(str : String)
            <POP 29bde-29be0 StackAdj>                       Δ+4                {[-4-]}
            <Pointer.fp 0x29be0 <LVAR -0x004 @ 4(r)>>        Δ-4                {[-4-]|[@@-4]}
            <Call 0x29be2 0x102b8>                                              {[-4-]|[@@-4]}
                NewString(VAR a : String)
            <POP 29be8-29bea StackAdj>                       Δ+4                {[-4-]}
        <POP 29bea-29bee Naked>                              Σ-4        ↓ →0x29ba6 ←0x29baa
            <MI 29bea  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 29bec  BVC     0x29ba6>                                         {[-4-]}
        <POP 29bee-29bf0 Naked>                              Σ-4 Δ+4    ↓ ←0x29ba6
            <POP 29bee-29bf0 StackAdj>                       Δ+4                {}
        <POP 29bf0-29c08 Naked>                              Σ0         →0x29b7a ←0x29b84
            <MI 29bf0  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[4, '(A6-0x4)']}
            <Const 0x29bf2 0x20.2>                           Δ-2                {[4, '(A6-0x4)']|[#32]}
            <Call 0x29bf6 0x102c0>                                              {[4, '(A6-0x4)']|[#32]}
                AppendChar(MOD b : String; a : char)
            <POP 29bfc-29bfe StackAdj>                       Δ+6                {}
            <MI 29bfe  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 29c00  MOVE.L  (A0+0x8),(A6-0x8)>                               {}
            <MI 29c04  BRA     0x29b7a>                                         {}
        <POP 29c08-29c12 Naked>                              Σ0         ↓ ←0x29b7a
            <MI 29c08  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[4, '(A6-0x4)']}
            <Call 0x29c0a 0x103e0>                                              {[4, '(A6-0x4)']}
                WriteConsoleStringCrLf(str : String)
            <POP 29c10-29c12 StackAdj>                       Δ+4                {}
        <POP 29c12-29c1a Epilogue>                           Σ0         

0x29c1a


@ 29c1a
        <LVAR  0x008 @ 4(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x00c @ 4(rw)>
    <POP 29c1a-29d24 Body>                                              
        <POP 29c1a-29c30 Prologue>                           Σ0         ↓
        <POP 29c30-29c42 RegCacheLoad>                       Σ0         ↓
        <POP 29c42-29c88 Naked>                              Σ0         ↓ →0x29cbe
            <Blob 0x29c42 [4] @>                             Δ-4                {[«4""»]}
            <POP 29c46-29c48 StackAdj>                       Δ-8                {[«4""»]|[-8-]}
            <MI 29c48  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[«4""»]|[-8-]|[4, '(A6+0x8)']}
            <Call 0x29c4a 0x102cc>                                              {[«4""»]|[-8-]|[4, '(A6+0x8)']}
                StringDup(a : String) : String
            <Lit 0x29c50 4>                                                     {[«4""»]|[-8-]|[$$.HLP]}
            <Call 0x29c62 0x102d0>                                              {[«4""»]|[-8-]|[$$.HLP]}
                StringCat2(a, b : String) : String
            <POP 29c68-29c6a StackAdj>                       Δ+8                {[«4""»]|[-4-]}
            <MI 29c6a  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {[«4""»]}
            <MI 29c6c  MOVE.L  (A6-0xc),(A7)>                                   {[4, '(A6-0xc)']}
            <MI 29c6e  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0xc)']|[#0]}
            <MI 29c70  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0xc)']|[#0]|[#0]}
            <Const 0x29c72 0x0.4>                            Δ-4                {[4, '(A6-0xc)']|[#0]|[#0]|[##0]}
            <Pointer.fp 0x29c76 <LVAR -0x004 @ 1(r)>>        Δ-4                {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]}
            <Pointer.fp 0x29c78 <LVAR -0x008 @ 4(r)>>        Δ-4                {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
            <Call 0x29c7a 0x10380>                                              {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 29c80-29c84 StackAdj>                       Δ+20               {}
            <MI 29c84  TST.B   (A6-0x4)>                                        {}
            <MI 29c86  BEQ     0x29cbe>                                         {}
        <POP 29c88-29cbe Naked>                              Σ0         →0x29d12
            <Blob 0x29c88 [22] @>                            Δ-22               {[«22""»]}
            <POP 29c94-29c96 StackAdj>                       Δ-8                {[«22""»]|[-8-]}
            <Lit 0x29c96 22>                                                    {[«22""»]|[-4-]|[$$No help available for_]}
            <POP 29ca6-29ca8 StackAdj>                       Δ-4                {[«22""»]|[-4-]|[$$No help available for_]|[-4-]}
            <MI 29ca8  MOVE.L  (A6+0x8),(A7)>                                   {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
            <Call 0x29caa 0x102d0>                                              {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
                StringCat2(a, b : String) : String
            <POP 29cb0-29cb2 StackAdj>                       Δ+8                {[«22""»]|[-4-]}
            <Call 0x29cb2 0x103e0>                                              {[«22""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 29cb8-29cbc StackAdj>                       Δ+26               {}
            <MI 29cbc  BRA     0x29d12>                                         {}
        <POP 29cbe-29cd6 Naked>                              Σ0         ↓ →0x29cea ←0x29c42 ←0x29cea
            <MI 29cbe  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <Pointer.fp 0x29cc0 <LVAR  0x008 @ 4(r)>>        Δ-4                {[4, '(A6-0x8)']|[@@8]}
            <Pointer.fp 0x29cc2 <LVAR -0x003 @ 1(r)>>        Δ-4                {[4, '(A6-0x8)']|[@@8]|[@@-3]}
            <Call 0x29cc6 0x1043c>                                              {[4, '(A6-0x8)']|[@@8]|[@@-3]}
                FileReadLine(file : File; VAR a : String; VAR b : Byte)
            <POP 29ccc-29cd0 StackAdj>                       Δ+12               {}
            <MI 29cd0  TST.B   (A6-0x3)>                                        {}
            <MI 29cd4  BNE     0x29cea>                                         {}
        <POP 29cd6-29cea Naked>                              Σ0         ↓
            <POP 29cd6-29cd8 StackAdj>                       Δ-4                {[-4-]}
            <MI 29cd8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x29cda 0x102cc>                                              {[-4-]|[4, '(A6+0x8)']}
                StringDup(a : String) : String
            <POP 29ce0-29ce2 StackAdj>                       Δ+4                {[-4-]}
            <Call 0x29ce2 0x103e0>                                              {[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 29ce8-29cea StackAdj>                       Δ+4                {}
        <POP 29cea-29cf0 Naked>                              Σ0         ↓ →0x29cbe ←0x29cbe
            <MI 29cea  TST.B   (A6-0x3)>                                        {}
            <MI 29cee  BEQ     0x29cbe>                                         {}
        <POP 29cf0-29d12 Naked>                              Σ0         ↓
            <MI 29cf0  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x29cf2 0x2.2>                            Δ-2                {[#0]|[#2]}
            <Const 0x29cf6 0x1.4>                            Δ-4                {[#0]|[#2]|[##1]}
            <Pointer.fp 0x29cfa <LVAR -0x004 @ 1(r)>>        Δ-4                {[#0]|[#2]|[##1]|[@@-4]}
            <Pointer.fp 0x29cfc <LVAR -0x008 @ 4(r)>>        Δ-4                {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
            <Call 0x29cfe 0x1038c>                                              {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 29d04-29d08 StackAdj>                       Δ+16               {}
            <Pointer.fp 0x29d08 <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Call 0x29d0a 0x102bc>                                              {[@@8]}
                FreeString(VAR a : String)
            <POP 29d10-29d12 StackAdj>                       Δ+4                {}
        <POP 29d12-29d1c Naked>                              Σ0         ↓ ←0x29c88
            <Pointer.fp 0x29d12 <LVAR -0x00c @ 4(rw)>>       Δ-4                {[@@-12]}
            <Call 0x29d14 0x102bc>                                              {[@@-12]}
                FreeString(VAR a : String)
            <POP 29d1a-29d1c StackAdj>                       Δ+4                {}
        <POP 29d1c-29d24 Epilogue>                           Σ0         

0x29d24


@ 29d24
        <LVAR  0x008 4(r)>
    <POP 29d24-29da6 Body>                                              
        <POP 29d24-29d3a Prologue>                           Σ0         ↓
        <POP 29d3a-29d4a Naked>                              Σ0         ↓ →0x29d78
            <POP 29d3a-29d3c StackAdj>                       Δ-4                {[-4-]}
            <MI 29d3c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x29d40 0x290a6>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 29d44-29d46 StackAdj>                       Δ+4                {[-4-]}
            <MI 29d46  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 29d48  BNE     0x29d78>                                         {}
        <POP 29d4a-29d78 Naked>                              Σ0         →0x29d9e
            <Blob 0x29d4a [10] 0x2f1fa>                      Δ-10               {[«10»]}
            <POP 29d58-29d5a StackAdj>                       Δ-4                {[«10»]|[-4-]}
            <Lit 0x29d5a>                                                       {[«10»]|[$$…]}
                <Pointer.sp 0x29d5a 4>                       Δ-4        
                <Const 0x29d5e 0x1.2>                        Δ-2        
                <Const 0x29d62 0xa.2>                        Δ-2        
                <Call 0x29d66 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 29d6c-29d6e StackAdj>                   Δ+8        
            <Call 0x29d6e 0x29c1a>                                              {[«10»]|[$$…]}
            <POP 29d72-29d76 StackAdj>                       Δ+14               {}
            <MI 29d76  BRA     0x29d9e>                                         {}
        <POP 29d78-29d7c Naked>                              Σ0 Δ-4     ↓ ←0x29d3a
            <MI 29d78  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']}
            <MI 29d7a  MOVEQ.L #0x01,D7>                                        {[4, 'D6']}
        <POP 29d7c-29d80 Naked>                              Σ-4        ↓ →0x29d9c ←0x29d80
            <MI 29d7c  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 29d7e  BGT     0x29d9c>                                         {[-4-]}
        <POP 29d80-29d9c Naked>                              Σ-4        ↓ →0x29d7c
            <POP 29d80-29d82 StackAdj>                       Δ-4                {[-8-]}
            <MI 29d82  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <MI 29d86  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
            <Call 0x29d88 0x299c2>                                              {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
            <POP 29d8c-29d8e StackAdj>                       Δ+8                {[-8-]}
            <MI 29d8e  MOVEA.L (A7)+,A4>                     Δ+4                {[-4-]}
            <MI 29d90  MOVE.L  A4,-(A7)>                     Δ-4                {[-4-]|[4, 'A4']}
            <Call 0x29d92 0x29c1a>                                              {[-4-]|[4, 'A4']}
            <POP 29d96-29d98 StackAdj>                       Δ+4                {[-4-]}
            <MI 29d98  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 29d9a  BVC     0x29d7c>                                         {[-4-]}
        <POP 29d9c-29d9e Naked>                              Σ-4 Δ+4    ↓ ←0x29d7c
            <POP 29d9c-29d9e StackAdj>                       Δ+4                {}
        <POP 29d9e-29da6 Epilogue>                           Σ0         ←0x29d4a

0x29da6


@ 29da6
        <LVAR  0x00c @>
        <LVAR  0x008 @ 4(r)>
        <LVAR -0x020 @>
    <POP 29da6-29e28 Body>                                              
        <POP 29da6-29dbc Prologue>                           Σ0         ↓
        <POP 29dbc-29dbe RegCacheLoad>                       Σ0         ↓
        <POP 29dbe-29dc0 Naked>                              Σ0         ↓
            <MI 29dbe  MOVEQ.L #0x01,D7>                                        {}
        <POP 29dc0-29dcc Naked>                              Σ0         ↓ →0x29ddc ←0x29dfa
            <MI 29dc0  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29dc4  MOVE.W  (A0),D0>                                         {}
            <MI 29dc6  EXTW.L  D0>                                              {}
            <MI 29dc8  CMP.L   D0,D7>                                           {}
            <MI 29dca  BLE     0x29ddc>                                         {}
        <POP 29dcc-29ddc Naked>                              Σ0         →0x29dfa
            <MI 29dcc  MOVE.L  D7,D0>                                           {}
            <MI 29dce  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x29dd0 LimitCheck 0x0 ≤ D0 ≤ 0x1d>                            {}
            <MI 29dd6  CLR.B   (A6+D0.L-#0x20)>                                 {}
            <MI 29dda  BRA     0x29dfa>                                         {}
        <POP 29ddc-29dfa Naked>                              Σ0         ↓ ←0x29dc0
            <MI 29ddc  MOVE.L  D7,D0>                                           {}
            <MI 29dde  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x29de0 LimitCheck 0x0 ≤ D0 ≤ 0x1d>                            {}
            <MI 29de6  MOVE.L  D7,D1>                                           {}
            <MI 29de8  SUBQ.L  #0x1,D1>                                         {}
            <POP 0x29dea LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {}
            <MI 29df4  MOVE.B  (A0+D1.L+#0x2),(A6+D0.L-#0x20)>                  {}
        <POP 29dfa-29e04 Naked>                              Σ0         ↓ →0x29dc0 ←0x29dcc
            <MI 29dfa  ADDQ.L  #0x1,D7>                                         {}
            <MI 29dfc  CMPI.L  #0x0000001e,D7>                                  {}
            <MI 29e02  BLE     0x29dc0>                                         {}
        <POP 29e04-29e20 Naked>                              Σ0         ↓
            <Pointer.fp 0x29e04 <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Call 0x29e08 0x102bc>                                              {[@@8]}
                FreeString(VAR a : String)
            <POP 29e0e-29e10 StackAdj>                       Δ+4                {}
            <MI 29e10  LEA.L   (A6+0xc),A0>                                     {}
            <MI 29e14  LEA.L   (A6-0x20),A1>                                    {}
            <BlockMove 30,A1,A0>                                                {}
        <POP 29e20-29e28 Epilogue>                           Σ0         

0x29e28


@ 29e28
        <LVAR  0x026 4(w)>
        <LVAR  0x008 @>
        <LVAR -0x006 4(rw)>
    <POP 29e28-29e7c Body>                                              
        <POP 29e28-29e3e Prologue>                           Σ0         ↓
        <POP 29e3e-29e42 RegCacheLoad>                       Σ0         ↓
        <POP 29e42-29e4a Naked>                              Σ0         ↓
            <MI 29e42  MOVEQ.L #0x00,D7>                                        {}
            <MI 29e44  MOVE.L  0x2f212,(A6-0x6)>                                {}
        <POP 29e4a-29e52 Naked>                              Σ0         ↓ →0x29e70 ←0x29e6e
            <MI 29e4a  MOVEA.L (A6-0x6),A0>                                     {}
            <MI 29e4c  CMPA.W  #0x1,A0>                                         {}
            <MI 29e50  BEQ     0x29e70>                                         {}
        <POP 29e52-29e56 Naked>                              Σ0         ↓ →0x29e70
            <MI 29e52  TST.B   D7>                                              {}
            <MI 29e54  BNE     0x29e70>                                         {}
        <POP 29e56-29e5e Naked>                              Σ0         ↓
            <MI 29e56  MOVEA.L A0,A1>                                           {}
            <MI 29e58  LEA.L   (A6+0x8),A2>                                     {}
            <MI 29e5c  MOVEQ.L #0x1d,D0>                                        {}
        <POP 29e5e-29e64 Naked>                              Σ0         ↓ →0x29e5e ←0x29e5e
            <MI 29e5e  CMPM.B  (A1)+,(A2)+>                                     {}
            <MI 29e60  DBNE    D0,0x29e5e>                                      {}
        <POP 29e64-29e66 Naked>                              Σ0         ↓ →0x29e6a
            <MI 29e64  BNE     0x29e6a>                                         {}
        <POP 29e66-29e6a Naked>                              Σ0         →0x29e6e
            <MI 29e66  MOVEQ.L #0x01,D7>                                        {}
            <MI 29e68  BRA     0x29e6e>                                         {}
        <POP 29e6a-29e6e Naked>                              Σ0         ↓ ←0x29e64
            <MI 29e6a  MOVE.L  (A0+0x26),(A6-0x6)>                              {}
        <POP 29e6e-29e70 Naked>                              Σ0         →0x29e4a ←0x29e66
            <MI 29e6e  BRA     0x29e4a>                                         {}
        <POP 29e70-29e74 Naked>                              Σ0         ↓ ←0x29e4a ←0x29e52
            <MI 29e70  MOVE.L  A0,(A6+0x26)>                                    {}
        <POP 29e74-29e7c Epilogue>                           Σ0         

0x29e7c


@ 29e7c
        <LVAR  0x008 @ 4(r)>
    <POP 29e7c-29f02 Body>                                              
        <POP 29e7c-29e92 Prologue>                           Σ0         ↓
        <POP 29e92-29e9e RegCacheLoad>                       Σ0         ↓
        <POP 29e9e-29ea4 Naked>                              Σ0         ↓ →0x29efa
            <MI 29e9e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29ea0  CMPA.W  #0x01,A0>                                        {}
            <MI 29ea2  BEQ     0x29efa>                                         {}
        <POP 29ea4-29eaa Naked>                              Σ0         ↓ →0x29eba
            <MI 29ea4  TST.L   (A0+0x1e)>                                       {}
            <MI 29ea8  BEQ     0x29eba>                                         {}
        <POP 29eaa-29eba Naked>                              Σ0         ↓
            <MI 29eaa  MOVE.L  (A0+0x22),-(A7)>              Δ-4                {[4, '(A0+0x22)']}
            <MI 29eae  MOVE.L  (A0+0x1e),-(A7)>              Δ-4                {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
            <Call 0x29eb2 0x102a4>                                              {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
                Free1(a : Pointer; b : Long)
            <POP 29eb8-29eba StackAdj>                       Δ+8                {}
        <POP 29eba-29ec0 Naked>                              Σ0         ↓ ←0x29ea4
            <MI 29eba  MOVEQ.L #0x00,D7>                                        {}
            <MI 29ebc  MOVEA.W #0x01,A4>                                        {}
            <MI 29ebe  MOVEA.L 0x2f212,A3>                                      {}
        <POP 29ec0-29ec4 Naked>                              Σ0         ↓ →0x29ed8 ←0x29ed6
            <MI 29ec0  CMPA.W  #0x01,A3>                                        {}
            <MI 29ec2  BEQ     0x29ed8>                                         {}
        <POP 29ec4-29ec8 Naked>                              Σ0         ↓ →0x29ed8
            <MI 29ec4  TST.B   D7>                                              {}
            <MI 29ec6  BNE     0x29ed8>                                         {}
        <POP 29ec8-29ecc Naked>                              Σ0         ↓ →0x29ed0
            <MI 29ec8  CMPA.L  (A6+0x8),A3>                                     {}
            <MI 29eca  BNE     0x29ed0>                                         {}
        <POP 29ecc-29ed0 Naked>                              Σ0         →0x29ed6
            <MI 29ecc  MOVEQ.L #0x01,D7>                                        {}
            <MI 29ece  BRA     0x29ed6>                                         {}
        <POP 29ed0-29ed6 Naked>                              Σ0         ↓ ←0x29ec8
            <MI 29ed0  MOVEA.L A3,A4>                                           {}
            <MI 29ed2  MOVEA.L (A3+0x26),A3>                                    {}
        <POP 29ed6-29ed8 Naked>                              Σ0         →0x29ec0 ←0x29ecc
            <MI 29ed6  BRA     0x29ec0>                                         {}
        <POP 29ed8-29edc Naked>                              Σ0         ↓ →0x29efa ←0x29ec0 ←0x29ec4
            <MI 29ed8  TST.B   D7>                                              {}
            <MI 29eda  BEQ     0x29efa>                                         {}
        <POP 29edc-29ee0 Naked>                              Σ0         ↓ →0x29ee6
            <MI 29edc  CMPA.W  #0x01,A4>                                        {}
            <MI 29ede  BNE     0x29ee6>                                         {}
        <POP 29ee0-29ee6 Naked>                              Σ0         →0x29eec
            <MI 29ee0  MOVE.L  (A3+0x26),0x2f212>                               {}
            <MI 29ee4  BRA     0x29eec>                                         {}
        <POP 29ee6-29eec Naked>                              Σ0         ↓ ←0x29edc
            <MI 29ee6  MOVE.L  (A3+0x26),(A4+0x26)>                             {}
        <POP 29eec-29efa Naked>                              Σ0         ↓ ←0x29ee0
            <Pointer.fp 0x29eec <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Const 0x29eee 0x2a.4>                           Δ-4                {[@@8]|[##42]}
            <Call 0x29ef2 0x102a8>                                              {[@@8]|[##42]}
                Free2(a : Pointer; b : Long)
            <POP 29ef8-29efa StackAdj>                       Δ+8                {}
        <POP 29efa-29f02 Epilogue>                           Σ0         ←0x29e9e ←0x29ed8

0x29f02


@ 29f02
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @ 4(rw)>
        <LVAR -0x024 @>
    <POP 29f02-29fc0 Body>                                              
        <POP 29f02-29f18 Prologue>                           Σ0         ↓
        <POP 29f18-29f22 RegCacheLoad>                       Σ0         ↓
        <POP 29f22-29f40 Naked>                              Σ0         ↓ →0x29f42
            <POP 29f22-29f24 StackAdj>                       Δ-30               {[-30-]}
            <MI 29f24  MOVEA.L (A6+0xc),A0>                                     {[-30-]}
            <MI 29f28  MOVE.L  (A0),-(A7)>                   Δ-4                {[-30-]|[4, '(A0)']}
            <Call 0x29f2a 0x29da6>                                              {[-30-]|[4, '(A0)']}
            <POP 29f2e-29f30 StackAdj>                       Δ+4                {[-30-]}
            <MI 29f30  LEA.L   (A6-0x24),A0>                                    {[-30-]}
            <POP 29f34-29f3c StackPop>                       Δ+30               {[-30-]}
                <BlockMove 30,A7,A0>                         Δ+30       
            <MI 29f3c  TST.L   (A6+0x8)>                                        {[-30-]}
            <MI 29f3e  BGE     0x29f42>                                         {[-30-]}
        <POP 29f40-29f42 Naked>                              Σ0         ↓
            <MI 29f40  CLR.L   (A6+0x8)>                                        {}
        <POP 29f42-29f5e Naked>                              Σ0         ↓ →0x29f70 ←0x29f22
            <POP 29f42-29f44 StackAdj>                       Δ-4                {[-4-]}
            <Blob 0x29f44 [30] (A6-0x6)>                     Δ-30               {[-4-]|[«30»]}
            <Call 0x29f4e 0x29e28>                                              {[-4-]|[«30»]}
            <POP 29f52-29f54 StackAdj>                       Δ+30               {[-4-]}
            <MI 29f54  MOVE.L  (A7)+,(A6-0x6)>               Δ+4                {}
            <MI 29f56  MOVEA.L (A6-0x6),A0>                                     {}
            <MI 29f58  CMPA.W  #0x1,A0>                                         {}
            <MI 29f5c  BEQ     0x29f70>                                         {}
        <POP 29f5e-29f66 Naked>                              Σ0         ↓ →0x29f68
            <MI 29f5e  MOVE.L  (A0+0x1e),D0>                                    {}
            <MI 29f62  CMP.L   (A6+0x8),D0>                                     {}
            <MI 29f64  BNE     0x29f68>                                         {}
        <POP 29f66-29f68 Naked>                              Σ0         →0x29fb4
            <MI 29f66  BRA     0x29fb4>                                         {}
        <POP 29f68-29f70 Naked>                              Σ0         ↓ ←0x29f5e
            <MI 29f68  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x29f6a 0x29e7c>                                              {[4, '(A6-0x6)']}
            <POP 29f6e-29f70 StackAdj>                       Δ+4                {}
        <POP 29f70-29fa4 Naked>                              Σ0         ↓ →0x29fb4 ←0x29f42
            <Pointer.fp 0x29f70 <LVAR -0x006 @ 4(rw)>>       Δ-4                {[@@-6]}
            <Const 0x29f72 0x2a.4>                           Δ-4                {[@@-6]|[##42]}
            <Call 0x29f76 0x1029c>                                              {[@@-6]|[##42]}
                Malloc1(length : Long) : Pointer
            <POP 29f7c-29f7e StackAdj>                       Δ+8                {}
            <MI 29f7e  MOVEA.L (A6-0x6),A0>                                     {}
            <MI 29f80  MOVE.L  0x2f212,(A0+0x26)>                               {}
            <MI 29f88  MOVE.L  (A6-0x6),0x2f212>                                {}
            <MI 29f8e  MOVEA.L A0,A1>                                           {}
            <MI 29f90  LEA.L   (A6-0x24),A2>                                    {}
            <BlockMove 30,A2,A1>                                                {}
            <MI 29f9c  MOVE.L  (A6+0x8),(A0+0x1e)>                              {}
            <MI 29fa0  TST.L   (A6+0x8)>                                        {}
            <MI 29fa2  BEQ     0x29fb4>                                         {}
        <POP 29fa4-29fb4 Naked>                              Σ0         ↓
            <POP 29fa4-29fa6 StackAdj>                       Δ-4                {[-4-]}
            <MI 29fa6  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x29fa8 0x102a0>                                              {[-4-]|[4, '(A6+0x8)']}
                Malloc2(VAR dst : Pointer; length : Word)
            <POP 29fae-29fb0 StackAdj>                       Δ+4                {[-4-]}
            <MI 29fb0  MOVE.L  (A7)+,(A0+0x22)>              Δ+4                {}
        <POP 29fb4-29fb8 Naked>                              Σ0         ↓ ←0x29f66 ←0x29f70
            <MI 29fb4  MOVE.L  (A6-0x6),(A6+0x10)>                              {}
        <POP 29fb8-29fc0 Epilogue>                           Σ0         

0x29fc0


@ 29fc0
        <LVAR  0x00c @>
        <LVAR  0x008 @ 4(r)>
        <LVAR -0x008 4(rw)>
    <POP 29fc0-2a04a Body>                                              
        <POP 29fc0-29fd6 Prologue>                           Σ0         ↓
        <POP 29fd6-29fda RegCacheLoad>                       Σ0         ↓
        <POP 29fda-29ff8 Naked>                              Σ0         ↓ →0x2a038
            <MI 29fda  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 29fdc  MOVE.W  (A0),D0>                                         {}
            <MI 29fde  EXTW.L  D0>                                              {}
            <MI 29fe0  MOVE.L  D0,D6>                                           {}
            <POP 29fe2-29fe4 StackAdj>                       Δ-4                {[-4-]}
            <Pointer.fp 0x29fe4 <LVAR  0x00c @>>             Δ-4                {[-4-]|[@@12]}
            <MI 29fe8  MOVE.L  D6,-(A7)>                     Δ-4                {[-4-]|[@@12]|[4, 'D6']}
            <Call 0x29fea 0x29f02>                                              {[-4-]|[@@12]|[4, 'D6']}
            <POP 29fee-29ff0 StackAdj>                       Δ+8                {[-4-]}
            <MI 29ff0  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {}
            <MI 29ff4  TST.L   D6>                                              {}
            <MI 29ff6  BEQ     0x2a038>                                         {}
        <POP 29ff8-2a006 Naked>                              Σ0 Δ-8     ↓
            <MI 29ff8  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 29ffc  MOVEA.L (A0+0x22),A0>                                    {}
            <MI 2a000  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2a002  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D6']}
            <MI 2a004  MOVEQ.L #0x01,D7>                                        {[4, 'A0']|[4, 'D6']}
        <POP 2a006-2a00a Naked>                              Σ-8        ↓ →0x2a036 ←0x2a00a
            <MI 2a006  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2a008  BGT     0x2a036>                                         {[-8-]}
        <POP 2a00a-2a036 Naked>                              Σ-8        ↓ →0x2a006
            <MI 2a00a  MOVE.L  D7,D0>                                           {[-8-]}
            <MI 2a00c  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x2a00e LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {[-8-]}
            <MI 2a018  MOVEA.L (A7+0x4),A0>                                     {[-8-]}
            <MI 2a01c  MOVEA.L (A6+0x8),A1>                                     {[-8-]}
            <MI 2a01e  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 2a020  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x2a022 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-8-]}
            <MI 2a02c  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L)>                        {[-8-]}
            <MI 2a032  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2a034  BVC     0x2a006>                                         {[-8-]}
        <POP 2a036-2a038 Naked>                              Σ-8 Δ+8    ↓ ←0x2a006
            <POP 2a036-2a038 StackAdj>                       Δ+8                {}
        <POP 2a038-2a042 Naked>                              Σ0         ↓ ←0x29fda
            <Pointer.fp 0x2a038 <LVAR  0x008 @ 4(r)>>        Δ-4                {[@@8]}
            <Call 0x2a03a 0x102bc>                                              {[@@8]}
                FreeString(VAR a : String)
            <POP 2a040-2a042 StackAdj>                       Δ+4                {}
        <POP 2a042-2a04a Epilogue>                           Σ0         

0x2a04a


@ 2a04a
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(w)>
        <LVAR -0x008 4(rw)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x01c 4(rw)>
        <LVAR -0x020 4(rw)>
    <POP 2a04a-2a1b6 Body>                                              
        <POP 2a04a-2a060 Prologue>                           Σ0         ↓
        <POP 2a060-2a06e RegCacheLoad>                       Σ0         ↓
        <POP 2a06e-2a080 Naked>                              Σ0         ↓ →0x2a0ae
            <POP 2a06e-2a070 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a070  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x2a072 0x290a6>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 2a076-2a078 StackAdj>                       Δ+4                {[-4-]}
            <MI 2a078  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {}
            <MI 2a07a  MOVE.L  (A6-0x10),D0>                                    {}
            <MI 2a07c  CMP.L   #0x01,D0>                                        {}
            <MI 2a07e  BGE     0x2a0ae>                                         {}
        <POP 2a080-2a0ae Naked>                              Σ0         ↓
            <Blob 0x2a080 [26] @>                            Δ-26               {[«26""»]}
            <POP 2a092-2a094 StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2a094 25>                                                    {[«26""»]|[$$Too few arguments for SET]}
            <Call 0x2a0a6 0x28c9a>                                              {[«26""»]|[$$Too few arguments for SET]}
            <POP 2a0aa-2a0ae StackAdj>                       Δ+30               {}
        <POP 2a0ae-2a0b4 Naked>                              Σ0 Δ-4     ↓ ←0x2a06e
            <MI 2a0ae  CLR.L   (A6-0xc)>                                        {}
            <MI 2a0b0  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2a0b2  MOVEQ.L #0x02,D6>                                        {[4, 'D0']}
        <POP 2a0b4-2a0b8 Naked>                              Σ-4        ↓ →0x2a0d6 ←0x2a0b8
            <MI 2a0b4  CMP.L   (A7),D6>                                         {[-4-]}
            <MI 2a0b6  BGT     0x2a0d6>                                         {[-4-]}
        <POP 2a0b8-2a0d6 Naked>                              Σ-4        ↓ →0x2a0b4
            <POP 2a0b8-2a0bc StackAdj>                       Δ-12               {[-16-]}
            <MI 2a0bc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <MI 2a0be  MOVE.L  D6,-(A7)>                     Δ-4                {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
            <Call 0x2a0c0 0x298e4>                                              {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
            <POP 2a0c4-2a0c6 StackAdj>                       Δ+8                {[-16-]}
            <Call 0x2a0c6 0x298ac>                                              {[-16-]}
            <POP 2a0ca-2a0cc StackAdj>                       Δ+8                {[-8-]}
            <MI 2a0cc  MOVE.L  (A6-0xc),D0>                                     {[-8-]}
            <MI 2a0ce  ADD.L   (A7)+,D0>                     Δ+4                {[-4-]}
            <MI 2a0d0  MOVE.L  D0,(A6-0xc)>                                     {[-4-]}
            <MI 2a0d2  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 2a0d4  BVC     0x2a0b4>                                         {[-4-]}
        <POP 2a0d6-2a106 Naked>                              Σ-4 Δ+4    ↓ →0x2a1ae ←0x2a0b4
            <POP 2a0d6-2a0d8 StackAdj>                       Δ+4                {}
            <MI 2a0d8  MOVE.L  (A6-0x10),D0>                                    {}
            <MI 2a0da  SUBQ.L  #0x2,D0>                                         {}
            <MI 2a0dc  ADD.L   D0,(A6-0xc)>                                     {}
            <POP 2a0de-2a0e0 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a0e0  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a0e2 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a0e6 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a0ea-2a0ec StackAdj>                       Δ+8                {[-4-]}
            <MI 2a0ec  MOVE.L  (A7),(A6-0x4)>                                   {[-4-]}
            <Pointer.fp 0x2a0f0 <LVAR -0x004 @ 4(w)>>        Δ-4                {[-4-]|[@@-4]}
            <MI 2a0f4  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-4-]|[@@-4]|[4, '(A6-0xc)']}
            <Call 0x2a0f6 0x29f02>                                              {[-4-]|[@@-4]|[4, '(A6-0xc)']}
            <POP 2a0fa-2a0fc StackAdj>                       Δ+8                {[-4-]}
            <MI 2a0fc  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {}
            <MI 2a100  TST.L   (A6-0xc)>                                        {}
            <MI 2a102  BLE     0x2a1ae>                                         {}
        <POP 2a106-2a116 Naked>                              Σ0 Δ-8     ↓
            <MI 2a106  MOVEA.L (A6-0x8),A0>                                     {}
            <MI 2a10a  MOVEA.L (A0+0x22),A0>                                    {}
            <MI 2a10e  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2a110  MOVEQ.L #0x01,D7>                                        {[4, 'A0']}
            <MI 2a112  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, 'A0']|[4, '(A6-0x10)']}
            <MI 2a114  MOVEQ.L #0x02,D6>                                        {[4, 'A0']|[4, '(A6-0x10)']}
        <POP 2a116-2a11c Naked>                              Σ-8        ↓ →0x2a1ac ←0x2a1a6
            <MI 2a116  CMP.L   (A7),D6>                                         {[-8-]}
            <MI 2a118  BGT     0x2a1ac>                                         {[-8-]}
        <POP 2a11c-2a13c Naked>                              Σ-8 Δ-4    ↓ →0x2a150
            <POP 2a11c-2a11e StackAdj>                       Δ-8                {[-16-]}
            <MI 2a11e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <MI 2a120  MOVE.L  D6,-(A7)>                     Δ-4                {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
            <Call 0x2a122 0x298e4>                                              {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
            <POP 2a126-2a128 StackAdj>                       Δ+8                {[-16-]}
            <MI 2a128  MOVE.L  (A7)+,(A6-0x20)>              Δ+4                {[-12-]}
            <MI 2a12c  MOVE.L  (A7)+,(A6-0x1c)>              Δ+4                {[-8-]}
            <MI 2a130  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x1c)']}
            <MI 2a134  MOVE.L  (A6-0x20),D5>                                    {[-8-]|[4, '(A6-0x1c)']}
            <MI 2a138  CMP.L   (A7),D5>                                         {[-8-]|[4, '(A6-0x1c)']}
            <MI 2a13a  BGT     0x2a150>                                         {[-8-]|[4, '(A6-0x1c)']}
        <POP 2a13c-2a150 Naked>                              Σ-12       ↓
            <MI 2a13c  MOVE.L  (A7),D0>                                         {[-12-]}
            <POP 0x2a13e LimitCheck -0x7fffffff ≤ D5>                           {[-12-]}
                <MI 2a13e  CMPI.L  #0x80000001,D5>                      
                <MI 2a144  BLT     0x2a14e>                             
            <POP 0x2a146 LimitCheck D0 ≤ 0x7fffffff>                            {[-12-]}
                <MI 2a146  CMPI.L  #0x7fffffff,D0>                      
                <MI 2a14c  BLE     0x2a150>                             
                <MI 2a14e  TRAP    #15>                                 
        <POP 2a150-2a154 Naked>                              Σ-12       ↓ →0x2a186 ←0x2a11c ←0x2a154
            <MI 2a150  CMP.L   (A7),D5>                                         {[-12-]}
            <MI 2a152  BGT     0x2a186>                                         {[-12-]}
        <POP 2a154-2a186 Naked>                              Σ-12       ↓ →0x2a150
            <MI 2a154  MOVE.L  D7,D0>                                           {[-12-]}
            <MI 2a156  SUBQ.L  #0x1,D0>                                         {[-12-]}
            <POP 0x2a158 LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {[-12-]}
            <MI 2a162  MOVEA.L (A7+0x8),A0>                                     {[-12-]}
            <MI 2a166  MOVE.L  D5,D1>                                           {[-12-]}
            <MI 2a168  SUBQ.L  #0x1,D1>                                         {[-12-]}
            <POP 0x2a16a LimitCheck 0x0 ≤ D1 ≤ 0xfff>                           {[-12-]}
            <MI 2a174  LEA.L   0x2e1e0,A1>                                      {[-12-]}
            <MI 2a17a  MOVE.B  (A1+D1.L+#0x8),(A0+D0.L)>                        {[-12-]}
            <MI 2a180  ADDQ.L  #0x1,D7>                                         {[-12-]}
            <MI 2a182  ADDQ.L  #0x1,D5>                                         {[-12-]}
            <MI 2a184  BVC     0x2a150>                                         {[-12-]}
        <POP 2a186-2a18c Naked>                              Σ-12 Δ+4   ↓ →0x2a1a6 ←0x2a150
            <POP 2a186-2a188 StackAdj>                       Δ+4                {[-8-]}
            <MI 2a188  CMP.L   (A6-0x10),D6>                                    {[-8-]}
            <MI 2a18a  BEQ     0x2a1a6>                                         {[-8-]}
        <POP 2a18c-2a1a6 Naked>                              Σ-8        ↓
            <MI 2a18c  MOVE.L  D7,D0>                                           {[-8-]}
            <MI 2a18e  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x2a190 LimitCheck 0x0 ≤ D0 ≤ 0x3ff>                           {[-8-]}
            <MI 2a19a  MOVEA.L (A7+0x4),A0>                                     {[-8-]}
            <MI 2a19e  MOVE.B  #0x2c,(A0+D0.L)>                                 {[-8-]}
            <MI 2a1a4  ADDQ.L  #0x1,D7>                                         {[-8-]}
        <POP 2a1a6-2a1ac Naked>                              Σ-8        ↓ →0x2a116 ←0x2a186
            <MI 2a1a6  ADDQ.L  #0x1,D6>                                         {[-8-]}
            <MI 2a1a8  BVC     0x2a116>                                         {[-8-]}
        <POP 2a1ac-2a1ae Naked>                              Σ-8 Δ+8    ↓ ←0x2a116
            <POP 2a1ac-2a1ae StackAdj>                       Δ+8                {}
        <POP 2a1ae-2a1b6 Epilogue>                           Σ0         ←0x2a0d6

0x2a1b6


@ 2a1b6
        <LVAR  0x008 4(r)>
        <LVAR -0x00c 4(rw)>
    <POP 2a1b6-2a2a4 Body>                                              
        <POP 2a1b6-2a1cc Prologue>                           Σ0         ↓
        <POP 2a1cc-2a1d4 RegCacheLoad>                       Σ0         ↓
        <POP 2a1d4-2a206 Naked>                              Σ0         ↓ →0x2a248
            <POP 2a1d4-2a1d6 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a1d6  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a1da 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a1de 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a1e2-2a1e4 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a1e4  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <POP 2a1e6-2a1ea StackAdj>                       Δ-34               {[-34-]}
            <MI 2a1ea  MOVE.L  A4,-(A7)>                     Δ-4                {[-34-]|[4, 'A4']}
            <Call 0x2a1ec 0x29da6>                                              {[-34-]|[4, 'A4']}
            <POP 2a1f0-2a1f2 StackAdj>                       Δ+4                {[-34-]}
            <Call 0x2a1f2 0x29e28>                                              {[-34-]}
            <POP 2a1f6-2a1fa StackAdj>                       Δ+30               {[-4-]}
            <MI 2a1fa  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {}
            <MI 2a1fe  MOVEA.L (A6-0xc),A0>                                     {}
            <MI 2a202  CMPA.W  #0x01,A0>                                        {}
            <MI 2a204  BNE     0x2a248>                                         {}
        <POP 2a206-2a248 Naked>                              Σ0         ↓
            <Blob 0x2a206 [20] @>                            Δ-20               {[«20""»]}
            <POP 2a218-2a21a StackAdj>                       Δ-8                {[«20""»]|[-8-]}
            <Lit 0x2a21a 19>                                                    {[«20""»]|[-4-]|[$$Unknown variable :_]}
            <MI 2a22a  MOVE.L  (A6+0x8),(A7)>                                   {[«20""»]|[-4-]|[4, '(A6+0x8)']}
            <POP 2a224-2a22a StackAdj>                       Δ-8                {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
            <Const 0x2a22e 0x1.4>                            Δ-4                {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
            <Call 0x2a232 0x299c2>                                              {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
            <POP 2a236-2a238 StackAdj>                       Δ+8                {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
            <Call 0x2a238 0x102d0>                                              {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2a23e-2a240 StackAdj>                       Δ+8                {[«20""»]|[-4-]}
            <Call 0x2a240 0x28c9a>                                              {[«20""»]|[-4-]}
            <POP 2a244-2a248 StackAdj>                       Δ+24               {}
        <POP 2a248-2a25e Naked>                              Σ0 Δ-8     ↓ ←0x2a1d4
            <MI 2a248  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Blob 0x2a24a [4] 0x2f1e8>                       Δ-4                {[4, 'A0']|[«4»]}
            <MI 2a24c  MOVE.L  (A0+0x1e),-(A7)>              Δ-4                {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
            <MI 2a250  NEG.L   (A7)>                                            {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
            <Call 0x2a252 0x291ee>                                              {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
            <POP 2a256-2a258 StackAdj>                       Δ+4                {[4, 'A0']|[«4»]}
            <MI 2a258  MOVE.L  (A0+0x1e),(A7)>                                  {[4, 'A0']|[4, '(A0+0x1e)']}
            <MI 2a25c  MOVEQ.L #0x01,D7>                                        {[4, 'A0']|[4, '(A0+0x1e)']}
        <POP 2a25e-2a262 Naked>                              Σ-8        ↓ →0x2a29a ←0x2a262
            <MI 2a25e  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2a260  BGT     0x2a29a>                                         {[-8-]}
        <POP 2a262-2a29a Naked>                              Σ-8        ↓ →0x2a25e
            <MI 2a262  MOVE.L  D7,D0>                                           {[-8-]}
            <MI 2a264  ADD.L   0x2f1e8,D0>                                      {[-8-]}
            <MI 2a266  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <MI 2a268  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x2a26a LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-8-]}
            <MI 2a274  LEA.L   0x2e1e0,A0>                                      {[-8-]}
            <MI 2a27a  MOVEA.L (A7+0x4),A1>                                     {[-8-]}
            <MI 2a27e  MOVEA.L (A1+0x22),A1>                                    {[-8-]}
            <MI 2a282  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 2a284  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x2a286 LimitCheck 0x0 ≤ D1 ≤ 0x3ff>                           {[-8-]}
            <MI 2a290  MOVE.B  (A1+D1.L),(A0+D0.L+#0x8)>                        {[-8-]}
            <MI 2a296  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2a298  BVC     0x2a25e>                                         {[-8-]}
        <POP 2a29a-2a29c Naked>                              Σ-8 Δ+8    ↓ ←0x2a25e
            <POP 2a29a-2a29c StackAdj>                       Δ+8                {}
        <POP 2a29c-2a2a4 Epilogue>                           Σ0         

0x2a2a4


@ 2a2a4
        <LVAR -0x004 4(rw)>
    <POP 2a2a4-2a306 Body>                                              
        <POP 2a2a4-2a2ba Prologue>                           Σ0         ↓
        <POP 2a2ba-2a2c2 RegCacheLoad>                       Σ0         ↓
        <POP 2a2c2-2a2c8 Naked>                              Σ0         ↓
            <MI 2a2c2  MOVE.L  0x2f212,(A6-0x4)>                                {}
        <POP 2a2c8-2a2ce Naked>                              Σ0         ↓ →0x2a2fe ←0x2a2ce
            <MI 2a2c8  MOVEA.L (A6-0x4),A0>                                     {}
            <MI 2a2ca  CMPA.W  #0x01,A0>                                        {}
            <MI 2a2cc  BEQ     0x2a2fe>                                         {}
        <POP 2a2ce-2a2fe Naked>                              Σ0         →0x2a2c8
            <POP 2a2ce-2a2d0 StackAdj>                       Δ-30               {[-30-]}
            <MI 2a2d0  MOVEA.L A7,A1>                                           {[-30-]}
            <MI 2a2d2  MOVEA.L A0,A2>                                           {[-30-]}
            <BlockMove 30,A2,A1>                                                {[-30-]}
            <POP 2a2dc-2a2de StackAdj>                       Δ-4                {[-34-]}
            <Lit 0x2a2de>                                                       {[-30-]|[$$…]}
                <Pointer.sp 0x2a2de 4>                       Δ-4        
                <Const 0x2a2e2 0x1.2>                        Δ-2        
                <Const 0x2a2e4 0x1e.2>                       Δ-2        
                <Call 0x2a2e6 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2a2ec-2a2ee StackAdj>                   Δ+8        
            <Call 0x2a2ee 0x103e0>                                              {[-30-]|[$$…]}
                WriteConsoleStringCrLf(str : String)
            <POP 2a2f4-2a2f8 StackAdj>                       Δ+34               {}
            <MI 2a2f8  MOVE.L  (A0+0x26),(A6-0x4)>                              {}
            <MI 2a2fc  BRA     0x2a2c8>                                         {}
        <POP 2a2fe-2a306 Epilogue>                           Σ0         ←0x2a2c8

0x2a306


@ 2a306
        <LVAR  0x008 4(r)>
    <POP 2a306-2a342 Body>                                              
        <POP 2a306-2a318 Prologue>                           Σ0         ↓
        <POP 2a318-2a33e Naked>                              Σ0         ↓
            <POP 2a318-2a31c StackAdj>                       Δ-38               {[-38-]}
            <MI 2a31c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-38-]|[4, '(A6+0x8)']}
            <Const 0x2a320 0x1.4>                            Δ-4                {[-38-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a324 0x299c2>                                              {[-38-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a328-2a32a StackAdj>                       Δ+8                {[-38-]}
            <Call 0x2a32a 0x29da6>                                              {[-38-]}
            <POP 2a32e-2a330 StackAdj>                       Δ+4                {[-34-]}
            <Call 0x2a330 0x29e28>                                              {[-34-]}
            <POP 2a334-2a338 StackAdj>                       Δ+30               {[-4-]}
            <Call 0x2a338 0x29e7c>                                              {[-4-]}
            <POP 2a33c-2a33e StackAdj>                       Δ+4                {}
        <POP 2a33e-2a342 Epilogue>                           Σ0         

0x2a342


@ 2a342
    <POP 2a342-2a370 Body>                                              
        <POP 2a342-2a354 Prologue>                           Σ0         ↓
        <POP 2a354-2a36c Naked>                              Σ0         ↓
            <POP 2a354-2a356 StackAdj>                       Δ-8                {[-8-]}
            <Call 0x2a356 0x103cc>                                              {[-8-]}
                GetPushLevel() : Long
            <Call 0x2a35c 0x102e4>                                              {[-8-]}
                Long2String(a : Long) : String
            <POP 2a362-2a364 StackAdj>                       Δ+4                {[-4-]}
            <Call 0x2a364 0x103e0>                                              {[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2a36a-2a36c StackAdj>                       Δ+4                {}
        <POP 2a36c-2a370 Epilogue>                           Σ0         

0x2a370


@ 2a370
        <LVAR  0x008 4(r)>
        <LVAR -0x004 1(rw)>
        <LVAR -0x008 @ 4(rw)>
        <LVAR -0x00c @ 4(r)>
        <LVAR -0x010 @ 4(r)>
        <LVAR -0x012 @ 1(r)>
        <LVAR -0x013 @ 1(r)>
        <LVAR -0x014 @ 1(r)>
        <LVAR -0x024 4(rw)>
        <LVAR -0x028 4(rw)>
        <LVAR -0x02c 4(rw)>
        <LVAR -0x030 @ 4(r)>
        <LVAR -0x032 1(w)>
        <LVAR -0x036 @ 4(r)>
        <LVAR -0x038 @ 1(r)>
        <LVAR -0x03c @ 4(rw)>
    <POP 2a370-2a698 Body>                                              
        <POP 2a370-2a386 Prologue>                           Σ0         ↓
        <POP 2a386-2a39e RegCacheLoad>                       Σ0         ↓
        <POP 2a39e-2a3ae Naked>                              Σ0         ↓ →0x2a3d6
            <POP 2a39e-2a3a0 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a3a0  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x2a3a2 0x290a6>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 2a3a6-2a3a8 StackAdj>                       Δ+4                {[-4-]}
            <MI 2a3a8  MOVE.L  (A7)+,(A6-0x2c)>              Δ+4                {}
            <MI 2a3ac  BNE     0x2a3d6>                                         {}
        <POP 2a3ae-2a3d6 Naked>                              Σ0         →0x2a3e6
            <POP 2a3ae-2a3b0 StackAdj>                       Δ-4                {[-4-]}
            <POP 2a3b0-2a3b1 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2a3b1 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 2a3b4  MOVE.B  0x288bf,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2a3ba  MOVE.B  0x288c0,(A7+0x2)>                                {[-2-]|[«2""»]}
            <POP 2a3c0-2a3c2 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[-4-]}
            <Lit 0x2a3c2>                                                       {[-2-]|[«2""»]|[$$…]}
                <Pointer.sp 0x2a3c2 4>                       Δ-4        
                <Const 0x2a3c6 0x1.2>                        Δ-2        
                <Const 0x2a3c8 0x3.2>                        Δ-2        
                <Call 0x2a3cc 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2a3ce-2a3d0 StackAdj>                   Δ+8        
            <MI 2a3d0  MOVE.L  (A7)+,(A6-0x3c)>              Δ+4                {[-2-]|[«2""»]}
            <POP 2a3d2-2a3d4 StackAdj>                       Δ+4                {}
            <MI 2a3d4  BRA     0x2a3e6>                                         {}
        <POP 2a3d6-2a3e6 Naked>                              Σ0         ↓ ←0x2a39e
            <POP 2a3d6-2a3d8 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a3d8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a3da 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a3de 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a3e2-2a3e4 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a3e4  MOVE.L  (A7)+,(A6-0x3c)>              Δ+4                {}
        <POP 2a3e6-2a436 Naked>                              Σ0         ↓ →0x2a444 ←0x2a3ae
            <Blob 0x2a3e6 [6] @>                             Δ-6                {[«6""»]}
            <POP 2a3f6-2a3f8 StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <MI 2a3f8  MOVE.L  (A6-0x3c),-(A7)>              Δ-4                {[«6""»]|[-4-]|[4, '(A6-0x3c)']}
            <POP 2a3fa-2a3fc StackAdj>                       Δ-4                {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
            <Lit 0x2a3fc 5>                                                     {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
            <Call 0x2a40a 0x102d0>                                              {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
                StringCat2(a, b : String) : String
            <POP 2a410-2a412 StackAdj>                       Δ+8                {[«6""»]|[-4-]}
            <MI 2a412  MOVE.L  (A7)+,(A6-0x3c)>              Δ+4                {[«6""»]}
            <POP 2a414-2a416 StackAdj>                       Δ+2                {[-4-]}
            <MI 2a416  MOVE.L  (A6-0x3c),(A7)>                                  {[4, '(A6-0x3c)']}
            <MI 2a418  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0x3c)']|[#0]}
            <Const 0x2a41a 0x1.2>                            Δ-2                {[4, '(A6-0x3c)']|[#0]|[#1]}
            <Const 0x2a41c 0x0.4>                            Δ-4                {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]}
            <Pointer.fp 0x2a420 <LVAR -0x038 @ 1(r)>>        Δ-4                {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]}
            <Pointer.fp 0x2a424 <LVAR -0x036 @ 4(r)>>        Δ-4                {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
            <Call 0x2a428 0x10380>                                              {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 2a42e-2a430 StackAdj>                       Δ+20               {}
            <MI 2a430  TST.B   (A6-0x38)>                                       {}
            <MI 2a434  BEQ     0x2a444>                                         {}
        <POP 2a436-2a444 Naked>                              Σ0         →0x2a690
            <Pointer.fp 0x2a436 <LVAR -0x03c @ 4(rw)>>       Δ-4                {[@@-60]}
            <Call 0x2a438 0x102bc>                                              {[@@-60]}
                FreeString(VAR a : String)
            <POP 2a43e-2a440 StackAdj>                       Δ+4                {}
            <MI 2a440  BRA     0x2a690>                                         {}
        <POP 2a444-2a48a Naked>                              Σ0         ↓ →0x2a4c0 ←0x2a3e6
            <MI 2a444  MOVEA.L (A6-0x36),A0>                                    {}
            <MI 2a448  MOVE.B  (A0+0x3f),D0>                                    {}
            <MI 2a44c  LSL.B   #0x6,D0>                                         {}
            <MI 2a44e  LSR.B   #0x7,D0>                                         {}
            <MI 2a450  MOVE.B  D0,(A6-0x32)>                                    {}
            <MI 2a454  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2a456 0x1.2>                            Δ-2                {[#0]|[#1]}
            <Const 0x2a458 0x1.4>                            Δ-4                {[#0]|[#1]|[##1]}
            <Pointer.fp 0x2a45c <LVAR -0x038 @ 1(r)>>        Δ-4                {[#0]|[#1]|[##1]|[@@-56]}
            <Pointer.fp 0x2a460 <LVAR -0x036 @ 4(r)>>        Δ-4                {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
            <Call 0x2a464 0x1038c>                                              {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 2a46a-2a46e StackAdj>                       Δ+16               {}
            <MI 2a46e  MOVEA.L (A6-0x3c),A0>                                    {}
            <MI 2a470  MOVE.W  (A0),D1>                                         {}
            <MI 2a472  EXTW.L  D1>                                              {}
            <MI 2a474  SUBQ.L  #0x5,D1>                                         {}
            <POP 0x2a476 LimitCheck -0x8000 ≤ D1 ≤ 0x7fff>                      {}
            <MI 2a484  MOVE.W  D1,(A0)>                                         {}
            <MI 2a486  TST.B   D0>                                              {}
            <MI 2a488  BNE     0x2a4c0>                                         {}
        <POP 2a48a-2a4c0 Naked>                              Σ0         →0x2a690
            <Blob 0x2a48a [18] @>                            Δ-18               {[«18""»]}
            <POP 2a496-2a498 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <MI 2a498  MOVE.L  (A6-0x3c),-(A7)>              Δ-4                {[«18""»]|[-4-]|[4, '(A6-0x3c)']}
            <POP 2a49a-2a49c StackAdj>                       Δ-4                {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
            <Lit 0x2a49c 18>                                                    {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
            <Call 0x2a4aa 0x102d0>                                              {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
                StringCat2(a, b : String) : String
            <POP 2a4b0-2a4b2 StackAdj>                       Δ+8                {[«18""»]|[-4-]}
            <Call 0x2a4b2 0x103e0>                                              {[«18""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2a4b8-2a4bc StackAdj>                       Δ+22               {}
            <MI 2a4bc  BRA     0x2a690>                                         {}
        <POP 2a4c0-2a4da Naked>                              Σ0 Δ-8     ↓ ←0x2a444
            <Pointer.fp 0x2a4c0 <LVAR -0x030 @ 4(r)>>        Δ-4                {[@@-48]}
            <Call 0x2a4c4 0x102b8>                                              {[@@-48]}
                NewString(VAR a : String)
            <POP 2a4ca-2a4cc StackAdj>                       Δ+4                {}
            <MI 2a4cc  MOVEA.L (A6-0x30),A0>                                    {}
            <MI 2a4d0  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2a4d2  MOVEQ.L #0x01,D7>                                        {[4, 'A0']}
            <MI 2a4d4  MOVE.L  (A6-0x2c),-(A7)>              Δ-4                {[4, 'A0']|[4, '(A6-0x2c)']}
            <MI 2a4d8  MOVEQ.L #0x02,D5>                                        {[4, 'A0']|[4, '(A6-0x2c)']}
        <POP 2a4da-2a4e0 Naked>                              Σ-8        ↓ →0x2a572 ←0x2a56c
            <MI 2a4da  CMP.L   (A7),D5>                                         {[-8-]}
            <MI 2a4dc  BGT     0x2a572>                                         {[-8-]}
        <POP 2a4e0-2a500 Naked>                              Σ-8 Δ-4    ↓ →0x2a514
            <POP 2a4e0-2a4e2 StackAdj>                       Δ-8                {[-16-]}
            <MI 2a4e2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <MI 2a4e4  MOVE.L  D5,-(A7)>                     Δ-4                {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
            <Call 0x2a4e6 0x298e4>                                              {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
            <POP 2a4ea-2a4ec StackAdj>                       Δ+8                {[-16-]}
            <MI 2a4ec  MOVE.L  (A7)+,(A6-0x28)>              Δ+4                {[-12-]}
            <MI 2a4f0  MOVE.L  (A7)+,(A6-0x24)>              Δ+4                {[-8-]}
            <MI 2a4f4  MOVE.L  (A6-0x24),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x24)']}
            <MI 2a4f8  MOVE.L  (A6-0x28),D6>                                    {[-8-]|[4, '(A6-0x24)']}
            <MI 2a4fc  CMP.L   (A7),D6>                                         {[-8-]|[4, '(A6-0x24)']}
            <MI 2a4fe  BGT     0x2a514>                                         {[-8-]|[4, '(A6-0x24)']}
        <POP 2a500-2a514 Naked>                              Σ-12       ↓
            <MI 2a500  MOVE.L  (A7),D0>                                         {[-12-]}
            <POP 0x2a502 LimitCheck -0x7fffffff ≤ D6>                           {[-12-]}
                <MI 2a502  CMPI.L  #0x80000001,D6>                      
                <MI 2a508  BLT     0x2a512>                             
            <POP 0x2a50a LimitCheck D0 ≤ 0x7fffffff>                            {[-12-]}
                <MI 2a50a  CMPI.L  #0x7fffffff,D0>                      
                <MI 2a510  BLE     0x2a514>                             
                <MI 2a512  TRAP    #15>                                 
        <POP 2a514-2a518 Naked>                              Σ-12       ↓ →0x2a54a ←0x2a4e0 ←0x2a518
            <MI 2a514  CMP.L   (A7),D6>                                         {[-12-]}
            <MI 2a516  BGT     0x2a54a>                                         {[-12-]}
        <POP 2a518-2a54a Naked>                              Σ-12       ↓ →0x2a514
            <MI 2a518  MOVE.L  D7,D0>                                           {[-12-]}
            <MI 2a51a  SUBQ.L  #0x1,D0>                                         {[-12-]}
            <POP 0x2a51c LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-12-]}
            <MI 2a526  MOVEA.L (A7+0x8),A0>                                     {[-12-]}
            <MI 2a52a  MOVE.L  D6,D1>                                           {[-12-]}
            <MI 2a52c  SUBQ.L  #0x1,D1>                                         {[-12-]}
            <POP 0x2a52e LimitCheck 0x0 ≤ D1 ≤ 0xfff>                           {[-12-]}
            <MI 2a538  LEA.L   0x2e1e0,A1>                                      {[-12-]}
            <MI 2a53e  MOVE.B  (A1+D1.L+#0x8),(A0+D0.L+#0x2)>                   {[-12-]}
            <MI 2a544  ADDQ.L  #0x1,D7>                                         {[-12-]}
            <MI 2a546  ADDQ.L  #0x1,D6>                                         {[-12-]}
            <MI 2a548  BVC     0x2a514>                                         {[-12-]}
        <POP 2a54a-2a552 Naked>                              Σ-12 Δ+4   ↓ →0x2a56c ←0x2a514
            <POP 2a54a-2a54c StackAdj>                       Δ+4                {[-8-]}
            <MI 2a54c  CMP.L   (A6-0x2c),D5>                                    {[-8-]}
            <MI 2a550  BEQ     0x2a56c>                                         {[-8-]}
        <POP 2a552-2a56c Naked>                              Σ-8        ↓
            <MI 2a552  MOVE.L  D7,D0>                                           {[-8-]}
            <MI 2a554  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x2a556 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-8-]}
            <MI 2a560  MOVEA.L (A7+0x4),A0>                                     {[-8-]}
            <MI 2a564  MOVE.B  #0x2c,(A0+D0.L+#0x2)>                            {[-8-]}
            <MI 2a56a  ADDQ.L  #0x1,D7>                                         {[-8-]}
        <POP 2a56c-2a572 Naked>                              Σ-8        ↓ →0x2a4da ←0x2a54a
            <MI 2a56c  ADDQ.L  #0x1,D5>                                         {[-8-]}
            <MI 2a56e  BVC     0x2a4da>                                         {[-8-]}
        <POP 2a572-2a622 Naked>                              Σ-8 Δ+8    ↓ →0x2a628 ←0x2a4da
            <POP 2a572-2a574 StackAdj>                       Δ+4                {[-4-]}
            <MI 2a574  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 2a576  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 2a578  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x2a57a LimitCheck -0x8000 ≤ D0 ≤ 0x7fff>                      {[-4-]}
            <MI 2a588  MOVE.W  D0,(A0)>                                         {[-4-]}
            <POP 2a58a-2a58c StackAdj>                       Δ+2                {[-2-]}
            <POP 2a58c-2a58d StackAdj>                       Δ+2                {}
            <Blob 0x2a58d [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x2a590 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x2a594 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <POP 2a598-2a59a StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[-4-]}
            <Lit 0x2a59a 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[$$STATUS]}
            <MI 2a5a8  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {[«2""»]|[«2""»]|[«2""»]}
            <POP 2a5ac-2a5ae StackAdj>                       Δ+2                {[«2""»]|[«2""»]}
            <MI 2a5ae  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Const 0x2a5b0 0x0.4>                            Δ-4                {[4, '(A6+0x8)']|[##0]}
            <MI 2a5b4  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
            <Pointer.fp 0x2a5b8 <LVAR -0x010 @ 4(r)>>        Δ-4                {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]}
            <Pointer.fp 0x2a5bc <LVAR -0x013 @ 1(r)>>        Δ-4                {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
            <Call 0x2a5c0 0x2befa>                                              {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
            <POP 2a5c6-2a5c8 StackAdj>                       Δ+20               {}
            <Pointer.fp 0x2a5c8 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Call 0x2a5cc 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 2a5d2-2a5d4 StackAdj>                       Δ+2                {[-2-]}
            <POP 2a5d4-2a5d5 StackAdj>                       Δ+2                {}
            <Blob 0x2a5d5 [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x2a5d8 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x2a5dc [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <POP 2a5e0-2a5e2 StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[-4-]}
            <Lit 0x2a5e2 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[$$RESULT]}
            <MI 2a5f0  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {[«2""»]|[«2""»]|[«2""»]}
            <POP 2a5f4-2a5f6 StackAdj>                       Δ+2                {[«2""»]|[«2""»]}
            <MI 2a5f6  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Const 0x2a5f8 0x0.4>                            Δ-4                {[4, '(A6+0x8)']|[##0]}
            <MI 2a5fc  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
            <Pointer.fp 0x2a600 <LVAR -0x00c @ 4(r)>>        Δ-4                {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]}
            <Pointer.fp 0x2a604 <LVAR -0x012 @ 1(r)>>        Δ-4                {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
            <Call 0x2a608 0x2befa>                                              {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
            <POP 2a60e-2a610 StackAdj>                       Δ+20               {}
            <Pointer.fp 0x2a610 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Call 0x2a614 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 2a61a-2a61c StackAdj>                       Δ+4                {}
            <MI 2a61c  TST.B   (A6-0x13)>                                       {}
            <MI 2a620  BNE     0x2a628>                                         {}
        <POP 2a622-2a628 Naked>                              Σ0         ↓ →0x2a62e
            <MI 2a622  TST.B   (A6-0x12)>                                       {}
            <MI 2a626  BEQ     0x2a62e>                                         {}
        <POP 2a628-2a62e Naked>                              Σ0         →0x2a632 ←0x2a572
            <MI 2a628  CLR.B   (A6-0x4)>                                        {}
            <MI 2a62c  BRA     0x2a632>                                         {}
        <POP 2a62e-2a632 Naked>                              Σ0         ↓ ←0x2a622
            <MI 2a62e  MOVE.B  #0x01,(A6-0x4)>                                  {}
        <POP 2a632-2a658 Naked>                              Σ0         ↓ →0x2a678 ←0x2a628
            <MI 2a632  MOVE.L  (A6-0x3c),-(A7)>              Δ-4                {[4, '(A6-0x3c)']}
            <MI 2a634  MOVE.L  (A6-0x30),-(A7)>              Δ-4                {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
            <MI 2a638  MOVE.B  (A6-0x4),D0>                                     {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
            <MI 2a63c  EXTB.W  D0>                                              {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
            <POP 0x2a63e LimitCheck 0x0 ≤ D0 ≤ 0x2>                             {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
            <MI 2a642  MOVE.B  D0,-(A7)>                     Δ-2                {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']}
            <Pointer.fp 0x2a644 <LVAR -0x014 @ 1(r)>>        Δ-4                {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
            <Call 0x2a648 0x103b0>                                              {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
                PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
            <POP 2a64e-2a652 StackAdj>                       Δ+14               {}
            <MI 2a652  TST.B   (A6-0x13)>                                       {}
            <MI 2a656  BEQ     0x2a678>                                         {}
        <POP 2a658-2a678 Naked>                              Σ0         ↓
            <MI 2a658  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x10)']}
            <POP 2a65c-2a65e StackAdj>                       Δ-4                {[4, '(A6-0x10)']|[-4-]}
            <MI 2a65e  MOVE.B  (A6-0x14),D0>                                    {[4, '(A6-0x10)']|[-4-]}
            <MI 2a662  EXTB.W  D0>                                              {[4, '(A6-0x10)']|[-4-]}
            <POP 0x2a664 LimitCheck 0x0 ≤ D0 ≤ 0xe>                             {[4, '(A6-0x10)']|[-4-]}
            <MI 2a668  MOVE.B  D0,-(A7)>                     Δ-2                {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
            <Call 0x2a66a 0x103c0>                                              {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
                ExpErrMsg(a: Byte) : String
            <POP 2a670-2a672 StackAdj>                       Δ+2                {[4, '(A6-0x10)']|[-4-]}
            <Call 0x2a672 0x29fc0>                                              {[4, '(A6-0x10)']|[-4-]}
            <POP 2a676-2a678 StackAdj>                       Δ+8                {}
        <POP 2a678-2a67e Naked>                              Σ0         ↓ →0x2a690 ←0x2a632
            <MI 2a678  TST.B   (A6-0x12)>                                       {}
            <MI 2a67c  BEQ     0x2a690>                                         {}
        <POP 2a67e-2a690 Naked>                              Σ0         ↓
            <MI 2a67e  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[4, '(A6-0xc)']}
            <POP 2a682-2a684 StackAdj>                       Δ-4                {[4, '(A6-0xc)']|[-4-]}
            <Call 0x2a684 0x103c8>                                              {[4, '(A6-0xc)']|[-4-]}
                FSCALL_103c8
            <Call 0x2a68a 0x29fc0>                                              {[4, '(A6-0xc)']|[-4-]}
            <POP 2a68e-2a690 StackAdj>                       Δ+8                {}
        <POP 2a690-2a698 Epilogue>                           Σ0         ←0x2a436 ←0x2a48a ←0x2a678

0x2a698


@ 2a698
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(rw)>
        <LVAR -0x008 @ 4(rw)>
    <POP 2a698-2a710 Body>                                              
        <POP 2a698-2a6ae Prologue>                           Σ0         ↓
        <POP 2a6ae-2a6b6 RegCacheLoad>                       Σ0         ↓
        <POP 2a6b6-2a6ea Naked>                              Σ0         ↓ →0x2a6f0
            <POP 2a6b6-2a6b8 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a6b8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a6bc 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a6c0 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a6c4-2a6c6 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a6c6  MOVE.L  (A7),(A6-0x8)>                                   {[-4-]}
            <MI 2a6c8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a6cc 0x2.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2a6d0 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##2]}
            <POP 2a6d4-2a6d6 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a6d6  MOVE.L  (A7),(A6-0x4)>                                   {[-4-]}
            <POP 2a6d8-2a6da StackAdj>                       Δ+2                {[-2-]}
            <MI 2a6da  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x8)']}
            <MI 2a6dc  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
            <Call 0x2a6de 0x102c8>                                              {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
                StringEqual(a, b : String) : Byte
            <POP 2a6e4-2a6e6 StackAdj>                       Δ+8                {[-2-]}
            <MI 2a6e6  TST.B   (A7)+>                        Δ+2                {}
            <MI 2a6e8  BEQ     0x2a6f0>                                         {}
        <POP 2a6ea-2a6f0 Naked>                              Σ0         →0x2a6f4
            <Call 0x2a6ea 0x29482>                                              {}
            <MI 2a6ee  BRA     0x2a6f4>                                         {}
        <POP 2a6f0-2a6f4 Naked>                              Σ0         ↓ ←0x2a6b6
            <Call 0x2a6f0 0x294c8>                                              {}
        <POP 2a6f4-2a708 Naked>                              Σ0         ↓ ←0x2a6ea
            <Pointer.fp 0x2a6f4 <LVAR -0x004 @ 4(rw)>>       Δ-4                {[@@-4]}
            <Call 0x2a6f6 0x102bc>                                              {[@@-4]}
                FreeString(VAR a : String)
            <POP 2a6fc-2a6fe StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2a6fe <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Call 0x2a700 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 2a706-2a708 StackAdj>                       Δ+4                {}
        <POP 2a708-2a710 Epilogue>                           Σ0         

0x2a710


@ 2a710
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 4(rw)>
        <LVAR -0x008 @ 4(rw)>
    <POP 2a710-2a788 Body>                                              
        <POP 2a710-2a726 Prologue>                           Σ0         ↓
        <POP 2a726-2a72e RegCacheLoad>                       Σ0         ↓
        <POP 2a72e-2a762 Naked>                              Σ0         ↓ →0x2a768
            <POP 2a72e-2a730 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a730  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a734 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a738 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a73c-2a73e StackAdj>                       Δ+8                {[-4-]}
            <MI 2a73e  MOVE.L  (A7),(A6-0x8)>                                   {[-4-]}
            <MI 2a740  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a744 0x2.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2a748 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##2]}
            <POP 2a74c-2a74e StackAdj>                       Δ+8                {[-4-]}
            <MI 2a74e  MOVE.L  (A7),(A6-0x4)>                                   {[-4-]}
            <POP 2a750-2a752 StackAdj>                       Δ+2                {[-2-]}
            <MI 2a752  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x8)']}
            <MI 2a754  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
            <Call 0x2a756 0x102c8>                                              {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
                StringEqual(a, b : String) : Byte
            <POP 2a75c-2a75e StackAdj>                       Δ+8                {[-2-]}
            <MI 2a75e  TST.B   (A7)+>                        Δ+2                {}
            <MI 2a760  BNE     0x2a768>                                         {}
        <POP 2a762-2a768 Naked>                              Σ0         →0x2a76c
            <Call 0x2a762 0x29482>                                              {}
            <MI 2a766  BRA     0x2a76c>                                         {}
        <POP 2a768-2a76c Naked>                              Σ0         ↓ ←0x2a72e
            <Call 0x2a768 0x294c8>                                              {}
        <POP 2a76c-2a780 Naked>                              Σ0         ↓ ←0x2a762
            <Pointer.fp 0x2a76c <LVAR -0x004 @ 4(rw)>>       Δ-4                {[@@-4]}
            <Call 0x2a76e 0x102bc>                                              {[@@-4]}
                FreeString(VAR a : String)
            <POP 2a774-2a776 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2a776 <LVAR -0x008 @ 4(rw)>>       Δ-4                {[@@-8]}
            <Call 0x2a778 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 2a77e-2a780 StackAdj>                       Δ+4                {}
        <POP 2a780-2a788 Epilogue>                           Σ0         

0x2a788


@ 2a788
        <LVAR  0x008 4(r)>
    <POP 2a788-2a7b4 Body>                                              
        <POP 2a788-2a79a Prologue>                           Σ0         ↓
        <POP 2a79a-2a7b0 Naked>                              Σ0         ↓
            <POP 2a79a-2a79c StackAdj>                       Δ-4                {[-4-]}
            <MI 2a79c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a7a0 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a7a4 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a7a8-2a7aa StackAdj>                       Δ+8                {[-4-]}
            <Call 0x2a7aa 0x297ba>                                              {[-4-]}
            <POP 2a7ae-2a7b0 StackAdj>                       Δ+4                {}
        <POP 2a7b0-2a7b4 Epilogue>                           Σ0         

0x2a7b4


@ 2a7b4
        <LVAR  0x008 4(r)>
        <LVAR -0x014 @ 4(rw)>
    <POP 2a7b4-2a8b4 Body>                                              
        <POP 2a7b4-2a7ca Prologue>                           Σ0         ↓
        <POP 2a7ca-2a7d4 RegCacheLoad>                       Σ0         ↓
        <POP 2a7d4-2a832 Naked>                              Σ0         ↓ →0x2a862
            <POP 2a7d4-2a7d6 StackAdj>                       Δ-4                {[-4-]}
            <MI 2a7d6  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a7d8 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a7dc 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a7e0-2a7e2 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a7e2  MOVE.L  (A7),(A6-0x14)>                                  {[-4-]}
            <MI 2a7e4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a7e6 0x2.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2a7ea 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##2]}
            <POP 2a7ee-2a7f0 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a7f0  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <POP 2a7f2-2a7f6 StackAdj>                       Δ-12               {[-12-]}
            <MI 2a7f6  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0x8)']}
            <Const 0x2a7f8 0x3.4>                            Δ-4                {[-12-]|[4, '(A6+0x8)']|[##3]}
            <Call 0x2a7fc 0x299f4>                                              {[-12-]|[4, '(A6+0x8)']|[##3]}
            <POP 2a800-2a802 StackAdj>                       Δ+8                {[-12-]}
            <Call 0x2a802 0x10350>                                              {[-12-]}
                Quad2Long(a : Quad) : Long
            <POP 2a808-2a80a StackAdj>                       Δ+8                {[-4-]}
            <MI 2a80a  MOVE.L  (A7),D6>                                         {[-4-]}
            <POP 2a80c-2a80e StackAdj>                       Δ-8                {[-12-]}
            <MI 2a80e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0x8)']}
            <Const 0x2a810 0x4.4>                            Δ-4                {[-12-]|[4, '(A6+0x8)']|[##4]}
            <Call 0x2a814 0x299f4>                                              {[-12-]|[4, '(A6+0x8)']|[##4]}
            <POP 2a818-2a81a StackAdj>                       Δ+8                {[-12-]}
            <Call 0x2a81a 0x10350>                                              {[-12-]}
                Quad2Long(a : Quad) : Long
            <POP 2a820-2a822 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a822  MOVE.L  (A7)+,D5>                     Δ+4                {}
            <MI 2a824  MOVE.L  D6,D0>                                           {}
            <MI 2a826  ADD.L   D5,D0>                                           {}
            <MI 2a828  SUBQ.L  #0x1,D0>                                         {}
            <MI 2a82a  MOVE.W  (A4),D1>                                         {}
            <MI 2a82c  EXTW.L  D1>                                              {}
            <MI 2a82e  CMP.L   D1,D0>                                           {}
            <MI 2a830  BLE     0x2a862>                                         {}
        <POP 2a832-2a862 Naked>                              Σ0         ↓
            <Blob 0x2a832 [32] @>                            Δ-32               {[«32""»]}
            <POP 2a844-2a846 StackAdj>                       Δ-4                {[«32""»]|[-4-]}
            <Lit 0x2a846 31>                                                    {[«32""»]|[$$Offset/Length error in [INSERT]]}
            <Call 0x2a85a 0x28c9a>                                              {[«32""»]|[$$Offset/Length error in [INSERT]]}
            <POP 2a85e-2a862 StackAdj>                       Δ+36               {}
        <POP 2a862-2a86e Naked>                              Σ0 Δ-8     ↓ ←0x2a7d4
            <MI 2a862  MOVEA.L (A6-0x14),A0>                                    {}
            <MI 2a864  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2a866  MOVE.W  (A0),D0>                                         {[4, 'A0']}
            <MI 2a868  EXTW.L  D0>                                              {[4, 'A0']}
            <MI 2a86a  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D0']}
            <MI 2a86c  MOVEQ.L #0x01,D7>                                        {[4, 'A0']|[4, 'D0']}
        <POP 2a86e-2a872 Naked>                              Σ-8        ↓ →0x2a898 ←0x2a872
            <MI 2a86e  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2a870  BGT     0x2a898>                                         {[-8-]}
        <POP 2a872-2a898 Naked>                              Σ-8        ↓ →0x2a86e
            <MI 2a872  MOVE.L  D6,D0>                                           {[-8-]}
            <MI 2a874  ADD.L   D7,D0>                                           {[-8-]}
            <MI 2a876  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <MI 2a878  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x2a87a LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-8-]}
            <MI 2a880  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 2a882  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x2a884 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-8-]}
            <MI 2a88a  MOVEA.L (A7+0x4),A0>                                     {[-8-]}
            <MI 2a88e  MOVE.B  (A0+D1.L+#0x2),(A4+D0.L+#0x2)>                   {[-8-]}
            <MI 2a894  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2a896  BVC     0x2a86e>                                         {[-8-]}
        <POP 2a898-2a8ac Naked>                              Σ-8 Δ+8    ↓ ←0x2a86e
            <POP 2a898-2a89a StackAdj>                       Δ+4                {[-4-]}
            <MI 2a89a  MOVE.L  A4,(A7)>                                         {[4, 'A4']}
            <Call 0x2a89c 0x29a64>                                              {[4, 'A4']}
            <POP 2a8a0-2a8a2 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2a8a2 <LVAR -0x014 @ 4(rw)>>       Δ-4                {[@@-20]}
            <Call 0x2a8a4 0x102bc>                                              {[@@-20]}
                FreeString(VAR a : String)
            <POP 2a8aa-2a8ac StackAdj>                       Δ+4                {}
        <POP 2a8ac-2a8b4 Epilogue>                           Σ0         

0x2a8b4


@ 2a8b4
        <LVAR  0x008 4(r)>
        <LVAR -0x010 @ 4(r)>
        <LVAR -0x014 @ 4(rw)>
    <POP 2a8b4-2a99a Body>                                              
        <POP 2a8b4-2a8ca Prologue>                           Σ0         ↓
        <POP 2a8ca-2a8d8 RegCacheLoad>                       Σ0         ↓
        <POP 2a8d8-2a930 Naked>                              Σ0         ↓ →0x2a936
            <POP 2a8d8-2a8da StackAdj>                       Δ-4                {[-4-]}
            <MI 2a8da  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2a8dc 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a8e0 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a8e4-2a8e6 StackAdj>                       Δ+8                {[-4-]}
            <MI 2a8e6  MOVE.L  (A7)+,(A6-0x14)>              Δ+4                {}
            <Pointer.fp 0x2a8e8 <LVAR -0x010 @ 4(r)>>        Δ-4                {[@@-16]}
            <Call 0x2a8ea 0x102b8>                                              {[@@-16]}
                NewString(VAR a : String)
            <POP 2a8f0-2a8f2 StackAdj>                       Δ-8                {[@@-16]|[-8-]}
            <MI 2a8f2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[@@-16]|[-8-]|[4, '(A6+0x8)']}
            <Const 0x2a8f4 0x2.4>                            Δ-4                {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2a8f8 0x299f4>                                              {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
            <POP 2a8fc-2a8fe StackAdj>                       Δ+8                {[@@-16]|[-8-]}
            <Call 0x2a8fe 0x10350>                                              {[@@-16]|[-8-]}
                Quad2Long(a : Quad) : Long
            <POP 2a904-2a906 StackAdj>                       Δ+8                {[@@-16]}
            <MI 2a906  MOVE.L  (A7),D5>                                         {[@@-16]}
            <POP 2a908-2a90a StackAdj>                       Δ-8                {[@@-16]|[-8-]}
            <MI 2a90a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[@@-16]|[-8-]|[4, '(A6+0x8)']}
            <Const 0x2a90c 0x3.4>                            Δ-4                {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
            <Call 0x2a910 0x299f4>                                              {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
            <POP 2a914-2a916 StackAdj>                       Δ+8                {[@@-16]|[-8-]}
            <Call 0x2a916 0x10350>                                              {[@@-16]|[-8-]}
                Quad2Long(a : Quad) : Long
            <POP 2a91c-2a91e StackAdj>                       Δ+8                {[@@-16]}
            <MI 2a91e  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 2a920  MOVEA.L (A6-0x14),A0>                                    {}
            <MI 2a922  MOVE.L  D5,D0>                                           {}
            <MI 2a924  ADD.L   D6,D0>                                           {}
            <MI 2a926  SUBQ.L  #0x1,D0>                                         {}
            <MI 2a928  MOVE.W  (A0),D1>                                         {}
            <MI 2a92a  EXTW.L  D1>                                              {}
            <MI 2a92c  CMP.L   D1,D0>                                           {}
            <MI 2a92e  BLE     0x2a936>                                         {}
        <POP 2a930-2a936 Naked>                              Σ0         ↓
            <MI 2a930  ADDQ.L  #0x1,D1>                                         {}
            <MI 2a932  SUB.L   D5,D1>                                           {}
            <MI 2a934  MOVE.L  D1,D6>                                           {}
        <POP 2a936-2a93a Naked>                              Σ0 Δ-4     ↓ ←0x2a8d8
            <MI 2a936  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']}
            <MI 2a938  MOVEQ.L #0x01,D7>                                        {[4, 'D6']}
        <POP 2a93a-2a93e Naked>                              Σ-4        ↓ →0x2a964 ←0x2a93e
            <MI 2a93a  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2a93c  BGT     0x2a964>                                         {[-4-]}
        <POP 2a93e-2a964 Naked>                              Σ-4        ↓ →0x2a93a
            <MI 2a93e  MOVEA.L (A6-0x10),A0>                                    {[-4-]}
            <MI 2a940  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 2a942  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x2a944 LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 2a94a  MOVEA.L (A6-0x14),A1>                                    {[-4-]}
            <MI 2a94c  MOVE.L  D7,D1>                                           {[-4-]}
            <MI 2a94e  ADD.L   D5,D1>                                           {[-4-]}
            <MI 2a950  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <MI 2a952  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x2a954 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 2a95a  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x2)>                   {[-4-]}
            <MI 2a960  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 2a962  BVC     0x2a93a>                                         {[-4-]}
        <POP 2a964-2a992 Naked>                              Σ-4 Δ+4    ↓ ←0x2a93a
            <POP 2a964-2a966 StackAdj>                       Δ+4                {}
            <MI 2a966  MOVEA.L (A6-0x10),A0>                                    {}
            <POP 0x2a968 LimitCheck -0x8000 ≤ D6 ≤ 0x7fff>                      {}
            <MI 2a97e  MOVE.W  D6,(A0)>                                         {}
            <MI 2a980  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x10)']}
            <Call 0x2a982 0x29a64>                                              {[4, '(A6-0x10)']}
            <POP 2a986-2a988 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2a988 <LVAR -0x014 @ 4(rw)>>       Δ-4                {[@@-20]}
            <Call 0x2a98a 0x102bc>                                              {[@@-20]}
                FreeString(VAR a : String)
            <POP 2a990-2a992 StackAdj>                       Δ+4                {}
        <POP 2a992-2a99a Epilogue>                           Σ0         

0x2a99a


@ 2a99a
        <LVAR  0x008 4(r)>
    <POP 2a99a-2a9c6 Body>                                              
        <POP 2a99a-2a9ac Prologue>                           Σ0         ↓
        <POP 2a9ac-2a9c2 Naked>                              Σ0         ↓
            <POP 2a9ac-2a9ae StackAdj>                       Δ-8                {[-8-]}
            <MI 2a9ae  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <Const 0x2a9b2 0x1.4>                            Δ-4                {[-8-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a9b6 0x299f4>                                              {[-8-]|[4, '(A6+0x8)']|[##1]}
            <POP 2a9ba-2a9bc StackAdj>                       Δ+8                {[-8-]}
            <Call 0x2a9bc 0x2982e>                                              {[-8-]}
            <POP 2a9c0-2a9c2 StackAdj>                       Δ+8                {}
        <POP 2a9c2-2a9c6 Epilogue>                           Σ0         

0x2a9c6


@ 2a9c6
        <LVAR  0x008 4(r)>
    <POP 2a9c6-2aa12 Body>                                              
        <POP 2a9c6-2a9d8 Prologue>                           Σ0         ↓
        <POP 2a9d8-2aa04 Naked>                              Σ0         ↓ →0x2aa0a
            <POP 2a9d8-2a9dc StackAdj>                       Δ-10               {[-10-]}
            <MI 2a9dc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']}
            <Const 0x2a9e0 0x1.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a9e4 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
            <MI 2a9e8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2a9ec 0x2.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2a9f0 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2a9f4-2a9f6 StackAdj>                       Δ+8                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2a9f6 0x1032c>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
                IsEqual(a, b : Quad) : Bool
            <POP 2a9fc-2aa00 StackAdj>                       Δ+16               {[-2-]}
            <MI 2aa00  TST.B   (A7)+>                        Δ+2                {}
            <MI 2aa02  BEQ     0x2aa0a>                                         {}
        <POP 2aa04-2aa0a Naked>                              Σ0         →0x2aa0e
            <Call 0x2aa04 0x29482>                                              {}
            <MI 2aa08  BRA     0x2aa0e>                                         {}
        <POP 2aa0a-2aa0e Naked>                              Σ0         ↓ ←0x2a9d8
            <Call 0x2aa0a 0x294c8>                                              {}
        <POP 2aa0e-2aa12 Epilogue>                           Σ0         ←0x2aa04

0x2aa12


@ 2aa12
        <LVAR  0x008 4(r)>
    <POP 2aa12-2aa5e Body>                                              
        <POP 2aa12-2aa24 Prologue>                           Σ0         ↓
        <POP 2aa24-2aa50 Naked>                              Σ0         ↓ →0x2aa56
            <POP 2aa24-2aa28 StackAdj>                       Δ-10               {[-10-]}
            <MI 2aa28  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']}
            <Const 0x2aa2c 0x1.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aa30 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
            <MI 2aa34  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2aa38 0x2.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2aa3c 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2aa40-2aa42 StackAdj>                       Δ+8                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aa42 0x1032c>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
                IsEqual(a, b : Quad) : Bool
            <POP 2aa48-2aa4c StackAdj>                       Δ+16               {[-2-]}
            <MI 2aa4c  TST.B   (A7)+>                        Δ+2                {}
            <MI 2aa4e  BNE     0x2aa56>                                         {}
        <POP 2aa50-2aa56 Naked>                              Σ0         →0x2aa5a
            <Call 0x2aa50 0x29482>                                              {}
            <MI 2aa54  BRA     0x2aa5a>                                         {}
        <POP 2aa56-2aa5a Naked>                              Σ0         ↓ ←0x2aa24
            <Call 0x2aa56 0x294c8>                                              {}
        <POP 2aa5a-2aa5e Epilogue>                           Σ0         ←0x2aa50

0x2aa5e


@ 2aa5e
        <LVAR  0x008 4(r)>
    <POP 2aa5e-2aaaa Body>                                              
        <POP 2aa5e-2aa70 Prologue>                           Σ0         ↓
        <POP 2aa70-2aa9c Naked>                              Σ0         ↓ →0x2aaa2
            <POP 2aa70-2aa74 StackAdj>                       Δ-10               {[-10-]}
            <MI 2aa74  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']}
            <Const 0x2aa78 0x1.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aa7c 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
            <MI 2aa80  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2aa84 0x2.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2aa88 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2aa8c-2aa8e StackAdj>                       Δ+8                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aa8e 0x10328>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
                IsSmaller(a, b : Quad) : Bool
            <POP 2aa94-2aa98 StackAdj>                       Δ+16               {[-2-]}
            <MI 2aa98  TST.B   (A7)+>                        Δ+2                {}
            <MI 2aa9a  BEQ     0x2aaa2>                                         {}
        <POP 2aa9c-2aaa2 Naked>                              Σ0         →0x2aaa6
            <Call 0x2aa9c 0x29482>                                              {}
            <MI 2aaa0  BRA     0x2aaa6>                                         {}
        <POP 2aaa2-2aaa6 Naked>                              Σ0         ↓ ←0x2aa70
            <Call 0x2aaa2 0x294c8>                                              {}
        <POP 2aaa6-2aaaa Epilogue>                           Σ0         ←0x2aa9c

0x2aaaa


@ 2aaaa
        <LVAR  0x008 4(r)>
    <POP 2aaaa-2aaf6 Body>                                              
        <POP 2aaaa-2aabc Prologue>                           Σ0         ↓
        <POP 2aabc-2aae8 Naked>                              Σ0         ↓ →0x2aaee
            <POP 2aabc-2aac0 StackAdj>                       Δ-10               {[-10-]}
            <MI 2aac0  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']}
            <Const 0x2aac4 0x1.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aac8 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
            <MI 2aacc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2aad0 0x2.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2aad4 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2aad8-2aada StackAdj>                       Δ+8                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aada 0x10324>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
                IsGreater(a, b : Quad) : Bool
            <POP 2aae0-2aae4 StackAdj>                       Δ+16               {[-2-]}
            <MI 2aae4  TST.B   (A7)+>                        Δ+2                {}
            <MI 2aae6  BEQ     0x2aaee>                                         {}
        <POP 2aae8-2aaee Naked>                              Σ0         →0x2aaf2
            <Call 0x2aae8 0x29482>                                              {}
            <MI 2aaec  BRA     0x2aaf2>                                         {}
        <POP 2aaee-2aaf2 Naked>                              Σ0         ↓ ←0x2aabc
            <Call 0x2aaee 0x294c8>                                              {}
        <POP 2aaf2-2aaf6 Epilogue>                           Σ0         ←0x2aae8

0x2aaf6


@ 2aaf6
        <LVAR  0x008 4(r)>
    <POP 2aaf6-2ab42 Body>                                              
        <POP 2aaf6-2ab08 Prologue>                           Σ0         ↓
        <POP 2ab08-2ab34 Naked>                              Σ0         ↓ →0x2ab3a
            <POP 2ab08-2ab0c StackAdj>                       Δ-10               {[-10-]}
            <MI 2ab0c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']}
            <Const 0x2ab10 0x1.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ab14 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ab18  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ab1c 0x2.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ab20 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ab24-2ab26 StackAdj>                       Δ+8                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ab26 0x10324>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
                IsGreater(a, b : Quad) : Bool
            <POP 2ab2c-2ab30 StackAdj>                       Δ+16               {[-2-]}
            <MI 2ab30  TST.B   (A7)+>                        Δ+2                {}
            <MI 2ab32  BNE     0x2ab3a>                                         {}
        <POP 2ab34-2ab3a Naked>                              Σ0         →0x2ab3e
            <Call 0x2ab34 0x29482>                                              {}
            <MI 2ab38  BRA     0x2ab3e>                                         {}
        <POP 2ab3a-2ab3e Naked>                              Σ0         ↓ ←0x2ab08
            <Call 0x2ab3a 0x294c8>                                              {}
        <POP 2ab3e-2ab42 Epilogue>                           Σ0         ←0x2ab34

0x2ab42


@ 2ab42
        <LVAR  0x008 4(r)>
    <POP 2ab42-2ab8e Body>                                              
        <POP 2ab42-2ab54 Prologue>                           Σ0         ↓
        <POP 2ab54-2ab80 Naked>                              Σ0         ↓ →0x2ab86
            <POP 2ab54-2ab58 StackAdj>                       Δ-10               {[-10-]}
            <MI 2ab58  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']}
            <Const 0x2ab5c 0x1.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ab60 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ab64  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ab68 0x2.4>                            Δ-4                {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ab6c 0x299f4>                                              {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ab70-2ab72 StackAdj>                       Δ+8                {[-10-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ab72 0x10328>                                              {[-10-]|[4, '(A6+0x8)']|[##1]}
                IsSmaller(a, b : Quad) : Bool
            <POP 2ab78-2ab7c StackAdj>                       Δ+16               {[-2-]}
            <MI 2ab7c  TST.B   (A7)+>                        Δ+2                {}
            <MI 2ab7e  BNE     0x2ab86>                                         {}
        <POP 2ab80-2ab86 Naked>                              Σ0         →0x2ab8a
            <Call 0x2ab80 0x29482>                                              {}
            <MI 2ab84  BRA     0x2ab8a>                                         {}
        <POP 2ab86-2ab8a Naked>                              Σ0         ↓ ←0x2ab54
            <Call 0x2ab86 0x294c8>                                              {}
        <POP 2ab8a-2ab8e Epilogue>                           Σ0         ←0x2ab80

0x2ab8e


@ 2ab8e
        <LVAR  0x008 4(r)>
    <POP 2ab8e-2abd8 Body>                                              
        <POP 2ab8e-2aba4 Prologue>                           Σ0         ↓
        <POP 2aba4-2aba6 RegCacheLoad>                       Σ0         ↓
        <POP 2aba6-2abd0 Naked>                              Σ0         ↓
            <POP 2aba6-2aba8 StackAdj>                       Δ-16               {[-16-]}
            <MI 2aba8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2abac 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2abb0 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2abb4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2abb8 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2abbc 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2abc0-2abc2 StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2abc2 0x10314>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                Add(a, b : Quad) : Quad
            <POP 2abc8-2abca StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2abca 0x29aec>                                              {[-8-]}
            <POP 2abce-2abd0 StackAdj>                       Δ+8                {}
        <POP 2abd0-2abd8 Epilogue>                           Σ0         

0x2abd8


@ 2abd8
        <LVAR  0x008 4(r)>
    <POP 2abd8-2ac22 Body>                                              
        <POP 2abd8-2abee Prologue>                           Σ0         ↓
        <POP 2abee-2abf0 RegCacheLoad>                       Σ0         ↓
        <POP 2abf0-2ac1a Naked>                              Σ0         ↓
            <POP 2abf0-2abf2 StackAdj>                       Δ-16               {[-16-]}
            <MI 2abf2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2abf6 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2abfa 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2abfe  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ac02 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ac06 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ac0a-2ac0c StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ac0c 0x10318>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                Subtract(a, b : Quad) : Quad
            <POP 2ac12-2ac14 StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2ac14 0x29aec>                                              {[-8-]}
            <POP 2ac18-2ac1a StackAdj>                       Δ+8                {}
        <POP 2ac1a-2ac22 Epilogue>                           Σ0         

0x2ac22


@ 2ac22
        <LVAR  0x008 4(r)>
    <POP 2ac22-2ac6c Body>                                              
        <POP 2ac22-2ac38 Prologue>                           Σ0         ↓
        <POP 2ac38-2ac3a RegCacheLoad>                       Σ0         ↓
        <POP 2ac3a-2ac64 Naked>                              Σ0         ↓
            <POP 2ac3a-2ac3c StackAdj>                       Δ-16               {[-16-]}
            <MI 2ac3c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2ac40 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ac44 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ac48  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ac4c 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ac50 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ac54-2ac56 StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ac56 0x1031c>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                Multiply(a, b : Quad) : Quad
            <POP 2ac5c-2ac5e StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2ac5e 0x29aec>                                              {[-8-]}
            <POP 2ac62-2ac64 StackAdj>                       Δ+8                {}
        <POP 2ac64-2ac6c Epilogue>                           Σ0         

0x2ac6c


@ 2ac6c
        <LVAR  0x008 4(r)>
    <POP 2ac6c-2acb6 Body>                                              
        <POP 2ac6c-2ac82 Prologue>                           Σ0         ↓
        <POP 2ac82-2ac84 RegCacheLoad>                       Σ0         ↓
        <POP 2ac84-2acae Naked>                              Σ0         ↓
            <POP 2ac84-2ac86 StackAdj>                       Δ-16               {[-16-]}
            <MI 2ac86  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2ac8a 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ac8e 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ac92  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ac96 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ac9a 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ac9e-2aca0 StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aca0 0x10320>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                Divide(a, b : Quad) : Quad
            <POP 2aca6-2aca8 StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2aca8 0x29aec>                                              {[-8-]}
            <POP 2acac-2acae StackAdj>                       Δ+8                {}
        <POP 2acae-2acb6 Epilogue>                           Σ0         

0x2acb6


@ 2acb6
        <LVAR  0x008 4(r)>
    <POP 2acb6-2ad00 Body>                                              
        <POP 2acb6-2accc Prologue>                           Σ0         ↓
        <POP 2accc-2acce RegCacheLoad>                       Σ0         ↓
        <POP 2acce-2acf8 Naked>                              Σ0         ↓
            <POP 2acce-2acd0 StackAdj>                       Δ-16               {[-16-]}
            <MI 2acd0  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2acd4 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2acd8 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2acdc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ace0 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ace4 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ace8-2acea StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2acea 0x10358>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                Modulus(a, b : Quad) : Quad
            <POP 2acf0-2acf2 StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2acf2 0x29aec>                                              {[-8-]}
            <POP 2acf6-2acf8 StackAdj>                       Δ+8                {}
        <POP 2acf8-2ad00 Epilogue>                           Σ0         

0x2ad00


@ 2ad00
        <LVAR  0x008 4(r)>
    <POP 2ad00-2ad4a Body>                                              
        <POP 2ad00-2ad16 Prologue>                           Σ0         ↓
        <POP 2ad16-2ad18 RegCacheLoad>                       Σ0         ↓
        <POP 2ad18-2ad42 Naked>                              Σ0         ↓
            <POP 2ad18-2ad1a StackAdj>                       Δ-16               {[-16-]}
            <MI 2ad1a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2ad1e 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ad22 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ad26  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ad2a 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ad2e 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ad32-2ad34 StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ad34 0x10334>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                BitOr(a, b : Quad) : Quad
            <POP 2ad3a-2ad3c StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2ad3c 0x29aec>                                              {[-8-]}
            <POP 2ad40-2ad42 StackAdj>                       Δ+8                {}
        <POP 2ad42-2ad4a Epilogue>                           Σ0         

0x2ad4a


@ 2ad4a
        <LVAR  0x008 4(r)>
    <POP 2ad4a-2ad94 Body>                                              
        <POP 2ad4a-2ad60 Prologue>                           Σ0         ↓
        <POP 2ad60-2ad62 RegCacheLoad>                       Σ0         ↓
        <POP 2ad62-2ad8c Naked>                              Σ0         ↓
            <POP 2ad62-2ad64 StackAdj>                       Δ-16               {[-16-]}
            <MI 2ad64  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2ad68 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ad6c 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ad70  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2ad74 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ad78 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2ad7c-2ad7e StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ad7e 0x10330>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                BitAnd(a, b : Quad) : Quad
            <POP 2ad84-2ad86 StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2ad86 0x29aec>                                              {[-8-]}
            <POP 2ad8a-2ad8c StackAdj>                       Δ+8                {}
        <POP 2ad8c-2ad94 Epilogue>                           Σ0         

0x2ad94


@ 2ad94
        <LVAR  0x008 4(r)>
    <POP 2ad94-2adde Body>                                              
        <POP 2ad94-2adaa Prologue>                           Σ0         ↓
        <POP 2adaa-2adac RegCacheLoad>                       Σ0         ↓
        <POP 2adac-2add6 Naked>                              Σ0         ↓
            <POP 2adac-2adae StackAdj>                       Δ-16               {[-16-]}
            <MI 2adae  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2adb2 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2adb6 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2adba  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
            <Const 0x2adbe 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2adc2 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
            <POP 2adc6-2adc8 StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2adc8 0x10340>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
                BitXor(a, b : Quad) : Quad
            <POP 2adce-2add0 StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2add0 0x29aec>                                              {[-8-]}
            <POP 2add4-2add6 StackAdj>                       Δ+8                {}
        <POP 2add6-2adde Epilogue>                           Σ0         

0x2adde


@ 2adde
        <LVAR  0x008 4(r)>
    <POP 2adde-2ae22 Body>                                              
        <POP 2adde-2adf0 Prologue>                           Σ0         ↓
        <POP 2adf0-2ae1e Naked>                              Σ0         ↓
            <POP 2adf0-2adf4 StackAdj>                       Δ-16               {[-16-]}
            <MI 2adf4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2adf8 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2adfc 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ae00  MOVE.L  (A6+0x8),(A7)>                                   {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
            <Const 0x2ae04 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ae08 0x29a30>                                              {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
            <POP 2ae0c-2ae0e StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']}
            <Call 0x2ae0e 0x10344>                                              {[-16-]|[4, '(A6+0x8)']}
                BitShift(a : Quad ; howmuch : integer) : Quad
            <POP 2ae14-2ae18 StackAdj>                       Δ+12               {[-8-]}
            <Call 0x2ae18 0x29aec>                                              {[-8-]}
            <POP 2ae1c-2ae1e StackAdj>                       Δ+8                {}
        <POP 2ae1e-2ae22 Epilogue>                           Σ0         

0x2ae22


@ 2ae22
        <LVAR  0x008 4(r)>
    <POP 2ae22-2ae68 Body>                                              
        <POP 2ae22-2ae34 Prologue>                           Σ0         ↓
        <POP 2ae34-2ae64 Naked>                              Σ0         ↓
            <POP 2ae34-2ae38 StackAdj>                       Δ-16               {[-16-]}
            <MI 2ae38  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2ae3c 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ae40 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <MI 2ae44  MOVE.L  (A6+0x8),(A7)>                                   {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
            <Const 0x2ae48 0x2.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
            <Call 0x2ae4c 0x29a30>                                              {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
            <POP 2ae50-2ae52 StackAdj>                       Δ+8                {[-16-]|[4, '(A6+0x8)']}
            <MI 2ae52  NEG.L   (A7)>                                            {[-16-]|[4, '(A6+0x8)']}
            <Call 0x2ae54 0x10344>                                              {[-16-]|[4, '(A6+0x8)']}
                BitShift(a : Quad ; howmuch : integer) : Quad
            <POP 2ae5a-2ae5e StackAdj>                       Δ+12               {[-8-]}
            <Call 0x2ae5e 0x29aec>                                              {[-8-]}
            <POP 2ae62-2ae64 StackAdj>                       Δ+8                {}
        <POP 2ae64-2ae68 Epilogue>                           Σ0         

0x2ae68


@ 2ae68
        <LVAR  0x008 4(r)>
    <POP 2ae68-2ae9e Body>                                              
        <POP 2ae68-2ae7a Prologue>                           Σ0         ↓
        <POP 2ae7a-2ae9a Naked>                              Σ0         ↓
            <POP 2ae7a-2ae7e StackAdj>                       Δ-16               {[-16-]}
            <MI 2ae7e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x8)']}
            <Const 0x2ae82 0x1.4>                            Δ-4                {[-16-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2ae86 0x299f4>                                              {[-16-]|[4, '(A6+0x8)']|[##1]}
            <POP 2ae8a-2ae8c StackAdj>                       Δ+8                {[-16-]}
            <Call 0x2ae8c 0x10338>                                              {[-16-]}
                BitNot(a : Quad) : Quad
            <POP 2ae92-2ae94 StackAdj>                       Δ+8                {[-8-]}
            <Call 0x2ae94 0x29aec>                                              {[-8-]}
            <POP 2ae98-2ae9a StackAdj>                       Δ+8                {}
        <POP 2ae9a-2ae9e Epilogue>                           Σ0         

0x2ae9e


@ 2ae9e
        <LVAR  0x008 4(r)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 4(rw)>
        <LVAR -0x018 4(rw)>
    <POP 2ae9e-2af2e Body>                                              
        <POP 2ae9e-2aeb4 Prologue>                           Σ0         ↓
        <POP 2aeb4-2aeb8 RegCacheLoad>                       Σ0         ↓
        <POP 2aeb8-2af26 Naked>                              Σ0         ↓
            <POP 2aeb8-2aeba StackAdj>                       Δ-8                {[-8-]}
            <MI 2aeba  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <Const 0x2aebc 0x1.4>                            Δ-4                {[-8-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2aec0 0x299f4>                                              {[-8-]|[4, '(A6+0x8)']|[##1]}
            <POP 2aec4-2aec6 StackAdj>                       Δ+8                {[-8-]}
            <MI 2aec6  MOVE.L  (A7)+,(A6-0x18)>              Δ+4                {[-4-]}
            <MI 2aeca  MOVE.L  (A7),(A6-0x14)>                                  {[-4-]}
            <POP 2aece-2aed0 StackAdj>                       Δ-4                {[-8-]}
            <MI 2aed0  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <Const 0x2aed2 0x2.4>                            Δ-4                {[-8-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2aed6 0x299f4>                                              {[-8-]|[4, '(A6+0x8)']|[##2]}
            <POP 2aeda-2aedc StackAdj>                       Δ+8                {[-8-]}
            <MI 2aedc  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[-4-]}
            <MI 2aee0  MOVE.L  (A7),(A6-0xc)>                                   {[-4-]}
            <MI 2aee4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2aee6 0x3.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##3]}
            <Call 0x2aeea 0x29a30>                                              {[-4-]|[4, '(A6+0x8)']|[##3]}
            <POP 2aeee-2aef0 StackAdj>                       Δ+8                {[-4-]}
            <MI 2aef0  MOVE.L  (A7),D7>                                         {[-4-]}
            <MI 2aef2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2aef4 0x4.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##4]}
            <Call 0x2aef8 0x29a30>                                              {[-4-]|[4, '(A6+0x8)']|[##4]}
            <POP 2aefc-2aefe StackAdj>                       Δ+8                {[-4-]}
            <MI 2aefe  MOVE.L  (A7),D6>                                         {[-4-]}
            <POP 2af00-2af02 StackAdj>                       Δ-4                {[-8-]}
            <MI 2af02  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x14)']}
            <MI 2af06  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <MI 2af0a  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']}
            <MI 2af0e  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 2af12  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
            <MI 2af14  MOVE.L  D6,-(A7)>                     Δ-4                {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
            <Call 0x2af16 0x10348>                                              {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
                ?BitField_something_()
            <POP 2af1c-2af20 StackAdj>                       Δ+24               {[-8-]}
            <Call 0x2af20 0x29aec>                                              {[-8-]}
            <POP 2af24-2af26 StackAdj>                       Δ+8                {}
        <POP 2af26-2af2e Epilogue>                           Σ0         

0x2af2e


@ 2af2e
        <LVAR  0x008 4(r)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
    <POP 2af2e-2afa0 Body>                                              
        <POP 2af2e-2af44 Prologue>                           Σ0         ↓
        <POP 2af44-2af48 RegCacheLoad>                       Σ0         ↓
        <POP 2af48-2af98 Naked>                              Σ0         ↓
            <POP 2af48-2af4a StackAdj>                       Δ-8                {[-8-]}
            <MI 2af4a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <Const 0x2af4c 0x1.4>                            Δ-4                {[-8-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2af50 0x299f4>                                              {[-8-]|[4, '(A6+0x8)']|[##1]}
            <POP 2af54-2af56 StackAdj>                       Δ+8                {[-8-]}
            <MI 2af56  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[-4-]}
            <MI 2af5a  MOVE.L  (A7),(A6-0xc)>                                   {[-4-]}
            <MI 2af5e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2af60 0x2.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2af64 0x29a30>                                              {[-4-]|[4, '(A6+0x8)']|[##2]}
            <POP 2af68-2af6a StackAdj>                       Δ+8                {[-4-]}
            <MI 2af6a  MOVE.L  (A7),D7>                                         {[-4-]}
            <MI 2af6c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2af6e 0x3.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##3]}
            <Call 0x2af72 0x29a30>                                              {[-4-]|[4, '(A6+0x8)']|[##3]}
            <POP 2af76-2af78 StackAdj>                       Δ+8                {[-4-]}
            <MI 2af78  MOVE.L  (A7),D6>                                         {[-4-]}
            <POP 2af7a-2af7c StackAdj>                       Δ-4                {[-8-]}
            <MI 2af7c  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0xc)']}
            <MI 2af80  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 2af84  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
            <MI 2af86  MOVE.L  D6,-(A7)>                     Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
            <Call 0x2af88 0x1034c>                                              {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
                FSCALL_1034c
            <POP 2af8e-2af92 StackAdj>                       Δ+16               {[-8-]}
            <Call 0x2af92 0x29aec>                                              {[-8-]}
            <POP 2af96-2af98 StackAdj>                       Δ+8                {}
        <POP 2af98-2afa0 Epilogue>                           Σ0         

0x2afa0


@ 2afa0
        <LVAR  0x008 4(r)>
    <POP 2afa0-2b012 Body>                                              
        <POP 2afa0-2afb6 Prologue>                           Σ0         ↓
        <POP 2afb6-2afc4 Naked>                              Σ0 Δ-4     ↓
            <POP 2afb6-2afb8 StackAdj>                       Δ-4                {[-4-]}
            <MI 2afb8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x2afbc 0x290a6>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 2afc0-2afc2 StackAdj>                       Δ+4                {[-4-]}
            <MI 2afc2  MOVEQ.L #0x01,D7>                                        {[-4-]}
        <POP 2afc4-2afc8 Naked>                              Σ-4        ↓ →0x2afee ←0x2afc8
            <MI 2afc4  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2afc6  BGT     0x2afee>                                         {[-4-]}
        <POP 2afc8-2afee Naked>                              Σ-4        ↓ →0x2afc4
            <POP 2afc8-2afca StackAdj>                       Δ-4                {[-8-]}
            <MI 2afca  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <MI 2afce  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
            <Call 0x2afd0 0x299c2>                                              {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
            <POP 2afd4-2afd6 StackAdj>                       Δ+8                {[-8-]}
            <Call 0x2afd6 0x103d8>                                              {[-8-]}
                WriteConsoleString(str : String)
            <POP 2afdc-2afde StackAdj>                       Δ+2                {[-6-]}
            <POP 2afde-2afdf StackAdj>                       Δ+2                {[-4-]}
            <Const 0x2afdf 0x20.2>                           Δ-2                {[-4-]|[#32]}
            <Call 0x2afe2 0x103d0>                                              {[-4-]|[#32]}
                WriteConsoleChar(chr : char)
            <POP 2afe8-2afea StackAdj>                       Δ+2                {[-4-]}
            <MI 2afea  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 2afec  BVC     0x2afc4>                                         {[-4-]}
        <POP 2afee-2b00a Naked>                              Σ-4 Δ+4    ↓ ←0x2afc4
            <Const 0x2afee 0x1.4>                            Δ-4                {[-4-]|[##1]}
            <Call 0x2aff2 0x103e4>                                              {[-4-]|[##1]}
                AskConsoleString(prompt : String) : String
            <POP 2aff8-2affa StackAdj>                       Δ+4                {[-4-]}
            <MI 2affa  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <MI 2affc  MOVE.L  A4,-(A7)>                     Δ-4                {[4, 'A4']}
            <Call 0x2affe 0x28ef2>                                              {[4, 'A4']}
            <MI 2b002  MOVE.L  A4,(A7)>                                         {[4, 'A4']}
            <Call 0x2b004 0x29a64>                                              {[4, 'A4']}
            <POP 2b008-2b00a StackAdj>                       Δ+4                {}
        <POP 2b00a-2b012 Epilogue>                           Σ0         

0x2b012


@ 2b012
        <LVAR  0x008 4(r)>
    <POP 2b012-2b094 Body>                                              
        <POP 2b012-2b028 Prologue>                           Σ0         ↓
        <POP 2b028-2b02e RegCacheLoad>                       Σ0         ↓
        <POP 2b02e-2b08c Naked>                              Σ0         ↓
            <POP 2b02e-2b030 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b030  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Const 0x2b032 0x1.4>                            Δ-4                {[-4-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2b036 0x299c2>                                              {[-4-]|[4, '(A6+0x8)']|[##1]}
            <POP 2b03a-2b03c StackAdj>                       Δ+8                {[-4-]}
            <MI 2b03c  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <POP 2b03e-2b040 StackAdj>                       Δ-12               {[-12-]}
            <MI 2b040  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0x8)']}
            <Const 0x2b042 0x2.4>                            Δ-4                {[-12-]|[4, '(A6+0x8)']|[##2]}
            <Call 0x2b046 0x299f4>                                              {[-12-]|[4, '(A6+0x8)']|[##2]}
            <POP 2b04a-2b04c StackAdj>                       Δ+8                {[-12-]}
            <Call 0x2b04c 0x10350>                                              {[-12-]}
                Quad2Long(a : Quad) : Long
            <POP 2b052-2b054 StackAdj>                       Δ+8                {[-4-]}
            <MI 2b054  MOVE.L  (A7),D7>                                         {[-4-]}
            <POP 2b056-2b058 StackAdj>                       Δ-8                {[-12-]}
            <MI 2b058  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0x8)']}
            <Const 0x2b05a 0x3.4>                            Δ-4                {[-12-]|[4, '(A6+0x8)']|[##3]}
            <Call 0x2b05e 0x299f4>                                              {[-12-]|[4, '(A6+0x8)']|[##3]}
            <POP 2b062-2b064 StackAdj>                       Δ+8                {[-12-]}
            <Call 0x2b064 0x10350>                                              {[-12-]}
                Quad2Long(a : Quad) : Long
            <POP 2b06a-2b06c StackAdj>                       Δ+8                {[-4-]}
            <MI 2b06c  MOVE.L  (A7),D6>                                         {[-4-]}
            <POP 2b06e-2b070 StackAdj>                       Δ-8                {[-12-]}
            <MI 2b070  MOVE.L  A4,-(A7)>                     Δ-4                {[-12-]|[4, 'A4']}
            <MI 2b072  MOVE.L  D7,-(A7)>                     Δ-4                {[-12-]|[4, 'A4']|[4, 'D7']}
            <Call 0x2b074 0x10360>                                              {[-12-]|[4, 'A4']|[4, 'D7']}
                ?StringToInt64()
            <POP 2b07a-2b07c StackAdj>                       Δ+4                {[-12-]|[4, 'A4']}
            <MI 2b07c  MOVE.L  D6,(A7)>                                         {[-12-]|[4, 'D6']}
            <Call 0x2b07e 0x1035c>                                              {[-12-]|[4, 'D6']}
                Quad2String(a : Quad; radix : Long ) : String
            <POP 2b084-2b086 StackAdj>                       Δ+12               {[-4-]}
            <Call 0x2b086 0x29a64>                                              {[-4-]}
            <POP 2b08a-2b08c StackAdj>                       Δ+4                {}
        <POP 2b08c-2b094 Epilogue>                           Σ0         

0x2b094


@ 2b094
        <LVAR  0x008 4(r)>
        <LVAR -0x00a 2(r)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
    <POP 2b094-2b114 Body>                                              
        <POP 2b094-2b0aa Prologue>                           Σ0         ↓
        <POP 2b0aa-2b0b2 RegCacheLoad>                       Σ0         ↓
        <POP 2b0b2-2b0ca Naked>                              Σ0         ↓
            <POP 2b0b2-2b0b4 StackAdj>                       Δ-8                {[-8-]}
            <MI 2b0b4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <Const 0x2b0b8 0x1.4>                            Δ-4                {[-8-]|[4, '(A6+0x8)']|[##1]}
            <Call 0x2b0bc 0x299f4>                                              {[-8-]|[4, '(A6+0x8)']|[##1]}
            <POP 2b0c0-2b0c2 StackAdj>                       Δ+8                {[-8-]}
            <MI 2b0c2  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[-4-]}
            <MI 2b0c4  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {}
            <MI 2b0c6  MOVEQ.L #0x00,D7>                                        {}
            <MI 2b0c8  MOVEQ.L #0x00,D6>                                        {}
        <POP 2b0ca-2b0fa Naked>                              Σ0         ↓ →0x2b0ca ←0x2b0ca
            <MI 2b0ca  MOVE.W  (A6-0xa),D0>                                     {}
            <MI 2b0ce  ANDI.W  #0x0001,D0>                                      {}
            <MI 2b0d2  CLR.L   D1>                                              {}
            <MI 2b0d4  MOVE.W  D0,D1>                                           {}
            <MI 2b0d6  ADD.L   D1,D7>                                           {}
            <POP 2b0d8-2b0da StackAdj>                       Δ-8                {[-8-]}
            <MI 2b0da  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0xc)']}
            <MI 2b0dc  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <Const 0x2b0de 0xffffffff.4>                     Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
            <Call 0x2b0e2 0x10344>                                              {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
                BitShift(a : Quad ; howmuch : integer) : Quad
            <POP 2b0e8-2b0ec StackAdj>                       Δ+12               {[-8-]}
            <MI 2b0ec  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[-4-]}
            <MI 2b0ee  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {}
            <MI 2b0f0  ADDQ.L  #0x1,D6>                                         {}
            <MI 2b0f2  CMPI.L  #0x0000003f,D6>                                  {}
            <MI 2b0f8  BLE     0x2b0ca>                                         {}
        <POP 2b0fa-2b10c Naked>                              Σ0         ↓
            <POP 2b0fa-2b0fc StackAdj>                       Δ-8                {[-8-]}
            <MI 2b0fc  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, 'D7']}
            <Call 0x2b0fe 0x10354>                                              {[-8-]|[4, 'D7']}
                Long2Quad(a : Long) : Quad
            <POP 2b104-2b106 StackAdj>                       Δ+4                {[-8-]}
            <Call 0x2b106 0x29aec>                                              {[-8-]}
            <POP 2b10a-2b10c StackAdj>                       Δ+8                {}
        <POP 2b10c-2b114 Epilogue>                           Σ0         

0x2b114


@ 2b114
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 1(r)>
    <POP 2b114-2b1d8 Body>                                              
        <POP 2b114-2b12a Prologue>                           Σ0         ↓
        <POP 2b12a-2b134 RegCacheLoad>                       Σ0         ↓
        <POP 2b134-2b138 Naked>                              Σ0         ↓ →0x2b16a
            <MI 2b134  TST.B   0x2f21a>                                         {}
            <MI 2b136  BNE     0x2b16a>                                         {}
        <POP 2b138-2b16a Naked>                              Σ0         ↓
            <Blob 0x2b138 [28] @>                            Δ-28               {[«28""»]}
            <POP 2b14a-2b14c StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x2b14c 27>                                                    {[«28""»]|[$$REPEATing, type ^G to exit.]}
            <Call 0x2b15e 0x103e0>                                              {[«28""»]|[$$REPEATing, type ^G to exit.]}
                WriteConsoleStringCrLf(str : String)
            <POP 2b164-2b168 StackAdj>                       Δ+32               {}
            <MI 2b168  MOVE.B  #0x01,0x2f21a>                                   {}
        <POP 2b16a-2b194 Naked>                              Σ0         ↓ →0x2b1aa ←0x2b134
            <POP 2b16a-2b16c StackAdj>                       Δ-6                {[-6-]}
            <Call 0x2b16c 0x103f8>                                              {[-6-]}
                GetConsoleConfig() : Long
            <MI 2b172  MOVE.L  (A7)+,D0>                     Δ+4                {[-2-]}
            <POP 0x2b174 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]}
            <MI 2b17e  MOVE.W  D0,(A7)>                                         {[2, 'D0']}
            <Pointer.fp 0x2b180 <LVAR -0x004 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-4]}
            <Call 0x2b184 0x10212>                                              {[2, 'D0']|[@@-4]}
                KC09_PortStatus(Port : Word; VAR b: Byte)
            <POP 2b18a-2b18c StackAdj>                       Δ+6                {}
            <MI 2b18c  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 2b190  CMP.B   #0x01,D0>                                        {}
            <MI 2b192  BEQ     0x2b1aa>                                         {}
        <POP 2b194-2b1aa Naked>                              Σ0         
            <MI 2b194  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x2b198 0x28c58>                                              {[4, '(A6+0x8)']}
            <POP 2b19c-2b19e StackAdj>                       Δ+4                {}
            <POP 2b19e-2b1aa Bailout>                                           {}
                <MI 2b19e  MOVEA.L (A5+0x8),A7>                         
                <MI 2b1a2  MOVEA.W #0x00,A6>                            
                <MI 2b1a4  JMP     0x2c53c>                             
        <POP 2b1aa-2b1ba Naked>                              Σ0         ↓ →0x2b1d0 ←0x2b16a
            <POP 2b1aa-2b1ac StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2b1ac 0x103d4>                                              {[-2-]}
                ReadChar() : Byte
            <MI 2b1b2  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 2b1b4  CMPI.B  #0x07,D0>                                        {}
            <MI 2b1b8  BEQ     0x2b1d0>                                         {}
        <POP 2b1ba-2b1d0 Naked>                              Σ0         
            <MI 2b1ba  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <Call 0x2b1be 0x28c58>                                              {[4, '(A6+0x8)']}
            <POP 2b1c2-2b1c4 StackAdj>                       Δ+4                {}
            <POP 2b1c4-2b1d0 Bailout>                                           {}
                <MI 2b1c4  MOVEA.L (A5+0x8),A7>                         
                <MI 2b1c8  MOVEA.W #0x00,A6>                            
                <MI 2b1ca  JMP     0x2c53c>                             
        <POP 2b1d0-2b1d8 Epilogue>                           Σ0         ←0x2b1aa

0x2b1d8


@ 2b1d8
    <POP 2b1d8-2b1f8 Body>                                              
        <POP 2b1d8-2b1ea Prologue>                           Σ0         ↓
        <POP 2b1ea-2b1f4 Naked>                              Σ0         ↓
            <Const 0x2b1ea 0xc8.4>                           Δ-4                {[##200]}
            <Call 0x2b1ee 0x29b20>                                              {[##200]}
            <POP 2b1f2-2b1f4 StackAdj>                       Δ+4                {}
        <POP 2b1f4-2b1f8 Epilogue>                           Σ0         

0x2b1f8


@ 2b1f8
        <LVAR  0x008 4(r)>
        <LVAR -0x00c @ 4(r)>
    <POP 2b1f8-2b2a4 Body>                                              
        <POP 2b1f8-2b20e Prologue>                           Σ0         ↓
        <POP 2b20e-2b212 RegCacheLoad>                       Σ0         ↓
        <POP 2b212-2b226 Naked>                              Σ0 Δ-4     ↓
            <Pointer.fp 0x2b212 <LVAR -0x00c @ 4(r)>>        Δ-4                {[@@-12]}
            <Call 0x2b214 0x102b8>                                              {[@@-12]}
                NewString(VAR a : String)
            <MI 2b21a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[@@-12]|[4, '(A6+0x8)']}
            <Call 0x2b21e 0x290a6>                                              {[@@-12]|[4, '(A6+0x8)']}
            <POP 2b222-2b224 StackAdj>                       Δ+4                {[@@-12]}
            <MI 2b224  MOVEQ.L #0x01,D7>                                        {[@@-12]}
        <POP 2b226-2b22a Naked>                              Σ-4        ↓ →0x2b294 ←0x2b290
            <MI 2b226  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2b228  BGT     0x2b294>                                         {[-4-]}
        <POP 2b22a-2b23c Naked>                              Σ-4        ↓ →0x2b25c
            <POP 2b22a-2b22c StackAdj>                       Δ-4                {[-8-]}
            <MI 2b22c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x8)']}
            <MI 2b230  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
            <Call 0x2b232 0x29a30>                                              {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
            <POP 2b236-2b238 StackAdj>                       Δ+8                {[-8-]}
            <MI 2b238  MOVE.L  (A7)+,D6>                     Δ+4                {[-4-]}
            <MI 2b23a  BLT     0x2b25c>                                         {[-4-]}
        <POP 2b23c-2b244 Naked>                              Σ-4        ↓ →0x2b25c
            <MI 2b23c  CMPI.L  #0x000000ff,D6>                                  {[-4-]}
            <MI 2b242  BGT     0x2b25c>                                         {[-4-]}
        <POP 2b244-2b25c Naked>                              Σ-4        →0x2b290
            <MI 2b244  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0xc)']}
            <POP 0x2b246 LimitCheck 0x0 ≤ D6 ≤ 0xff>                            {[-4-]|[4, '(A6-0xc)']}
            <MI 2b250  MOVE.B  D6,-(A7)>                     Δ-2                {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
            <Call 0x2b252 0x102c0>                                              {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
                AppendChar(MOD b : String; a : char)
            <POP 2b258-2b25a StackAdj>                       Δ+6                {[-4-]}
            <MI 2b25a  BRA     0x2b290>                                         {[-4-]}
        <POP 2b25c-2b290 Naked>                              Σ-4        ↓ ←0x2b22a ←0x2b23c
            <Pointer.fp 0x2b25c <LVAR -0x00c @ 4(r)>>        Δ-4                {[-4-]|[@@-12]}
            <Call 0x2b25e 0x102bc>                                              {[-4-]|[@@-12]}
                FreeString(VAR a : String)
            <POP 2b264-2b266 StackAdj>                       Δ+4                {[-4-]}
            <Blob 0x2b266 [28] @>                            Δ-28               {[-4-]|[«28""»]}
            <POP 2b272-2b274 StackAdj>                       Δ-4                {[-4-]|[«28""»]|[-4-]}
            <Lit 0x2b274 28>                                                    {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
            <Call 0x2b288 0x28c9a>                                              {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
            <POP 2b28c-2b290 StackAdj>                       Δ+32               {[-4-]}
        <POP 2b290-2b294 Naked>                              Σ-4        ↓ →0x2b226 ←0x2b244
            <MI 2b290  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 2b292  BVC     0x2b226>                                         {[-4-]}
        <POP 2b294-2b29c Naked>                              Σ-4 Δ+4    ↓ ←0x2b226
            <MI 2b294  MOVE.L  (A6-0xc),(A7)>                                   {[4, '(A6-0xc)']}
            <Call 0x2b296 0x29a64>                                              {[4, '(A6-0xc)']}
            <POP 2b29a-2b29c StackAdj>                       Δ+4                {}
        <POP 2b29c-2b2a4 Epilogue>                           Σ0         

0x2b2a4


@ 2b2a4
        <LVAR  0x00c 1(rw)>
        <LVAR  0x008 4(r)>
    <POP 2b2a4-2b35c Body>                                   Δ-8        
        <POP 2b2a4-2b2ba Prologue>                           Σ0         ↓
        <POP 2b2ba-2b2ca Naked>                              Σ0 Δ-4     ↓
            <MI 2b2ba  CLR.B   (A6+0xc)>                                        {}
            <MI 2b2be  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2b2c2  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2b2c4  MOVEQ.L #0x00,D0>                                        {[4, 'A0']}
            <MI 2b2c6  ADDQ.W  #0x1,D0>                                         {[4, 'A0']}
            <MI 2b2c8  MOVE.B  D0,D6>                                           {[4, 'A0']}
        <POP 2b2ca-2b2d2 Naked>                              Σ-4        ↓ →0x2b352 ←0x2b34c
            <MI 2b2ca  CMPI.B  #0x2b,D6>                                        {[-4-]}
            <MI 2b2ce  BGT     0x2b352>                                         {[-4-]}
        <POP 2b2d2-2b2f8 Naked>                              Σ-4        ↓ →0x2b34c
            <MI 2b2d2  LEA.L   0x28b86,A0>                                      {[-4-]}
            <MI 2b2d6  MOVE.B  D6,D0>                                           {[-4-]}
            <MI 2b2d8  EXTB.W  D0>                                              {[-4-]}
            <MI 2b2da  EXTW.L  D0>                                              {[-4-]}
            <MI 2b2dc  ROR.L   #0x1,D0>                                         {[-4-]}
            <MI 2b2de  ADDA.W  D0,A0>                                           {[-4-]}
            <MI 2b2e0  SWAP.W  D0>                                              {[-4-]}
            <MI 2b2e2  ROL.W   #0x3,D0>                                         {[-4-]}
            <MI 2b2e4  CLR.L   D1>                                              {[-4-]}
            <MI 2b2e6  MOVE.B  (A0),D1>                                         {[-4-]}
            <MI 2b2e8  LSL.B   D0,D1>                                           {[-4-]}
            <MI 2b2ea  LSR.B   #0x4,D1>                                         {[-4-]}
            <MI 2b2ec  MOVE.L  D1,D5>                                           {[-4-]}
            <MI 2b2ee  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 2b2f0  MOVE.W  (A0),D0>                                         {[-4-]}
            <MI 2b2f2  EXTW.L  D0>                                              {[-4-]}
            <MI 2b2f4  CMP.L   D0,D5>                                           {[-4-]}
            <MI 2b2f6  BNE     0x2b34c>                                         {[-4-]}
        <POP 2b2f8-2b2fc Naked>                              Σ-4 Δ-4    ↓
            <MI 2b2f8  MOVE.L  D5,-(A7)>                     Δ-4                {[-4-]|[4, 'D5']}
            <MI 2b2fa  MOVEQ.L #0x01,D7>                                        {[-4-]|[4, 'D5']}
        <POP 2b2fc-2b300 Naked>                              Σ-8        ↓ →0x2b342 ←0x2b33e
            <MI 2b2fc  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2b2fe  BGT     0x2b342>                                         {[-8-]}
        <POP 2b300-2b33a Naked>                              Σ-8        ↓ →0x2b33e
            <MI 2b300  MOVE.B  D6,D0>                                           {[-8-]}
            <MI 2b302  EXTB.W  D0>                                              {[-8-]}
            <MI 2b304  MULS.W  #0xa,D0>                                         {[-8-]}
            <MI 2b308  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 2b30a  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x2b30c LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-8-]}
            <MI 2b316  MOVEA.L (A7+0x4),A0>                                     {[-8-]}
            <MI 2b31a  LEA.L   0x289ce,A1>                                      {[-8-]}
            <MI 2b31e  MOVE.L  D7,D2>                                           {[-8-]}
            <MI 2b320  SUBQ.L  #0x1,D2>                                         {[-8-]}
            <POP 0x2b322 LimitCheck 0x0 ≤ D2 ≤ 0x9>                             {[-8-]}
            <MI 2b32c  LEA.L   (A1+D0.W),A1>                                    {[-8-]}
            <MI 2b330  MOVE.B  (A0+D1.L+#0x2),D0>                               {[-8-]}
            <MI 2b334  CMP.B   (A1+D2.L),D0>                                    {[-8-]}
            <MI 2b338  BEQ     0x2b33e>                                         {[-8-]}
        <POP 2b33a-2b33e Naked>                              Σ-8 Δ+4    →0x2b34c
            <POP 2b33a-2b33c StackAdj>                       Δ+4                {[-4-]}
            <MI 2b33c  BRA     0x2b34c>                                         {[-4-]}
        <POP 2b33e-2b342 Naked>                              Σ-8        ↓ →0x2b2fc ←0x2b300
            <MI 2b33e  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2b340  BVC     0x2b2fc>                                         {[-8-]}
        <POP 2b342-2b34c Naked>                              Σ-8 Δ+8    →0x2b354 ←0x2b2fc
            <POP 2b342-2b344 StackAdj>                       Δ+4                {[-4-]}
            <MI 2b344  MOVE.B  D6,(A6+0xc)>                                     {[-4-]}
            <POP 2b348-2b34a StackAdj>                       Δ+4                {}
            <MI 2b34a  BRA     0x2b354>                                         {}
        <POP 2b34c-2b352 Naked>                              Σ-4        ↓ →0x2b2ca ←0x2b2d2 ←0x2b33a
            <MI 2b34c  ADDQ.B  #0x1,D6>                                         {[-4-]}
            <MI 2b34e  BVC     0x2b2ca>                                         {[-4-]}
        <POP 2b352-2b354 Naked>                              Σ-4 Δ+4    ↓ ←0x2b2ca
            <POP 2b352-2b354 StackAdj>                       Δ+4                {}
        <POP 2b354-2b35c Epilogue>                           Σ0         ←0x2b342

0x2b35c


@ 2b35c
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x006 @ 4(w)>
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x00c @ 4(r)>
        <LVAR -0x010 @ 4(rw)>
    <POP 2b35c-2b498 Body>                                              
        <POP 2b35c-2b372 Prologue>                           Σ0         ↓
        <POP 2b372-2b380 RegCacheLoad>                       Σ0         ↓
        <POP 2b380-2b3ec Naked>                              Σ0         ↓ →0x2b436
            <POP 2b380-2b382 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b382  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <Call 0x2b386 0x102cc>                                              {[-4-]|[4, '(A6+0xc)']}
                StringDup(a : String) : String
            <POP 2b38c-2b38e StackAdj>                       Δ+4                {[-4-]}
            <MI 2b38e  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {}
            <MI 2b390  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x10)']}
            <Const 0x2b392 0x2e.2>                           Δ-2                {[4, '(A6-0x10)']|[#46]}
            <Call 0x2b396 0x102c0>                                              {[4, '(A6-0x10)']|[#46]}
                AppendChar(MOD b : String; a : char)
            <POP 2b39c-2b39e StackAdj>                       Δ+6                {}
            <Blob 0x2b39e [10] 0x2f1fa>                      Δ-10               {[«10»]}
            <POP 2b3ac-2b3ae StackAdj>                       Δ-4                {[«10»]|[-4-]}
            <MI 2b3ae  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[«10»]|[-4-]|[4, '(A6-0x10)']}
            <POP 2b3b0-2b3b2 StackAdj>                       Δ-4                {[«10»]|[-4-]|[4, '(A6-0x10)']|[-4-]}
            <Lit 0x2b3b2>                                                       {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
                <Pointer.sp 0x2b3b2 12>                      Δ-4        
                <Const 0x2b3b6 0x1.2>                        Δ-2        
                <Const 0x2b3b8 0xa.2>                        Δ-2        
                <Call 0x2b3bc 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2b3c2-2b3c4 StackAdj>                   Δ+8        
            <Call 0x2b3c4 0x102d0>                                              {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
                StringCat2(a, b : String) : String
            <POP 2b3ca-2b3cc StackAdj>                       Δ+8                {[«10»]|[-4-]}
            <MI 2b3cc  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[«10»]}
            <POP 2b3ce-2b3d0 StackAdj>                       Δ+6                {[-4-]}
            <MI 2b3d0  MOVE.L  (A6-0x10),(A7)>                                  {[4, '(A6-0x10)']}
            <MI 2b3d2  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0x10)']|[#0]}
            <Const 0x2b3d4 0x1.2>                            Δ-2                {[4, '(A6-0x10)']|[#0]|[#1]}
            <Const 0x2b3d6 0x0.4>                            Δ-4                {[4, '(A6-0x10)']|[#0]|[#1]|[##0]}
            <Pointer.fp 0x2b3da <LVAR -0x002 @ 1(r)>>        Δ-4                {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]}
            <Pointer.fp 0x2b3dc <LVAR -0x00c @ 4(r)>>        Δ-4                {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
            <Call 0x2b3de 0x10380>                                              {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 2b3e4-2b3e8 StackAdj>                       Δ+20               {}
            <MI 2b3e8  TST.B   (A6-0x2)>                                        {}
            <MI 2b3ea  BEQ     0x2b436>                                         {}
        <POP 2b3ec-2b436 Naked>                              Σ0         ↓
            <Pointer.fp 0x2b3ec <LVAR -0x010 @ 4(rw)>>       Δ-4                {[@@-16]}
            <Call 0x2b3ee 0x102bc>                                              {[@@-16]}
                FreeString(VAR a : String)
            <MI 2b3f4  MOVE.L  (A6+0x8),(A7)>                                   {[4, '(A6+0x8)']}
            <Call 0x2b3f8 0x28c58>                                              {[4, '(A6+0x8)']}
            <POP 2b3fc-2b3fd StackAdj>                       Δ+4        ↓       {}
            <Blob 0x2b3fd [26] @>                            Δ-26               {[«26""»]}
            <POP 2b40e-2b410 StackAdj>                       Δ-8                {[«26""»]|[-8-]}
            <Lit 0x2b410 25>                                                    {[«26""»]|[-4-]|[$$Not a command or macro :_]}
            <POP 2b420-2b422 StackAdj>                       Δ-4                {[«26""»]|[-4-]|[$$Not a command or macro :_]|[-4-]}
            <MI 2b422  MOVE.L  (A6+0xc),(A7)>                                   {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
            <Call 0x2b426 0x102d0>                                              {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
                StringCat2(a, b : String) : String
            <POP 2b42c-2b42e StackAdj>                       Δ+8                {[«26""»]|[-4-]}
            <Call 0x2b42e 0x28c9a>                                              {[«26""»]|[-4-]}
            <POP 2b432-2b436 StackAdj>                       Δ+30               {}
        <POP 2b436-2b43e Naked>                              Σ0         ↓ ←0x2b380
            <MI 2b436  MOVE.L  0x2f1e8,(A6-0x6)>                                {}
        <POP 2b43e-2b456 Naked>                              Σ0         ↓ →0x2b46a ←0x2b46a
            <MI 2b43e  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[4, '(A6-0xc)']}
            <Pointer.fp 0x2b440 <LVAR -0x010 @ 4(rw)>>       Δ-4                {[4, '(A6-0xc)']|[@@-16]}
            <Pointer.fp 0x2b442 <LVAR -0x008 @ 1(r)>>        Δ-4                {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
            <Call 0x2b446 0x1043c>                                              {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
                FileReadLine(file : File; VAR a : String; VAR b : Byte)
            <POP 2b44c-2b450 StackAdj>                       Δ+12               {}
            <MI 2b450  MOVEA.L (A6-0x10),A0>                                    {}
            <MI 2b452  TST.W   (A0)>                                            {}
            <MI 2b454  BEQ     0x2b46a>                                         {}
        <POP 2b456-2b46a Naked>                              Σ0         ↓
            <MI 2b456  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x10)']}
            <Call 0x2b458 0x28ef2>                                              {[4, '(A6-0x10)']}
            <POP 2b45c-2b45e StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2b45e <LVAR -0x006 @ 4(w)>>        Δ-4                {[@@-6]}
            <MI 2b462  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[@@-6]|[4, '(A6-0x10)']}
            <Call 0x2b464 0x29278>                                              {[@@-6]|[4, '(A6-0x10)']}
            <POP 2b468-2b46a StackAdj>                       Δ+8                {}
        <POP 2b46a-2b470 Naked>                              Σ0         ↓ →0x2b43e ←0x2b43e
            <MI 2b46a  TST.B   (A6-0x8)>                                        {}
            <MI 2b46e  BEQ     0x2b43e>                                         {}
        <POP 2b470-2b490 Naked>                              Σ0         ↓
            <MI 2b470  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2b472 0x1.2>                            Δ-2                {[#0]|[#1]}
            <Const 0x2b474 0x1.4>                            Δ-4                {[#0]|[#1]|[##1]}
            <Pointer.fp 0x2b478 <LVAR -0x002 @ 1(r)>>        Δ-4                {[#0]|[#1]|[##1]|[@@-2]}
            <Pointer.fp 0x2b47a <LVAR -0x00c @ 4(r)>>        Δ-4                {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
            <Call 0x2b47c 0x1038c>                                              {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 2b482-2b486 StackAdj>                       Δ+16               {}
            <Pointer.fp 0x2b486 <LVAR -0x010 @ 4(rw)>>       Δ-4                {[@@-16]}
            <Call 0x2b488 0x102bc>                                              {[@@-16]}
                FreeString(VAR a : String)
            <POP 2b48e-2b490 StackAdj>                       Δ+4                {}
        <POP 2b490-2b498 Epilogue>                           Σ0         

0x2b498


@ 2b498
        <LVAR  0x014 1(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 2b498-2b4d8 Body>                                              
        <POP 2b498-2b4ae Prologue>                           Σ0         ↓
        <POP 2b4ae-2b4d0 Naked>                              Σ0         ↓
            <MI 2b4ae  MOVE.L  (A6+0xc),D0>                                     {}
            <MI 2b4b2  ADD.L   (A6+0x8),D0>                                     {}
            <MI 2b4b6  SUBQ.L  #0x1,D0>                                         {}
            <MI 2b4b8  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x2b4ba LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {}
            <MI 2b4c4  LEA.L   0x2e1e0,A0>                                      {}
            <MI 2b4ca  MOVE.B  (A0+D0.L+#0x8),(A6+0x14)>                        {}
        <POP 2b4d0-2b4d8 Epilogue>                           Σ0         

0x2b4d8


@ 2b4d8
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x008 @ 4(r)>
    <POP 2b4d8-2b554 Body>                                              
        <POP 2b4d8-2b4ee Prologue>                           Σ0         ↓
        <POP 2b4ee-2b516 Naked>                              Σ0         ↓ →0x2b546
            <POP 2b4ee-2b4f0 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b4f0  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 2b4f4  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2b4f8 0x29946>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2b4fc-2b4fe StackAdj>                       Δ+8                {[-4-]}
            <Pointer.fp 0x2b4fe <LVAR -0x004 @ 1(r)>>        Δ-4                {[-4-]|[@@-4]}
            <Pointer.fp 0x2b502 <LVAR -0x008 @ 4(r)>>        Δ-4                {[-4-]|[@@-4]|[@@-8]}
            <Call 0x2b506 0x102ec>                                              {[-4-]|[@@-4]|[@@-8]}
                String2Long(src : String; VAR status : Bool; VAR retval : Long)
            <POP 2b50c-2b510 StackAdj>                       Δ+12               {}
            <MI 2b510  TST.B   (A6-0x4)>                                        {}
            <MI 2b514  BNE     0x2b546>                                         {}
        <POP 2b516-2b546 Naked>                              Σ0         ↓
            <Blob 0x2b516 [24] @>                            Δ-24               {[«24""»]}
            <POP 2b528-2b52a StackAdj>                       Δ-4                {[«24""»]|[-4-]}
            <Lit 0x2b52a 23>                                                    {[«24""»]|[$$Illegal marker argument]}
            <Call 0x2b53e 0x28c9a>                                              {[«24""»]|[$$Illegal marker argument]}
            <POP 2b542-2b546 StackAdj>                       Δ+28               {}
        <POP 2b546-2b54c Naked>                              Σ0         ↓ ←0x2b4ee
            <MI 2b546  MOVE.L  (A6-0x8),(A6+0x10)>                              {}
        <POP 2b54c-2b554 Epilogue>                           Σ0         

0x2b554


@ 2b554
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x010 4(rw)>
        <LVAR -0x014 4(rw)>
        <LVAR -0x018 4(w)>
        <LVAR -0x020 4(rw)>
    <POP 2b554-2b67c Body>                                              
        <POP 2b554-2b56a Prologue>                           Σ0         ↓
        <POP 2b56a-2b57a RegCacheLoad>                       Σ0         ↓
        <POP 2b57a-2b594 Naked>                              Σ0 Δ-4     ↓
            <MI 2b57a  MOVEQ.L #0x00,D7>                                        {}
            <MI 2b57c  MOVE.L  (A6+0x14),(A6-0x20)>                             {}
            <MI 2b580  MOVE.L  0x2f1e8,D0>                                      {}
            <MI 2b586  SUB.L   (A6+0x14),D0>                                    {}
            <MI 2b58a  MOVE.L  D0,(A6-0x14)>                                    {}
            <MI 2b58c  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <MI 2b590  MOVE.L  (A6+0x10),D5>                                    {[4, '(A6+0xc)']}
        <POP 2b594-2b598 Naked>                              Σ-4        ↓ →0x2b5c4 ←0x2b5c0
            <MI 2b594  CMP.L   (A7),D5>                                         {[-4-]}
            <MI 2b596  BGT     0x2b5c4>                                         {[-4-]}
        <POP 2b598-2b5be Naked>                              Σ-4        ↓ →0x2b5c0
            <POP 2b598-2b59a StackAdj>                       Δ-8                {[-12-]}
            <MI 2b59a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0x8)']}
            <MI 2b59e  MOVE.L  D5,-(A7)>                     Δ-4                {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
            <Call 0x2b5a0 0x298e4>                                              {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
            <POP 2b5a4-2b5a6 StackAdj>                       Δ+8                {[-12-]}
            <MI 2b5a6  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[-8-]}
            <MI 2b5a8  MOVE.L  (A7),(A6-0xc)>                                   {[-8-]}
            <MI 2b5aa  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0xc)']}
            <MI 2b5ac  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <Call 0x2b5ae 0x298ac>                                              {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <POP 2b5b2-2b5b4 StackAdj>                       Δ+8                {[-8-]}
            <MI 2b5b4  MOVE.L  (A7)+,D6>                     Δ+4                {[-4-]}
            <MI 2b5b6  ADD.L   D6,D7>                                           {[-4-]}
            <MI 2b5b8  CMP.L   (A6+0xc),D5>                                     {[-4-]}
            <MI 2b5bc  BGE     0x2b5c0>                                         {[-4-]}
        <POP 2b5be-2b5c0 Naked>                              Σ-4        ↓
            <MI 2b5be  ADDQ.L  #0x1,D7>                                         {[-4-]}
        <POP 2b5c0-2b5c4 Naked>                              Σ-4        ↓ →0x2b594 ←0x2b598
            <MI 2b5c0  ADDQ.L  #0x1,D5>                                         {[-4-]}
            <MI 2b5c2  BVC     0x2b594>                                         {[-4-]}
        <POP 2b5c4-2b5d2 Naked>                              Σ-4 Δ+4    ↓ →0x2b5de ←0x2b594
            <POP 2b5c4-2b5c6 StackAdj>                       Δ+4                {}
            <MI 2b5c6  MOVE.L  (A6-0x20),D0>                                    {}
            <MI 2b5c8  ADD.L   (A6-0x14),D0>                                    {}
            <MI 2b5ca  MOVE.L  D0,(A6-0x18)>                                    {}
            <MI 2b5ce  CMP.L   (A6-0x14),D7>                                    {}
            <MI 2b5d0  BEQ     0x2b5de>                                         {}
        <POP 2b5d2-2b5de Naked>                              Σ0         ↓
            <MI 2b5d2  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2b5d4  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, 'D0']|[4, '(A6-0x14)']}
            <MI 2b5d6  SUB.L   D7,(A7)>                                         {[4, 'D0']|[-4-]}
            <Call 0x2b5d8 0x291ee>                                              {[4, 'D0']|[-4-]}
            <POP 2b5dc-2b5de StackAdj>                       Δ+8                {}
        <POP 2b5de-2b5e6 Naked>                              Σ0 Δ-4     ↓ ←0x2b5c4
            <MI 2b5de  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <MI 2b5e2  MOVE.L  (A6+0x10),D5>                                    {[4, '(A6+0xc)']}
        <POP 2b5e6-2b5ec Naked>                              Σ-4        ↓ →0x2b672 ←0x2b66c
            <MI 2b5e6  CMP.L   (A7),D5>                                         {[-4-]}
            <MI 2b5e8  BGT     0x2b672>                                         {[-4-]}
        <POP 2b5ec-2b60e Naked>                              Σ-4 Δ-4    ↓
            <POP 2b5ec-2b5ee StackAdj>                       Δ-8                {[-12-]}
            <MI 2b5ee  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0x8)']}
            <MI 2b5f2  MOVE.L  D5,-(A7)>                     Δ-4                {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
            <Call 0x2b5f4 0x298e4>                                              {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
            <POP 2b5f8-2b5fa StackAdj>                       Δ+8                {[-12-]}
            <MI 2b5fa  MOVE.L  (A7)+,(A6-0x10)>              Δ+4                {[-8-]}
            <MI 2b5fc  MOVE.L  (A7),(A6-0xc)>                                   {[-8-]}
            <MI 2b5fe  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0xc)']}
            <MI 2b600  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <Call 0x2b602 0x298ac>                                              {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <POP 2b606-2b608 StackAdj>                       Δ+8                {[-8-]}
            <MI 2b608  MOVE.L  (A7)+,D6>                     Δ+4                {[-4-]}
            <MI 2b60a  MOVE.L  D6,-(A7)>                     Δ-4                {[-4-]|[4, 'D6']}
            <MI 2b60c  MOVEQ.L #0x01,D0>                                        {[-4-]|[4, 'D6']}
        <POP 2b60e-2b612 Naked>                              Σ-8        ↓ →0x2b642 ←0x2b612
            <MI 2b60e  CMP.L   (A7),D0>                                         {[-8-]}
            <MI 2b610  BGT     0x2b642>                                         {[-8-]}
        <POP 2b612-2b642 Naked>                              Σ-8        ↓ →0x2b60e
            <MI 2b612  MOVE.L  (A6-0x20),D1>                                    {[-8-]}
            <MI 2b614  ADD.L   D0,D1>                                           {[-8-]}
            <MI 2b616  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <MI 2b618  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x2b61a LimitCheck 0x0 ≤ D1 ≤ 0xfff>                           {[-8-]}
            <MI 2b624  LEA.L   0x2e1e0,A0>                                      {[-8-]}
            <POP 2b62a-2b62c StackAdj>                       Δ-2                {[-10-]}
            <MI 2b62c  MOVE.L  (A6-0xc),-(A7)>               Δ-4                {[-10-]|[4, '(A6-0xc)']}
            <MI 2b62e  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <MI 2b630  MOVE.L  D0,-(A7)>                     Δ-4                {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
            <Call 0x2b632 0x2b498>                                              {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
            <POP 2b636-2b63a StackAdj>                       Δ+12               {[-10-]}
            <MI 2b63a  MOVE.B  (A7)+,(A0+D1.L+#0x8)>         Δ+2                {[-8-]}
            <MI 2b63e  ADDQ.L  #0x1,D0>                                         {[-8-]}
            <MI 2b640  BVC     0x2b60e>                                         {[-8-]}
        <POP 2b642-2b64a Naked>                              Σ-8 Δ+4    ↓ →0x2b66c ←0x2b60e
            <POP 2b642-2b644 StackAdj>                       Δ+4                {[-4-]}
            <MI 2b644  CMP.L   (A6+0xc),D5>                                     {[-4-]}
            <MI 2b648  BGE     0x2b66c>                                         {[-4-]}
        <POP 2b64a-2b66c Naked>                              Σ-4        ↓
            <MI 2b64a  MOVE.L  (A6-0x20),D0>                                    {[-4-]}
            <MI 2b64c  ADD.L   D6,D0>                                           {[-4-]}
            <MI 2b64e  MOVE.L  D0,D1>                                           {[-4-]}
            <MI 2b650  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x2b652 LimitCheck 0x0 ≤ D1 ≤ 0xfff>                           {[-4-]}
            <MI 2b65c  LEA.L   0x2e1e0,A0>                                      {[-4-]}
            <MI 2b662  MOVE.B  #0x2c,(A0+D1.L+#0x8)>                            {[-4-]}
            <MI 2b668  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 2b66a  MOVE.L  D0,(A6-0x20)>                                    {[-4-]}
        <POP 2b66c-2b672 Naked>                              Σ-4        ↓ →0x2b5e6 ←0x2b642
            <MI 2b66c  ADDQ.L  #0x1,D5>                                         {[-4-]}
            <MI 2b66e  BVC     0x2b5e6>                                         {[-4-]}
        <POP 2b672-2b674 Naked>                              Σ-4 Δ+4    ↓ ←0x2b5e6
            <POP 2b672-2b674 StackAdj>                       Δ+4                {}
        <POP 2b674-2b67c Epilogue>                           Σ0         

0x2b67c


@ 2b67c
        <LVAR  0x018 4(rw)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 4(rw)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x018 4(w)>
    <POP 2b67c-2b772 Body>                                   Δ-12       
        <POP 2b67c-2b692 Prologue>                           Σ0         ↓
        <POP 2b692-2b6a8 RegCacheLoad>                       Σ0         ↓
        <POP 2b6a8-2b6d2 Naked>                              Σ0 Δ-4     ↓
            <POP 2b6a8-2b6aa StackAdj>                       Δ-4                {[-4-]}
            <MI 2b6aa  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']}
            <MI 2b6ac  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <Call 0x2b6ae 0x298ac>                                              {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <POP 2b6b2-2b6b4 StackAdj>                       Δ+8                {[-4-]}
            <MI 2b6b4  MOVE.L  (A7),(A6-0xc)>                                   {[-4-]}
            <MI 2b6b6  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 2b6ba  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2b6be 0x298ac>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2b6c2-2b6c4 StackAdj>                       Δ+8                {[-4-]}
            <MI 2b6c4  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {}
            <MI 2b6c6  ADDQ.L  #0x1,(A6-0x8)>                                   {}
            <MI 2b6c8  MOVE.L  (A6-0xc),D0>                                     {}
            <MI 2b6ca  SUB.L   (A6-0x8),D0>                                     {}
            <MI 2b6cc  ADDQ.L  #0x1,D0>                                         {}
            <MI 2b6ce  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2b6d0  MOVEQ.L #0x01,D0>                                        {[4, 'D0']}
        <POP 2b6d2-2b6d8 Naked>                              Σ-4        ↓ →0x2b764 ←0x2b75c
            <MI 2b6d2  CMP.L   (A7),D0>                                         {[-4-]}
            <MI 2b6d4  BGT     0x2b764>                                         {[-4-]}
        <POP 2b6d8-2b6e4 Naked>                              Σ-4 Δ-8    ↓
            <MI 2b6d8  MOVE.L  D0,(A6-0x18)>                                    {[-4-]}
            <MI 2b6dc  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <MI 2b6de  MOVEQ.L #0x00,D6>                                        {[-4-]|[4, 'D0']}
            <MI 2b6e0  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
            <MI 2b6e2  MOVEQ.L #0x01,D5>                                        {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
        <POP 2b6e4-2b6e8 Naked>                              Σ-12       ↓ →0x2b72a ←0x2b724
            <MI 2b6e4  CMP.L   (A7),D5>                                         {[-12-]}
            <MI 2b6e6  BGT     0x2b72a>                                         {[-12-]}
        <POP 2b6e8-2b6f0 Naked>                              Σ-12       ↓ →0x2b6f4
            <MI 2b6e8  CMPI.L  #0x00000001,D5>                                  {[-12-]}
            <MI 2b6ee  BNE     0x2b6f4>                                         {[-12-]}
        <POP 2b6f0-2b6f4 Naked>                              Σ-12       →0x2b708
            <MI 2b6f0  MOVEQ.L #0x2f,D7>                                        {[-12-]}
            <MI 2b6f2  BRA     0x2b708>                                         {[-12-]}
        <POP 2b6f4-2b708 Naked>                              Σ-12       ↓ ←0x2b6e8
            <POP 2b6f4-2b6f6 StackAdj>                       Δ-2                {[-14-]}
            <MI 2b6f6  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-14-]|[4, '(A6+0xc)']}
            <MI 2b6fa  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <MI 2b6fe  MOVE.L  D5,-(A7)>                     Δ-4                {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D5']}
            <MI 2b700  SUBQ.L  #0x1,(A7)>                                       {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
            <Call 0x2b702 0x2b498>                                              {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
            <POP 2b704-2b706 StackAdj>                       Δ+12               {[-14-]}
            <MI 2b706  MOVE.B  (A7)+,D7>                     Δ+2                {[-12-]}
        <POP 2b708-2b720 Naked>                              Σ-12       ↓ →0x2b724 ←0x2b6f0
            <POP 2b708-2b70a StackAdj>                       Δ-2                {[-14-]}
            <MI 2b70a  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-14-]|[4, '(A6+0x14)']}
            <MI 2b70c  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b70e  MOVE.L  (A7+0xe),D0>                                     {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b712  ADD.L   D5,D0>                                           {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b714  SUBQ.L  #0x1,D0>                                         {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b716  MOVE.L  D0,-(A7)>                     Δ-4                {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
            <Call 0x2b718 0x2b498>                                              {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
            <POP 2b71a-2b71c StackAdj>                       Δ+12               {[-14-]}
            <MI 2b71c  CMP.B   (A7)+,D7>                     Δ+2                {[-12-]}
            <MI 2b71e  BEQ     0x2b724>                                         {[-12-]}
        <POP 2b720-2b724 Naked>                              Σ-12 Δ+4   →0x2b72c
            <POP 2b720-2b722 StackAdj>                       Δ+4                {[-8-]}
            <MI 2b722  BRA     0x2b72c>                                         {[-8-]}
        <POP 2b724-2b72a Naked>                              Σ-12       ↓ →0x2b6e4 ←0x2b708
            <MI 2b724  MOVE.L  D5,D6>                                           {[-12-]}
            <MI 2b726  ADDQ.L  #0x1,D5>                                         {[-12-]}
            <MI 2b728  BVC     0x2b6e4>                                         {[-12-]}
        <POP 2b72a-2b72c Naked>                              Σ-12 Δ+4   ↓ ←0x2b6e4
            <POP 2b72a-2b72c StackAdj>                       Δ+4                {[-8-]}
        <POP 2b72c-2b730 Naked>                              Σ-8        ↓ →0x2b75c ←0x2b720
            <MI 2b72c  CMP.L   (A6-0x8),D6>                                     {[-8-]}
            <MI 2b72e  BNE     0x2b75c>                                         {[-8-]}
        <POP 2b730-2b73c Naked>                              Σ-8        ↓ →0x2b73e
            <MI 2b730  MOVE.L  (A7),D0>                                         {[-8-]}
            <MI 2b732  MOVE.L  D0,(A6+0x18)>                                    {[-8-]}
            <MI 2b736  ADD.L   (A6-0x8),D0>                                     {[-8-]}
            <MI 2b738  CMP.L   (A6-0xc),D0>                                     {[-8-]}
            <MI 2b73a  BLT     0x2b73e>                                         {[-8-]}
        <POP 2b73c-2b73e Naked>                              Σ-8        →0x2b758
            <MI 2b73c  BRA     0x2b758>                                         {[-8-]}
        <POP 2b73e-2b752 Naked>                              Σ-8        ↓ →0x2b758 ←0x2b730
            <POP 2b73e-2b740 StackAdj>                       Δ-2                {[-10-]}
            <MI 2b740  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-10-]|[4, '(A6+0x14)']}
            <MI 2b742  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b744  MOVE.L  D0,-(A7)>                     Δ-4                {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
            <Call 0x2b746 0x2b498>                                              {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
            <POP 2b748-2b74a StackAdj>                       Δ+12               {[-10-]}
            <MI 2b74a  MOVE.B  (A7)+,D7>                     Δ+2                {[-8-]}
            <MI 2b74c  CMPI.B  #0x2f,D7>                                        {[-8-]}
            <MI 2b750  BEQ     0x2b758>                                         {[-8-]}
        <POP 2b752-2b758 Naked>                              Σ-8        ↓ →0x2b75c
            <MI 2b752  CMPI.B  #0x3d,D7>                                        {[-8-]}
            <MI 2b756  BNE     0x2b75c>                                         {[-8-]}
        <POP 2b758-2b75c Naked>                              Σ-8 Δ+8    →0x2b76a ←0x2b73c ←0x2b73e
            <POP 2b758-2b75a StackAdj>                       Δ+8                {}
            <MI 2b75a  BRA     0x2b76a>                                         {}
        <POP 2b75c-2b764 Naked>                              Σ-8 Δ+4    ↓ →0x2b6d2 ←0x2b72c ←0x2b752
            <MI 2b75c  MOVE.L  (A7)+,D0>                     Δ+4                {[-4-]}
            <MI 2b75e  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 2b760  BVC     0x2b6d2>                                         {[-4-]}
        <POP 2b764-2b76a Naked>                              Σ-4 Δ+4    ↓ ←0x2b6d2
            <POP 2b764-2b766 StackAdj>                       Δ+4                {}
            <MI 2b766  CLR.L   (A6+0x18)>                                       {}
        <POP 2b76a-2b772 Epilogue>                           Σ0         ←0x2b758

0x2b772


@ 2b772
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 2b772-2b806 Body>                                   Δ-4        
        <POP 2b772-2b788 Prologue>                           Σ0         ↓
        <POP 2b788-2b792 RegCacheLoad>                       Σ0         ↓
        <POP 2b792-2b7ac Naked>                              Σ0         ↓ →0x2b7fe
            <POP 2b792-2b794 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b794  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']}
            <MI 2b796  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b798  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2b79c  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2b7a0 0x2b67c>                                              {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2b7a4-2b7a8 StackAdj>                       Δ+16               {[-4-]}
            <MI 2b7a8  MOVE.L  (A7)+,D5>                     Δ+4                {}
            <MI 2b7aa  BLE     0x2b7fe>                                         {}
        <POP 2b7ac-2b7cc Naked>                              Σ0 Δ-4     ↓
            <MI 2b7ac  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[4, '(A6+0x18)']}
            <Const 0x2b7b0 0x2f.2>                           Δ-2                {[4, '(A6+0x18)']|[#47]}
            <Call 0x2b7b2 0x102c0>                                              {[4, '(A6+0x18)']|[#47]}
                AppendChar(MOD b : String; a : char)
            <POP 2b7b8-2b7ba StackAdj>                       Δ+6                {}
            <MI 2b7ba  MOVE.L  D5,D0>                                           {}
            <MI 2b7bc  ADDQ.L  #0x1,D0>                                         {}
            <POP 2b7be-2b7c0 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b7c0  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']}
            <MI 2b7c2  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <Call 0x2b7c4 0x298ac>                                              {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <POP 2b7c8-2b7ca StackAdj>                       Δ+8                {[-4-]}
            <MI 2b7ca  MOVE.L  D0,D6>                                           {[-4-]}
        <POP 2b7cc-2b7d0 Naked>                              Σ-4        ↓ →0x2b7fc ←0x2b7ea
            <MI 2b7cc  CMP.L   (A7),D6>                                         {[-4-]}
            <MI 2b7ce  BGT     0x2b7fc>                                         {[-4-]}
        <POP 2b7d0-2b7e6 Naked>                              Σ-4        ↓ →0x2b7ea
            <POP 2b7d0-2b7d2 StackAdj>                       Δ-2                {[-6-]}
            <MI 2b7d2  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-6-]|[4, '(A6+0x14)']}
            <MI 2b7d4  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b7d6  MOVE.L  D6,-(A7)>                     Δ-4                {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
            <Call 0x2b7d8 0x2b498>                                              {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
            <POP 2b7dc-2b7e0 StackAdj>                       Δ+12               {[-6-]}
            <MI 2b7e0  MOVE.B  (A7)+,D7>                     Δ+2                {[-4-]}
            <MI 2b7e2  CMP.B   #0x2f,D7>                                        {[-4-]}
            <MI 2b7e4  BNE     0x2b7ea>                                         {[-4-]}
        <POP 2b7e6-2b7ea Naked>                              Σ-4 Δ+4    →0x2b7fe
            <POP 2b7e6-2b7e8 StackAdj>                       Δ+4                {}
            <MI 2b7e8  BRA     0x2b7fe>                                         {}
        <POP 2b7ea-2b7fc Naked>                              Σ-4        ↓ →0x2b7cc ←0x2b7d0
            <MI 2b7ea  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x18)']}
            <MI 2b7ee  MOVE.B  D7,-(A7)>                     Δ-2                {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
            <Call 0x2b7f0 0x102c0>                                              {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
                AppendChar(MOD b : String; a : char)
            <POP 2b7f6-2b7f8 StackAdj>                       Δ+6                {[-4-]}
            <MI 2b7f8  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 2b7fa  BVC     0x2b7cc>                                         {[-4-]}
        <POP 2b7fc-2b7fe Naked>                              Σ-4 Δ+4    ↓ ←0x2b7cc
            <POP 2b7fc-2b7fe StackAdj>                       Δ+4                {}
        <POP 2b7fe-2b806 Epilogue>                           Σ0         ←0x2b792 ←0x2b7e6

0x2b806


@ 2b806
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 4(rw)>
        <LVAR -0x014 4(rw)>
    <POP 2b806-2b8bc Body>                                   Δ-8        
        <POP 2b806-2b81c Prologue>                           Σ0         ↓
        <POP 2b81c-2b82a RegCacheLoad>                       Σ0         ↓
        <POP 2b82a-2b846 Naked>                              Σ0         ↓ →0x2b8b4
            <POP 2b82a-2b82c StackAdj>                       Δ-4                {[-4-]}
            <MI 2b82c  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']}
            <MI 2b82e  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b830  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2b834  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2b838 0x2b67c>                                              {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2b83c-2b840 StackAdj>                       Δ+16               {[-4-]}
            <MI 2b840  MOVE.L  (A7)+,(A6-0x14)>              Δ+4                {}
            <MI 2b844  BLE     0x2b8b4>                                         {}
        <POP 2b846-2b85a Naked>                              Σ0 Δ-4     ↓
            <POP 2b846-2b848 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b848  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']}
            <MI 2b84a  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <Call 0x2b84c 0x298ac>                                              {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <POP 2b850-2b852 StackAdj>                       Δ+8                {[-4-]}
            <MI 2b852  MOVE.L  (A7)+,(A6-0x6)>               Δ+4                {}
            <MI 2b854  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <MI 2b856  MOVE.L  (A6-0x14),D5>                                    {[4, '(A6-0x6)']}
        <POP 2b85a-2b85e Naked>                              Σ-4        ↓ →0x2b8b2 ←0x2b8ae
            <MI 2b85a  CMP.L   (A7),D5>                                         {[-4-]}
            <MI 2b85c  BGT     0x2b8b2>                                         {[-4-]}
        <POP 2b85e-2b874 Naked>                              Σ-4        ↓ →0x2b8ae
            <POP 2b85e-2b860 StackAdj>                       Δ-2                {[-6-]}
            <MI 2b860  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-6-]|[4, '(A6+0x14)']}
            <MI 2b862  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b864  MOVE.L  D5,-(A7)>                     Δ-4                {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
            <Call 0x2b866 0x2b498>                                              {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
            <POP 2b86a-2b86c StackAdj>                       Δ+12               {[-6-]}
            <MI 2b86c  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 2b86e  CMPI.B  #0x3d,D0>                                        {[-4-]}
            <MI 2b872  BNE     0x2b8ae>                                         {[-4-]}
        <POP 2b874-2b87c Naked>                              Σ-4 Δ-4    ↓
            <MI 2b874  MOVE.L  D5,D0>                                           {[-4-]}
            <MI 2b876  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 2b878  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x6)']}
            <MI 2b87a  MOVE.L  D0,D6>                                           {[-4-]|[4, '(A6-0x6)']}
        <POP 2b87c-2b880 Naked>                              Σ-8        ↓ →0x2b8ac ←0x2b89a
            <MI 2b87c  CMP.L   (A7),D6>                                         {[-8-]}
            <MI 2b87e  BGT     0x2b8ac>                                         {[-8-]}
        <POP 2b880-2b896 Naked>                              Σ-8        ↓ →0x2b89a
            <POP 2b880-2b882 StackAdj>                       Δ-2                {[-10-]}
            <MI 2b882  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-10-]|[4, '(A6+0x14)']}
            <MI 2b884  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <MI 2b886  MOVE.L  D6,-(A7)>                     Δ-4                {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
            <Call 0x2b888 0x2b498>                                              {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
            <POP 2b88c-2b88e StackAdj>                       Δ+12               {[-10-]}
            <MI 2b88e  MOVE.B  (A7)+,D7>                     Δ+2                {[-8-]}
            <MI 2b890  CMPI.B  #0x2f,D7>                                        {[-8-]}
            <MI 2b894  BNE     0x2b89a>                                         {[-8-]}
        <POP 2b896-2b89a Naked>                              Σ-8 Δ+8    →0x2b8b4
            <POP 2b896-2b898 StackAdj>                       Δ+8                {}
            <MI 2b898  BRA     0x2b8b4>                                         {}
        <POP 2b89a-2b8ac Naked>                              Σ-8        ↓ →0x2b87c ←0x2b880
            <MI 2b89a  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x18)']}
            <MI 2b89e  MOVE.B  D7,-(A7)>                     Δ-2                {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
            <Call 0x2b8a0 0x102c0>                                              {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
                AppendChar(MOD b : String; a : char)
            <POP 2b8a6-2b8a8 StackAdj>                       Δ+6                {[-8-]}
            <MI 2b8a8  ADDQ.L  #0x1,D6>                                         {[-8-]}
            <MI 2b8aa  BVC     0x2b87c>                                         {[-8-]}
        <POP 2b8ac-2b8ae Naked>                              Σ-8 Δ+4    ↓ ←0x2b87c
            <POP 2b8ac-2b8ae StackAdj>                       Δ+4                {[-4-]}
        <POP 2b8ae-2b8b2 Naked>                              Σ-4        ↓ →0x2b85a ←0x2b85e
            <MI 2b8ae  ADDQ.L  #0x1,D5>                                         {[-4-]}
            <MI 2b8b0  BVC     0x2b85a>                                         {[-4-]}
        <POP 2b8b2-2b8b4 Naked>                              Σ-4 Δ+4    ↓ ←0x2b85a
            <POP 2b8b2-2b8b4 StackAdj>                       Δ+4                {}
        <POP 2b8b4-2b8bc Epilogue>                           Σ0         ←0x2b82a ←0x2b896

0x2b8bc


@ 2b8bc
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 2b8bc-2b942 Body>                                   Δ-4        
        <POP 2b8bc-2b8d2 Prologue>                           Σ0         ↓
        <POP 2b8d2-2b8dc RegCacheLoad>                       Σ0         ↓
        <POP 2b8dc-2b8ee Naked>                              Σ0 Δ-4     ↓
            <POP 2b8dc-2b8de StackAdj>                       Δ-4                {[-4-]}
            <MI 2b8de  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 2b8e0  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2b8e2 0x298ac>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2b8e6-2b8e8 StackAdj>                       Δ+8                {[-4-]}
            <MI 2b8e8  MOVE.L  (A7)+,D5>                     Δ+4                {}
            <MI 2b8ea  MOVE.L  D5,-(A7)>                     Δ-4                {[4, 'D5']}
            <MI 2b8ec  MOVEQ.L #0x01,D6>                                        {[4, 'D5']}
        <POP 2b8ee-2b8f2 Naked>                              Σ-4        ↓ →0x2b938 ←0x2b934
            <MI 2b8ee  CMP.L   (A7),D6>                                         {[-4-]}
            <MI 2b8f0  BGT     0x2b938>                                         {[-4-]}
        <POP 2b8f2-2b908 Naked>                              Σ-4        ↓ →0x2b934
            <POP 2b8f2-2b8f4 StackAdj>                       Δ-2                {[-6-]}
            <MI 2b8f4  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-6-]|[4, '(A6+0xc)']}
            <MI 2b8f6  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <MI 2b8f8  MOVE.L  D6,-(A7)>                     Δ-4                {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
            <Call 0x2b8fa 0x2b498>                                              {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
            <POP 2b8fe-2b900 StackAdj>                       Δ+12               {[-6-]}
            <MI 2b900  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 2b902  CMPI.B  #0x2f,D0>                                        {[-4-]}
            <MI 2b906  BNE     0x2b934>                                         {[-4-]}
        <POP 2b908-2b90c Naked>                              Σ-4 Δ-4    ↓
            <MI 2b908  MOVE.L  D5,-(A7)>                     Δ-4                {[-4-]|[4, 'D5']}
            <MI 2b90a  MOVE.L  D6,D7>                                           {[-4-]|[4, 'D5']}
        <POP 2b90c-2b910 Naked>                              Σ-8        ↓ →0x2b92e ←0x2b910
            <MI 2b90c  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2b90e  BGT     0x2b92e>                                         {[-8-]}
        <POP 2b910-2b92e Naked>                              Σ-8        ↓ →0x2b90c
            <MI 2b910  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x10)']}
            <POP 2b914-2b916 StackAdj>                       Δ-2                {[-8-]|[4, '(A6+0x10)']|[-2-]}
            <MI 2b916  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']}
            <MI 2b918  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <MI 2b91a  MOVE.L  D7,-(A7)>                     Δ-4                {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
            <Call 0x2b91c 0x2b498>                                              {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
            <POP 2b920-2b922 StackAdj>                       Δ+12               {[-8-]|[4, '(A6+0x10)']|[-2-]}
            <Call 0x2b922 0x102c0>                                              {[-8-]|[4, '(A6+0x10)']|[-2-]}
                AppendChar(MOD b : String; a : char)
            <POP 2b928-2b92a StackAdj>                       Δ+6                {[-8-]}
            <MI 2b92a  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2b92c  BVC     0x2b90c>                                         {[-8-]}
        <POP 2b92e-2b934 Naked>                              Σ-8 Δ+8    →0x2b93a ←0x2b90c
            <POP 2b92e-2b930 StackAdj>                       Δ+4                {[-4-]}
            <POP 2b930-2b932 StackAdj>                       Δ+4                {}
            <MI 2b932  BRA     0x2b93a>                                         {}
        <POP 2b934-2b938 Naked>                              Σ-4        ↓ →0x2b8ee ←0x2b8f2
            <MI 2b934  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 2b936  BVC     0x2b8ee>                                         {[-4-]}
        <POP 2b938-2b93a Naked>                              Σ-4 Δ+4    ↓ ←0x2b8ee
            <POP 2b938-2b93a StackAdj>                       Δ+4                {}
        <POP 2b93a-2b942 Epilogue>                           Σ0         ←0x2b92e

0x2b942


@ 2b942
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 2b942-2b9b2 Body>                                   Δ-4        
        <POP 2b942-2b958 Prologue>                           Σ0         ↓
        <POP 2b958-2b970 Naked>                              Σ0 Δ-4     ↓
            <MI 2b958  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 2b95c  CLR.W   (A0)>                                            {}
            <POP 2b95e-2b960 StackAdj>                       Δ-4                {[-4-]}
            <MI 2b960  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 2b964  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2b968 0x298ac>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2b96c-2b96e StackAdj>                       Δ+8                {[-4-]}
            <MI 2b96e  MOVEQ.L #0x01,D7>                                        {[-4-]}
        <POP 2b970-2b974 Naked>                              Σ-4        ↓ →0x2b9a8 ←0x2b9a4
            <MI 2b970  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2b972  BGT     0x2b9a8>                                         {[-4-]}
        <POP 2b974-2b990 Naked>                              Σ-4        ↓ →0x2b9a0
            <POP 2b974-2b976 StackAdj>                       Δ-2                {[-6-]}
            <MI 2b976  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-6-]|[4, '(A6+0xc)']}
            <MI 2b97a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <MI 2b97e  MOVE.L  D7,-(A7)>                     Δ-4                {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
            <Call 0x2b980 0x2b498>                                              {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
            <POP 2b984-2b988 StackAdj>                       Δ+12               {[-6-]}
            <MI 2b988  MOVE.B  (A7)+,D6>                     Δ+2                {[-4-]}
            <MI 2b98a  CMPI.B  #0x2f,D6>                                        {[-4-]}
            <MI 2b98e  BEQ     0x2b9a0>                                         {[-4-]}
        <POP 2b990-2b9a0 Naked>                              Σ-4        →0x2b9a4
            <MI 2b990  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x10)']}
            <MI 2b994  MOVE.B  D6,-(A7)>                     Δ-2                {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
            <Call 0x2b996 0x102c0>                                              {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
                AppendChar(MOD b : String; a : char)
            <POP 2b99c-2b99e StackAdj>                       Δ+6                {[-4-]}
            <MI 2b99e  BRA     0x2b9a4>                                         {[-4-]}
        <POP 2b9a0-2b9a4 Naked>                              Σ-4 Δ+4    →0x2b9aa ←0x2b974
            <POP 2b9a0-2b9a2 StackAdj>                       Δ+4                {}
            <MI 2b9a2  BRA     0x2b9aa>                                         {}
        <POP 2b9a4-2b9a8 Naked>                              Σ-4        ↓ →0x2b970 ←0x2b990
            <MI 2b9a4  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 2b9a6  BVC     0x2b970>                                         {[-4-]}
        <POP 2b9a8-2b9aa Naked>                              Σ-4 Δ+4    ↓ ←0x2b970
            <POP 2b9a8-2b9aa StackAdj>                       Δ+4                {}
        <POP 2b9aa-2b9b2 Epilogue>                           Σ0         ←0x2b9a0

0x2b9b2


@ 2b9b2
    <POP 2b9b2-2b9fa Body>                                              
        <POP 2b9b2-2b9c8 Prologue>                           Σ0         ↓
        <POP 2b9c8-2b9f2 Naked>                              Σ0         ↓
            <Blob 0x2b9c8 [34] @>                            Δ-34               {[«34""»]}
            <POP 2b9d4-2b9d6 StackAdj>                       Δ-4                {[«34""»]|[-4-]}
            <Lit 0x2b9d6 34>                                                    {[«34""»]|[$$Switch exclusion is unimplemented.]}
            <Call 0x2b9ea 0x28c9a>                                              {[«34""»]|[$$Switch exclusion is unimplemented.]}
            <POP 2b9ee-2b9f2 StackAdj>                       Δ+38               {}
        <POP 2b9f2-2b9fa Epilogue>                           Σ0         

0x2b9fa


@ 2b9fa
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 4(rw)>
    <POP 2b9fa-2bb34 Body>                                              
        <POP 2b9fa-2ba10 Prologue>                           Σ0         ↓
        <POP 2ba10-2ba26 RegCacheLoad>                       Σ0         ↓
        <POP 2ba26-2ba34 Naked>                              Σ0         ↓ →0x2ba3c
            <MI 2ba26  MOVE.L  0x2f1e8,(A6-0x6)>                                {}
            <POP 2ba2a-2ba2c StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2ba2c 0x28d36>                                              {[-2-]}
            <MI 2ba2e  MOVE.B  (A7)+,D7>                     Δ+2                {}
            <MI 2ba30  CMP.B   #0x25,D7>                                        {}
            <MI 2ba32  BNE     0x2ba3c>                                         {}
        <POP 2ba34-2ba3c Naked>                              Σ0         →0x2bb1c
            <MI 2ba34  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2ba36  CLR.L   (A0)>                                            {}
            <MI 2ba38  BRA     0x2bb1c>                                         {}
        <POP 2ba3c-2ba40 Naked>                              Σ0         ↓ →0x2ba4c ←0x2ba26
            <MI 2ba3c  CMP.B   #0x2d,D7>                                        {}
            <MI 2ba3e  BNE     0x2ba4c>                                         {}
        <POP 2ba40-2ba4c Naked>                              Σ0         →0x2bb1c
            <MI 2ba40  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2ba42  MOVE.L  #0x1,(A0)>                                       {}
            <MI 2ba48  BRA     0x2bb1c>                                         {}
        <POP 2ba4c-2ba52 Naked>                              Σ0         ↓ →0x2ba5e ←0x2ba3c
            <MI 2ba4c  CMPI.B  #0x2f,D7>                                        {}
            <MI 2ba50  BNE     0x2ba5e>                                         {}
        <POP 2ba52-2ba5e Naked>                              Σ0         →0x2bb1c
            <MI 2ba52  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2ba54  MOVE.L  #0x4,(A0)>                                       {}
            <MI 2ba5a  BRA     0x2bb1c>                                         {}
        <POP 2ba5e-2ba64 Naked>                              Σ0         ↓ →0x2ba70 ←0x2ba4c
            <MI 2ba5e  CMPI.B  #0x3d,D7>                                        {}
            <MI 2ba62  BNE     0x2ba70>                                         {}
        <POP 2ba64-2ba70 Naked>                              Σ0         →0x2bb1c
            <MI 2ba64  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2ba66  MOVE.L  #0x5,(A0)>                                       {}
            <MI 2ba6c  BRA     0x2bb1c>                                         {}
        <POP 2ba70-2ba76 Naked>                              Σ0         ↓ →0x2ba82 ←0x2ba5e
            <MI 2ba70  CMPI.B  #0x5c,D7>                                        {}
            <MI 2ba74  BNE     0x2ba82>                                         {}
        <POP 2ba76-2ba82 Naked>                              Σ0         →0x2bb1c
            <MI 2ba76  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2ba78  MOVE.L  #0x6,(A0)>                                       {}
            <MI 2ba7e  BRA     0x2bb1c>                                         {}
        <POP 2ba82-2ba86 Naked>                              Σ0         ↓ →0x2bab2 ←0x2ba70
            <MI 2ba82  TST.B   D7>                                              {}
            <MI 2ba84  BNE     0x2bab2>                                         {}
        <POP 2ba86-2bab2 Naked>                              Σ0         →0x2bb1c
            <Blob 0x2ba86 [24] @>                            Δ-24               {[«24""»]}
            <POP 2ba92-2ba94 StackAdj>                       Δ-4                {[«24""»]|[-4-]}
            <Lit 0x2ba94 24>                                                    {[«24""»]|[$$Illegal argument marker.]}
            <Call 0x2baa8 0x28c9a>                                              {[«24""»]|[$$Illegal argument marker.]}
            <POP 2baac-2bab0 StackAdj>                       Δ+28               {}
            <MI 2bab0  BRA     0x2bb1c>                                         {}
        <POP 2bab2-2bab6 Naked>                              Σ0         ↓ →0x2bae2 ←0x2ba82
            <MI 2bab2  CMP.B   #0x30,D7>                                        {}
            <MI 2bab4  BCS     0x2bae2>                                         {}
        <POP 2bab6-2baba Naked>                              Σ0         ↓ →0x2bae2
            <MI 2bab6  CMP.B   #0x39,D7>                                        {}
            <MI 2bab8  BHI     0x2bae2>                                         {}
        <POP 2baba-2bac2 Naked>                              Σ0         ↓
            <MI 2baba  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2babc  MOVE.L  #0x2,(A0)>                                       {}
        <POP 2bac2-2bace Naked>                              Σ0         ↓ →0x2bad8 ←0x2badc
            <POP 2bac2-2bac4 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2bac4 0x28cf8>                                              {[-2-]}
            <MI 2bac8  MOVE.B  (A7)+,D7>                     Δ+2                {}
            <MI 2baca  CMP.B   #0x30,D7>                                        {}
            <MI 2bacc  BCS     0x2bad8>                                         {}
        <POP 2bace-2bad2 Naked>                              Σ0         ↓ →0x2bad8
            <MI 2bace  CMP.B   #0x39,D7>                                        {}
            <MI 2bad0  BHI     0x2bad8>                                         {}
        <POP 2bad2-2bad8 Naked>                              Σ0         ↓
            <POP 2bad2-2bad4 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2bad4 0x28d36>                                              {[-2-]}
            <MI 2bad6  MOVE.B  (A7)+,D6>                     Δ+2                {}
        <POP 2bad8-2badc Naked>                              Σ0         ↓ →0x2bae0 ←0x2bac2 ←0x2bace
            <MI 2bad8  CMP.B   #0x30,D7>                                        {}
            <MI 2bada  BCS     0x2bae0>                                         {}
        <POP 2badc-2bae0 Naked>                              Σ0         ↓ →0x2bac2
            <MI 2badc  CMP.B   #0x39,D7>                                        {}
            <MI 2bade  BLS     0x2bac2>                                         {}
        <POP 2bae0-2bae2 Naked>                              Σ0         →0x2bb1c ←0x2bad8
            <MI 2bae0  BRA     0x2bb1c>                                         {}
        <POP 2bae2-2baec Naked>                              Σ0         ↓ ←0x2bab2 ←0x2bab6
            <MI 2bae2  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2bae4  MOVE.L  #0x3,(A0)>                                       {}
            <MI 2baea  MOVEQ.L #0x00,D5>                                        {}
        <POP 2baec-2baf8 Naked>                              Σ0         ↓ →0x2bb0e ←0x2bb18
            <POP 2baec-2baee StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2baee 0x28cf8>                                              {[-2-]}
            <MI 2baf2  MOVE.B  (A7)+,D7>                     Δ+2                {}
            <MI 2baf4  CMP.B   #0x25,D7>                                        {}
            <MI 2baf6  BEQ     0x2bb0e>                                         {}
        <POP 2baf8-2bafc Naked>                              Σ0         ↓ →0x2bb0e
            <MI 2baf8  CMP.B   #0x2d,D7>                                        {}
            <MI 2bafa  BEQ     0x2bb0e>                                         {}
        <POP 2bafc-2bb02 Naked>                              Σ0         ↓ →0x2bb0e
            <MI 2bafc  CMPI.B  #0x2f,D7>                                        {}
            <MI 2bb00  BEQ     0x2bb0e>                                         {}
        <POP 2bb02-2bb08 Naked>                              Σ0         ↓ →0x2bb0e
            <MI 2bb02  CMPI.B  #0x3d,D7>                                        {}
            <MI 2bb06  BEQ     0x2bb0e>                                         {}
        <POP 2bb08-2bb0e Naked>                              Σ0         ↓ →0x2bb12
            <MI 2bb08  CMPI.B  #0x5c,D7>                                        {}
            <MI 2bb0c  BNE     0x2bb12>                                         {}
        <POP 2bb0e-2bb12 Naked>                              Σ0         →0x2bb18 ←0x2baec ←0x2baf8 ←0x2bafc ←0x2bb02
            <MI 2bb0e  MOVEQ.L #0x01,D5>                                        {}
            <MI 2bb10  BRA     0x2bb18>                                         {}
        <POP 2bb12-2bb18 Naked>                              Σ0         ↓ ←0x2bb08
            <POP 2bb12-2bb14 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2bb14 0x28d36>                                              {[-2-]}
            <MI 2bb16  MOVE.B  (A7)+,D6>                     Δ+2                {}
        <POP 2bb18-2bb1c Naked>                              Σ0         ↓ →0x2baec ←0x2bb0e
            <MI 2bb18  TST.B   D5>                                              {}
            <MI 2bb1a  BEQ     0x2baec>                                         {}
        <POP 2bb1c-2bb2c Naked>                              Σ0         ↓ ←0x2ba34 ←0x2ba40 ←0x2ba52 ←0x2ba64 ←0x2ba76 ←0x2ba86 ←0x2bae0
            <MI 2bb1c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2bb20  MOVE.L  (A6-0x6),(A0)>                                   {}
            <MI 2bb24  MOVE.L  0x2f1e8,(A0+0x4)>                                {}
            <MI 2bb28  SUBQ.L  #0x1,(A0+0x4)>                                   {}
        <POP 2bb2c-2bb34 Epilogue>                           Σ0         

0x2bb34


@ 2bb34
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 2bb34-2bbba Body>                                              
        <POP 2bb34-2bb4a Prologue>                           Σ0         ↓
        <POP 2bb4a-2bb4e RegCacheLoad>                       Σ0         ↓
        <POP 2bb4e-2bb68 Naked>                              Σ0 Δ-4     ↓ →0x2bb74
            <MI 2bb4e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2bb52  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 2bb54  MOVE.L  0x2f1e8,D6>                                      {[4, 'A0']}
            <MI 2bb5a  SUB.L   (A6+0xc),D6>                                     {[4, 'A0']}
            <MI 2bb5c  MOVE.L  (A6+0xc),D5>                                     {[4, 'A0']}
            <MI 2bb5e  ADD.L   D6,D5>                                           {[4, 'A0']}
            <MI 2bb60  MOVE.W  (A0),D0>                                         {[4, 'A0']}
            <MI 2bb62  EXTW.L  D0>                                              {[4, 'A0']}
            <MI 2bb64  CMP.L   D6,D0>                                           {[4, 'A0']}
            <MI 2bb66  BEQ     0x2bb74>                                         {[4, 'A0']}
        <POP 2bb68-2bb74 Naked>                              Σ-4        ↓
            <MI 2bb68  MOVE.L  D5,-(A7)>                     Δ-4                {[-4-]|[4, 'D5']}
            <MI 2bb6a  MOVE.L  D6,-(A7)>                     Δ-4                {[-4-]|[4, 'D5']|[4, 'D6']}
            <MI 2bb6c  SUB.L   D0,(A7)>                                         {[-4-]|[4, 'D5']|[-4-]}
            <Call 0x2bb6e 0x291ee>                                              {[-4-]|[4, 'D5']|[-4-]}
            <POP 2bb72-2bb74 StackAdj>                       Δ+8                {[-4-]}
        <POP 2bb74-2bb78 Naked>                              Σ-4 Δ-4    ↓ ←0x2bb4e
            <MI 2bb74  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <MI 2bb76  MOVEQ.L #0x01,D7>                                        {[-4-]|[4, 'D0']}
        <POP 2bb78-2bb7c Naked>                              Σ-8        ↓ →0x2bbb0 ←0x2bb7c
            <MI 2bb78  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2bb7a  BGT     0x2bbb0>                                         {[-8-]}
        <POP 2bb7c-2bbb0 Naked>                              Σ-8        ↓ →0x2bb78
            <MI 2bb7c  MOVE.L  (A6+0xc),D0>                                     {[-8-]}
            <MI 2bb7e  ADD.L   D7,D0>                                           {[-8-]}
            <MI 2bb80  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <MI 2bb82  SUBQ.L  #0x1,D0>                                         {[-8-]}
            <POP 0x2bb84 LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {[-8-]}
            <MI 2bb8e  LEA.L   0x2e1e0,A0>                                      {[-8-]}
            <MI 2bb94  MOVE.L  D7,D1>                                           {[-8-]}
            <MI 2bb96  SUBQ.L  #0x1,D1>                                         {[-8-]}
            <POP 0x2bb98 LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-8-]}
            <MI 2bba2  MOVEA.L (A7+0x4),A1>                                     {[-8-]}
            <MI 2bba6  MOVE.B  (A1+D1.L+#0x2),(A0+D0.L+#0x8)>                   {[-8-]}
            <MI 2bbac  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2bbae  BVC     0x2bb78>                                         {[-8-]}
        <POP 2bbb0-2bbb2 Naked>                              Σ-8 Δ+8    ↓ ←0x2bb78
            <POP 2bbb0-2bbb2 StackAdj>                       Δ+8                {}
        <POP 2bbb2-2bbba Epilogue>                           Σ0         

0x2bbba


@ 2bbba
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 @ 4(r)>
        <LVAR -0x00c @ 4(r)>
        <LVAR -0x010 4(r)>
        <LVAR -0x014 @ 4(r)>
        <LVAR -0x018 4(rw)>
        <LVAR -0x01c 4(rw)>
        <LVAR -0x020 4(rw)>
        <LVAR -0x024 4(rw)>
        <LVAR -0x028 4(rw)>
        <LVAR -0x034 4(rw)>
    <POP 2bbba-2be02 Body>                                   Δ+56       
        <POP 2bbba-2bbd0 Prologue>                           Σ0         ↓
        <POP 2bbd0-2bbe2 RegCacheLoad>                       Σ0         ↓
        <POP 2bbe2-2bc06 Naked>                              Σ0         ↓
            <MI 2bbe2  MOVE.L  0x2f1e8,(A6-0x28)>                               {}
            <Pointer.fp 0x2bbea <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Call 0x2bbec 0x102b8>                                              {[@@-8]}
                NewString(VAR a : String)
            <POP 2bbf2-2bbf4 StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2bbf4 <LVAR -0x00c @ 4(r)>>        Δ-4                {[@@-12]}
            <Pointer.fp 0x2bbf8 <LVAR -0x014 @ 4(r)>>        Δ-4                {[@@-12]|[@@-20]}
            <Call 0x2bbfa 0x2b9fa>                                              {[@@-12]|[@@-20]}
            <POP 2bbfe-2bc00 StackAdj>                       Δ+8                {}
            <MI 2bc00  CLR.L   (A6-0x34)>                                       {}
            <MI 2bc04  MOVEQ.L #0x00,D7>                                        {}
        <POP 2bc06-2bc1a Naked>                              Σ0         →0x2bc44 →0x2bc4e →0x2bc62 →0x2bc7e →0x2bc82 →0x2bc90 →0x2bca4 →0x2bcaa →0x2bcac →0x2bcc2 →0x2bcd0 →0x2bce8 →0x2bcfc →0x2bd10 →0x2bd26 →0x2bd28 →0x2bd42 →0x2bd58 →0x2bd66 →0x2bd68 →0x2bd6a ←0x2bdde
            <MI 2bc06  MOVE.L  (A6-0x34),D0>                                    {}
            <POP 0x2bc0a LimitCheck 0x0 ≤ D0 ≤ 0x14>                            {}
            <MI 2bc10  ADD.W   D0,D0>                                           {}
            <MI 2bc12  SWITCH  D0.W>                                            {}
        <POP 2bc44-2bc4e Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <MI 2bc44  MOVEQ.L #0x00,D6>                                        {}
            <MI 2bc46  MOVE.L  (A6+0x8),D5>                                     {}
            <MI 2bc4a  BRA     0x2bd94>                                         {}
        <POP 2bc4e-2bc62 Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <POP 2bc4e-2bc50 StackAdj>                       Δ-4                {[-4-]}
            <MI 2bc50  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x10)']}
            <MI 2bc54  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <Call 0x2bc56 0x2b4d8>                                              {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <POP 2bc5a-2bc5c StackAdj>                       Δ+8                {[-4-]}
            <MI 2bc5c  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 2bc5e  BRA     0x2bd94>                                         {}
        <POP 2bc62-2bc6a Naked>                              Σ0 Δ-12    ↓ ←0x2bc06
            <MI 2bc62  MOVE.L  (A6-0x28),-(A7)>              Δ-4                {[4, '(A6-0x28)']}
            <MI 2bc66  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6-0x28)']|[4, 'D6']}
            <MI 2bc68  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D6']}
        <POP 2bc6a-2bc7a Naked>                              Σ-12 Δ+12  →0x2bdf0 ←0x2bc82
            <MI 2bc6a  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-12-]|[4, '(A6+0xc)']}
            <Call 0x2bc6e 0x2b554>                                              {[-12-]|[4, '(A6+0xc)']}
            <POP 2bc72-2bc76 StackAdj>                       Δ+16               {}
            <MI 2bc76  BRA     0x2bdf0>                                         {}
        <POP 2bc7e-2bc82 Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <MI 2bc7e  BRA     0x2bd94>                                         {}
        <POP 2bc82-2bc8c Naked>                              Σ0 Δ-12    →0x2bc6a ←0x2bc06
            <MI 2bc82  MOVE.L  (A6-0x28),-(A7)>              Δ-4                {[4, '(A6-0x28)']}
            <MI 2bc86  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6-0x28)']|[4, 'D6']}
            <MI 2bc88  MOVE.L  D5,-(A7)>                     Δ-4                {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
            <MI 2bc8a  BRA     0x2bc6a>                                         {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
        <POP 2bc90-2bca4 Naked>                              Σ0         →0x2bd94 ←0x2bc06 ←0x2bcaa
            <POP 2bc90-2bc92 StackAdj>                       Δ-4                {[-4-]}
            <MI 2bc92  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x10)']}
            <MI 2bc96  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <Call 0x2bc98 0x2b4d8>                                              {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <POP 2bc9c-2bc9e StackAdj>                       Δ+8                {[-4-]}
            <MI 2bc9e  MOVE.L  (A7)+,D5>                     Δ+4                {}
            <MI 2bca0  BRA     0x2bd94>                                         {}
        <POP 2bca4-2bcaa Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <MI 2bca4  MOVEQ.L #0x01,D6>                                        {}
            <MI 2bca6  BRA     0x2bd94>                                         {}
        <POP 2bcaa-2bcac Naked>                              Σ0         →0x2bc90 ←0x2bc06
            <MI 2bcaa  BRA     0x2bc90>                                         {}
        <POP 2bcac-2bcc2 Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <POP 2bcac-2bcae StackAdj>                       Δ-8                {[-8-]}
            <MI 2bcae  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0xc)']}
            <MI 2bcb2  MOVE.L  D6,-(A7)>                     Δ-4                {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
            <Call 0x2bcb4 0x298e4>                                              {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
            <POP 2bcb8-2bcba StackAdj>                       Δ+8                {[-8-]}
            <MI 2bcba  MOVE.L  (A7)+,(A6-0x24)>              Δ+4                {[-4-]}
            <MI 2bcbc  MOVE.L  (A7)+,(A6-0x20)>              Δ+4                {}
            <MI 2bcbe  BRA     0x2bd94>                                         {}
        <POP 2bcc2-2bcd0 Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <MI 2bcc2  MOVE.L  (A6-0x14),(A6-0x1c)>                             {}
            <MI 2bcc6  MOVE.L  (A6-0x10),(A6-0x18)>                             {}
            <MI 2bccc  BRA     0x2bd94>                                         {}
        <POP 2bcd0-2bce2 Naked>                              Σ0 Δ-20    ↓ ←0x2bc06
            <MI 2bcd0  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <MI 2bcd2  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
            <MI 2bcd4  MOVE.L  (A6-0x24),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
            <MI 2bcd6  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
            <MI 2bcda  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <Call 0x2bcde 0x2b806>                                              {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
        <POP 2bce2-2bce8 Naked>                              Σ-20 Δ+20  →0x2bd94 ←0x2bce8
            <POP 2bce2-2bce4 StackAdj>                       Δ+20               {}
            <MI 2bce4  BRA     0x2bd94>                                         {}
        <POP 2bce8-2bcfc Naked>                              Σ0 Δ-20    →0x2bce2 ←0x2bc06
            <MI 2bce8  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <MI 2bcea  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
            <MI 2bcec  MOVE.L  (A6-0x24),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
            <MI 2bcee  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
            <MI 2bcf2  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <Call 0x2bcf6 0x2b772>                                              {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <MI 2bcfa  BRA     0x2bce2>                                         {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
        <POP 2bcfc-2bd06 Naked>                              Σ0 Δ-12    ↓ ←0x2bc06
            <MI 2bcfc  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <MI 2bcfe  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
            <MI 2bd00  MOVE.L  (A6-0x24),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
            <Call 0x2bd02 0x2b8bc>                                              {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
        <POP 2bd06-2bd0a Naked>                              Σ-12 Δ+12  ↓ ←0x2bd42
            <POP 2bd06-2bd0a StackAdj>                       Δ+12               {}
        <POP 2bd0a-2bd10 Naked>                              Σ0         →0x2bd94 ←0x2bd10 ←0x2bd26 ←0x2bd68
            <MI 2bd0a  MOVEQ.L #0x01,D7>                                        {}
            <MI 2bd0c  BRA     0x2bd94>                                         {}
        <POP 2bd10-2bd26 Naked>                              Σ0         →0x2bd0a ←0x2bc06
            <MI 2bd10  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <MI 2bd12  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
            <MI 2bd14  MOVE.L  (A6-0x24),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
            <MI 2bd16  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
            <MI 2bd1a  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <Call 0x2bd1e 0x2b772>                                              {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <POP 2bd22-2bd24 StackAdj>                       Δ+20               {}
            <MI 2bd24  BRA     0x2bd0a>                                         {}
        <POP 2bd26-2bd28 Naked>                              Σ0         →0x2bd0a ←0x2bc06
            <MI 2bd26  BRA     0x2bd0a>                                         {}
        <POP 2bd28-2bd3c Naked>                              Σ0 Δ-12    ↓ ←0x2bc06
            <MI 2bd28  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <POP 2bd2a-2bd2c StackAdj>                       Δ-8                {[4, '(A6-0x8)']|[-8-]}
            <MI 2bd2c  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
            <MI 2bd30  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
            <Call 0x2bd32 0x298e4>                                              {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
            <POP 2bd36-2bd38 StackAdj>                       Δ+8                {[4, '(A6-0x8)']|[-8-]}
            <Call 0x2bd38 0x2b8bc>                                              {[4, '(A6-0x8)']|[-8-]}
        <POP 2bd3c-2bd42 Naked>                              Σ-12 Δ+12  →0x2bd94 ←0x2bd58
            <POP 2bd3c-2bd40 StackAdj>                       Δ+12               {}
            <MI 2bd40  BRA     0x2bd94>                                         {}
        <POP 2bd42-2bd58 Naked>                              Σ0 Δ-12    →0x2bd06 ←0x2bc06
            <MI 2bd42  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <POP 2bd44-2bd46 StackAdj>                       Δ-8                {[4, '(A6-0x8)']|[-8-]}
            <MI 2bd46  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
            <MI 2bd4a  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
            <Call 0x2bd4c 0x298e4>                                              {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
            <POP 2bd50-2bd52 StackAdj>                       Δ+8                {[4, '(A6-0x8)']|[-8-]}
            <Call 0x2bd52 0x2b942>                                              {[4, '(A6-0x8)']|[-8-]}
            <MI 2bd56  BRA     0x2bd06>                                         {[4, '(A6-0x8)']|[-8-]}
        <POP 2bd58-2bd66 Naked>                              Σ0 Δ-12    →0x2bd3c ←0x2bc06
            <MI 2bd58  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <MI 2bd5a  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x10)']}
            <MI 2bd5e  MOVE.L  (A6-0x14),-(A7)>              Δ-4                {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <Call 0x2bd60 0x2b9b2>                                              {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
            <MI 2bd64  BRA     0x2bd3c>                                         {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
        <POP 2bd66-2bd68 Naked>                              Σ0         →0x2bd94 ←0x2bc06
            <MI 2bd66  BRA     0x2bd94>                                         {}
        <POP 2bd68-2bd6a Naked>                              Σ0         →0x2bd0a ←0x2bc06
            <MI 2bd68  BRA     0x2bd0a>                                         {}
        <POP 2bd6a-2bd94 Naked>                              Σ0         ↓ ←0x2bc06
            <Blob 0x2bd6a [24] @>                            Δ-24               {[«24""»]}
            <POP 2bd76-2bd78 StackAdj>                       Δ-4                {[«24""»]|[-4-]}
            <Lit 0x2bd78 24>                                                    {[«24""»]|[$$Illegal argument marker.]}
            <Call 0x2bd8c 0x28c9a>                                              {[«24""»]|[$$Illegal argument marker.]}
            <POP 2bd90-2bd94 StackAdj>                       Δ+28               {}
        <POP 2bd94-2bd98 Naked>                              Σ0         ↓ →0x2bdde ←0x2bc44 ←0x2bc4e ←0x2bc7e ←0x2bc90 ←0x2bca4 ←0x2bcac ←0x2bcc2 ←0x2bce2 ←0x2bd0a ←0x2bd3c ←0x2bd66
            <MI 2bd94  TST.B   D7>                                              {}
            <MI 2bd96  BNE     0x2bdde>                                         {}
        <POP 2bd98-2bdde Naked>                              Σ0         ↓
            <Pointer.fp 0x2bd98 <LVAR -0x00c @ 4(r)>>        Δ-4                {[@@-12]}
            <Pointer.fp 0x2bd9c <LVAR -0x014 @ 4(r)>>        Δ-4                {[@@-12]|[@@-20]}
            <Call 0x2bd9e 0x2b9fa>                                              {[@@-12]|[@@-20]}
            <POP 2bda2-2bda4 StackAdj>                       Δ+8                {}
            <MI 2bda4  MOVE.L  (A6-0x34),D0>                                    {}
            <POP 0x2bda8 LimitCheck 0x0 ≤ D0 ≤ 0x13>                            {}
            <MI 2bdb2  MOVE.L  D0,D4>                                           {}
            <MI 2bdb4  MOVEQ.L #0x07,D3>                                        {}
            <Call 0x2bdb6 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 2bdbc  LEA.L   0x28bcc,A0>                                      {}
            <MI 2bdc0  MOVE.L  (A6-0xc),D0>                                     {}
            <POP 0x2bdc4 LimitCheck 0x0 ≤ D0 ≤ 0x6>                             {}
            <MI 2bdce  LEA.L   (A0+D4.L),A0>                                    {}
            <MI 2bdd2  MOVE.B  (A0+D0.L),D1>                                    {}
            <MI 2bdd6  EXTB.W  D1>                                              {}
            <MI 2bdd8  EXTW.L  D1>                                              {}
            <MI 2bdda  MOVE.L  D1,(A6-0x34)>                                    {}
        <POP 2bdde-2bde4 Naked>                              Σ0         ↓ →0x2bc06 ←0x2bd94
            <MI 2bdde  TST.B   D7>                                              {}
            <MI 2bde0  BEQ     0x2bc06>                                         {}
        <POP 2bde4-2bdf0 Naked>                              Σ0         ↓
            <MI 2bde4  MOVE.L  (A6-0x28),-(A7)>              Δ-4                {[4, '(A6-0x28)']}
            <MI 2bde8  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
            <Call 0x2bdea 0x2bb34>                                              {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
            <POP 2bdee-2bdf0 StackAdj>                       Δ+8                {}
        <POP 2bdf0-2bdfa Naked>                              Σ0         ↓ ←0x2bc6a
            <Pointer.fp 0x2bdf0 <LVAR -0x008 @ 4(r)>>        Δ-4                {[@@-8]}
            <Call 0x2bdf2 0x102bc>                                              {[@@-8]}
                FreeString(VAR a : String)
            <POP 2bdf8-2bdfa StackAdj>                       Δ+4                {}
        <POP 2bdfa-2be02 Epilogue>                           Σ0         

0x2be02


@ 2be02
        <LVAR  0x014 4(rw)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 4(rw)>
        <LVAR -0x00c 4(rw)>
        <LVAR -0x018 4(w)>
    <POP 2be02-2befa Body>                                   Δ-12       
        <POP 2be02-2be18 Prologue>                           Σ0         ↓
        <POP 2be18-2be2a RegCacheLoad>                       Σ0         ↓
        <POP 2be2a-2be52 Naked>                              Σ0 Δ-4     ↓
            <MI 2be2a  CLR.L   (A6+0x14)>                                       {}
            <POP 2be2e-2be30 StackAdj>                       Δ-4                {[-4-]}
            <MI 2be30  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6+0x10)']}
            <MI 2be32  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <Call 0x2be34 0x298ac>                                              {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <POP 2be38-2be3a StackAdj>                       Δ+8                {[-4-]}
            <MI 2be3a  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {}
            <MI 2be3c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2be40  MOVE.W  (A0),D0>                                         {}
            <MI 2be42  EXTW.L  D0>                                              {}
            <MI 2be44  ADDQ.L  #0x1,D0>                                         {}
            <MI 2be46  MOVE.L  D0,(A6-0x8)>                                     {}
            <MI 2be48  NEG.L   D0>                                              {}
            <MI 2be4a  ADD.L   (A6-0xc),D0>                                     {}
            <MI 2be4c  ADDQ.L  #0x1,D0>                                         {}
            <MI 2be4e  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2be50  MOVEQ.L #0x01,D0>                                        {[4, 'D0']}
        <POP 2be52-2be58 Naked>                              Σ-4        ↓ →0x2bef0 ←0x2bee8
            <MI 2be52  CMP.L   (A7),D0>                                         {[-4-]}
            <MI 2be54  BGT     0x2bef0>                                         {[-4-]}
        <POP 2be58-2be64 Naked>                              Σ-4 Δ-8    ↓
            <MI 2be58  MOVE.L  D0,(A6-0x18)>                                    {[-4-]}
            <MI 2be5c  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <MI 2be5e  MOVEQ.L #0x00,D6>                                        {[-4-]|[4, 'D0']}
            <MI 2be60  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
            <MI 2be62  MOVEQ.L #0x01,D5>                                        {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
        <POP 2be64-2be68 Naked>                              Σ-12       ↓ →0x2beb0 ←0x2beaa
            <MI 2be64  CMP.L   (A7),D5>                                         {[-12-]}
            <MI 2be66  BGT     0x2beb0>                                         {[-12-]}
        <POP 2be68-2be70 Naked>                              Σ-12       ↓ →0x2be74
            <MI 2be68  CMPI.L  #0x00000001,D5>                                  {[-12-]}
            <MI 2be6e  BNE     0x2be74>                                         {[-12-]}
        <POP 2be70-2be74 Naked>                              Σ-12       →0x2be8c
            <MI 2be70  MOVEQ.L #0x2f,D7>                                        {[-12-]}
            <MI 2be72  BRA     0x2be8c>                                         {[-12-]}
        <POP 2be74-2be8c Naked>                              Σ-12       ↓ ←0x2be68
            <MI 2be74  MOVEA.L (A6+0x8),A0>                                     {[-12-]}
            <MI 2be78  MOVE.L  D5,D0>                                           {[-12-]}
            <MI 2be7a  SUBQ.L  #0x1,D0>                                         {[-12-]}
            <MI 2be7c  SUBQ.L  #0x1,D0>                                         {[-12-]}
            <POP 0x2be7e LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-12-]}
            <MI 2be88  MOVE.B  (A0+D0.L+#0x2),D7>                               {[-12-]}
        <POP 2be8c-2bea6 Naked>                              Σ-12       ↓ →0x2beaa ←0x2be70
            <POP 2be8c-2be8e StackAdj>                       Δ-2                {[-14-]}
            <MI 2be8e  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-14-]|[4, '(A6+0x10)']}
            <MI 2be90  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2be92  MOVE.L  (A7+0xe),D0>                                     {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2be96  ADD.L   D5,D0>                                           {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2be98  SUBQ.L  #0x1,D0>                                         {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2be9a  MOVE.L  D0,-(A7)>                     Δ-4                {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
            <Call 0x2be9c 0x2b498>                                              {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
            <POP 2bea0-2bea2 StackAdj>                       Δ+12               {[-14-]}
            <MI 2bea2  CMP.B   (A7)+,D7>                     Δ+2                {[-12-]}
            <MI 2bea4  BEQ     0x2beaa>                                         {[-12-]}
        <POP 2bea6-2beaa Naked>                              Σ-12 Δ+4   →0x2beb2
            <POP 2bea6-2bea8 StackAdj>                       Δ+4                {[-8-]}
            <MI 2bea8  BRA     0x2beb2>                                         {[-8-]}
        <POP 2beaa-2beb0 Naked>                              Σ-12       ↓ →0x2be64 ←0x2be8c
            <MI 2beaa  MOVE.L  D5,D6>                                           {[-12-]}
            <MI 2beac  ADDQ.L  #0x1,D5>                                         {[-12-]}
            <MI 2beae  BVC     0x2be64>                                         {[-12-]}
        <POP 2beb0-2beb2 Naked>                              Σ-12 Δ+4   ↓ ←0x2be64
            <POP 2beb0-2beb2 StackAdj>                       Δ+4                {[-8-]}
        <POP 2beb2-2beb6 Naked>                              Σ-8        ↓ →0x2bee8 ←0x2bea6
            <MI 2beb2  CMP.L   (A6-0x8),D6>                                     {[-8-]}
            <MI 2beb4  BNE     0x2bee8>                                         {[-8-]}
        <POP 2beb6-2bec0 Naked>                              Σ-8        ↓ →0x2bee6
            <MI 2beb6  MOVE.L  (A7),D0>                                         {[-8-]}
            <MI 2beb8  MOVE.L  D0,D1>                                           {[-8-]}
            <MI 2beba  ADD.L   (A6-0x8),D1>                                     {[-8-]}
            <MI 2bebc  CMP.L   (A6-0xc),D1>                                     {[-8-]}
            <MI 2bebe  BGE     0x2bee6>                                         {[-8-]}
        <POP 2bec0-2bed6 Naked>                              Σ-8        ↓ →0x2bedc
            <POP 2bec0-2bec2 StackAdj>                       Δ-2                {[-10-]}
            <MI 2bec2  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-10-]|[4, '(A6+0x10)']}
            <MI 2bec4  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 2bec6  MOVE.L  D1,-(A7)>                     Δ-4                {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
            <Call 0x2bec8 0x2b498>                                              {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
            <POP 2becc-2bece StackAdj>                       Δ+12               {[-10-]}
            <MI 2bece  MOVE.B  (A7)+,D7>                     Δ+2                {[-8-]}
            <MI 2bed0  CMPI.B  #0x2f,D7>                                        {[-8-]}
            <MI 2bed4  BEQ     0x2bedc>                                         {[-8-]}
        <POP 2bed6-2bedc Naked>                              Σ-8        ↓ →0x2bee4
            <MI 2bed6  CMPI.B  #0x3d,D7>                                        {[-8-]}
            <MI 2beda  BNE     0x2bee4>                                         {[-8-]}
        <POP 2bedc-2bee4 Naked>                              Σ-8 Δ+8    →0x2bef2 ←0x2bec0 ←0x2bee6
            <MI 2bedc  MOVE.L  D0,(A6+0x14)>                                    {[-8-]}
            <POP 2bee0-2bee2 StackAdj>                       Δ+8                {}
            <MI 2bee2  BRA     0x2bef2>                                         {}
        <POP 2bee4-2bee6 Naked>                              Σ-8        →0x2bee8 ←0x2bed6
            <MI 2bee4  BRA     0x2bee8>                                         {[-8-]}
        <POP 2bee6-2bee8 Naked>                              Σ-8        →0x2bedc ←0x2beb6
            <MI 2bee6  BRA     0x2bedc>                                         {[-8-]}
        <POP 2bee8-2bef0 Naked>                              Σ-8 Δ+4    ↓ →0x2be52 ←0x2beb2 ←0x2bee4
            <MI 2bee8  MOVE.L  (A7)+,D0>                     Δ+4                {[-4-]}
            <MI 2beea  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 2beec  BVC     0x2be52>                                         {[-4-]}
        <POP 2bef0-2bef2 Naked>                              Σ-4 Δ+4    ↓ ←0x2be52
            <POP 2bef0-2bef2 StackAdj>                       Δ+4                {}
        <POP 2bef2-2befa Epilogue>                           Σ0         ←0x2bedc

0x2befa


@ 2befa
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 4(rw)>
        <LVAR -0x014 4(rw)>
        <LVAR -0x018 4(rw)>
        <LVAR -0x01c 4(rw)>
    <POP 2befa-2bfe2 Body>                                   Δ-12       
        <POP 2befa-2bf10 Prologue>                           Σ0         ↓
        <POP 2bf10-2bf20 RegCacheLoad>                       Σ0         ↓
        <POP 2bf20-2bf46 Naked>                              Σ0         ↓ →0x2bfda
            <MI 2bf20  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2bf24  CLR.B   (A0)>                                            {}
            <MI 2bf26  MOVEA.L (A6+0xc),A1>                                     {}
            <MI 2bf2a  MOVE.L  #0x01,(A1)>                                      {}
            <POP 2bf2c-2bf2e StackAdj>                       Δ-8                {[-8-]}
            <MI 2bf2e  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x18)']}
            <MI 2bf32  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
            <Call 0x2bf36 0x298e4>                                              {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
            <POP 2bf3a-2bf3c StackAdj>                       Δ+8                {[-8-]}
            <MI 2bf3c  MOVE.L  (A7)+,(A6-0x1c)>              Δ+4                {[-4-]}
            <MI 2bf3e  MOVE.L  (A7)+,(A6-0x18)>              Δ+4                {}
            <MI 2bf40  TST.L   (A6-0x1c)>                                       {}
            <MI 2bf42  BEQ     0x2bfda>                                         {}
        <POP 2bf46-2bf5c Naked>                              Σ0         ↓ →0x2bfda
            <POP 2bf46-2bf48 StackAdj>                       Δ-4                {[-4-]}
            <MI 2bf48  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x18)']}
            <MI 2bf4a  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <MI 2bf4c  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
            <Call 0x2bf50 0x2be02>                                              {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
            <POP 2bf54-2bf56 StackAdj>                       Δ+12               {[-4-]}
            <MI 2bf56  MOVE.L  (A7)+,(A6-0x14)>              Δ+4                {}
            <MI 2bf5a  BEQ     0x2bfda>                                         {}
        <POP 2bf5c-2bf7c Naked>                              Σ0 Δ-4     ↓
            <MI 2bf5c  MOVE.B  #0x01,(A0)>                                      {}
            <MI 2bf5e  PEA.L   (A1)>                         Δ-4                {[4, '^(A1)']}
            <Call 0x2bf60 0x102b8>                                              {[4, '^(A1)']}
                NewString(VAR a : String)
            <MI 2bf66  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '^(A1)']|[4, '(A6-0x18)']}
            <MI 2bf68  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <Call 0x2bf6a 0x298ac>                                              {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <POP 2bf6e-2bf70 StackAdj>                       Δ+8                {[4, '^(A1)']}
            <MI 2bf70  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {}
            <MI 2bf72  MOVE.L  (A6-0x14),D0>                                    {}
            <MI 2bf76  ADDQ.L  #0x1,D0>                                         {}
            <MI 2bf78  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[4, '(A6-0x8)']}
            <MI 2bf7a  MOVE.L  D0,D5>                                           {[4, '(A6-0x8)']}
        <POP 2bf7c-2bf80 Naked>                              Σ-4        ↓ →0x2bfd8 ←0x2bfd4
            <MI 2bf7c  CMP.L   (A7),D5>                                         {[-4-]}
            <MI 2bf7e  BGT     0x2bfd8>                                         {[-4-]}
        <POP 2bf80-2bf96 Naked>                              Σ-4        ↓ →0x2bfd4
            <POP 2bf80-2bf82 StackAdj>                       Δ-2                {[-6-]}
            <MI 2bf82  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[-6-]|[4, '(A6-0x18)']}
            <MI 2bf84  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <MI 2bf86  MOVE.L  D5,-(A7)>                     Δ-4                {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
            <Call 0x2bf88 0x2b498>                                              {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
            <POP 2bf8c-2bf8e StackAdj>                       Δ+12               {[-6-]}
            <MI 2bf8e  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 2bf90  CMPI.B  #0x3d,D0>                                        {[-4-]}
            <MI 2bf94  BNE     0x2bfd4>                                         {[-4-]}
        <POP 2bf96-2bf9e Naked>                              Σ-4 Δ-4    ↓
            <MI 2bf96  MOVE.L  D5,D0>                                           {[-4-]}
            <MI 2bf98  ADDQ.L  #0x1,D0>                                         {[-4-]}
            <MI 2bf9a  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x8)']}
            <MI 2bf9c  MOVE.L  D0,D7>                                           {[-4-]|[4, '(A6-0x8)']}
        <POP 2bf9e-2bfa2 Naked>                              Σ-8        ↓ →0x2bfd0 ←0x2bfbc
            <MI 2bf9e  CMP.L   (A7),D7>                                         {[-8-]}
            <MI 2bfa0  BGT     0x2bfd0>                                         {[-8-]}
        <POP 2bfa2-2bfb8 Naked>                              Σ-8        ↓ →0x2bfbc
            <POP 2bfa2-2bfa4 StackAdj>                       Δ-2                {[-10-]}
            <MI 2bfa4  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[-10-]|[4, '(A6-0x18)']}
            <MI 2bfa6  MOVE.L  (A6-0x1c),-(A7)>              Δ-4                {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
            <MI 2bfa8  MOVE.L  D7,-(A7)>                     Δ-4                {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
            <Call 0x2bfaa 0x2b498>                                              {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
            <POP 2bfae-2bfb0 StackAdj>                       Δ+12               {[-10-]}
            <MI 2bfb0  MOVE.B  (A7)+,D6>                     Δ+2                {[-8-]}
            <MI 2bfb2  CMPI.B  #0x2f,D6>                                        {[-8-]}
            <MI 2bfb6  BNE     0x2bfbc>                                         {[-8-]}
        <POP 2bfb8-2bfbc Naked>                              Σ-8 Δ+8    →0x2bfda
            <POP 2bfb8-2bfba StackAdj>                       Δ+8                {}
            <MI 2bfba  BRA     0x2bfda>                                         {}
        <POP 2bfbc-2bfd0 Naked>                              Σ-8        ↓ →0x2bf9e ←0x2bfa2
            <MI 2bfbc  MOVEA.L (A6+0xc),A0>                                     {[-8-]}
            <MI 2bfc0  MOVE.L  (A0),-(A7)>                   Δ-4                {[-8-]|[4, '(A0)']}
            <MI 2bfc2  MOVE.B  D6,-(A7)>                     Δ-2                {[-8-]|[4, '(A0)']|[2, 'D6']}
            <Call 0x2bfc4 0x102c0>                                              {[-8-]|[4, '(A0)']|[2, 'D6']}
                AppendChar(MOD b : String; a : char)
            <POP 2bfca-2bfcc StackAdj>                       Δ+6                {[-8-]}
            <MI 2bfcc  ADDQ.L  #0x1,D7>                                         {[-8-]}
            <MI 2bfce  BVC     0x2bf9e>                                         {[-8-]}
        <POP 2bfd0-2bfd4 Naked>                              Σ-8 Δ+8    →0x2bfda ←0x2bf9e
            <POP 2bfd0-2bfd2 StackAdj>                       Δ+8                {}
            <MI 2bfd2  BRA     0x2bfda>                                         {}
        <POP 2bfd4-2bfd8 Naked>                              Σ-4        ↓ →0x2bf7c ←0x2bf80
            <MI 2bfd4  ADDQ.L  #0x1,D5>                                         {[-4-]}
            <MI 2bfd6  BVC     0x2bf7c>                                         {[-4-]}
        <POP 2bfd8-2bfda Naked>                              Σ-4 Δ+4    ↓ ←0x2bf7c
            <POP 2bfd8-2bfda StackAdj>                       Δ+4                {}
        <POP 2bfda-2bfe2 Epilogue>                           Σ0         ←0x2bf20 ←0x2bf46 ←0x2bfb8 ←0x2bfd0

0x2bfe2


@ 2bfe2
        <LVAR  0x00c @ 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x010 @ 1(r)>
    <POP 2bfe2-2c080 Body>                                              
        <POP 2bfe2-2bff8 Prologue>                           Σ0         ↓
        <POP 2bff8-2c006 RegCacheLoad>                       Σ0         ↓
        <POP 2c006-2c01e Naked>                              Σ0         ↓ →0x2c06e
            <MI 2c006  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <MI 2c008  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Pointer.fp 0x2c00a <LVAR -0x010 @ 1(r)>>        Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
            <Call 0x2c00e 0x28358>                                              {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
            <POP 2c014-2c018 StackAdj>                       Δ+12               {}
            <MI 2c018  TST.B   (A6-0x10)>                                       {}
            <MI 2c01c  BNE     0x2c06e>                                         {}
        <POP 2c01e-2c038 Naked>                              Σ0         ↓
            <MI 2c01e  MOVE.L  0x2f1e8,D7>                                      {}
            <POP 2c020-2c022 StackAdj>                       Δ-4                {[-4-]}
            <MI 2c022  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0x8)']}
            <Call 0x2c024 0x290a6>                                              {[-4-]|[4, '(A6+0x8)']}
            <POP 2c028-2c02a StackAdj>                       Δ+4                {[-4-]}
            <MI 2c02a  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 2c02c  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <MI 2c02e  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2c030 0x2b35c>                                              {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 2c034-2c036 StackAdj>                       Δ+8                {}
            <MI 2c036  MOVE.L  0x2f1e8,D5>                                      {}
        <POP 2c038-2c056 Naked>                              Σ0         ↓ →0x2c062 ←0x2c062
            <MI 2c038  MOVE.L  D7,D0>                                           {}
            <MI 2c03a  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x2c03c LimitCheck 0x0 ≤ D0 ≤ 0xfff>                           {}
            <MI 2c046  LEA.L   0x2e1e0,A0>                                      {}
            <MI 2c04c  MOVE.B  (A0+D0.L+#0x8),D0>                               {}
            <MI 2c050  CMPI.B  #0x25,D0>                                        {}
            <MI 2c054  BNE     0x2c062>                                         {}
        <POP 2c056-2c062 Naked>                              Σ0         ↓
            <MI 2c056  MOVE.L  D7,0x2f1e8>                                      {}
            <MI 2c058  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0x8)']}
            <MI 2c05a  MOVE.L  D6,-(A7)>                     Δ-4                {[4, '(A6+0x8)']|[4, 'D6']}
            <Call 0x2c05c 0x2bbba>                                              {[4, '(A6+0x8)']|[4, 'D6']}
            <POP 2c060-2c062 StackAdj>                       Δ+8                {}
        <POP 2c062-2c06c Naked>                              Σ0         ↓ →0x2c038 ←0x2c038
            <MI 2c062  ADDQ.L  #0x1,D7>                                         {}
            <MI 2c064  CMP.L   0x2f1ec,D7>                                      {}
            <MI 2c06a  BLE     0x2c038>                                         {}
        <POP 2c06c-2c06e Naked>                              Σ0         ↓
            <MI 2c06c  MOVE.L  D5,0x2f1e8>                                      {}
        <POP 2c06e-2c078 Naked>                              Σ0         ↓ ←0x2c006
            <Pointer.fp 0x2c06e <LVAR  0x00c @ 4(r)>>        Δ-4                {[@@12]}
            <Call 0x2c070 0x102bc>                                              {[@@12]}
                FreeString(VAR a : String)
            <POP 2c076-2c078 StackAdj>                       Δ+4                {}
        <POP 2c078-2c080 Epilogue>                           Σ0         

0x2c080


@ 2c080
        <LVAR -0x006 @ 4(r)>
        <LVAR -0x00a @ 4(rw)>
        <LVAR -0x00b 1(w)>
        <LVAR -0x00c @ 1(r)>
    <POP 2c080-2c392 Body>                                   Δ+148      
        <POP 2c080-2c096 Prologue>                           Σ0         ↓
        <POP 2c096-2c0a4 RegCacheLoad>                       Σ0         ↓
        <POP 2c0a4-2c0ca Naked>                              Σ0         ↓ →0x2c374 ←0x2c374
            <MI 2c0a4  MOVE.L  0x2f1e8,D7>                                      {}
            <Pointer.fp 0x2c0a6 <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Pointer.fp 0x2c0a8 <LVAR -0x00c @ 1(r)>>        Δ-4                {[@@-6]|[@@-12]}
            <Call 0x2c0ac 0x28ffa>                                              {[@@-6]|[@@-12]}
            <POP 2c0b0-2c0b2 StackAdj>                       Δ+8                {}
            <MI 2c0b2  MOVE.L  0x2f1e8,D6>                                      {}
            <POP 2c0b4-2c0b6 StackAdj>                       Δ-4                {[-4-]}
            <MI 2c0b6  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x6)']}
            <Call 0x2c0b8 0x290a6>                                              {[-4-]|[4, '(A6-0x6)']}
            <POP 2c0bc-2c0be StackAdj>                       Δ+4                {[-4-]}
            <MI 2c0be  MOVE.L  (A7)+,D0>                     Δ+4                {}
            <MI 2c0c0  CMPI.L  #0xffffffff,D0>                                  {}
            <MI 2c0c6  BEQ     0x2c374>                                         {}
        <POP 2c0ca-2c0f4 Naked>                              Σ0         ↓ →0x2c102
            <POP 2c0ca-2c0cc StackAdj>                       Δ-4                {[-4-]}
            <MI 2c0cc  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[-4-]|[4, '(A6-0x6)']}
            <Const 0x2c0ce 0x0.4>                            Δ-4                {[-4-]|[4, '(A6-0x6)']|[##0]}
            <Call 0x2c0d2 0x299c2>                                              {[-4-]|[4, '(A6-0x6)']|[##0]}
            <POP 2c0d6-2c0d8 StackAdj>                       Δ+8                {[-4-]}
            <MI 2c0d8  MOVE.L  (A7),(A6-0xa)>                                   {[-4-]}
            <POP 2c0da-2c0dc StackAdj>                       Δ+2                {[-2-]}
            <MI 2c0dc  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0xa)']}
            <Call 0x2c0de 0x2b2a4>                                              {[-2-]|[4, '(A6-0xa)']}
            <POP 2c0e2-2c0e4 StackAdj>                       Δ+4                {[-2-]}
            <MI 2c0e4  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 2c0e6  EXTB.W  D0>                                              {}
            <POP 0x2c0e8 LimitCheck 0x0 ≤ D0 ≤ 0x2b>                            {}
            <MI 2c0ec  MOVE.B  D0,(A6-0xb)>                                     {}
            <MI 2c0f0  TST.B   D0>                                              {}
            <MI 2c0f2  BNE     0x2c102>                                         {}
        <POP 2c0f4-2c102 Naked>                              Σ0         →0x2c36c
            <MI 2c0f4  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0xa)']}
            <MI 2c0f6  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
            <Call 0x2c0f8 0x2bfe2>                                              {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
            <POP 2c0fc-2c0fe StackAdj>                       Δ+8                {}
            <MI 2c0fe  BRA     0x2c36c>                                         {}
        <POP 2c102-2c138 Naked>                              Σ0         ↓ →0x2c164 ←0x2c0ca
            <Pointer.fp 0x2c102 <LVAR -0x00a @ 4(rw)>>       Δ-4                {[@@-10]}
            <Call 0x2c104 0x102bc>                                              {[@@-10]}
                FreeString(VAR a : String)
            <POP 2c10a-2c10c StackAdj>                       Δ+4                {}
            <MI 2c10c  MOVE.B  D0,D1>                                           {}
            <MI 2c10e  EXTB.W  D1>                                              {}
            <POP 0x2c110 LimitCheck 0x0 ≤ D1 ≤ 0x2b>                            {}
            <MI 2c114  LEA.L   0x28b9c,A0>                                      {}
            <MI 2c118  MOVE.W  D1,D0>                                           {}
            <MI 2c11a  EXTW.L  D0>                                              {}
            <MI 2c11c  MOVE.L  D0,D2>                                           {}
            <MI 2c11e  ROR.L   #0x1,D2>                                         {}
            <MI 2c120  ADDA.W  D2,A0>                                           {}
            <MI 2c122  SWAP.W  D2>                                              {}
            <MI 2c124  ROL.W   #0x3,D2>                                         {}
            <MI 2c126  CLR.L   D3>                                              {}
            <MI 2c128  MOVE.B  (A0),D3>                                         {}
            <MI 2c12a  LSL.B   D2,D3>                                           {}
            <MI 2c12c  LSR.B   #0x4,D3>                                         {}
            <MI 2c12e  MOVE.L  D3,D5>                                           {}
            <MI 2c130  CMPI.L  #0x0000000f,D5>                                  {}
            <MI 2c136  BEQ     0x2c164>                                         {}
        <POP 2c138-2c164 Naked>                              Σ0         ↓
            <MI 2c138  MOVE.L  D0,D4>                                           {}
            <MI 2c13a  MOVEQ.L #0x0a,D3>                                        {}
            <Call 0x2c13c 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 2c142  LEA.L   0x289ce,A0>                                      {}
            <Blob 0x2c146 [10] (A0+D4.W)>                    Δ-10               {[«10»]}
            <MI 2c158  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[«10»]|[4, '(A6-0x6)']}
            <MI 2c15a  MOVE.L  D5,-(A7)>                     Δ-4                {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
            <Call 0x2c15c 0x290dc>                                              {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
            <POP 2c160-2c164 StackAdj>                       Δ+18               {}
        <POP 2c164-2c178 Naked>                              Σ0         →0x2c1ce →0x2c1da →0x2c1ec →0x2c1fa →0x2c35e →0x2c202 →0x2c206 →0x2c20e →0x2c216 →0x2c21e →0x2c226 →0x2c22e →0x2c236 →0x2c23e →0x2c246 →0x2c24e →0x2c258 →0x2c262 →0x2c26c →0x2c276 →0x2c280 →0x2c28a →0x2c294 →0x2c29e →0x2c2a8 →0x2c2b2 →0x2c2bc →0x2c2c6 →0x2c2d0 →0x2c2da →0x2c2e4 →0x2c2ee →0x2c2f8 →0x2c302 →0x2c30c →0x2c316 →0x2c320 →0x2c32a →0x2c330 →0x2c33a →0x2c344 →0x2c34e →0x2c354 ←0x2c102
            <MI 2c164  SUBQ.W  #0x1,D1>                                         {}
            <POP 0x2c166 LimitCheck 0x0 ≤ D1 ≤ 0x2a>                            {}
            <MI 2c16e  ADD.W   D1,D1>                                           {}
            <MI 2c170  SWITCH  D1.W>                                            {}
        <POP 2c1ce-2c1d4 Naked>                              Σ0 Δ-4     ↓ ←0x2c164
            <MI 2c1ce  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c1d0 0x29b4a>                                              {[4, '(A6-0x6)']}
        <POP 2c1d4-2c1da Naked>                              Σ-4 Δ+4    →0x2c36c ←0x2c1ec ←0x2c1fa ←0x2c206 ←0x2c20e ←0x2c216 ←0x2c21e ←0x2c226 ←0x2c22e ←0x2c236 ←0x2c23e ←0x2c246 ←0x2c24e ←0x2c258 ←0x2c262 ←0x2c26c ←0x2c276 ←0x2c280 ←0x2c28a ←0x2c294 ←0x2c29e ←0x2c2a8 ←0x2c2b2 ←0x2c2bc ←0x2c2c6 ←0x2c2d0 ←0x2c2da ←0x2c2e4 ←0x2c2ee ←0x2c2f8 ←0x2c302 ←0x2c30c ←0x2c316 ←0x2c320 ←0x2c330 ←0x2c33a ←0x2c344 ←0x2c354
            <POP 2c1d4-2c1d6 StackAdj>                       Δ+4                {}
            <MI 2c1d6  BRA     0x2c36c>                                         {}
        <POP 2c1da-2c1ec Naked>                              Σ0         →0x2c36c ←0x2c164
            <MI 2c1da  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2c1dc 0x1.4>                            Δ-4                {[#0]|[##1]}
            <Call 0x2c1e0 0x103b8>                                              {[#0]|[##1]}
                PopProgram(status : Byte; msg : String)
            <POP 2c1e6-2c1e8 StackAdj>                       Δ+6                {}
            <MI 2c1e8  BRA     0x2c36c>                                         {}
        <POP 2c1ec-2c1fa Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <POP 2c1ec-2c1ee StackAdj>                       Δ-4                {[-4-]}
            <Call 0x2c1ee 0x102ac>                                              {[-4-]}
                FSCALL_102ac
            <Call 0x2c1f4 0x29b20>                                              {[-4-]}
            <MI 2c1f8  BRA     0x2c1d4>                                         {[-4-]}
        <POP 2c1fa-2c202 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c1fa  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c1fc 0x29d24>                                              {[4, '(A6-0x6)']}
            <MI 2c200  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c202-2c206 Naked>                              Σ0         →0x2c36c ←0x2c164
            <MI 2c202  BRA     0x2c36c>                                         {}
        <POP 2c206-2c20e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c206  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c208 0x2a04a>                                              {[4, '(A6-0x6)']}
            <MI 2c20c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c20e-2c216 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c20e  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c210 0x2a1b6>                                              {[4, '(A6-0x6)']}
            <MI 2c214  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c216-2c21e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c216  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c218 0x2a2a4>                                              {[4, '(A6-0x6)']}
            <MI 2c21c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c21e-2c226 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c21e  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c220 0x2a698>                                              {[4, '(A6-0x6)']}
            <MI 2c224  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c226-2c22e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c226  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c228 0x2a710>                                              {[4, '(A6-0x6)']}
            <MI 2c22c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c22e-2c236 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c22e  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c230 0x2a788>                                              {[4, '(A6-0x6)']}
            <MI 2c234  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c236-2c23e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c236  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c238 0x2a7b4>                                              {[4, '(A6-0x6)']}
            <MI 2c23c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c23e-2c246 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c23e  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c240 0x2a8b4>                                              {[4, '(A6-0x6)']}
            <MI 2c244  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c246-2c24e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c246  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c248 0x2a99a>                                              {[4, '(A6-0x6)']}
            <MI 2c24c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c24e-2c258 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c24e  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c250 0x2a9c6>                                              {[4, '(A6-0x6)']}
            <MI 2c254  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c258-2c262 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c258  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c25a 0x2aa12>                                              {[4, '(A6-0x6)']}
            <MI 2c25e  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c262-2c26c Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c262  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c264 0x2aa5e>                                              {[4, '(A6-0x6)']}
            <MI 2c268  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c26c-2c276 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c26c  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c26e 0x2aaaa>                                              {[4, '(A6-0x6)']}
            <MI 2c272  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c276-2c280 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c276  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c278 0x2aaf6>                                              {[4, '(A6-0x6)']}
            <MI 2c27c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c280-2c28a Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c280  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c282 0x2ab42>                                              {[4, '(A6-0x6)']}
            <MI 2c286  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c28a-2c294 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c28a  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c28c 0x2ab8e>                                              {[4, '(A6-0x6)']}
            <MI 2c290  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c294-2c29e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c294  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c296 0x2abd8>                                              {[4, '(A6-0x6)']}
            <MI 2c29a  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c29e-2c2a8 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c29e  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2a0 0x2ac22>                                              {[4, '(A6-0x6)']}
            <MI 2c2a4  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2a8-2c2b2 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2a8  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2aa 0x2ac6c>                                              {[4, '(A6-0x6)']}
            <MI 2c2ae  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2b2-2c2bc Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2b2  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2b4 0x2acb6>                                              {[4, '(A6-0x6)']}
            <MI 2c2b8  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2bc-2c2c6 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2bc  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2be 0x2ad00>                                              {[4, '(A6-0x6)']}
            <MI 2c2c2  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2c6-2c2d0 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2c6  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2c8 0x2ad4a>                                              {[4, '(A6-0x6)']}
            <MI 2c2cc  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2d0-2c2da Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2d0  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2d2 0x2ad94>                                              {[4, '(A6-0x6)']}
            <MI 2c2d6  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2da-2c2e4 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2da  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2dc 0x2adde>                                              {[4, '(A6-0x6)']}
            <MI 2c2e0  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2e4-2c2ee Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2e4  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2e6 0x2ae22>                                              {[4, '(A6-0x6)']}
            <MI 2c2ea  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2ee-2c2f8 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2ee  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2f0 0x2ae68>                                              {[4, '(A6-0x6)']}
            <MI 2c2f4  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c2f8-2c302 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c2f8  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c2fa 0x2ae9e>                                              {[4, '(A6-0x6)']}
            <MI 2c2fe  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c302-2c30c Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c302  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c304 0x2af2e>                                              {[4, '(A6-0x6)']}
            <MI 2c308  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c30c-2c316 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c30c  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c30e 0x2afa0>                                              {[4, '(A6-0x6)']}
            <MI 2c312  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c316-2c320 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c316  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c318 0x2a306>                                              {[4, '(A6-0x6)']}
            <MI 2c31c  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c320-2c32a Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c320  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c322 0x2a370>                                              {[4, '(A6-0x6)']}
            <MI 2c326  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c32a-2c330 Naked>                              Σ0         →0x2c36c ←0x2c164
            <Call 0x2c32a 0x2a342>                                              {}
            <MI 2c32e  BRA     0x2c36c>                                         {}
        <POP 2c330-2c33a Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c330  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c332 0x2b012>                                              {[4, '(A6-0x6)']}
            <MI 2c336  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c33a-2c344 Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c33a  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c33c 0x2b094>                                              {[4, '(A6-0x6)']}
            <MI 2c340  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c344-2c34e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c344  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c346 0x2b114>                                              {[4, '(A6-0x6)']}
            <MI 2c34a  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c34e-2c354 Naked>                              Σ0         →0x2c36c ←0x2c164
            <Call 0x2c34e 0x2b1d8>                                              {}
            <MI 2c352  BRA     0x2c36c>                                         {}
        <POP 2c354-2c35e Naked>                              Σ0 Δ-4     →0x2c1d4 ←0x2c164
            <MI 2c354  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c356 0x2b1f8>                                              {[4, '(A6-0x6)']}
            <MI 2c35a  BRA     0x2c1d4>                                         {[4, '(A6-0x6)']}
        <POP 2c35e-2c36c Naked>                              Σ0         ←0x2c164
            <POP 2c35e-2c36c Bailout>                                           {}
                <MI 2c35e  MOVEA.L (A5+0x8),A7>                         
                <MI 2c362  MOVEA.W #0x0,A6>                             
                <MI 2c366  JMP     0x2c576>                             
        <POP 2c36c-2c374 Naked>                              Σ0         ↓ ←0x2c0f4 ←0x2c1d4 ←0x2c1da ←0x2c202 ←0x2c32a ←0x2c34e
            <MI 2c36c  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[4, '(A6-0x6)']}
            <Call 0x2c36e 0x28c58>                                              {[4, '(A6-0x6)']}
            <POP 2c372-2c374 StackAdj>                       Δ+4                {}
        <POP 2c374-2c38a Naked>                              Σ0         ↓ →0x2c0a4 ←0x2c0a4
            <MI 2c374  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']}
            <MI 2c376  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']|[4, 'D6']}
            <MI 2c378  SUB.L   D7,(A7)>                                         {[4, 'D6']|[-4-]}
            <Call 0x2c37a 0x291ee>                                              {[4, 'D6']|[-4-]}
            <POP 2c37e-2c380 StackAdj>                       Δ+8                {}
            <MI 2c380  MOVE.L  D7,0x2f1e8>                                      {}
            <MI 2c382  TST.B   (A6-0xc)>                                        {}
            <MI 2c386  BEQ     0x2c0a4>                                         {}
        <POP 2c38a-2c392 Epilogue>                           Σ0         

0x2c392


@ 2c392
START
    <POP 2c392--0001 Body>                                              
        <POP 2c392-2c39c Prologue>                           Σ0         
        <POP 2c39c-2c3cc Naked>                              Σ0         ↓ →0x2c434
            <MI 2c39c  MOVE.L  #0x1,0x2f212>                                    {}
            <POP 2c3a6-2c3a8 StackAdj>                       Δ-4                {[-4-]}
            <Call 0x2c3a8 0x103c4>                                              {[-4-]}
                GetArgv() : String
            <MI 2c3ae  MOVE.L  (A7)+,0x2f216>                Δ+4                {}
            <Const 0x2c3b4 0x2f1f0.4>                        Δ-4                {[##193008]}
            <Call 0x2c3ba 0x285a0>                                              {[##193008]}
            <POP 2c3c0-2c3c2 StackAdj>                       Δ+4                {}
            <MI 2c3c2  MOVEA.L 0x2f216,A0>                                      {}
            <MI 2c3c8  TST.W   (A0)>                                            {}
            <MI 2c3ca  BLE     0x2c434>                                         {}
        <POP 2c3cc-2c434 Naked>                              Σ0         →0x2c46e
            <Blob 0x2c3cc [8] @>                             Δ-8                {[«8""»]}
            <Blob 0x2c3dc [8] @>                             Δ-8                {[«8""»]|[«8""»]}
            <POP 2c3ec-2c3ee StackAdj>                       Δ-8                {[«8""»]|[«8""»]|[-8-]}
            <Lit 0x2c3ee 7>                                                     {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
            <POP 2c400-2c402 StackAdj>                       Δ-4                {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[-4-]}
            <POP 2c402-2c403 StackAdj>                       Δ+4                {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
            <Blob 0x2c403 [4] 0x2f216>                       Δ-4                {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]}
            <POP 2c408-2c40a StackAdj>                       Δ-4                {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[-4-]}
            <Lit 0x2c40a 7>                                                     {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
            <Call 0x2c41e 0x102d4>                                              {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
                StringCat3(a, b, c : String) : String
            <POP 2c424-2c428 StackAdj>                       Δ+12               {[«8""»]|[«8""»]|[-4-]}
            <MI 2c428  MOVE.L  (A7)+,0x2f216>                Δ+4                {[«8""»]|[«8""»]}
            <POP 2c42e-2c432 StackAdj>                       Δ+16               {}
            <MI 2c432  BRA     0x2c46e>                                         {}
        <POP 2c434-2c46e Naked>                              Σ0         ↓ ←0x2c39c
            <Const 0x2c434 0x2f216.4>                        Δ-4                {[##193046]}
            <Call 0x2c43a 0x102bc>                                              {[##193046]}
                FreeString(VAR a : String)
            <POP 2c440-2c441 StackAdj>                       Δ+4        ↓       {}
            <Blob 0x2c441 [8] @>                             Δ-8                {[«8""»]}
            <POP 2c450-2c452 StackAdj>                       Δ-4                {[«8""»]|[-4-]}
            <Lit 0x2c452 7>                                                     {[«8""»]|[$$[INIT];]}
            <MI 2c466  MOVE.L  (A7)+,0x2f216>                Δ+4                {[«8""»]}
            <POP 2c46c-2c46e StackAdj>                       Δ+8                {}
        <POP 2c46e-2c476 Naked>                              Σ0         ↓ ←0x2c3cc
            <MI 2c46e  MOVE.B  #0x01,0x2f220>                                   {}
        <POP 2c476-2c47e Naked>                              Σ0         ↓ →0x2c488 ←0x2c584
            <MI 2c476  TST.B   0x2f220>                                         {}
            <MI 2c47c  BEQ     0x2c488>                                         {}
        <POP 2c47e-2c488 Naked>                              Σ0         →0x2c536
            <MI 2c47e  CLR.B   0x2f220>                                         {}
            <MI 2c484  BRA     0x2c536>                                         {}
        <POP 2c488-2c536 Naked>                              Σ0         ↓ ←0x2c476
            <Blob 0x2c488 [10] 0x2f1fa>                      Δ-10               {[«10»]}
            <Blob 0x2c496 [2] @>                             Δ-2                {[«10»]|[«2""»]}
            <POP 2c49a-2c49e StackAdj>                       Δ-12               {[«10»]|[«2""»]|[-12-]}
            <Lit 0x2c49e>                                                       {[«10»]|[«2""»]|[-8-]|[$$…]}
                <Pointer.sp 0x2c49e 14>                      Δ-4        
                <Const 0x2c4a2 0x1.2>                        Δ-2        
                <Const 0x2c4a6 0xa.2>                        Δ-2        
                <Call 0x2c4aa 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2c4b0-2c4b2 StackAdj>                   Δ+8        
            <POP 2c4b0-2c4b2 StackAdj>                       Δ-4                {[«10»]|[«2""»]|[-8-]|[$$…]|[-4-]}
            <Lit 0x2c4b2 2>                                                     {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
            <Call 0x2c4c6 0x102d0>                                              {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
                StringCat2(a, b : String) : String
            <POP 2c4cc-2c4ce StackAdj>                       Δ+8                {[«10»]|[«2""»]|[-8-]}
            <Call 0x2c4ce 0x103e4>                                              {[«10»]|[«2""»]|[-8-]}
                AskConsoleString(prompt : String) : String
            <POP 2c4d4-2c4d6 StackAdj>                       Δ+4                {[«10»]|[«2""»]|[-4-]}
            <MI 2c4d6  MOVE.L  (A7)+,0x2f21c>                Δ+4                {[«10»]|[«2""»]}
            <POP 2c4dc-2c4de StackAdj>                       Δ+8                {[-4-]}
            <POP 2c4de-2c4df StackAdj>                       Δ+4                {}
            <Blob 0x2c4df [4] 0x2f21c>                       Δ-4                {[«4»]}
            <Call 0x2c4e4 0x28ef2>                                              {[«4»]}
            <POP 2c4e8-2c4ea StackAdj>                       Δ+2                {[-2-]}
            <POP 2c4ea-2c4eb StackAdj>                       Δ+2                {}
            <Blob 0x2c4eb [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x2c4ee [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <POP 2c4f2-2c4f4 StackAdj>                       Δ-8                {[«2""»]|[«2""»]|[-8-]}
            <Lit 0x2c4f4 2>                                                     {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
            <POP 2c506-2c508 StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[-4-]}
            <POP 2c508-2c509 StackAdj>                       Δ+4                {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
            <Blob 0x2c509 [4] 0x2f21c>                       Δ-4                {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]}
            <POP 2c50e-2c510 StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[-4-]}
            <Lit 0x2c510 2>                                                     {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
            <Call 0x2c524 0x102d4>                                              {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
                StringCat3(a, b, c : String) : String
            <POP 2c52a-2c52e StackAdj>                       Δ+12               {[«2""»]|[«2""»]|[-4-]}
            <MI 2c52e  MOVE.L  (A7)+,0x2f216>                Δ+4                {[«2""»]|[«2""»]}
            <POP 2c534-2c536 StackAdj>                       Δ+4                {}
        <POP 2c536-2c562 Naked>                              Σ0         ↓ ←0x2c47e
            <MI 2c536  CLR.B   0x2f21a>                                         {}
            <MI 2c53c  MOVE.L  #0x1,0x2f1e8>                                    {}
            <MI 2c546  CLR.L   0x2f1ec>                                         {}
            <POP 2c54c-2c54e StackAdj>                       Δ-4                {[-4-]}
            <Blob 0x2c54e [4] 0x2f216>                       Δ-4                {[-4-]|[«4»]}
            <Call 0x2c554 0x102cc>                                              {[-4-]|[«4»]}
                StringDup(a : String) : String
            <POP 2c55a-2c55c StackAdj>                       Δ+4                {[-4-]}
            <Call 0x2c55c 0x29a64>                                              {[-4-]}
            <POP 2c560-2c562 StackAdj>                       Δ+4                {}
        <POP 2c562-2c570 Naked>                              Σ0         ↓ →0x2c576 ←0x2c570
            <MI 2c562  MOVE.L  0x2f1e8,D0>                                      {}
            <MI 2c568  CMP.L   0x2f1ec,D0>                                      {}
            <MI 2c56e  BGT     0x2c576>                                         {}
        <POP 2c570-2c576 Naked>                              Σ0         →0x2c562
            <Call 0x2c570 0x2c080>                                              {}
            <MI 2c574  BRA     0x2c562>                                         {}
        <POP 2c576-2c584 Naked>                              Σ0         ↓ ←0x2c562
            <Const 0x2c576 0x2f216.4>                        Δ-4                {[##193046]}
            <Call 0x2c57c 0x102bc>                                              {[##193046]}
                FreeString(VAR a : String)
            <POP 2c582-2c584 StackAdj>                       Δ+4                {}
        <POP 2c584-2c588 Naked>                              Σ0         →0x2c476
            <MI 2c584  BRA     0x2c476>                                         {}

0x2c59c


@ 2c59c
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 2c59c-2c604 Body>                                              
        <POP 2c59c-2c5b2 Prologue>                           Σ0         ↓
        <POP 2c5b2-2c5fc Naked>                              Σ0         ↓
            <Blob 0x2c5b2 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x2c5be 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 2c5c2-2c5c4 StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x2c5c4 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 2c5d6-2c5d8 StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2c5d8  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2c5dc  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2c5de  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2c5e0  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x2c5e2 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 2c5e8-2c5ea StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x2c5ea 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2c5f0-2c5f2 StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x2c5f2 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 2c5f8-2c5fc StackAdj>                       Δ+20               {}
        <POP 2c5fc-2c604 Epilogue>                           Σ0         

0x2c658


@ 2c658
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 2c658-2c794 Body>                                              
        <POP 2c658-2c66e Prologue>                           Σ0         ↓
        <POP 2c66e-2c684 RegCacheLoad>                       Σ0         ↓
        <POP 2c684-2c6e4 Naked>                              Σ0         ↓ →0x2c72c
            <Call 0x2c684 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x2c68a [18] @>                            Δ-18               {[«18""»]}
            <POP 2c696-2c698 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x2c698 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x2c6a4 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 2c6a6-2c6a7 StackAdj>                       Δ+22       ↓       {}
            <Blob 0x2c6a7 [14] @>                            Δ-14               {[«14""»]}
            <POP 2c6b6-2c6b8 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x2c6b8 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 2c6c2-2c6c4 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 2c6c4  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x2c6c8 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 2c6ce-2c6d0 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x2c6d0 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2c6d6-2c6d8 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x2c6d8 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2c6da-2c6dc StackAdj>                       Δ+18               {}
            <MI 2c6dc  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 2c6e0  CMPA.W  #0x01,A0>                                        {}
            <MI 2c6e2  BEQ     0x2c72c>                                         {}
        <POP 2c6e4-2c72c Naked>                              Σ0         ↓
            <Blob 0x2c6e4 [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x2c6f4 [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 2c704-2c706 StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x2c706 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 2c710-2c712 StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x2c712>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x2c712 12>                      Δ-4        
                <Const 0x2c716 0x1.2>                        Δ-2        
                <Const 0x2c718 0x1e.2>                       Δ-2        
                <Call 0x2c71a 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 2c71c-2c71e StackAdj>                   Δ+8        
            <Call 0x2c71e 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 2c724-2c726 StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x2c726 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2c728-2c72c StackAdj>                       Δ+48               {}
        <POP 2c72c-2c78c Naked>                              Σ0         ↓ ←0x2c684
            <Blob 0x2c72c [14] @>                            Δ-14               {[«14""»]}
            <POP 2c73c-2c73e StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x2c73e 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 2c748-2c74a StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 2c74a  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x2c74e 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 2c754-2c756 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x2c756 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2c75c-2c75e StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x2c75e 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2c760-2c761 StackAdj>                       Δ+18       ↓       {}
            <Blob 0x2c761 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x2c770 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 2c774-2c776 StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x2c776 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x2c784 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 2c78a-2c78c StackAdj>                       Δ+30               {}
        <POP 2c78c-2c794 Epilogue>                           Σ0         

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.505af5313c7b9116
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 c3 92              |        |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 f2 34              |   4    |		.PTR	0x2f234
00020010					code.end:
00020010 00 02 c7 94              |        |		.PTR	0x2c794
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 c5 9c              |        |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 c6 58              |   X    |		.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 40 28 23 29 42 45 4b 49  |@(#)BEKI|		.TXT	'@(#)BEKINS,3.3,90/12/06,11:11:00\ '
0002012c 49 4f 50 20 45 58 4f 53  |IOP EXOS|		.TXT	'IOP EXOS driver is not active '
0002014a 45 52 52 4f 52 20 2d 20  |ERROR - |		.TXT	'ERROR - The program does not have configuration information '
00020186 54 68 65 20 64 65 66 61  |The defa|		.TXT	'The default network controller is EXOS-204'
000201b0 44 65 6c 61 79 69 6e 67  |Delaying|		.TXT	'Delaying for controller to complete self test diagnostics '
000201ea 54 68 65 20 64 65 66 61  |The defa|		.TXT	'The default network controller is ENP100i '
00020214 44 6f 77 6e 6c 6f 61 64  |Download|		.TXT	'Downloading CMC ENP100i controller_ '
00020238 43 4f 4e 46 49 47 20 6e  |CONFIG n|		.TXT	'CONFIG not supported for ENP100i ethernet controller'
0002026c 47 45 54 20              |GET     |		.XXX[0x4]
00020270 6e 6f 74 20 79 65 74 20  |not yet |		.XXX[0x30]
00020278 73 75 70 70 6f 72 74 65  |supporte|
00020280 64 20 66 6f 72 20 45 4e  |d for EN|
00020288 50 31 30 30 69 20 65 74  |P100i et|
00020290 68 65 72 6e 65 74 20 63  |hernet c|
00020298 6f 6e 74 72 6f 6c 6c 65  |ontrolle|
000202a0 72 20                    |r       |		.XXX[0x2]
000202a2 54 45 52 4d 49 4e 41 54  |TERMINAT|		.TXT	'TERMINATE not yet supported for ENP100i ethernet controller '
000202de 42 45 4b 49 4e 53 2e 45  |BEKINS.E|		.TXT	'BEKINS.ERRMESS'
000202ec 20 20 20 20 20 20 20 20  |        |		.TXT	'                                      _ '
00020314 20 20 20 20 20 20 20 20  |        |		.TXT	'         _'
0002031e 46 72 6f 6d 2f 54 6f 20  |From/To |		.TXT	'From/To        : 16#'
00020332 50 61 63 6b 65 74 5f 4c  |Packet_L|		.TXT	'Packet_Length  : 16#'
00020346 45 78 63 65 73 73 5f 44  |Excess_D|		.TXT	'Excess_Data    : 16#'
0002035a 50 61 63 6b 65 74 5f 49  |Packet_I|		.TXT	'Packet_ID      : 16#'
0002036e 44 65 76 69 63 65 5f 44  |Device_D|		.TXT	'Device_Driver  : 16#'
00020382 43 6f 6d 6d 61 6e 64 5f  |Command_|		.TXT	'Command_ID     : 16#'
00020396 46 6c 61 67 73 20 20 20  |Flags   |		.TXT	'Flags          :_ '
000203a8 4c 61 73 74 5f 70 61 72  |Last_par|		.TXT	'Last_part '
000203b2 2c 20 52 65              |, Re    |		.TXT	', Re'
000203b6 73 75 6d 65              |sume    |		.TXT	'sume'
000203ba 2c 20 53 75 63 63 65 73  |, Succes|		.TXT	', Success '
000203c4 2c 20 4d 75 6c 74 69 5f  |, Multi_|		.TXT	', Multi_Part_Response '
000203da 52 65 73 70 6f 6e 73 65  |Response|		.TXT	'Response to    :_ '
000203ec 56 65 72 62 6f 73 65 20  |Verbose |		.TXT	'Verbose input page'
000203fe 43 6f 6e 74 61 69 6e 73  |Contains|		.TXT	'Contains_ '
00020408 20 66 6c 6f 77 20 63 6f  | flow co|		.TXT	' flow control signal(s) and_'
00020424 20 69 6e 70 75 74 20 62  | input b|		.TXT	' input buffer(s) (decimal values) '
00020446 54 65 72 73              |Ters    |		.TXT	'Ters'
0002044a 65 20 69 6e              |e in    |		.TXT	'e in'
0002044e 70 75 74 20              |put     |		.TXT	'put '
00020452 70 61 67 65              |page    |		.TXT	'page'
00020456 46 6f 72 20              |For     |		.TXT	'For '
0002045a 63 68 61 6e              |chan    |		.TXT	'chan'
0002045e 6e 65 6c 5f              |nel_    |		.TXT	'nel_'
00020462 52 45 53 45 54 20        |RESET   |		.TXT	'RESET '
00020468 49 4f 50 20 45 4e 50 20  |IOP ENP |		.TXT	'IOP ENP DRIVER = 16#'
0002047c 57 52 49 54 45 20        |WRITE   |		.TXT	'WRITE '
00020482 42 79 74 65 73 20 77 72  |Bytes wr|		.TXT	'Bytes written  : 16#'
00020496 52 45 41 44              |READ    |		.TXT	'READ'
0002049a 42 79 74 65 73 20 72 65  |Bytes re|		.TXT	'Bytes read     : 16#'
000204ae 43 4f 4e 46 49 47 55 52  |CONFIGUR|		.TXT	'CONFIGURE '
000204b8 49 4e 50 55 54 20        |INPUT   |		.TXT	'INPUT '
000204be 43 4f 4e 54 52 4f 4c 20  |CONTROL |		.TXT	'CONTROL '
000204c6 49 4d 4d 45 44 49 41 54  |IMMEDIAT|		.TXT	'IMMEDIATE '
000204d0 54 52 41 4e              |TRAN    |		.TXT	'TRAN'
000204d4 53 4d 49 54              |SMIT    |		.TXT	'SMIT'
000204d8 41 42 4f 52 54 20        |ABORT   |		.TXT	'ABORT '
000204de 49 4f 50 3d 3e 52 31 4b  |IOP=>R1K|		.TXT	'IOP=>R1K response, raw header :_  '
00020500 20 6c 69 6e 65 73 20 73  | lines s|		.TXT	' lines same as above. '
00020516 3a 5f                    |:_      |		.TXT	':_'
00020518 5f 5f 5f 5f              |____    |		.TXT	'____'
0002051c 4e 45 54 5f 50 52 49 4e  |NET_PRIN|		.TXT	'NET_PRINTF =>_'
0002052a 46 6c 75 73 68 69 6e 67  |Flushing|		.TXT	'Flushing packet :_'
0002053c 50 61 63 6b 65 74 20 68  |Packet h|		.TXT	'Packet header is: '
0002054e 50 61 75 73 65 64 2c 20  |Paused, |		.TXT	'Paused, strike any key to procede '
00020570 63 5f 73 74 61 74 65 20  |c_state |		.TXT	'c_state             : 16# '
0002058a 63 5f 68 73 74 61 74 65  |c_hstate|		.TXT	'c_hstate            : 16# '
000205a4 63 5f 6f 70 74 69 6f 6e  |c_option|		.TXT	'c_options           : 16# '
000205be 63 5f 69 6e 66 6c 69 67  |c_inflig|		.TXT	'c_inflight          : 16# '
000205d8 63 5f 6f 70 62 66 72 20  |c_opbfr |		.TXT	'c_opbfr             : 16# '
000205f2 63 5f 74 6f 68 6f 73 74  |c_tohost|		.TXT	'c_tohost.rdidx      : 16# '
0002060c 63 5f 74 6f 68 6f 73 74  |c_tohost|		.TXT	'c_tohost.wrtidx     : 16# '
00020626 63 5f 74 6f 68 6f 73 74  |c_tohost|		.TXT	'c_tohost.size       : 16# '
00020640 63 5f 74 6f 68 6f 73 74  |c_tohost|		.TXT	'c_tohost.slots      : 16# '
0002065a 2c 20 31 36 23 20        |, 16#   |		.TXT	', 16# '
00020660 63 5f 73 72 69 6e 67 2e  |c_sring.|		.TXT	'c_sring.rdidx       : 16# '
0002067a 63 5f 73 72 69 6e 67 2e  |c_sring.|		.TXT	'c_sring.wrtidx      : 16# '
00020694 63 5f 73 6f 20 20 20 20  |c_so    |		.TXT	'c_so                : 16# '
000206ae 20 69 73 20 75 6e 6b 6e  | is unkn|		.TXT	' is unknown         : 16# '
000206c8 52 65 6d 6f 74 65 20 53  |Remote S|		.TXT	'Remote SOCKADDR '
000206d8 4c 6f 63 61 6c 20 53 4f  |Local SO|		.TXT	'Local SOCKADDR'
000206e6 41 46 5f 49              |AF_I    |		.TXT	'AF_I'
000206ea 4e 45 54 5f              |NET_    |		.TXT	'NET_'
000206ee 41 46 5f 45 54 48 5f 20  |AF_ETH_ |		.TXT	'AF_ETH_ '
000206f6 2c 20 50 4f              |, PO    |		.TXT	', PO'
000206fa 52 54 3d 5f              |RT=_    |		.TXT	'RT=_'
000206fe 2c 20 49 50 20 61 64 64  |, IP add|		.TXT	', IP address =_ '
0002070e 2c 20                    |,       |		.XXX[0x2]
00020710 54 59 50 45 20 3d 31 36  |TYPE =16|		.XXX[0x8]
00020718 23 20                    |#       |		.XXX[0x2]
0002071a 2c 20 45 54 48 45 52 4e  |, ETHERN|		.TXT	', ETHERNET address =_ '
00020730 45 4e 50 20 43 68 61 6e  |ENP Chan|		.TXT	'ENP Channel structure address =_'
00020750 49 4f 50 20 43 68 61 6e  |IOP Chan|		.TXT	'IOP Channel structure address =_'
00020770 65 63 63 62 5f 72 78 5f  |eccb_rx_|		.TXT	'eccb_rx_link        : 16# '
0002078a 65 63 63 62              |eccb    |		.TXT	'eccb'
0002078e 5f 66 6c 61              |_fla    |		.TXT	'_fla'
00020792 67 73 20 3a              |gs :    |		.TXT	'gs :'
00020796 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_exists       =>_ '
000207b0 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_tx_flush     =>_ '
000207ca 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_on_input     =>_ '
000207e4 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_continuation =>_ '
000207fe 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_xoff_med     =>_ '
00020818 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_xoff_short   =>_ '
00020832 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_tx_gathering =>_ '
0002084c 20 20 20 62 5f 65 63 66  |   b_ecf|		.TXT	'   b_ecf_rx_gathering =>_ '
00020866 65 63 63 62 5f 63 72 65  |eccb_cre|		.TXT	'eccb_credits        : 16# '
00020880 65 63 63 62 5f 73 68 6f  |eccb_sho|		.TXT	'eccb_shorts_in_use  : 16# '
0002089a 65 63 63 62 5f 6d 65 64  |eccb_med|		.TXT	'eccb_mediums_in_use : 16# '
000208b4 65 63 63 62 5f 63 68 61  |eccb_cha|		.TXT	'eccb_channel_number : 16# '
000208ce 65 63 63 62 5f 63 73 74  |eccb_cst|		.TXT	'eccb_cstruct        : 16# '
000208e8 65 63 63 62 5f 72 78 5f  |eccb_rx_|		.TXT	'eccb_rx_buffer_head : 16# '
00020902 65 63 63 62 5f 72 78 5f  |eccb_rx_|		.TXT	'eccb_rx_buffer_tail : 16# '
0002091c 53 73 5f 5a 6f 6d 62 69  |Ss_Zombi|		.TXT	'Ss_Zombie '
00020926 53 73 5f 41              |Ss_A    |		.TXT	'Ss_A'
0002092a 6c 6c 6f 63              |lloc    |		.TXT	'lloc'
0002092e 53 73 5f 43 6c 6f 73 65  |Ss_Close|		.TXT	'Ss_Closeing '
0002093a 53 73 5f 42              |Ss_B    |		.TXT	'Ss_B'
0002093e 6f 75 6e 64              |ound    |		.TXT	'ound'
00020942 53 73 5f 41 74 6d 61 72  |Ss_Atmar|		.TXT	'Ss_Atmark '
0002094c 53 73 5f 52 65 73 76 20  |Ss_Resv |		.TXT	'Ss_Resv '
00020954 53 73 5f 42 72 6f 6b 65  |Ss_Broke|		.TXT	'Ss_Broken '
0002095e 53 73 5f 4e 6f 77 72 69  |Ss_Nowri|		.TXT	'Ss_Nowrite'
00020968 53 73 5f 4e 6f 72 65 61  |Ss_Norea|		.TXT	'Ss_Noread '
00020972 53 73 5f 43 6f 6e 6e 65  |Ss_Conne|		.TXT	'Ss_Connecting '
00020980 53 73 5f 4c 69 73 74 65  |Ss_Liste|		.TXT	'Ss_Listen '
0002098a 53 73 5f 43              |Ss_C    |		.TXT	'Ss_C'
0002098e 6f 6e 6e 65              |onne    |		.TXT	'onne'
00020992 63 74 65 64              |cted    |		.TXT	'cted'
00020996 53 73 5f 4f 70 65 6e 20  |Ss_Open |		.TXT	'Ss_Open '
0002099e 53 73 5f 41              |Ss_A    |		.TXT	'Ss_A'
000209a2 76 61 69 6c              |vail    |		.TXT	'vail'
000209a6 20 69 73 20 65 6d 70 74  | is empt|		.TXT	' is empty (all 0s)'
000209b8 65 63 63 62 5f 68 75 67  |eccb_hug|		.TXT	'eccb_huge_tx_base   : 16# '
000209d2 65 63 63 62 5f 68 75 67  |eccb_hug|		.TXT	'eccb_huge_tx_next   : 16# '
000209ec 65 63 63 62 5f 68 75 67  |eccb_hug|		.TXT	'eccb_huge_tx_left   : 16# '
00020a06 65 63 63 62 5f 68 75 67  |eccb_hug|		.TXT	'eccb_huge_rx_next   : 16# '
00020a20 65 63 63 62 5f 68 75 67  |eccb_hug|		.TXT	'eccb_huge_rx_left   : 16# '
00020a3a 2c 5f                    |,_      |		.TXT	',_'
00020a3c 54 20                    |T       |		.TXT	'T '
00020a3e 46 20                    |F       |		.TXT	'F '
00020a40 2d 20                    |-       |		.TXT	'- '
00020a42 2c 20 31 36 23 20        |, 16#   |		.TXT	', 16# '
00020a48 63 6f 6e 66 69 67 75 72  |configur|		.TXT	'configure failed, completion code = $ '
00020a6e 45 74 68 65 72 6e 65 74  |Ethernet|		.TXT	'Ethernet Address (hex)_ '
00020a86 2d 20                    |-       |		.TXT	'- '
00020a88 2c 20 28 64              |, (d    |		.TXT	', (d'
00020a8c 65 63 69 6d              |ecim    |		.TXT	'ecim'
00020a90 61 6c 29 5f              |al)_    |		.TXT	'al)_'
00020a94 2e 20                    |.       |		.TXT	'. '
00020a96 54 43 50 5f 49 50 5f 48  |TCP_IP_H|		.TXT	'TCP_IP_HOST_ID'
00020aa4 4c 49                    |LI      |		.TXT	'LI'
00020aa6 50 20                    |P       |		.XXX[0x2]
00020aa8 45 6e 74 65 72 20 49 50  |Enter IP|		.TXT	'Enter IP address of this machine [089.064.003.007] :_ '
00020ade 45 74 68 65 72 6e 65 74  |Ethernet|		.TXT	'Ethernet Address (hex)_ '
00020af6 2d 20                    |-       |		.TXT	'- '
00020af8 2c 20 28 64              |, (d    |		.TXT	', (d'
00020afc 65 63 69 6d              |ecim    |		.TXT	'ecim'
00020b00 61 6c 29 5f              |al)_    |		.TXT	'al)_'
00020b04 2e 20                    |.       |		.TXT	'. '
00020b06 46 49 4c 45              |FILE    |		.TXT	'FILE'
00020b0a 4e 41 4d 45              |NAME    |		.TXT	'NAME'
00020b0e 45 4e 50 43 4f 44 45 2e  |ENPCODE.|		.TXT	'ENPCODE.S '
00020b18 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure CONNECT '
00020b2a 63 6f 6e 6e 65 63 74 20  |connect |		.TXT	'connect failed'
00020b38 55 53                    |US      |		.TXT	'US'
00020b3a 45 20                    |E       |		.XXX[0x2]
00020b3c 49 50                    |IP      |		.TXT	'IP'
00020b3e 45 6e 74 65 72 20 49 50  |Enter IP|		.TXT	'Enter IP address of server :_ '
00020b5c 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure SOCONNECT '
00020b70 73 6f 63 6f              |soco    |		.TXT	'soco'
00020b74 6e 6e 65 63              |nnec    |		.TXT	'nnec'
00020b78 74 20 66 61              |t fa    |		.TXT	't fa'
00020b7c 69 6c 65 64              |iled    |		.TXT	'iled'
00020b80 53 4f 43 4f 4e 4e 45 43  |SOCONNEC|		.TXT	'SOCONNECT REQUEST ended in error'
00020ba0 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure SOCLOSE '
00020bb2 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure SOSOCKET'
00020bc4 53 6f 73 6f 63 6b 65 74  |Sosocket|		.TXT	'Sosocket packet header /= success '
00020be6 73 6f 73 6f 63 6b 65 74  |sosocket|		.TXT	'sosocket request ended in error '
00020c06 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure SEND_STRING '
00020c1c 20 20 20 73 65 6e 64 69  |   sendi|		.TXT	'   sending :_ '
00020c2a 73 6f 73 65 6e 64 20 66  |sosend f|		.TXT	'sosend failed '
00020c38 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure GET_STRING'
00020c4c 20 20 20 67              |   g    |		.TXT	'   g'
00020c50 6f 74 3a 5f              |ot:_    |		.TXT	'ot:_'
00020c54 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure GET_A_PAGE_FROM_exos'
00020c72 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure GET_SOME_ENP_DATA '
00020c8e 55 6e 65 78 70 65 63 74  |Unexpect|		.TXT	'Unexpected buffer received. '
00020caa 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure GET_BUFFERED_DATA '
00020cc6 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure GET_A_PAGE_FROM_ENP100'
00020ce6 44 46 53 5f              |DFS_    |		.TXT	'DFS_'
00020cea 4e 41 4d 45              |NAME    |		.TXT	'NAME'
00020cee 44 46                    |DF      |		.TXT	'DF'
00020cf0 53 20                    |S       |		.XXX[0x2]
00020cf2 45 6e 74 65 72 20 44 46  |Enter DF|		.TXT	'Enter DFS file name :_'
00020d08 4b 20                    |K       |		.TXT	'K '
00020d0a 50 20                    |P       |		.TXT	'P '
00020d0c 54 20                    |T       |		.TXT	'T '
00020d0e 45 6e 74 65 72 20 44 46  |Enter DF|		.TXT	'Enter DFS filetype [K/P/T] :_ '
00020d2c 4f 20                    |O       |		.TXT	'O '
00020d2e 4f 76 65 72 77 72 69 74  |Overwrit|		.TXT	'Overwrite existing file '
00020d46 52 65 74 72 69 65 76 65  |Retrieve|		.TXT	'Retrieved _ '
00020d52 2c 20 66 69 6c 65 20 73  |, file s|		.TXT	', file size (in bytes decimal) is :_'
00020d76 42 45 4b 49 4e 53 20 20  |BEKINS  |		.TXT	'BEKINS     => DOWNLOADING required'
00020d98 42 45 4b 49 4e 53 20 20  |BEKINS  |		.TXT	'BEKINS     => CONFIGURE, REMOTE DOWNLOAD'
00020dc0 42 45 4b 49 4e 53 20 20  |BEKINS  |		.TXT	'BEKINS     => Waiting for revision messages '
00020dec 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure DO_GET_TCP_CHANNEL'
00020e08 52 45                    |RE      |		.TXT	'RE'
00020e0a 53 55                    |SU      |		.TXT	'SU'
00020e0c 4d 45                    |ME      |		.TXT	'ME'
00020e0e 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure DO_RESERVE_TCP'
00020e26 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure DO_BIND_TCP '
00020e3c 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure DO_ACTIVE_OPEN_TCP'
00020e58 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure CMC_SEND_STRING '
00020e72 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure CMC_GET_STRING'
00020e8a 50 72 6f 63 65 64 75 72  |Procedur|		.TXT	'Procedure CMC_CLOSE '
00020e9e 43 6c 6f 73 69 6e 67 20  |Closing |		.TXT	'Closing channel '
00020eae 44 44                    |DD      |		.TXT	'DD'
00020eb0 55 53                    |US      |		.TXT	'US'
00020eb2 45 20                    |E       |		.XXX[0x2]
00020eb4 3a 67 65 74 3a 20        |:get:   |		.TXT	':get: '
00020eba 52 31 4b 5f              |R1K_    |		.TXT	'R1K_'
00020ebe 4e 41 4d 45              |NAME    |		.TXT	'NAME'
00020ec2 3a 21                    |:!      |		.TXT	':!'
00020ec4 3a 20                    |:       |		.TXT	': '
00020ec6 52 31                    |R1      |		.TXT	'R1'
00020ec8 4b 20                    |K       |		.XXX[0x2]
00020eca 3a 21                    |:!      |		.TXT	':!'
00020ecc 3a 20                    |:       |		.TXT	': '
00020ece 3a 21                    |:!      |		.TXT	':!'
00020ed0 45 6e 74 65 72 20 66 75  |Enter fu|		.TXT	'Enter full R1000 pathname :_'
00020eec 61 62 6f 72 74 65 64 20  |aborted |		.TXT	'aborted '
00020ef4 42 45 4b 49 4e 53 2e 45  |BEKINS.E|		.TXT	'BEKINS.ERRMESS'
00020f02 20 20 20 5f              |   _    |		.TXT	'   _'
00020f06 42 45 4b 49 4e 53 2e 45  |BEKINS.E|		.TXT	'BEKINS.ERRMESS'
00020f14 44 44                    |DD      |		.TXT	'DD'
00020f16 55 53                    |US      |		.TXT	'US'
00020f18 45 20                    |E       |		.XXX[0x2]
00020f1a 3a 67 65 74 3a 20        |:get:   |		.TXT	':get: '
00020f20 52 31 4b 5f              |R1K_    |		.TXT	'R1K_'
00020f24 4e 41 4d 45              |NAME    |		.TXT	'NAME'
00020f28 3a 21                    |:!      |		.TXT	':!'
00020f2a 3a 20                    |:       |		.TXT	': '
00020f2c 52 31                    |R1      |		.TXT	'R1'
00020f2e 4b 20                    |K       |		.XXX[0x2]
00020f30 3a 21                    |:!      |		.TXT	':!'
00020f32 3a 20                    |:       |		.TXT	': '
00020f34 3a 21                    |:!      |		.TXT	':!'
00020f36 45 6e 74 65 72 20 66 75  |Enter fu|		.TXT	'Enter full R1000 pathname :_'
00020f52 61 62 6f 72 74 65 64 20  |aborted |		.TXT	'aborted '
00020f5a 42 45 4b 49 4e 53 2e 45  |BEKINS.E|		.TXT	'BEKINS.ERRMESS'
00020f68 20 20 20 5f              |   _    |		.TXT	'   _'
00020f6c 42 45 4b 49 4e 53 2e 45  |BEKINS.E|		.TXT	'BEKINS.ERRMESS'
00020f7a 42 45 4b 49 4e 53 2e 45  |BEKINS.E|		.TXT	'BEKINS.ERRMESS'
00020f88 56 20                    |V       |		.TXT	'V '
00020f8a 44 20                    |D       |		.TXT	'D '
00020f8c 49 20                    |I       |		.TXT	'I '
00020f8e 4e 20                    |N       |		.TXT	'N '
00020f90 42 45 4b 49              |BEKI    |		.TXT	'BEKI'
00020f94 4e 53 3e 5f              |NS>_    |		.TXT	'NS>_'
00020f98 43 4f 4e 46 49 47 20 20  |CONFIG  |		.XXX[0x78]
00020fa0 20 20 44 45 42 55 47 20  |  DEBUG |
00020fa8 20 20 20 20 52 45 56 20  |    REV |
00020fb0 20 20 20 20 20 20 53 45  |      SE|
00020fb8 41 20 20 20 20 20 20 20  |A       |
00020fc0 47 45 54 20 20 20 20 20  |GET     |
00020fc8 20 20 54 45 52 4d 49 4e  |  TERMIN|
00020fd0 41 54 45 20 44 4f 55 53  |ATE DOUS|
00020fd8 45 20 20 20 20 20 45 58  |E     EX|
00020fe0 4f 53 20 20 20 20 20 20  |OS      |
00020fe8 43 4d 43 20 20 20 20 20  |CMC     |
00020ff0 20 20 53 48 4f 57 5f 43  |  SHOW_C|
00020ff8 48 4e 4c 20 4d 34 30 30  |HNL M400|
00021000 20 20 20 20 20 20 54 45  |      TE|
00021008 53 54 20 20 20 20 20 20  |ST      |
00021010 6e 6f                    |no      |		.TXT	'no'
00021012 20 77                    | w      |		.TXT	' w'
00021014 61 79                    |ay      |		.TXT	'ay'
00021016 42 45                    |BE      |		.XXX[0x2]
00021018 4b 49 4e 53 20 20 20 20  |KINS    |		.XXX[0x58]
00021020 00 00 00 00 00 05 00 00  |        |
00021028 00 00 00 00 00 00 00 00  |        |
00021030 00 00 00 00 00 05 00 00  |        |
00021038 00 00 00 03 00 00 00 00  |        |
00021040 00 00 00 00 00 05 00 00  |        |
00021048 00 00 00 06 00 00 00 00  |        |
00021050 00 00 00 00 00 05 00 00  |        |
00021058 00 00 00 07 00 00 00 00  |        |
00021060 00 00 00 00 00 05 00 00  |        |
00021068 00 00 00 04 00 00 00 00  |        |
00021070 2f 00 00 01 78 79 61 62  |/   xyab|		.CONST	0x2f,0x0,0x0,0x1,0x78,0x79,0x61,0x62,0xff,0x0,0x1,0x1,0x0,0x0,0x0,0x3,0x0,0x0,0x1,0x3,0x7,0xf,0x1,0x3,0x7,0xf,0x1,0x3,0x7,0xf,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x1,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
000210c2 2f 00 00 01 78 79 61 62  |/   xyab|		.CONST	0x2f,0x0,0x0,0x1,0x78,0x79,0x61,0x62,0xff,0x2,0x1,0x1,0x0,0x0,0x0,0x3,0x0,0x0,0x1,0x3,0x7,0xf,0x1,0x3,0x7,0xf,0x1,0x3,0x7,0xf,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x1,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
00021114 00 10 00 00              |        |		.XXX[0x4]
00021118 00 00 00 00 09 00 02 fd  |        |		.XXX[0x8]
00021120 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x40]
00021160 00 00 00 00 00 00        |        |		.BLANK	00[0x6]
00021166 ff 03                    |        |		.XXX[0x2]
00021168 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x20]
00021188 00 00 00 00              |        |		.BLANK	00[0x4]
0002118c 7e 00 00 00              |~       |		.XXX[0x4]
00021190 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x10]
000211a0 00 00 00 00 00 00 ff 03  |        |		.XXX[0x8]
000211a8 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x20]
000211c8 7e 00 00 00 00 00 00 00  |~       |		.XXX[0x8]
000211d0 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x10]
000211e0 00 00 00 00 00 00 ff 03  |        |		.XXX[0x8]
000211e8 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x18]
00021200 61 62 63 64 65 66 67 68  |abcdefgh|		.XXX[0x60]
00021208 69 6a 6b 6c 6d 6e 6f 70  |ijklmnop|
00021210 71 72 73 74 75 76 77 78  |qrstuvwx|
00021218 00 00 00 00 00 00 00 00  |        |
00021220 00 05 00 00 00 00 00 02  |        |
00021228 00 00 00 00 00 26 00 00  |     &  |
00021230 00 00 00 01 34 7f 00 01  |    4   |
00021238 00 02 01 1a 59 40 05 41  |    Y@ A|
00021240 00 00 00 00 00 00 00 00  |        |
00021248 00 02 00 01 00 00 00 01  |        |
00021250 00 48 00 00 00 26 00 00  | H   &  |
00021258 00 00 00 01 38 7f 00 00  |    8   |
00021260 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x10]
00021270 00 02 00 01 00 00 00 00  |        |		.XXX[0xb8]
00021278 00 00 00 00 00 26 00 00  |     &  |
00021280 00 00 00 01 32 7f 00 00  |    2   |
00021288 00 02 04 01 00 00 00 00  |        |
00021290 00 00 00 00 00 00 00 00  |        |
00021298 00 02 00 01 00 00 00 01  |        |
000212a0 00 48 00 00 04 10 00 02  | H      |
000212a8 00 06 00 00 02 82 00 00  |        |
000212b0 00 ff 00 01 43 4f 4e 46  |    CONF|
000212b8 49 47 20 20 20 20 44 45  |IG    DE|
000212c0 42 55 47 20 20 20 20 20  |BUG     |
000212c8 52 45 56 20 20 20 20 20  |REV     |
000212d0 20 20 53 45 41 20 20 20  |  SEA   |
000212d8 20 20 20 20 47 45 54 20  |    GET |
000212e0 20 20 20 20 20 20 54 45  |      TE|
000212e8 52 4d 49 4e 41 54 45 20  |RMINATE |
000212f0 44 4f 55 53 45 20 20 20  |DOUSE   |
000212f8 20 20 45 58 4f 53 20 20  |  EXOS  |
00021300 20 20 20 20 43 4d 43 20  |    CMC |
00021308 20 20 20 20 20 20 53 48  |      SH|
00021310 4f 57 5f 43 48 4e 4c 20  |OW_CHNL |
00021318 4d 34 30 30 20 20 20 20  |M400    |
00021320 20 20 54 45 53 54 20 20  |  TEST  |
00021328 20 20 20 20              |        |		.XXX[0x4]
0002132c ; --------------------------------------------------------------------------------------
0002132c ; OMSI PASCAL Function
0002132c ;    <LVAR  0x008 4(r)>
0002132c ; --------------------------------------------------------------------------------------
0002132c 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
00021330 bf d5                    |        |		CMPA.L	(A5),A7
00021332 62 06                    |b       |		BHI	0x2133a
00021334 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021338 4e 76                    |Nv      |		TRAPV
0002133a de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
0002133e 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00021342 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
00021344 41 fa ef a6              |A       |		LEA.L	0x202ec,A0
00021348 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002134a 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002134c 51 c8 ff fc              |Q       |		DBF	D0,0x2134a
00021350 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021352 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021356 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002135a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002135c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021362 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021364 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
00021368 4e b9 00 01 04 50        |N    P  |		JSR	FS_10450(&, &)
0002136e de fc 00 14              |        |		ADDA.W	#0x14,A7
00021372 1e 81                    |        |		MOVE.B	D1,(A7)
00021374 48 78 00 01              |Hx      |		PEA.L	0x1
00021378 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002137e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021380 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00021384 4e 5e                    |N^      |		UNLK	A6
00021386 4e 75                    |Nu      |		RTS
00021388 ; --------------------------------------------------------------------------------------
00021388 ; OMSI PASCAL Function
00021388 ;    <LVAR  0x00a 4(w)>
00021388 ;    <LVAR  0x008 1(r)>
00021388 ; --------------------------------------------------------------------------------------
00021388 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
0002138c bf d5                    |        |		CMPA.L	(A5),A7
0002138e 62 06                    |b       |		BHI	0x21396
00021390 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021394 4e 76                    |Nv      |		TRAPV
00021396 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002139a 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
0002139e 42 80                    |B       |		CLR.L	D0
000213a0 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000213a4 41 fa fd ba              |A       |		LEA.L	0x21160,A0
000213a8 32 00                    |2       |		MOVE.W	D0,D1
000213aa e6 49                    | I      |		LSR.W	#0x3,D1
000213ac 01 30 10 00              | 0      |		BTST.B	D0,(A0+D1.W)
000213b0 67 0c                    |g       |		BEQ	0x213be
000213b2 04 40 00 30              | @ 0    |		SUBI.W	#0x0030,D0
000213b6 48 c0                    |H       |		EXTW.L	D0
000213b8 2d 40 00 0a              |-@      |		MOVE.L	D0,(A6+0xa)
000213bc 60 0a                    |`       |		BRA	0x213c8
000213be 48 78 00 23              |Hx #    |		PEA.L	0x23
000213c2 4e ba ff 68              |N  h    |		JSR	0x2132c
000213c6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213c8 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
000213cc 4e 5e                    |N^      |		UNLK	A6
000213ce 4e 75                    |Nu      |		RTS
000213d0 ; --------------------------------------------------------------------------------------
000213d0 ; OMSI PASCAL Function
000213d0 ;    <LVAR  0x00a 4(w)>
000213d0 ;    <LVAR  0x008 1(rw)>
000213d0 ; --------------------------------------------------------------------------------------
000213d0 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
000213d4 bf d5                    |        |		CMPA.L	(A5),A7
000213d6 62 06                    |b       |		BHI	0x213de
000213d8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000213dc 4e 76                    |Nv      |		TRAPV
000213de de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000213e2 48 e7 e0 c0              |H       |		MOVEM.L	A1+A0+D2+D1+D0,-(A7)
000213e6 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
000213ea 74 20                    |t       |		MOVEQ.L	#0x20,D2
000213ec 42 80                    |B       |		CLR.L	D0
000213ee 10 11                    |        |		MOVE.B	(A1),D0
000213f0 41 fa fd 8e              |A       |		LEA.L	0x21180,A0
000213f4 32 00                    |2       |		MOVE.W	D0,D1
000213f6 e6 49                    | I      |		LSR.W	#0x3,D1
000213f8 01 30 10 00              | 0      |		BTST.B	D0,(A0+D1.W)
000213fc 67 08                    |g       |		BEQ	0x21406
000213fe 90 42                    | B      |		SUB.W	D2,D0
00021400 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
00021404 12 80                    |        |		MOVE.B	D0,(A1)
00021406 42 80                    |B       |		CLR.L	D0
00021408 10 11                    |        |		MOVE.B	(A1),D0
0002140a 41 fa fd 94              |A       |		LEA.L	0x211a0,A0
0002140e 32 00                    |2       |		MOVE.W	D0,D1
00021410 e6 49                    | I      |		LSR.W	#0x3,D1
00021412 01 30 10 00              | 0      |		BTST.B	D0,(A0+D1.W)
00021416 67 0c                    |g       |		BEQ	0x21424
00021418 04 40 00 30              | @ 0    |		SUBI.W	#0x0030,D0
0002141c 48 c0                    |H       |		EXTW.L	D0
0002141e 2d 40 00 0a              |-@      |		MOVE.L	D0,(A6+0xa)
00021422 60 2a                    |`*      |		BRA	0x2144e
00021424 41 fa fd 9a              |A       |		LEA.L	0x211c0,A0
00021428 32 00                    |2       |		MOVE.W	D0,D1
0002142a e6 49                    | I      |		LSR.W	#0x3,D1
0002142c b2 42                    | B      |		CMP.W	D2,D1
0002142e 6d 04                    |m       |		BLT	0x21434
00021430 72 00                    |r       |		MOVEQ.L	#0x00,D1
00021432 60 04                    |`       |		BRA	0x21438
00021434 01 30 10 00              | 0      |		BTST.B	D0,(A0+D1.W)
00021438 67 0a                    |g       |		BEQ	0x21444
0002143a 04 40 00 41              | @ A    |		SUBI.W	#0x0041,D0
0002143e 06 40 00 0a              | @      |		ADDI.W	#0x000a,D0
00021442 60 d8                    |`       |		BRA	0x2141c
00021444 48 78 00 24              |Hx $    |		PEA.L	0x24
00021448 4e ba fe e2              |N       |		JSR	0x2132c
0002144c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002144e 4c df 03 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1
00021452 4e 5e                    |N^      |		UNLK	A6
00021454 4e 75                    |Nu      |		RTS
00021456 ; --------------------------------------------------------------------------------------
00021456 ; OMSI PASCAL Function
00021456 ; --------------------------------------------------------------------------------------
00021456 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
0002145a bf d5                    |        |		CMPA.L	(A5),A7
0002145c 62 06                    |b       |		BHI	0x21464
0002145e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021462 4e 76                    |Nv      |		TRAPV
00021464 de fc 00 50              |   P    |		ADDA.W	#0x50,A7
00021468 48 e7 f0 c0              |H       |		MOVEM.L	A1+A0+D3+D2+D1+D0,-(A7)
0002146c 72 0d                    |r       |		MOVEQ.L	#0x0d,D1
0002146e 74 01                    |t       |		MOVEQ.L	#0x01,D2
00021470 76 27                    |v'      |		MOVEQ.L	#0x27,D3
00021472 1f 01                    |        |		MOVE.B	D1,-(A7)
00021474 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
0002147a 9e fc 00 26              |   &    |		SUBA.W	#0x26,A7
0002147e 20 4f                    | O      |		MOVEA.L	A7,A0
00021480 43 fa ee 6a              |C  j    |		LEA.L	0x202ec,A1
00021484 70 26                    |p&      |		MOVEQ.L	#0x26,D0
00021486 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021488 51 c8 ff fc              |Q       |		DBF	D0,0x21486
0002148c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002148e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021492 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021494 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021496 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002149c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002149e 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000214a4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000214a6 20 4f                    | O      |		MOVEA.L	A7,A0
000214a8 43 fa ee 42              |C  B    |		LEA.L	0x202ec,A1
000214ac 70 26                    |p&      |		MOVEQ.L	#0x26,D0
000214ae 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000214b0 51 c8 ff fc              |Q       |		DBF	D0,0x214ae
000214b4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000214b6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000214ba 3f 02                    |?       |		MOVE.W	D2,-(A7)
000214bc 3f 03                    |?       |		MOVE.W	D3,-(A7)
000214be 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000214c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000214c6 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000214cc de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
000214d0 1e 81                    |        |		MOVE.B	D1,(A7)
000214d2 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
000214d8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000214da 4c df 03 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1
000214de 4e 5e                    |N^      |		UNLK	A6
000214e0 4e 75                    |Nu      |		RTS
000214e2 ; --------------------------------------------------------------------------------------
000214e2 ; OMSI PASCAL Function
000214e2 ; --------------------------------------------------------------------------------------
000214e2 4e 56 ff da              |NV      |		LINK.W	A6,#0xffda
000214e6 bf d5                    |        |		CMPA.L	(A5),A7
000214e8 62 06                    |b       |		BHI	0x214f0
000214ea 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000214ee 4e 76                    |Nv      |		TRAPV
000214f0 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
000214f4 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000214f8 72 0d                    |r       |		MOVEQ.L	#0x0d,D1
000214fa 1f 01                    |        |		MOVE.B	D1,-(A7)
000214fc 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
00021502 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021504 41 fa ee 18              |A       |		LEA.L	0x2031e,A0
00021508 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002150a 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002150c 51 c8 ff fc              |Q       |		DBF	D0,0x2150a
00021510 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021512 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021516 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002151a 3f 3c 00 0a              |?<      |		MOVE.W	#0xa,-(A7)
0002151e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021524 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021526 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002152c de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021530 1e 81                    |        |		MOVE.B	D1,(A7)
00021532 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
00021538 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002153a 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
0002153e 4e 5e                    |N^      |		UNLK	A6
00021540 4e 75                    |Nu      |		RTS
00021542 ; --------------------------------------------------------------------------------------
00021542 ; OMSI PASCAL Function
00021542 ; --------------------------------------------------------------------------------------
00021542 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00021546 bf d5                    |        |		CMPA.L	(A5),A7
00021548 62 06                    |b       |		BHI	0x21550
0002154a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002154e 4e 76                    |Nv      |		TRAPV
00021550 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00021554 48 e7 81 c0              |H       |		MOVEM.L	A1+A0+D7+D0,-(A7)
00021558 41 f9 00 02 e1 cc        |A       |		LEA.L	0x2e1cc,A0
0002155e 43 f9 00 02 e1 d0        |C       |		LEA.L	0x2e1d0,A1
00021564 20 3c 93 03 ff 10        | <      |		MOVE.L	#0x9303ff10,D0
0002156a 23 c0 00 02 e1 c8        |#       |		MOVE.L	D0,0x2e1c8
00021570 20 80                    |        |		MOVE.L	D0,(A0)
00021572 54 90                    |T       |		ADDQ.L	#0x2,(A0)
00021574 22 80                    |"       |		MOVE.L	D0,(A1)
00021576 58 91                    |X       |		ADDQ.L	#0x4,(A1)
00021578 5c 80                    |\       |		ADDQ.L	#0x6,D0
0002157a 23 c0 00 02 e1 d4        |#       |		MOVE.L	D0,0x2e1d4
00021580 23 c0 00 02 e1 d8        |#       |		MOVE.L	D0,0x2e1d8
00021586 2e 3c 93 03 e4 00        |.<      |		MOVE.L	#0x9303e400,D7
0002158c 23 c7 00 02 e1 dc        |#       |		MOVE.L	D7,0x2e1dc
00021592 4c df 03 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1
00021596 4e 5e                    |N^      |		UNLK	A6
00021598 4e 75                    |Nu      |		RTS
0002159a ; --------------------------------------------------------------------------------------
0002159a ; OMSI PASCAL Function
0002159a ;    <LVAR  0x00c 4(r)>
0002159a ;    <LVAR  0x008 4(r)>
0002159a ;    <LVAR -0x00a @ 4(rw)>
0002159a ;    <LVAR -0x00c @ 2(r)>
0002159a ; --------------------------------------------------------------------------------------
0002159a 4e 56 ff a8              |NV      |		LINK.W	A6,#0xffa8
0002159e bf d5                    |        |		CMPA.L	(A5),A7
000215a0 62 06                    |b       |		BHI	0x215a8
000215a2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000215a6 4e 76                    |Nv      |		TRAPV
000215a8 de fc 00 44              |   D    |		ADDA.W	#0x44,A7
000215ac 48 e7 db e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D4+D3+D1+D0,-(A7)
000215b0 43 ee ff f6              |C       |		LEA.L	(A6-0xa),A1
000215b4 45 ee 00 0c              |E       |		LEA.L	(A6+0xc),A2
000215b8 72 20                    |r       |		MOVEQ.L	#0x20,D1
000215ba 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000215bc 20 12                    |        |		MOVE.L	(A2),D0
000215be d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
000215c2 53 80                    |S       |		SUBQ.L	#0x1,D0
000215c4 2f 00                    |/       |		MOVE.L	D0,-(A7)
000215c6 2c 12                    |,       |		MOVE.L	(A2),D6
000215c8 bc 97                    |        |		CMP.L	(A7),D6
000215ca 62 00 00 92              |b       |		BHI	0x2165e
000215ce 2f 06                    |/       |		MOVE.L	D6,-(A7)
000215d0 41 ee ff f4              |A       |		LEA.L	(A6-0xc),A0
000215d4 2f 08                    |/       |		MOVE.L	A0,-(A7)
000215d6 52 97                    |R       |		ADDQ.L	#0x1,(A7)
000215d8 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000215dc 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000215e2 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000215e6 4a 87                    |J       |		TST.L	D7
000215e8 66 0a                    |f       |		BNE	0x215f4
000215ea 48 51                    |HQ      |		PEA.L	(A1)
000215ec 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
000215f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000215f4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000215f6 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000215f8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000215fa 30 2e ff f4              |0.      |		MOVE.W	(A6-0xc),D0
000215fe 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00021602 48 c0                    |H       |		EXTW.L	D0
00021604 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021606 48 78 00 02              |Hx      |		PEA.L	0x2
0002160a 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00021610 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021612 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021618 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002161a 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
0002161c 20 07                    |        |		MOVE.L	D7,D0
0002161e 52 80                    |R       |		ADDQ.L	#0x1,D0
00021620 28 00                    |(       |		MOVE.L	D0,D4
00021622 76 04                    |v       |		MOVEQ.L	#0x04,D3
00021624 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
0002162a 4a 83                    |J       |		TST.L	D3
0002162c 66 0c                    |f       |		BNE	0x2163a
0002162e 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00021630 1f 01                    |        |		MOVE.B	D1,-(A7)
00021632 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00021638 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002163a 2e 00                    |.       |		MOVE.L	D0,D7
0002163c be 81                    |        |		CMP.L	D1,D7
0002163e 67 0c                    |g       |		BEQ	0x2164c
00021640 20 12                    |        |		MOVE.L	(A2),D0
00021642 d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
00021646 53 80                    |S       |		SUBQ.L	#0x1,D0
00021648 bc 80                    |        |		CMP.L	D0,D6
0002164a 66 0c                    |f       |		BNE	0x21658
0002164c 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002164e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021654 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021656 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021658 52 86                    |R       |		ADDQ.L	#0x1,D6
0002165a 64 00 ff 6c              |d  l    |		BCC	0x215c8
0002165e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021660 4c df 07 db              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D6+D7+A0+A1+A2
00021664 4e 5e                    |N^      |		UNLK	A6
00021666 4e 75                    |Nu      |		RTS
00021668 ; --------------------------------------------------------------------------------------
00021668 ; OMSI PASCAL Function
00021668 ;    <LVAR  0x018 4(r)>
00021668 ;    <LVAR  0x014 4(r)>
00021668 ;    <LVAR  0x010 4(r)>
00021668 ;    <LVAR  0x00c 4(r)>
00021668 ;    <LVAR  0x008 4(r)>
00021668 ;    <LVAR -0x00a 2(r)>
00021668 ;    <LVAR -0x00b 1(r)>
00021668 ;    <LVAR -0x00c 4(w)>
00021668 ;    <LVAR -0x00f 1(r)>
00021668 ;    <LVAR -0x010 1(r) 4(w)>
00021668 ;    <LVAR -0x013 1(r)>
00021668 ;    <LVAR -0x014 2(r) 4(w)>
00021668 ;    <LVAR -0x015 1(r)>
00021668 ;    <LVAR -0x016 1(r)>
00021668 ;    <LVAR -0x017 1(r)>
00021668 ;    <LVAR -0x018 @ 1(r) 4(w)>
00021668 ; --------------------------------------------------------------------------------------
00021668 4e 56 ff 4c              |NV L    |		LINK.W	A6,#0xff4c
0002166c bf d5                    |        |		CMPA.L	(A5),A7
0002166e 62 06                    |b       |		BHI	0x21676
00021670 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021674 4e 76                    |Nv      |		TRAPV
00021676 de fc 00 90              |        |		ADDA.W	#0x90,A7
0002167a 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002167e 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021684 47 f9 00 01 03 e0        |G       |		LEA.L	WriteConsoleStringCrLf(str : String),A3
0002168a 49 f9 00 01 02 d0        |I       |		LEA.L	StringCat2(a, b : String) : String,A4
00021690 74 01                    |t       |		MOVEQ.L	#0x01,D2
00021692 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
00021694 78 14                    |x       |		MOVEQ.L	#0x14,D4
00021696 7a 18                    |z       |		MOVEQ.L	#0x18,D5
00021698 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
0002169e 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000216a2 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000216a8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000216aa 2d 6e 00 0c ff e8        |-n      |		MOVE.L	(A6+0xc),(A6-0x18)
000216b0 2d 6e 00 10 ff ec        |-n      |		MOVE.L	(A6+0x10),(A6-0x14)
000216b6 2d 6e 00 14 ff f0        |-n      |		MOVE.L	(A6+0x14),(A6-0x10)
000216bc 2d 6e 00 18 ff f4        |-n      |		MOVE.L	(A6+0x18),(A6-0xc)
000216c2 41 ee ff e8              |A       |		LEA.L	(A6-0x18),A0
000216c6 2f 08                    |/       |		MOVE.L	A0,-(A7)
000216c8 48 78 00 10              |Hx      |		PEA.L	0x10
000216cc 4e ba fe cc              |N       |		JSR	0x2159a
000216d0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000216d2 41 fa ec 5e              |A  ^    |		LEA.L	0x20332,A0
000216d6 70 04                    |p       |		MOVEQ.L	#0x04,D0
000216d8 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000216da 51 c8 ff fc              |Q       |		DBF	D0,0x216d8
000216de 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000216e0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000216e4 3f 02                    |?       |		MOVE.W	D2,-(A7)
000216e6 3f 04                    |?       |		MOVE.W	D4,-(A7)
000216e8 4e 92                    |N       |		JSR	(A2)
000216ea 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000216ec 42 80                    |B       |		CLR.L	D0
000216ee 10 2e ff e8              | .      |		MOVE.B	(A6-0x18),D0
000216f2 2f 00                    |/       |		MOVE.L	D0,-(A7)
000216f4 48 78 00 02              |Hx      |		PEA.L	0x2
000216f8 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
000216fe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021700 4e 94                    |N       |		JSR	(A4)
00021702 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021704 4e 93                    |N       |		JSR	(A3)
00021706 de c5                    |        |		ADDA.W	D5,A7
00021708 41 fa ec 3c              |A  <    |		LEA.L	0x20346,A0
0002170c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002170e 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00021710 51 c8 ff fc              |Q       |		DBF	D0,0x2170e
00021714 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021716 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002171a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002171c 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002171e 4e 92                    |N       |		JSR	(A2)
00021720 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021722 42 80                    |B       |		CLR.L	D0
00021724 10 2e ff e9              | .      |		MOVE.B	(A6-0x17),D0
00021728 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002172a 48 78 00 02              |Hx      |		PEA.L	0x2
0002172e 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00021734 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021736 4e 94                    |N       |		JSR	(A4)
00021738 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002173a 4e 93                    |N       |		JSR	(A3)
0002173c de c5                    |        |		ADDA.W	D5,A7
0002173e 41 fa ec 1a              |A       |		LEA.L	0x2035a,A0
00021742 70 04                    |p       |		MOVEQ.L	#0x04,D0
00021744 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00021746 51 c8 ff fc              |Q       |		DBF	D0,0x21744
0002174a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002174c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021750 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021752 3f 04                    |?       |		MOVE.W	D4,-(A7)
00021754 4e 92                    |N       |		JSR	(A2)
00021756 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021758 42 80                    |B       |		CLR.L	D0
0002175a 10 2e ff ea              | .      |		MOVE.B	(A6-0x16),D0
0002175e 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021760 48 78 00 02              |Hx      |		PEA.L	0x2
00021764 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
0002176a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002176c 4e 94                    |N       |		JSR	(A4)
0002176e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021770 4e 93                    |N       |		JSR	(A3)
00021772 de c5                    |        |		ADDA.W	D5,A7
00021774 41 fa eb f8              |A       |		LEA.L	0x2036e,A0
00021778 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002177a 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
0002177c 51 c8 ff fc              |Q       |		DBF	D0,0x2177a
00021780 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021782 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021786 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021788 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002178a 4e 92                    |N       |		JSR	(A2)
0002178c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002178e 42 80                    |B       |		CLR.L	D0
00021790 10 2e ff eb              | .      |		MOVE.B	(A6-0x15),D0
00021794 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021796 48 78 00 02              |Hx      |		PEA.L	0x2
0002179a 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
000217a0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217a2 4e 94                    |N       |		JSR	(A4)
000217a4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217a6 4e 93                    |N       |		JSR	(A3)
000217a8 de c5                    |        |		ADDA.W	D5,A7
000217aa 41 fa eb d6              |A       |		LEA.L	0x20382,A0
000217ae 70 04                    |p       |		MOVEQ.L	#0x04,D0
000217b0 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000217b2 51 c8 ff fc              |Q       |		DBF	D0,0x217b0
000217b6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000217b8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000217bc 3f 02                    |?       |		MOVE.W	D2,-(A7)
000217be 3f 04                    |?       |		MOVE.W	D4,-(A7)
000217c0 4e 92                    |N       |		JSR	(A2)
000217c2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000217c4 42 80                    |B       |		CLR.L	D0
000217c6 10 2e ff ed              | .      |		MOVE.B	(A6-0x13),D0
000217ca e3 08                    |        |		LSL.B	#0x1,D0
000217cc e2 08                    |        |		LSR.B	#0x1,D0
000217ce 2f 00                    |/       |		MOVE.L	D0,-(A7)
000217d0 48 78 00 02              |Hx      |		PEA.L	0x2
000217d4 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
000217da 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217dc 4e 94                    |N       |		JSR	(A4)
000217de 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217e0 4e 93                    |N       |		JSR	(A3)
000217e2 de c5                    |        |		ADDA.W	D5,A7
000217e4 41 fa eb b0              |A       |		LEA.L	0x20396,A0
000217e8 70 04                    |p       |		MOVEQ.L	#0x04,D0
000217ea 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000217ec 51 c8 ff fc              |Q       |		DBF	D0,0x217ea
000217f0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000217f2 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000217f6 3f 02                    |?       |		MOVE.W	D2,-(A7)
000217f8 3f 04                    |?       |		MOVE.W	D4,-(A7)
000217fa 4e 92                    |N       |		JSR	(A2)
000217fc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000217fe 42 80                    |B       |		CLR.L	D0
00021800 10 2e ff f0              | .      |		MOVE.B	(A6-0x10),D0
00021804 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021806 48 78 00 02              |Hx      |		PEA.L	0x2
0002180a 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00021810 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021812 4e 94                    |N       |		JSR	(A4)
00021814 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021816 4e 93                    |N       |		JSR	(A3)
00021818 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002181a 20 4f                    | O      |		MOVEA.L	A7,A0
0002181c 43 fa eb 78              |C  x    |		LEA.L	0x20396,A1
00021820 70 10                    |p       |		MOVEQ.L	#0x10,D0
00021822 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021824 51 c8 ff fc              |Q       |		DBF	D0,0x21822
00021828 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002182a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002182e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021830 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
00021834 4e 92                    |N       |		JSR	(A2)
00021836 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021838 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002183e de fc 00 16              |        |		ADDA.W	#0x16,A7
00021842 10 2e ff f1              | .      |		MOVE.B	(A6-0xf),D0
00021846 ee 08                    |        |		LSR.B	#0x7,D0
00021848 67 2a                    |g*      |		BEQ	0x21874
0002184a 9e c3                    |        |		SUBA.W	D3,A7
0002184c 20 4f                    | O      |		MOVEA.L	A7,A0
0002184e 43 fa eb 58              |C  X    |		LEA.L	0x203a8,A1
00021852 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021854 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021856 51 c8 ff fc              |Q       |		DBF	D0,0x21854
0002185a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002185c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021860 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021862 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
00021866 4e 92                    |N       |		JSR	(A2)
00021868 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002186a 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00021870 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00021874 10 2e ff f1              | .      |		MOVE.B	(A6-0xf),D0
00021878 eb 08                    |        |		LSL.B	#0x5,D0
0002187a ee 08                    |        |		LSR.B	#0x7,D0
0002187c 67 22                    |g"      |		BEQ	0x218a0
0002187e 2f 3a eb 36              |/: 6    |		MOVE.L	0x203b6,-(A7)
00021882 2f 3a eb 2e              |/: .    |		MOVE.L	0x203b2,-(A7)
00021886 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021888 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002188c 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002188e 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
00021892 4e 92                    |N       |		JSR	(A2)
00021894 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021896 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002189c de fc 00 0c              |        |		ADDA.W	#0xc,A7
000218a0 10 2e ff f1              | .      |		MOVE.B	(A6-0xf),D0
000218a4 ed 08                    |        |		LSL.B	#0x6,D0
000218a6 ee 08                    |        |		LSR.B	#0x7,D0
000218a8 67 2a                    |g*      |		BEQ	0x218d4
000218aa 9e c3                    |        |		SUBA.W	D3,A7
000218ac 20 4f                    | O      |		MOVEA.L	A7,A0
000218ae 43 fa eb 0a              |C       |		LEA.L	0x203ba,A1
000218b2 70 08                    |p       |		MOVEQ.L	#0x08,D0
000218b4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000218b6 51 c8 ff fc              |Q       |		DBF	D0,0x218b4
000218ba 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000218bc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000218c0 3f 02                    |?       |		MOVE.W	D2,-(A7)
000218c2 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
000218c6 4e 92                    |N       |		JSR	(A2)
000218c8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000218ca 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000218d0 de fc 00 0e              |        |		ADDA.W	#0xe,A7
000218d4 10 2e ff f1              | .      |		MOVE.B	(A6-0xf),D0
000218d8 ef 08                    |        |		LSL.B	#0x7,D0
000218da ee 08                    |        |		LSR.B	#0x7,D0
000218dc 67 2a                    |g*      |		BEQ	0x21908
000218de 9e fc 00 16              |        |		SUBA.W	#0x16,A7
000218e2 20 4f                    | O      |		MOVEA.L	A7,A0
000218e4 43 fa ea de              |C       |		LEA.L	0x203c4,A1
000218e8 70 14                    |p       |		MOVEQ.L	#0x14,D0
000218ea 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000218ec 51 c8 ff fc              |Q       |		DBF	D0,0x218ea
000218f0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000218f2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000218f6 3f 02                    |?       |		MOVE.W	D2,-(A7)
000218f8 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
000218fc 4e 92                    |N       |		JSR	(A2)
000218fe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021900 4e 93                    |N       |		JSR	(A3)
00021902 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00021906 60 06                    |`       |		BRA	0x2190e
00021908 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
0002190e 9e fc 00 12              |        |		SUBA.W	#0x12,A7
00021912 20 4f                    | O      |		MOVEA.L	A7,A0
00021914 43 fa ea c4              |C       |		LEA.L	0x203da,A1
00021918 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002191a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002191c 51 c8 ff fc              |Q       |		DBF	D0,0x2191a
00021920 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021922 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021926 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021928 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
0002192c 4e 92                    |N       |		JSR	(A2)
0002192e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021930 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00021936 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002193a 30 2e ff ec              |0.      |		MOVE.W	(A6-0x14),D0
0002193e ee 48                    | H      |		LSR.W	#0x7,D0
00021940 0c 40 00 08              | @      |		CMPI.W	#0x0008,D0
00021944 63 02                    |c       |		BLS	0x21948
00021946 4e 4e                    |NN      |		TRAP	#14
00021948 d0 40                    | @      |		ADD.W	D0,D0
0002194a 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00021952 00 12                    |        |		.CONST	0x12			; [0x0] -> 0x21964
00021954 00 70                    | p      |		.CONST	0x70			; [0x1] -> 0x219c2
00021956 00 bc                    |        |		.CONST	0xbc			; [0x2] -> 0x21a0e
00021958 00 e2                    |        |		.CONST	0xe2			; [0x3] -> 0x21a34
0002195a 01 0c                    |        |		.CONST	0x10c			; [0x4] -> 0x21a5e
0002195c 02 62                    | b      |		.CONST	0x262			; [0x5] -> 0x21bb4
0002195e 02 8a                    |        |		.CONST	0x28a			; [0x6] -> 0x21bdc
00021960 02 9e                    |        |		.CONST	0x29e			; [0x7] -> 0x21bf0
00021962 02 b4                    |        |		.CONST	0x2b4			; [0x8] -> 0x21c06
00021964					switch@0x2194a[0x0]:
00021964 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021966 20 4f                    | O      |		MOVEA.L	A7,A0
00021968 43 fa ea f8              |C       |		LEA.L	0x20462,A1
0002196c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002196e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021970 51 c8 ff fc              |Q       |		DBF	D0,0x2196e
00021974 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021976 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002197a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002197c 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00021980 4e 92                    |N       |		JSR	(A2)
00021982 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021984 4e 93                    |N       |		JSR	(A3)
00021986 de c3                    |        |		ADDA.W	D3,A7
00021988 41 fa ea f2              |A       |		LEA.L	0x2047c,A0
0002198c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002198e 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00021990 51 c8 ff fc              |Q       |		DBF	D0,0x2198e
00021994 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021996 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002199a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002199c 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002199e 4e 92                    |N       |		JSR	(A2)
000219a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000219a2 42 80                    |B       |		CLR.L	D0
000219a4 10 2e ff f5              | .      |		MOVE.B	(A6-0xb),D0
000219a8 2f 00                    |/       |		MOVE.L	D0,-(A7)
000219aa 48 78 00 02              |Hx      |		PEA.L	0x2
000219ae 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
000219b4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219b6 4e 94                    |N       |		JSR	(A4)
000219b8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219ba 4e 93                    |N       |		JSR	(A3)
000219bc de c5                    |        |		ADDA.W	D5,A7
000219be 60 00 02 6a              |`  j    |		BRA	0x21c2a
000219c2					switch@0x2194a[0x1]:
000219c2 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000219c4 20 4f                    | O      |		MOVEA.L	A7,A0
000219c6 43 fa ea b4              |C       |		LEA.L	0x2047c,A1
000219ca 70 04                    |p       |		MOVEQ.L	#0x04,D0
000219cc 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000219ce 51 c8 ff fc              |Q       |		DBF	D0,0x219cc
000219d2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000219d4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000219d8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000219da 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
000219de 4e 92                    |N       |		JSR	(A2)
000219e0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219e2 4e 93                    |N       |		JSR	(A3)
000219e4 de c3                    |        |		ADDA.W	D3,A7
000219e6 41 fa ea ae              |A       |		LEA.L	0x20496,A0
000219ea 70 04                    |p       |		MOVEQ.L	#0x04,D0
000219ec 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000219ee 51 c8 ff fc              |Q       |		DBF	D0,0x219ec
000219f2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000219f4 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000219f8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000219fa 3f 04                    |?       |		MOVE.W	D4,-(A7)
000219fc 4e 92                    |N       |		JSR	(A2)
000219fe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a00 42 80                    |B       |		CLR.L	D0
00021a02 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
00021a06 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021a08 48 78 00 04              |Hx      |		PEA.L	0x4
00021a0c 60 a0                    |`       |		BRA	0x219ae
00021a0e					switch@0x2194a[0x2]:
00021a0e 2f 3a ea 86              |/:      |		MOVE.L	0x20496,-(A7)
00021a12 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a14 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021a18 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021a1a 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00021a1e 4e 92                    |N       |		JSR	(A2)
00021a20 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021a22 4e 93                    |N       |		JSR	(A3)
00021a24 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021a26 41 fa ea 86              |A       |		LEA.L	0x204ae,A0
00021a2a 70 04                    |p       |		MOVEQ.L	#0x04,D0
00021a2c 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00021a2e 51 c8 ff fc              |Q       |		DBF	D0,0x21a2c
00021a32 60 be                    |`       |		BRA	0x219f2
00021a34					switch@0x2194a[0x3]:
00021a34 9e c3                    |        |		SUBA.W	D3,A7
00021a36 20 4f                    | O      |		MOVEA.L	A7,A0
00021a38 43 fa ea 74              |C  t    |		LEA.L	0x204ae,A1
00021a3c 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021a3e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021a40 51 c8 ff fc              |Q       |		DBF	D0,0x21a3e
00021a44 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a46 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021a4a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021a4c 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
00021a50 4e 92                    |N       |		JSR	(A2)
00021a52 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021a54 4e 93                    |N       |		JSR	(A3)
00021a56 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00021a5a 60 00 01 ce              |`       |		BRA	0x21c2a
00021a5e					switch@0x2194a[0x4]:
00021a5e 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021a60 20 4f                    | O      |		MOVEA.L	A7,A0
00021a62 43 fa ea 54              |C  T    |		LEA.L	0x204b8,A1
00021a66 70 04                    |p       |		MOVEQ.L	#0x04,D0
00021a68 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021a6a 51 c8 ff fc              |Q       |		DBF	D0,0x21a68
00021a6e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a70 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021a74 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021a76 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00021a7a 4e 92                    |N       |		JSR	(A2)
00021a7c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021a7e 4e 93                    |N       |		JSR	(A3)
00021a80 de c3                    |        |		ADDA.W	D3,A7
00021a82 42 80                    |B       |		CLR.L	D0
00021a84 10 2e ff f5              | .      |		MOVE.B	(A6-0xb),D0
00021a88 0c 40 00 ff              | @      |		CMPI.W	#0x00ff,D0
00021a8c 66 00 00 cc              |f       |		BNE	0x21b5a
00021a90 41 fa e9 6c              |A  l    |		LEA.L	0x203fe,A0
00021a94 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021a96 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021a98 51 c8 ff fc              |Q       |		DBF	D0,0x21a96
00021a9c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a9e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021aa2 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021aa4 3f 3c 00 12              |?<      |		MOVE.W	#0x12,-(A7)
00021aa8 4e 92                    |N       |		JSR	(A2)
00021aaa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021aac 4e 93                    |N       |		JSR	(A3)
00021aae de fc 00 16              |        |		ADDA.W	#0x16,A7
00021ab2 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
00021ab6 e0 48                    | H      |		LSR.W	#0x8,D0
00021ab8 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00021abc 42 81                    |B       |		CLR.L	D1
00021abe 32 00                    |2       |		MOVE.W	D0,D1
00021ac0 2e 01                    |.       |		MOVE.L	D1,D7
00021ac2 9e c3                    |        |		SUBA.W	D3,A7
00021ac4 20 4f                    | O      |		MOVEA.L	A7,A0
00021ac6 43 fa e9 36              |C  6    |		LEA.L	0x203fe,A1
00021aca 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021acc 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021ace 51 c8 ff fc              |Q       |		DBF	D0,0x21acc
00021ad2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021ad4 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021ad8 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021ada 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
00021ade 4e 92                    |N       |		JSR	(A2)
00021ae0 2e 87                    |.       |		MOVE.L	D7,(A7)
00021ae2 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021ae8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021aea 4e 94                    |N       |		JSR	(A4)
00021aec 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021aee 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00021af4 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00021af8 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
00021afc 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00021b00 42 81                    |B       |		CLR.L	D1
00021b02 32 00                    |2       |		MOVE.W	D0,D1
00021b04 2c 01                    |,       |		MOVE.L	D1,D6
00021b06 41 fa e9 1c              |A       |		LEA.L	0x20424,A0
00021b0a 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021b0c 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00021b0e 51 c8 ff fc              |Q       |		DBF	D0,0x21b0c
00021b12 9e fc 00 22              |   "    |		SUBA.W	#0x22,A7
00021b16 20 4f                    | O      |		MOVEA.L	A7,A0
00021b18 43 fa e9 0a              |C       |		LEA.L	0x20424,A1
00021b1c 70 20                    |p       |		MOVEQ.L	#0x20,D0
00021b1e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021b20 51 c8 ff fc              |Q       |		DBF	D0,0x21b1e
00021b24 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021b26 48 6f 00 2a              |Ho *    |		PEA.L	(A7+0x2a)
00021b2a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021b2c 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00021b30 4e 92                    |N       |		JSR	(A2)
00021b32 2e 86                    |.       |		MOVE.L	D6,(A7)
00021b34 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021b3a 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00021b3e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021b40 3f 3c 00 21              |?< !    |		MOVE.W	#0x21,-(A7)
00021b44 4e 92                    |N       |		JSR	(A2)
00021b46 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021b48 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
00021b4e de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021b52 4e 93                    |N       |		JSR	(A3)
00021b54 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00021b58 60 58                    |`X      |		BRA	0x21bb2
00021b5a 2f 3a e8 f6              |/:      |		MOVE.L	0x20452,-(A7)
00021b5e 2f 3a e8 ee              |/:      |		MOVE.L	0x2044e,-(A7)
00021b62 2f 3a e8 e6              |/:      |		MOVE.L	0x2044a,-(A7)
00021b66 2f 3a e8 de              |/:      |		MOVE.L	0x20446,-(A7)
00021b6a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021b6c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021b70 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021b72 3f 3c 00 10              |?<      |		MOVE.W	#0x10,-(A7)
00021b76 4e 92                    |N       |		JSR	(A2)
00021b78 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021b7a 4e 93                    |N       |		JSR	(A3)
00021b7c de fc 00 10              |        |		ADDA.W	#0x10,A7
00021b80 2e ba e8 dc              |.       |		MOVE.L	0x2045e,(A7)
00021b84 2f 3a e8 d4              |/:      |		MOVE.L	0x2045a,-(A7)
00021b88 2f 3a e8 cc              |/:      |		MOVE.L	0x20456,-(A7)
00021b8c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021b8e 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021b92 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021b94 3f 3c 00 0c              |?<      |		MOVE.W	#0xc,-(A7)
00021b98 4e 92                    |N       |		JSR	(A2)
00021b9a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021b9c 48 c0                    |H       |		EXTW.L	D0
00021b9e 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021ba0 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021ba6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021ba8 4e 94                    |N       |		JSR	(A4)
00021baa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021bac 4e 93                    |N       |		JSR	(A3)
00021bae de fc 00 10              |        |		ADDA.W	#0x10,A7
00021bb2 60 76                    |`v      |		BRA	0x21c2a
00021bb4					switch@0x2194a[0x5]:
00021bb4 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021bb6 20 4f                    | O      |		MOVEA.L	A7,A0
00021bb8 43 fa e9 04              |C       |		LEA.L	0x204be,A1
00021bbc 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021bbe 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021bc0 51 c8 ff fc              |Q       |		DBF	D0,0x21bbe
00021bc4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021bc6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021bca 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021bcc 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00021bd0 4e 92                    |N       |		JSR	(A2)
00021bd2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021bd4 4e 93                    |N       |		JSR	(A3)
00021bd6 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021bda 60 4e                    |`N      |		BRA	0x21c2a
00021bdc					switch@0x2194a[0x6]:
00021bdc 9e c3                    |        |		SUBA.W	D3,A7
00021bde 20 4f                    | O      |		MOVEA.L	A7,A0
00021be0 43 fa e8 e4              |C       |		LEA.L	0x204c6,A1
00021be4 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021be6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021be8 51 c8 ff fc              |Q       |		DBF	D0,0x21be6
00021bec 60 00 fe 56              |`  V    |		BRA	0x21a44
00021bf0					switch@0x2194a[0x7]:
00021bf0 2f 3a e8 e2              |/:      |		MOVE.L	0x204d4,-(A7)
00021bf4 2f 3a e8 da              |/:      |		MOVE.L	0x204d0,-(A7)
00021bf8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021bfa 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021bfe 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021c00 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
00021c04 60 ca                    |`       |		BRA	0x21bd0
00021c06					switch@0x2194a[0x8]:
00021c06 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021c08 20 4f                    | O      |		MOVEA.L	A7,A0
00021c0a 43 fa e8 cc              |C       |		LEA.L	0x204d8,A1
00021c0e 70 04                    |p       |		MOVEQ.L	#0x04,D0
00021c10 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021c12 51 c8 ff fc              |Q       |		DBF	D0,0x21c10
00021c16 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021c18 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021c1c 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021c1e 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00021c22 4e 92                    |N       |		JSR	(A2)
00021c24 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021c26 4e 93                    |N       |		JSR	(A3)
00021c28 de c3                    |        |		ADDA.W	D3,A7
00021c2a 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021c2e 4e 5e                    |N^      |		UNLK	A6
00021c30 4e 75                    |Nu      |		RTS
00021c32 ; --------------------------------------------------------------------------------------
00021c32 ; OMSI PASCAL Function
00021c32 ;    <LVAR  0x014 4(r)>
00021c32 ;    <LVAR  0x010 4(r)>
00021c32 ;    <LVAR  0x00c 4(r)>
00021c32 ;    <LVAR  0x008 4(r)>
00021c32 ; --------------------------------------------------------------------------------------
00021c32 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
00021c36 bf d5                    |        |		CMPA.L	(A5),A7
00021c38 62 06                    |b       |		BHI	0x21c40
00021c3a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021c3e 4e 76                    |Nv      |		TRAPV
00021c40 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
00021c44 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00021c48 9e fc 00 22              |   "    |		SUBA.W	#0x22,A7
00021c4c 20 4f                    | O      |		MOVEA.L	A7,A0
00021c4e 43 fa e8 8e              |C       |		LEA.L	0x204de,A1
00021c52 70 20                    |p       |		MOVEQ.L	#0x20,D0
00021c54 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021c56 51 c8 ff fc              |Q       |		DBF	D0,0x21c54
00021c5a 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
00021c5e 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
00021c62 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00021c66 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00021c6a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021c6c 48 6f 00 14              |Ho      |		PEA.L	(A7+0x14)
00021c70 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00021c74 3f 3c 00 21              |?< !    |		MOVE.W	#0x21,-(A7)
00021c78 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021c7e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021c80 4e ba f9 e6              |N       |		JSR	0x21668
00021c84 de fc 00 36              |   6    |		ADDA.W	#0x36,A7
00021c88 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00021c8c 4e 5e                    |N^      |		UNLK	A6
00021c8e 4e 75                    |Nu      |		RTS
00021c90 ; --------------------------------------------------------------------------------------
00021c90 ; OMSI PASCAL Function
00021c90 ;    <LVAR  0x014 4(r)>
00021c90 ;    <LVAR  0x010 4(r)>
00021c90 ;    <LVAR  0x00c 4(r)>
00021c90 ;    <LVAR  0x00a 1(r)>
00021c90 ;    <LVAR  0x009 1(r)>
00021c90 ;    <LVAR  0x008 4(r)>
00021c90 ; --------------------------------------------------------------------------------------
00021c90 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00021c94 bf d5                    |        |		CMPA.L	(A5),A7
00021c96 62 06                    |b       |		BHI	0x21c9e
00021c98 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021c9c 4e 76                    |Nv      |		TRAPV
00021c9e de fc 00 20              |        |		ADDA.W	#0x20,A7
00021ca2 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00021ca6 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
00021caa 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
00021cae 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00021cb2 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00021cb6 4e ba ff 7a              |N  z    |		JSR	0x21c32
00021cba de fc 00 10              |        |		ADDA.W	#0x10,A7
00021cbe 42 80                    |B       |		CLR.L	D0
00021cc0 10 2e 00 09              | .      |		MOVE.B	(A6+0x9),D0
00021cc4 c0 fc 00 08              |        |		MULU.W	#0x8,D0
00021cc8 41 f9 00 02 cc 13        |A       |		LEA.L	0x2cc13,A0
00021cce 2f 08                    |/       |		MOVE.L	A0,-(A7)
00021cd0 42 81                    |B       |		CLR.L	D1
00021cd2 12 2e 00 0a              | .      |		MOVE.B	(A6+0xa),D1
00021cd6 44 41                    |DA      |		NEG.W	D1
00021cd8 d2 40                    | @      |		ADD.W	D0,D1
00021cda 42 80                    |B       |		CLR.L	D0
00021cdc 30 01                    |0       |		MOVE.W	D1,D0
00021cde 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021ce0 4e ba f8 b8              |N       |		JSR	0x2159a
00021ce4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021ce6 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00021cea 4e 5e                    |N^      |		UNLK	A6
00021cec 4e 75                    |Nu      |		RTS
00021cee ; --------------------------------------------------------------------------------------
00021cee ; OMSI PASCAL Function
00021cee ;    <LVAR  0x016 4(r)>
00021cee ;    <LVAR  0x012 @ 4(r)>
00021cee ;    <LVAR  0x010 1(r)>
00021cee ;    <LVAR  0x00c 4(r)>
00021cee ;    <LVAR  0x008 4(r)>
00021cee ; --------------------------------------------------------------------------------------
00021cee 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
00021cf2 bf d5                    |        |		CMPA.L	(A5),A7
00021cf4 62 06                    |b       |		BHI	0x21cfc
00021cf6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021cfa 4e 76                    |Nv      |		TRAPV
00021cfc de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00021d00 48 e7 00 c0              |H       |		MOVEM.L	A1+A0,-(A7)
00021d04 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00021d08 22 6e 00 0c              |"n      |		MOVEA.L	(A6+0xc),A1
00021d0c 2f 2e 00 16              |/.      |		MOVE.L	(A6+0x16),-(A7)
00021d10 48 78 00 00              |Hx      |		PEA.L	0x0
00021d14 2f 2e 00 12              |/.      |		MOVE.L	(A6+0x12),-(A7)
00021d18 48 50                    |HP      |		PEA.L	(A0)
00021d1a 48 51                    |HQ      |		PEA.L	(A1)
00021d1c 4e b9 00 02 be fa        |N       |		JSR	0x2befa
00021d22 de fc 00 14              |        |		ADDA.W	#0x14,A7
00021d26 48 6e 00 12              |Hn      |		PEA.L	(A6+0x12)
00021d2a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00021d30 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021d32 4a 11                    |J       |		TST.B	(A1)
00021d34 67 10                    |g       |		BEQ	0x21d46
00021d36 4a 2e 00 10              |J.      |		TST.B	(A6+0x10)
00021d3a 66 0a                    |f       |		BNE	0x21d46
00021d3c 48 50                    |HP      |		PEA.L	(A0)
00021d3e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00021d44 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021d46 4c df 03 00              |L       |		MOVEM.L	(A7)+,A0+A1
00021d4a 4e 5e                    |N^      |		UNLK	A6
00021d4c 4e 75                    |Nu      |		RTS
00021d4e ; --------------------------------------------------------------------------------------
00021d4e ; OMSI PASCAL Function
00021d4e ;    <LVAR  0x00c 1(rw)>
00021d4e ;    <LVAR  0x008 4(r)>
00021d4e ; --------------------------------------------------------------------------------------
00021d4e 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4
00021d52 bf d5                    |        |		CMPA.L	(A5),A7
00021d54 62 06                    |b       |		BHI	0x21d5c
00021d56 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021d5a 4e 76                    |Nv      |		TRAPV
00021d5c de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021d60 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00021d64 42 2e 00 0c              |B.      |		CLR.B	(A6+0xc)
00021d68 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00021d6c 0c 80 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D0
00021d72 63 02                    |c       |		BLS	0x21d76
00021d74 4e 4f                    |NO      |		TRAP	#15
00021d76 e3 80                    |        |		ASL.L	#0x1,D0
00021d78 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00021d7e 4a 70 08 7e              |Jp ~    |		TST.W	(A0+D0.L+#0x7e)
00021d82 66 04                    |f       |		BNE	0x21d88
00021d84 52 2e 00 0c              |R.      |		ADDQ.B	#0x1,(A6+0xc)
00021d88 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00021d8c 4e 5e                    |N^      |		UNLK	A6
00021d8e 4e 75                    |Nu      |		RTS
00021d90 ; --------------------------------------------------------------------------------------
00021d90 ; OMSI PASCAL Function
00021d90 ;    <LVAR -0x00a @ 4(rw)>
00021d90 ;    <LVAR -0x00e @ 4(r)>
00021d90 ;    <LVAR -0x018 4(rw)>
00021d90 ; --------------------------------------------------------------------------------------
00021d90 4e 56 ff 80              |NV      |		LINK.W	A6,#0xff80
00021d94 bf d5                    |        |		CMPA.L	(A5),A7
00021d96 62 06                    |b       |		BHI	0x21d9e
00021d98 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021d9c 4e 76                    |Nv      |		TRAPV
00021d9e de fc 00 68              |   h    |		ADDA.W	#0x68,A7
00021da2 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021da6 45 ee ff f6              |E       |		LEA.L	(A6-0xa),A2
00021daa 47 ee ff f2              |G       |		LEA.L	(A6-0xe),A3
00021dae 49 ee ff e8              |I       |		LEA.L	(A6-0x18),A4
00021db2 74 01                    |t       |		MOVEQ.L	#0x01,D2
00021db4 76 20                    |v       |		MOVEQ.L	#0x20,D3
00021db6 78 16                    |x       |		MOVEQ.L	#0x16,D4
00021db8 7a 00                    |z       |		MOVEQ.L	#0x00,D5
00021dba 48 53                    |HS      |		PEA.L	(A3)
00021dbc 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00021dc2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021dc4 70 00                    |p       |		MOVEQ.L	#0x00,D0
00021dc6 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021dc8 42 81                    |B       |		CLR.L	D1
00021dca 32 00                    |2       |		MOVE.W	D0,D1
00021dcc e7 81                    |        |		ASL.L	#0x3,D1
00021dce 28 81                    |(       |		MOVE.L	D1,(A4)
00021dd0 48 52                    |HR      |		PEA.L	(A2)
00021dd2 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00021dd8 2e 81                    |.       |		MOVE.L	D1,(A7)
00021dda 5e 97                    |^       |		ADDQ.L	#0x7,(A7)
00021ddc 2c 01                    |,       |		MOVE.L	D1,D6
00021dde bc 97                    |        |		CMP.L	(A7),D6
00021de0 62 08                    |b       |		BHI	0x21dea
00021de2 22 17                    |"       |		MOVE.L	(A7),D1
00021de4 bc 81                    |        |		CMP.L	D1,D6
00021de6 6d 02                    |m       |		BLT	0x21dea
00021de8 4e 4f                    |NO      |		TRAP	#15
00021dea bc 6f 00 02              | o      |		CMP.W	(A7+0x2),D6
00021dee 62 44                    |bD      |		BHI	0x21e34
00021df0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021df2 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021df4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021df6 4d bc 01 ff              |M       |		CHK.W	#0x1ff,D6
00021dfa 42 80                    |B       |		CLR.L	D0
00021dfc 30 06                    |0       |		MOVE.W	D6,D0
00021dfe e3 80                    |        |		ASL.L	#0x1,D0
00021e00 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00021e06 42 81                    |B       |		CLR.L	D1
00021e08 32 30 08 7e              |20 ~    |		MOVE.W	(A0+D0.L+#0x7e),D1
00021e0c 2f 01                    |/       |		MOVE.L	D1,-(A7)
00021e0e 48 78 00 04              |Hx      |		PEA.L	0x4
00021e12 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00021e18 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021e1a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021e20 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021e22 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00021e24 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021e26 1f 03                    |        |		MOVE.B	D3,-(A7)
00021e28 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00021e2e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021e30 52 46                    |RF      |		ADDQ.W	#0x1,D6
00021e32 64 b6                    |d       |		BCC	0x21dea
00021e34 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021e36 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021e38 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021e3a 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
00021e40 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021e42 4a 1f                    |J       |		TST.B	(A7)+
00021e44 67 0e                    |g       |		BEQ	0x21e54
00021e46 52 85                    |R       |		ADDQ.L	#0x1,D5
00021e48 48 52                    |HR      |		PEA.L	(A2)
00021e4a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00021e50 60 00 01 00              |`       |		BRA	0x21f52
00021e54 4a 85                    |J       |		TST.L	D5
00021e56 67 3e                    |g>      |		BEQ	0x21e96
00021e58 9e c4                    |        |		SUBA.W	D4,A7
00021e5a 20 4f                    | O      |		MOVEA.L	A7,A0
00021e5c 43 fa e6 a2              |C       |		LEA.L	0x20500,A1
00021e60 70 14                    |p       |		MOVEQ.L	#0x14,D0
00021e62 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021e64 51 c8 ff fc              |Q       |		DBF	D0,0x21e62
00021e68 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021e6a 2f 05                    |/       |		MOVE.L	D5,-(A7)
00021e6c 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021e72 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00021e76 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021e78 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
00021e7c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021e82 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021e84 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021e8a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021e8c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021e92 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00021e96 7a 00                    |z       |		MOVEQ.L	#0x00,D5
00021e98 20 53                    | S      |		MOVEA.L	(A3),A0
00021e9a 22 52                    |"R      |		MOVEA.L	(A2),A1
00021e9c 70 7f                    |p       |		MOVEQ.L	#0x7f,D0
00021e9e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021ea0 51 c8 ff fc              |Q       |		DBF	D0,0x21e9e
00021ea4 3f 3a e6 70              |?: p    |		MOVE.W	0x20516,-(A7)
00021ea8 2f 3a e6 6e              |/: n    |		MOVE.L	0x20518,-(A7)
00021eac 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021eae 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00021eb0 48 78 00 04              |Hx      |		PEA.L	0x4
00021eb4 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00021eba 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021ebc 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00021ec0 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021ec2 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00021ec6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021ecc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021ece 2e 92                    |.       |		MOVE.L	(A2),(A7)
00021ed0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021ed2 48 6f 00 14              |Ho      |		PEA.L	(A7+0x14)
00021ed6 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021ed8 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00021edc 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021ee2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021ee4 4e b9 00 01 02 d8        |N       |		JSR	StringCat4(a, b, c, d : String) : String
00021eea de fc 00 10              |        |		ADDA.W	#0x10,A7
00021eee 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00021ef0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021ef2 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00021ef4 30 06                    |0       |		MOVE.W	D6,D0
00021ef6 e2 48                    | H      |		LSR.W	#0x1,D0
00021ef8 42 81                    |B       |		CLR.L	D1
00021efa 32 00                    |2       |		MOVE.W	D0,D1
00021efc d2 94                    |        |		ADD.L	(A4),D1
00021efe 0c 81 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D1
00021f04 63 02                    |c       |		BLS	0x21f08
00021f06 4e 4f                    |NO      |		TRAP	#15
00021f08 e3 81                    |        |		ASL.L	#0x1,D1
00021f0a 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00021f10 3e 30 18 7e              |>0 ~    |		MOVE.W	(A0+D1.L+#0x7e),D7
00021f14 30 06                    |0       |		MOVE.W	D6,D0
00021f16 c0 42                    | B      |		AND.W	D2,D0
00021f18 66 02                    |f       |		BNE	0x21f1c
00021f1a e0 4f                    | O      |		LSR.W	#0x8,D7
00021f1c 02 47 00 ff              | G      |		ANDI.W	#0x00ff,D7
00021f20 be 43                    | C      |		CMP.W	D3,D7
00021f22 65 06                    |e       |		BCS	0x21f2a
00021f24 0c 47 00 7e              | G ~    |		CMPI.W	#0x007e,D7
00021f28 63 08                    |c       |		BLS	0x21f32
00021f2a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021f2c 1f 3c 00 2e              | < .    |		MOVE.B	#0x2e,-(A7)
00021f30 60 08                    |`       |		BRA	0x21f3a
00021f32 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021f34 4f bc 00 ff              |O       |		CHK.W	#0xff,D7
00021f38 1f 07                    |        |		MOVE.B	D7,-(A7)
00021f3a 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00021f40 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021f42 52 46                    |RF      |		ADDQ.W	#0x1,D6
00021f44 0c 46 00 0f              | F      |		CMPI.W	#0x000f,D6
00021f48 63 aa                    |c       |		BLS	0x21ef4
00021f4a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021f4c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021f52 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021f54 50 94                    |P       |		ADDQ.L	#0x8,(A4)
00021f56 30 17                    |0       |		MOVE.W	(A7),D0
00021f58 52 40                    |R@      |		ADDQ.W	#0x1,D0
00021f5a 0c 40 00 3f              | @ ?    |		CMPI.W	#0x003f,D0
00021f5e 62 06                    |b       |		BHI	0x21f66
00021f60 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021f62 60 00 fe 62              |`  b    |		BRA	0x21dc6
00021f66 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021f68 4a 85                    |J       |		TST.L	D5
00021f6a 67 3e                    |g>      |		BEQ	0x21faa
00021f6c 9e c4                    |        |		SUBA.W	D4,A7
00021f6e 20 4f                    | O      |		MOVEA.L	A7,A0
00021f70 43 fa e5 8e              |C       |		LEA.L	0x20500,A1
00021f74 70 14                    |p       |		MOVEQ.L	#0x14,D0
00021f76 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021f78 51 c8 ff fc              |Q       |		DBF	D0,0x21f76
00021f7c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021f7e 2f 05                    |/       |		MOVE.L	D5,-(A7)
00021f80 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021f86 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00021f8a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021f8c 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
00021f90 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021f96 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021f98 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021f9e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021fa0 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021fa6 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00021faa 48 53                    |HS      |		PEA.L	(A3)
00021fac 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00021fb2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021fb4 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021fb8 4e 5e                    |N^      |		UNLK	A6
00021fba 4e 75                    |Nu      |		RTS
00021fbc ; --------------------------------------------------------------------------------------
00021fbc ; OMSI PASCAL Function
00021fbc ;    <LVAR  0x008 4(r)>
00021fbc ; --------------------------------------------------------------------------------------
00021fbc 4e 56 ff a6              |NV      |		LINK.W	A6,#0xffa6
00021fc0 bf d5                    |        |		CMPA.L	(A5),A7
00021fc2 62 06                    |b       |		BHI	0x21fca
00021fc4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021fc8 4e 76                    |Nv      |		TRAPV
00021fca de fc 00 56              |   V    |		ADDA.W	#0x56,A7
00021fce 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021fd2 45 f9 00 02 c7 f0        |E       |		LEA.L	0x2c7f0,A2
00021fd8 47 f9 00 02 c7 94        |G       |		LEA.L	0x2c794,A3
00021fde 49 f9 00 01 03 d0        |I       |		LEA.L	WriteConsoleChar(chr : char),A4
00021fe4 34 3c 00 ff              |4<      |		MOVE.W	#0xff,D2
00021fe8 26 3c 00 00 01 ff        |&<      |		MOVE.L	#0x1ff,D3
00021fee 78 01                    |x       |		MOVEQ.L	#0x01,D4
00021ff0 7a 0a                    |z       |		MOVEQ.L	#0x0a,D5
00021ff2 7c 0d                    ||       |		MOVEQ.L	#0x0d,D6
00021ff4 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00021ff8 20 10                    |        |		MOVE.L	(A0),D0
00021ffa b0 83                    |        |		CMP.L	D3,D0
00021ffc 63 02                    |c       |		BLS	0x22000
00021ffe 4e 4f                    |NO      |		TRAP	#15
00022000 e3 80                    |        |		ASL.L	#0x1,D0
00022002 22 4b                    |"K      |		MOVEA.L	A3,A1
00022004 30 31 08 7e              |01 ~    |		MOVE.W	(A1+D0.L+#0x7e),D0
00022008 0c 40 00 3a              | @ :    |		CMPI.W	#0x003a,D0
0002200c 67 0e                    |g       |		BEQ	0x2201c
0002200e 4e ba fd 80              |N       |		JSR	0x21d90
00022012 48 78 00 01              |Hx      |		PEA.L	0x1
00022016 4e ba f3 14              |N       |		JSR	0x2132c
0002201a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002201c 20 10                    |        |		MOVE.L	(A0),D0
0002201e 58 80                    |X       |		ADDQ.L	#0x4,D0
00022020 b0 83                    |        |		CMP.L	D3,D0
00022022 63 02                    |c       |		BLS	0x22026
00022024 4e 4f                    |NO      |		TRAP	#15
00022026 e3 80                    |        |		ASL.L	#0x1,D0
00022028 22 4b                    |"K      |		MOVEA.L	A3,A1
0002202a 30 31 08 7e              |01 ~    |		MOVE.W	(A1+D0.L+#0x7e),D0
0002202e 0c 40 64 00              | @d     |		CMPI.W	#0x6400,D0
00022032 67 0e                    |g       |		BEQ	0x22042
00022034 4e ba fd 5a              |N  Z    |		JSR	0x21d90
00022038 48 78 00 02              |Hx      |		PEA.L	0x2
0002203c 4e ba f2 ee              |N       |		JSR	0x2132c
00022040 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022042 10 39 00 02 d0 2c        | 9   ,  |		MOVE.B	0x2d02c,D0
00022048 0c 00 00 02              |        |		CMPI.B	#0x02,D0
0002204c 6e 00 00 98              |n       |		BGT	0x220e6
00022050 4a 12                    |J       |		TST.B	(A2)
00022052 66 2c                    |f,      |		BNE	0x22080
00022054 14 84                    |        |		MOVE.B	D4,(A2)
00022056 43 fa e4 d2              |C       |		LEA.L	0x2052a,A1
0002205a 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002205c 3f 21                    |?!      |		MOVE.W	-(A1),-(A7)
0002205e 51 c8 ff fc              |Q       |		DBF	D0,0x2205c
00022062 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022064 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022068 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002206a 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
0002206e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022074 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022076 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002207c de fc 00 12              |        |		ADDA.W	#0x12,A7
00022080 20 10                    |        |		MOVE.L	(A0),D0
00022082 5c 80                    |\       |		ADDQ.L	#0x6,D0
00022084 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00022086 06 97 00 00 00 1d        |        |		ADDI.L	#0x0000001d,(A7)
0002208c 2e 00                    |.       |		MOVE.L	D0,D7
0002208e be 97                    |        |		CMP.L	(A7),D7
00022090 6e 52                    |nR      |		BGT	0x220e4
00022092 be 83                    |        |		CMP.L	D3,D7
00022094 63 02                    |c       |		BLS	0x22098
00022096 4e 4f                    |NO      |		TRAP	#15
00022098 20 07                    |        |		MOVE.L	D7,D0
0002209a e3 80                    |        |		ASL.L	#0x1,D0
0002209c 20 4b                    | K      |		MOVEA.L	A3,A0
0002209e 32 30 08 7e              |20 ~    |		MOVE.W	(A0+D0.L+#0x7e),D1
000220a2 e0 49                    | I      |		LSR.W	#0x8,D1
000220a4 c2 42                    | B      |		AND.W	D2,D1
000220a6 1f 01                    |        |		MOVE.B	D1,-(A7)
000220a8 4e 94                    |N       |		JSR	(A4)
000220aa 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000220ac 32 30 08 7e              |20 ~    |		MOVE.W	(A0+D0.L+#0x7e),D1
000220b0 e0 49                    | I      |		LSR.W	#0x8,D1
000220b2 c2 42                    | B      |		AND.W	D2,D1
000220b4 b2 45                    | E      |		CMP.W	D5,D1
000220b6 66 08                    |f       |		BNE	0x220c0
000220b8 1f 06                    |        |		MOVE.B	D6,-(A7)
000220ba 4e 94                    |N       |		JSR	(A4)
000220bc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000220be 42 12                    |B       |		CLR.B	(A2)
000220c0 32 30 08 7e              |20 ~    |		MOVE.W	(A0+D0.L+#0x7e),D1
000220c4 c2 42                    | B      |		AND.W	D2,D1
000220c6 43 82                    |C       |		CHK.W	D2,D1
000220c8 1f 01                    |        |		MOVE.B	D1,-(A7)
000220ca 4e 94                    |N       |		JSR	(A4)
000220cc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000220ce 30 30 08 7e              |00 ~    |		MOVE.W	(A0+D0.L+#0x7e),D0
000220d2 c0 42                    | B      |		AND.W	D2,D0
000220d4 b0 45                    | E      |		CMP.W	D5,D0
000220d6 66 08                    |f       |		BNE	0x220e0
000220d8 1f 06                    |        |		MOVE.B	D6,-(A7)
000220da 4e 94                    |N       |		JSR	(A4)
000220dc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000220de 42 12                    |B       |		CLR.B	(A2)
000220e0 52 87                    |R       |		ADDQ.L	#0x1,D7
000220e2 68 aa                    |h       |		BVC	0x2208e
000220e4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000220e6 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000220ea 06 90 00 00 00 1e        |        |		ADDI.L	#0x0000001e,(A0)
000220f0 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000220f4 4e 5e                    |N^      |		UNLK	A6
000220f6 4e 75                    |Nu      |		RTS
000220f8 ; --------------------------------------------------------------------------------------
000220f8 ; OMSI PASCAL Function
000220f8 ;    <LVAR -0x008 @ 4(r)>
000220f8 ; --------------------------------------------------------------------------------------
000220f8 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4		; Spelunked
000220fc bf d5                    |        |		CMPA.L	(A5),A7
000220fe 62 06                    |b       |		BHI	0x22106
00022100 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022104 4e 76                    |Nv      |		TRAPV
00022106 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002210a 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
0002210e 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
00022112 42 91                    |B       |		CLR.L	(A1)
00022114 20 11                    |        |		MOVE.L	(A1),D0
00022116 0c 80 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D0
0002211c 63 02                    |c       |		BLS	0x22120
0002211e 4e 4f                    |NO      |		TRAP	#15
00022120 e3 80                    |        |		ASL.L	#0x1,D0
00022122 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00022128 4a 70 08 7e              |Jp ~    |		TST.W	(A0+D0.L+#0x7e)
0002212c 67 14                    |g       |		BEQ	0x22142
0002212e 20 11                    |        |		MOVE.L	(A1),D0
00022130 0c 80 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D0
00022136 6c 0a                    |l       |		BGE	0x22142
00022138 48 51                    |HQ      |		PEA.L	(A1)
0002213a 4e ba fe 80              |N       |		JSR	0x21fbc
0002213e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022140 60 d2                    |`       |		BRA	0x22114
00022142 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00022146 4e 5e                    |N^      |		UNLK	A6
00022148 4e 75                    |Nu      |		RTS
0002214a ; --------------------------------------------------------------------------------------
0002214a ; OMSI PASCAL Function
0002214a ;    <LVAR -0x006 @>
0002214a ;    <LVAR -0x008 @ 1(r)>
0002214a ; --------------------------------------------------------------------------------------
0002214a 4e 56 ff c2              |NV      |		LINK.W	A6,#0xffc2
0002214e bf d5                    |        |		CMPA.L	(A5),A7
00022150 62 06                    |b       |		BHI	0x22158
00022152 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022156 4e 76                    |Nv      |		TRAPV
00022158 de fc 00 36              |   6    |		ADDA.W	#0x36,A7
0002215c 48 e7 fd e0              |H       |		MOVEM.L	A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00022160 43 f9 00 01 02 38        |C    8  |		LEA.L	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word),A1
00022166 45 f9 00 02 e1 96        |E       |		LEA.L	0x2e196,A2
0002216c 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
0002216e 72 04                    |r       |		MOVEQ.L	#0x04,D1
00022170 74 02                    |t       |		MOVEQ.L	#0x02,D2
00022172 7a 03                    |z       |		MOVEQ.L	#0x03,D5
00022174 14 bc 00 01              |        |		MOVE.B	#0x01,(A2)
00022178 48 78 04 00              |Hx      |		PEA.L	0x400
0002217c 41 f9 00 02 d0 28        |A    (  |		LEA.L	0x2d028,A0
00022182 2f 08                    |/       |		MOVE.L	A0,-(A7)
00022184 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022186 4e 91                    |N       |		JSR	(A1)
00022188 de c0                    |        |		ADDA.W	D0,A7
0002218a 48 78 04 04              |Hx      |		PEA.L	0x404
0002218e 41 f9 00 02 d4 32        |A    2  |		LEA.L	0x2d432,A0
00022194 2f 08                    |/       |		MOVE.L	A0,-(A7)
00022196 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022198 4e 91                    |N       |		JSR	(A1)
0002219a de c0                    |        |		ADDA.W	D0,A7
0002219c 48 78 04 06              |Hx      |		PEA.L	0x406
000221a0 41 f9 00 02 d4 38        |A    8  |		LEA.L	0x2d438,A0
000221a6 2f 08                    |/       |		MOVE.L	A0,-(A7)
000221a8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000221aa 4e 91                    |N       |		JSR	(A1)
000221ac de c0                    |        |		ADDA.W	D0,A7
000221ae 48 78 04 08              |Hx      |		PEA.L	0x408
000221b2 41 f9 00 02 d4 34        |A    4  |		LEA.L	0x2d434,A0
000221b8 2f 08                    |/       |		MOVE.L	A0,-(A7)
000221ba 3f 01                    |?       |		MOVE.W	D1,-(A7)
000221bc 4e 91                    |N       |		JSR	(A1)
000221be de c0                    |        |		ADDA.W	D0,A7
000221c0 48 78 04 0c              |Hx      |		PEA.L	0x40c
000221c4 41 f9 00 02 d4 2e        |A    .  |		LEA.L	0x2d42e,A0
000221ca 2f 08                    |/       |		MOVE.L	A0,-(A7)
000221cc 3f 01                    |?       |		MOVE.W	D1,-(A7)
000221ce 4e 91                    |N       |		JSR	(A1)
000221d0 de c0                    |        |		ADDA.W	D0,A7
000221d2 4a 12                    |J       |		TST.B	(A2)
000221d4 67 5a                    |gZ      |		BEQ	0x22230
000221d6 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000221d8 be 85                    |        |		CMP.L	D5,D7
000221da 63 02                    |c       |		BLS	0x221de
000221dc 4e 4f                    |NO      |		TRAP	#15
000221de 28 07                    |(       |		MOVE.L	D7,D4
000221e0 76 34                    |v4      |		MOVEQ.L	#0x34,D3
000221e2 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000221e8 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
000221ee 41 f0 48 00              |A H     |		LEA.L	(A0+D4.L),A0
000221f2 42 28 19 2e              |B( .    |		CLR.B	(A0+0x192e)
000221f6 42 28 19 2f              |B( /    |		CLR.B	(A0+0x192f)
000221fa 42 28 19 30              |B( 0    |		CLR.B	(A0+0x1930)
000221fe 42 68 19 32              |Bh 2    |		CLR.W	(A0+0x1932)
00022202 42 68 19 34              |Bh 4    |		CLR.W	(A0+0x1934)
00022206 42 a8 19 36              |B  6    |		CLR.L	(A0+0x1936)
0002220a 42 a8 19 3a              |B  :    |		CLR.L	(A0+0x193a)
0002220e 42 a8 19 3e              |B  >    |		CLR.L	(A0+0x193e)
00022212 52 87                    |R       |		ADDQ.L	#0x1,D7
00022214 be 85                    |        |		CMP.L	D5,D7
00022216 6f c0                    |o       |		BLE	0x221d8
00022218 42 27                    |B'      |		CLR.B	-(A7)
0002221a 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002221e 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00022222 4e b9 00 01 02 32        |N    2  |		JSR	KERNCALL_19
00022228 de c0                    |        |		ADDA.W	D0,A7
0002222a 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
0002222e 66 e8                    |f       |		BNE	0x22218
00022230 4c df 07 bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2
00022234 4e 5e                    |N^      |		UNLK	A6
00022236 4e 75                    |Nu      |		RTS
00022238 ; --------------------------------------------------------------------------------------
00022238 ; OMSI PASCAL Function
00022238 ;    <LVAR  0x00c 1(r)>
00022238 ;    <LVAR  0x008 @ 4(r)>
00022238 ; --------------------------------------------------------------------------------------
00022238 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2
0002223c bf d5                    |        |		CMPA.L	(A5),A7
0002223e 62 06                    |b       |		BHI	0x22246
00022240 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022244 4e 76                    |Nv      |		TRAPV
00022246 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002224a 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002224e 10 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D0
00022252 b0 39 00 02 d0 2c        | 9   ,  |		CMP.B	0x2d02c,D0
00022258 6d 0c                    |m       |		BLT	0x22266
0002225a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002225e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022264 60 0a                    |`       |		BRA	0x22270
00022266 48 6e 00 08              |Hn      |		PEA.L	(A6+0x8)
0002226a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00022270 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022272 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
00022276 4e 5e                    |N^      |		UNLK	A6
00022278 4e 75                    |Nu      |		RTS
0002227a ; --------------------------------------------------------------------------------------
0002227a ; OMSI PASCAL Function
0002227a ;    <LVAR -0x002 @ 2(r)>
0002227a ;    <LVAR -0x004 @ 1(r)>
0002227a ; --------------------------------------------------------------------------------------
0002227a 4e 56 ff be              |NV      |		LINK.W	A6,#0xffbe
0002227e bf d5                    |        |		CMPA.L	(A5),A7
00022280 62 06                    |b       |		BHI	0x22288
00022282 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022286 4e 76                    |Nv      |		TRAPV
00022288 de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
0002228c 48 e7 c0 c0              |H       |		MOVEM.L	A1+A0+D1+D0,-(A7)
00022290 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
00022294 42 27                    |B'      |		CLR.B	-(A7)
00022296 48 51                    |HQ      |		PEA.L	(A1)
00022298 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002229c 4e b9 00 01 02 32        |N    2  |		JSR	KERNCALL_19
000222a2 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000222a6 4a 11                    |J       |		TST.B	(A1)
000222a8 67 00 00 8e              |g       |		BEQ	0x22338
000222ac 30 2e ff fe              |0.      |		MOVE.W	(A6-0x2),D0
000222b0 0c 40 00 ff              | @      |		CMPI.W	#0x00ff,D0
000222b4 63 0a                    |c       |		BLS	0x222c0
000222b6 48 78 00 03              |Hx      |		PEA.L	0x3
000222ba 4e ba f0 70              |N  p    |		JSR	0x2132c
000222be 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000222c0 41 fa e2 7a              |A  z    |		LEA.L	0x2053c,A0
000222c4 72 08                    |r       |		MOVEQ.L	#0x08,D1
000222c6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000222c8 51 c9 ff fc              |Q       |		DBF	D1,0x222c6
000222cc 42 27                    |B'      |		CLR.B	-(A7)
000222ce 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000222d0 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
000222d4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000222d8 3f 3c 00 12              |?<      |		MOVE.W	#0x12,-(A7)
000222dc 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000222e2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000222e4 42 81                    |B       |		CLR.L	D1
000222e6 32 00                    |2       |		MOVE.W	D0,D1
000222e8 2f 01                    |/       |		MOVE.L	D1,-(A7)
000222ea 48 78 00 01              |Hx      |		PEA.L	0x1
000222ee 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
000222f4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000222f6 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000222fc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000222fe 4e ba ff 38              |N  8    |		JSR	0x22238
00022302 de fc 00 18              |        |		ADDA.W	#0x18,A7
00022306 41 bc 00 03              |A       |		CHK.W	#0x3,D0
0002230a c0 fc 00 34              |   4    |		MULU.W	#0x34,D0
0002230e 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00022314 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
00022318 42 28 19 2e              |B( .    |		CLR.B	(A0+0x192e)
0002231c 42 28 19 2f              |B( /    |		CLR.B	(A0+0x192f)
00022320 42 28 19 30              |B( 0    |		CLR.B	(A0+0x1930)
00022324 42 68 19 32              |Bh 2    |		CLR.W	(A0+0x1932)
00022328 42 68 19 34              |Bh 4    |		CLR.W	(A0+0x1934)
0002232c 42 a8 19 36              |B  6    |		CLR.L	(A0+0x1936)
00022330 42 a8 19 3a              |B  :    |		CLR.L	(A0+0x193a)
00022334 42 a8 19 3e              |B  >    |		CLR.L	(A0+0x193e)
00022338 4a 11                    |J       |		TST.B	(A1)
0002233a 66 00 ff 58              |f  X    |		BNE	0x22294
0002233e 42 39 00 02 cc 12        |B9      |		CLR.B	0x2cc12
00022344 4c df 03 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1
00022348 4e 5e                    |N^      |		UNLK	A6
0002234a 4e 75                    |Nu      |		RTS
0002234c ; --------------------------------------------------------------------------------------
0002234c ; OMSI PASCAL Function
0002234c ;    <LVAR  0x014 4(r)>
0002234c ;    <LVAR  0x010 4(r)>
0002234c ;    <LVAR  0x00c 4(r)>
0002234c ;    <LVAR  0x008 4(r)>
0002234c ;    <LVAR -0x004 4(w)>
0002234c ;    <LVAR -0x008 4(w)>
0002234c ;    <LVAR -0x00c 4(w)>
0002234c ;    <LVAR -0x010 @ 4(w)>
0002234c ; --------------------------------------------------------------------------------------
0002234c 4e 56 ff c2              |NV      |		LINK.W	A6,#0xffc2
00022350 bf d5                    |        |		CMPA.L	(A5),A7
00022352 62 06                    |b       |		BHI	0x2235a
00022354 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022358 4e 76                    |Nv      |		TRAPV
0002235a de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
0002235e 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00022362 9e fc 00 12              |        |		SUBA.W	#0x12,A7
00022366 20 4f                    | O      |		MOVEA.L	A7,A0
00022368 43 fa e1 d2              |C       |		LEA.L	0x2053c,A1
0002236c 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002236e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022370 51 c8 ff fc              |Q       |		DBF	D0,0x2236e
00022374 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022376 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002237a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002237e 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
00022382 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022388 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002238a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022390 de fc 00 16              |        |		ADDA.W	#0x16,A7
00022394 2d 6e 00 08 ff f0        |-n      |		MOVE.L	(A6+0x8),(A6-0x10)
0002239a 2d 6e 00 0c ff f4        |-n      |		MOVE.L	(A6+0xc),(A6-0xc)
000223a0 2d 6e 00 10 ff f8        |-n      |		MOVE.L	(A6+0x10),(A6-0x8)
000223a6 2d 6e 00 14 ff fc        |-n      |		MOVE.L	(A6+0x14),(A6-0x4)
000223ac 41 ee ff f0              |A       |		LEA.L	(A6-0x10),A0
000223b0 2f 08                    |/       |		MOVE.L	A0,-(A7)
000223b2 48 78 00 10              |Hx      |		PEA.L	0x10
000223b6 4e ba f1 e2              |N       |		JSR	0x2159a
000223ba 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000223bc 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
000223c2 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
000223c6 4e 5e                    |N^      |		UNLK	A6
000223c8 4e 75                    |Nu      |		RTS
000223ca ; --------------------------------------------------------------------------------------
000223ca ; OMSI PASCAL Function
000223ca ;    <LVAR  0x010 2(r)>
000223ca ;    <LVAR  0x00c 4(r)>
000223ca ;    <LVAR  0x008 4(r)>
000223ca ;    <LVAR -0x006 4(rw)>
000223ca ;    <LVAR -0x00a 4(rw)>
000223ca ;    <LVAR -0x00e 4(rw)>
000223ca ;    <LVAR -0x012 4(rw)>
000223ca ;    <LVAR -0x016 4(r)>
000223ca ;    <LVAR -0x019 1(r)>
000223ca ;    <LVAR -0x01a 1(r) 4(r)>
000223ca ;    <LVAR -0x01c 1(r)>
000223ca ;    <LVAR -0x01e 4(r)>
000223ca ;    <LVAR -0x01f 1(r)>
000223ca ;    <LVAR -0x020 1(r)>
000223ca ;    <LVAR -0x021 1(r)>
000223ca ;    <LVAR -0x022 @ 4(r)>
000223ca ;    <LVAR -0x02c @ 2(r)>
000223ca ;    <LVAR -0x02e @ 1(r)>
000223ca ; --------------------------------------------------------------------------------------
000223ca 4e 56 ff 7a              |NV z    |		LINK.W	A6,#0xff7a
000223ce bf d5                    |        |		CMPA.L	(A5),A7
000223d0 62 06                    |b       |		BHI	0x223d8
000223d2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000223d6 4e 76                    |Nv      |		TRAPV
000223d8 de fc 00 58              |   X    |		ADDA.W	#0x58,A7
000223dc 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000223e0 45 fa ef 4a              |E  J    |		LEA.L	0x2132c,A2
000223e4 47 f9 00 02 c7 94        |G       |		LEA.L	0x2c794,A3
000223ea 49 f9 00 01 02 38        |I    8  |		LEA.L	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word),A4
000223f0 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000223f2 1f 07                    |        |		MOVE.B	D7,-(A7)
000223f4 48 6e ff d2              |Hn      |		PEA.L	(A6-0x2e)
000223f8 48 6e ff d4              |Hn      |		PEA.L	(A6-0x2c)
000223fc 4e b9 00 01 02 32        |N    2  |		JSR	KERNCALL_19
00022402 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00022406 4a 2e ff d2              |J.      |		TST.B	(A6-0x2e)
0002240a 67 00 01 ce              |g       |		BEQ	0x225da
0002240e 30 2e ff d4              |0.      |		MOVE.W	(A6-0x2c),D0
00022412 0c 40 00 ff              | @      |		CMPI.W	#0x00ff,D0
00022416 63 08                    |c       |		BLS	0x22420
00022418 48 78 00 03              |Hx      |		PEA.L	0x3
0002241c 4e 92                    |N       |		JSR	(A2)
0002241e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022420 32 39 00 02 d4 38        |29   8  |		MOVE.W	0x2d438,D1
00022426 c2 c0                    |        |		MULU.W	D0,D1
00022428 d2 b9 00 02 d4 34        |     4  |		ADD.L	0x2d434,D1
0002242e 2f 01                    |/       |		MOVE.L	D1,-(A7)
00022430 41 ee ff de              |A       |		LEA.L	(A6-0x22),A0
00022434 2f 08                    |/       |		MOVE.L	A0,-(A7)
00022436 3f 3c 00 10              |?<      |		MOVE.W	#0x10,-(A7)
0002243a 4e 94                    |N       |		JSR	(A4)
0002243c de fc 00 0a              |        |		ADDA.W	#0xa,A7
00022440 42 81                    |B       |		CLR.L	D1
00022442 12 2e ff e6              | .      |		MOVE.B	(A6-0x1a),D1
00022446 43 bc 00 03              |C       |		CHK.W	#0x3,D1
0002244a c3 fc 00 34              |   4    |		MULS.W	#0x34,D1
0002244e 20 4b                    | K      |		MOVEA.L	A3,A0
00022450 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00022454 43 ee ff de              |C       |		LEA.L	(A6-0x22),A1
00022458 2f 09                    |/       |		MOVE.L	A1,-(A7)
0002245a 2f 28 19 3e              |/( >    |		MOVE.L	(A0+0x193e),-(A7)
0002245e 3f 3c 00 10              |?<      |		MOVE.W	#0x10,-(A7)
00022462 4e 94                    |N       |		JSR	(A4)
00022464 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00022468 42 81                    |B       |		CLR.L	D1
0002246a 12 2e ff e1              | .      |		MOVE.B	(A6-0x1f),D1
0002246e b2 40                    | @      |		CMP.W	D0,D1
00022470 67 08                    |g       |		BEQ	0x2247a
00022472 48 78 00 0d              |Hx      |		PEA.L	0xd
00022476 4e 92                    |N       |		JSR	(A2)
00022478 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002247a 4a 2e ff e4              |J.      |		TST.B	(A6-0x1c)
0002247e 67 08                    |g       |		BEQ	0x22488
00022480 48 78 00 0e              |Hx      |		PEA.L	0xe
00022484 4e 92                    |N       |		JSR	(A2)
00022486 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022488 4a 28 19 2f              |J( /    |		TST.B	(A0+0x192f)
0002248c 66 38                    |f8      |		BNE	0x224c6
0002248e 2d 6e ff de ff ee        |-n      |		MOVE.L	(A6-0x22),(A6-0x12)
00022494 2d 6e ff e2 ff f2        |-n      |		MOVE.L	(A6-0x1e),(A6-0xe)
0002249a 2d 6e ff e6 ff f6        |-n      |		MOVE.L	(A6-0x1a),(A6-0xa)
000224a0 2d 6e ff ea ff fa        |-n      |		MOVE.L	(A6-0x16),(A6-0x6)
000224a6 2f 2e ff fa              |/.      |		MOVE.L	(A6-0x6),-(A7)
000224aa 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
000224ae 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
000224b2 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
000224b6 4e ba fe 94              |N       |		JSR	0x2234c
000224ba de fc 00 10              |        |		ADDA.W	#0x10,A7
000224be 48 78 00 0f              |Hx      |		PEA.L	0xf
000224c2 4e 92                    |N       |		JSR	(A2)
000224c4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000224c6 42 80                    |B       |		CLR.L	D0
000224c8 10 2e ff e6              | .      |		MOVE.B	(A6-0x1a),D0
000224cc 2f 00                    |/       |		MOVE.L	D0,-(A7)
000224ce 42 82                    |B       |		CLR.L	D2
000224d0 34 28 19 32              |4( 2    |		MOVE.W	(A0+0x1932),D2
000224d4 d4 80                    |        |		ADD.L	D0,D2
000224d6 48 c1                    |H       |		EXTW.L	D1
000224d8 b2 82                    |        |		CMP.L	D2,D1
000224da 67 08                    |g       |		BEQ	0x224e4
000224dc 48 78 00 10              |Hx      |		PEA.L	0x10
000224e0 4e 92                    |N       |		JSR	(A2)
000224e2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000224e4 42 81                    |B       |		CLR.L	D1
000224e6 32 28 19 32              |2( 2    |		MOVE.W	(A0+0x1932),D1
000224ea 52 81                    |R       |		ADDQ.L	#0x1,D1
000224ec 0c 81 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D1
000224f2 63 02                    |c       |		BLS	0x224f6
000224f4 4e 4f                    |NO      |		TRAP	#15
000224f6 31 41 19 32              |1A 2    |		MOVE.W	D1,(A0+0x1932)
000224fa b2 68 19 34              | h 4    |		CMP.W	(A0+0x1934),D1
000224fe 63 08                    |c       |		BLS	0x22508
00022500 48 78 00 11              |Hx      |		PEA.L	0x11
00022504 4e 92                    |N       |		JSR	(A2)
00022506 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022508 12 2e ff e7              | .      |		MOVE.B	(A6-0x19),D1
0002250c ee 09                    |        |		LSR.B	#0x7,D1
0002250e 67 00 00 c8              |g       |		BEQ	0x225d8
00022512 42 28 19 2f              |B( /    |		CLR.B	(A0+0x192f)
00022516 11 7c 00 01 19 2e        | |   .  |		MOVE.B	#0x01,(A0+0x192e)
0002251c 12 2e ff e7              | .      |		MOVE.B	(A6-0x19),D1
00022520 ed 09                    |        |		LSL.B	#0x6,D1
00022522 ee 09                    |        |		LSR.B	#0x7,D1
00022524 11 41 19 30              | A 0    |		MOVE.B	D1,(A0+0x1930)
00022528 42 81                    |B       |		CLR.L	D1
0002252a 12 2e ff df              | .      |		MOVE.B	(A6-0x21),D1
0002252e e7 41                    | A      |		ASL.W	#0x3,D1
00022530 42 82                    |B       |		CLR.L	D2
00022532 14 2e ff e0              | .      |		MOVE.B	(A6-0x20),D2
00022536 44 42                    |DB      |		NEG.W	D2
00022538 d4 41                    | A      |		ADD.W	D1,D2
0002253a 32 02                    |2       |		MOVE.W	D2,D1
0002253c 48 c1                    |H       |		EXTW.L	D1
0002253e 23 c1 00 02 e1 92        |#       |		MOVE.L	D1,0x2e192
00022544 4a a8 19 3a              |J  :    |		TST.L	(A0+0x193a)
00022548 6c 46                    |lF      |		BGE	0x22590
0002254a 0c 81 00 00 04 00        |        |		CMPI.L	#0x00000400,D1
00022550 6f 08                    |o       |		BLE	0x2255a
00022552 48 78 00 12              |Hx      |		PEA.L	0x12
00022556 4e 92                    |N       |		JSR	(A2)
00022558 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002255a 28 00                    |(       |		MOVE.L	D0,D4
0002255c 42 83                    |B       |		CLR.L	D3
0002255e 36 39 00 02 d4 32        |69   2  |		MOVE.W	0x2d432,D3
00022564 4e b9 00 01 02 90        |N       |		JSR	?mulu_d3_d4
0002256a 20 04                    |        |		MOVE.L	D4,D0
0002256c d0 b9 00 02 d4 2e        |     .  |		ADD.L	0x2d42e,D0
00022572 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022574 2f 28 19 36              |/( 6    |		MOVE.L	(A0+0x1936),-(A7)
00022578 20 39 00 02 e1 92        | 9      |		MOVE.L	0x2e192,D0
0002257e 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00022584 63 02                    |c       |		BLS	0x22588
00022586 4e 4f                    |NO      |		TRAP	#15
00022588 3f 00                    |?       |		MOVE.W	D0,-(A7)
0002258a 4e 94                    |N       |		JSR	(A4)
0002258c de fc 00 0a              |        |		ADDA.W	#0xa,A7
00022590 4a a8 19 3a              |J  :    |		TST.L	(A0+0x193a)
00022594 6d 42                    |mB      |		BLT	0x225d8
00022596 b2 a8 19 3a              |   :    |		CMP.L	(A0+0x193a),D1
0002259a 6f 08                    |o       |		BLE	0x225a4
0002259c 48 78 00 12              |Hx      |		PEA.L	0x12
000225a0 4e 92                    |N       |		JSR	(A2)
000225a2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000225a4 28 17                    |(       |		MOVE.L	(A7),D4
000225a6 42 83                    |B       |		CLR.L	D3
000225a8 36 39 00 02 d4 32        |69   2  |		MOVE.W	0x2d432,D3
000225ae 4e b9 00 01 02 90        |N       |		JSR	?mulu_d3_d4
000225b4 20 04                    |        |		MOVE.L	D4,D0
000225b6 d0 b9 00 02 d4 2e        |     .  |		ADD.L	0x2d42e,D0
000225bc 2f 00                    |/       |		MOVE.L	D0,-(A7)
000225be 2f 28 19 36              |/( 6    |		MOVE.L	(A0+0x1936),-(A7)
000225c2 20 28 19 3a              | ( :    |		MOVE.L	(A0+0x193a),D0
000225c6 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
000225cc 63 02                    |c       |		BLS	0x225d0
000225ce 4e 4f                    |NO      |		TRAP	#15
000225d0 3f 00                    |?       |		MOVE.W	D0,-(A7)
000225d2 4e 94                    |N       |		JSR	(A4)
000225d4 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000225d8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000225da 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000225dc 4a 2e ff d2              |J.      |		TST.B	(A6-0x2e)
000225e0 66 00 fe 10              |f       |		BNE	0x223f2
000225e4 7e 01                    |~       |		MOVEQ.L	#0x01,D7
000225e6 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000225e8 7a 00                    |z       |		MOVEQ.L	#0x00,D5
000225ea 70 00                    |p       |		MOVEQ.L	#0x00,D0
000225ec 0c 80 00 00 00 03        |        |		CMPI.L	#0x00000003,D0
000225f2 63 02                    |c       |		BLS	0x225f6
000225f4 4e 4f                    |NO      |		TRAP	#15
000225f6 28 00                    |(       |		MOVE.L	D0,D4
000225f8 76 34                    |v4      |		MOVEQ.L	#0x34,D3
000225fa 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00022600 20 4b                    | K      |		MOVEA.L	A3,A0
00022602 41 f0 48 00              |A H     |		LEA.L	(A0+D4.L),A0
00022606 12 06                    |        |		MOVE.B	D6,D1
00022608 82 28 19 2f              | ( /    |		OR.B	(A0+0x192f),D1
0002260c 48 81                    |H       |		EXTB.W	D1
0002260e 43 bc 00 01              |C       |		CHK.W	#0x1,D1
00022612 1c 01                    |        |		MOVE.B	D1,D6
00022614 12 05                    |        |		MOVE.B	D5,D1
00022616 82 28 19 2e              | ( .    |		OR.B	(A0+0x192e),D1
0002261a 48 81                    |H       |		EXTB.W	D1
0002261c 43 bc 00 01              |C       |		CHK.W	#0x1,D1
00022620 1a 01                    |        |		MOVE.B	D1,D5
00022622 52 80                    |R       |		ADDQ.L	#0x1,D0
00022624 0c 80 00 00 00 03        |        |		CMPI.L	#0x00000003,D0
0002262a 6f c0                    |o       |		BLE	0x225ec
0002262c 30 2e 00 10              |0.      |		MOVE.W	(A6+0x10),D0
00022630 41 bc 00 03              |A       |		CHK.W	#0x3,D0
00022634 c0 fc 00 34              |   4    |		MULU.W	#0x34,D0
00022638 20 4b                    | K      |		MOVEA.L	A3,A0
0002263a 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
0002263e 4a 28 19 2e              |J( .    |		TST.B	(A0+0x192e)
00022642 67 1e                    |g       |		BEQ	0x22662
00022644 42 28 19 2e              |B( .    |		CLR.B	(A0+0x192e)
00022648 22 6e 00 0c              |"n      |		MOVEA.L	(A6+0xc),A1
0002264c 12 bc 00 01              |        |		MOVE.B	#0x01,(A1)
00022650 22 6e 00 08              |"n      |		MOVEA.L	(A6+0x8),A1
00022654 10 28 19 30              | ( 0    |		MOVE.B	(A0+0x1930),D0
00022658 48 80                    |H       |		EXTB.W	D0
0002265a 41 bc 00 01              |A       |		CHK.W	#0x1,D0
0002265e 12 80                    |        |		MOVE.B	D0,(A1)
00022660 60 0c                    |`       |		BRA	0x2266e
00022662 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00022666 42 10                    |B       |		CLR.B	(A0)
00022668 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002266c 42 10                    |B       |		CLR.B	(A0)
0002266e 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00022672 4e 5e                    |N^      |		UNLK	A6
00022674 4e 75                    |Nu      |		RTS
00022676 ; --------------------------------------------------------------------------------------
00022676 ; OMSI PASCAL Function
00022676 ;    <LVAR  0x00c 2(r)>
00022676 ;    <LVAR  0x008 4(r)>
00022676 ;    <LVAR -0x002 @ 1(r)>
00022676 ; --------------------------------------------------------------------------------------
00022676 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
0002267a bf d5                    |        |		CMPA.L	(A5),A7
0002267c 62 06                    |b       |		BHI	0x22684
0002267e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022682 4e 76                    |Nv      |		TRAPV
00022684 de fc 00 12              |        |		ADDA.W	#0x12,A7
00022688 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
0002268c 4a 39 00 02 e1 96        |J9      |		TST.B	0x2e196
00022692 67 1e                    |g       |		BEQ	0x226b2
00022694 3f 2e 00 0c              |?.      |		MOVE.W	(A6+0xc),-(A7)
00022698 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002269c 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000226a0 48 50                    |HP      |		PEA.L	(A0)
000226a2 4e ba fd 26              |N  &    |		JSR	0x223ca
000226a6 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000226aa 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
000226ae 67 e4                    |g       |		BEQ	0x22694
000226b0 60 12                    |`       |		BRA	0x226c4
000226b2 3f 2e 00 0c              |?.      |		MOVE.W	(A6+0xc),-(A7)
000226b6 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000226ba 48 50                    |HP      |		PEA.L	(A0)
000226bc 4e b9 00 01 02 06        |N       |		JSR	KC03_Wait_Disk_IO(a : W; VAR status : Byte)
000226c2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000226c4 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
000226c8 4e 5e                    |N^      |		UNLK	A6
000226ca 4e 75                    |Nu      |		RTS
000226cc ; --------------------------------------------------------------------------------------
000226cc ; OMSI PASCAL Function
000226cc ;    <LVAR  0x00a 4(w)>
000226cc ;    <LVAR  0x008 2(r)>
000226cc ;    <LVAR -0x014 1(r)>
000226cc ;    <LVAR -0x015 1(r)>
000226cc ;    <LVAR -0x016 @>
000226cc ; --------------------------------------------------------------------------------------
000226cc 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8		; Spelunked
000226d0 bf d5                    |        |		CMPA.L	(A5),A7
000226d2 62 06                    |b       |		BHI	0x226da
000226d4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000226d8 4e 76                    |Nv      |		TRAPV
000226da de fc 00 32              |   2    |		ADDA.W	#0x32,A7
000226de 48 e7 d9 c0              |H       |		MOVEM.L	A1+A0+D7+D4+D3+D1+D0,-(A7)
000226e2 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
000226e6 41 bc 00 03              |A       |		CHK.W	#0x3,D0
000226ea c0 fc 00 34              |   4    |		MULU.W	#0x34,D0
000226ee 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
000226f4 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
000226f8 42 80                    |B       |		CLR.L	D0
000226fa 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
000226fe 42 81                    |B       |		CLR.L	D1
00022700 32 28 19 32              |2( 2    |		MOVE.W	(A0+0x1932),D1
00022704 d2 80                    |        |		ADD.L	D0,D1
00022706 53 81                    |S       |		SUBQ.L	#0x1,D1
00022708 2e 01                    |.       |		MOVE.L	D1,D7
0002270a 28 07                    |(       |		MOVE.L	D7,D4
0002270c 42 83                    |B       |		CLR.L	D3
0002270e 36 39 00 02 d4 38        |69   8  |		MOVE.W	0x2d438,D3
00022714 4e b9 00 01 02 90        |N       |		JSR	?mulu_d3_d4
0002271a 20 04                    |        |		MOVE.L	D4,D0
0002271c d0 b9 00 02 d4 34        |     4  |		ADD.L	0x2d434,D0
00022722 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022724 43 ee ff ea              |C       |		LEA.L	(A6-0x16),A1
00022728 2f 09                    |/       |		MOVE.L	A1,-(A7)
0002272a 3f 3c 00 10              |?<      |		MOVE.W	#0x10,-(A7)
0002272e 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00022734 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00022738 42 80                    |B       |		CLR.L	D0
0002273a 10 2e ff eb              | .      |		MOVE.B	(A6-0x15),D0
0002273e e7 40                    | @      |		ASL.W	#0x3,D0
00022740 42 81                    |B       |		CLR.L	D1
00022742 12 2e ff ec              | .      |		MOVE.B	(A6-0x14),D1
00022746 44 41                    |DA      |		NEG.W	D1
00022748 d2 40                    | @      |		ADD.W	D0,D1
0002274a 42 80                    |B       |		CLR.L	D0
0002274c 30 28 19 32              |0( 2    |		MOVE.W	(A0+0x1932),D0
00022750 53 80                    |S       |		SUBQ.L	#0x1,D0
00022752 e1 80                    |        |		ASL.L	#0x8,D0
00022754 e5 80                    |        |		ASL.L	#0x2,D0
00022756 48 c1                    |H       |		EXTW.L	D1
00022758 d0 81                    |        |		ADD.L	D1,D0
0002275a 2d 40 00 0a              |-@      |		MOVE.L	D0,(A6+0xa)
0002275e 4c df 03 9b              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D7+A0+A1
00022762 4e 5e                    |N^      |		UNLK	A6
00022764 4e 75                    |Nu      |		RTS
00022766 ; --------------------------------------------------------------------------------------
00022766 ; OMSI PASCAL Function
00022766 ;    <LVAR  0x01a 4(r)>
00022766 ;    <LVAR  0x016 4(r)>
00022766 ;    <LVAR  0x014 2(r)>
00022766 ;    <LVAR  0x010 4(r)>
00022766 ;    <LVAR  0x00c 4(r)>
00022766 ;    <LVAR  0x008 4(r)>
00022766 ;    <LVAR -0x004 4(w)>
00022766 ;    <LVAR -0x007 1(w)>
00022766 ;    <LVAR -0x008 1(w) 4(w)>
00022766 ;    <LVAR -0x00a 1(w)>
00022766 ;    <LVAR -0x00c 4(w)>
00022766 ;    <LVAR -0x00d 1(w)>
00022766 ;    <LVAR -0x00e 1(w)>
00022766 ;    <LVAR -0x00f 1(w)>
00022766 ;    <LVAR -0x010 @ 1(w) 4(w)>
00022766 ; --------------------------------------------------------------------------------------
00022766 4e 56 ff a2              |NV      |		LINK.W	A6,#0xffa2
0002276a bf d5                    |        |		CMPA.L	(A5),A7
0002276c 62 06                    |b       |		BHI	0x22774
0002276e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022772 4e 76                    |Nv      |		TRAPV
00022774 de fc 00 4c              |   L    |		ADDA.W	#0x4c,A7
00022778 48 e7 fd f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
0002277c 47 ee 00 10              |G       |		LEA.L	(A6+0x10),A3
00022780 49 ee 00 14              |I       |		LEA.L	(A6+0x14),A4
00022784 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
00022786 24 3c 00 00 00 ff        |$<      |		MOVE.L	#0xff,D2
0002278c 7a 01                    |z       |		MOVEQ.L	#0x01,D5
0002278e 4a 39 00 02 e1 96        |J9      |		TST.B	0x2e196
00022794 67 00 01 2a              |g  *    |		BEQ	0x228c0
00022798 30 14                    |0       |		MOVE.W	(A4),D0
0002279a 41 bc 00 03              |A       |		CHK.W	#0x3,D0
0002279e c0 fc 00 34              |   4    |		MULU.W	#0x34,D0
000227a2 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
000227a8 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
000227ac 30 14                    |0       |		MOVE.W	(A4),D0
000227ae 41 82                    |A       |		CHK.W	D2,D0
000227b0 3e 00                    |>       |		MOVE.W	D0,D7
000227b2 4a 28 19 2f              |J( /    |		TST.B	(A0+0x192f)
000227b6 66 06                    |f       |		BNE	0x227be
000227b8 4a 28 19 2e              |J( .    |		TST.B	(A0+0x192e)
000227bc 67 0a                    |g       |		BEQ	0x227c8
000227be 48 78 00 13              |Hx      |		PEA.L	0x13
000227c2 4e ba eb 68              |N  h    |		JSR	0x2132c
000227c6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000227c8 11 45 19 2f              | E /    |		MOVE.B	D5,(A0+0x192f)
000227cc 42 68 19 32              |Bh 2    |		CLR.W	(A0+0x1932)
000227d0 31 45 19 34              |1E 4    |		MOVE.W	D5,(A0+0x1934)
000227d4 21 6e 00 0c 19 36        |!n   6  |		MOVE.L	(A6+0xc),(A0+0x1936)
000227da 21 6e 00 08 19 3a        |!n   :  |		MOVE.L	(A6+0x8),(A0+0x193a)
000227e0 4a 93                    |J       |		TST.L	(A3)
000227e2 67 2a                    |g*      |		BEQ	0x2280e
000227e4 30 39 00 02 d4 32        |09   2  |		MOVE.W	0x2d432,D0
000227ea c0 c7                    |        |		MULU.W	D7,D0
000227ec 2f 2e 00 16              |/.      |		MOVE.L	(A6+0x16),-(A7)
000227f0 d0 b9 00 02 d4 2e        |     .  |		ADD.L	0x2d42e,D0
000227f6 2f 00                    |/       |		MOVE.L	D0,-(A7)
000227f8 20 13                    |        |		MOVE.L	(A3),D0
000227fa 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00022800 63 02                    |c       |		BLS	0x22804
00022802 4e 4f                    |NO      |		TRAP	#15
00022804 3f 00                    |?       |		MOVE.W	D0,-(A7)
00022806 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002280c de c1                    |        |		ADDA.W	D1,A7
0002280e 22 6e 00 1a              |"n      |		MOVEA.L	(A6+0x1a),A1
00022812 24 49                    |$I      |		MOVEA.L	A1,A2
00022814 2f 0a                    |/       |		MOVE.L	A2,-(A7)
00022816 21 57 19 3e              |!W >    |		MOVE.L	(A7),(A0+0x193e)
0002281a 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
0002281e 20 4f                    | O      |		MOVEA.L	A7,A0
00022820 70 0f                    |p       |		MOVEQ.L	#0x0f,D0
00022822 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022824 51 c8 ff fc              |Q       |		DBF	D0,0x22822
00022828 2d 5f ff f0              |-_      |		MOVE.L	(A7)+,(A6-0x10)
0002282c 2d 5f ff f4              |-_      |		MOVE.L	(A7)+,(A6-0xc)
00022830 2d 5f ff f8              |-_      |		MOVE.L	(A7)+,(A6-0x8)
00022834 2d 5f ff fc              |-_      |		MOVE.L	(A7)+,(A6-0x4)
00022838 1d 7c 00 40 ff f0        | | @    |		MOVE.B	#0x40,(A6-0x10)
0002283e 20 13                    |        |		MOVE.L	(A3),D0
00022840 5e 80                    |^       |		ADDQ.L	#0x7,D0
00022842 28 00                    |(       |		MOVE.L	D0,D4
00022844 76 08                    |v       |		MOVEQ.L	#0x08,D3
00022846 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
0002284c 0c 84 00 00 00 80        |        |		CMPI.L	#0x00000080,D4
00022852 63 02                    |c       |		BLS	0x22856
00022854 4e 4f                    |NO      |		TRAP	#15
00022856 1d 44 ff f1              | D      |		MOVE.B	D4,(A6-0xf)
0002285a 42 80                    |B       |		CLR.L	D0
0002285c 10 04                    |        |		MOVE.B	D4,D0
0002285e e7 40                    | @      |		ASL.W	#0x3,D0
00022860 48 c0                    |H       |		EXTW.L	D0
00022862 90 93                    |        |		SUB.L	(A3),D0
00022864 b0 82                    |        |		CMP.L	D2,D0
00022866 63 02                    |c       |		BLS	0x2286a
00022868 4e 4f                    |NO      |		TRAP	#15
0002286a 1d 40 ff f2              | @      |		MOVE.B	D0,(A6-0xe)
0002286e 4f 82                    |O       |		CHK.W	D2,D7
00022870 1d 47 ff f3              | G      |		MOVE.B	D7,(A6-0xd)
00022874 1d 7c 00 0f ff f6        | |      |		MOVE.B	#0x0f,(A6-0xa)
0002287a 1d 47 ff f8              | G      |		MOVE.B	D7,(A6-0x8)
0002287e 00 2e 00 80 ff f9        | .      |		ORI.B	#0x80,(A6-0x7)
00022884 02 2e 00 fe ff f9        | .      |		ANDI.B	#0xfe,(A6-0x7)
0002288a 30 39 00 02 d4 38        |09   8  |		MOVE.W	0x2d438,D0
00022890 c0 c7                    |        |		MULU.W	D7,D0
00022892 41 ee ff f0              |A       |		LEA.L	(A6-0x10),A0
00022896 2f 08                    |/       |		MOVE.L	A0,-(A7)
00022898 d0 b9 00 02 d4 34        |     4  |		ADD.L	0x2d434,D0
0002289e 2f 00                    |/       |		MOVE.L	D0,-(A7)
000228a0 3f 3c 00 10              |?<      |		MOVE.W	#0x10,-(A7)
000228a4 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000228aa de c1                    |        |		ADDA.W	D1,A7
000228ac 0c 47 ff ff              | G      |		CMPI.W	#0xffff,D7
000228b0 63 02                    |c       |		BLS	0x228b4
000228b2 4e 4f                    |NO      |		TRAP	#15
000228b4 3f 07                    |?       |		MOVE.W	D7,-(A7)
000228b6 4e b9 00 01 02 30        |N    0  |		JSR	KERNCALL_18
000228bc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000228be 60 14                    |`       |		BRA	0x228d4
000228c0 20 6e 00 1a              | n      |		MOVEA.L	(A6+0x1a),A0
000228c4 48 50                    |HP      |		PEA.L	(A0)
000228c6 2f 2e 00 16              |/.      |		MOVE.L	(A6+0x16),-(A7)
000228ca 3f 14                    |?       |		MOVE.W	(A4),-(A7)
000228cc 4e b9 00 01 02 04        |N       |		JSR	KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
000228d2 de c1                    |        |		ADDA.W	D1,A7
000228d4 4c df 1f bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
000228d8 4e 5e                    |N^      |		UNLK	A6
000228da 4e 75                    |Nu      |		RTS
000228dc ; --------------------------------------------------------------------------------------
000228dc ; OMSI PASCAL Function
000228dc ;    <LVAR -0x006 4(rw)>
000228dc ;    <LVAR -0x007 1(w)>
000228dc ;    <LVAR -0x00a 4(rw)>
000228dc ;    <LVAR -0x00d 1(w)>
000228dc ;    <LVAR -0x00e 4(rw)>
000228dc ;    <LVAR -0x012 4(rw)>
000228dc ;    <LVAR -0x014 @ 1(r)>
000228dc ;    <LVAR -0x018 4(w)>
000228dc ;    <LVAR -0x01c 4(w)>
000228dc ;    <LVAR -0x020 4(w)>
000228dc ;    <LVAR -0x024 @ 4(w)>
000228dc ; --------------------------------------------------------------------------------------
000228dc 4e 56 ff aa              |NV      |		LINK.W	A6,#0xffaa
000228e0 bf d5                    |        |		CMPA.L	(A5),A7
000228e2 62 06                    |b       |		BHI	0x228ea
000228e4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000228e8 4e 76                    |Nv      |		TRAPV
000228ea de fc 00 32              |   2    |		ADDA.W	#0x32,A7
000228ee 48 e7 80 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D0,-(A7)
000228f2 41 ee ff ee              |A       |		LEA.L	(A6-0x12),A0
000228f6 43 ee ff f2              |C       |		LEA.L	(A6-0xe),A1
000228fa 45 ee ff f6              |E       |		LEA.L	(A6-0xa),A2
000228fe 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
00022902 70 03                    |p       |		MOVEQ.L	#0x03,D0
00022904 20 ba e8 4a              |   J    |		MOVE.L	0x21150,(A0)
00022908 22 ba e8 4a              |"  J    |		MOVE.L	0x21154,(A1)
0002290c 24 ba e8 4a              |$  J    |		MOVE.L	0x21158,(A2)
00022910 26 ba e8 4a              |&  J    |		MOVE.L	0x2115c,(A3)
00022914 02 2e 00 80 ff f3        | .      |		ANDI.B	#0x80,(A6-0xd)
0002291a 00 2e 00 06 ff f3        | .      |		ORI.B	#0x06,(A6-0xd)
00022920 02 2e 00 80 ff f9        | .      |		ANDI.B	#0x80,(A6-0x7)
00022926 2d 50 ff dc              |-P      |		MOVE.L	(A0),(A6-0x24)
0002292a 2d 51 ff e0              |-Q      |		MOVE.L	(A1),(A6-0x20)
0002292e 2d 52 ff e4              |-R      |		MOVE.L	(A2),(A6-0x1c)
00022932 2d 53 ff e8              |-S      |		MOVE.L	(A3),(A6-0x18)
00022936 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
0002293c 48 6e ff dc              |Hn      |		PEA.L	(A6-0x24)
00022940 2f 2f 00 04              |//      |		MOVE.L	(A7+0x4),-(A7)
00022944 3f 00                    |?       |		MOVE.W	D0,-(A7)
00022946 48 78 00 00              |Hx      |		PEA.L	0x0
0002294a 2f 2f 00 0e              |//      |		MOVE.L	(A7+0xe),-(A7)
0002294e 48 78 00 00              |Hx      |		PEA.L	0x0
00022952 4e ba fe 12              |N       |		JSR	0x22766
00022956 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
0002295a 4e ba f9 1e              |N       |		JSR	0x2227a
0002295e 3f 00                    |?       |		MOVE.W	D0,-(A7)
00022960 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00022964 4e ba fd 10              |N       |		JSR	0x22676
00022968 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002296a 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
0002296e 66 10                    |f       |		BNE	0x22980
00022970 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00022972 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00022974 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00022976 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00022978 4e ba f9 d2              |N       |		JSR	0x2234c
0002297c de fc 00 10              |        |		ADDA.W	#0x10,A7
00022980 4c df 0f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3
00022984 4e 5e                    |N^      |		UNLK	A6
00022986 4e 75                    |Nu      |		RTS
00022988 ; --------------------------------------------------------------------------------------
00022988 ; OMSI PASCAL Function
00022988 ;    <LVAR  0x008 1(rw)>
00022988 ;    <LVAR -0x002 @ 1(r)>
00022988 ;    <LVAR -0x004 @>
00022988 ; --------------------------------------------------------------------------------------
00022988 4e 56 ff ea              |NV      |		LINK.W	A6,#0xffea
0002298c bf d5                    |        |		CMPA.L	(A5),A7
0002298e 62 06                    |b       |		BHI	0x22996
00022990 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022994 4e 76                    |Nv      |		TRAPV
00022996 de fc 00 12              |        |		ADDA.W	#0x12,A7
0002299a 48 e7 c0 00              |H       |		MOVEM.L	D1+D0,-(A7)
0002299e 72 01                    |r       |		MOVEQ.L	#0x01,D1
000229a0 42 2e 00 08              |B.      |		CLR.B	(A6+0x8)
000229a4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000229a6 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
000229aa 4e b9 00 01 02 12        |N       |		JSR	KC09_PortStatus(Port : Word; VAR b: Byte)
000229b0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000229b2 10 2e ff fe              | .      |		MOVE.B	(A6-0x2),D0
000229b6 b0 01                    |        |		CMP.B	D1,D0
000229b8 66 12                    |f       |		BNE	0x229cc
000229ba 3f 01                    |?       |		MOVE.W	D1,-(A7)
000229bc 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000229c0 4e b9 00 01 02 0e        |N       |		JSR	KC07_PortGetChar(port : Word ; VAR ret : Word)
000229c6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000229c8 1d 41 00 08              | A      |		MOVE.B	D1,(A6+0x8)
000229cc 4c df 00 03              |L       |		MOVEM.L	(A7)+,D0+D1
000229d0 4e 5e                    |N^      |		UNLK	A6
000229d2 4e 75                    |Nu      |		RTS
000229d4 ; --------------------------------------------------------------------------------------
000229d4 ; OMSI PASCAL Function
000229d4 ; --------------------------------------------------------------------------------------
000229d4 4e 56 ff c2              |NV      |		LINK.W	A6,#0xffc2
000229d8 bf d5                    |        |		CMPA.L	(A5),A7
000229da 62 06                    |b       |		BHI	0x229e2
000229dc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000229e0 4e 76                    |Nv      |		TRAPV
000229e2 de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
000229e6 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000229ea 9e fc 00 22              |   "    |		SUBA.W	#0x22,A7
000229ee 20 4f                    | O      |		MOVEA.L	A7,A0
000229f0 43 fa db 5c              |C  \    |		LEA.L	0x2054e,A1
000229f4 70 20                    |p       |		MOVEQ.L	#0x20,D0
000229f6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000229f8 51 c8 ff fc              |Q       |		DBF	D0,0x229f6
000229fc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000229fe 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022a02 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00022a06 3f 3c 00 21              |?< !    |		MOVE.W	#0x21,-(A7)
00022a0a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022a10 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022a12 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022a18 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00022a1c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00022a1e 4e ba ff 68              |N  h    |		JSR	0x22988
00022a22 4a 1f                    |J       |		TST.B	(A7)+
00022a24 67 f6                    |g       |		BEQ	0x22a1c
00022a26 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00022a2a 4e 5e                    |N^      |		UNLK	A6
00022a2c 4e 75                    |Nu      |		RTS
00022a2e ; --------------------------------------------------------------------------------------
00022a2e ; OMSI PASCAL Function
00022a2e ;    <LVAR  0x008 4(r)>
00022a2e ; --------------------------------------------------------------------------------------
00022a2e 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
00022a32 bf d5                    |        |		CMPA.L	(A5),A7
00022a34 62 06                    |b       |		BHI	0x22a3c
00022a36 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022a3a 4e 76                    |Nv      |		TRAPV
00022a3c de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00022a40 48 e7 80 e0              |H       |		MOVEM.L	A2+A1+A0+D0,-(A7)
00022a44 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
00022a48 45 ec 00 06              |E       |		LEA.L	(A4+0x6),A2
00022a4c 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00022a4e 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
00022a52 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00022a58 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00022a5a 20 51                    | Q      |		MOVEA.L	(A1),A0
00022a5c 30 10                    |0       |		MOVE.W	(A0),D0
00022a5e 48 c0                    |H       |		EXTW.L	D0
00022a60 d0 92                    |        |		ADD.L	(A2),D0
00022a62 0c 80 00 00 00 4f        |     O  |		CMPI.L	#0x0000004f,D0
00022a68 6f 08                    |o       |		BLE	0x22a72
00022a6a 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00022a70 42 92                    |B       |		CLR.L	(A2)
00022a72 30 10                    |0       |		MOVE.W	(A0),D0
00022a74 48 c0                    |H       |		EXTW.L	D0
00022a76 d1 92                    |        |		ADD.L	D0,(A2)
00022a78 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00022a7a 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00022a80 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022a82 4c df 07 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2
00022a86 4e 5e                    |N^      |		UNLK	A6
00022a88 4e 75                    |Nu      |		RTS
00022a8a ; --------------------------------------------------------------------------------------
00022a8a ; OMSI PASCAL Function
00022a8a ;    <LVAR  0x008 2(r)>
00022a8a ; --------------------------------------------------------------------------------------
00022a8a 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
00022a8e bf d5                    |        |		CMPA.L	(A5),A7
00022a90 62 06                    |b       |		BHI	0x22a98
00022a92 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022a96 4e 76                    |Nv      |		TRAPV
00022a98 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
00022a9c 48 e7 ff f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00022aa0 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00022aa6 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
00022aaa 72 01                    |r       |		MOVEQ.L	#0x01,D1
00022aac 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
00022aae 76 0c                    |v       |		MOVEQ.L	#0x0c,D3
00022ab0 78 0a                    |x       |		MOVEQ.L	#0x0a,D4
00022ab2 7a 09                    |z       |		MOVEQ.L	#0x09,D5
00022ab4 7c 08                    ||       |		MOVEQ.L	#0x08,D6
00022ab6 7e 10                    |~       |		MOVEQ.L	#0x10,D7
00022ab8 29 7c 00 00 00 1d 00 06  |)|      |		MOVE.L	#0x1d,(A4+0x6)
00022ac0 3f 3a df 78              |?: x    |		MOVE.W	0x20a3a,-(A7)
00022ac4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022ac6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022aca 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022acc 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00022ad0 4e 92                    |N       |		JSR	(A2)
00022ad2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022ad4 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00022ada 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00022adc 54 ac 00 06              |T       |		ADDQ.L	#0x2,(A4+0x6)
00022ae0 30 13                    |0       |		MOVE.W	(A3),D0
00022ae2 02 40 40 00              | @@     |		ANDI.W	#0x4000,D0
00022ae6 67 24                    |g$      |		BEQ	0x22b0c
00022ae8 9e c4                    |        |		SUBA.W	D4,A7
00022aea 20 4f                    | O      |		MOVEA.L	A7,A0
00022aec 43 fa de 2e              |C  .    |		LEA.L	0x2091c,A1
00022af0 70 08                    |p       |		MOVEQ.L	#0x08,D0
00022af2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022af4 51 c8 ff fc              |Q       |		DBF	D0,0x22af2
00022af8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022afa 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022afe 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022b00 3f 05                    |?       |		MOVE.W	D5,-(A7)
00022b02 4e 92                    |N       |		JSR	(A2)
00022b04 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022b06 4e ba ff 26              |N  &    |		JSR	0x22a2e
00022b0a de c2                    |        |		ADDA.W	D2,A7
00022b0c 30 13                    |0       |		MOVE.W	(A3),D0
00022b0e 02 40 20 00              | @      |		ANDI.W	#0x2000,D0
00022b12 67 1c                    |g       |		BEQ	0x22b30
00022b14 2f 3a de 14              |/:      |		MOVE.L	0x2092a,-(A7)
00022b18 2f 3a de 0c              |/:      |		MOVE.L	0x20926,-(A7)
00022b1c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022b1e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022b22 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022b24 3f 06                    |?       |		MOVE.W	D6,-(A7)
00022b26 4e 92                    |N       |		JSR	(A2)
00022b28 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022b2a 4e ba ff 02              |N       |		JSR	0x22a2e
00022b2e de c3                    |        |		ADDA.W	D3,A7
00022b30 30 13                    |0       |		MOVE.W	(A3),D0
00022b32 02 40 08 00              | @      |		ANDI.W	#0x0800,D0
00022b36 67 26                    |g&      |		BEQ	0x22b5e
00022b38 9e c3                    |        |		SUBA.W	D3,A7
00022b3a 20 4f                    | O      |		MOVEA.L	A7,A0
00022b3c 43 fa dd f0              |C       |		LEA.L	0x2092e,A1
00022b40 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00022b42 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022b44 51 c8 ff fc              |Q       |		DBF	D0,0x22b42
00022b48 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022b4a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022b4e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022b50 3f 3c 00 0b              |?<      |		MOVE.W	#0xb,-(A7)
00022b54 4e 92                    |N       |		JSR	(A2)
00022b56 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022b58 4e ba fe d4              |N       |		JSR	0x22a2e
00022b5c de c7                    |        |		ADDA.W	D7,A7
00022b5e 30 13                    |0       |		MOVE.W	(A3),D0
00022b60 02 40 04 00              | @      |		ANDI.W	#0x0400,D0
00022b64 67 1c                    |g       |		BEQ	0x22b82
00022b66 2f 3a dd d6              |/:      |		MOVE.L	0x2093e,-(A7)
00022b6a 2f 3a dd ce              |/:      |		MOVE.L	0x2093a,-(A7)
00022b6e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022b70 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022b74 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022b76 3f 06                    |?       |		MOVE.W	D6,-(A7)
00022b78 4e 92                    |N       |		JSR	(A2)
00022b7a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022b7c 4e ba fe b0              |N       |		JSR	0x22a2e
00022b80 de c3                    |        |		ADDA.W	D3,A7
00022b82 30 13                    |0       |		MOVE.W	(A3),D0
00022b84 02 40 02 00              | @      |		ANDI.W	#0x0200,D0
00022b88 67 24                    |g$      |		BEQ	0x22bae
00022b8a 9e c4                    |        |		SUBA.W	D4,A7
00022b8c 20 4f                    | O      |		MOVEA.L	A7,A0
00022b8e 43 fa dd b2              |C       |		LEA.L	0x20942,A1
00022b92 70 08                    |p       |		MOVEQ.L	#0x08,D0
00022b94 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022b96 51 c8 ff fc              |Q       |		DBF	D0,0x22b94
00022b9a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022b9c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022ba0 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022ba2 3f 05                    |?       |		MOVE.W	D5,-(A7)
00022ba4 4e 92                    |N       |		JSR	(A2)
00022ba6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022ba8 4e ba fe 84              |N       |		JSR	0x22a2e
00022bac de c2                    |        |		ADDA.W	D2,A7
00022bae 30 13                    |0       |		MOVE.W	(A3),D0
00022bb0 02 40 01 00              | @      |		ANDI.W	#0x0100,D0
00022bb4 67 26                    |g&      |		BEQ	0x22bdc
00022bb6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022bb8 20 4f                    | O      |		MOVEA.L	A7,A0
00022bba 43 fa dd 90              |C       |		LEA.L	0x2094c,A1
00022bbe 70 06                    |p       |		MOVEQ.L	#0x06,D0
00022bc0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022bc2 51 c8 ff fc              |Q       |		DBF	D0,0x22bc0
00022bc6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022bc8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022bcc 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022bce 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00022bd2 4e 92                    |N       |		JSR	(A2)
00022bd4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022bd6 4e ba fe 56              |N  V    |		JSR	0x22a2e
00022bda de c3                    |        |		ADDA.W	D3,A7
00022bdc 30 13                    |0       |		MOVE.W	(A3),D0
00022bde 02 40 00 80              | @      |		ANDI.W	#0x0080,D0
00022be2 67 24                    |g$      |		BEQ	0x22c08
00022be4 9e c4                    |        |		SUBA.W	D4,A7
00022be6 20 4f                    | O      |		MOVEA.L	A7,A0
00022be8 43 fa dd 6a              |C  j    |		LEA.L	0x20954,A1
00022bec 70 08                    |p       |		MOVEQ.L	#0x08,D0
00022bee 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022bf0 51 c8 ff fc              |Q       |		DBF	D0,0x22bee
00022bf4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022bf6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022bfa 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022bfc 3f 05                    |?       |		MOVE.W	D5,-(A7)
00022bfe 4e 92                    |N       |		JSR	(A2)
00022c00 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c02 4e ba fe 2a              |N  *    |		JSR	0x22a2e
00022c06 de c2                    |        |		ADDA.W	D2,A7
00022c08 30 13                    |0       |		MOVE.W	(A3),D0
00022c0a 02 40 00 20              | @      |		ANDI.W	#0x0020,D0
00022c0e 67 20                    |g       |		BEQ	0x22c30
00022c10 41 fa dd 56              |A  V    |		LEA.L	0x20968,A0
00022c14 70 04                    |p       |		MOVEQ.L	#0x04,D0
00022c16 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00022c18 51 c8 ff fc              |Q       |		DBF	D0,0x22c16
00022c1c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022c1e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022c22 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022c24 3f 04                    |?       |		MOVE.W	D4,-(A7)
00022c26 4e 92                    |N       |		JSR	(A2)
00022c28 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c2a 4e ba fe 02              |N       |		JSR	0x22a2e
00022c2e de c2                    |        |		ADDA.W	D2,A7
00022c30 30 13                    |0       |		MOVE.W	(A3),D0
00022c32 c0 47                    | G      |		AND.W	D7,D0
00022c34 67 24                    |g$      |		BEQ	0x22c5a
00022c36 9e c4                    |        |		SUBA.W	D4,A7
00022c38 20 4f                    | O      |		MOVEA.L	A7,A0
00022c3a 43 fa dd 2c              |C  ,    |		LEA.L	0x20968,A1
00022c3e 70 08                    |p       |		MOVEQ.L	#0x08,D0
00022c40 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022c42 51 c8 ff fc              |Q       |		DBF	D0,0x22c40
00022c46 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022c48 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022c4c 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022c4e 3f 05                    |?       |		MOVE.W	D5,-(A7)
00022c50 4e 92                    |N       |		JSR	(A2)
00022c52 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c54 4e ba fd d8              |N       |		JSR	0x22a2e
00022c58 de c2                    |        |		ADDA.W	D2,A7
00022c5a 30 13                    |0       |		MOVE.W	(A3),D0
00022c5c c0 46                    | F      |		AND.W	D6,D0
00022c5e 67 28                    |g(      |		BEQ	0x22c88
00022c60 9e c2                    |        |		SUBA.W	D2,A7
00022c62 20 4f                    | O      |		MOVEA.L	A7,A0
00022c64 43 fa dd 0c              |C       |		LEA.L	0x20972,A1
00022c68 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00022c6a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022c6c 51 c8 ff fc              |Q       |		DBF	D0,0x22c6a
00022c70 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022c72 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022c76 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022c78 3f 3c 00 0d              |?<      |		MOVE.W	#0xd,-(A7)
00022c7c 4e 92                    |N       |		JSR	(A2)
00022c7e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c80 4e ba fd ac              |N       |		JSR	0x22a2e
00022c84 de fc 00 12              |        |		ADDA.W	#0x12,A7
00022c88 30 13                    |0       |		MOVE.W	(A3),D0
00022c8a 02 40 00 04              | @      |		ANDI.W	#0x0004,D0
00022c8e 67 24                    |g$      |		BEQ	0x22cb4
00022c90 9e c4                    |        |		SUBA.W	D4,A7
00022c92 20 4f                    | O      |		MOVEA.L	A7,A0
00022c94 43 fa dc ea              |C       |		LEA.L	0x20980,A1
00022c98 70 08                    |p       |		MOVEQ.L	#0x08,D0
00022c9a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022c9c 51 c8 ff fc              |Q       |		DBF	D0,0x22c9a
00022ca0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022ca2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022ca6 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022ca8 3f 05                    |?       |		MOVE.W	D5,-(A7)
00022caa 4e 92                    |N       |		JSR	(A2)
00022cac 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022cae 4e ba fd 7e              |N  ~    |		JSR	0x22a2e
00022cb2 de c2                    |        |		ADDA.W	D2,A7
00022cb4 30 13                    |0       |		MOVE.W	(A3),D0
00022cb6 02 40 00 02              | @      |		ANDI.W	#0x0002,D0
00022cba 67 20                    |g       |		BEQ	0x22cdc
00022cbc 2f 3a dc d4              |/:      |		MOVE.L	0x20992,-(A7)
00022cc0 2f 3a dc cc              |/:      |		MOVE.L	0x2098e,-(A7)
00022cc4 2f 3a dc c4              |/:      |		MOVE.L	0x2098a,-(A7)
00022cc8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022cca 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022cce 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022cd0 3f 03                    |?       |		MOVE.W	D3,-(A7)
00022cd2 4e 92                    |N       |		JSR	(A2)
00022cd4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022cd6 4e ba fd 56              |N  V    |		JSR	0x22a2e
00022cda de c7                    |        |		ADDA.W	D7,A7
00022cdc 30 13                    |0       |		MOVE.W	(A3),D0
00022cde c0 41                    | A      |		AND.W	D1,D0
00022ce0 67 26                    |g&      |		BEQ	0x22d08
00022ce2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022ce4 20 4f                    | O      |		MOVEA.L	A7,A0
00022ce6 43 fa dc ae              |C       |		LEA.L	0x20996,A1
00022cea 70 06                    |p       |		MOVEQ.L	#0x06,D0
00022cec 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022cee 51 c8 ff fc              |Q       |		DBF	D0,0x22cec
00022cf2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022cf4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022cf8 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022cfa 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00022cfe 4e 92                    |N       |		JSR	(A2)
00022d00 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022d02 4e ba fd 2a              |N  *    |		JSR	0x22a2e
00022d06 de c3                    |        |		ADDA.W	D3,A7
00022d08 4a 53                    |JS      |		TST.W	(A3)
00022d0a 66 1c                    |f       |		BNE	0x22d28
00022d0c 2f 3a dc 94              |/:      |		MOVE.L	0x209a2,-(A7)
00022d10 2f 3a dc 8c              |/:      |		MOVE.L	0x2099e,-(A7)
00022d14 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022d16 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022d1a 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022d1c 3f 06                    |?       |		MOVE.W	D6,-(A7)
00022d1e 4e 92                    |N       |		JSR	(A2)
00022d20 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022d22 4e ba fd 0a              |N       |		JSR	0x22a2e
00022d26 de c3                    |        |		ADDA.W	D3,A7
00022d28 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00022d2e 4c df 0f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3
00022d32 4e 5e                    |N^      |		UNLK	A6
00022d34 4e 75                    |Nu      |		RTS
00022d36 ; --------------------------------------------------------------------------------------
00022d36 ; OMSI PASCAL Function
00022d36 ;    <LVAR  0x008 1(r)>
00022d36 ; --------------------------------------------------------------------------------------
00022d36 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
00022d3a bf d5                    |        |		CMPA.L	(A5),A7
00022d3c 62 06                    |b       |		BHI	0x22d44
00022d3e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022d42 4e 76                    |Nv      |		TRAPV
00022d44 de fc 00 12              |        |		ADDA.W	#0x12,A7
00022d48 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
00022d4c 67 06                    |g       |		BEQ	0x22d54
00022d4e 3f 3a dc ec              |?:      |		MOVE.W	0x20a3c,-(A7)
00022d52 60 04                    |`       |		BRA	0x22d58
00022d54 3f 3a dc e8              |?:      |		MOVE.W	0x20a3e,-(A7)
00022d58 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022d5a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022d5e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00022d62 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00022d66 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022d6c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022d6e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022d74 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00022d76 4e 5e                    |N^      |		UNLK	A6
00022d78 4e 75                    |Nu      |		RTS
00022d7a ; --------------------------------------------------------------------------------------
00022d7a ; OMSI PASCAL Function
00022d7a ;    <LVAR  0x00c 4(r)>
00022d7a ;    <LVAR  0x00a 2(r)>
00022d7a ;    <LVAR  0x008 2(r)>
00022d7a ; --------------------------------------------------------------------------------------
00022d7a 4e 56 ff 8e              |NV      |		LINK.W	A6,#0xff8e
00022d7e bf d5                    |        |		CMPA.L	(A5),A7
00022d80 62 06                    |b       |		BHI	0x22d88
00022d82 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022d86 4e 76                    |Nv      |		TRAPV
00022d88 de fc 00 6e              |   n    |		ADDA.W	#0x6e,A7
00022d8c 48 e7 fd f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00022d90 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00022d96 47 f9 00 01 03 d8        |G       |		LEA.L	WriteConsoleString(str : String),A3
00022d9c 49 f9 00 01 02 e8        |I       |		LEA.L	Long2HexString(val : Long; ndig : Long) : String,A4
00022da2 72 01                    |r       |		MOVEQ.L	#0x01,D1
00022da4 74 05                    |t       |		MOVEQ.L	#0x05,D2
00022da6 76 02                    |v       |		MOVEQ.L	#0x02,D3
00022da8 78 08                    |x       |		MOVEQ.L	#0x08,D4
00022daa 7a 10                    |z       |		MOVEQ.L	#0x10,D5
00022dac 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00022db0 b0 43                    | C      |		CMP.W	D3,D0
00022db2 66 7c                    |f|      |		BNE	0x22e30
00022db4 2f 3a d9 34              |/: 4    |		MOVE.L	0x206ea,-(A7)
00022db8 2f 3a d9 2c              |/: ,    |		MOVE.L	0x206e6,-(A7)
00022dbc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022dbe 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022dc2 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022dc4 3f 04                    |?       |		MOVE.W	D4,-(A7)
00022dc6 4e 92                    |N       |		JSR	(A2)
00022dc8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022dca 4e 93                    |N       |		JSR	(A3)
00022dcc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022dce 2e ba d9 2a              |.  *    |		MOVE.L	0x206fa,(A7)
00022dd2 2f 3a d9 22              |/: "    |		MOVE.L	0x206f6,-(A7)
00022dd6 9e c5                    |        |		SUBA.W	D5,A7
00022dd8 20 4f                    | O      |		MOVEA.L	A7,A0
00022dda 43 fa d9 22              |C  "    |		LEA.L	0x206fe,A1
00022dde 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00022de0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022de2 51 c8 ff fc              |Q       |		DBF	D0,0x22de0
00022de6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022de8 48 6f 00 18              |Ho      |		PEA.L	(A7+0x18)
00022dec 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022dee 3f 04                    |?       |		MOVE.W	D4,-(A7)
00022df0 4e 92                    |N       |		JSR	(A2)
00022df2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022df4 42 80                    |B       |		CLR.L	D0
00022df6 30 2e 00 0a              |0.      |		MOVE.W	(A6+0xa),D0
00022dfa 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022dfc 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00022e02 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00022e06 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022e08 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
00022e0c 4e 92                    |N       |		JSR	(A2)
00022e0e 2e ae 00 0c              |.       |		MOVE.L	(A6+0xc),(A7)
00022e12 48 78 00 08              |Hx      |		PEA.L	0x8
00022e16 4e 94                    |N       |		JSR	(A4)
00022e18 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022e1a 4e b9 00 01 02 d8        |N       |		JSR	StringCat4(a, b, c, d : String) : String
00022e20 de c5                    |        |		ADDA.W	D5,A7
00022e22 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022e28 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00022e2c 60 00 00 c8              |`       |		BRA	0x22ef6
00022e30 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022e32 20 4f                    | O      |		MOVEA.L	A7,A0
00022e34 43 fa d8 b8              |C       |		LEA.L	0x206ee,A1
00022e38 70 06                    |p       |		MOVEQ.L	#0x06,D0
00022e3a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022e3c 51 c8 ff fc              |Q       |		DBF	D0,0x22e3a
00022e40 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022e42 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022e46 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022e48 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00022e4c 4e 92                    |N       |		JSR	(A2)
00022e4e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022e50 4e 93                    |N       |		JSR	(A3)
00022e52 20 4f                    | O      |		MOVEA.L	A7,A0
00022e54 43 fa d8 b8              |C       |		LEA.L	0x2070e,A1
00022e58 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00022e5a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022e5c 51 c8 ff fc              |Q       |		DBF	D0,0x22e5a
00022e60 9e fc 00 16              |        |		SUBA.W	#0x16,A7
00022e64 20 4f                    | O      |		MOVEA.L	A7,A0
00022e66 43 fa d8 b2              |C       |		LEA.L	0x2071a,A1
00022e6a 70 14                    |p       |		MOVEQ.L	#0x14,D0
00022e6c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022e6e 51 c8 ff fc              |Q       |		DBF	D0,0x22e6c
00022e72 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022e74 48 6f 00 1e              |Ho      |		PEA.L	(A7+0x1e)
00022e78 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022e7a 3f 3c 00 0b              |?<      |		MOVE.W	#0xb,-(A7)
00022e7e 4e 92                    |N       |		JSR	(A2)
00022e80 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022e82 42 80                    |B       |		CLR.L	D0
00022e84 30 2e 00 0a              |0.      |		MOVE.W	(A6+0xa),D0
00022e88 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022e8a 48 78 00 04              |Hx      |		PEA.L	0x4
00022e8e 4e 94                    |N       |		JSR	(A4)
00022e90 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022e92 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00022e96 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022e98 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
00022e9c 4e 92                    |N       |		JSR	(A2)
00022e9e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022ea0 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
00022ea6 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00022eaa 4e 93                    |N       |		JSR	(A3)
00022eac de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00022eb0 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00022eb2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022eb4 be 82                    |        |		CMP.L	D2,D7
00022eb6 63 02                    |c       |		BLS	0x22eba
00022eb8 4e 4f                    |NO      |		TRAP	#15
00022eba 42 80                    |B       |		CLR.L	D0
00022ebc 10 36 78 0c              | 6x     |		MOVE.B	(A6+D7.L+#0xc),D0
00022ec0 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022ec2 48 78 00 02              |Hx      |		PEA.L	0x2
00022ec6 4e 94                    |N       |		JSR	(A4)
00022ec8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022eca 4e 93                    |N       |		JSR	(A3)
00022ecc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022ece be 82                    |        |		CMP.L	D2,D7
00022ed0 66 08                    |f       |		BNE	0x22eda
00022ed2 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00022ed8 60 16                    |`       |		BRA	0x22ef0
00022eda 3f 3a db 64              |?: d    |		MOVE.W	0x20a40,-(A7)
00022ede 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022ee0 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022ee4 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022ee6 3f 03                    |?       |		MOVE.W	D3,-(A7)
00022ee8 4e 92                    |N       |		JSR	(A2)
00022eea 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022eec 4e 93                    |N       |		JSR	(A3)
00022eee 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00022ef0 52 87                    |R       |		ADDQ.L	#0x1,D7
00022ef2 be 82                    |        |		CMP.L	D2,D7
00022ef4 6f bc                    |o       |		BLE	0x22eb2
00022ef6 4c df 1f bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
00022efa 4e 5e                    |N^      |		UNLK	A6
00022efc 4e 75                    |Nu      |		RTS
00022efe ; --------------------------------------------------------------------------------------
00022efe ; OMSI PASCAL Function
00022efe ;    <LVAR  0x014 4(r)>
00022efe ;    <LVAR  0x010 4(r)>
00022efe ;    <LVAR  0x00c 4(r)>
00022efe ;    <LVAR  0x008 4(r)>
00022efe ;    <LVAR -0x00c 4(w)>
00022efe ;    <LVAR -0x010 4(w)>
00022efe ;    <LVAR -0x014 4(w)>
00022efe ;    <LVAR -0x018 4(w)>
00022efe ; --------------------------------------------------------------------------------------
00022efe 4e 56 ff 92              |NV      |		LINK.W	A6,#0xff92
00022f02 bf d5                    |        |		CMPA.L	(A5),A7
00022f04 62 06                    |b       |		BHI	0x22f0c
00022f06 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022f0a 4e 76                    |Nv      |		TRAPV
00022f0c de fc 00 56              |   V    |		ADDA.W	#0x56,A7
00022f10 48 e7 fb f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7)
00022f14 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00022f1a 47 f9 00 01 03 d8        |G       |		LEA.L	WriteConsoleString(str : String),A3
00022f20 72 0f                    |r       |		MOVEQ.L	#0x0f,D1
00022f22 74 01                    |t       |		MOVEQ.L	#0x01,D2
00022f24 2d 6e 00 08 ff e8        |-n      |		MOVE.L	(A6+0x8),(A6-0x18)
00022f2a 2d 6e 00 0c ff ec        |-n      |		MOVE.L	(A6+0xc),(A6-0x14)
00022f30 2d 6e 00 10 ff f0        |-n      |		MOVE.L	(A6+0x10),(A6-0x10)
00022f36 2d 6e 00 14 ff f4        |-n      |		MOVE.L	(A6+0x14),(A6-0xc)
00022f3c 7c 01                    ||       |		MOVEQ.L	#0x01,D6
00022f3e 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00022f40 be 81                    |        |		CMP.L	D1,D7
00022f42 63 02                    |c       |		BLS	0x22f46
00022f44 4e 4f                    |NO      |		TRAP	#15
00022f46 4a 36 78 e8              |J6x     |		TST.B	(A6+D7.L-#0x18)
00022f4a 67 02                    |g       |		BEQ	0x22f4e
00022f4c 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00022f4e 52 87                    |R       |		ADDQ.L	#0x1,D7
00022f50 be 81                    |        |		CMP.L	D1,D7
00022f52 6f ec                    |o       |		BLE	0x22f40
00022f54 4a 06                    |J       |		TST.B	D6
00022f56 67 2a                    |g*      |		BEQ	0x22f82
00022f58 41 fa da 5e              |A  ^    |		LEA.L	0x209b8,A0
00022f5c 70 08                    |p       |		MOVEQ.L	#0x08,D0
00022f5e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00022f60 51 c8 ff fc              |Q       |		DBF	D0,0x22f5e
00022f64 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022f66 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022f6a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022f6c 3f 3c 00 12              |?<      |		MOVE.W	#0x12,-(A7)
00022f70 4e 92                    |N       |		JSR	(A2)
00022f72 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022f74 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022f7a de fc 00 16              |        |		ADDA.W	#0x16,A7
00022f7e 60 00 00 94              |`       |		BRA	0x23014
00022f82 9e fc 00 1a              |        |		SUBA.W	#0x1a,A7
00022f86 20 4f                    | O      |		MOVEA.L	A7,A0
00022f88 43 fa d7 24              |C  $    |		LEA.L	0x206ae,A1
00022f8c 70 18                    |p       |		MOVEQ.L	#0x18,D0
00022f8e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022f90 51 c8 ff fc              |Q       |		DBF	D0,0x22f8e
00022f94 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022f96 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022f9a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022f9c 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00022fa0 4e 92                    |N       |		JSR	(A2)
00022fa2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022fa4 4e 93                    |N       |		JSR	(A3)
00022fa6 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00022faa 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00022fac 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022fae be 81                    |        |		CMP.L	D1,D7
00022fb0 63 02                    |c       |		BLS	0x22fb4
00022fb2 4e 4f                    |NO      |		TRAP	#15
00022fb4 42 80                    |B       |		CLR.L	D0
00022fb6 10 36 78 e8              | 6x     |		MOVE.B	(A6+D7.L-#0x18),D0
00022fba 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022fbc 48 78 00 02              |Hx      |		PEA.L	0x2
00022fc0 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00022fc6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022fc8 4e 93                    |N       |		JSR	(A3)
00022fca 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022fcc 20 07                    |        |		MOVE.L	D7,D0
00022fce 52 80                    |R       |		ADDQ.L	#0x1,D0
00022fd0 28 00                    |(       |		MOVE.L	D0,D4
00022fd2 76 04                    |v       |		MOVEQ.L	#0x04,D3
00022fd4 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00022fda 4a 83                    |J       |		TST.L	D3
00022fdc 66 2a                    |f*      |		BNE	0x23008
00022fde be 81                    |        |		CMP.L	D1,D7
00022fe0 67 26                    |g&      |		BEQ	0x23008
00022fe2 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00022fe4 20 4f                    | O      |		MOVEA.L	A7,A0
00022fe6 43 fa da 5a              |C  Z    |		LEA.L	0x20a42,A1
00022fea 70 04                    |p       |		MOVEQ.L	#0x04,D0
00022fec 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022fee 51 c8 ff fc              |Q       |		DBF	D0,0x22fec
00022ff2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022ff4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022ff8 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022ffa 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00022ffe 4e 92                    |N       |		JSR	(A2)
00023000 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023002 4e 93                    |N       |		JSR	(A3)
00023004 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00023008 52 87                    |R       |		ADDQ.L	#0x1,D7
0002300a be 81                    |        |		CMP.L	D1,D7
0002300c 6f 9e                    |o       |		BLE	0x22fac
0002300e 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00023014 4c df 0f df              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3
00023018 4e 5e                    |N^      |		UNLK	A6
0002301a 4e 75                    |Nu      |		RTS
0002301c ; --------------------------------------------------------------------------------------
0002301c ; OMSI PASCAL Function
0002301c ;    <LVAR  0x010 4(r)>
0002301c ;    <LVAR  0x00c 4(r)>
0002301c ;    <LVAR  0x008 4(r)>
0002301c ;    <LVAR -0x004 4(r)>
0002301c ;    <LVAR -0x008 4(r)>
0002301c ;    <LVAR -0x00a 2(r)>
0002301c ;    <LVAR -0x00e 4(r)>
0002301c ;    <LVAR -0x010 2(r)>
0002301c ;    <LVAR -0x014 4(r)>
0002301c ;    <LVAR -0x018 4(r)>
0002301c ;    <LVAR -0x01c 4(r)>
0002301c ;    <LVAR -0x01e 2(r)>
0002301c ;    <LVAR -0x01f 1(r)>
0002301c ;    <LVAR -0x020 1(r)>
0002301c ;    <LVAR -0x021 1(r)>
0002301c ;    <LVAR -0x022 1(r)>
0002301c ;    <LVAR -0x026 @ 4(r)>
0002301c ;    <LVAR -0x02e 4(r)>
0002301c ;    <LVAR -0x032 4(r)>
0002301c ;    <LVAR -0x036 4(r)>
0002301c ;    <LVAR -0x03a 2(r) 4(r)>
0002301c ;    <LVAR -0x03e 4(r)>
0002301c ;    <LVAR -0x042 4(r)>
0002301c ;    <LVAR -0x046 4(r)>
0002301c ;    <LVAR -0x04a 2(r) 4(r)>
0002301c ;    <LVAR -0x04e 4(r)>
0002301c ;    <LVAR -0x051 1(r)>
0002301c ;    <LVAR -0x052 1(r)>
0002301c ;    <LVAR -0x056 4(r)>
0002301c ;    <LVAR -0x05a 4(r)>
0002301c ;    <LVAR -0x05e 4(r)>
0002301c ;    <LVAR -0x062 4(r)>
0002301c ;    <LVAR -0x066 2(r)>
0002301c ;    <LVAR -0x068 2(r)>
0002301c ;    <LVAR -0x06a 2(r)>
0002301c ;    <LVAR -0x072 4(r)>
0002301c ;    <LVAR -0x074 2(r)>
0002301c ;    <LVAR -0x076 2(r)>
0002301c ;    <LVAR -0x078 2(r)>
0002301c ;    <LVAR -0x07a @ 2(r)>
0002301c ;    <LVAR -0x088 @ 2(w)>
0002301c ; --------------------------------------------------------------------------------------
0002301c 4e 56 ff 0c              |NV      |		LINK.W	A6,#0xff0c
00023020 bf d5                    |        |		CMPA.L	(A5),A7
00023022 62 06                    |b       |		BHI	0x2302a
00023024 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023028 4e 76                    |Nv      |		TRAPV
0002302a de fc 00 6c              |   l    |		ADDA.W	#0x6c,A7
0002302e 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00023032 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00023038 47 f9 00 01 02 e8        |G       |		LEA.L	Long2HexString(val : Long; ndig : Long) : String,A3
0002303e 41 fa d7 30              |A  0    |		LEA.L	0x20770,A0
00023042 70 07                    |p       |		MOVEQ.L	#0x07,D0
00023044 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00023046 51 c8 ff fc              |Q       |		DBF	D0,0x23044
0002304a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002304c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023050 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023054 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
00023058 4e 92                    |N       |		JSR	(A2)
0002305a 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
0002305e 48 78 00 06              |Hx      |		PEA.L	0x6
00023062 4e 93                    |N       |		JSR	(A3)
00023064 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023066 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002306c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002306e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023074 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00023078 28 2e 00 0c              |(.      |		MOVE.L	(A6+0xc),D4
0002307c 76 50                    |vP      |		MOVEQ.L	#0x50,D3
0002307e 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00023084 2a 2e 00 10              |*.      |		MOVE.L	(A6+0x10),D5
00023088 da 84                    |        |		ADD.L	D4,D5
0002308a 41 fa d6 c4              |A       |		LEA.L	0x20750,A0
0002308e 70 07                    |p       |		MOVEQ.L	#0x07,D0
00023090 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00023092 51 c8 ff fc              |Q       |		DBF	D0,0x23090
00023096 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023098 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002309c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000230a0 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
000230a4 4e 92                    |N       |		JSR	(A2)
000230a6 2e 85                    |.       |		MOVE.L	D5,(A7)
000230a8 48 78 00 06              |Hx      |		PEA.L	0x6
000230ac 4e 93                    |N       |		JSR	(A3)
000230ae 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000230b0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000230b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000230b8 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000230be de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000230c2 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000230c4 20 06                    |        |		MOVE.L	D6,D0
000230c6 e3 80                    |        |		ASL.L	#0x1,D0
000230c8 22 05                    |"       |		MOVE.L	D5,D1
000230ca d2 80                    |        |		ADD.L	D0,D1
000230cc 28 01                    |(       |		MOVE.L	D1,D4
000230ce 26 3c 00 00 01 00        |&<      |		MOVE.L	#0x100,D3
000230d4 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
000230da 0c 84 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D4
000230e0 63 02                    |c       |		BLS	0x230e4
000230e2 4e 4f                    |NO      |		TRAP	#15
000230e4 3d 44 ff 78              |=D x    |		MOVE.W	D4,(A6-0x88)
000230e8 14 39 00 02 d8 b2        | 9      |		MOVE.B	0x2d8b2,D2
000230ee 48 82                    |H       |		EXTB.W	D2
000230f0 0c 42 00 01              | B      |		CMPI.W	#0x0001,D2
000230f4 63 02                    |c       |		BLS	0x230f8
000230f6 4e 4e                    |NN      |		TRAP	#14
000230f8 d4 42                    | B      |		ADD.W	D2,D2
000230fa 34 3b 20 06 4e fb 20 02  |4;  N   |		SWITCH	D2.W
00023102 00 04                    |        |		.CONST	0x4			; [0x0] -> 0x23106
00023104 00 2e                    | .      |		.CONST	0x2e			; [0x1] -> 0x23130
00023106					switch@0x230fa[0x0]:
00023106 28 01                    |(       |		MOVE.L	D1,D4
00023108 26 3c 00 00 04 00        |&<      |		MOVE.L	#0x400,D3
0002310e 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00023114 2f 03                    |/       |		MOVE.L	D3,-(A7)
00023116 2e 39 00 02 c7 c0        |.9      |		MOVE.L	0x2c7c0,D7
0002311c de 9f                    |        |		ADD.L	(A7)+,D7
0002311e 41 ee ff 78              |A  x    |		LEA.L	(A6-0x88),A0
00023122 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023124 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023128 2f 39 00 02 c7 a4        |/9      |		MOVE.L	0x2c7a4,-(A7)
0002312e 60 1a                    |`       |		BRA	0x2314a
00023130					switch@0x230fa[0x1]:
00023130 2f 03                    |/       |		MOVE.L	D3,-(A7)
00023132 2e 39 00 02 e1 dc        |.9      |		MOVE.L	0x2e1dc,D7
00023138 de 9f                    |        |		ADD.L	(A7)+,D7
0002313a 41 ee ff 78              |A  x    |		LEA.L	(A6-0x88),A0
0002313e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023140 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023144 2f 39 00 02 e1 cc        |/9      |		MOVE.L	0x2e1cc,-(A7)
0002314a 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
0002314e 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00023152 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
00023158 de fc 00 0a              |        |		ADDA.W	#0xa,A7
0002315c 2e 87                    |.       |		MOVE.L	D7,(A7)
0002315e 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00023162 41 ee ff 86              |A       |		LEA.L	(A6-0x7a),A0
00023166 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023168 d1 97                    |        |		ADD.L	D0,(A7)
0002316a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002316e 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00023172 4e b9 00 01 02 3a        |N    :  |		JSR	KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
00023178 de fc 00 0e              |        |		ADDA.W	#0xe,A7
0002317c 52 86                    |R       |		ADDQ.L	#0x1,D6
0002317e 0c 86 00 00 00 28        |     (  |		CMPI.L	#0x00000028,D6
00023184 6f 00 ff 3e              |o  >    |		BLE	0x230c4
00023188 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002318c 41 ee ff da              |A       |		LEA.L	(A6-0x26),A0
00023190 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023192 3f 3c 00 26              |?< &    |		MOVE.W	#0x26,-(A7)
00023196 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002319c 9e fc 00 10              |        |		SUBA.W	#0x10,A7
000231a0 20 4f                    | O      |		MOVEA.L	A7,A0
000231a2 43 fa d5 cc              |C       |		LEA.L	0x20770,A1
000231a6 70 18                    |p       |		MOVEQ.L	#0x18,D0
000231a8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000231aa 51 c8 ff fc              |Q       |		DBF	D0,0x231a8
000231ae 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000231b0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000231b4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000231b8 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000231bc 4e 92                    |N       |		JSR	(A2)
000231be 2e ae ff da              |.       |		MOVE.L	(A6-0x26),(A7)
000231c2 48 78 00 08              |Hx      |		PEA.L	0x8
000231c6 4e 93                    |N       |		JSR	(A3)
000231c8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000231ca 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000231d0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000231d2 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000231d8 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
000231dc 2e ba d5 b4              |.       |		MOVE.L	0x20792,(A7)
000231e0 2f 3a d5 ac              |/:      |		MOVE.L	0x2078e,-(A7)
000231e4 2f 3a d5 a4              |/:      |		MOVE.L	0x2078a,-(A7)
000231e8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000231ea 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000231ee 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000231f2 3f 3c 00 0c              |?<      |		MOVE.W	#0xc,-(A7)
000231f6 4e 92                    |N       |		JSR	(A2)
000231f8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000231fa 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023200 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
00023204 20 4f                    | O      |		MOVEA.L	A7,A0
00023206 43 fa d5 8e              |C       |		LEA.L	0x20796,A1
0002320a 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002320c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002320e 51 c8 ff fc              |Q       |		DBF	D0,0x2320c
00023212 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023214 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023218 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002321c 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023220 4e 92                    |N       |		JSR	(A2)
00023222 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023224 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002322a de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002322e 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
00023232 ee 08                    |        |		LSR.B	#0x7,D0
00023234 1f 00                    |        |		MOVE.B	D0,-(A7)
00023236 4e ba fa fe              |N       |		JSR	0x22d36
0002323a 9e fc 00 18              |        |		SUBA.W	#0x18,A7
0002323e 20 4f                    | O      |		MOVEA.L	A7,A0
00023240 43 fa d5 6e              |C  n    |		LEA.L	0x207b0,A1
00023244 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023246 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023248 51 c8 ff fc              |Q       |		DBF	D0,0x23246
0002324c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002324e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023252 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023256 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002325a 4e 92                    |N       |		JSR	(A2)
0002325c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002325e 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023264 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00023268 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
0002326c e3 08                    |        |		LSL.B	#0x1,D0
0002326e ee 08                    |        |		LSR.B	#0x7,D0
00023270 1f 00                    |        |		MOVE.B	D0,-(A7)
00023272 4e ba fa c2              |N       |		JSR	0x22d36
00023276 9e fc 00 18              |        |		SUBA.W	#0x18,A7
0002327a 20 4f                    | O      |		MOVEA.L	A7,A0
0002327c 43 fa d5 4c              |C  L    |		LEA.L	0x207ca,A1
00023280 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023282 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023284 51 c8 ff fc              |Q       |		DBF	D0,0x23282
00023288 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002328a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002328e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023292 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023296 4e 92                    |N       |		JSR	(A2)
00023298 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002329a 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000232a0 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000232a4 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
000232a8 e5 08                    |        |		LSL.B	#0x2,D0
000232aa ee 08                    |        |		LSR.B	#0x7,D0
000232ac 1f 00                    |        |		MOVE.B	D0,-(A7)
000232ae 4e ba fa 86              |N       |		JSR	0x22d36
000232b2 9e fc 00 18              |        |		SUBA.W	#0x18,A7
000232b6 20 4f                    | O      |		MOVEA.L	A7,A0
000232b8 43 fa d5 2a              |C  *    |		LEA.L	0x207e4,A1
000232bc 70 18                    |p       |		MOVEQ.L	#0x18,D0
000232be 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000232c0 51 c8 ff fc              |Q       |		DBF	D0,0x232be
000232c4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000232c6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000232ca 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000232ce 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000232d2 4e 92                    |N       |		JSR	(A2)
000232d4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000232d6 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000232dc de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000232e0 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
000232e4 e7 08                    |        |		LSL.B	#0x3,D0
000232e6 ee 08                    |        |		LSR.B	#0x7,D0
000232e8 1f 00                    |        |		MOVE.B	D0,-(A7)
000232ea 4e ba fa 4a              |N  J    |		JSR	0x22d36
000232ee 9e fc 00 18              |        |		SUBA.W	#0x18,A7
000232f2 20 4f                    | O      |		MOVEA.L	A7,A0
000232f4 43 fa d5 08              |C       |		LEA.L	0x207fe,A1
000232f8 70 18                    |p       |		MOVEQ.L	#0x18,D0
000232fa 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000232fc 51 c8 ff fc              |Q       |		DBF	D0,0x232fa
00023300 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023302 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023306 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002330a 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002330e 4e 92                    |N       |		JSR	(A2)
00023310 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023312 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023318 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002331c 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
00023320 e9 08                    |        |		LSL.B	#0x4,D0
00023322 ee 08                    |        |		LSR.B	#0x7,D0
00023324 1f 00                    |        |		MOVE.B	D0,-(A7)
00023326 4e ba fa 0e              |N       |		JSR	0x22d36
0002332a 9e fc 00 18              |        |		SUBA.W	#0x18,A7
0002332e 20 4f                    | O      |		MOVEA.L	A7,A0
00023330 43 fa d4 e6              |C       |		LEA.L	0x20818,A1
00023334 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023336 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023338 51 c8 ff fc              |Q       |		DBF	D0,0x23336
0002333c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002333e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023342 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023346 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002334a 4e 92                    |N       |		JSR	(A2)
0002334c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002334e 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023354 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00023358 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
0002335c eb 08                    |        |		LSL.B	#0x5,D0
0002335e ee 08                    |        |		LSR.B	#0x7,D0
00023360 1f 00                    |        |		MOVE.B	D0,-(A7)
00023362 4e ba f9 d2              |N       |		JSR	0x22d36
00023366 9e fc 00 18              |        |		SUBA.W	#0x18,A7
0002336a 20 4f                    | O      |		MOVEA.L	A7,A0
0002336c 43 fa d4 c4              |C       |		LEA.L	0x20832,A1
00023370 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023372 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023374 51 c8 ff fc              |Q       |		DBF	D0,0x23372
00023378 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002337a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002337e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023382 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023386 4e 92                    |N       |		JSR	(A2)
00023388 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002338a 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023390 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00023394 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
00023398 ed 08                    |        |		LSL.B	#0x6,D0
0002339a ee 08                    |        |		LSR.B	#0x7,D0
0002339c 1f 00                    |        |		MOVE.B	D0,-(A7)
0002339e 4e ba f9 96              |N       |		JSR	0x22d36
000233a2 9e fc 00 18              |        |		SUBA.W	#0x18,A7
000233a6 20 4f                    | O      |		MOVEA.L	A7,A0
000233a8 43 fa d4 a2              |C       |		LEA.L	0x2084c,A1
000233ac 70 18                    |p       |		MOVEQ.L	#0x18,D0
000233ae 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000233b0 51 c8 ff fc              |Q       |		DBF	D0,0x233ae
000233b4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000233b6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000233ba 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000233be 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000233c2 4e 92                    |N       |		JSR	(A2)
000233c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000233c6 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000233cc de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000233d0 10 2e ff de              | .      |		MOVE.B	(A6-0x22),D0
000233d4 ef 08                    |        |		LSL.B	#0x7,D0
000233d6 ee 08                    |        |		LSR.B	#0x7,D0
000233d8 1f 00                    |        |		MOVE.B	D0,-(A7)
000233da 4e ba f9 5a              |N  Z    |		JSR	0x22d36
000233de 9e fc 00 18              |        |		SUBA.W	#0x18,A7
000233e2 20 4f                    | O      |		MOVEA.L	A7,A0
000233e4 43 fa d4 80              |C       |		LEA.L	0x20866,A1
000233e8 70 18                    |p       |		MOVEQ.L	#0x18,D0
000233ea 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000233ec 51 c8 ff fc              |Q       |		DBF	D0,0x233ea
000233f0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000233f2 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000233f6 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000233fa 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000233fe 4e 92                    |N       |		JSR	(A2)
00023400 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023402 42 80                    |B       |		CLR.L	D0
00023404 10 2e ff df              | .      |		MOVE.B	(A6-0x21),D0
00023408 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002340a 48 78 00 02              |Hx      |		PEA.L	0x2
0002340e 4e 93                    |N       |		JSR	(A3)
00023410 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023412 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023418 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002341a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023420 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023422 20 4f                    | O      |		MOVEA.L	A7,A0
00023424 43 fa d4 5a              |C  Z    |		LEA.L	0x20880,A1
00023428 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002342a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002342c 51 c8 ff fc              |Q       |		DBF	D0,0x2342a
00023430 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023432 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023436 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002343a 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002343e 4e 92                    |N       |		JSR	(A2)
00023440 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023442 42 80                    |B       |		CLR.L	D0
00023444 10 2e ff e0              | .      |		MOVE.B	(A6-0x20),D0
00023448 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002344a 48 78 00 02              |Hx      |		PEA.L	0x2
0002344e 4e 93                    |N       |		JSR	(A3)
00023450 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023452 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023458 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002345a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023460 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023462 20 4f                    | O      |		MOVEA.L	A7,A0
00023464 43 fa d4 34              |C  4    |		LEA.L	0x2089a,A1
00023468 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002346a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002346c 51 c8 ff fc              |Q       |		DBF	D0,0x2346a
00023470 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023472 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023476 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002347a 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002347e 4e 92                    |N       |		JSR	(A2)
00023480 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023482 42 80                    |B       |		CLR.L	D0
00023484 10 2e ff e1              | .      |		MOVE.B	(A6-0x1f),D0
00023488 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002348a 48 78 00 02              |Hx      |		PEA.L	0x2
0002348e 4e 93                    |N       |		JSR	(A3)
00023490 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023492 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023498 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002349a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000234a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000234a2 20 4f                    | O      |		MOVEA.L	A7,A0
000234a4 43 fa d4 0e              |C       |		LEA.L	0x208b4,A1
000234a8 70 18                    |p       |		MOVEQ.L	#0x18,D0
000234aa 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000234ac 51 c8 ff fc              |Q       |		DBF	D0,0x234aa
000234b0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000234b2 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000234b6 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000234ba 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000234be 4e 92                    |N       |		JSR	(A2)
000234c0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000234c2 42 80                    |B       |		CLR.L	D0
000234c4 30 2e ff e2              |0.      |		MOVE.W	(A6-0x1e),D0
000234c8 2f 00                    |/       |		MOVE.L	D0,-(A7)
000234ca 48 78 00 04              |Hx      |		PEA.L	0x4
000234ce 4e 93                    |N       |		JSR	(A3)
000234d0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000234d2 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000234d8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000234da 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000234e0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000234e2 20 4f                    | O      |		MOVEA.L	A7,A0
000234e4 43 fa d3 e8              |C       |		LEA.L	0x208ce,A1
000234e8 70 18                    |p       |		MOVEQ.L	#0x18,D0
000234ea 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000234ec 51 c8 ff fc              |Q       |		DBF	D0,0x234ea
000234f0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000234f2 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000234f6 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000234fa 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000234fe 4e 92                    |N       |		JSR	(A2)
00023500 2e ae ff e4              |.       |		MOVE.L	(A6-0x1c),(A7)
00023504 48 78 00 08              |Hx      |		PEA.L	0x8
00023508 4e 93                    |N       |		JSR	(A3)
0002350a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002350c 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023512 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023514 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002351a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002351c 20 4f                    | O      |		MOVEA.L	A7,A0
0002351e 43 fa d4 98              |C       |		LEA.L	0x209b8,A1
00023522 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023524 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023526 51 c8 ff fc              |Q       |		DBF	D0,0x23524
0002352a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002352c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023530 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023534 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023538 4e 92                    |N       |		JSR	(A2)
0002353a 2e ae ff e8              |.       |		MOVE.L	(A6-0x18),(A7)
0002353e 48 78 00 08              |Hx      |		PEA.L	0x8
00023542 4e 93                    |N       |		JSR	(A3)
00023544 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023546 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002354c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002354e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023554 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023556 20 4f                    | O      |		MOVEA.L	A7,A0
00023558 43 fa d4 78              |C  x    |		LEA.L	0x209d2,A1
0002355c 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002355e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023560 51 c8 ff fc              |Q       |		DBF	D0,0x2355e
00023564 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023566 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002356a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002356e 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023572 4e 92                    |N       |		JSR	(A2)
00023574 2e ae ff ec              |.       |		MOVE.L	(A6-0x14),(A7)
00023578 48 78 00 08              |Hx      |		PEA.L	0x8
0002357c 4e 93                    |N       |		JSR	(A3)
0002357e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023580 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023586 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023588 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002358e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023590 20 4f                    | O      |		MOVEA.L	A7,A0
00023592 43 fa d4 58              |C  X    |		LEA.L	0x209ec,A1
00023596 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023598 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002359a 51 c8 ff fc              |Q       |		DBF	D0,0x23598
0002359e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000235a0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000235a4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000235a8 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000235ac 4e 92                    |N       |		JSR	(A2)
000235ae 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000235b0 42 80                    |B       |		CLR.L	D0
000235b2 30 2e ff f0              |0.      |		MOVE.W	(A6-0x10),D0
000235b6 2f 00                    |/       |		MOVE.L	D0,-(A7)
000235b8 48 78 00 04              |Hx      |		PEA.L	0x4
000235bc 4e 93                    |N       |		JSR	(A3)
000235be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000235c0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000235c6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000235c8 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000235ce 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000235d0 20 4f                    | O      |		MOVEA.L	A7,A0
000235d2 43 fa d4 32              |C  2    |		LEA.L	0x20a06,A1
000235d6 70 18                    |p       |		MOVEQ.L	#0x18,D0
000235d8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000235da 51 c8 ff fc              |Q       |		DBF	D0,0x235d8
000235de 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000235e0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000235e4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000235e8 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000235ec 4e 92                    |N       |		JSR	(A2)
000235ee 2e ae ff f2              |.       |		MOVE.L	(A6-0xe),(A7)
000235f2 48 78 00 08              |Hx      |		PEA.L	0x8
000235f6 4e 93                    |N       |		JSR	(A3)
000235f8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000235fa 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023600 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023602 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023608 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002360a 20 4f                    | O      |		MOVEA.L	A7,A0
0002360c 43 fa d4 12              |C       |		LEA.L	0x20a20,A1
00023610 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023612 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023614 51 c8 ff fc              |Q       |		DBF	D0,0x23612
00023618 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002361a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002361e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023622 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023626 4e 92                    |N       |		JSR	(A2)
00023628 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002362a 42 80                    |B       |		CLR.L	D0
0002362c 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
00023630 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023632 48 78 00 04              |Hx      |		PEA.L	0x4
00023636 4e 93                    |N       |		JSR	(A3)
00023638 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002363a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023640 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023642 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023648 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002364a 20 4f                    | O      |		MOVEA.L	A7,A0
0002364c 43 fa d2 9a              |C       |		LEA.L	0x208e8,A1
00023650 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023652 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023654 51 c8 ff fc              |Q       |		DBF	D0,0x23652
00023658 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002365a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002365e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023662 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023666 4e 92                    |N       |		JSR	(A2)
00023668 2e ae ff f8              |.       |		MOVE.L	(A6-0x8),(A7)
0002366c 48 78 00 08              |Hx      |		PEA.L	0x8
00023670 4e 93                    |N       |		JSR	(A3)
00023672 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023674 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002367a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002367c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023682 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023684 20 4f                    | O      |		MOVEA.L	A7,A0
00023686 43 fa d2 7a              |C  z    |		LEA.L	0x20902,A1
0002368a 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002368c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002368e 51 c8 ff fc              |Q       |		DBF	D0,0x2368c
00023692 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023694 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023698 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002369c 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000236a0 4e 92                    |N       |		JSR	(A2)
000236a2 2e ae ff fc              |.       |		MOVE.L	(A6-0x4),(A7)
000236a6 48 78 00 08              |Hx      |		PEA.L	0x8
000236aa 4e 93                    |N       |		JSR	(A3)
000236ac 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000236ae 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000236b4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000236b6 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000236bc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000236be 20 4f                    | O      |		MOVEA.L	A7,A0
000236c0 43 fa ce ae              |C       |		LEA.L	0x20570,A1
000236c4 70 18                    |p       |		MOVEQ.L	#0x18,D0
000236c6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000236c8 51 c8 ff fc              |Q       |		DBF	D0,0x236c6
000236cc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000236ce 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000236d2 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000236d6 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000236da 4e 92                    |N       |		JSR	(A2)
000236dc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000236de 42 80                    |B       |		CLR.L	D0
000236e0 30 2e ff 86              |0.      |		MOVE.W	(A6-0x7a),D0
000236e4 2f 00                    |/       |		MOVE.L	D0,-(A7)
000236e6 48 78 00 04              |Hx      |		PEA.L	0x4
000236ea 4e 93                    |N       |		JSR	(A3)
000236ec 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000236ee 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000236f4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000236f6 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000236fc de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00023700 3e ae ff 86              |>       |		MOVE.W	(A6-0x7a),(A7)
00023704 49 ee ff 78              |I  x    |		LEA.L	(A6-0x88),A4
00023708 4e ba f3 80              |N       |		JSR	0x22a8a
0002370c 9e fc 00 18              |        |		SUBA.W	#0x18,A7
00023710 20 4f                    | O      |		MOVEA.L	A7,A0
00023712 43 fa ce 76              |C  v    |		LEA.L	0x2058a,A1
00023716 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023718 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002371a 51 c8 ff fc              |Q       |		DBF	D0,0x23718
0002371e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023720 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023724 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023728 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002372c 4e 92                    |N       |		JSR	(A2)
0002372e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023730 42 80                    |B       |		CLR.L	D0
00023732 30 2e ff 88              |0.      |		MOVE.W	(A6-0x78),D0
00023736 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023738 48 78 00 04              |Hx      |		PEA.L	0x4
0002373c 4e 93                    |N       |		JSR	(A3)
0002373e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023740 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023746 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023748 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002374e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023750 20 4f                    | O      |		MOVEA.L	A7,A0
00023752 43 fa ce 50              |C  P    |		LEA.L	0x205a4,A1
00023756 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023758 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002375a 51 c8 ff fc              |Q       |		DBF	D0,0x23758
0002375e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023760 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023764 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023768 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002376c 4e 92                    |N       |		JSR	(A2)
0002376e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023770 42 80                    |B       |		CLR.L	D0
00023772 30 2e ff 8a              |0.      |		MOVE.W	(A6-0x76),D0
00023776 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023778 48 78 00 04              |Hx      |		PEA.L	0x4
0002377c 4e 93                    |N       |		JSR	(A3)
0002377e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023780 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023786 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023788 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002378e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023790 20 4f                    | O      |		MOVEA.L	A7,A0
00023792 43 fa ce 2a              |C  *    |		LEA.L	0x205be,A1
00023796 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023798 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002379a 51 c8 ff fc              |Q       |		DBF	D0,0x23798
0002379e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000237a0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000237a4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000237a8 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000237ac 4e 92                    |N       |		JSR	(A2)
000237ae 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000237b0 42 80                    |B       |		CLR.L	D0
000237b2 30 2e ff 8c              |0.      |		MOVE.W	(A6-0x74),D0
000237b6 2f 00                    |/       |		MOVE.L	D0,-(A7)
000237b8 48 78 00 04              |Hx      |		PEA.L	0x4
000237bc 4e 93                    |N       |		JSR	(A3)
000237be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000237c0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000237c6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000237c8 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000237ce 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000237d0 20 4f                    | O      |		MOVEA.L	A7,A0
000237d2 43 fa ce 04              |C       |		LEA.L	0x205d8,A1
000237d6 70 18                    |p       |		MOVEQ.L	#0x18,D0
000237d8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000237da 51 c8 ff fc              |Q       |		DBF	D0,0x237d8
000237de 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000237e0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000237e4 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000237e8 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000237ec 4e 92                    |N       |		JSR	(A2)
000237ee 2e ae ff 8e              |.       |		MOVE.L	(A6-0x72),(A7)
000237f2 48 78 00 08              |Hx      |		PEA.L	0x8
000237f6 4e 93                    |N       |		JSR	(A3)
000237f8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000237fa 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023800 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023802 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023808 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002380a 20 4f                    | O      |		MOVEA.L	A7,A0
0002380c 43 fa cd e4              |C       |		LEA.L	0x205f2,A1
00023810 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023812 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023814 51 c8 ff fc              |Q       |		DBF	D0,0x23812
00023818 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002381a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002381e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023822 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023826 4e 92                    |N       |		JSR	(A2)
00023828 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002382a 42 80                    |B       |		CLR.L	D0
0002382c 30 2e ff 96              |0.      |		MOVE.W	(A6-0x6a),D0
00023830 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023832 48 78 00 04              |Hx      |		PEA.L	0x4
00023836 4e 93                    |N       |		JSR	(A3)
00023838 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002383a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023840 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023842 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023848 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002384a 20 4f                    | O      |		MOVEA.L	A7,A0
0002384c 43 fa cd be              |C       |		LEA.L	0x2060c,A1
00023850 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023852 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023854 51 c8 ff fc              |Q       |		DBF	D0,0x23852
00023858 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002385a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002385e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023862 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023866 4e 92                    |N       |		JSR	(A2)
00023868 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002386a 42 80                    |B       |		CLR.L	D0
0002386c 30 2e ff 98              |0.      |		MOVE.W	(A6-0x68),D0
00023870 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023872 48 78 00 04              |Hx      |		PEA.L	0x4
00023876 4e 93                    |N       |		JSR	(A3)
00023878 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002387a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023880 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023882 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023888 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002388a 20 4f                    | O      |		MOVEA.L	A7,A0
0002388c 43 fa cd 98              |C       |		LEA.L	0x20626,A1
00023890 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023892 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023894 51 c8 ff fc              |Q       |		DBF	D0,0x23892
00023898 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002389a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002389e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000238a2 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000238a6 4e 92                    |N       |		JSR	(A2)
000238a8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000238aa 42 80                    |B       |		CLR.L	D0
000238ac 30 2e ff 9a              |0.      |		MOVE.W	(A6-0x66),D0
000238b0 2f 00                    |/       |		MOVE.L	D0,-(A7)
000238b2 48 78 00 04              |Hx      |		PEA.L	0x4
000238b6 4e 93                    |N       |		JSR	(A3)
000238b8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000238ba 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000238c0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000238c2 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000238c8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000238ca 20 4f                    | O      |		MOVEA.L	A7,A0
000238cc 43 fa cd 72              |C  r    |		LEA.L	0x20640,A1
000238d0 70 18                    |p       |		MOVEQ.L	#0x18,D0
000238d2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000238d4 51 c8 ff fc              |Q       |		DBF	D0,0x238d2
000238d8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000238da 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000238de 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000238e2 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000238e6 4e 92                    |N       |		JSR	(A2)
000238e8 2e ae ff 9e              |.       |		MOVE.L	(A6-0x62),(A7)
000238ec 48 78 00 08              |Hx      |		PEA.L	0x8
000238f0 4e 93                    |N       |		JSR	(A3)
000238f2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000238f4 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000238fa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000238fc 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023902 de fc 00 18              |        |		ADDA.W	#0x18,A7
00023906 20 4f                    | O      |		MOVEA.L	A7,A0
00023908 43 fa cd 50              |C  P    |		LEA.L	0x2065a,A1
0002390c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002390e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023910 51 c8 ff fc              |Q       |		DBF	D0,0x2390e
00023914 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023916 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002391a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002391e 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00023922 4e 92                    |N       |		JSR	(A2)
00023924 2e ae ff a2              |.       |		MOVE.L	(A6-0x5e),(A7)
00023928 48 78 00 08              |Hx      |		PEA.L	0x8
0002392c 4e 93                    |N       |		JSR	(A3)
0002392e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023930 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023936 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023938 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002393e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023940 20 4f                    | O      |		MOVEA.L	A7,A0
00023942 43 fa cd 16              |C       |		LEA.L	0x2065a,A1
00023946 70 04                    |p       |		MOVEQ.L	#0x04,D0
00023948 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002394a 51 c8 ff fc              |Q       |		DBF	D0,0x23948
0002394e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023950 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023954 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023958 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
0002395c 4e 92                    |N       |		JSR	(A2)
0002395e 2e ae ff a6              |.       |		MOVE.L	(A6-0x5a),(A7)
00023962 48 78 00 08              |Hx      |		PEA.L	0x8
00023966 4e 93                    |N       |		JSR	(A3)
00023968 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002396a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023970 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023972 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023978 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002397a 20 4f                    | O      |		MOVEA.L	A7,A0
0002397c 43 fa cc dc              |C       |		LEA.L	0x2065a,A1
00023980 70 04                    |p       |		MOVEQ.L	#0x04,D0
00023982 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023984 51 c8 ff fc              |Q       |		DBF	D0,0x23982
00023988 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002398a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002398e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023992 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00023996 4e 92                    |N       |		JSR	(A2)
00023998 2e ae ff aa              |.       |		MOVE.L	(A6-0x56),(A7)
0002399c 48 78 00 08              |Hx      |		PEA.L	0x8
000239a0 4e 93                    |N       |		JSR	(A3)
000239a2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000239a4 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000239aa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000239ac 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000239b2 9e fc 00 10              |        |		SUBA.W	#0x10,A7
000239b6 20 4f                    | O      |		MOVEA.L	A7,A0
000239b8 43 fa cc a6              |C       |		LEA.L	0x20660,A1
000239bc 70 18                    |p       |		MOVEQ.L	#0x18,D0
000239be 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000239c0 51 c8 ff fc              |Q       |		DBF	D0,0x239be
000239c4 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000239c6 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000239ca 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000239ce 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000239d2 4e 92                    |N       |		JSR	(A2)
000239d4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000239d6 42 80                    |B       |		CLR.L	D0
000239d8 10 2e ff ae              | .      |		MOVE.B	(A6-0x52),D0
000239dc 2f 00                    |/       |		MOVE.L	D0,-(A7)
000239de 48 78 00 02              |Hx      |		PEA.L	0x2
000239e2 4e 93                    |N       |		JSR	(A3)
000239e4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000239e6 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000239ec 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000239ee 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000239f4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000239f6 20 4f                    | O      |		MOVEA.L	A7,A0
000239f8 43 fa cc 80              |C       |		LEA.L	0x2067a,A1
000239fc 70 18                    |p       |		MOVEQ.L	#0x18,D0
000239fe 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023a00 51 c8 ff fc              |Q       |		DBF	D0,0x239fe
00023a04 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023a06 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023a0a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023a0e 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023a12 4e 92                    |N       |		JSR	(A2)
00023a14 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023a16 42 80                    |B       |		CLR.L	D0
00023a18 10 2e ff af              | .      |		MOVE.B	(A6-0x51),D0
00023a1c 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023a1e 48 78 00 02              |Hx      |		PEA.L	0x2
00023a22 4e 93                    |N       |		JSR	(A3)
00023a24 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023a26 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023a2c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023a2e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023a34 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023a36 20 4f                    | O      |		MOVEA.L	A7,A0
00023a38 43 fa cc 5a              |C  Z    |		LEA.L	0x20694,A1
00023a3c 70 18                    |p       |		MOVEQ.L	#0x18,D0
00023a3e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023a40 51 c8 ff fc              |Q       |		DBF	D0,0x23a3e
00023a44 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023a46 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023a4a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023a4e 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
00023a52 4e 92                    |N       |		JSR	(A2)
00023a54 2e ae ff b2              |.       |		MOVE.L	(A6-0x4e),(A7)
00023a58 48 78 00 08              |Hx      |		PEA.L	0x8
00023a5c 4e 93                    |N       |		JSR	(A3)
00023a5e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023a60 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023a66 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023a68 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023a6e de fc 00 0e              |        |		ADDA.W	#0xe,A7
00023a72 20 4f                    | O      |		MOVEA.L	A7,A0
00023a74 43 fa cc 52              |C  R    |		LEA.L	0x206c8,A1
00023a78 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00023a7a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023a7c 51 c8 ff fc              |Q       |		DBF	D0,0x23a7a
00023a80 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023a82 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023a86 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023a8a 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
00023a8e 4e 92                    |N       |		JSR	(A2)
00023a90 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023a92 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023a98 de fc 00 14              |        |		ADDA.W	#0x14,A7
00023a9c 30 2e ff b6              |0.      |		MOVE.W	(A6-0x4a),D0
00023aa0 0c 40 00 02              | @      |		CMPI.W	#0x0002,D0
00023aa4 67 06                    |g       |		BEQ	0x23aac
00023aa6 0c 40 00 0c              | @      |		CMPI.W	#0x000c,D0
00023aaa 66 16                    |f       |		BNE	0x23ac2
00023aac 2f 2e ff c2              |/.      |		MOVE.L	(A6-0x3e),-(A7)
00023ab0 2f 2e ff be              |/.      |		MOVE.L	(A6-0x42),-(A7)
00023ab4 2f 2e ff ba              |/.      |		MOVE.L	(A6-0x46),-(A7)
00023ab8 2f 2e ff b6              |/.      |		MOVE.L	(A6-0x4a),-(A7)
00023abc 4e ba f2 bc              |N       |		JSR	0x22d7a
00023ac0 60 14                    |`       |		BRA	0x23ad6
00023ac2 2f 2e ff c2              |/.      |		MOVE.L	(A6-0x3e),-(A7)
00023ac6 2f 2e ff be              |/.      |		MOVE.L	(A6-0x42),-(A7)
00023aca 2f 2e ff ba              |/.      |		MOVE.L	(A6-0x46),-(A7)
00023ace 2f 2e ff b6              |/.      |		MOVE.L	(A6-0x4a),-(A7)
00023ad2 4e ba f4 2a              |N  *    |		JSR	0x22efe
00023ad6 de fc 00 10              |        |		ADDA.W	#0x10,A7
00023ada 41 fa cc 0a              |A       |		LEA.L	0x206e6,A0
00023ade 70 06                    |p       |		MOVEQ.L	#0x06,D0
00023ae0 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00023ae2 51 c8 ff fc              |Q       |		DBF	D0,0x23ae0
00023ae6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023ae8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023aec 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023af0 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00023af4 4e 92                    |N       |		JSR	(A2)
00023af6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023af8 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023afe de fc 00 12              |        |		ADDA.W	#0x12,A7
00023b02 30 2e ff c6              |0.      |		MOVE.W	(A6-0x3a),D0
00023b06 0c 40 00 02              | @      |		CMPI.W	#0x0002,D0
00023b0a 67 06                    |g       |		BEQ	0x23b12
00023b0c 0c 40 00 0c              | @      |		CMPI.W	#0x000c,D0
00023b10 66 16                    |f       |		BNE	0x23b28
00023b12 2f 2e ff d2              |/.      |		MOVE.L	(A6-0x2e),-(A7)
00023b16 2f 2e ff ce              |/.      |		MOVE.L	(A6-0x32),-(A7)
00023b1a 2f 2e ff ca              |/.      |		MOVE.L	(A6-0x36),-(A7)
00023b1e 2f 2e ff c6              |/.      |		MOVE.L	(A6-0x3a),-(A7)
00023b22 4e ba f2 56              |N  V    |		JSR	0x22d7a
00023b26 60 14                    |`       |		BRA	0x23b3c
00023b28 2f 2e ff d2              |/.      |		MOVE.L	(A6-0x2e),-(A7)
00023b2c 2f 2e ff ce              |/.      |		MOVE.L	(A6-0x32),-(A7)
00023b30 2f 2e ff ca              |/.      |		MOVE.L	(A6-0x36),-(A7)
00023b34 2f 2e ff c6              |/.      |		MOVE.L	(A6-0x3a),-(A7)
00023b38 4e ba f3 c4              |N       |		JSR	0x22efe
00023b3c de fc 00 10              |        |		ADDA.W	#0x10,A7
00023b40 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00023b44 4e 5e                    |N^      |		UNLK	A6
00023b46 4e 75                    |Nu      |		RTS
00023b48 ; --------------------------------------------------------------------------------------
00023b48 ; OMSI PASCAL Function
00023b48 ; --------------------------------------------------------------------------------------
00023b48 4e 56 ff 90              |NV      |		LINK.W	A6,#0xff90
00023b4c bf d5                    |        |		CMPA.L	(A5),A7
00023b4e 62 06                    |b       |		BHI	0x23b56
00023b50 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023b54 4e 76                    |Nv      |		TRAPV
00023b56 de fc 00 6c              |   l    |		ADDA.W	#0x6c,A7
00023b5a 48 e7 98 e8              |H       |		MOVEM.L	A4+A2+A1+A0+D4+D3+D0,-(A7)
00023b5e 45 f9 00 02 c7 c4        |E       |		LEA.L	0x2c7c4,A2
00023b64 20 39 00 02 d0 14        | 9      |		MOVE.L	0x2d014,D0
00023b6a 0c 80 93 03 fc 00        |        |		CMPI.L	#0x9303fc00,D0
00023b70 66 34                    |f4      |		BNE	0x23ba6
00023b72 9e fc 00 3c              |   <    |		SUBA.W	#0x3c,A7
00023b76 20 4f                    | O      |		MOVEA.L	A7,A0
00023b78 43 fa c5 d0              |C       |		LEA.L	0x2014a,A1
00023b7c 70 3a                    |p:      |		MOVEQ.L	#0x3a,D0
00023b7e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023b80 51 c8 ff fc              |Q       |		DBF	D0,0x23b7e
00023b84 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023b86 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023b8a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023b8e 3f 3c 00 3b              |?< ;    |		MOVE.W	#0x3b,-(A7)
00023b92 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00023b98 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023b9a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023ba0 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00023ba4 60 22                    |`"      |		BRA	0x23bc8
00023ba6 28 12                    |(       |		MOVE.L	(A2),D4
00023ba8 76 26                    |v&      |		MOVEQ.L	#0x26,D3
00023baa 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00023bb0 d0 84                    |        |		ADD.L	D4,D0
00023bb2 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023bb4 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00023bb6 2f 39 00 02 e1 a8        |/9      |		MOVE.L	0x2e1a8,-(A7)
00023bbc 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00023bbe 2f 0c                    |/       |		MOVE.L	A4,-(A7)
00023bc0 4e ba f4 5a              |N  Z    |		JSR	0x2301c
00023bc4 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00023bc8 4c df 17 19              |L       |		MOVEM.L	(A7)+,D0+D3+D4+A0+A1+A2+A4
00023bcc 4e 5e                    |N^      |		UNLK	A6
00023bce 4e 75                    |Nu      |		RTS
00023bd0 ; --------------------------------------------------------------------------------------
00023bd0 ; OMSI PASCAL Function
00023bd0 ;    <LVAR  0x008 4(r)>
00023bd0 ;    <LVAR -0x03c @>
00023bd0 ; --------------------------------------------------------------------------------------
00023bd0 4e 56 ff 64              |NV d    |		LINK.W	A6,#0xff64		; Spelunked
00023bd4 bf d5                    |        |		CMPA.L	(A5),A7
00023bd6 62 06                    |b       |		BHI	0x23bde
00023bd8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023bdc 4e 76                    |Nv      |		TRAPV
00023bde de fc 00 5c              |   \    |		ADDA.W	#0x5c,A7
00023be2 48 e7 d9 c0              |H       |		MOVEM.L	A1+A0+D7+D4+D3+D1+D0,-(A7)
00023be6 72 3b                    |r;      |		MOVEQ.L	#0x3b,D1
00023be8 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00023bec 9e fc 00 3c              |   <    |		SUBA.W	#0x3c,A7
00023bf0 22 4f                    |"O      |		MOVEA.L	A7,A1
00023bf2 70 3b                    |p;      |		MOVEQ.L	#0x3b,D0
00023bf4 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00023bf6 51 c8 ff fc              |Q       |		DBF	D0,0x23bf4
00023bfa 41 ee ff c4              |A       |		LEA.L	(A6-0x3c),A0
00023bfe 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00023c00 20 df                    |        |		MOVE.L	(A7)+,(A0)+
00023c02 51 c8 ff fc              |Q       |		DBF	D0,0x23c00
00023c06 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00023c08 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023c0a be 81                    |        |		CMP.L	D1,D7
00023c0c 63 02                    |c       |		BLS	0x23c10
00023c0e 4e 4f                    |NO      |		TRAP	#15
00023c10 42 80                    |B       |		CLR.L	D0
00023c12 10 36 78 c4              | 6x     |		MOVE.B	(A6+D7.L-#0x3c),D0
00023c16 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023c18 48 78 00 02              |Hx      |		PEA.L	0x2
00023c1c 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00023c22 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023c24 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023c2a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023c2c 20 07                    |        |		MOVE.L	D7,D0
00023c2e 52 80                    |R       |		ADDQ.L	#0x1,D0
00023c30 28 00                    |(       |		MOVE.L	D0,D4
00023c32 76 04                    |v       |		MOVEQ.L	#0x04,D3
00023c34 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00023c3a 4a 83                    |J       |		TST.L	D3
00023c3c 66 22                    |f"      |		BNE	0x23c60
00023c3e 28 00                    |(       |		MOVE.L	D0,D4
00023c40 76 20                    |v       |		MOVEQ.L	#0x20,D3
00023c42 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00023c48 4a 83                    |J       |		TST.L	D3
00023c4a 66 08                    |f       |		BNE	0x23c54
00023c4c 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00023c52 60 0c                    |`       |		BRA	0x23c60
00023c54 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
00023c58 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
00023c5e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00023c60 52 87                    |R       |		ADDQ.L	#0x1,D7
00023c62 be 81                    |        |		CMP.L	D1,D7
00023c64 6f a2                    |o       |		BLE	0x23c08
00023c66 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00023c6c 4c df 03 9b              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D7+A0+A1
00023c70 4e 5e                    |N^      |		UNLK	A6
00023c72 4e 75                    |Nu      |		RTS
00023c74 ; --------------------------------------------------------------------------------------
00023c74 ; OMSI PASCAL Function
00023c74 ; --------------------------------------------------------------------------------------
00023c74 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca		; Spelunked
00023c78 bf d5                    |        |		CMPA.L	(A5),A7
00023c7a 62 06                    |b       |		BHI	0x23c82
00023c7c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023c80 4e 76                    |Nv      |		TRAPV
00023c82 de fc 00 32              |   2    |		ADDA.W	#0x32,A7
00023c86 48 e7 d9 c0              |H       |		MOVEM.L	A1+A0+D7+D4+D3+D1+D0,-(A7)
00023c8a 72 51                    |rQ      |		MOVEQ.L	#0x51,D1
00023c8c 20 4c                    | L      |		MOVEA.L	A4,A0
00023c8e 43 ec 00 62              |C  b    |		LEA.L	(A4+0x62),A1
00023c92 70 28                    |p(      |		MOVEQ.L	#0x28,D0
00023c94 30 d9                    |0       |		MOVE.W	(A1)+,(A0)+
00023c96 51 c8 ff fc              |Q       |		DBF	D0,0x23c94
00023c9a 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00023c9c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023c9e be 81                    |        |		CMP.L	D1,D7
00023ca0 63 02                    |c       |		BLS	0x23ca4
00023ca2 4e 4f                    |NO      |		TRAP	#15
00023ca4 42 80                    |B       |		CLR.L	D0
00023ca6 10 34 78 00              | 4x     |		MOVE.B	(A4+D7.L),D0
00023caa 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023cac 48 78 00 02              |Hx      |		PEA.L	0x2
00023cb0 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00023cb6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023cb8 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023cbe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023cc0 20 07                    |        |		MOVE.L	D7,D0
00023cc2 52 80                    |R       |		ADDQ.L	#0x1,D0
00023cc4 28 00                    |(       |		MOVE.L	D0,D4
00023cc6 76 04                    |v       |		MOVEQ.L	#0x04,D3
00023cc8 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00023cce 4a 83                    |J       |		TST.L	D3
00023cd0 66 22                    |f"      |		BNE	0x23cf4
00023cd2 28 00                    |(       |		MOVE.L	D0,D4
00023cd4 76 20                    |v       |		MOVEQ.L	#0x20,D3
00023cd6 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00023cdc 4a 83                    |J       |		TST.L	D3
00023cde 66 08                    |f       |		BNE	0x23ce8
00023ce0 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00023ce6 60 0c                    |`       |		BRA	0x23cf4
00023ce8 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
00023cec 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
00023cf2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00023cf4 52 87                    |R       |		ADDQ.L	#0x1,D7
00023cf6 be 81                    |        |		CMP.L	D1,D7
00023cf8 6f a2                    |o       |		BLE	0x23c9c
00023cfa 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00023d00 4c df 03 9b              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D7+A0+A1
00023d04 4e 5e                    |N^      |		UNLK	A6
00023d06 4e 75                    |Nu      |		RTS
00023d08 ; --------------------------------------------------------------------------------------
00023d08 ; OMSI PASCAL Function
00023d08 ;    <LVAR  0x008 @>
00023d08 ;    <LVAR -0x002 @ 1(r)>
00023d08 ;    <LVAR -0x04c 1(r)>
00023d08 ;    <LVAR -0x054 @>
00023d08 ;    <LVAR -0x058 4(rw)>
00023d08 ;    <LVAR -0x05c 4(rw)>
00023d08 ;    <LVAR -0x060 4(rw)>
00023d08 ;    <LVAR -0x064 @ 4(rw)>
00023d08 ; --------------------------------------------------------------------------------------
00023d08 4e 56 fe f8              |NV      |		LINK.W	A6,#0xfef8
00023d0c bf d5                    |        |		CMPA.L	(A5),A7
00023d0e 62 06                    |b       |		BHI	0x23d16
00023d10 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023d14 4e 76                    |Nv      |		TRAPV
00023d16 de fc 00 52              |   R    |		ADDA.W	#0x52,A7
00023d1a 48 e7 e0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D2+D1+D0,-(A7)
00023d1e 45 ee ff ac              |E       |		LEA.L	(A6-0x54),A2
00023d22 47 ee ff 9c              |G       |		LEA.L	(A6-0x64),A3
00023d26 72 03                    |r       |		MOVEQ.L	#0x03,D1
00023d28 74 26                    |t&      |		MOVEQ.L	#0x26,D2
00023d2a 20 4a                    | J      |		MOVEA.L	A2,A0
00023d2c 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
00023d30 70 28                    |p(      |		MOVEQ.L	#0x28,D0
00023d32 30 d9                    |0       |		MOVE.W	(A1)+,(A0)+
00023d34 51 c8 ff fc              |Q       |		DBF	D0,0x23d32
00023d38 26 ba d2 e6              |&       |		MOVE.L	0x21020,(A3)
00023d3c 2d 7a d2 e6 ff a0        |-z      |		MOVE.L	0x21024,(A6-0x60)
00023d42 2d 7a d2 e4 ff a4        |-z      |		MOVE.L	0x21028,(A6-0x5c)
00023d48 2d 7a d2 e2 ff a8        |-z      |		MOVE.L	0x2102c,(A6-0x58)
00023d4e 48 53                    |HS      |		PEA.L	(A3)
00023d50 20 4a                    | J      |		MOVEA.L	A2,A0
00023d52 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023d54 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023d56 48 78 00 52              |Hx R    |		PEA.L	0x52
00023d5a 20 4a                    | J      |		MOVEA.L	A2,A0
00023d5c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023d5e 48 78 00 52              |Hx R    |		PEA.L	0x52
00023d62 4e ba ea 02              |N       |		JSR	0x22766
00023d66 de fc 00 16              |        |		ADDA.W	#0x16,A7
00023d6a 4e ba e5 0e              |N       |		JSR	0x2227a
00023d6e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023d70 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00023d74 4e ba e9 00              |N       |		JSR	0x22676
00023d78 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00023d7a 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
00023d7e 66 20                    |f       |		BNE	0x23da0
00023d80 2f 2e ff a8              |/.      |		MOVE.L	(A6-0x58),-(A7)
00023d84 2f 2e ff a4              |/.      |		MOVE.L	(A6-0x5c),-(A7)
00023d88 2f 2e ff a0              |/.      |		MOVE.L	(A6-0x60),-(A7)
00023d8c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00023d8e 4e ba e5 bc              |N       |		JSR	0x2234c
00023d92 de fc 00 10              |        |		ADDA.W	#0x10,A7
00023d96 48 78 00 1e              |Hx      |		PEA.L	0x1e
00023d9a 4e ba d5 90              |N       |		JSR	0x2132c
00023d9e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023da0 4a 2e ff b4              |J.      |		TST.B	(A6-0x4c)
00023da4 67 5a                    |gZ      |		BEQ	0x23e00
00023da6 9e c2                    |        |		SUBA.W	D2,A7
00023da8 20 4f                    | O      |		MOVEA.L	A7,A0
00023daa 43 fa cc 9c              |C       |		LEA.L	0x20a48,A1
00023dae 70 24                    |p$      |		MOVEQ.L	#0x24,D0
00023db0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023db2 51 c8 ff fc              |Q       |		DBF	D0,0x23db0
00023db6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023db8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023dbc 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00023dc0 3f 3c 00 25              |?< %    |		MOVE.W	#0x25,-(A7)
00023dc4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00023dca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023dcc 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023dd2 de c2                    |        |		ADDA.W	D2,A7
00023dd4 42 80                    |B       |		CLR.L	D0
00023dd6 10 2e ff b4              | .      |		MOVE.B	(A6-0x4c),D0
00023dda 2f 00                    |/       |		MOVE.L	D0,-(A7)
00023ddc 48 78 00 02              |Hx      |		PEA.L	0x2
00023de0 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00023de6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023de8 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023dee 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023df0 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00023df6 48 78 00 1f              |Hx      |		PEA.L	0x1f
00023dfa 4e ba d5 30              |N  0    |		JSR	0x2132c
00023dfe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023e00 4c df 0f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3
00023e04 4e 5e                    |N^      |		UNLK	A6
00023e06 4e 75                    |Nu      |		RTS
00023e08 ; --------------------------------------------------------------------------------------
00023e08 ; OMSI PASCAL Function
00023e08 ;    <LVAR  0x008 1(w)>
00023e08 ;    <LVAR -0x004 @ 1(r)>
00023e08 ;    <LVAR -0x008 2(r) 4(w)>
00023e08 ;    <LVAR -0x00c 4(w)>
00023e08 ;    <LVAR -0x010 4(w)>
00023e08 ;    <LVAR -0x014 @ 4(w)>
00023e08 ; --------------------------------------------------------------------------------------
00023e08 4e 56 ff c6              |NV      |		LINK.W	A6,#0xffc6
00023e0c bf d5                    |        |		CMPA.L	(A5),A7
00023e0e 62 06                    |b       |		BHI	0x23e16
00023e10 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023e14 4e 76                    |Nv      |		TRAPV
00023e16 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00023e1a 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00023e1e 41 f8 00 00              |A       |		LEA.L	0x0,A0
00023e22 70 03                    |p       |		MOVEQ.L	#0x03,D0
00023e24 2d 7a d2 1a ff ec        |-z      |		MOVE.L	0x21040,(A6-0x14)
00023e2a 2d 7a d2 18 ff f0        |-z      |		MOVE.L	0x21044,(A6-0x10)
00023e30 2d 7a d2 16 ff f4        |-z      |		MOVE.L	0x21048,(A6-0xc)
00023e36 2d 7a d2 14 ff f8        |-z      |		MOVE.L	0x2104c,(A6-0x8)
00023e3c 42 6e ff f8              |Bn      |		CLR.W	(A6-0x8)
00023e40 48 50                    |HP      |		PEA.L	(A0)
00023e42 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00023e46 2f 2f 00 04              |//      |		MOVE.L	(A7+0x4),-(A7)
00023e4a 3f 00                    |?       |		MOVE.W	D0,-(A7)
00023e4c 48 50                    |HP      |		PEA.L	(A0)
00023e4e 2f 2f 00 0e              |//      |		MOVE.L	(A7+0xe),-(A7)
00023e52 48 50                    |HP      |		PEA.L	(A0)
00023e54 4e ba e9 10              |N       |		JSR	0x22766
00023e58 de fc 00 18              |        |		ADDA.W	#0x18,A7
00023e5c 3e 80                    |>       |		MOVE.W	D0,(A7)
00023e5e 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00023e62 4e ba e8 12              |N       |		JSR	0x22676
00023e66 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00023e68 1d 6e ff fc 00 08        | n      |		MOVE.B	(A6-0x4),(A6+0x8)
00023e6e 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00023e72 4e 5e                    |N^      |		UNLK	A6
00023e74 4e 75                    |Nu      |		RTS
00023e76 ; --------------------------------------------------------------------------------------
00023e76 ; OMSI PASCAL Function
00023e76 ;    <LVAR -0x004 @ 1(r)>
00023e76 ;    <LVAR -0x040 @>
00023e76 ;    <LVAR -0x04c 4(w)>
00023e76 ;    <LVAR -0x050 4(w)>
00023e76 ;    <LVAR -0x054 4(w)>
00023e76 ;    <LVAR -0x058 @ 4(w)>
00023e76 ;    <LVAR -0x0fc @>
00023e76 ;    <LVAR -0x138 @>
00023e76 ; --------------------------------------------------------------------------------------
00023e76 4e 56 fe 5e              |NV ^    |		LINK.W	A6,#0xfe5e
00023e7a bf d5                    |        |		CMPA.L	(A5),A7
00023e7c 62 06                    |b       |		BHI	0x23e84
00023e7e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023e82 4e 76                    |Nv      |		TRAPV
00023e84 de fc 00 6a              |   j    |		ADDA.W	#0x6a,A7
00023e88 48 e7 fd f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00023e8c 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00023e92 47 ee ff a8              |G       |		LEA.L	(A6-0x58),A3
00023e96 49 ee ff fc              |I       |		LEA.L	(A6-0x4),A4
00023e9a 72 01                    |r       |		MOVEQ.L	#0x01,D1
00023e9c 74 03                    |t       |		MOVEQ.L	#0x03,D2
00023e9e 76 11                    |v       |		MOVEQ.L	#0x11,D3
00023ea0 78 3b                    |x;      |		MOVEQ.L	#0x3b,D4
00023ea2 7a 02                    |z       |		MOVEQ.L	#0x02,D5
00023ea4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00023ea6 4e ba ff 60              |N  `    |		JSR	0x23e08
00023eaa 4a 1f                    |J       |		TST.B	(A7)+
00023eac 66 32                    |f2      |		BNE	0x23ee0
00023eae 9e fc 00 1e              |        |		SUBA.W	#0x1e,A7
00023eb2 20 4f                    | O      |		MOVEA.L	A7,A0
00023eb4 43 fa c2 76              |C  v    |		LEA.L	0x2012c,A1
00023eb8 70 1c                    |p       |		MOVEQ.L	#0x1c,D0
00023eba 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023ebc 51 c8 ff fc              |Q       |		DBF	D0,0x23eba
00023ec0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023ec2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023ec6 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023ec8 3f 3c 00 1d              |?<      |		MOVE.W	#0x1d,-(A7)
00023ecc 4e 92                    |N       |		JSR	(A2)
00023ece 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023ed0 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023ed6 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00023eda 60 00 01 e4              |`       |		BRA	0x240c0
00023ede 60 26                    |`&      |		.XXX[0x2]
00023ee0 41 fa c2 ce              |A       |		LEA.L	0x201b0,A0
00023ee4 70 14                    |p       |		MOVEQ.L	#0x14,D0
00023ee6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00023ee8 51 c8 ff fc              |Q       |		DBF	D0,0x23ee6
00023eec 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023eee 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023ef2 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023ef4 3f 3c 00 2a              |?< *    |		MOVE.W	#0x2a,-(A7)
00023ef8 4e 92                    |N       |		JSR	(A2)
00023efa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023efc 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00023f02 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00023f06 41 ee ff 04              |A       |		LEA.L	(A6-0xfc),A0
00023f0a 43 fa d1 64              |C  d    |		LEA.L	0x21070,A1
00023f0e 70 28                    |p(      |		MOVEQ.L	#0x28,D0
00023f10 30 d9                    |0       |		MOVE.W	(A1)+,(A0)+
00023f12 51 c8 ff fc              |Q       |		DBF	D0,0x23f10
00023f16 26 ba d1 08              |&       |		MOVE.L	0x21020,(A3)
00023f1a 2d 7a d1 08 ff ac        |-z      |		MOVE.L	0x21024,(A6-0x54)
00023f20 2d 7a d1 06 ff b0        |-z      |		MOVE.L	0x21028,(A6-0x50)
00023f26 2d 7a d1 04 ff b4        |-z      |		MOVE.L	0x2102c,(A6-0x4c)
00023f2c 48 53                    |HS      |		PEA.L	(A3)
00023f2e 41 ee ff 04              |A       |		LEA.L	(A6-0xfc),A0
00023f32 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023f34 3f 02                    |?       |		MOVE.W	D2,-(A7)
00023f36 48 78 00 52              |Hx R    |		PEA.L	0x52
00023f3a 41 ee ff 04              |A       |		LEA.L	(A6-0xfc),A0
00023f3e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023f40 48 78 00 52              |Hx R    |		PEA.L	0x52
00023f44 4e ba e8 20              |N       |		JSR	0x22766
00023f48 de fc 00 16              |        |		ADDA.W	#0x16,A7
00023f4c 4e ba e3 2c              |N  ,    |		JSR	0x2227a
00023f50 3f 02                    |?       |		MOVE.W	D2,-(A7)
00023f52 48 54                    |HT      |		PEA.L	(A4)
00023f54 4e ba e7 20              |N       |		JSR	0x22676
00023f58 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00023f5a 4a 14                    |J       |		TST.B	(A4)
00023f5c 66 0a                    |f       |		BNE	0x23f68
00023f5e 48 78 00 0a              |Hx      |		PEA.L	0xa
00023f62 4e ba d3 c8              |N       |		JSR	0x2132c
00023f66 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023f68 41 ee ff c0              |A       |		LEA.L	(A6-0x40),A0
00023f6c 43 fa d1 a6              |C       |		LEA.L	0x21114,A1
00023f70 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00023f72 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
00023f74 51 c8 ff fc              |Q       |		DBF	D0,0x23f72
00023f78 26 ba d0 b6              |&       |		MOVE.L	0x21030,(A3)
00023f7c 2d 7a d0 b6 ff ac        |-z      |		MOVE.L	0x21034,(A6-0x54)
00023f82 2d 7a d0 b4 ff b0        |-z      |		MOVE.L	0x21038,(A6-0x50)
00023f88 2d 7a d0 b2 ff b4        |-z      |		MOVE.L	0x2103c,(A6-0x4c)
00023f8e 48 53                    |HS      |		PEA.L	(A3)
00023f90 41 ee ff c0              |A       |		LEA.L	(A6-0x40),A0
00023f94 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023f96 3f 02                    |?       |		MOVE.W	D2,-(A7)
00023f98 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00023f9c 41 ee ff c0              |A       |		LEA.L	(A6-0x40),A0
00023fa0 2f 08                    |/       |		MOVE.L	A0,-(A7)
00023fa2 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00023fa6 4e ba e7 be              |N       |		JSR	0x22766
00023faa de fc 00 14              |        |		ADDA.W	#0x14,A7
00023fae 3e 82                    |>       |		MOVE.W	D2,(A7)
00023fb0 48 54                    |HT      |		PEA.L	(A4)
00023fb2 4e ba e6 c2              |N       |		JSR	0x22676
00023fb6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00023fb8 4a 14                    |J       |		TST.B	(A4)
00023fba 66 0a                    |f       |		BNE	0x23fc6
00023fbc 48 78 00 0c              |Hx      |		PEA.L	0xc
00023fc0 4e ba d3 6a              |N  j    |		JSR	0x2132c
00023fc4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00023fc6 41 ee fe c8              |A       |		LEA.L	(A6-0x138),A0
00023fca 43 ee ff c0              |C       |		LEA.L	(A6-0x40),A1
00023fce 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00023fd0 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
00023fd2 51 c8 ff fc              |Q       |		DBF	D0,0x23fd0
00023fd6 9e fc 00 18              |        |		SUBA.W	#0x18,A7
00023fda 20 4f                    | O      |		MOVEA.L	A7,A0
00023fdc 43 fa ca 90              |C       |		LEA.L	0x20a6e,A1
00023fe0 70 16                    |p       |		MOVEQ.L	#0x16,D0
00023fe2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023fe4 51 c8 ff fc              |Q       |		DBF	D0,0x23fe2
00023fe8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00023fea 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023fee 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023ff0 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
00023ff4 4e 92                    |N       |		JSR	(A2)
00023ff6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023ff8 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00023ffe de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00024002 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
00024004 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024006 be 84                    |        |		CMP.L	D4,D7
00024008 63 02                    |c       |		BLS	0x2400c
0002400a 4e 4f                    |NO      |		TRAP	#15
0002400c 41 ee fe c8              |A       |		LEA.L	(A6-0x138),A0
00024010 42 80                    |B       |		CLR.L	D0
00024012 10 30 78 00              | 0x     |		MOVE.B	(A0+D7.L),D0
00024016 2f 00                    |/       |		MOVE.L	D0,-(A7)
00024018 48 78 00 02              |Hx      |		PEA.L	0x2
0002401c 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00024022 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00024024 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002402a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002402c be 83                    |        |		CMP.L	D3,D7
0002402e 67 1a                    |g       |		BEQ	0x2404a
00024030 3f 3a ca 54              |?: T    |		MOVE.W	0x20a86,-(A7)
00024034 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024036 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002403a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002403c 3f 05                    |?       |		MOVE.W	D5,-(A7)
0002403e 4e 92                    |N       |		JSR	(A2)
00024040 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00024042 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00024048 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002404a 52 87                    |R       |		ADDQ.L	#0x1,D7
0002404c be 83                    |        |		CMP.L	D3,D7
0002404e 6f b4                    |o       |		BLE	0x24004
00024050 2f 3a ca 3e              |/: >    |		MOVE.L	0x20a90,-(A7)
00024054 2f 3a ca 36              |/: 6    |		MOVE.L	0x20a8c,-(A7)
00024058 2f 3a ca 2e              |/: .    |		MOVE.L	0x20a88,-(A7)
0002405c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002405e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00024062 3f 01                    |?       |		MOVE.W	D1,-(A7)
00024064 3f 3c 00 0c              |?<      |		MOVE.W	#0xc,-(A7)
00024068 4e 92                    |N       |		JSR	(A2)
0002406a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002406c 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00024072 de fc 00 10              |        |		ADDA.W	#0x10,A7
00024076 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
00024078 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002407a be 84                    |        |		CMP.L	D4,D7
0002407c 63 02                    |c       |		BLS	0x24080
0002407e 4e 4f                    |NO      |		TRAP	#15
00024080 41 ee fe c8              |A       |		LEA.L	(A6-0x138),A0
00024084 42 80                    |B       |		CLR.L	D0
00024086 10 30 78 00              | 0x     |		MOVE.B	(A0+D7.L),D0
0002408a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002408c 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00024092 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024094 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002409a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002409c be 83                    |        |		CMP.L	D3,D7
0002409e 67 1a                    |g       |		BEQ	0x240ba
000240a0 3f 3a c9 f2              |?:      |		MOVE.W	0x20a94,-(A7)
000240a4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000240a6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000240aa 3f 01                    |?       |		MOVE.W	D1,-(A7)
000240ac 3f 05                    |?       |		MOVE.W	D5,-(A7)
000240ae 4e 92                    |N       |		JSR	(A2)
000240b0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000240b2 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000240b8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000240ba 52 87                    |R       |		ADDQ.L	#0x1,D7
000240bc be 83                    |        |		CMP.L	D3,D7
000240be 6f b8                    |o       |		BLE	0x24078
000240c0 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
000240c6 42 39 00 02 c7 d4        |B9      |		CLR.B	0x2c7d4
000240cc 4c df 1f bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
000240d0 4e 5e                    |N^      |		UNLK	A6
000240d2 4e 75                    |Nu      |		RTS
000240d4 ; --------------------------------------------------------------------------------------
000240d4 ; OMSI PASCAL Function
000240d4 ;    <LVAR  0x00c 4(r)>
000240d4 ;    <LVAR  0x008 4(r)>
000240d4 ;    <LVAR -0x002 @ 1(r)>
000240d4 ;    <LVAR -0x00a @ 4(rw)>
000240d4 ;    <LVAR -0x00c @>
000240d4 ;    <LVAR -0x010 @ 4(r)>
000240d4 ; --------------------------------------------------------------------------------------
000240d4 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
000240d8 bf d5                    |        |		CMPA.L	(A5),A7
000240da 62 06                    |b       |		BHI	0x240e2
000240dc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000240e0 4e 76                    |Nv      |		TRAPV
000240e2 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
000240e6 48 e7 e1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
000240ea 45 ee ff f6              |E       |		LEA.L	(A6-0xa),A2
000240ee 47 ee ff fe              |G       |		LEA.L	(A6-0x2),A3
000240f2 49 ee ff f0              |I       |		LEA.L	(A6-0x10),A4
000240f6 74 01                    |t       |		MOVEQ.L	#0x01,D2
000240f8 41 fa c9 aa              |A       |		LEA.L	0x20aa4,A0
000240fc 70 06                    |p       |		MOVEQ.L	#0x06,D0
000240fe 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00024100 51 c8 ff fc              |Q       |		DBF	D0,0x240fe
00024104 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024106 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002410a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002410c 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00024110 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00024116 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00024118 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002411a de fc 00 0a              |        |		ADDA.W	#0xa,A7
0002411e 2e 92                    |.       |		MOVE.L	(A2),(A7)
00024120 42 27                    |B'      |		CLR.B	-(A7)
00024122 42 27                    |B'      |		CLR.B	-(A7)
00024124 48 78 00 00              |Hx      |		PEA.L	0x0
00024128 48 53                    |HS      |		PEA.L	(A3)
0002412a 48 54                    |HT      |		PEA.L	(A4)
0002412c 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
00024132 de fc 00 14              |        |		ADDA.W	#0x14,A7
00024136 4a 13                    |J       |		TST.B	(A3)
00024138 66 00 00 9a              |f       |		BNE	0x241d4
0002413c 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00024140 48 50                    |HP      |		PEA.L	(A0)
00024142 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00024148 2e 94                    |.       |		MOVE.L	(A4),(A7)
0002414a 48 50                    |HP      |		PEA.L	(A0)
0002414c 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00024150 4e b9 00 01 04 3c        |N    <  |		JSR	FileReadLine(file : File; VAR a : String; VAR b : Byte)
00024156 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002415a 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002415e 10 82                    |        |		MOVE.B	D2,(A0)
00024160 42 27                    |B'      |		CLR.B	-(A7)
00024162 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00024166 48 78 00 01              |Hx      |		PEA.L	0x1
0002416a 48 53                    |HS      |		PEA.L	(A3)
0002416c 48 54                    |HT      |		PEA.L	(A4)
0002416e 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00024174 de fc 00 10              |        |		ADDA.W	#0x10,A7
00024178 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002417a 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002417e 20 50                    | P      |		MOVEA.L	(A0),A0
00024180 30 10                    |0       |		MOVE.W	(A0),D0
00024182 48 c0                    |H       |		EXTW.L	D0
00024184 be 80                    |        |		CMP.L	D0,D7
00024186 6c 4a                    |lJ      |		BGE	0x241d2
00024188 4a 80                    |J       |		TST.L	D0
0002418a 6f 46                    |oF      |		BLE	0x241d2
0002418c 20 07                    |        |		MOVE.L	D7,D0
0002418e 53 80                    |S       |		SUBQ.L	#0x1,D0
00024190 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
00024196 63 02                    |c       |		BLS	0x2419a
00024198 4e 4f                    |NO      |		TRAP	#15
0002419a 42 81                    |B       |		CLR.L	D1
0002419c 12 30 08 02              | 0      |		MOVE.B	(A0+D0.L+#0x2),D1
000241a0 43 fa d0 3e              |C  >    |		LEA.L	0x211e0,A1
000241a4 30 01                    |0       |		MOVE.W	D1,D0
000241a6 e6 48                    | H      |		LSR.W	#0x3,D0
000241a8 03 31 00 00              | 1      |		BTST.B	D1,(A1+D0.W)
000241ac 66 06                    |f       |		BNE	0x241b4
000241ae 0c 01 00 2e              |   .    |		CMPI.B	#0x2e,D1
000241b2 66 04                    |f       |		BNE	0x241b8
000241b4 52 87                    |R       |		ADDQ.L	#0x1,D7
000241b6 60 18                    |`       |		BRA	0x241d0
000241b8 04 87 ff ff 80 00        |        |		SUBI.L	#0xffff8000,D7
000241be 0c 87 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D7
000241c4 63 02                    |c       |		BLS	0x241c8
000241c6 4e 4f                    |NO      |		TRAP	#15
000241c8 06 87 ff ff 80 00        |        |		ADDI.L	#0xffff8000,D7
000241ce 30 87                    |0       |		MOVE.W	D7,(A0)
000241d0 60 a8                    |`       |		BRA	0x2417a
000241d2 60 06                    |`       |		BRA	0x241da
000241d4 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000241d8 42 10                    |B       |		CLR.B	(A0)
000241da 48 52                    |HR      |		PEA.L	(A2)
000241dc 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
000241e2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000241e4 4c df 1f 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4
000241e8 4e 5e                    |N^      |		UNLK	A6
000241ea 4e 75                    |Nu      |		RTS
000241ec ; --------------------------------------------------------------------------------------
000241ec ; OMSI PASCAL Function
000241ec ;    <LVAR  0x00c 4(w)>
000241ec ;    <LVAR  0x008 4(r)>
000241ec ;    <LVAR -0x003 @ 1(r)>
000241ec ;    <LVAR -0x004 1(rw)>
000241ec ;    <LVAR -0x008 @ 4(rw)>
000241ec ; --------------------------------------------------------------------------------------
000241ec 4e 56 ff 6a              |NV j    |		LINK.W	A6,#0xff6a
000241f0 bf d5                    |        |		CMPA.L	(A5),A7
000241f2 62 06                    |b       |		BHI	0x241fa
000241f4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000241f8 4e 76                    |Nv      |		TRAPV
000241fa de fc 00 7e              |   ~    |		ADDA.W	#0x7e,A7
000241fe 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00024202 45 f9 00 02 d0 24        |E    $  |		LEA.L	0x2d024,A2
00024208 47 ee ff f8              |G       |		LEA.L	(A6-0x8),A3
0002420c 49 ee ff fd              |I       |		LEA.L	(A6-0x3),A4
00024210 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024212 1e ba c8 90              |        |		MOVE.B	0x20aa4,(A7)
00024216 1f 7a c8 8d 00 01        | z      |		MOVE.B	0x20aa5,(A7+0x1)
0002421c 1f 7a c8 88 00 02        | z      |		MOVE.B	0x20aa6,(A7+0x2)
00024222 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00024226 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024228 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002422c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00024230 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
00024234 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002423a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002423c 1e bc 00 01              |        |		MOVE.B	#0x01,(A7)
00024240 48 54                    |HT      |		PEA.L	(A4)
00024242 48 53                    |HS      |		PEA.L	(A3)
00024244 4e ba da a8              |N       |		JSR	0x21cee
00024248 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002424c 4a 14                    |J       |		TST.B	(A4)
0002424e 66 0a                    |f       |		BNE	0x2425a
00024250 48 53                    |HS      |		PEA.L	(A3)
00024252 48 54                    |HT      |		PEA.L	(A4)
00024254 4e ba fe 7e              |N  ~    |		JSR	0x240d4
00024258 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002425a 4a 14                    |J       |		TST.B	(A4)
0002425c 67 04                    |g       |		BEQ	0x24262
0002425e 42 14                    |B       |		CLR.B	(A4)
00024260 60 36                    |`6      |		BRA	0x24298
00024262 9e fc 00 36              |   6    |		SUBA.W	#0x36,A7
00024266 20 4f                    | O      |		MOVEA.L	A7,A0
00024268 43 fa c8 3e              |C  >    |		LEA.L	0x20aa8,A1
0002426c 70 34                    |p4      |		MOVEQ.L	#0x34,D0
0002426e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00024270 51 c8 ff fc              |Q       |		DBF	D0,0x2426e
00024274 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00024276 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002427a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002427e 3f 3c 00 35              |?< 5    |		MOVE.W	#0x35,-(A7)
00024282 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00024288 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002428a 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
00024290 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024292 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00024294 de fc 00 36              |   6    |		ADDA.W	#0x36,A7
00024298 20 53                    | S      |		MOVEA.L	(A3),A0
0002429a 4a 50                    |JP      |		TST.W	(A0)
0002429c 66 0a                    |f       |		BNE	0x242a8
0002429e 24 bc 59 40 03 07        |$ Y@    |		MOVE.L	#0x59400307,(A2)
000242a4 60 00 00 90              |`       |		BRA	0x24336
000242a8 42 92                    |B       |		CLR.L	(A2)
000242aa 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000242ac 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000242ae 2a 3c 01 00 00 00        |*<      |		MOVE.L	#0x1000000,D5
000242b4 30 10                    |0       |		MOVE.W	(A0),D0
000242b6 48 c0                    |H       |		EXTW.L	D0
000242b8 2f 00                    |/       |		MOVE.L	D0,-(A7)
000242ba 70 01                    |p       |		MOVEQ.L	#0x01,D0
000242bc b0 97                    |        |		CMP.L	(A7),D0
000242be 6e 58                    |nX      |		BGT	0x24318
000242c0 20 53                    | S      |		MOVEA.L	(A3),A0
000242c2 22 00                    |"       |		MOVE.L	D0,D1
000242c4 53 81                    |S       |		SUBQ.L	#0x1,D1
000242c6 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
000242cc 63 02                    |c       |		BLS	0x242d0
000242ce 4e 4f                    |NO      |		TRAP	#15
000242d0 14 30 18 02              | 0      |		MOVE.B	(A0+D1.L+#0x2),D2
000242d4 0c 02 00 2e              |   .    |		CMPI.B	#0x2e,D2
000242d8 66 22                    |f"      |		BNE	0x242fc
000242da 52 86                    |R       |		ADDQ.L	#0x1,D6
000242dc 28 05                    |(       |		MOVE.L	D5,D4
000242de 26 07                    |&       |		MOVE.L	D7,D3
000242e0 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000242e6 d9 92                    |        |		ADD.L	D4,(A2)
000242e8 28 05                    |(       |		MOVE.L	D5,D4
000242ea 26 3c 00 00 01 00        |&<      |		MOVE.L	#0x100,D3
000242f0 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
000242f6 2a 04                    |*       |		MOVE.L	D4,D5
000242f8 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000242fa 60 18                    |`       |		BRA	0x24314
000242fc 28 07                    |(       |		MOVE.L	D7,D4
000242fe 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
00024300 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00024306 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024308 1f 02                    |        |		MOVE.B	D2,-(A7)
0002430a 4e ba d0 7c              |N  |    |		JSR	0x21388
0002430e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00024310 2e 04                    |.       |		MOVE.L	D4,D7
00024312 de 9f                    |        |		ADD.L	(A7)+,D7
00024314 52 80                    |R       |		ADDQ.L	#0x1,D0
00024316 68 a4                    |h       |		BVC	0x242bc
00024318 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002431a 28 05                    |(       |		MOVE.L	D5,D4
0002431c 26 07                    |&       |		MOVE.L	D7,D3
0002431e 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00024324 d9 92                    |        |		ADD.L	D4,(A2)
00024326 42 2e ff fc              |B.      |		CLR.B	(A6-0x4)
0002432a 0c 86 00 00 00 03        |        |		CMPI.L	#0x00000003,D6
00024330 66 04                    |f       |		BNE	0x24336
00024332 52 2e ff fc              |R.      |		ADDQ.B	#0x1,(A6-0x4)
00024336 48 53                    |HS      |		PEA.L	(A3)
00024338 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002433e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024340 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
00024344 67 00 ff 14              |g       |		BEQ	0x2425a
00024348 2d 52 00 0c              |-R      |		MOVE.L	(A2),(A6+0xc)
0002434c 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00024350 4e 5e                    |N^      |		UNLK	A6
00024352 4e 75                    |Nu      |		RTS
00024354 ; --------------------------------------------------------------------------------------
00024354 ; OMSI PASCAL Function
00024354 ;    <LVAR  0x010 4(r)>
00024354 ;    <LVAR  0x00c 4(r)>
00024354 ;    <LVAR  0x008 4(r)>
00024354 ;    <LVAR -0x003 1(w)>
00024354 ;    <LVAR -0x004 1(w)>
00024354 ;    <LVAR -0x005 1(w)>
00024354 ;    <LVAR -0x006 1(w) 4(rw)>
00024354 ;    <LVAR -0x007 1(w)>
00024354 ;    <LVAR -0x008 1(w)>
00024354 ;    <LVAR -0x00a 4(rw)>
00024354 ;    <LVAR -0x00d 1(w)>
00024354 ;    <LVAR -0x00e 4(rw)>
00024354 ;    <LVAR -0x012 4(rw)>
00024354 ;    <LVAR -0x014 @ 1(r)>
00024354 ;    <LVAR -0x018 4(w)>
00024354 ;    <LVAR -0x01c 4(w)>
00024354 ;    <LVAR -0x020 4(w)>
00024354 ;    <LVAR -0x024 @ 4(w)>
00024354 ; --------------------------------------------------------------------------------------
00024354 4e 56 ff 96              |NV      |		LINK.W	A6,#0xff96
00024358 bf d5                    |        |		CMPA.L	(A5),A7
0002435a 62 06                    |b       |		BHI	0x24362
0002435c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024360 4e 76                    |Nv      |		TRAPV
00024362 de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00024366 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
0002436a 43 f9 00 01 02 94        |C       |		LEA.L	?divs_d3_d4,A1
00024370 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
00024374 47 ee ff ee              |G       |		LEA.L	(A6-0x12),A3
00024378 49 ee ff f2              |I       |		LEA.L	(A6-0xe),A4
0002437c 24 3c 00 00 01 00        |$<      |		MOVE.L	#0x100,D2
00024382 7a 01                    |z       |		MOVEQ.L	#0x01,D5
00024384 26 ba cd ca              |&       |		MOVE.L	0x21150,(A3)
00024388 28 ba cd ca              |(       |		MOVE.L	0x21154,(A4)
0002438c 2d 7a cd ca ff f6        |-z      |		MOVE.L	0x21158,(A6-0xa)
00024392 24 ba cd c8              |$       |		MOVE.L	0x2115c,(A2)
00024396 02 2e 00 80 ff f3        | .      |		ANDI.B	#0x80,(A6-0xd)
0002439c 00 2e 00 06 ff f3        | .      |		ORI.B	#0x06,(A6-0xd)
000243a2 02 2e 00 80 ff f9        | .      |		ANDI.B	#0x80,(A6-0x7)
000243a8 00 2e 00 02 ff f9        | .      |		ORI.B	#0x02,(A6-0x7)
000243ae 28 2e 00 10              |(.      |		MOVE.L	(A6+0x10),D4
000243b2 26 02                    |&       |		MOVE.L	D2,D3
000243b4 4e 91                    |N       |		JSR	(A1)
000243b6 2f 03                    |/       |		MOVE.L	D3,-(A7)
000243b8 2f 04                    |/       |		MOVE.L	D4,-(A7)
000243ba 26 02                    |&       |		MOVE.L	D2,D3
000243bc 4e 91                    |N       |		JSR	(A1)
000243be 1d 43 ff f8              | C      |		MOVE.B	D3,(A6-0x8)
000243c2 20 1f                    |        |		MOVE.L	(A7)+,D0
000243c4 22 1f                    |"       |		MOVE.L	(A7)+,D1
000243c6 14 81                    |        |		MOVE.B	D1,(A2)
000243c8 28 2e 00 0c              |(.      |		MOVE.L	(A6+0xc),D4
000243cc 26 3c 00 01 00 00        |&<      |		MOVE.L	#0x10000,D3
000243d2 4e 91                    |N       |		JSR	(A1)
000243d4 89 c2                    |        |		DIVS.W	D2,D4
000243d6 48 44                    |HD      |		SWAP.W	D4
000243d8 4a 44                    |JD      |		TST.W	D4
000243da 6c 02                    |l       |		BGE	0x243de
000243dc d8 42                    | B      |		ADD.W	D2,D4
000243de 1d 44 ff fb              | D      |		MOVE.B	D4,(A6-0x5)
000243e2 28 2e 00 0c              |(.      |		MOVE.L	(A6+0xc),D4
000243e6 26 02                    |&       |		MOVE.L	D2,D3
000243e8 4e 91                    |N       |		JSR	(A1)
000243ea 2f 03                    |/       |		MOVE.L	D3,-(A7)
000243ec 2f 04                    |/       |		MOVE.L	D4,-(A7)
000243ee 26 02                    |&       |		MOVE.L	D2,D3
000243f0 4e 91                    |N       |		JSR	(A1)
000243f2 1d 43 ff fc              | C      |		MOVE.B	D3,(A6-0x4)
000243f6 20 1f                    |        |		MOVE.L	(A7)+,D0
000243f8 22 1f                    |"       |		MOVE.L	(A7)+,D1
000243fa 1d 41 ff fd              | A      |		MOVE.B	D1,(A6-0x3)
000243fe 2d 53 ff dc              |-S      |		MOVE.L	(A3),(A6-0x24)
00024402 2d 54 ff e0              |-T      |		MOVE.L	(A4),(A6-0x20)
00024406 2d 6e ff f6 ff e4        |-n      |		MOVE.L	(A6-0xa),(A6-0x1c)
0002440c 2d 52 ff e8              |-R      |		MOVE.L	(A2),(A6-0x18)
00024410 48 6e ff dc              |Hn      |		PEA.L	(A6-0x24)
00024414 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
0002441a 3f 05                    |?       |		MOVE.W	D5,-(A7)
0002441c 48 78 00 00              |Hx      |		PEA.L	0x0
00024420 41 f9 00 02 d8 c2        |A       |		LEA.L	0x2d8c2,A0
00024426 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024428 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002442c 4e ba e3 38              |N  8    |		JSR	0x22766
00024430 de fc 00 14              |        |		ADDA.W	#0x14,A7
00024434 3e 85                    |>       |		MOVE.W	D5,(A7)
00024436 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
0002443a 4e ba e2 3a              |N  :    |		JSR	0x22676
0002443e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00024440 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
00024444 66 12                    |f       |		BNE	0x24458
00024446 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00024448 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
0002444c 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002444e 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00024450 4e ba de fa              |N       |		JSR	0x2234c
00024454 de fc 00 10              |        |		ADDA.W	#0x10,A7
00024458 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002445c 4e 5e                    |N^      |		UNLK	A6
0002445e 4e 75                    |Nu      |		RTS
00024460 ; --------------------------------------------------------------------------------------
00024460 ; OMSI PASCAL Function
00024460 ;    <LVAR  0x00c 4(r)>
00024460 ;    <LVAR  0x008 4(r)>
00024460 ;    <LVAR -0x003 1(w)>
00024460 ;    <LVAR -0x004 1(w)>
00024460 ;    <LVAR -0x005 1(w)>
00024460 ;    <LVAR -0x006 1(w) 4(rw)>
00024460 ;    <LVAR -0x007 1(w)>
00024460 ;    <LVAR -0x008 1(w)>
00024460 ;    <LVAR -0x00a 4(rw)>
00024460 ;    <LVAR -0x00d 1(w)>
00024460 ;    <LVAR -0x00e 4(rw)>
00024460 ;    <LVAR -0x012 4(rw)>
00024460 ;    <LVAR -0x014 @ 1(r)>
00024460 ;    <LVAR -0x018 4(w)>
00024460 ;    <LVAR -0x01c 4(w)>
00024460 ;    <LVAR -0x020 4(w)>
00024460 ;    <LVAR -0x024 @ 4(w)>
00024460 ; --------------------------------------------------------------------------------------
00024460 4e 56 ff 9e              |NV      |		LINK.W	A6,#0xff9e
00024464 bf d5                    |        |		CMPA.L	(A5),A7
00024466 62 06                    |b       |		BHI	0x2446e
00024468 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002446c 4e 76                    |Nv      |		TRAPV
0002446e de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
00024472 48 e7 fc e0              |H       |		MOVEM.L	A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00024476 43 f9 00 01 02 94        |C       |		LEA.L	?divs_d3_d4,A1
0002447c 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
00024480 24 3c 00 00 01 00        |$<      |		MOVE.L	#0x100,D2
00024486 7a 01                    |z       |		MOVEQ.L	#0x01,D5
00024488 2d 7a cc c6 ff ee        |-z      |		MOVE.L	0x21150,(A6-0x12)
0002448e 2d 7a cc c4 ff f2        |-z      |		MOVE.L	0x21154,(A6-0xe)
00024494 2d 7a cc c2 ff f6        |-z      |		MOVE.L	0x21158,(A6-0xa)
0002449a 24 ba cc c0              |$       |		MOVE.L	0x2115c,(A2)
0002449e 02 2e 00 80 ff f3        | .      |		ANDI.B	#0x80,(A6-0xd)
000244a4 00 2e 00 06 ff f3        | .      |		ORI.B	#0x06,(A6-0xd)
000244aa 02 2e 00 80 ff f9        | .      |		ANDI.B	#0x80,(A6-0x7)
000244b0 8b 2e ff f9              | .      |		OR.B	D5,(A6-0x7)
000244b4 28 2e 00 0c              |(.      |		MOVE.L	(A6+0xc),D4
000244b8 26 02                    |&       |		MOVE.L	D2,D3
000244ba 4e 91                    |N       |		JSR	(A1)
000244bc 2f 03                    |/       |		MOVE.L	D3,-(A7)
000244be 2f 04                    |/       |		MOVE.L	D4,-(A7)
000244c0 26 02                    |&       |		MOVE.L	D2,D3
000244c2 4e 91                    |N       |		JSR	(A1)
000244c4 1d 43 ff f8              | C      |		MOVE.B	D3,(A6-0x8)
000244c8 20 1f                    |        |		MOVE.L	(A7)+,D0
000244ca 22 1f                    |"       |		MOVE.L	(A7)+,D1
000244cc 14 81                    |        |		MOVE.B	D1,(A2)
000244ce 28 2e 00 08              |(.      |		MOVE.L	(A6+0x8),D4
000244d2 26 3c 00 01 00 00        |&<      |		MOVE.L	#0x10000,D3
000244d8 4e 91                    |N       |		JSR	(A1)
000244da 89 c2                    |        |		DIVS.W	D2,D4
000244dc 48 44                    |HD      |		SWAP.W	D4
000244de 4a 44                    |JD      |		TST.W	D4
000244e0 6c 02                    |l       |		BGE	0x244e4
000244e2 d8 42                    | B      |		ADD.W	D2,D4
000244e4 1d 44 ff fb              | D      |		MOVE.B	D4,(A6-0x5)
000244e8 28 2e 00 08              |(.      |		MOVE.L	(A6+0x8),D4
000244ec 26 02                    |&       |		MOVE.L	D2,D3
000244ee 4e 91                    |N       |		JSR	(A1)
000244f0 2f 03                    |/       |		MOVE.L	D3,-(A7)
000244f2 2f 04                    |/       |		MOVE.L	D4,-(A7)
000244f4 26 02                    |&       |		MOVE.L	D2,D3
000244f6 4e 91                    |N       |		JSR	(A1)
000244f8 1d 43 ff fc              | C      |		MOVE.B	D3,(A6-0x4)
000244fc 20 1f                    |        |		MOVE.L	(A7)+,D0
000244fe 22 1f                    |"       |		MOVE.L	(A7)+,D1
00024500 1d 41 ff fd              | A      |		MOVE.B	D1,(A6-0x3)
00024504 2d 6e ff ee ff dc        |-n      |		MOVE.L	(A6-0x12),(A6-0x24)
0002450a 2d 6e ff f2 ff e0        |-n      |		MOVE.L	(A6-0xe),(A6-0x20)
00024510 2d 6e ff f6 ff e4        |-n      |		MOVE.L	(A6-0xa),(A6-0x1c)
00024516 2d 52 ff e8              |-R      |		MOVE.L	(A2),(A6-0x18)
0002451a 48 6e ff dc              |Hn      |		PEA.L	(A6-0x24)
0002451e 41 f9 00 02 dc c2        |A       |		LEA.L	0x2dcc2,A0
00024524 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024526 3f 05                    |?       |		MOVE.W	D5,-(A7)
00024528 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002452c 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
00024532 48 78 00 00              |Hx      |		PEA.L	0x0
00024536 4e ba e2 2e              |N  .    |		JSR	0x22766
0002453a de fc 00 14              |        |		ADDA.W	#0x14,A7
0002453e 3e 85                    |>       |		MOVE.W	D5,(A7)
00024540 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00024544 4e ba e1 30              |N  0    |		JSR	0x22676
00024548 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002454a 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
0002454e 66 0a                    |f       |		BNE	0x2455a
00024550 48 78 00 24              |Hx $    |		PEA.L	0x24
00024554 4e ba cd d6              |N       |		JSR	0x2132c
00024558 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002455a 4c df 07 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2
0002455e 4e 5e                    |N^      |		UNLK	A6
00024560 4e 75                    |Nu      |		RTS
00024562 ; --------------------------------------------------------------------------------------
00024562 ; OMSI PASCAL Function
00024562 ;    <LVAR  0x010 4(r)>
00024562 ;    <LVAR  0x00c 4(r)>
00024562 ;    <LVAR  0x008 4(r)>
00024562 ; --------------------------------------------------------------------------------------
00024562 4e 56 ff ea              |NV      |		LINK.W	A6,#0xffea
00024566 bf d5                    |        |		CMPA.L	(A5),A7
00024568 62 06                    |b       |		BHI	0x24570
0002456a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002456e 4e 76                    |Nv      |		TRAPV
00024570 de fc 00 16              |        |		ADDA.W	#0x16,A7
00024574 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00024578 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
0002457c 41 f9 00 02 dc c2        |A       |		LEA.L	0x2dcc2,A0
00024582 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024584 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00024588 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
0002458e 63 02                    |c       |		BLS	0x24592
00024590 4e 4f                    |NO      |		TRAP	#15
00024592 3f 00                    |?       |		MOVE.W	D0,-(A7)
00024594 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002459a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002459c 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
000245a0 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000245a4 4e ba fe ba              |N       |		JSR	0x24460
000245a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000245aa 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000245ae 4e 5e                    |N^      |		UNLK	A6
000245b0 4e 75                    |Nu      |		RTS
000245b2 ; --------------------------------------------------------------------------------------
000245b2 ; OMSI PASCAL Function
000245b2 ;    <LVAR  0x010 4(r)>
000245b2 ;    <LVAR  0x00c 4(r)>
000245b2 ;    <LVAR  0x008 4(r)>
000245b2 ; --------------------------------------------------------------------------------------
000245b2 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
000245b6 bf d5                    |        |		CMPA.L	(A5),A7
000245b8 62 06                    |b       |		BHI	0x245c0
000245ba 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000245be 4e 76                    |Nv      |		TRAPV
000245c0 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000245c4 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000245c8 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
000245cc 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000245ce 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
000245d2 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000245d4 4e ba fd 7e              |N  ~    |		JSR	0x24354
000245d8 de fc 00 0c              |        |		ADDA.W	#0xc,A7
000245dc 41 f9 00 02 d8 c2        |A       |		LEA.L	0x2d8c2,A0
000245e2 2f 08                    |/       |		MOVE.L	A0,-(A7)
000245e4 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000245e8 20 11                    |        |		MOVE.L	(A1),D0
000245ea 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
000245f0 63 02                    |c       |		BLS	0x245f4
000245f2 4e 4f                    |NO      |		TRAP	#15
000245f4 3f 00                    |?       |		MOVE.W	D0,-(A7)
000245f6 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000245fc de fc 00 0a              |        |		ADDA.W	#0xa,A7
00024600 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00024604 4e 5e                    |N^      |		UNLK	A6
00024606 4e 75                    |Nu      |		RTS
00024608 ; --------------------------------------------------------------------------------------
00024608 ; OMSI PASCAL Function
00024608 ; --------------------------------------------------------------------------------------
00024608 4e 56 ff a8              |NV      |		LINK.W	A6,#0xffa8
0002460c bf d5                    |        |		CMPA.L	(A5),A7
0002460e 62 06                    |b       |		BHI	0x24616
00024610 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024614 4e 76                    |Nv      |		TRAPV
00024616 de fc 00 54              |   T    |		ADDA.W	#0x54,A7
0002461a 48 e7 f9 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7)
0002461e 45 f9 00 01 03 d8        |E       |		LEA.L	WriteConsoleString(str : String),A2
00024624 47 f9 00 02 e1 98        |G       |		LEA.L	0x2e198,A3
0002462a 49 f9 00 01 02 c4        |I       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A4
00024630 72 05                    |r       |		MOVEQ.L	#0x05,D1
00024632 74 01                    |t       |		MOVEQ.L	#0x01,D2
00024634 76 0c                    |v       |		MOVEQ.L	#0x0c,D3
00024636 78 02                    |x       |		MOVEQ.L	#0x02,D4
00024638 41 f8 12 00              |A       |		LEA.L	0x1200,A0
0002463c 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002463e 20 4b                    | K      |		MOVEA.L	A3,A0
00024640 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024642 48 78 00 20              |Hx      |		PEA.L	0x20
00024646 4e ba ff 6a              |N  j    |		JSR	0x245b2
0002464a 9e c3                    |        |		SUBA.W	D3,A7
0002464c 20 4f                    | O      |		MOVEA.L	A7,A0
0002464e 43 fa c4 8e              |C       |		LEA.L	0x20ade,A1
00024652 70 16                    |p       |		MOVEQ.L	#0x16,D0
00024654 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00024656 51 c8 ff fc              |Q       |		DBF	D0,0x24654
0002465a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002465c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00024660 3f 02                    |?       |		MOVE.W	D2,-(A7)
00024662 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
00024666 4e 94                    |N       |		JSR	(A4)
00024668 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002466a 4e 92                    |N       |		JSR	(A2)
0002466c de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00024670 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00024672 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024674 be 81                    |        |		CMP.L	D1,D7
00024676 63 02                    |c       |		BLS	0x2467a
00024678 4e 4f                    |NO      |		TRAP	#15
0002467a 20 4b                    | K      |		MOVEA.L	A3,A0
0002467c 42 80                    |B       |		CLR.L	D0
0002467e 10 30 78 18              | 0x     |		MOVE.B	(A0+D7.L+#0x18),D0
00024682 2f 00                    |/       |		MOVE.L	D0,-(A7)
00024684 48 78 00 02              |Hx      |		PEA.L	0x2
00024688 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
0002468e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00024690 4e 92                    |N       |		JSR	(A2)
00024692 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024694 be 81                    |        |		CMP.L	D1,D7
00024696 67 16                    |g       |		BEQ	0x246ae
00024698 3f 3a c4 5c              |?: \    |		MOVE.W	0x20af6,-(A7)
0002469c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002469e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000246a2 3f 02                    |?       |		MOVE.W	D2,-(A7)
000246a4 3f 04                    |?       |		MOVE.W	D4,-(A7)
000246a6 4e 94                    |N       |		JSR	(A4)
000246a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000246aa 4e 92                    |N       |		JSR	(A2)
000246ac 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000246ae 52 87                    |R       |		ADDQ.L	#0x1,D7
000246b0 be 81                    |        |		CMP.L	D1,D7
000246b2 6f be                    |o       |		BLE	0x24672
000246b4 2f 3a c4 4a              |/: J    |		MOVE.L	0x20b00,-(A7)
000246b8 2f 3a c4 42              |/: B    |		MOVE.L	0x20afc,-(A7)
000246bc 2f 3a c4 3a              |/: :    |		MOVE.L	0x20af8,-(A7)
000246c0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000246c2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000246c6 3f 02                    |?       |		MOVE.W	D2,-(A7)
000246c8 3f 03                    |?       |		MOVE.W	D3,-(A7)
000246ca 4e 94                    |N       |		JSR	(A4)
000246cc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000246ce 4e 92                    |N       |		JSR	(A2)
000246d0 de fc 00 10              |        |		ADDA.W	#0x10,A7
000246d4 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000246d6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000246d8 be 81                    |        |		CMP.L	D1,D7
000246da 63 02                    |c       |		BLS	0x246de
000246dc 4e 4f                    |NO      |		TRAP	#15
000246de 20 4b                    | K      |		MOVEA.L	A3,A0
000246e0 42 80                    |B       |		CLR.L	D0
000246e2 10 30 78 18              | 0x     |		MOVE.B	(A0+D7.L+#0x18),D0
000246e6 2f 00                    |/       |		MOVE.L	D0,-(A7)
000246e8 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
000246ee 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000246f0 4e 92                    |N       |		JSR	(A2)
000246f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000246f4 be 81                    |        |		CMP.L	D1,D7
000246f6 67 18                    |g       |		BEQ	0x24710
000246f8 3f 3a c4 0a              |?:      |		MOVE.W	0x20b04,-(A7)
000246fc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000246fe 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00024702 3f 02                    |?       |		MOVE.W	D2,-(A7)
00024704 3f 04                    |?       |		MOVE.W	D4,-(A7)
00024706 4e 94                    |N       |		JSR	(A4)
00024708 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002470a 4e 92                    |N       |		JSR	(A2)
0002470c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002470e 60 06                    |`       |		BRA	0x24716
00024710 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00024716 52 87                    |R       |		ADDQ.L	#0x1,D7
00024718 be 81                    |        |		CMP.L	D1,D7
0002471a 6f ba                    |o       |		BLE	0x246d6
0002471c 4c df 1f 9f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4
00024720 4e 5e                    |N^      |		UNLK	A6
00024722 4e 75                    |Nu      |		RTS
00024724 ; --------------------------------------------------------------------------------------
00024724 ; OMSI PASCAL Function
00024724 ;    <LVAR  0x008 4(r)>
00024724 ;    <LVAR -0x002 @ 1(r)>
00024724 ;    <LVAR -0x00a 4(w)>
00024724 ;    <LVAR -0x00e 4(w)>
00024724 ;    <LVAR -0x012 4(w)>
00024724 ;    <LVAR -0x016 4(w)>
00024724 ;    <LVAR -0x01a 4(r)>
00024724 ;    <LVAR -0x01e 4(r)>
00024724 ;    <LVAR -0x022 @ 4(w)>
00024724 ;    <LVAR -0x026 4(r)>
00024724 ;    <LVAR -0x02a 4(w)>
00024724 ;    <LVAR -0x02e 4(w)>
00024724 ;    <LVAR -0x032 4(r)>
00024724 ;    <LVAR -0x036 4(w)>
00024724 ;    <LVAR -0x03a 4(w)>
00024724 ;    <LVAR -0x03e 4(w)>
00024724 ;    <LVAR -0x042 4(w)>
00024724 ;    <LVAR -0x046 4(w)>
00024724 ;    <LVAR -0x04a 4(w)>
00024724 ;    <LVAR -0x04e 4(w)>
00024724 ;    <LVAR -0x052 4(w)>
00024724 ;    <LVAR -0x053 1(w)>
00024724 ;    <LVAR -0x054 1(w)>
00024724 ;    <LVAR -0x055 1(w)>
00024724 ;    <LVAR -0x056 1(w)>
00024724 ;    <LVAR -0x05a 4(w)>
00024724 ;    <LVAR -0x05e @ 4(w)>
00024724 ;    <LVAR -0x060 @ 1(r)>
00024724 ;    <LVAR -0x062 @ 2(w)>
00024724 ;    <LVAR -0x066 @ 4(rw)>
00024724 ;    <LVAR -0x072 @ 4(rw)>
00024724 ;    <LVAR -0x074 @>
00024724 ;    <LVAR -0x078 4(rw)>
00024724 ;    <LVAR -0x07c 4(rw)>
00024724 ;    <LVAR -0x080 @ 4(r)>
00024724 ;    <LVAR -0x084 @ 4(r)>
00024724 ; --------------------------------------------------------------------------------------
00024724 4e 56 fe fe              |NV      |		LINK.W	A6,#0xfefe
00024728 bf d5                    |        |		CMPA.L	(A5),A7
0002472a 62 06                    |b       |		BHI	0x24732
0002472c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024730 4e 76                    |Nv      |		TRAPV
00024732 de fc 00 7e              |   ~    |		ADDA.W	#0x7e,A7
00024736 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002473a 45 ee ff 80              |E       |		LEA.L	(A6-0x80),A2
0002473e 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00024744 49 ee ff 8e              |I       |		LEA.L	(A6-0x72),A4
00024748 74 0c                    |t       |		MOVEQ.L	#0x0c,D2
0002474a 2f 3a c3 be              |/:      |		MOVE.L	0x20b0a,-(A7)
0002474e 2f 3a c3 b6              |/:      |		MOVE.L	0x20b06,-(A7)
00024752 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00024756 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024758 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002475c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00024760 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
00024764 4e 93                    |N       |		JSR	(A3)
00024766 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00024768 1e bc 00 01              |        |		MOVE.B	#0x01,(A7)
0002476c 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00024770 48 54                    |HT      |		PEA.L	(A4)
00024772 4e ba d5 7a              |N  z    |		JSR	0x21cee
00024776 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
0002477a 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
0002477e 66 2a                    |f*      |		BNE	0x247aa
00024780 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
00024784 20 4f                    | O      |		MOVEA.L	A7,A0
00024786 43 fa c3 86              |C       |		LEA.L	0x20b0e,A1
0002478a 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002478c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002478e 51 c8 ff fc              |Q       |		DBF	D0,0x2478c
00024792 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024794 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00024798 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002479c 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
000247a0 4e 93                    |N       |		JSR	(A3)
000247a2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000247a4 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
000247a6 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000247aa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000247ac 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000247b0 4e ba fa 3a              |N  :    |		JSR	0x241ec
000247b4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000247b6 23 df 00 02 d0 24        |#    $  |		MOVE.L	(A7)+,0x2d024
000247bc 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000247c0 4e ba e1 1a              |N       |		JSR	0x228dc
000247c4 9e fc 00 36              |   6    |		SUBA.W	#0x36,A7
000247c8 20 4f                    | O      |		MOVEA.L	A7,A0
000247ca 43 fa b9 e4              |C       |		LEA.L	0x201b0,A1
000247ce 70 38                    |p8      |		MOVEQ.L	#0x38,D0
000247d0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000247d2 51 c8 ff fc              |Q       |		DBF	D0,0x247d0
000247d6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000247d8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000247dc 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000247e0 3f 3c 00 39              |?< 9    |		MOVE.W	#0x39,-(A7)
000247e4 4e 93                    |N       |		JSR	(A3)
000247e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000247e8 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000247ee de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
000247f2 2e bc 00 02 62 58        |.   bX  |		MOVE.L	#0x26258,(A7)
000247f8 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
000247fe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024800 4e ba cc 54              |N  T    |		JSR	0x21456
00024804 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00024806 42 27                    |B'      |		CLR.B	-(A7)
00024808 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
0002480c 48 78 00 00              |Hx      |		PEA.L	0x0
00024810 48 6e ff a0              |Hn      |		PEA.L	(A6-0x60)
00024814 48 6e ff 7c              |Hn |    |		PEA.L	(A6-0x84)
00024818 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
0002481e de fc 00 14              |        |		ADDA.W	#0x14,A7
00024822 4a 2e ff a0              |J.      |		TST.B	(A6-0x60)
00024826 67 0a                    |g       |		BEQ	0x24832
00024828 48 78 00 06              |Hx      |		PEA.L	0x6
0002482c 4e ba ca fe              |N       |		JSR	0x2132c
00024830 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024832 48 54                    |HT      |		PEA.L	(A4)
00024834 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002483a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002483c 48 52                    |HR      |		PEA.L	(A2)
0002483e 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00024844 9e fc 00 20              |        |		SUBA.W	#0x20,A7
00024848 20 4f                    | O      |		MOVEA.L	A7,A0
0002484a 43 fa b9 c8              |C       |		LEA.L	0x20214,A1
0002484e 70 22                    |p"      |		MOVEQ.L	#0x22,D0
00024850 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00024852 51 c8 ff fc              |Q       |		DBF	D0,0x24850
00024856 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024858 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002485c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00024860 3f 3c 00 23              |?< #    |		MOVE.W	#0x23,-(A7)
00024864 4e 93                    |N       |		JSR	(A3)
00024866 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00024868 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002486e de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00024872 42 ae ff 88              |B       |		CLR.L	(A6-0x78)
00024876 2f 2e ff 7c              |/. |    |		MOVE.L	(A6-0x84),-(A7)
0002487a 48 52                    |HR      |		PEA.L	(A2)
0002487c 48 6e ff 8c              |Hn      |		PEA.L	(A6-0x74)
00024880 4e b9 00 01 04 3c        |N    <  |		JSR	FileReadLine(file : File; VAR a : String; VAR b : Byte)
00024886 de c2                    |        |		ADDA.W	D2,A7
00024888 20 52                    | R      |		MOVEA.L	(A2),A0
0002488a 10 28 00 02              | (      |		MOVE.B	(A0+0x2),D0
0002488e 0c 00 00 53              |   S    |		CMPI.B	#0x53,D0
00024892 66 00 01 20              |f       |		BNE	0x249b4
00024896 10 28 00 03              | (      |		MOVE.B	(A0+0x3),D0
0002489a 0c 00 00 33              |   3    |		CMPI.B	#0x33,D0
0002489e 66 00 01 14              |f       |		BNE	0x249b4
000248a2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000248a4 1f 28 00 04              | (      |		MOVE.B	(A0+0x4),-(A7)
000248a8 4e ba cb 26              |N  &    |		JSR	0x213d0
000248ac 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000248ae 26 1f                    |&       |		MOVE.L	(A7)+,D3
000248b0 78 10                    |x       |		MOVEQ.L	#0x10,D4
000248b2 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000248b8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000248ba 1f 28 00 05              | (      |		MOVE.B	(A0+0x5),-(A7)
000248be 4e ba cb 10              |N       |		JSR	0x213d0
000248c2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000248c4 20 04                    |        |		MOVE.L	D4,D0
000248c6 d0 9f                    |        |		ADD.L	(A7)+,D0
000248c8 5b 80                    |[       |		SUBQ.L	#0x5,D0
000248ca 2d 40 ff 84              |-@      |		MOVE.L	D0,(A6-0x7c)
000248ce 7a 00                    |z       |		MOVEQ.L	#0x00,D5
000248d0 7e 08                    |~       |		MOVEQ.L	#0x08,D7
000248d2 78 10                    |x       |		MOVEQ.L	#0x10,D4
000248d4 26 05                    |&       |		MOVE.L	D5,D3
000248d6 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000248dc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000248de 20 52                    | R      |		MOVEA.L	(A2),A0
000248e0 20 07                    |        |		MOVE.L	D7,D0
000248e2 53 80                    |S       |		SUBQ.L	#0x1,D0
000248e4 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
000248ea 63 02                    |c       |		BLS	0x248ee
000248ec 4e 4f                    |NO      |		TRAP	#15
000248ee 1f 30 08 02              | 0      |		MOVE.B	(A0+D0.L+#0x2),-(A7)
000248f2 4e ba ca dc              |N       |		JSR	0x213d0
000248f6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000248f8 2a 04                    |*       |		MOVE.L	D4,D5
000248fa da 9f                    |        |		ADD.L	(A7)+,D5
000248fc 52 87                    |R       |		ADDQ.L	#0x1,D7
000248fe be 82                    |        |		CMP.L	D2,D7
00024900 6f d0                    |o       |		BLE	0x248d2
00024902 ba ae ff 88              |        |		CMP.L	(A6-0x78),D5
00024906 6f 18                    |o       |		BLE	0x24920
00024908 1f 3c 00 2e              | < .    |		MOVE.B	#0x2e,-(A7)
0002490c 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
00024912 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00024914 2d 45 ff 88              |-E      |		MOVE.L	D5,(A6-0x78)
00024918 06 ae 00 00 10 00 ff 88  |        |		ADDI.L	#0x00001000,(A6-0x78)
00024920 4a ae ff 84              |J       |		TST.L	(A6-0x7c)
00024924 6f 00 00 8e              |o       |		BLE	0x249b4
00024928 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002492a bc ae ff 84              |        |		CMP.L	(A6-0x7c),D6
0002492e 6c 78                    |lx      |		BGE	0x249a8
00024930 0c 86 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D6
00024936 63 02                    |c       |		BLS	0x2493a
00024938 4e 4f                    |NO      |		TRAP	#15
0002493a 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00024940 41 f0 68 00              |A h     |		LEA.L	(A0+D6.L),A0
00024944 22 52                    |"R      |		MOVEA.L	(A2),A1
00024946 20 06                    |        |		MOVE.L	D6,D0
00024948 e3 80                    |        |		ASL.L	#0x1,D0
0002494a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002494c 22 00                    |"       |		MOVE.L	D0,D1
0002494e 06 81 00 00 00 0d        |        |		ADDI.L	#0x0000000d,D1
00024954 53 81                    |S       |		SUBQ.L	#0x1,D1
00024956 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
0002495c 63 02                    |c       |		BLS	0x24960
0002495e 4e 4f                    |NO      |		TRAP	#15
00024960 1f 31 18 02              | 1      |		MOVE.B	(A1+D1.L+#0x2),-(A7)
00024964 4e ba ca 6a              |N  j    |		JSR	0x213d0
00024968 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002496a 26 1f                    |&       |		MOVE.L	(A7)+,D3
0002496c 78 10                    |x       |		MOVEQ.L	#0x10,D4
0002496e 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00024974 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00024976 06 80 00 00 00 0e        |        |		ADDI.L	#0x0000000e,D0
0002497c 53 80                    |S       |		SUBQ.L	#0x1,D0
0002497e 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
00024984 63 02                    |c       |		BLS	0x24988
00024986 4e 4f                    |NO      |		TRAP	#15
00024988 1f 31 08 02              | 1      |		MOVE.B	(A1+D0.L+#0x2),-(A7)
0002498c 4e ba ca 42              |N  B    |		JSR	0x213d0
00024990 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00024992 20 04                    |        |		MOVE.L	D4,D0
00024994 d0 9f                    |        |		ADD.L	(A7)+,D0
00024996 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
0002499c 63 02                    |c       |		BLS	0x249a0
0002499e 4e 4f                    |NO      |		TRAP	#15
000249a0 11 40 15 2e              | @ .    |		MOVE.B	D0,(A0+0x152e)
000249a4 52 86                    |R       |		ADDQ.L	#0x1,D6
000249a6 60 82                    |`       |		BRA	0x2492a
000249a8 2f 2e ff 84              |/.      |		MOVE.L	(A6-0x7c),-(A7)
000249ac 2f 05                    |/       |		MOVE.L	D5,-(A7)
000249ae 4e ba fa b0              |N       |		JSR	0x24460
000249b2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000249b4 20 52                    | R      |		MOVEA.L	(A2),A0
000249b6 10 28 00 02              | (      |		MOVE.B	(A0+0x2),D0
000249ba 0c 00 00 53              |   S    |		CMPI.B	#0x53,D0
000249be 66 00 fe b6              |f       |		BNE	0x24876
000249c2 10 28 00 03              | (      |		MOVE.B	(A0+0x3),D0
000249c6 0c 00 00 37              |   7    |		CMPI.B	#0x37,D0
000249ca 66 00 fe aa              |f       |		BNE	0x24876
000249ce 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
000249d4 42 ae ff 9a              |B       |		CLR.L	(A6-0x66)
000249d8 7e 05                    |~       |		MOVEQ.L	#0x05,D7
000249da 78 10                    |x       |		MOVEQ.L	#0x10,D4
000249dc 26 2e ff 9a              |&.      |		MOVE.L	(A6-0x66),D3
000249e0 4e b9 00 01 02 90        |N       |		JSR	?mulu_d3_d4
000249e6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000249e8 20 52                    | R      |		MOVEA.L	(A2),A0
000249ea 20 07                    |        |		MOVE.L	D7,D0
000249ec 53 80                    |S       |		SUBQ.L	#0x1,D0
000249ee 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
000249f4 63 02                    |c       |		BLS	0x249f8
000249f6 4e 4f                    |NO      |		TRAP	#15
000249f8 1f 30 08 02              | 0      |		MOVE.B	(A0+D0.L+#0x2),-(A7)
000249fc 4e ba c9 d2              |N       |		JSR	0x213d0
00024a00 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00024a02 20 04                    |        |		MOVE.L	D4,D0
00024a04 d0 9f                    |        |		ADD.L	(A7)+,D0
00024a06 2d 40 ff 9a              |-@      |		MOVE.L	D0,(A6-0x66)
00024a0a 52 87                    |R       |		ADDQ.L	#0x1,D7
00024a0c be 82                    |        |		CMP.L	D2,D7
00024a0e 6f ca                    |o       |		BLE	0x249da
00024a10 48 52                    |HR      |		PEA.L	(A2)
00024a12 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00024a18 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00024a1a 42 17                    |B       |		CLR.B	(A7)
00024a1c 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00024a20 48 78 00 01              |Hx      |		PEA.L	0x1
00024a24 48 6e ff a0              |Hn      |		PEA.L	(A6-0x60)
00024a28 48 6e ff 7c              |Hn |    |		PEA.L	(A6-0x84)
00024a2c 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00024a32 de fc 00 10              |        |		ADDA.W	#0x10,A7
00024a36 48 78 00 00              |Hx      |		PEA.L	0x0
00024a3a 2d 57 ff a2              |-W      |		MOVE.L	(A7),(A6-0x5e)
00024a3e 41 f9 00 02 d0 18        |A       |		LEA.L	0x2d018,A0
00024a44 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024a46 2d 5f ff a6              |-_      |		MOVE.L	(A7)+,(A6-0x5a)
00024a4a 06 ae e0 00 00 00 ff a6  |        |		ADDI.L	#0xe0000000,(A6-0x5a)
00024a52 1d 7a c7 c4 ff aa        | z      |		MOVE.B	0x21218,(A6-0x56)
00024a58 1d 7a c7 bf ff ab        | z      |		MOVE.B	0x21219,(A6-0x55)
00024a5e 1d 7a c7 ba ff ac        | z      |		MOVE.B	0x2121a,(A6-0x54)
00024a64 02 2e 00 7f ff ad        | .      |		ANDI.B	#0x7f,(A6-0x53)
00024a6a 02 2e 00 bf ff ad        | .      |		ANDI.B	#0xbf,(A6-0x53)
00024a70 02 2e 00 df ff ad        | .      |		ANDI.B	#0xdf,(A6-0x53)
00024a76 00 2e 00 10 ff ad        | .      |		ORI.B	#0x10,(A6-0x53)
00024a7c 02 2e 00 f7 ff ad        | .      |		ANDI.B	#0xf7,(A6-0x53)
00024a82 02 2e 00 fb ff ad        | .      |		ANDI.B	#0xfb,(A6-0x53)
00024a88 02 2e 00 fd ff ad        | .      |		ANDI.B	#0xfd,(A6-0x53)
00024a8e 02 2e 00 fe ff ad        | .      |		ANDI.B	#0xfe,(A6-0x53)
00024a94 2d 57 ff ae              |-W      |		MOVE.L	(A7),(A6-0x52)
00024a98 2d 57 ff b2              |-W      |		MOVE.L	(A7),(A6-0x4e)
00024a9c 41 f8 11 40              |A  @    |		LEA.L	0x1140,A0
00024aa0 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024aa2 2d 5f ff b6              |-_      |		MOVE.L	(A7)+,(A6-0x4a)
00024aa6 06 ae e0 00 00 00 ff b6  |        |		ADDI.L	#0xe0000000,(A6-0x4a)
00024aae 2d 5f ff de              |-_      |		MOVE.L	(A7)+,(A6-0x22)
00024ab2 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00024ab4 20 07                    |        |		MOVE.L	D7,D0
00024ab6 53 80                    |S       |		SUBQ.L	#0x1,D0
00024ab8 0c 80 00 00 00 07        |        |		CMPI.L	#0x00000007,D0
00024abe 63 02                    |c       |		BLS	0x24ac2
00024ac0 4e 4f                    |NO      |		TRAP	#15
00024ac2 41 ee ff 7c              |A  |    |		LEA.L	(A6-0x84),A0
00024ac6 42 30 08 66              |B0 f    |		CLR.B	(A0+D0.L+#0x66)
00024aca 52 87                    |R       |		ADDQ.L	#0x1,D7
00024acc 0c 87 00 00 00 08        |        |		CMPI.L	#0x00000008,D7
00024ad2 6f e0                    |o       |		BLE	0x24ab4
00024ad4 2d 6e ff e2 ff ea        |-n      |		MOVE.L	(A6-0x1e),(A6-0x16)
00024ada 2d 6e ff e6 ff ee        |-n      |		MOVE.L	(A6-0x1a),(A6-0x12)
00024ae0 2d 6e ff e2 ff f2        |-n      |		MOVE.L	(A6-0x1e),(A6-0xe)
00024ae6 2d 6e ff e6 ff f6        |-n      |		MOVE.L	(A6-0x1a),(A6-0xa)
00024aec 48 78 00 00              |Hx      |		PEA.L	0x0
00024af0 2d 57 ff ba              |-W      |		MOVE.L	(A7),(A6-0x46)
00024af4 2d 57 ff be              |-W      |		MOVE.L	(A7),(A6-0x42)
00024af8 2d 57 ff c2              |-W      |		MOVE.L	(A7),(A6-0x3e)
00024afc 2d 57 ff c6              |-W      |		MOVE.L	(A7),(A6-0x3a)
00024b00 2d 57 ff ca              |-W      |		MOVE.L	(A7),(A6-0x36)
00024b04 42 ae ff ce              |B       |		CLR.L	(A6-0x32)
00024b08 2d 7c 00 00 00 f0 ff d2  |-|      |		MOVE.L	#0xf0,(A6-0x2e)
00024b10 2d 5f ff d6              |-_      |		MOVE.L	(A7)+,(A6-0x2a)
00024b14 42 ae ff da              |B       |		CLR.L	(A6-0x26)
00024b18 41 ee ff a2              |A       |		LEA.L	(A6-0x5e),A0
00024b1c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b1e 41 f8 11 00              |A       |		LEA.L	0x1100,A0
00024b22 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b24 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00024b28 4e ba fa 38              |N  8    |		JSR	0x24562
00024b2c de c2                    |        |		ADDA.W	D2,A7
00024b2e 41 f9 00 02 d0 24        |A    $  |		LEA.L	0x2d024,A0
00024b34 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b36 41 f9 00 02 d0 18        |A       |		LEA.L	0x2d018,A0
00024b3c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b3e 48 78 00 04              |Hx      |		PEA.L	0x4
00024b42 4e ba fa 1e              |N       |		JSR	0x24562
00024b46 de c2                    |        |		ADDA.W	D2,A7
00024b48 41 ee ff de              |A       |		LEA.L	(A6-0x22),A0
00024b4c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b4e 41 f8 11 40              |A  @    |		LEA.L	0x1140,A0
00024b52 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b54 48 78 00 1c              |Hx      |		PEA.L	0x1c
00024b58 4e ba fa 08              |N       |		JSR	0x24562
00024b5c de c2                    |        |		ADDA.W	D2,A7
00024b5e 41 ee ff 9a              |A       |		LEA.L	(A6-0x66),A0
00024b62 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b64 48 78 10 04              |Hx      |		PEA.L	0x1004
00024b68 48 78 00 04              |Hx      |		PEA.L	0x4
00024b6c 4e ba f9 f4              |N       |		JSR	0x24562
00024b70 de c2                    |        |		ADDA.W	D2,A7
00024b72 3d 7c 80 80 ff 9e        |=|      |		MOVE.W	#0x8080,(A6-0x62)
00024b78 41 ee ff 9e              |A       |		LEA.L	(A6-0x62),A0
00024b7c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024b7e 48 78 10 00              |Hx      |		PEA.L	0x1000
00024b82 48 78 00 02              |Hx      |		PEA.L	0x2
00024b86 4e ba f9 da              |N       |		JSR	0x24562
00024b8a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00024b8c 2e bc 00 01 31 2c        |.   1,  |		MOVE.L	#0x1312c,(A7)
00024b92 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
00024b98 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024b9a 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00024b9e 4e 5e                    |N^      |		UNLK	A6
00024ba0 4e 75                    |Nu      |		RTS
00024ba2 ; --------------------------------------------------------------------------------------
00024ba2 ; OMSI PASCAL Function
00024ba2 ;    <LVAR  0x008 4(rw)>
00024ba2 ;    <LVAR -0x004 @ 1(r)>
00024ba2 ; --------------------------------------------------------------------------------------
00024ba2 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc		; Spelunked
00024ba6 bf d5                    |        |		CMPA.L	(A5),A7
00024ba8 62 06                    |b       |		BHI	0x24bb0
00024baa 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024bae 4e 76                    |Nv      |		TRAPV
00024bb0 de fc 00 20              |        |		ADDA.W	#0x20,A7
00024bb4 48 e7 80 e0              |H       |		MOVEM.L	A2+A1+A0+D0,-(A7)
00024bb8 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
00024bbc 45 f9 00 01 03 dc        |E       |		LEA.L	WriteConsoleCrLf(void),A2
00024bc2 4e 92                    |N       |		JSR	(A2)
00024bc4 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00024bc8 20 49                    | I      |		MOVEA.L	A1,A0
00024bca 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024bcc 48 78 00 01              |Hx      |		PEA.L	0x1
00024bd0 4e ba f9 e0              |N       |		JSR	0x245b2
00024bd4 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00024bd8 4a 11                    |J       |		TST.B	(A1)
00024bda 67 1a                    |g       |		BEQ	0x24bf6
00024bdc 42 80                    |B       |		CLR.L	D0
00024bde 10 11                    |        |		MOVE.B	(A1),D0
00024be0 0c 80 00 00 00 0a        |        |		CMPI.L	#0x0000000a,D0
00024be6 66 04                    |f       |		BNE	0x24bec
00024be8 4e 92                    |N       |		JSR	(A2)
00024bea 60 0a                    |`       |		BRA	0x24bf6
00024bec 1f 00                    |        |		MOVE.B	D0,-(A7)
00024bee 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
00024bf4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00024bf6 52 ae 00 08              |R       |		ADDQ.L	#0x1,(A6+0x8)
00024bfa 4a 11                    |J       |		TST.B	(A1)
00024bfc 66 c6                    |f       |		BNE	0x24bc4
00024bfe 4e 92                    |N       |		JSR	(A2)
00024c00 4c df 07 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2
00024c04 4e 5e                    |N^      |		UNLK	A6
00024c06 4e 75                    |Nu      |		RTS
00024c08 ; --------------------------------------------------------------------------------------
00024c08 ; OMSI PASCAL Function
00024c08 ;    <LVAR  0x014 4(r)>
00024c08 ;    <LVAR  0x010 4(r)>
00024c08 ;    <LVAR  0x00c 4(w)>
00024c08 ;    <LVAR  0x008 4(r)>
00024c08 ;    <LVAR -0x002 2(r)>
00024c08 ;    <LVAR -0x004 2(r)>
00024c08 ;    <LVAR -0x006 2(r)>
00024c08 ;    <LVAR -0x008 2(r)>
00024c08 ;    <LVAR -0x00c 4(r)>
00024c08 ;    <LVAR -0x010 4(r)>
00024c08 ;    <LVAR -0x012 2(r)>
00024c08 ;    <LVAR -0x014 2(w)>
00024c08 ;    <LVAR -0x018 4(w)>
00024c08 ;    <LVAR -0x01a 2(r)>
00024c08 ;    <LVAR -0x01c 2(r)>
00024c08 ;    <LVAR -0x020 @ 4(r)>
00024c08 ; --------------------------------------------------------------------------------------
00024c08 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
00024c0c bf d5                    |        |		CMPA.L	(A5),A7
00024c0e 62 06                    |b       |		BHI	0x24c16
00024c10 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024c14 4e 76                    |Nv      |		TRAPV
00024c16 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00024c1a 48 e7 e0 e0              |H       |		MOVEM.L	A2+A1+A0+D2+D1+D0,-(A7)
00024c1e 72 20                    |r       |		MOVEQ.L	#0x20,D1
00024c20 74 0c                    |t       |		MOVEQ.L	#0x0c,D2
00024c22 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00024c26 20 10                    |        |		MOVE.L	(A0),D0
00024c28 02 80 00 00 00 ff        |        |		ANDI.L	#0x000000ff,D0
00024c2e d0 41                    | A      |		ADD.W	D1,D0
00024c30 0c 40 00 ff              | @      |		CMPI.W	#0x00ff,D0
00024c34 6f 04                    |o       |		BLE	0x24c3a
00024c36 52 90                    |R       |		ADDQ.L	#0x1,(A0)
00024c38 60 e8                    |`       |		BRA	0x24c22
00024c3a 22 6e 00 14              |"n      |		MOVEA.L	(A6+0x14),A1
00024c3e 24 48                    |$H      |		MOVEA.L	A0,A2
00024c40 2f 0a                    |/       |		MOVE.L	A2,-(A7)
00024c42 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00024c44 04 97 00 e0 00 00        |        |		SUBI.L	#0x00e00000,(A7)
00024c4a 48 78 00 04              |Hx      |		PEA.L	0x4
00024c4e 4e ba f9 12              |N       |		JSR	0x24562
00024c52 de c2                    |        |		ADDA.W	D2,A7
00024c54 42 ae ff e0              |B       |		CLR.L	(A6-0x20)
00024c58 42 6e ff e4              |Bn      |		CLR.W	(A6-0x1c)
00024c5c 42 6e ff e6              |Bn      |		CLR.W	(A6-0x1a)
00024c60 2d 50 ff e8              |-P      |		MOVE.L	(A0),(A6-0x18)
00024c64 d3 ae ff e8              |        |		ADD.L	D1,(A6-0x18)
00024c68 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00024c6c 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00024c72 63 02                    |c       |		BLS	0x24c76
00024c74 4e 4f                    |NO      |		TRAP	#15
00024c76 3d 40 ff ec              |=@      |		MOVE.W	D0,(A6-0x14)
00024c7a 42 6e ff ee              |Bn      |		CLR.W	(A6-0x12)
00024c7e 42 ae ff f0              |B       |		CLR.L	(A6-0x10)
00024c82 42 ae ff f4              |B       |		CLR.L	(A6-0xc)
00024c86 42 6e ff f8              |Bn      |		CLR.W	(A6-0x8)
00024c8a 42 6e ff fa              |Bn      |		CLR.W	(A6-0x6)
00024c8e 42 6e ff fc              |Bn      |		CLR.W	(A6-0x4)
00024c92 42 6e ff fe              |Bn      |		CLR.W	(A6-0x2)
00024c96 45 ee ff e0              |E       |		LEA.L	(A6-0x20),A2
00024c9a 2f 0a                    |/       |		MOVE.L	A2,-(A7)
00024c9c 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00024c9e 04 97 00 e0 00 00        |        |		SUBI.L	#0x00e00000,(A7)
00024ca4 48 78 00 20              |Hx      |		PEA.L	0x20
00024ca8 4e ba f8 b8              |N       |		JSR	0x24562
00024cac de c2                    |        |		ADDA.W	D2,A7
00024cae 22 90                    |"       |		MOVE.L	(A0),(A1)
00024cb0 d3 90                    |        |		ADD.L	D1,(A0)
00024cb2 20 10                    |        |		MOVE.L	(A0),D0
00024cb4 d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
00024cb8 20 80                    |        |		MOVE.L	D0,(A0)
00024cba 53 ae 00 0c              |S       |		SUBQ.L	#0x1,(A6+0xc)
00024cbe 66 00 ff 62              |f  b    |		BNE	0x24c22
00024cc2 4c df 07 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2
00024cc6 4e 5e                    |N^      |		UNLK	A6
00024cc8 4e 75                    |Nu      |		RTS
00024cca ; --------------------------------------------------------------------------------------
00024cca ; OMSI PASCAL Function
00024cca ;    <LVAR  0x010 4(r)>
00024cca ;    <LVAR  0x00e 1(r)>
00024cca ;    <LVAR  0x00a 4(r)>
00024cca ;    <LVAR  0x009 1(r)>
00024cca ;    <LVAR -0x002 @ 1(r)>
00024cca ;    <LVAR -0x006 4(rw)>
00024cca ;    <LVAR -0x00a 4(rw)>
00024cca ;    <LVAR -0x00e 4(rw)>
00024cca ;    <LVAR -0x012 @ 4(rw)>
00024cca ; --------------------------------------------------------------------------------------
00024cca 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
00024cce bf d5                    |        |		CMPA.L	(A5),A7
00024cd0 62 06                    |b       |		BHI	0x24cd8
00024cd2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024cd6 4e 76                    |Nv      |		TRAPV
00024cd8 de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
00024cdc 48 e7 f0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
00024ce0 43 f9 00 02 c7 fe        |C       |		LEA.L	0x2c7fe,A1
00024ce6 45 f9 00 02 c7 f2        |E       |		LEA.L	0x2c7f2,A2
00024cec 47 f9 00 02 c7 f6        |G       |		LEA.L	0x2c7f6,A3
00024cf2 49 f9 00 02 c7 fa        |I       |		LEA.L	0x2c7fa,A4
00024cf8 12 3c 00 80              | <      |		MOVE.B	#0x80,D1
00024cfc 74 7f                    |t       |		MOVEQ.L	#0x7f,D2
00024cfe 76 02                    |v       |		MOVEQ.L	#0x02,D3
00024d00 24 ba c4 4e              |$  N    |		MOVE.L	0x21150,(A2)
00024d04 26 ba c4 4e              |&  N    |		MOVE.L	0x21154,(A3)
00024d08 28 ba c4 4e              |(  N    |		MOVE.L	0x21158,(A4)
00024d0c 22 ba c4 4e              |"  N    |		MOVE.L	0x2115c,(A1)
00024d10 c3 39 00 02 c7 f7        | 9      |		AND.B	D1,0x2c7f7
00024d16 00 39 00 06 00 02 c7 f7  | 9      |		ORI.B	#0x06,0x2c7f7
00024d1e 20 2e 00 10              | .      |		MOVE.L	(A6+0x10),D0
00024d22 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00024d28 63 02                    |c       |		BLS	0x24d2c
00024d2a 4e 4f                    |NO      |		TRAP	#15
00024d2c 13 c0 00 02 c7 fc        |        |		MOVE.B	D0,0x2c7fc
00024d32 c3 39 00 02 c7 fd        | 9      |		AND.B	D1,0x2c7fd
00024d38 00 39 00 04 00 02 c7 fd  | 9      |		ORI.B	#0x04,0x2c7fd
00024d40 10 2e 00 0e              | .      |		MOVE.B	(A6+0xe),D0
00024d44 c5 11                    |        |		AND.B	D2,(A1)
00024d46 ef 08                    |        |		LSL.B	#0x7,D0
00024d48 81 11                    |        |		OR.B	D0,(A1)
00024d4a 13 ee 00 09 00 02 c7 ff  |        |		MOVE.B	(A6+0x9),0x2c7ff
00024d52 20 2e 00 0a              | .      |		MOVE.L	(A6+0xa),D0
00024d56 b0 82                    |        |		CMP.L	D2,D0
00024d58 63 02                    |c       |		BLS	0x24d5c
00024d5a 4e 4f                    |NO      |		TRAP	#15
00024d5c c3 39 00 02 c7 fe        | 9      |		AND.B	D1,0x2c7fe
00024d62 81 39 00 02 c7 fe        | 9      |		OR.B	D0,0x2c7fe
00024d68 2d 52 ff ee              |-R      |		MOVE.L	(A2),(A6-0x12)
00024d6c 2d 53 ff f2              |-S      |		MOVE.L	(A3),(A6-0xe)
00024d70 2d 54 ff f6              |-T      |		MOVE.L	(A4),(A6-0xa)
00024d74 2d 51 ff fa              |-Q      |		MOVE.L	(A1),(A6-0x6)
00024d78 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00024d7c 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
00024d82 3f 03                    |?       |		MOVE.W	D3,-(A7)
00024d84 48 78 00 00              |Hx      |		PEA.L	0x0
00024d88 41 f9 00 02 cc 13        |A       |		LEA.L	0x2cc13,A0
00024d8e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00024d90 48 78 ff ff              |Hx      |		PEA.L	0xffffffff
00024d94 4e ba d9 d0              |N       |		JSR	0x22766
00024d98 de fc 00 14              |        |		ADDA.W	#0x14,A7
00024d9c 3e 83                    |>       |		MOVE.W	D3,(A7)
00024d9e 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00024da2 4e ba d8 d2              |N       |		JSR	0x22676
00024da6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00024da8 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
00024dac 66 0a                    |f       |		BNE	0x24db8
00024dae 48 78 00 26              |Hx &    |		PEA.L	0x26
00024db2 4e ba c5 78              |N  x    |		JSR	0x2132c
00024db6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00024db8 23 ee ff ee 00 02 c7 da  |#       |		MOVE.L	(A6-0x12),0x2c7da
00024dc0 23 ee ff f2 00 02 c7 de  |#       |		MOVE.L	(A6-0xe),0x2c7de
00024dc8 23 ee ff f6 00 02 c7 e2  |#       |		MOVE.L	(A6-0xa),0x2c7e2
00024dd0 23 ee ff fa 00 02 c7 e6  |#       |		MOVE.L	(A6-0x6),0x2c7e6
00024dd8 4c df 1f 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4
00024ddc 4e 5e                    |N^      |		UNLK	A6
00024dde 4e 75                    |Nu      |		RTS
00024de0 ; --------------------------------------------------------------------------------------
00024de0 ; OMSI PASCAL Function
00024de0 ;    <LVAR -0x00e @ 4(rw)>
00024de0 ;    <LVAR -0x012 @ 4(w)>
00024de0 ;    <LVAR -0x03e 4(r)>
00024de0 ;    <LVAR -0x052 @>
00024de0 ;    <LVAR -0x056 @ 4(w)>
00024de0 ;    <LVAR -0x058 @ 1(r)>
00024de0 ;    <LVAR -0x05c @ 4(w)>
00024de0 ;    <LVAR -0x060 @ 4(w)>
00024de0 ;    <LVAR -0x068 4(w)>
00024de0 ;    <LVAR -0x06c 4(w)>
00024de0 ;    <LVAR -0x070 4(w)>
00024de0 ;    <LVAR -0x074 @ 4(w)>
00024de0 ;    <LVAR -0x079 1(w)>
00024de0 ;    <LVAR -0x07a 1(w)>
00024de0 ;    <LVAR -0x07b 1(w)>
00024de0 ;    <LVAR -0x07c 4(rw)>
00024de0 ;    <LVAR -0x07d 1(w)>
00024de0 ;    <LVAR -0x07e 1(w)>
00024de0 ;    <LVAR -0x080 4(rw)>
00024de0 ;    <LVAR -0x083 1(w)>
00024de0 ;    <LVAR -0x084 4(rw)>
00024de0 ;    <LVAR -0x088 4(rw)>
00024de0 ; --------------------------------------------------------------------------------------
00024de0 4e 56 ff 2e              |NV .    |		LINK.W	A6,#0xff2e
00024de4 bf d5                    |        |		CMPA.L	(A5),A7
00024de6 62 06                    |b       |		BHI	0x24dee
00024de8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00024dec 4e 76                    |Nv      |		TRAPV
00024dee de fc 00 4a              |   J    |		ADDA.W	#0x4a,A7
00024df2 48 e7 ff e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00024df6 43 f9 00 02 c7 94        |C       |		LEA.L	0x2c794,A1
00024dfc 45 f9 00 02 d8 3a        |E    :  |		LEA.L	0x2d83a,A2
00024e02 74 0c                    |t       |		MOVEQ.L	#0x0c,D2
00024e04 34 bc 00 02              |4       |		MOVE.W	#0x2,(A2)
00024e08 33 fc 00 01 00 02 d8 3c  |3      <|		MOVE.W	#0x1,0x2d83c
00024e10 42 b9 00 02 d8 3e        |B    >  |		CLR.L	0x2d83e
00024e16 23 fc 00 00 00 03 00 02  |#       |		MOVE.L	#0x3,0x2d842
00024e1e d8 42                    | B      |
00024e20 13 fc 00 69 00 02 d8 46  |   i   F|		MOVE.B	#0x69,0x2d846
00024e28 13 fc 00 66 00 02 d8 47  |   f   G|		MOVE.B	#0x66,0x2d847
00024e30 13 fc 00 5f 00 02 d8 48  |   _   H|		MOVE.B	#0x5f,0x2d848
00024e38 13 fc 00 74 00 02 d8 49  |   t   I|		MOVE.B	#0x74,0x2d849
00024e40 13 fc 00 63 00 02 d8 4a  |   c   J|		MOVE.B	#0x63,0x2d84a
00024e48 13 fc 00 70 00 02 d8 4b  |   p   K|		MOVE.B	#0x70,0x2d84b
00024e50 70 07                    |p       |		MOVEQ.L	#0x07,D0
00024e52 22 00                    |"       |		MOVE.L	D0,D1
00024e54 53 81                    |S       |		SUBQ.L	#0x1,D1
00024e56 0c 81 00 00 00 0b        |        |		CMPI.L	#0x0000000b,D1
00024e5c 63 02                    |c       |		BLS	0x24e60
00024e5e 4e 4f                    |NO      |		TRAP	#15
00024e60 20 49                    | I      |		MOVEA.L	A1,A0
00024e62 41 f0 18 00              |A       |		LEA.L	(A0+D1.L),A0
00024e66 42 28 10 b2              |B(      |		CLR.B	(A0+0x10b2)
00024e6a 52 80                    |R       |		ADDQ.L	#0x1,D0
00024e6c b0 82                    |        |		CMP.L	D2,D0
00024e6e 6f e2                    |o       |		BLE	0x24e52
00024e70 33 fc 00 02 00 02 d8 52  |3      R|		MOVE.W	#0x2,0x2d852
00024e78 33 fc 00 02 00 02 d8 54  |3      T|		MOVE.W	#0x2,0x2d854
00024e80 23 fc 00 00 00 03 00 02  |#       |		MOVE.L	#0x3,0x2d856
00024e88 d8 56                    | V      |
00024e8a 23 fc 00 00 00 03 00 02  |#       |		MOVE.L	#0x3,0x2d85a
00024e92 d8 5a                    | Z      |
00024e94 13 fc 00 69 00 02 d8 5e  |   i   ^|		MOVE.B	#0x69,0x2d85e
00024e9c 13 fc 00 66 00 02 d8 5f  |   f   _|		MOVE.B	#0x66,0x2d85f
00024ea4 13 fc 00 5f 00 02 d8 60  |   _   `|		MOVE.B	#0x5f,0x2d860
00024eac 13 fc 00 75 00 02 d8 61  |   u   a|		MOVE.B	#0x75,0x2d861
00024eb4 13 fc 00 64 00 02 d8 62  |   d   b|		MOVE.B	#0x64,0x2d862
00024ebc 13 fc 00 70 00 02 d8 63  |   p   c|		MOVE.B	#0x70,0x2d863
00024ec4 70 07                    |p       |		MOVEQ.L	#0x07,D0
00024ec6 22 00                    |"       |		MOVE.L	D0,D1
00024ec8 53 81                    |S       |		SUBQ.L	#0x1,D1
00024eca 0c 81 00 00 00 0b        |        |		CMPI.L	#0x0000000b,D1
00024ed0 63 02                    |c       |		BLS	0x24ed4
00024ed2 4e 4f                    |NO      |		TRAP	#15
00024ed4 20 49                    | I      |		MOVEA.L	A1,A0
00024ed6 41 f0 18 00              |A       |		LEA.L	(A0+D1.L),A0
00024eda 42 28 10 ca              |B(      |		CLR.B	(A0+0x10ca)
00024ede 52 80                    |R       |		ADDQ.L	#0x1,D0
00024ee0 b0 82                    |        |		CMP.L	D2,D0
00024ee2 6f e2                    |o       |		BLE	0x24ec6
00024ee4 33 fc 00 02 00 02 d8 6a  |3      j|		MOVE.W	#0x2,0x2d86a
00024eec 33 fc 00 03 00 02 d8 6c  |3      l|		MOVE.W	#0x3,0x2d86c
00024ef4 23 fc 00 00 00 06 00 02  |#       |		MOVE.L	#0x6,0x2d86e
00024efc d8 6e                    | n      |
00024efe 23 fc 00 00 00 01 00 02  |#       |		MOVE.L	#0x1,0x2d872
00024f06 d8 72                    | r      |
00024f08 13 fc 00 69 00 02 d8 76  |   i   v|		MOVE.B	#0x69,0x2d876
00024f10 13 fc 00 66 00 02 d8 77  |   f   w|		MOVE.B	#0x66,0x2d877
00024f18 13 fc 00 5f 00 02 d8 78  |   _   x|		MOVE.B	#0x5f,0x2d878
00024f20 13 fc 00 72 00 02 d8 79  |   r   y|		MOVE.B	#0x72,0x2d879
00024f28 13 fc 00 69 00 02 d8 7a  |   i   z|		MOVE.B	#0x69,0x2d87a
00024f30 13 fc 00 70 00 02 d8 7b  |   p   {|		MOVE.B	#0x70,0x2d87b
00024f38 70 07                    |p       |		MOVEQ.L	#0x07,D0
00024f3a 22 00                    |"       |		MOVE.L	D0,D1
00024f3c 53 81                    |S       |		SUBQ.L	#0x1,D1
00024f3e 0c 81 00 00 00 0b        |        |		CMPI.L	#0x0000000b,D1
00024f44 63 02                    |c       |		BLS	0x24f48
00024f46 4e 4f                    |NO      |		TRAP	#15
00024f48 20 49                    | I      |		MOVEA.L	A1,A0
00024f4a 41 f0 18 00              |A       |		LEA.L	(A0+D1.L),A0
00024f4e 42 28 10 e2              |B(      |		CLR.B	(A0+0x10e2)
00024f52 52 80                    |R       |		ADDQ.L	#0x1,D0
00024f54 b0 82                    |        |		CMP.L	D2,D0
00024f56 6f e2                    |o       |		BLE	0x24f3a
00024f58 33 c2 00 02 d8 82        |3       |		MOVE.W	D2,0x2d882
00024f5e 33 fc 00 03 00 02 d8 84  |3       |		MOVE.W	#0x3,0x2d884
00024f66 23 fc 00 00 00 08 00 02  |#       |		MOVE.L	#0x8,0x2d886
00024f6e d8 86                    |        |
00024f70 23 fc 00 00 00 02 00 02  |#       |		MOVE.L	#0x2,0x2d88a
00024f78 d8 8a                    |        |
00024f7a 13 fc 00 69 00 02 d8 8e  |   i    |		MOVE.B	#0x69,0x2d88e
00024f82 13 fc 00 66 00 02 d8 8f  |   f    |		MOVE.B	#0x66,0x2d88f
00024f8a 13 fc 00 5f 00 02 d8 90  |   _    |		MOVE.B	#0x5f,0x2d890
00024f92 13 fc 00 65 00 02 d8 91  |   e    |		MOVE.B	#0x65,0x2d891
00024f9a 13 fc 00 74 00 02 d8 92  |   t    |		MOVE.B	#0x74,0x2d892
00024fa2 13 fc 00 68 00 02 d8 93  |   h    |		MOVE.B	#0x68,0x2d893
00024faa 70 07                    |p       |		MOVEQ.L	#0x07,D0
00024fac 22 00                    |"       |		MOVE.L	D0,D1
00024fae 53 81                    |S       |		SUBQ.L	#0x1,D1
00024fb0 0c 81 00 00 00 0b        |        |		CMPI.L	#0x0000000b,D1
00024fb6 63 02                    |c       |		BLS	0x24fba
00024fb8 4e 4f                    |NO      |		TRAP	#15
00024fba 20 49                    | I      |		MOVEA.L	A1,A0
00024fbc 41 f0 18 00              |A       |		LEA.L	(A0+D1.L),A0
00024fc0 42 28 10 fa              |B(      |		CLR.B	(A0+0x10fa)
00024fc4 52 80                    |R       |		ADDQ.L	#0x1,D0
00024fc6 b0 82                    |        |		CMP.L	D2,D0
00024fc8 6f e2                    |o       |		BLE	0x24fac
00024fca 42 79 00 02 d8 9a        |By      |		CLR.W	0x2d89a
00024fd0 42 79 00 02 d8 9c        |By      |		CLR.W	0x2d89c
00024fd6 42 b9 00 02 d8 9e        |B       |		CLR.L	0x2d89e
00024fdc 42 b9 00 02 d8 a2        |B       |		CLR.L	0x2d8a2
00024fe2 70 01                    |p       |		MOVEQ.L	#0x01,D0
00024fe4 22 00                    |"       |		MOVE.L	D0,D1
00024fe6 53 81                    |S       |		SUBQ.L	#0x1,D1
00024fe8 0c 81 00 00 00 0b        |        |		CMPI.L	#0x0000000b,D1
00024fee 63 02                    |c       |		BLS	0x24ff2
00024ff0 4e 4f                    |NO      |		TRAP	#15
00024ff2 20 49                    | I      |		MOVEA.L	A1,A0
00024ff4 41 f0 18 00              |A       |		LEA.L	(A0+D1.L),A0
00024ff8 42 28 11 12              |B(      |		CLR.B	(A0+0x1112)
00024ffc 52 80                    |R       |		ADDQ.L	#0x1,D0
00024ffe b0 82                    |        |		CMP.L	D2,D0
00025000 6f e2                    |o       |		BLE	0x24fe4
00025002 20 4a                    | J      |		MOVEA.L	A2,A0
00025004 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025006 48 78 12 30              |Hx 0    |		PEA.L	0x1230
0002500a 48 78 00 78              |Hx x    |		PEA.L	0x78
0002500e 4e ba f5 52              |N  R    |		JSR	0x24562
00025012 de c2                    |        |		ADDA.W	D2,A7
00025014 2d 7a c1 3a ff 78        |-z : x  |		MOVE.L	0x21150,(A6-0x88)
0002501a 2d 7a c1 38 ff 7c        |-z 8 |  |		MOVE.L	0x21154,(A6-0x84)
00025020 2d 7a c1 36 ff 80        |-z 6    |		MOVE.L	0x21158,(A6-0x80)
00025026 2d 7a c1 34 ff 84        |-z 4    |		MOVE.L	0x2115c,(A6-0x7c)
0002502c 02 2e 00 80 ff 7d        | .   }  |		ANDI.B	#0x80,(A6-0x83)
00025032 00 2e 00 06 ff 7d        | .   }  |		ORI.B	#0x06,(A6-0x83)
00025038 1d 7c 00 08 ff 82        | |      |		MOVE.B	#0x08,(A6-0x7e)
0002503e 02 2e 00 80 ff 83        | .      |		ANDI.B	#0x80,(A6-0x7d)
00025044 00 2e 00 03 ff 83        | .      |		ORI.B	#0x03,(A6-0x7d)
0002504a 1d 7c 00 02 ff 85        | |      |		MOVE.B	#0x02,(A6-0x7b)
00025050 1d 7c 00 02 ff 86        | |      |		MOVE.B	#0x02,(A6-0x7a)
00025056 1d 7c 00 02 ff 87        | |      |		MOVE.B	#0x02,(A6-0x79)
0002505c 2d 6e ff 78 ff 8c        |-n x    |		MOVE.L	(A6-0x88),(A6-0x74)
00025062 2d 6e ff 7c ff 90        |-n |    |		MOVE.L	(A6-0x84),(A6-0x70)
00025068 2d 6e ff 80 ff 94        |-n      |		MOVE.L	(A6-0x80),(A6-0x6c)
0002506e 2d 6e ff 84 ff 98        |-n      |		MOVE.L	(A6-0x7c),(A6-0x68)
00025074 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
0002507a 48 6e ff 8c              |Hn      |		PEA.L	(A6-0x74)
0002507e 2f 2f 00 04              |//      |		MOVE.L	(A7+0x4),-(A7)
00025082 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00025086 48 78 00 00              |Hx      |		PEA.L	0x0
0002508a 2f 2f 00 0e              |//      |		MOVE.L	(A7+0xe),-(A7)
0002508e 48 78 00 00              |Hx      |		PEA.L	0x0
00025092 4e ba d6 d2              |N       |		JSR	0x22766
00025096 de fc 00 18              |        |		ADDA.W	#0x18,A7
0002509a 3e bc 00 01              |>       |		MOVE.W	#0x1,(A7)
0002509e 48 6e ff a8              |Hn      |		PEA.L	(A6-0x58)
000250a2 4e ba d5 d2              |N       |		JSR	0x22676
000250a6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000250a8 4a 2e ff a8              |J.      |		TST.B	(A6-0x58)
000250ac 66 0a                    |f       |		BNE	0x250b8
000250ae 48 78 00 25              |Hx %    |		PEA.L	0x25
000250b2 4e ba c2 78              |N  x    |		JSR	0x2132c
000250b6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000250b8 41 f8 12 00              |A       |		LEA.L	0x1200,A0
000250bc 2f 08                    |/       |		MOVE.L	A0,-(A7)
000250be 41 f9 00 02 e1 98        |A       |		LEA.L	0x2e198,A0
000250c4 2f 08                    |/       |		MOVE.L	A0,-(A7)
000250c6 48 78 00 20              |Hx      |		PEA.L	0x20
000250ca 4e ba f4 e6              |N       |		JSR	0x245b2
000250ce de c2                    |        |		ADDA.W	D2,A7
000250d0 2a 39 00 02 e1 a0        |*9      |		MOVE.L	0x2e1a0,D5
000250d6 02 85 00 0f ff ff        |        |		ANDI.L	#0x000fffff,D5
000250dc da b9 00 02 e1 a4        |        |		ADD.L	0x2e1a4,D5
000250e2 2f 05                    |/       |		MOVE.L	D5,-(A7)
000250e4 41 f9 00 02 d0 14        |A       |		LEA.L	0x2d014,A0
000250ea 2f 08                    |/       |		MOVE.L	A0,-(A7)
000250ec 48 78 00 04              |Hx      |		PEA.L	0x4
000250f0 4e ba f4 c0              |N       |		JSR	0x245b2
000250f4 de c2                    |        |		ADDA.W	D2,A7
000250f6 41 f8 11 00              |A       |		LEA.L	0x1100,A0
000250fa 2f 08                    |/       |		MOVE.L	A0,-(A7)
000250fc 41 ee ff ae              |A       |		LEA.L	(A6-0x52),A0
00025100 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025102 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00025106 4e ba f4 aa              |N       |		JSR	0x245b2
0002510a de c2                    |        |		ADDA.W	D2,A7
0002510c 2c 2e ff c2              |,.      |		MOVE.L	(A6-0x3e),D6
00025110 02 86 00 0f ff ff        |        |		ANDI.L	#0x000fffff,D6
00025116 2f 06                    |/       |		MOVE.L	D6,-(A7)
00025118 41 ee ff ee              |A       |		LEA.L	(A6-0x12),A0
0002511c 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002511e 48 78 00 04              |Hx      |		PEA.L	0x4
00025122 4e ba f4 8e              |N       |		JSR	0x245b2
00025126 de c2                    |        |		ADDA.W	D2,A7
00025128 02 ae 00 0f ff ff ff ee  |        |		ANDI.L	#0x000fffff,(A6-0x12)
00025130 28 39 00 02 e1 a0        |(9      |		MOVE.L	0x2e1a0,D4
00025136 76 20                    |v       |		MOVEQ.L	#0x20,D3
00025138 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
0002513e 44 43                    |DC      |		NEG.W	D3
00025140 06 43 00 20              | C      |		ADDI.W	#0x0020,D3
00025144 02 43 00 1f              | C      |		ANDI.W	#0x001f,D3
00025148 48 c3                    |H       |		EXTW.L	D3
0002514a 2e 03                    |.       |		MOVE.L	D3,D7
0002514c 2d 79 00 02 e1 a0 ff f2  |-y      |		MOVE.L	0x2e1a0,(A6-0xe)
00025154 df ae ff f2              |        |		ADD.L	D7,(A6-0xe)
00025158 20 2e ff f2              | .      |		MOVE.L	(A6-0xe),D0
0002515c b0 b9 00 02 e1 a0        |        |		CMP.L	0x2e1a0,D0
00025162 67 40                    |g@      |		BEQ	0x251a4
00025164 41 ee ff f2              |A       |		LEA.L	(A6-0xe),A0
00025168 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002516a 41 f9 00 02 e1 98        |A       |		LEA.L	0x2e198,A0
00025170 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025172 50 97                    |P       |		ADDQ.L	#0x8,(A7)
00025174 48 78 00 04              |Hx      |		PEA.L	0x4
00025178 4e ba f3 e8              |N       |		JSR	0x24562
0002517c de c2                    |        |		ADDA.W	D2,A7
0002517e 2d 79 00 02 e1 a4 ff a0  |-y      |		MOVE.L	0x2e1a4,(A6-0x60)
00025186 9f ae ff a0              |        |		SUB.L	D7,(A6-0x60)
0002518a 41 ee ff a0              |A       |		LEA.L	(A6-0x60),A0
0002518e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025190 41 f9 00 02 e1 98        |A       |		LEA.L	0x2e198,A0
00025196 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025198 d5 97                    |        |		ADD.L	D2,(A7)
0002519a 48 78 00 04              |Hx      |		PEA.L	0x4
0002519e 4e ba f3 c2              |N       |		JSR	0x24562
000251a2 de c2                    |        |		ADDA.W	D2,A7
000251a4 2d 6e ff f2 ff aa        |-n      |		MOVE.L	(A6-0xe),(A6-0x56)
000251aa 41 f8 12 00              |A       |		LEA.L	0x1200,A0
000251ae 2f 08                    |/       |		MOVE.L	A0,-(A7)
000251b0 2d 5f ff a4              |-_      |		MOVE.L	(A7)+,(A6-0x5c)
000251b4 50 ae ff a4              |P       |		ADDQ.L	#0x8,(A6-0x5c)
000251b8 06 ae 00 e0 00 00 ff a4  |        |		ADDI.L	#0x00e00000,(A6-0x5c)
000251c0 48 6e ff a4              |Hn      |		PEA.L	(A6-0x5c)
000251c4 48 6e ff aa              |Hn      |		PEA.L	(A6-0x56)
000251c8 48 78 00 0b              |Hx      |		PEA.L	0xb
000251cc 48 78 00 00              |Hx      |		PEA.L	0x0
000251d0 4e ba fa 36              |N  6    |		JSR	0x24c08
000251d4 de fc 00 10              |        |		ADDA.W	#0x10,A7
000251d8 48 6e ff a4              |Hn      |		PEA.L	(A6-0x5c)
000251dc 48 6e ff aa              |Hn      |		PEA.L	(A6-0x56)
000251e0 48 78 00 0b              |Hx      |		PEA.L	0xb
000251e4 48 78 04 3a              |Hx :    |		PEA.L	0x43a
000251e8 4e ba fa 1e              |N       |		JSR	0x24c08
000251ec de fc 00 10              |        |		ADDA.W	#0x10,A7
000251f0 48 6e ff a4              |Hn      |		PEA.L	(A6-0x5c)
000251f4 48 6e ff aa              |Hn      |		PEA.L	(A6-0x56)
000251f8 48 78 00 01              |Hx      |		PEA.L	0x1
000251fc 48 78 24 32              |Hx$2    |		PEA.L	0x2432
00025200 4e ba fa 06              |N       |		JSR	0x24c08
00025204 de fc 00 10              |        |		ADDA.W	#0x10,A7
00025208 48 78 00 00              |Hx      |		PEA.L	0x0
0002520c 42 27                    |B'      |		CLR.B	-(A7)
0002520e 48 78 00 00              |Hx      |		PEA.L	0x0
00025212 42 67                    |Bg      |		CLR.W	-(A7)
00025214 4e ba fa b4              |N       |		JSR	0x24cca
00025218 de c2                    |        |		ADDA.W	D2,A7
0002521a 13 fc 00 01 00 02 c7 d4  |        |		MOVE.B	#0x01,0x2c7d4
00025222 4c df 07 ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2
00025226 4e 5e                    |N^      |		UNLK	A6
00025228 4e 75                    |Nu      |		RTS
0002522a ; --------------------------------------------------------------------------------------
0002522a ; OMSI PASCAL Function
0002522a ;    <LVAR  0x008 4(r)>
0002522a ; --------------------------------------------------------------------------------------
0002522a 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
0002522e bf d5                    |        |		CMPA.L	(A5),A7
00025230 62 06                    |b       |		BHI	0x25238
00025232 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025236 4e 76                    |Nv      |		TRAPV
00025238 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
0002523c 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
00025240 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00025244 72 2a                    |r*      |		MOVEQ.L	#0x2a,D1
00025246 9e c1                    |        |		SUBA.W	D1,A7
00025248 20 4f                    | O      |		MOVEA.L	A7,A0
0002524a 43 fa af 9e              |C       |		LEA.L	0x201ea,A1
0002524e 70 28                    |p(      |		MOVEQ.L	#0x28,D0
00025250 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025252 51 c8 ff fc              |Q       |		DBF	D0,0x25250
00025256 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025258 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002525c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00025260 3f 3c 00 29              |?< )    |		MOVE.W	#0x29,-(A7)
00025264 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002526a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002526c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00025272 de c1                    |        |		ADDA.W	D1,A7
00025274 2e 92                    |.       |		MOVE.L	(A2),(A7)
00025276 4e ba f4 ac              |N       |		JSR	0x24724
0002527a 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002527c 4e ba fb 62              |N  b    |		JSR	0x24de0
00025280 2e 92                    |.       |		MOVE.L	(A2),(A7)
00025282 4e ba f3 84              |N       |		JSR	0x24608
00025286 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025288 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
0002528c 4e 5e                    |N^      |		UNLK	A6
0002528e 4e 75                    |Nu      |		RTS
00025290 ; --------------------------------------------------------------------------------------
00025290 ; OMSI PASCAL Function
00025290 ;    <LVAR -0x004 @>
00025290 ;    <LVAR -0x04c 4(w)>
00025290 ;    <LVAR -0x050 4(w)>
00025290 ;    <LVAR -0x054 4(w)>
00025290 ;    <LVAR -0x058 @ 4(w)>
00025290 ;    <LVAR -0x0fc @>
00025290 ; --------------------------------------------------------------------------------------
00025290 4e 56 fe d6              |NV      |		LINK.W	A6,#0xfed6
00025294 bf d5                    |        |		CMPA.L	(A5),A7
00025296 62 06                    |b       |		BHI	0x2529e
00025298 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002529c 4e 76                    |Nv      |		TRAPV
0002529e de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
000252a2 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
000252a6 45 ee ff 04              |E       |		LEA.L	(A6-0xfc),A2
000252aa 72 03                    |r       |		MOVEQ.L	#0x03,D1
000252ac 20 4a                    | J      |		MOVEA.L	A2,A0
000252ae 43 fa bd c0              |C       |		LEA.L	0x21070,A1
000252b2 70 28                    |p(      |		MOVEQ.L	#0x28,D0
000252b4 30 d9                    |0       |		MOVE.W	(A1)+,(A0)+
000252b6 51 c8 ff fc              |Q       |		DBF	D0,0x252b4
000252ba 2d 7a bd 64 ff a8        |-z d    |		MOVE.L	0x21020,(A6-0x58)
000252c0 2d 7a bd 62 ff ac        |-z b    |		MOVE.L	0x21024,(A6-0x54)
000252c6 2d 7a bd 60 ff b0        |-z `    |		MOVE.L	0x21028,(A6-0x50)
000252cc 2d 7a bd 5e ff b4        |-z ^    |		MOVE.L	0x2102c,(A6-0x4c)
000252d2 48 6e ff a8              |Hn      |		PEA.L	(A6-0x58)
000252d6 20 4a                    | J      |		MOVEA.L	A2,A0
000252d8 2f 08                    |/       |		MOVE.L	A0,-(A7)
000252da 3f 01                    |?       |		MOVE.W	D1,-(A7)
000252dc 48 78 00 52              |Hx R    |		PEA.L	0x52
000252e0 20 4a                    | J      |		MOVEA.L	A2,A0
000252e2 2f 08                    |/       |		MOVE.L	A0,-(A7)
000252e4 48 78 00 52              |Hx R    |		PEA.L	0x52
000252e8 4e ba d4 7c              |N  |    |		JSR	0x22766
000252ec de fc 00 14              |        |		ADDA.W	#0x14,A7
000252f0 3e 81                    |>       |		MOVE.W	D1,(A7)
000252f2 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000252f6 4e ba d3 7e              |N  ~    |		JSR	0x22676
000252fa 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000252fc 42 39 00 02 c7 d4        |B9      |		CLR.B	0x2c7d4
00025302 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
00025306 4e 5e                    |N^      |		UNLK	A6
00025308 4e 75                    |Nu      |		RTS
0002530a ; --------------------------------------------------------------------------------------
0002530a ; OMSI PASCAL Function
0002530a ;    <LVAR -0x002 @ 1(r)>
0002530a ;    <LVAR -0x006 4(w)>
0002530a ;    <LVAR -0x00a 4(w)>
0002530a ;    <LVAR -0x00e 4(w)>
0002530a ;    <LVAR -0x012 @ 4(w)>
0002530a ;    <LVAR -0x064 @>
0002530a ; --------------------------------------------------------------------------------------
0002530a 4e 56 ff 6e              |NV n    |		LINK.W	A6,#0xff6e
0002530e bf d5                    |        |		CMPA.L	(A5),A7
00025310 62 06                    |b       |		BHI	0x25318
00025312 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025316 4e 76                    |Nv      |		TRAPV
00025318 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
0002531c 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
00025320 45 ee ff 9c              |E       |		LEA.L	(A6-0x64),A2
00025324 72 03                    |r       |		MOVEQ.L	#0x03,D1
00025326 20 4a                    | J      |		MOVEA.L	A2,A0
00025328 43 fa bd 46              |C  F    |		LEA.L	0x21070,A1
0002532c 70 28                    |p(      |		MOVEQ.L	#0x28,D0
0002532e 30 d9                    |0       |		MOVE.W	(A1)+,(A0)+
00025330 51 c8 ff fc              |Q       |		DBF	D0,0x2532e
00025334 2d 7a bc ea ff ee        |-z      |		MOVE.L	0x21020,(A6-0x12)
0002533a 2d 7a bc e8 ff f2        |-z      |		MOVE.L	0x21024,(A6-0xe)
00025340 2d 7a bc e6 ff f6        |-z      |		MOVE.L	0x21028,(A6-0xa)
00025346 2d 7a bc e4 ff fa        |-z      |		MOVE.L	0x2102c,(A6-0x6)
0002534c 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00025350 20 4a                    | J      |		MOVEA.L	A2,A0
00025352 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025354 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025356 48 78 00 52              |Hx R    |		PEA.L	0x52
0002535a 20 4a                    | J      |		MOVEA.L	A2,A0
0002535c 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002535e 48 78 00 52              |Hx R    |		PEA.L	0x52
00025362 4e ba d4 02              |N       |		JSR	0x22766
00025366 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002536a 4e ba cf 0e              |N       |		JSR	0x2227a
0002536e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025370 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00025374 4e ba d3 00              |N       |		JSR	0x22676
00025378 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002537a 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
0002537e 66 0a                    |f       |		BNE	0x2538a
00025380 48 78 00 0a              |Hx      |		PEA.L	0xa
00025384 4e ba bf a6              |N       |		JSR	0x2132c
00025388 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002538a 42 27                    |B'      |		CLR.B	-(A7)
0002538c 48 78 00 01              |Hx      |		PEA.L	0x1
00025390 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00025396 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025398 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
0002539c 4e 5e                    |N^      |		UNLK	A6
0002539e 4e 75                    |Nu      |		RTS
000253a0 ; --------------------------------------------------------------------------------------
000253a0 ; OMSI PASCAL Function
000253a0 ; --------------------------------------------------------------------------------------
000253a0 4e 56 ff a8              |NV      |		LINK.W	A6,#0xffa8
000253a4 bf d5                    |        |		CMPA.L	(A5),A7
000253a6 62 06                    |b       |		BHI	0x253ae
000253a8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000253ac 4e 76                    |Nv      |		TRAPV
000253ae de fc 00 58              |   X    |		ADDA.W	#0x58,A7
000253b2 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000253b6 9e fc 00 3c              |   <    |		SUBA.W	#0x3c,A7
000253ba 20 4f                    | O      |		MOVEA.L	A7,A0
000253bc 43 fa ae e4              |C       |		LEA.L	0x202a2,A1
000253c0 70 3a                    |p:      |		MOVEQ.L	#0x3a,D0
000253c2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000253c4 51 c8 ff fc              |Q       |		DBF	D0,0x253c2
000253c8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000253ca 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000253ce 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000253d2 3f 3c 00 3b              |?< ;    |		MOVE.W	#0x3b,-(A7)
000253d6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000253dc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000253de 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000253e4 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
000253e8 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
000253ec 4e 5e                    |N^      |		UNLK	A6
000253ee 4e 75                    |Nu      |		RTS
000253f0 ; --------------------------------------------------------------------------------------
000253f0 ; OMSI PASCAL Function
000253f0 ; --------------------------------------------------------------------------------------
000253f0 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
000253f4 bf d5                    |        |		CMPA.L	(A5),A7
000253f6 62 06                    |b       |		BHI	0x253fe
000253f8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000253fc 4e 76                    |Nv      |		TRAPV
000253fe de fc 00 32              |   2    |		ADDA.W	#0x32,A7
00025402 48 e7 c0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D1+D0,-(A7)
00025406 43 f9 00 02 cc 12        |C       |		LEA.L	0x2cc12,A1
0002540c 45 f9 00 02 c8 02        |E       |		LEA.L	0x2c802,A2
00025412 47 f9 00 02 c8 12        |G       |		LEA.L	0x2c812,A3
00025418 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002541a 4a 11                    |J       |		TST.B	(A1)
0002541c 67 0a                    |g       |		BEQ	0x25428
0002541e 48 78 00 05              |Hx      |		PEA.L	0x5
00025422 4e ba bf 08              |N       |		JSR	0x2132c
00025426 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025428 24 ba bd f2              |$       |		MOVE.L	0x2121c,(A2)
0002542c 23 fa bd f2 00 02 c8 06  |#       |		MOVE.L	0x21220,0x2c806
00025434 23 fa bd ee 00 02 c8 0a  |#       |		MOVE.L	0x21224,0x2c80a
0002543c 23 fa bd ea 00 02 c8 0e  |#       |		MOVE.L	0x21228,0x2c80e
00025444 42 80                    |B       |		CLR.L	D0
00025446 30 39 00 02 d4 32        |09   2  |		MOVE.W	0x2d432,D0
0002544c d0 b9 00 02 d4 2e        |     .  |		ADD.L	0x2d42e,D0
00025452 2f 00                    |/       |		MOVE.L	D0,-(A7)
00025454 42 67                    |Bg      |		CLR.W	-(A7)
00025456 3f 3c 02 00              |?<      |		MOVE.W	#0x200,-(A7)
0002545a 4e b9 00 01 02 36        |N    6  |		JSR	KERNCALL_1b
00025460 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025462 48 52                    |HR      |		PEA.L	(A2)
00025464 20 4b                    | K      |		MOVEA.L	A3,A0
00025466 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025468 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002546a 48 78 00 00              |Hx      |		PEA.L	0x0
0002546e 20 4b                    | K      |		MOVEA.L	A3,A0
00025470 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025472 48 78 04 00              |Hx      |		PEA.L	0x400
00025476 4e ba d2 ee              |N       |		JSR	0x22766
0002547a de fc 00 16              |        |		ADDA.W	#0x16,A7
0002547e 12 81                    |        |		MOVE.B	D1,(A1)
00025480 4c df 0f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3
00025484 4e 5e                    |N^      |		UNLK	A6
00025486 4e 75                    |Nu      |		RTS
00025488 ; --------------------------------------------------------------------------------------
00025488 ; OMSI PASCAL Function
00025488 ;    <LVAR  0x008 4(r)>
00025488 ;    <LVAR -0x002 @ 1(r)>
00025488 ;    <LVAR -0x00c @ 1(r)>
00025488 ; --------------------------------------------------------------------------------------
00025488 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8		; Spelunked
0002548c bf d5                    |        |		CMPA.L	(A5),A7
0002548e 62 06                    |b       |		BHI	0x25496
00025490 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025494 4e 76                    |Nv      |		TRAPV
00025496 de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
0002549a 48 e7 fb 80              |H       |		MOVEM.L	A0+D7+D6+D4+D3+D2+D1+D0,-(A7)
0002549e 41 f9 00 02 cc 12        |A       |		LEA.L	0x2cc12,A0
000254a4 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
000254a6 74 01                    |t       |		MOVEQ.L	#0x01,D2
000254a8 4a 10                    |J       |		TST.B	(A0)
000254aa 66 0a                    |f       |		BNE	0x254b6
000254ac 48 78 00 06              |Hx      |		PEA.L	0x6
000254b0 4e ba be 7a              |N  z    |		JSR	0x2132c
000254b4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000254b6 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
000254ba b0 81                    |        |		CMP.L	D1,D0
000254bc 6f 0e                    |o       |		BLE	0x254cc
000254be 28 00                    |(       |		MOVE.L	D0,D4
000254c0 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
000254c2 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
000254c8 2c 04                    |,       |		MOVE.L	D4,D6
000254ca 60 02                    |`       |		BRA	0x254ce
000254cc 7c 01                    ||       |		MOVEQ.L	#0x01,D6
000254ce 2f 06                    |/       |		MOVE.L	D6,-(A7)
000254d0 7e 01                    |~       |		MOVEQ.L	#0x01,D7
000254d2 be 97                    |        |		CMP.L	(A7),D7
000254d4 6e 6e                    |nn      |		BGT	0x25544
000254d6 48 78 01 86              |Hx      |		PEA.L	0x186
000254da 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
000254e0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000254e2 3e 82                    |>       |		MOVE.W	D2,(A7)
000254e4 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
000254e8 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
000254ec 4e ba ce dc              |N       |		JSR	0x223ca
000254f0 de c1                    |        |		ADDA.W	D1,A7
000254f2 4a 2e ff f4              |J.      |		TST.B	(A6-0xc)
000254f6 67 48                    |gH      |		BEQ	0x25540
000254f8 42 10                    |B       |		CLR.B	(A0)
000254fa 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
000254fe 66 2a                    |f*      |		BNE	0x2552a
00025500 2f 39 00 02 c8 0e        |/9      |		MOVE.L	0x2c80e,-(A7)
00025506 2f 39 00 02 c8 0a        |/9      |		MOVE.L	0x2c80a,-(A7)
0002550c 2f 39 00 02 c8 06        |/9      |		MOVE.L	0x2c806,-(A7)
00025512 2f 39 00 02 c8 02        |/9      |		MOVE.L	0x2c802,-(A7)
00025518 4e ba ce 32              |N  2    |		JSR	0x2234c
0002551c de fc 00 10              |        |		ADDA.W	#0x10,A7
00025520 48 78 00 15              |Hx      |		PEA.L	0x15
00025524 4e ba be 06              |N       |		JSR	0x2132c
00025528 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002552a 10 39 00 02 d0 2c        | 9   ,  |		MOVE.B	0x2d02c,D0
00025530 b0 02                    |        |		CMP.B	D2,D0
00025532 6e 04                    |n       |		BGT	0x25538
00025534 4e ba c8 5a              |N  Z    |		JSR	0x21d90
00025538 4e ba cb be              |N       |		JSR	0x220f8
0002553c 4e ba fe b2              |N       |		JSR	0x253f0
00025540 52 87                    |R       |		ADDQ.L	#0x1,D7
00025542 68 8e                    |h       |		BVC	0x254d2
00025544 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025546 4c df 01 df              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D6+D7+A0
0002554a 4e 5e                    |N^      |		UNLK	A6
0002554c 4e 75                    |Nu      |		RTS
0002554e ; --------------------------------------------------------------------------------------
0002554e ; OMSI PASCAL Function
0002554e ;    <LVAR  0x008 4(r)>
0002554e ;    <LVAR -0x002 @ 1(r)>
0002554e ;    <LVAR -0x00c @ 1(r)>
0002554e ; --------------------------------------------------------------------------------------
0002554e 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
00025552 bf d5                    |        |		CMPA.L	(A5),A7
00025554 62 06                    |b       |		BHI	0x2555c
00025556 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002555a 4e 76                    |Nv      |		TRAPV
0002555c de fc 00 38              |   8    |		ADDA.W	#0x38,A7
00025560 48 e7 db e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D4+D3+D1+D0,-(A7)
00025564 41 ee ff f4              |A       |		LEA.L	(A6-0xc),A0
00025568 43 f9 00 02 cc 12        |C       |		LEA.L	0x2cc12,A1
0002556e 45 fa bd bc              |E       |		LEA.L	0x2132c,A2
00025572 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
00025574 4a 11                    |J       |		TST.B	(A1)
00025576 66 08                    |f       |		BNE	0x25580
00025578 48 78 00 07              |Hx      |		PEA.L	0x7
0002557c 4e 92                    |N       |		JSR	(A2)
0002557e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025580 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00025584 b0 81                    |        |		CMP.L	D1,D0
00025586 6f 0e                    |o       |		BLE	0x25596
00025588 28 00                    |(       |		MOVE.L	D0,D4
0002558a 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
0002558c 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00025592 2c 04                    |,       |		MOVE.L	D4,D6
00025594 60 02                    |`       |		BRA	0x25598
00025596 7c 01                    ||       |		MOVEQ.L	#0x01,D6
00025598 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002559a 42 10                    |B       |		CLR.B	(A0)
0002559c 48 78 01 86              |Hx      |		PEA.L	0x186
000255a0 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
000255a6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000255a8 3e bc 00 01              |>       |		MOVE.W	#0x1,(A7)
000255ac 48 50                    |HP      |		PEA.L	(A0)
000255ae 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
000255b2 4e ba ce 16              |N       |		JSR	0x223ca
000255b6 de c1                    |        |		ADDA.W	D1,A7
000255b8 4a 10                    |J       |		TST.B	(A0)
000255ba 67 30                    |g0      |		BEQ	0x255ec
000255bc 42 11                    |B       |		CLR.B	(A1)
000255be 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
000255c2 66 28                    |f(      |		BNE	0x255ec
000255c4 2f 39 00 02 c8 0e        |/9      |		MOVE.L	0x2c80e,-(A7)
000255ca 2f 39 00 02 c8 0a        |/9      |		MOVE.L	0x2c80a,-(A7)
000255d0 2f 39 00 02 c8 06        |/9      |		MOVE.L	0x2c806,-(A7)
000255d6 2f 39 00 02 c8 02        |/9      |		MOVE.L	0x2c802,-(A7)
000255dc 4e ba cd 6e              |N  n    |		JSR	0x2234c
000255e0 de fc 00 10              |        |		ADDA.W	#0x10,A7
000255e4 48 78 00 16              |Hx      |		PEA.L	0x16
000255e8 4e 92                    |N       |		JSR	(A2)
000255ea 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000255ec 52 87                    |R       |		ADDQ.L	#0x1,D7
000255ee 4a 10                    |J       |		TST.B	(A0)
000255f0 66 04                    |f       |		BNE	0x255f6
000255f2 be 86                    |        |		CMP.L	D6,D7
000255f4 66 a6                    |f       |		BNE	0x2559c
000255f6 4a 10                    |J       |		TST.B	(A0)
000255f8 66 08                    |f       |		BNE	0x25602
000255fa 48 78 00 09              |Hx      |		PEA.L	0x9
000255fe 4e 92                    |N       |		JSR	(A2)
00025600 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025602 4c df 07 db              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D6+D7+A0+A1+A2
00025606 4e 5e                    |N^      |		UNLK	A6
00025608 4e 75                    |Nu      |		RTS
0002560a ; --------------------------------------------------------------------------------------
0002560a ; OMSI PASCAL Function
0002560a ;    <LVAR  0x00e 4(r)>
0002560a ;    <LVAR  0x00c 2(r)>
0002560a ;    <LVAR  0x008 4(r)>
0002560a ;    <LVAR -0x006 @ 4(rw)>
0002560a ;    <LVAR -0x008 @ 1(r)>
0002560a ;    <LVAR -0x012 @ 1(r)>
0002560a ; --------------------------------------------------------------------------------------
0002560a 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
0002560e bf d5                    |        |		CMPA.L	(A5),A7
00025610 62 06                    |b       |		BHI	0x25618
00025612 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025616 4e 76                    |Nv      |		TRAPV
00025618 de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
0002561c 48 e7 df f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D1+D0,-(A7)
00025620 43 ee ff fa              |C       |		LEA.L	(A6-0x6),A1
00025624 45 fa bd 06              |E       |		LEA.L	0x2132c,A2
00025628 47 f9 00 02 c7 94        |G       |		LEA.L	0x2c794,A3
0002562e 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
00025630 20 2e 00 0e              | .      |		MOVE.L	(A6+0xe),D0
00025634 b0 81                    |        |		CMP.L	D1,D0
00025636 6f 0e                    |o       |		BLE	0x25646
00025638 28 00                    |(       |		MOVE.L	D0,D4
0002563a 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
0002563c 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00025642 2a 04                    |*       |		MOVE.L	D4,D5
00025644 60 02                    |`       |		BRA	0x25648
00025646 7a 01                    |z       |		MOVEQ.L	#0x01,D5
00025648 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002564a 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002564c 48 78 01 86              |Hx      |		PEA.L	0x186
00025650 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
00025656 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00025658 3e bc 00 01              |>       |		MOVE.W	#0x1,(A7)
0002565c 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00025660 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00025664 4e ba cd 64              |N  d    |		JSR	0x223ca
00025668 de c1                    |        |		ADDA.W	D1,A7
0002566a 4a 2e ff ee              |J.      |		TST.B	(A6-0x12)
0002566e 67 00 00 8e              |g       |		BEQ	0x256fe
00025672 42 39 00 02 cc 12        |B9      |		CLR.B	0x2cc12
00025678 42 91                    |B       |		CLR.L	(A1)
0002567a 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
0002567e 66 08                    |f       |		BNE	0x25688
00025680 48 78 00 04              |Hx      |		PEA.L	0x4
00025684 4e 92                    |N       |		JSR	(A2)
00025686 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025688 20 11                    |        |		MOVE.L	(A1),D0
0002568a 58 80                    |X       |		ADDQ.L	#0x4,D0
0002568c 0c 80 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D0
00025692 63 02                    |c       |		BLS	0x25696
00025694 4e 4f                    |NO      |		TRAP	#15
00025696 e3 80                    |        |		ASL.L	#0x1,D0
00025698 20 4b                    | K      |		MOVEA.L	A3,A0
0002569a 30 30 08 7e              |00 ~    |		MOVE.W	(A0+D0.L+#0x7e),D0
0002569e e0 48                    | H      |		LSR.W	#0x8,D0
000256a0 b0 6e 00 0c              | n      |		CMP.W	(A6+0xc),D0
000256a4 66 30                    |f0      |		BNE	0x256d6
000256a6 7e 01                    |~       |		MOVEQ.L	#0x01,D7
000256a8 20 11                    |        |		MOVE.L	(A1),D0
000256aa 0c 80 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D0
000256b0 63 02                    |c       |		BLS	0x256b4
000256b2 4e 4f                    |NO      |		TRAP	#15
000256b4 e3 80                    |        |		ASL.L	#0x1,D0
000256b6 20 4b                    | K      |		MOVEA.L	A3,A0
000256b8 41 f0 08 7e              |A  ~    |		LEA.L	(A0+D0.L+#0x7e),A0
000256bc 2f 08                    |/       |		MOVE.L	A0,-(A7)
000256be 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000256c2 3f 3c 00 3c              |?< <    |		MOVE.W	#0x3c,-(A7)
000256c6 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000256cc de c1                    |        |		ADDA.W	D1,A7
000256ce 06 91 00 00 00 1e        |        |		ADDI.L	#0x0000001e,(A1)
000256d4 60 16                    |`       |		BRA	0x256ec
000256d6 0c 40 00 64              | @ d    |		CMPI.W	#0x0064,D0
000256da 66 08                    |f       |		BNE	0x256e4
000256dc 48 51                    |HQ      |		PEA.L	(A1)
000256de 4e ba c8 dc              |N       |		JSR	0x21fbc
000256e2 60 06                    |`       |		BRA	0x256ea
000256e4 48 78 00 08              |Hx      |		PEA.L	0x8
000256e8 4e 92                    |N       |		JSR	(A2)
000256ea 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000256ec 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000256ee 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000256f0 4e ba c6 5c              |N  \    |		JSR	0x21d4e
000256f4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000256f6 4a 1f                    |J       |		TST.B	(A7)+
000256f8 67 8e                    |g       |		BEQ	0x25688
000256fa 4e ba fc f4              |N       |		JSR	0x253f0
000256fe 52 86                    |R       |		ADDQ.L	#0x1,D6
00025700 4a 07                    |J       |		TST.B	D7
00025702 66 06                    |f       |		BNE	0x2570a
00025704 bc 85                    |        |		CMP.L	D5,D6
00025706 66 00 ff 44              |f  D    |		BNE	0x2564c
0002570a 4a 07                    |J       |		TST.B	D7
0002570c 66 08                    |f       |		BNE	0x25716
0002570e 48 78 00 09              |Hx      |		PEA.L	0x9
00025712 4e 92                    |N       |		JSR	(A2)
00025714 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025716 4c df 0f fb              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D5+D6+D7+A0+A1+A2+A3
0002571a 4e 5e                    |N^      |		UNLK	A6
0002571c 4e 75                    |Nu      |		RTS
0002571e ; --------------------------------------------------------------------------------------
0002571e ; OMSI PASCAL Function
0002571e ;    <LVAR -0x004 2(w)>
0002571e ;    <LVAR -0x006 2(w) 4(rw)>
0002571e ;    <LVAR -0x00a 4(rw)>
0002571e ;    <LVAR -0x00e 4(rw)>
0002571e ;    <LVAR -0x012 @ 4(rw)>
0002571e ;    <LVAR -0x014 @ 1(r)>
0002571e ; --------------------------------------------------------------------------------------
0002571e 4e 56 ff a0              |NV      |		LINK.W	A6,#0xffa0
00025722 bf d5                    |        |		CMPA.L	(A5),A7
00025724 62 06                    |b       |		BHI	0x2572c
00025726 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002572a 4e 76                    |Nv      |		TRAPV
0002572c de fc 00 4c              |   L    |		ADDA.W	#0x4c,A7
00025730 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
00025734 45 ee ff ee              |E       |		LEA.L	(A6-0x12),A2
00025738 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
0002573c 49 f8 00 00              |I       |		LEA.L	0x0,A4
00025740 72 01                    |r       |		MOVEQ.L	#0x01,D1
00025742 74 18                    |t       |		MOVEQ.L	#0x18,D2
00025744 76 03                    |v       |		MOVEQ.L	#0x03,D3
00025746 78 10                    |x       |		MOVEQ.L	#0x10,D4
00025748 9e fc 00 12              |        |		SUBA.W	#0x12,A7
0002574c 20 4f                    | O      |		MOVEA.L	A7,A0
0002574e 43 fa b3 c8              |C       |		LEA.L	0x20b18,A1
00025752 70 10                    |p       |		MOVEQ.L	#0x10,D0
00025754 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025756 51 c8 ff fc              |Q       |		DBF	D0,0x25754
0002575a 1f 01                    |        |		MOVE.B	D1,-(A7)
0002575c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002575e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025762 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025764 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
00025768 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002576e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025770 4e ba ca c6              |N       |		JSR	0x22238
00025774 de c2                    |        |		ADDA.W	D2,A7
00025776 24 ba b8 c8              |$       |		MOVE.L	0x21040,(A2)
0002577a 2d 7a b8 c8 ff f2        |-z      |		MOVE.L	0x21044,(A6-0xe)
00025780 2d 7a b8 c6 ff f6        |-z      |		MOVE.L	0x21048,(A6-0xa)
00025786 26 ba b8 c4              |&       |		MOVE.L	0x2104c,(A3)
0002578a 36 bc 01 01              |6       |		MOVE.W	#0x101,(A3)
0002578e 3d 79 00 02 e1 b8 ff fc  |=y      |		MOVE.W	0x2e1b8,(A6-0x4)
00025796 48 54                    |HT      |		PEA.L	(A4)
00025798 48 52                    |HR      |		PEA.L	(A2)
0002579a 2f 2f 00 04              |//      |		MOVE.L	(A7+0x4),-(A7)
0002579e 3f 03                    |?       |		MOVE.W	D3,-(A7)
000257a0 48 54                    |HT      |		PEA.L	(A4)
000257a2 2f 2f 00 0e              |//      |		MOVE.L	(A7+0xe),-(A7)
000257a6 48 54                    |HT      |		PEA.L	(A4)
000257a8 4e ba cf bc              |N       |		JSR	0x22766
000257ac de c2                    |        |		ADDA.W	D2,A7
000257ae 3e 83                    |>       |		MOVE.W	D3,(A7)
000257b0 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
000257b4 4e ba ce c0              |N       |		JSR	0x22676
000257b8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000257ba 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
000257be 66 3c                    |f<      |		BNE	0x257fc
000257c0 41 fa b3 76              |A  v    |		LEA.L	0x20b38,A0
000257c4 70 06                    |p       |		MOVEQ.L	#0x06,D0
000257c6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000257c8 51 c8 ff fc              |Q       |		DBF	D0,0x257c6
000257cc 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
000257d0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000257d2 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000257d6 3f 01                    |?       |		MOVE.W	D1,-(A7)
000257d8 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
000257dc 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000257e2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000257e4 4e ba ca 52              |N  R    |		JSR	0x22238
000257e8 de c4                    |        |		ADDA.W	D4,A7
000257ea 2e 93                    |.       |		MOVE.L	(A3),(A7)
000257ec 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
000257f0 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
000257f4 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000257f6 4e ba cb 54              |N  T    |		JSR	0x2234c
000257fa de c4                    |        |		ADDA.W	D4,A7
000257fc 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
00025800 4e 5e                    |N^      |		UNLK	A6
00025802 4e 75                    |Nu      |		RTS
00025804 ; --------------------------------------------------------------------------------------
00025804 ; OMSI PASCAL Function
00025804 ;    <LVAR  0x00c 4(w)>
00025804 ;    <LVAR  0x008 4(r)>
00025804 ;    <LVAR -0x003 @ 1(r)>
00025804 ;    <LVAR -0x004 @ 1(r)>
00025804 ;    <LVAR -0x008 @ 4(rw)>
00025804 ; --------------------------------------------------------------------------------------
00025804 4e 56 ff 82              |NV      |		LINK.W	A6,#0xff82
00025808 bf d5                    |        |		CMPA.L	(A5),A7
0002580a 62 06                    |b       |		BHI	0x25812
0002580c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025810 4e 76                    |Nv      |		TRAPV
00025812 de fc 00 66              |   f    |		ADDA.W	#0x66,A7
00025816 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002581a 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
0002581e 47 f9 00 02 e1 c6        |G       |		LEA.L	0x2e1c6,A3
00025824 49 f9 00 02 d0 18        |I       |		LEA.L	0x2d018,A4
0002582a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002582c 1e ba b3 0a              |        |		MOVE.B	0x20b38,(A7)
00025830 1f 7a b3 07 00 01        | z      |		MOVE.B	0x20b39,(A7+0x1)
00025836 1f 7a b3 02 00 02        | z      |		MOVE.B	0x20b3a,(A7+0x2)
0002583c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00025840 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025842 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00025846 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002584a 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
0002584e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00025854 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025856 42 17                    |B       |		CLR.B	(A7)
00025858 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002585c 48 52                    |HR      |		PEA.L	(A2)
0002585e 4e ba c4 8e              |N       |		JSR	0x21cee
00025862 de fc 00 14              |        |		ADDA.W	#0x14,A7
00025866 3e ba b2 d4              |>       |		MOVE.W	0x20b3c,(A7)
0002586a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002586e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025870 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00025874 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00025878 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
0002587c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00025882 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025884 1e bc 00 01              |        |		MOVE.B	#0x01,(A7)
00025888 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
0002588c 48 52                    |HR      |		PEA.L	(A2)
0002588e 4e ba c4 5e              |N  ^    |		JSR	0x21cee
00025892 de fc 00 14              |        |		ADDA.W	#0x14,A7
00025896 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
0002589a 67 0e                    |g       |		BEQ	0x258aa
0002589c 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
000258a0 67 00 00 fa              |g       |		BEQ	0x2599c
000258a4 4a 13                    |J       |		TST.B	(A3)
000258a6 66 00 00 f4              |f       |		BNE	0x2599c
000258aa 4a 2e ff fd              |J.      |		TST.B	(A6-0x3)
000258ae 67 06                    |g       |		BEQ	0x258b6
000258b0 42 2e ff fd              |B.      |		CLR.B	(A6-0x3)
000258b4 60 36                    |`6      |		BRA	0x258ec
000258b6 9e fc 00 1e              |        |		SUBA.W	#0x1e,A7
000258ba 20 4f                    | O      |		MOVEA.L	A7,A0
000258bc 43 fa b2 80              |C       |		LEA.L	0x20b3e,A1
000258c0 70 1c                    |p       |		MOVEQ.L	#0x1c,D0
000258c2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000258c4 51 c8 ff fc              |Q       |		DBF	D0,0x258c2
000258c8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000258ca 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000258ce 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000258d2 3f 3c 00 1d              |?<      |		MOVE.W	#0x1d,-(A7)
000258d6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000258dc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000258de 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
000258e4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000258e6 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
000258e8 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000258ec 42 94                    |B       |		CLR.L	(A4)
000258ee 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000258f0 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000258f2 2a 3c 01 00 00 00        |*<      |		MOVE.L	#0x1000000,D5
000258f8 42 27                    |B'      |		CLR.B	-(A7)
000258fa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000258fc 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000258fe 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00025904 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025906 4e ba c9 30              |N  0    |		JSR	0x22238
0002590a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002590c 20 52                    | R      |		MOVEA.L	(A2),A0
0002590e 30 10                    |0       |		MOVE.W	(A0),D0
00025910 48 c0                    |H       |		EXTW.L	D0
00025912 2f 00                    |/       |		MOVE.L	D0,-(A7)
00025914 70 01                    |p       |		MOVEQ.L	#0x01,D0
00025916 b0 97                    |        |		CMP.L	(A7),D0
00025918 6e 58                    |nX      |		BGT	0x25972
0002591a 20 52                    | R      |		MOVEA.L	(A2),A0
0002591c 22 00                    |"       |		MOVE.L	D0,D1
0002591e 53 81                    |S       |		SUBQ.L	#0x1,D1
00025920 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
00025926 63 02                    |c       |		BLS	0x2592a
00025928 4e 4f                    |NO      |		TRAP	#15
0002592a 14 30 18 02              | 0      |		MOVE.B	(A0+D1.L+#0x2),D2
0002592e 0c 02 00 2e              |   .    |		CMPI.B	#0x2e,D2
00025932 66 22                    |f"      |		BNE	0x25956
00025934 52 86                    |R       |		ADDQ.L	#0x1,D6
00025936 28 05                    |(       |		MOVE.L	D5,D4
00025938 26 07                    |&       |		MOVE.L	D7,D3
0002593a 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00025940 d9 94                    |        |		ADD.L	D4,(A4)
00025942 28 05                    |(       |		MOVE.L	D5,D4
00025944 26 3c 00 00 01 00        |&<      |		MOVE.L	#0x100,D3
0002594a 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00025950 2a 04                    |*       |		MOVE.L	D4,D5
00025952 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00025954 60 18                    |`       |		BRA	0x2596e
00025956 28 07                    |(       |		MOVE.L	D7,D4
00025958 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
0002595a 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00025960 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025962 1f 02                    |        |		MOVE.B	D2,-(A7)
00025964 4e ba ba 22              |N  "    |		JSR	0x21388
00025968 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002596a 2e 04                    |.       |		MOVE.L	D4,D7
0002596c de 9f                    |        |		ADD.L	(A7)+,D7
0002596e 52 80                    |R       |		ADDQ.L	#0x1,D0
00025970 68 a4                    |h       |		BVC	0x25916
00025972 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025974 28 05                    |(       |		MOVE.L	D5,D4
00025976 26 07                    |&       |		MOVE.L	D7,D3
00025978 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
0002597e d9 94                    |        |		ADD.L	D4,(A4)
00025980 42 13                    |B       |		CLR.B	(A3)
00025982 0c 86 00 00 00 03        |        |		CMPI.L	#0x00000003,D6
00025988 66 02                    |f       |		BNE	0x2598c
0002598a 52 13                    |R       |		ADDQ.B	#0x1,(A3)
0002598c 48 52                    |HR      |		PEA.L	(A2)
0002598e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00025994 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025996 4a 13                    |J       |		TST.B	(A3)
00025998 67 00 ff 10              |g       |		BEQ	0x258aa
0002599c 2d 54 00 0c              |-T      |		MOVE.L	(A4),(A6+0xc)
000259a0 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000259a4 4e 5e                    |N^      |		UNLK	A6
000259a6 4e 75                    |Nu      |		RTS
000259a8 ; --------------------------------------------------------------------------------------
000259a8 ; OMSI PASCAL Function
000259a8 ;    <LVAR  0x008 4(r)>
000259a8 ;    <LVAR -0x006 4(rw)>
000259a8 ;    <LVAR -0x00a 4(rw)>
000259a8 ;    <LVAR -0x00e 4(rw)>
000259a8 ;    <LVAR -0x012 @ 2(r) 4(rw)>
000259a8 ;    <LVAR -0x014 @ 1(r)>
000259a8 ;    <LVAR -0x047 1(r)>
000259a8 ;    <LVAR -0x050 @>
000259a8 ;    <LVAR -0x068 4(w)>
000259a8 ;    <LVAR -0x076 2(w)>
000259a8 ;    <LVAR -0x078 @>
000259a8 ; --------------------------------------------------------------------------------------
000259a8 4e 56 ff 2a              |NV *    |		LINK.W	A6,#0xff2a
000259ac bf d5                    |        |		CMPA.L	(A5),A7
000259ae 62 06                    |b       |		BHI	0x259b6
000259b0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000259b4 4e 76                    |Nv      |		TRAPV
000259b6 de fc 00 5e              |   ^    |		ADDA.W	#0x5e,A7
000259ba 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
000259be 45 ee ff ee              |E       |		LEA.L	(A6-0x12),A2
000259c2 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
000259c8 49 fa c8 6e              |I  n    |		LEA.L	0x22238,A4
000259cc 72 01                    |r       |		MOVEQ.L	#0x01,D1
000259ce 74 14                    |t       |		MOVEQ.L	#0x14,D2
000259d0 76 03                    |v       |		MOVEQ.L	#0x03,D3
000259d2 78 04                    |x       |		MOVEQ.L	#0x04,D4
000259d4 7a 10                    |z       |		MOVEQ.L	#0x10,D5
000259d6 9e c2                    |        |		SUBA.W	D2,A7
000259d8 20 4f                    | O      |		MOVEA.L	A7,A0
000259da 43 fa b1 80              |C       |		LEA.L	0x20b5c,A1
000259de 70 12                    |p       |		MOVEQ.L	#0x12,D0
000259e0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000259e2 51 c8 ff fc              |Q       |		DBF	D0,0x259e0
000259e6 1f 01                    |        |		MOVE.B	D1,-(A7)
000259e8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000259ea 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000259ee 3f 01                    |?       |		MOVE.W	D1,-(A7)
000259f0 3f 3c 00 13              |?<      |		MOVE.W	#0x13,-(A7)
000259f4 4e 93                    |N       |		JSR	(A3)
000259f6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000259f8 4e 94                    |N       |		JSR	(A4)
000259fa de fc 00 1a              |        |		ADDA.W	#0x1a,A7
000259fe 41 ee ff 88              |A       |		LEA.L	(A6-0x78),A0
00025a02 43 fa b8 28              |C  (    |		LEA.L	0x2122c,A1
00025a06 70 09                    |p       |		MOVEQ.L	#0x09,D0
00025a08 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
00025a0a 51 c8 ff fc              |Q       |		DBF	D0,0x25a08
00025a0e 3d 79 00 02 e1 b8 ff 8a  |=y      |		MOVE.W	0x2e1b8,(A6-0x76)
00025a16 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025a18 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00025a1c 4e ba fd e6              |N       |		JSR	0x25804
00025a20 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025a22 2d 5f ff 98              |-_      |		MOVE.L	(A7)+,(A6-0x68)
00025a26 24 ba b6 08              |$       |		MOVE.L	0x21030,(A2)
00025a2a 2d 7a b6 08 ff f2        |-z      |		MOVE.L	0x21034,(A6-0xe)
00025a30 2d 7a b6 06 ff f6        |-z      |		MOVE.L	0x21038,(A6-0xa)
00025a36 2d 7a b6 04 ff fa        |-z      |		MOVE.L	0x2103c,(A6-0x6)
00025a3c 48 52                    |HR      |		PEA.L	(A2)
00025a3e 41 ee ff 88              |A       |		LEA.L	(A6-0x78),A0
00025a42 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025a44 3f 03                    |?       |		MOVE.W	D3,-(A7)
00025a46 48 78 00 28              |Hx (    |		PEA.L	0x28
00025a4a 41 ee ff b0              |A       |		LEA.L	(A6-0x50),A0
00025a4e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025a50 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00025a54 4e ba cd 10              |N       |		JSR	0x22766
00025a58 de c2                    |        |		ADDA.W	D2,A7
00025a5a 3e 83                    |>       |		MOVE.W	D3,(A7)
00025a5c 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00025a60 4e ba cc 14              |N       |		JSR	0x22676
00025a64 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025a66 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
00025a6a 66 3c                    |f<      |		BNE	0x25aa8
00025a6c 2f 3a b1 0e              |/:      |		MOVE.L	0x20b7c,-(A7)
00025a70 2f 3a b1 06              |/:      |		MOVE.L	0x20b78,-(A7)
00025a74 2f 3a b0 fe              |/:      |		MOVE.L	0x20b74,-(A7)
00025a78 2f 3a b0 f6              |/:      |		MOVE.L	0x20b70,-(A7)
00025a7c 1f 04                    |        |		MOVE.B	D4,-(A7)
00025a7e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025a80 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025a84 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025a86 3f 05                    |?       |		MOVE.W	D5,-(A7)
00025a88 4e 93                    |N       |		JSR	(A3)
00025a8a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025a8c 4e 94                    |N       |		JSR	(A4)
00025a8e de fc 00 12              |        |		ADDA.W	#0x12,A7
00025a92 2e ae ff fa              |.       |		MOVE.L	(A6-0x6),(A7)
00025a96 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
00025a9a 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
00025a9e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00025aa0 4e ba c8 aa              |N       |		JSR	0x2234c
00025aa4 de c5                    |        |		ADDA.W	D5,A7
00025aa6 60 62                    |`b      |		BRA	0x25b0a
00025aa8 30 12                    |0       |		MOVE.W	(A2),D0
00025aaa 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00025aae 66 16                    |f       |		BNE	0x25ac6
00025ab0 48 78 13 88              |Hx      |		PEA.L	0x1388
00025ab4 3f 3c 00 34              |?< 4    |		MOVE.W	#0x34,-(A7)
00025ab8 41 ee ff b0              |A       |		LEA.L	(A6-0x50),A0
00025abc 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025abe 4e ba fb 4a              |N  J    |		JSR	0x2560a
00025ac2 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00025ac6 4a 2e ff b9              |J.      |		TST.B	(A6-0x47)
00025aca 67 3e                    |g>      |		BEQ	0x25b0a
00025acc 41 fa b0 d2              |A       |		LEA.L	0x20ba0,A0
00025ad0 70 07                    |p       |		MOVEQ.L	#0x07,D0
00025ad2 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00025ad4 51 c8 ff fc              |Q       |		DBF	D0,0x25ad2
00025ad8 1f 04                    |        |		MOVE.B	D4,-(A7)
00025ada 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025adc 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025ae0 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025ae2 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
00025ae6 4e 93                    |N       |		JSR	(A3)
00025ae8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025aea 4e 94                    |N       |		JSR	(A4)
00025aec de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00025af0 41 ee ff b0              |A       |		LEA.L	(A6-0x50),A0
00025af4 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025af6 48 78 00 28              |Hx (    |		PEA.L	0x28
00025afa 4e ba ba 9e              |N       |		JSR	0x2159a
00025afe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025b00 48 78 00 0b              |Hx      |		PEA.L	0xb
00025b04 4e ba b8 26              |N  &    |		JSR	0x2132c
00025b08 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025b0a 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00025b0e 4e 5e                    |N^      |		UNLK	A6
00025b10 4e 75                    |Nu      |		RTS
00025b12 ; --------------------------------------------------------------------------------------
00025b12 ; OMSI PASCAL Function
00025b12 ;    <LVAR -0x006 2(w) 4(rw)>
00025b12 ;    <LVAR -0x00a 4(rw)>
00025b12 ;    <LVAR -0x00e 4(rw)>
00025b12 ;    <LVAR -0x012 @ 2(r) 4(rw)>
00025b12 ;    <LVAR -0x014 @ 1(r)>
00025b12 ;    <LVAR -0x047 1(r)>
00025b12 ;    <LVAR -0x050 @>
00025b12 ;    <LVAR -0x076 2(w)>
00025b12 ;    <LVAR -0x078 @>
00025b12 ; --------------------------------------------------------------------------------------
00025b12 4e 56 ff 44              |NV D    |		LINK.W	A6,#0xff44
00025b16 bf d5                    |        |		CMPA.L	(A5),A7
00025b18 62 06                    |b       |		BHI	0x25b20
00025b1a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025b1e 4e 76                    |Nv      |		TRAPV
00025b20 de fc 00 44              |   D    |		ADDA.W	#0x44,A7
00025b24 48 e7 e0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D2+D1+D0,-(A7)
00025b28 45 ee ff ee              |E       |		LEA.L	(A6-0x12),A2
00025b2c 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
00025b30 49 ee ff b0              |I       |		LEA.L	(A6-0x50),A4
00025b34 72 01                    |r       |		MOVEQ.L	#0x01,D1
00025b36 74 03                    |t       |		MOVEQ.L	#0x03,D2
00025b38 9e fc 00 12              |        |		SUBA.W	#0x12,A7
00025b3c 20 4f                    | O      |		MOVEA.L	A7,A0
00025b3e 43 fa b0 60              |C  `    |		LEA.L	0x20ba0,A1
00025b42 70 10                    |p       |		MOVEQ.L	#0x10,D0
00025b44 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025b46 51 c8 ff fc              |Q       |		DBF	D0,0x25b44
00025b4a 1f 01                    |        |		MOVE.B	D1,-(A7)
00025b4c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025b4e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025b52 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025b54 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
00025b58 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00025b5e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025b60 4e ba c6 d6              |N       |		JSR	0x22238
00025b64 de fc 00 18              |        |		ADDA.W	#0x18,A7
00025b68 41 ee ff 88              |A       |		LEA.L	(A6-0x78),A0
00025b6c 43 fa b6 e6              |C       |		LEA.L	0x21254,A1
00025b70 70 09                    |p       |		MOVEQ.L	#0x09,D0
00025b72 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
00025b74 51 c8 ff fc              |Q       |		DBF	D0,0x25b72
00025b78 3d 79 00 02 e1 b8 ff 8a  |=y      |		MOVE.W	0x2e1b8,(A6-0x76)
00025b80 24 ba b4 ae              |$       |		MOVE.L	0x21030,(A2)
00025b84 2d 7a b4 ae ff f2        |-z      |		MOVE.L	0x21034,(A6-0xe)
00025b8a 2d 7a b4 ac ff f6        |-z      |		MOVE.L	0x21038,(A6-0xa)
00025b90 26 ba b4 aa              |&       |		MOVE.L	0x2103c,(A3)
00025b94 36 bc 02 01              |6       |		MOVE.W	#0x201,(A3)
00025b98 48 52                    |HR      |		PEA.L	(A2)
00025b9a 41 ee ff 88              |A       |		LEA.L	(A6-0x78),A0
00025b9e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025ba0 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025ba2 48 78 00 28              |Hx (    |		PEA.L	0x28
00025ba6 20 4c                    | L      |		MOVEA.L	A4,A0
00025ba8 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025baa 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00025bae 4e ba cb b6              |N       |		JSR	0x22766
00025bb2 de fc 00 14              |        |		ADDA.W	#0x14,A7
00025bb6 3e 82                    |>       |		MOVE.W	D2,(A7)
00025bb8 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00025bbc 4e ba ca b8              |N       |		JSR	0x22676
00025bc0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025bc2 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
00025bc6 66 1e                    |f       |		BNE	0x25be6
00025bc8 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00025bca 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
00025bce 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
00025bd2 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00025bd4 4e ba c7 76              |N  v    |		JSR	0x2234c
00025bd8 de fc 00 10              |        |		ADDA.W	#0x10,A7
00025bdc 48 78 00 20              |Hx      |		PEA.L	0x20
00025be0 4e ba b7 4a              |N  J    |		JSR	0x2132c
00025be4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025be6 30 12                    |0       |		MOVE.W	(A2),D0
00025be8 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00025bec 66 14                    |f       |		BNE	0x25c02
00025bee 48 78 13 88              |Hx      |		PEA.L	0x1388
00025bf2 3f 3c 00 38              |?< 8    |		MOVE.W	#0x38,-(A7)
00025bf6 20 4c                    | L      |		MOVEA.L	A4,A0
00025bf8 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025bfa 4e ba fa 0e              |N       |		JSR	0x2560a
00025bfe de fc 00 0a              |        |		ADDA.W	#0xa,A7
00025c02 4a 2e ff b9              |J.      |		TST.B	(A6-0x47)
00025c06 67 18                    |g       |		BEQ	0x25c20
00025c08 20 4c                    | L      |		MOVEA.L	A4,A0
00025c0a 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025c0c 48 78 00 28              |Hx (    |		PEA.L	0x28
00025c10 4e ba b9 88              |N       |		JSR	0x2159a
00025c14 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025c16 48 78 00 21              |Hx !    |		PEA.L	0x21
00025c1a 4e ba b7 10              |N       |		JSR	0x2132c
00025c1e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025c20 4c df 1f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3+A4
00025c24 4e 5e                    |N^      |		UNLK	A6
00025c26 4e 75                    |Nu      |		RTS
00025c28 ; --------------------------------------------------------------------------------------
00025c28 ; OMSI PASCAL Function
00025c28 ;    <LVAR -0x006 4(rw)>
00025c28 ;    <LVAR -0x00a 4(rw)>
00025c28 ;    <LVAR -0x00e 4(rw)>
00025c28 ;    <LVAR -0x012 @ 2(r) 4(rw)>
00025c28 ;    <LVAR -0x014 @ 1(r)>
00025c28 ;    <LVAR -0x047 1(r)>
00025c28 ;    <LVAR -0x04e 2(r)>
00025c28 ;    <LVAR -0x050 @>
00025c28 ;    <LVAR -0x078 @>
00025c28 ; --------------------------------------------------------------------------------------
00025c28 4e 56 ff 2c              |NV ,    |		LINK.W	A6,#0xff2c
00025c2c bf d5                    |        |		CMPA.L	(A5),A7
00025c2e 62 06                    |b       |		BHI	0x25c36
00025c30 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025c34 4e 76                    |Nv      |		TRAPV
00025c36 de fc 00 5c              |   \    |		ADDA.W	#0x5c,A7
00025c3a 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
00025c3e 45 ee ff ee              |E       |		LEA.L	(A6-0x12),A2
00025c42 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00025c48 49 fa c5 ee              |I       |		LEA.L	0x22238,A4
00025c4c 72 01                    |r       |		MOVEQ.L	#0x01,D1
00025c4e 74 03                    |t       |		MOVEQ.L	#0x03,D2
00025c50 76 22                    |v"      |		MOVEQ.L	#0x22,D3
00025c52 78 04                    |x       |		MOVEQ.L	#0x04,D4
00025c54 41 fa af 6e              |A  n    |		LEA.L	0x20bc4,A0
00025c58 70 08                    |p       |		MOVEQ.L	#0x08,D0
00025c5a 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00025c5c 51 c8 ff fc              |Q       |		DBF	D0,0x25c5a
00025c60 1f 01                    |        |		MOVE.B	D1,-(A7)
00025c62 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025c64 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025c68 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025c6a 3f 3c 00 12              |?<      |		MOVE.W	#0x12,-(A7)
00025c6e 4e 93                    |N       |		JSR	(A3)
00025c70 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025c72 4e 94                    |N       |		JSR	(A4)
00025c74 de fc 00 18              |        |		ADDA.W	#0x18,A7
00025c78 41 ee ff 88              |A       |		LEA.L	(A6-0x78),A0
00025c7c 43 fa b5 fe              |C       |		LEA.L	0x2127c,A1
00025c80 70 09                    |p       |		MOVEQ.L	#0x09,D0
00025c82 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
00025c84 51 c8 ff fc              |Q       |		DBF	D0,0x25c82
00025c88 24 ba b3 a6              |$       |		MOVE.L	0x21030,(A2)
00025c8c 2d 7a b3 a6 ff f2        |-z      |		MOVE.L	0x21034,(A6-0xe)
00025c92 2d 7a b3 a4 ff f6        |-z      |		MOVE.L	0x21038,(A6-0xa)
00025c98 2d 7a b3 a2 ff fa        |-z      |		MOVE.L	0x2103c,(A6-0x6)
00025c9e 48 52                    |HR      |		PEA.L	(A2)
00025ca0 41 ee ff 88              |A       |		LEA.L	(A6-0x78),A0
00025ca4 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025ca6 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025ca8 48 78 00 28              |Hx (    |		PEA.L	0x28
00025cac 41 ee ff b0              |A       |		LEA.L	(A6-0x50),A0
00025cb0 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025cb2 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00025cb6 4e ba ca ae              |N       |		JSR	0x22766
00025cba de fc 00 14              |        |		ADDA.W	#0x14,A7
00025cbe 3e 82                    |>       |		MOVE.W	D2,(A7)
00025cc0 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00025cc4 4e ba c9 b0              |N       |		JSR	0x22676
00025cc8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025cca 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
00025cce 66 2a                    |f*      |		BNE	0x25cfa
00025cd0 9e c3                    |        |		SUBA.W	D3,A7
00025cd2 20 4f                    | O      |		MOVEA.L	A7,A0
00025cd4 43 fa ae ee              |C       |		LEA.L	0x20bc4,A1
00025cd8 70 20                    |p       |		MOVEQ.L	#0x20,D0
00025cda 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025cdc 51 c8 ff fc              |Q       |		DBF	D0,0x25cda
00025ce0 1f 04                    |        |		MOVE.B	D4,-(A7)
00025ce2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025ce4 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025ce8 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025cea 3f 3c 00 21              |?< !    |		MOVE.W	#0x21,-(A7)
00025cee 4e 93                    |N       |		JSR	(A3)
00025cf0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025cf2 4e 94                    |N       |		JSR	(A4)
00025cf4 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00025cf8 60 70                    |`p      |		BRA	0x25d6a
00025cfa 30 12                    |0       |		MOVE.W	(A2),D0
00025cfc 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00025d00 66 0a                    |f       |		BNE	0x25d0c
00025d02 48 78 00 17              |Hx      |		PEA.L	0x17
00025d06 4e ba b6 24              |N  $    |		JSR	0x2132c
00025d0a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025d0c 4a 2e ff b9              |J.      |		TST.B	(A6-0x47)
00025d10 67 50                    |gP      |		BEQ	0x25d62
00025d12 9e fc 00 20              |        |		SUBA.W	#0x20,A7
00025d16 20 4f                    | O      |		MOVEA.L	A7,A0
00025d18 43 fa ae cc              |C       |		LEA.L	0x20be6,A1
00025d1c 70 1e                    |p       |		MOVEQ.L	#0x1e,D0
00025d1e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025d20 51 c8 ff fc              |Q       |		DBF	D0,0x25d1e
00025d24 1f 04                    |        |		MOVE.B	D4,-(A7)
00025d26 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025d28 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025d2c 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025d2e 3f 3c 00 1f              |?<      |		MOVE.W	#0x1f,-(A7)
00025d32 4e 93                    |N       |		JSR	(A3)
00025d34 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025d36 4e 94                    |N       |		JSR	(A4)
00025d38 de c3                    |        |		ADDA.W	D3,A7
00025d3a 2e ae ff fa              |.       |		MOVE.L	(A6-0x6),(A7)
00025d3e 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
00025d42 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
00025d46 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00025d48 4e ba c6 02              |N       |		JSR	0x2234c
00025d4c de fc 00 10              |        |		ADDA.W	#0x10,A7
00025d50 41 ee ff b0              |A       |		LEA.L	(A6-0x50),A0
00025d54 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025d56 48 78 00 28              |Hx (    |		PEA.L	0x28
00025d5a 4e ba b8 3e              |N  >    |		JSR	0x2159a
00025d5e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025d60 60 08                    |`       |		BRA	0x25d6a
00025d62 33 ee ff b2 00 02 e1 b8  |3       |		MOVE.W	(A6-0x4e),0x2e1b8
00025d6a 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
00025d6e 4e 5e                    |N^      |		UNLK	A6
00025d70 4e 75                    |Nu      |		RTS
00025d72 ; --------------------------------------------------------------------------------------
00025d72 ; OMSI PASCAL Function
00025d72 ;    <LVAR  0x008 @ 4(r)>
00025d72 ;    <LVAR -0x004 @ 1(r)>
00025d72 ;    <LVAR -0x006 2(w)>
00025d72 ;    <LVAR -0x008 2(w) 4(rw)>
00025d72 ;    <LVAR -0x00c 4(rw)>
00025d72 ;    <LVAR -0x010 4(rw)>
00025d72 ;    <LVAR -0x014 @ 4(rw)>
00025d72 ; --------------------------------------------------------------------------------------
00025d72 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
00025d76 bf d5                    |        |		CMPA.L	(A5),A7
00025d78 62 06                    |b       |		BHI	0x25d80
00025d7a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025d7e 4e 76                    |Nv      |		TRAPV
00025d80 de fc 00 5c              |   \    |		ADDA.W	#0x5c,A7
00025d84 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00025d88 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00025d8c 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00025d92 49 fa c4 a4              |I       |		LEA.L	0x22238,A4
00025d96 74 01                    |t       |		MOVEQ.L	#0x01,D2
00025d98 76 0e                    |v       |		MOVEQ.L	#0x0e,D3
00025d9a 78 0d                    |x       |		MOVEQ.L	#0x0d,D4
00025d9c 7a 14                    |z       |		MOVEQ.L	#0x14,D5
00025d9e 7c 03                    ||       |		MOVEQ.L	#0x03,D6
00025da0 9e fc 00 16              |        |		SUBA.W	#0x16,A7
00025da4 20 4f                    | O      |		MOVEA.L	A7,A0
00025da6 43 fa ae 5e              |C  ^    |		LEA.L	0x20c06,A1
00025daa 70 14                    |p       |		MOVEQ.L	#0x14,D0
00025dac 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025dae 51 c8 ff fc              |Q       |		DBF	D0,0x25dac
00025db2 1f 02                    |        |		MOVE.B	D2,-(A7)
00025db4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025db6 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025dba 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025dbc 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
00025dc0 4e 93                    |N       |		JSR	(A3)
00025dc2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025dc4 4e 94                    |N       |		JSR	(A4)
00025dc6 de c3                    |        |		ADDA.W	D3,A7
00025dc8 20 4f                    | O      |		MOVEA.L	A7,A0
00025dca 43 fa ae 50              |C  P    |		LEA.L	0x20c1c,A1
00025dce 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00025dd0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025dd2 51 c8 ff fc              |Q       |		DBF	D0,0x25dd0
00025dd6 42 27                    |B'      |		CLR.B	-(A7)
00025dd8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00025dda 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00025dde 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025de0 3f 04                    |?       |		MOVE.W	D4,-(A7)
00025de2 4e 93                    |N       |		JSR	(A3)
00025de4 2e 92                    |.       |		MOVE.L	(A2),(A7)
00025de6 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00025dec 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025dee 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00025df4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025df6 4e 94                    |N       |		JSR	(A4)
00025df8 de c5                    |        |		ADDA.W	D5,A7
00025dfa 20 52                    | R      |		MOVEA.L	(A2),A0
00025dfc 30 10                    |0       |		MOVE.W	(A0),D0
00025dfe 48 c0                    |H       |		EXTW.L	D0
00025e00 2f 00                    |/       |		MOVE.L	D0,-(A7)
00025e02 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00025e04 be 97                    |        |		CMP.L	(A7),D7
00025e06 6e 32                    |n2      |		BGT	0x25e3a
00025e08 20 07                    |        |		MOVE.L	D7,D0
00025e0a 53 80                    |S       |		SUBQ.L	#0x1,D0
00025e0c 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
00025e12 63 02                    |c       |		BLS	0x25e16
00025e14 4e 4f                    |NO      |		TRAP	#15
00025e16 41 f9 00 02 c7 94        |A       |		LEA.L	0x2c794,A0
00025e1c 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
00025e20 22 52                    |"R      |		MOVEA.L	(A2),A1
00025e22 20 07                    |        |		MOVE.L	D7,D0
00025e24 53 80                    |S       |		SUBQ.L	#0x1,D0
00025e26 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
00025e2c 63 02                    |c       |		BLS	0x25e30
00025e2e 4e 4f                    |NO      |		TRAP	#15
00025e30 11 71 08 02 08 99        | q      |		MOVE.B	(A1+D0.L+#0x2),(A0+0x899)
00025e36 52 87                    |R       |		ADDQ.L	#0x1,D7
00025e38 68 ca                    |h       |		BVC	0x25e04
00025e3a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025e3c 2d 7a b2 22 ff ec        |-z "    |		MOVE.L	0x21060,(A6-0x14)
00025e42 2d 7a b2 20 ff f0        |-z      |		MOVE.L	0x21064,(A6-0x10)
00025e48 2d 7a b2 1e ff f4        |-z      |		MOVE.L	0x21068,(A6-0xc)
00025e4e 2d 7a b2 1c ff f8        |-z      |		MOVE.L	0x2106c,(A6-0x8)
00025e54 3d 7c 03 01 ff f8        |=|      |		MOVE.W	#0x301,(A6-0x8)
00025e5a 20 52                    | R      |		MOVEA.L	(A2),A0
00025e5c 30 10                    |0       |		MOVE.W	(A0),D0
00025e5e 0c 40 ff ff              | @      |		CMPI.W	#0xffff,D0
00025e62 63 02                    |c       |		BLS	0x25e66
00025e64 4e 4f                    |NO      |		TRAP	#15
00025e66 3d 40 ff fa              |=@      |		MOVE.W	D0,(A6-0x6)
00025e6a 48 52                    |HR      |		PEA.L	(A2)
00025e6c 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00025e72 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025e74 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00025e78 41 f9 00 02 d0 2d        |A    -  |		LEA.L	0x2d02d,A0
00025e7e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025e80 3f 06                    |?       |		MOVE.W	D6,-(A7)
00025e82 42 81                    |B       |		CLR.L	D1
00025e84 32 00                    |2       |		MOVE.W	D0,D1
00025e86 2f 01                    |/       |		MOVE.L	D1,-(A7)
00025e88 48 78 00 00              |Hx      |		PEA.L	0x0
00025e8c 48 78 00 00              |Hx      |		PEA.L	0x0
00025e90 4e ba c8 d4              |N       |		JSR	0x22766
00025e94 de c5                    |        |		ADDA.W	D5,A7
00025e96 3e 86                    |>       |		MOVE.W	D6,(A7)
00025e98 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00025e9c 4e ba c7 d8              |N       |		JSR	0x22676
00025ea0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025ea2 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
00025ea6 66 40                    |f@      |		BNE	0x25ee8
00025ea8 9e c3                    |        |		SUBA.W	D3,A7
00025eaa 20 4f                    | O      |		MOVEA.L	A7,A0
00025eac 43 fa ad 7c              |C  |    |		LEA.L	0x20c2a,A1
00025eb0 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00025eb2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00025eb4 51 c8 ff fc              |Q       |		DBF	D0,0x25eb2
00025eb8 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00025ebc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025ebe 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025ec2 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025ec4 3f 04                    |?       |		MOVE.W	D4,-(A7)
00025ec6 4e 93                    |N       |		JSR	(A3)
00025ec8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025eca 4e 94                    |N       |		JSR	(A4)
00025ecc de fc 00 10              |        |		ADDA.W	#0x10,A7
00025ed0 2e ae ff f8              |.       |		MOVE.L	(A6-0x8),(A7)
00025ed4 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
00025ed8 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
00025edc 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
00025ee0 4e ba c4 6a              |N  j    |		JSR	0x2234c
00025ee4 de fc 00 10              |        |		ADDA.W	#0x10,A7
00025ee8 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00025eec 4e 5e                    |N^      |		UNLK	A6
00025eee 4e 75                    |Nu      |		RTS
00025ef0 ; --------------------------------------------------------------------------------------
00025ef0 ; OMSI PASCAL Function
00025ef0 ;    <LVAR  0x008 4(w)>
00025ef0 ;    <LVAR -0x002 @ 1(r)>
00025ef0 ;    <LVAR -0x006 @ 4(r)>
00025ef0 ;    <LVAR -0x008 @ 1(r)>
00025ef0 ;    <LVAR -0x00a 2(rw)>
00025ef0 ;    <LVAR -0x00c 2(w) 4(rw)>
00025ef0 ;    <LVAR -0x010 4(rw)>
00025ef0 ;    <LVAR -0x014 4(rw)>
00025ef0 ;    <LVAR -0x018 @ 4(rw)>
00025ef0 ; --------------------------------------------------------------------------------------
00025ef0 4e 56 ff 92              |NV      |		LINK.W	A6,#0xff92
00025ef4 bf d5                    |        |		CMPA.L	(A5),A7
00025ef6 62 06                    |b       |		BHI	0x25efe
00025ef8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00025efc 4e 76                    |Nv      |		TRAPV
00025efe de fc 00 56              |   V    |		ADDA.W	#0x56,A7
00025f02 48 e7 fd f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00025f06 43 ee ff e8              |C       |		LEA.L	(A6-0x18),A1
00025f0a 45 ee ff f4              |E       |		LEA.L	(A6-0xc),A2
00025f0e 47 ee ff ec              |G       |		LEA.L	(A6-0x14),A3
00025f12 49 ee ff f0              |I       |		LEA.L	(A6-0x10),A4
00025f16 72 01                    |r       |		MOVEQ.L	#0x01,D1
00025f18 74 03                    |t       |		MOVEQ.L	#0x03,D2
00025f1a 76 14                    |v       |		MOVEQ.L	#0x14,D3
00025f1c 78 10                    |x       |		MOVEQ.L	#0x10,D4
00025f1e 7a 3a                    |z:      |		MOVEQ.L	#0x3a,D5
00025f20 41 fa ad 2a              |A  *    |		LEA.L	0x20c4c,A0
00025f24 70 04                    |p       |		MOVEQ.L	#0x04,D0
00025f26 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00025f28 51 c8 ff fc              |Q       |		DBF	D0,0x25f26
00025f2c 1f 01                    |        |		MOVE.B	D1,-(A7)
00025f2e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00025f30 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00025f34 3f 01                    |?       |		MOVE.W	D1,-(A7)
00025f36 3f 03                    |?       |		MOVE.W	D3,-(A7)
00025f38 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00025f3e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00025f40 4e ba c2 f6              |N       |		JSR	0x22238
00025f44 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00025f48 22 ba b1 06              |"       |		MOVE.L	0x21050,(A1)
00025f4c 26 ba b1 06              |&       |		MOVE.L	0x21054,(A3)
00025f50 28 ba b1 06              |(       |		MOVE.L	0x21058,(A4)
00025f54 24 ba b1 06              |$       |		MOVE.L	0x2105c,(A2)
00025f58 34 bc 04 01              |4       |		MOVE.W	#0x401,(A2)
00025f5c 3d 41 ff f6              |=A      |		MOVE.W	D1,(A6-0xa)
00025f60 48 51                    |HQ      |		PEA.L	(A1)
00025f62 48 78 00 00              |Hx      |		PEA.L	0x0
00025f66 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025f68 42 80                    |B       |		CLR.L	D0
00025f6a 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
00025f6e 2f 00                    |/       |		MOVE.L	D0,-(A7)
00025f70 41 ee ff fe              |A       |		LEA.L	(A6-0x2),A0
00025f74 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025f76 48 78 00 01              |Hx      |		PEA.L	0x1
00025f7a 4e ba c7 ea              |N       |		JSR	0x22766
00025f7e de c3                    |        |		ADDA.W	D3,A7
00025f80 3e 82                    |>       |		MOVE.W	D2,(A7)
00025f82 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00025f86 4e ba c6 ee              |N       |		JSR	0x22676
00025f8a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00025f8c 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
00025f90 66 18                    |f       |		BNE	0x25faa
00025f92 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00025f94 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00025f96 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00025f98 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00025f9a 4e ba c3 b0              |N       |		JSR	0x2234c
00025f9e de c4                    |        |		ADDA.W	D4,A7
00025fa0 48 78 00 18              |Hx      |		PEA.L	0x18
00025fa4 4e ba b3 86              |N       |		JSR	0x2132c
00025fa8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025faa 10 2e ff fe              | .      |		MOVE.B	(A6-0x2),D0
00025fae b0 05                    |        |		CMP.B	D5,D0
00025fb0 67 0a                    |g       |		BEQ	0x25fbc
00025fb2 48 78 00 19              |Hx      |		PEA.L	0x19
00025fb6 4e ba b3 74              |N  t    |		JSR	0x2132c
00025fba 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025fbc 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00025fc0 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00025fc6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00025fc8 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00025fca 22 ba b0 84              |"       |		MOVE.L	0x21050,(A1)
00025fce 26 ba b0 84              |&       |		MOVE.L	0x21054,(A3)
00025fd2 28 ba b0 84              |(       |		MOVE.L	0x21058,(A4)
00025fd6 24 ba b0 84              |$       |		MOVE.L	0x2105c,(A2)
00025fda 34 bc 04 01              |4       |		MOVE.W	#0x401,(A2)
00025fde 3d 41 ff f6              |=A      |		MOVE.W	D1,(A6-0xa)
00025fe2 48 51                    |HQ      |		PEA.L	(A1)
00025fe4 48 78 00 00              |Hx      |		PEA.L	0x0
00025fe8 3f 02                    |?       |		MOVE.W	D2,-(A7)
00025fea 42 80                    |B       |		CLR.L	D0
00025fec 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
00025ff0 2f 00                    |/       |		MOVE.L	D0,-(A7)
00025ff2 41 ee ff fe              |A       |		LEA.L	(A6-0x2),A0
00025ff6 2f 08                    |/       |		MOVE.L	A0,-(A7)
00025ff8 48 78 00 01              |Hx      |		PEA.L	0x1
00025ffc 4e ba c7 68              |N  h    |		JSR	0x22766
00026000 de c3                    |        |		ADDA.W	D3,A7
00026002 3e 82                    |>       |		MOVE.W	D2,(A7)
00026004 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00026008 4e ba c6 6c              |N  l    |		JSR	0x22676
0002600c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002600e 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
00026012 66 18                    |f       |		BNE	0x2602c
00026014 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00026016 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00026018 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002601a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002601c 4e ba c3 2e              |N  .    |		JSR	0x2234c
00026020 de c4                    |        |		ADDA.W	D4,A7
00026022 48 78 00 18              |Hx      |		PEA.L	0x18
00026026 4e ba b3 04              |N       |		JSR	0x2132c
0002602a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002602c 10 2e ff fe              | .      |		MOVE.B	(A6-0x2),D0
00026030 b0 05                    |        |		CMP.B	D5,D0
00026032 67 10                    |g       |		BEQ	0x26044
00026034 2f 2e ff fa              |/.      |		MOVE.L	(A6-0x6),-(A7)
00026038 1f 00                    |        |		MOVE.B	D0,-(A7)
0002603a 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00026040 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00026042 60 02                    |`       |		BRA	0x26046
00026044 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00026046 4a 07                    |J       |		TST.B	D7
00026048 67 80                    |g       |		BEQ	0x25fca
0002604a 2f 3a ac 04              |/:      |		MOVE.L	0x20c50,-(A7)
0002604e 2f 3a ab fc              |/:      |		MOVE.L	0x20c4c,-(A7)
00026052 42 27                    |B'      |		CLR.B	-(A7)
00026054 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00026056 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
0002605a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002605c 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
00026060 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00026066 2e ae ff fa              |.       |		MOVE.L	(A6-0x6),(A7)
0002606a 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00026070 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026072 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00026078 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002607a 4e ba c1 bc              |N       |		JSR	0x22238
0002607e de fc 00 0e              |        |		ADDA.W	#0xe,A7
00026082 2d 6e ff fa 00 08        |-n      |		MOVE.L	(A6-0x6),(A6+0x8)
00026088 4c df 1f bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
0002608c 4e 5e                    |N^      |		UNLK	A6
0002608e 4e 75                    |Nu      |		RTS
00026090 ; --------------------------------------------------------------------------------------
00026090 ; OMSI PASCAL Function
00026090 ;    <LVAR -0x008 @ 1(r)>
00026090 ;    <LVAR -0x00a 2(w)>
00026090 ;    <LVAR -0x00c 2(w) 4(rw)>
00026090 ;    <LVAR -0x010 4(rw)>
00026090 ;    <LVAR -0x014 4(rw)>
00026090 ;    <LVAR -0x016 2(r)>
00026090 ;    <LVAR -0x018 @ 2(r) 4(rw)>
00026090 ; --------------------------------------------------------------------------------------
00026090 4e 56 ff 94              |NV      |		LINK.W	A6,#0xff94
00026094 bf d5                    |        |		CMPA.L	(A5),A7
00026096 62 06                    |b       |		BHI	0x2609e
00026098 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002609c 4e 76                    |Nv      |		TRAPV
0002609e de fc 00 54              |   T    |		ADDA.W	#0x54,A7
000260a2 48 e7 f9 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7)
000260a6 43 ee ff e8              |C       |		LEA.L	(A6-0x18),A1
000260aa 45 ee ff f4              |E       |		LEA.L	(A6-0xc),A2
000260ae 74 01                    |t       |		MOVEQ.L	#0x01,D2
000260b0 26 3c 00 00 04 00        |&<      |		MOVE.L	#0x400,D3
000260b6 78 03                    |x       |		MOVEQ.L	#0x03,D4
000260b8 41 fa ab b8              |A       |		LEA.L	0x20c72,A0
000260bc 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
000260be 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000260c0 51 c8 ff fc              |Q       |		DBF	D0,0x260be
000260c4 1f 02                    |        |		MOVE.B	D2,-(A7)
000260c6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000260c8 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000260cc 3f 02                    |?       |		MOVE.W	D2,-(A7)
000260ce 3f 3c 00 1e              |?<      |		MOVE.W	#0x1e,-(A7)
000260d2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000260d8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000260da 4e ba c1 5c              |N  \    |		JSR	0x22238
000260de de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000260e2 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000260e4 be 83                    |        |		CMP.L	D3,D7
000260e6 67 00 00 9a              |g       |		BEQ	0x26182
000260ea 22 ba af 64              |"  d    |		MOVE.L	0x21050,(A1)
000260ee 2d 7a af 64 ff ec        |-z d    |		MOVE.L	0x21054,(A6-0x14)
000260f4 2d 7a af 62 ff f0        |-z b    |		MOVE.L	0x21058,(A6-0x10)
000260fa 24 ba af 60              |$  `    |		MOVE.L	0x2105c,(A2)
000260fe 34 bc 04 01              |4       |		MOVE.W	#0x401,(A2)
00026102 20 03                    |        |		MOVE.L	D3,D0
00026104 90 87                    |        |		SUB.L	D7,D0
00026106 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
0002610c 63 02                    |c       |		BLS	0x26110
0002610e 4e 4f                    |NO      |		TRAP	#15
00026110 3d 40 ff f6              |=@      |		MOVE.W	D0,(A6-0xa)
00026114 48 51                    |HQ      |		PEA.L	(A1)
00026116 48 78 00 00              |Hx      |		PEA.L	0x0
0002611a 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002611c 48 78 00 00              |Hx      |		PEA.L	0x0
00026120 41 f9 00 02 d4 3a        |A    :  |		LEA.L	0x2d43a,A0
00026126 2f 08                    |/       |		MOVE.L	A0,-(A7)
00026128 df 97                    |        |		ADD.L	D7,(A7)
0002612a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002612c 4e ba c6 38              |N  8    |		JSR	0x22766
00026130 de fc 00 14              |        |		ADDA.W	#0x14,A7
00026134 3e 84                    |>       |		MOVE.W	D4,(A7)
00026136 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002613a 4e ba c5 3a              |N  :    |		JSR	0x22676
0002613e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00026140 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
00026144 66 1e                    |f       |		BNE	0x26164
00026146 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00026148 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002614c 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
00026150 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00026152 4e ba c1 f8              |N       |		JSR	0x2234c
00026156 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002615a 48 78 00 18              |Hx      |		PEA.L	0x18
0002615e 4e ba b1 cc              |N       |		JSR	0x2132c
00026162 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026164 30 11                    |0       |		MOVE.W	(A1),D0
00026166 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
0002616a e7 40                    | @      |		ASL.W	#0x3,D0
0002616c 42 81                    |B       |		CLR.L	D1
0002616e 32 00                    |2       |		MOVE.W	D0,D1
00026170 de 81                    |        |		ADD.L	D1,D7
00026172 30 2e ff ea              |0.      |		MOVE.W	(A6-0x16),D0
00026176 e0 48                    | H      |		LSR.W	#0x8,D0
00026178 42 81                    |B       |		CLR.L	D1
0002617a 32 00                    |2       |		MOVE.W	D0,D1
0002617c 9e 81                    |        |		SUB.L	D1,D7
0002617e 60 00 ff 64              |`  d    |		BRA	0x260e4
00026182 d7 b9 00 02 e1 c2        |        |		ADD.L	D3,0x2e1c2
00026188 4c df 07 9f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2
0002618c 4e 5e                    |N^      |		UNLK	A6
0002618e 4e 75                    |Nu      |		RTS
00026190 ; --------------------------------------------------------------------------------------
00026190 ; OMSI PASCAL Function
00026190 ; --------------------------------------------------------------------------------------
00026190 4e 56 ff cc              |NV      |		LINK.W	A6,#0xffcc
00026194 bf d5                    |        |		CMPA.L	(A5),A7
00026196 62 06                    |b       |		BHI	0x2619e
00026198 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002619c 4e 76                    |Nv      |		TRAPV
0002619e de fc 00 28              |   (    |		ADDA.W	#0x28,A7
000261a2 48 e7 9f 00              |H       |		MOVEM.L	D7+D6+D5+D4+D3+D0,-(A7)
000261a6 28 39 00 02 c7 c4        |(9      |		MOVE.L	0x2c7c4,D4
000261ac 76 50                    |vP      |		MOVEQ.L	#0x50,D3
000261ae 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000261b4 2a 39 00 02 e1 a8        |*9      |		MOVE.L	0x2e1a8,D5
000261ba da 84                    |        |		ADD.L	D4,D5
000261bc 06 85 00 00 00 28        |     (  |		ADDI.L	#0x00000028,D5
000261c2 02 85 00 0f ff ff        |        |		ANDI.L	#0x000fffff,D5
000261c8 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000261ca 48 78 00 02              |Hx      |		PEA.L	0x2
000261ce 2f 05                    |/       |		MOVE.L	D5,-(A7)
000261d0 48 78 00 02              |Hx      |		PEA.L	0x2
000261d4 4e ba e1 7e              |N  ~    |		JSR	0x24354
000261d8 de fc 00 0c              |        |		ADDA.W	#0xc,A7
000261dc 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000261de 10 39 00 02 d8 c2        | 9      |		MOVE.B	0x2d8c2,D0
000261e4 b0 39 00 02 d8 c3        | 9      |		CMP.B	0x2d8c3,D0
000261ea 67 02                    |g       |		BEQ	0x261ee
000261ec 52 06                    |R       |		ADDQ.B	#0x1,D6
000261ee 4a 06                    |J       |		TST.B	D6
000261f0 66 0e                    |f       |		BNE	0x26200
000261f2 48 78 07 a1              |Hx      |		PEA.L	0x7a1
000261f6 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
000261fc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000261fe 52 87                    |R       |		ADDQ.L	#0x1,D7
00026200 0c 87 00 00 02 58        |     X  |		CMPI.L	#0x00000258,D7
00026206 67 04                    |g       |		BEQ	0x2620c
00026208 4a 06                    |J       |		TST.B	D6
0002620a 67 be                    |g       |		BEQ	0x261ca
0002620c 4a 06                    |J       |		TST.B	D6
0002620e 66 0a                    |f       |		BNE	0x2621a
00026210 48 78 00 2f              |Hx /    |		PEA.L	0x2f
00026214 4e ba b1 16              |N       |		JSR	0x2132c
00026218 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002621a 4c df 00 f9              |L       |		MOVEM.L	(A7)+,D0+D3+D4+D5+D6+D7
0002621e 4e 5e                    |N^      |		UNLK	A6
00026220 4e 75                    |Nu      |		RTS
00026222 ; --------------------------------------------------------------------------------------
00026222 ; OMSI PASCAL Function
00026222 ; --------------------------------------------------------------------------------------
00026222 4e 56 ff 9c              |NV      |		LINK.W	A6,#0xff9c
00026226 bf d5                    |        |		CMPA.L	(A5),A7
00026228 62 06                    |b       |		BHI	0x26230
0002622a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002622e 4e 76                    |Nv      |		TRAPV
00026230 de fc 00 64              |   d    |		ADDA.W	#0x64,A7
00026234 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00026238 45 f9 00 02 d8 ba        |E       |		LEA.L	0x2d8ba,A2
0002623e 47 fa b0 ec              |G       |		LEA.L	0x2132c,A3
00026242 49 f9 00 02 c7 c4        |I       |		LEA.L	0x2c7c4,A4
00026248 76 1c                    |v       |		MOVEQ.L	#0x1c,D3
0002624a 78 01                    |x       |		MOVEQ.L	#0x01,D4
0002624c 7a 1b                    |z       |		MOVEQ.L	#0x1b,D5
0002624e 7c 10                    ||       |		MOVEQ.L	#0x10,D6
00026250 2e 3c 00 00 04 00        |.<      |		MOVE.L	#0x400,D7
00026256 9e c3                    |        |		SUBA.W	D3,A7
00026258 20 4f                    | O      |		MOVEA.L	A7,A0
0002625a 43 fa aa 16              |C       |		LEA.L	0x20c72,A1
0002625e 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
00026260 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00026262 51 c8 ff fc              |Q       |		DBF	D0,0x26260
00026266 1f 04                    |        |		MOVE.B	D4,-(A7)
00026268 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002626a 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002626e 3f 04                    |?       |		MOVE.W	D4,-(A7)
00026270 3f 05                    |?       |		MOVE.W	D5,-(A7)
00026272 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00026278 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002627a 4e ba bf bc              |N       |		JSR	0x22238
0002627e de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00026282 4e ba ff 0c              |N       |		JSR	0x26190
00026286 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00026288 1f 04                    |        |		MOVE.B	D4,-(A7)
0002628a 48 78 00 01              |Hx      |		PEA.L	0x1
0002628e 42 67                    |Bg      |		CLR.W	-(A7)
00026290 4e ba ea 38              |N  8    |		JSR	0x24cca
00026294 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00026298 42 80                    |B       |		CLR.L	D0
0002629a 10 39 00 02 c7 e7        | 9      |		MOVE.B	0x2c7e7,D0
000262a0 0c 40 00 ff              | @      |		CMPI.W	#0x00ff,D0
000262a4 66 00 00 bc              |f       |		BNE	0x26362
000262a8 42 80                    |B       |		CLR.L	D0
000262aa 10 39 00 02 cc 2e        | 9   .  |		MOVE.B	0x2cc2e,D0
000262b0 b0 44                    | D      |		CMP.W	D4,D0
000262b2 67 56                    |gV      |		BEQ	0x2630a
000262b4 0c 40 00 03              | @      |		CMPI.W	#0x0003,D0
000262b8 67 50                    |gP      |		BEQ	0x2630a
000262ba 9e c3                    |        |		SUBA.W	D3,A7
000262bc 20 4f                    | O      |		MOVEA.L	A7,A0
000262be 43 fa a9 ce              |C       |		LEA.L	0x20c8e,A1
000262c2 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
000262c4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000262c6 51 c8 ff fc              |Q       |		DBF	D0,0x262c4
000262ca 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000262cc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000262d0 3f 04                    |?       |		MOVE.W	D4,-(A7)
000262d2 3f 05                    |?       |		MOVE.W	D5,-(A7)
000262d4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000262da 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000262dc 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000262e2 de c3                    |        |		ADDA.W	D3,A7
000262e4 2e b9 00 02 c7 e6        |.       |		MOVE.L	0x2c7e6,(A7)
000262ea 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
000262f0 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
000262f6 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
000262fc 4e ba b9 92              |N       |		JSR	0x21c90
00026300 de c6                    |        |		ADDA.W	D6,A7
00026302 48 78 00 2e              |Hx .    |		PEA.L	0x2e
00026306 4e 93                    |N       |		JSR	(A3)
00026308 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002630a 4a 92                    |J       |		TST.L	(A2)
0002630c 67 08                    |g       |		BEQ	0x26316
0002630e 48 78 00 30              |Hx 0    |		PEA.L	0x30
00026312 4e 93                    |N       |		JSR	(A3)
00026314 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026316 42 80                    |B       |		CLR.L	D0
00026318 10 39 00 02 cc 1b        | 9      |		MOVE.B	0x2cc1b,D0
0002631e e1 40                    | @      |		ASL.W	#0x8,D0
00026320 42 81                    |B       |		CLR.L	D1
00026322 12 39 00 02 cc 1c        | 9      |		MOVE.B	0x2cc1c,D1
00026328 d2 40                    | @      |		ADD.W	D0,D1
0002632a 48 c1                    |H       |		EXTW.L	D1
0002632c 23 c1 00 02 e1 be        |#       |		MOVE.L	D1,0x2e1be
00026332 23 c3 00 02 d0 20        |#       |		MOVE.L	D3,0x2d020
00026338 42 80                    |B       |		CLR.L	D0
0002633a 10 39 00 02 c7 db        | 9      |		MOVE.B	0x2c7db,D0
00026340 e7 40                    | @      |		ASL.W	#0x3,D0
00026342 42 82                    |B       |		CLR.L	D2
00026344 14 39 00 02 c7 dc        | 9      |		MOVE.B	0x2c7dc,D2
0002634a 44 42                    |DB      |		NEG.W	D2
0002634c d4 40                    | @      |		ADD.W	D0,D2
0002634e 94 43                    | C      |		SUB.W	D3,D2
00026350 48 c2                    |H       |		EXTW.L	D2
00026352 23 c2 00 02 d0 1c        |#       |		MOVE.L	D2,0x2d01c
00026358 44 82                    |D       |		NEG.L	D2
0002635a d4 81                    |        |		ADD.L	D1,D2
0002635c 24 82                    |$       |		MOVE.L	D2,(A2)
0002635e 60 00 00 88              |`       |		BRA	0x263e8
00026362 48 c0                    |H       |		EXTW.L	D0
00026364 b0 94                    |        |		CMP.L	(A4),D0
00026366 67 26                    |g&      |		BEQ	0x2638e
00026368 2f 39 00 02 c7 e6        |/9      |		MOVE.L	0x2c7e6,-(A7)
0002636e 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
00026374 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
0002637a 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
00026380 4e ba b8 b0              |N       |		JSR	0x21c32
00026384 de c6                    |        |		ADDA.W	D6,A7
00026386 48 78 00 31              |Hx 1    |		PEA.L	0x31
0002638a 4e 93                    |N       |		JSR	(A3)
0002638c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002638e 42 80                    |B       |		CLR.L	D0
00026390 10 39 00 02 c7 db        | 9      |		MOVE.B	0x2c7db,D0
00026396 e7 40                    | @      |		ASL.W	#0x3,D0
00026398 42 81                    |B       |		CLR.L	D1
0002639a 12 39 00 02 c7 dc        | 9      |		MOVE.B	0x2c7dc,D1
000263a0 44 41                    |DA      |		NEG.W	D1
000263a2 d2 40                    | @      |		ADD.W	D0,D1
000263a4 48 c1                    |H       |		EXTW.L	D1
000263a6 23 c1 00 02 d0 1c        |#       |		MOVE.L	D1,0x2d01c
000263ac 42 b9 00 02 d0 20        |B       |		CLR.L	0x2d020
000263b2 4a 92                    |J       |		TST.L	(A2)
000263b4 67 32                    |g2      |		BEQ	0x263e8
000263b6 20 12                    |        |		MOVE.L	(A2),D0
000263b8 b0 87                    |        |		CMP.L	D7,D0
000263ba 6d 0c                    |m       |		BLT	0x263c8
000263bc b2 87                    |        |		CMP.L	D7,D1
000263be 67 08                    |g       |		BEQ	0x263c8
000263c0 48 78 00 32              |Hx 2    |		PEA.L	0x32
000263c4 4e 93                    |N       |		JSR	(A3)
000263c6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000263c8 20 12                    |        |		MOVE.L	(A2),D0
000263ca b0 87                    |        |		CMP.L	D7,D0
000263cc 6c 10                    |l       |		BGE	0x263de
000263ce b0 b9 00 02 d0 1c        |        |		CMP.L	0x2d01c,D0
000263d4 67 08                    |g       |		BEQ	0x263de
000263d6 48 78 00 33              |Hx 3    |		PEA.L	0x33
000263da 4e 93                    |N       |		JSR	(A3)
000263dc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000263de 20 12                    |        |		MOVE.L	(A2),D0
000263e0 90 b9 00 02 d0 1c        |        |		SUB.L	0x2d01c,D0
000263e6 24 80                    |$       |		MOVE.L	D0,(A2)
000263e8 20 39 00 02 e1 c2        | 9      |		MOVE.L	0x2e1c2,D0
000263ee d0 b9 00 02 d0 1c        |        |		ADD.L	0x2d01c,D0
000263f4 23 c0 00 02 e1 c2        |#       |		MOVE.L	D0,0x2e1c2
000263fa 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000263fe 4e 5e                    |N^      |		UNLK	A6
00026400 4e 75                    |Nu      |		RTS
00026402 ; --------------------------------------------------------------------------------------
00026402 ; OMSI PASCAL Function
00026402 ;    <LVAR  0x00c 4(r)>
00026402 ;    <LVAR  0x008 4(r)>
00026402 ; --------------------------------------------------------------------------------------
00026402 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
00026406 bf d5                    |        |		CMPA.L	(A5),A7
00026408 62 06                    |b       |		BHI	0x26410
0002640a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002640e 4e 76                    |Nv      |		TRAPV
00026410 de fc 00 4a              |   J    |		ADDA.W	#0x4a,A7
00026414 48 e7 e0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D2+D1+D0,-(A7)
00026418 47 f9 00 02 d0 20        |G       |		LEA.L	0x2d020,A3
0002641e 74 01                    |t       |		MOVEQ.L	#0x01,D2
00026420 9e fc 00 1c              |        |		SUBA.W	#0x1c,A7
00026424 20 4f                    | O      |		MOVEA.L	A7,A0
00026426 43 fa a8 82              |C       |		LEA.L	0x20caa,A1
0002642a 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
0002642c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002642e 51 c8 ff fc              |Q       |		DBF	D0,0x2642c
00026432 1f 02                    |        |		MOVE.B	D2,-(A7)
00026434 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026436 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002643a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002643c 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
00026440 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00026446 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026448 4e ba bd ee              |N       |		JSR	0x22238
0002644c de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00026450 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00026454 22 6e 00 08              |"n      |		MOVEA.L	(A6+0x8),A1
00026458 20 11                    |        |		MOVE.L	(A1),D0
0002645a 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
00026460 63 02                    |c       |		BLS	0x26464
00026462 4e 4f                    |NO      |		TRAP	#15
00026464 22 13                    |"       |		MOVE.L	(A3),D1
00026466 0c 81 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D1
0002646c 63 02                    |c       |		BLS	0x26470
0002646e 4e 4f                    |NO      |		TRAP	#15
00026470 45 f9 00 02 c7 94        |E       |		LEA.L	0x2c794,A2
00026476 45 f2 18 00              |E       |		LEA.L	(A2+D1.L),A2
0002647a 11 aa 04 7f 08 00        |        |		MOVE.B	(A2+0x47f),(A0+D0.L)
00026480 52 93                    |R       |		ADDQ.L	#0x1,(A3)
00026482 52 91                    |R       |		ADDQ.L	#0x1,(A1)
00026484 53 b9 00 02 d0 1c        |S       |		SUBQ.L	#0x1,0x2d01c
0002648a 67 0a                    |g       |		BEQ	0x26496
0002648c 20 11                    |        |		MOVE.L	(A1),D0
0002648e 0c 80 00 00 04 00        |        |		CMPI.L	#0x00000400,D0
00026494 66 ba                    |f       |		BNE	0x26450
00026496 4c df 0f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3
0002649a 4e 5e                    |N^      |		UNLK	A6
0002649c 4e 75                    |Nu      |		RTS
0002649e ; --------------------------------------------------------------------------------------
0002649e ; OMSI PASCAL Function
0002649e ;    <LVAR -0x008 @ 4(r)>
0002649e ;    <LVAR -0x408 @>
0002649e ; --------------------------------------------------------------------------------------
0002649e 4e 56 fb b2              |NV      |		LINK.W	A6,#0xfbb2
000264a2 bf d5                    |        |		CMPA.L	(A5),A7
000264a4 62 06                    |b       |		BHI	0x264ac
000264a6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000264aa 4e 76                    |Nv      |		TRAPV
000264ac de fc 00 46              |   F    |		ADDA.W	#0x46,A7
000264b0 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
000264b4 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
000264b8 72 01                    |r       |		MOVEQ.L	#0x01,D1
000264ba 41 fa a8 2a              |A  *    |		LEA.L	0x20ce6,A0
000264be 70 07                    |p       |		MOVEQ.L	#0x07,D0
000264c0 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000264c2 51 c8 ff fc              |Q       |		DBF	D0,0x264c0
000264c6 1f 01                    |        |		MOVE.B	D1,-(A7)
000264c8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000264ca 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000264ce 3f 01                    |?       |		MOVE.W	D1,-(A7)
000264d0 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
000264d4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000264da 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000264dc 4e ba bd 5a              |N  Z    |		JSR	0x22238
000264e0 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
000264e4 42 92                    |B       |		CLR.L	(A2)
000264e6 4a b9 00 02 d0 1c        |J       |		TST.L	0x2d01c
000264ec 67 0e                    |g       |		BEQ	0x264fc
000264ee 48 6e fb f8              |Hn      |		PEA.L	(A6-0x408)
000264f2 48 52                    |HR      |		PEA.L	(A2)
000264f4 4e ba ff 0c              |N       |		JSR	0x26402
000264f8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000264fa 60 04                    |`       |		BRA	0x26500
000264fc 4e ba fd 24              |N  $    |		JSR	0x26222
00026500 20 12                    |        |		MOVE.L	(A2),D0
00026502 0c 80 00 00 04 00        |        |		CMPI.L	#0x00000400,D0
00026508 66 dc                    |f       |		BNE	0x264e6
0002650a 41 f9 00 02 d4 3a        |A    :  |		LEA.L	0x2d43a,A0
00026510 43 ee fb f8              |C       |		LEA.L	(A6-0x408),A1
00026514 30 3c 00 ff              |0<      |		MOVE.W	#0xff,D0
00026518 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
0002651a 51 c8 ff fc              |Q       |		DBF	D0,0x26518
0002651e 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
00026522 4e 5e                    |N^      |		UNLK	A6
00026524 4e 75                    |Nu      |		RTS
00026526 ; --------------------------------------------------------------------------------------
00026526 ; OMSI PASCAL Function
00026526 ;    <LVAR  0x008 4(r)>
00026526 ;    <LVAR -0x004 @>
00026526 ;    <LVAR -0x044 @>
00026526 ;    <LVAR -0x045 @ 1(r)>
00026526 ;    <LVAR -0x062 2(w)>
00026526 ;    <LVAR -0x063 1(r)>
00026526 ;    <LVAR -0x064 1(r)>
00026526 ;    <LVAR -0x065 1(r)>
00026526 ;    <LVAR -0x066 1(r) 4(w)>
00026526 ;    <LVAR -0x067 1(rw)>
00026526 ;    <LVAR -0x068 1(rw)>
00026526 ;    <LVAR -0x06a 2(w)>
00026526 ;    <LVAR -0x06c 2(rw)>
00026526 ;    <LVAR -0x08a @>
00026526 ;    <LVAR -0x08e @ 4(rw)>
00026526 ;    <LVAR -0x094 @ 1(r)>
00026526 ;    <LVAR -0x098 @ 4(r)>
00026526 ;    <LVAR -0x09c @ 4(r)>
00026526 ; --------------------------------------------------------------------------------------
00026526 4e 56 fe dc              |NV      |		LINK.W	A6,#0xfedc
0002652a bf d5                    |        |		CMPA.L	(A5),A7
0002652c 62 06                    |b       |		BHI	0x26534
0002652e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00026532 4e 76                    |Nv      |		TRAPV
00026534 de fc 00 88              |        |		ADDA.W	#0x88,A7
00026538 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002653c 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00026542 47 ee ff 64              |G  d    |		LEA.L	(A6-0x9c),A3
00026546 49 f9 00 02 c7 eb        |I       |		LEA.L	0x2c7eb,A4
0002654c 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002654e 76 14                    |v       |		MOVEQ.L	#0x14,D3
00026550 78 02                    |x       |		MOVEQ.L	#0x02,D4
00026552 2f 3a a7 96              |/:      |		MOVE.L	0x20cea,-(A7)
00026556 2f 3a a7 8e              |/:      |		MOVE.L	0x20ce6,-(A7)
0002655a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002655e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026560 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00026564 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026566 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
0002656a 4e 92                    |N       |		JSR	(A2)
0002656c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002656e 1e 82                    |        |		MOVE.B	D2,(A7)
00026570 48 79 00 02 c7 ea        |Hy      |		PEA.L	0x2c7ea
00026576 48 79 00 02 c7 ca        |Hy      |		PEA.L	0x2c7ca
0002657c 4e ba b7 70              |N  p    |		JSR	0x21cee
00026580 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00026584 4a 39 00 02 c7 ea        |J9      |		TST.B	0x2c7ea
0002658a 66 3c                    |f<      |		BNE	0x265c8
0002658c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002658e 1e ba a7 5e              |   ^    |		MOVE.B	0x20cee,(A7)
00026592 1f 7a a7 5b 00 01        | z [    |		MOVE.B	0x20cef,(A7+0x1)
00026598 1f 7a a7 56 00 02        | z V    |		MOVE.B	0x20cf0,(A7+0x2)
0002659e 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000265a2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000265a4 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000265a8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000265aa 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
000265ae 4e 92                    |N       |		JSR	(A2)
000265b0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000265b2 1e 82                    |        |		MOVE.B	D2,(A7)
000265b4 48 79 00 02 c7 ea        |Hy      |		PEA.L	0x2c7ea
000265ba 48 79 00 02 c7 ca        |Hy      |		PEA.L	0x2c7ca
000265c0 4e ba b7 2c              |N  ,    |		JSR	0x21cee
000265c4 de fc 00 16              |        |		ADDA.W	#0x16,A7
000265c8 4a 39 00 02 c7 ea        |J9      |		TST.B	0x2c7ea
000265ce 66 2e                    |f.      |		BNE	0x265fe
000265d0 41 fa a7 36              |A  6    |		LEA.L	0x20d08,A0
000265d4 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
000265d6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000265d8 51 c8 ff fc              |Q       |		DBF	D0,0x265d6
000265dc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000265de 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000265e2 3f 02                    |?       |		MOVE.W	D2,-(A7)
000265e4 3f 3c 00 16              |?<      |		MOVE.W	#0x16,-(A7)
000265e8 4e 92                    |N       |		JSR	(A2)
000265ea 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000265ec 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
000265f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000265f4 23 df 00 02 c7 ca        |#       |		MOVE.L	(A7)+,0x2c7ca
000265fa de fc 00 16              |        |		ADDA.W	#0x16,A7
000265fe 7a 01                    |z       |		MOVEQ.L	#0x01,D5
00026600 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00026602 20 07                    |        |		MOVE.L	D7,D0
00026604 53 80                    |S       |		SUBQ.L	#0x1,D0
00026606 0c 80 00 00 00 3f        |     ?  |		CMPI.L	#0x0000003f,D0
0002660c 63 02                    |c       |		BLS	0x26610
0002660e 4e 4f                    |NO      |		TRAP	#15
00026610 20 4b                    | K      |		MOVEA.L	A3,A0
00026612 42 30 08 58              |B0 X    |		CLR.B	(A0+D0.L+#0x58)
00026616 52 87                    |R       |		ADDQ.L	#0x1,D7
00026618 0c 87 00 00 00 40        |     @  |		CMPI.L	#0x00000040,D7
0002661e 6f e2                    |o       |		BLE	0x26602
00026620 41 ee ff 76              |A  v    |		LEA.L	(A6-0x8a),A0
00026624 43 ee ff bc              |C       |		LEA.L	(A6-0x44),A1
00026628 70 0f                    |p       |		MOVEQ.L	#0x0f,D0
0002662a 20 d9                    |        |		MOVE.L	(A1)+,(A0)+
0002662c 51 c8 ff fc              |Q       |		DBF	D0,0x2662a
00026630 20 79 00 02 c7 ca        | y      |		MOVEA.L	0x2c7ca,A0
00026636 30 10                    |0       |		MOVE.W	(A0),D0
00026638 48 c0                    |H       |		EXTW.L	D0
0002663a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002663c 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002663e be 97                    |        |		CMP.L	(A7),D7
00026640 6e 2e                    |n.      |		BGT	0x26670
00026642 20 07                    |        |		MOVE.L	D7,D0
00026644 53 80                    |S       |		SUBQ.L	#0x1,D0
00026646 0c 80 00 00 00 1d        |        |		CMPI.L	#0x0000001d,D0
0002664c 63 02                    |c       |		BLS	0x26650
0002664e 4e 4f                    |NO      |		TRAP	#15
00026650 20 4b                    | K      |		MOVEA.L	A3,A0
00026652 22 79 00 02 c7 ca        |"y      |		MOVEA.L	0x2c7ca,A1
00026658 22 07                    |"       |		MOVE.L	D7,D1
0002665a 53 81                    |S       |		SUBQ.L	#0x1,D1
0002665c 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
00026662 63 02                    |c       |		BLS	0x26666
00026664 4e 4f                    |NO      |		TRAP	#15
00026666 11 b1 18 02 08 12        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x12)
0002666c 52 87                    |R       |		ADDQ.L	#0x1,D7
0002666e 68 ce                    |h       |		BVC	0x2663e
00026670 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026672 42 39 00 02 c7 ea        |B9      |		CLR.B	0x2c7ea
00026678 48 79 00 02 c7 ca        |Hy      |		PEA.L	0x2c7ca
0002667e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00026684 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00026686 3e ba a6 80              |>       |		MOVE.W	0x20d08,(A7)
0002668a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002668e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026690 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00026694 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026696 3f 04                    |?       |		MOVE.W	D4,-(A7)
00026698 4e 92                    |N       |		JSR	(A2)
0002669a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002669c 42 17                    |B       |		CLR.B	(A7)
0002669e 48 54                    |HT      |		PEA.L	(A4)
000266a0 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000266a4 4e ba b6 48              |N  H    |		JSR	0x21cee
000266a8 de c3                    |        |		ADDA.W	D3,A7
000266aa 4a 14                    |J       |		TST.B	(A4)
000266ac 67 0c                    |g       |		BEQ	0x266ba
000266ae 13 fc 00 4b 00 02 c7 ce  |   K    |		MOVE.B	#0x4b,0x2c7ce
000266b6 60 00 00 e2              |`       |		BRA	0x2679a
000266ba 3f 3a a6 4e              |?: N    |		MOVE.W	0x20d0a,-(A7)
000266be 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000266c2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000266c4 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000266c8 3f 02                    |?       |		MOVE.W	D2,-(A7)
000266ca 3f 04                    |?       |		MOVE.W	D4,-(A7)
000266cc 4e 92                    |N       |		JSR	(A2)
000266ce 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000266d0 42 17                    |B       |		CLR.B	(A7)
000266d2 48 54                    |HT      |		PEA.L	(A4)
000266d4 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000266d8 4e ba b6 14              |N       |		JSR	0x21cee
000266dc de c3                    |        |		ADDA.W	D3,A7
000266de 4a 14                    |J       |		TST.B	(A4)
000266e0 67 0c                    |g       |		BEQ	0x266ee
000266e2 13 fc 00 50 00 02 c7 ce  |   P    |		MOVE.B	#0x50,0x2c7ce
000266ea 60 00 00 ae              |`       |		BRA	0x2679a
000266ee 3f 3a a6 1c              |?:      |		MOVE.W	0x20d0c,-(A7)
000266f2 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000266f6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000266f8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000266fc 3f 02                    |?       |		MOVE.W	D2,-(A7)
000266fe 3f 04                    |?       |		MOVE.W	D4,-(A7)
00026700 4e 92                    |N       |		JSR	(A2)
00026702 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00026704 42 17                    |B       |		CLR.B	(A7)
00026706 48 54                    |HT      |		PEA.L	(A4)
00026708 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002670c 4e ba b5 e0              |N       |		JSR	0x21cee
00026710 de c3                    |        |		ADDA.W	D3,A7
00026712 4a 14                    |J       |		TST.B	(A4)
00026714 67 0a                    |g       |		BEQ	0x26720
00026716 13 fc 00 54 00 02 c7 ce  |   T    |		MOVE.B	#0x54,0x2c7ce
0002671e 60 7a                    |`z      |		BRA	0x2679a
00026720 9e fc 00 1e              |        |		SUBA.W	#0x1e,A7
00026724 20 4f                    | O      |		MOVEA.L	A7,A0
00026726 43 fa a5 e6              |C       |		LEA.L	0x20d0e,A1
0002672a 70 1c                    |p       |		MOVEQ.L	#0x1c,D0
0002672c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002672e 51 c8 ff fc              |Q       |		DBF	D0,0x2672c
00026732 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00026734 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00026738 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002673a 3f 3c 00 1d              |?<      |		MOVE.W	#0x1d,-(A7)
0002673e 4e 92                    |N       |		JSR	(A2)
00026740 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026742 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
00026748 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002674a 23 df 00 02 c7 d0        |#       |		MOVE.L	(A7)+,0x2c7d0
00026750 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00026754 20 79 00 02 c7 d0        | y      |		MOVEA.L	0x2c7d0,A0
0002675a 13 e8 00 02 00 02 c7 ce  |        |		MOVE.B	(A0+0x2),0x2c7ce
00026762 48 79 00 02 c7 d0        |Hy      |		PEA.L	0x2c7d0
00026768 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002676e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026770 10 39 00 02 c7 ce        | 9      |		MOVE.B	0x2c7ce,D0
00026776 0c 00 00 6b              |   k    |		CMPI.B	#0x6b,D0
0002677a 67 1e                    |g       |		BEQ	0x2679a
0002677c 0c 00 00 4b              |   K    |		CMPI.B	#0x4b,D0
00026780 67 18                    |g       |		BEQ	0x2679a
00026782 0c 00 00 70              |   p    |		CMPI.B	#0x70,D0
00026786 67 12                    |g       |		BEQ	0x2679a
00026788 0c 00 00 50              |   P    |		CMPI.B	#0x50,D0
0002678c 67 0c                    |g       |		BEQ	0x2679a
0002678e 0c 00 00 74              |   t    |		CMPI.B	#0x74,D0
00026792 67 06                    |g       |		BEQ	0x2679a
00026794 0c 00 00 54              |   T    |		CMPI.B	#0x54,D0
00026798 66 86                    |f       |		BNE	0x26720
0002679a 20 39 00 02 c7 d6        | 9      |		MOVE.L	0x2c7d6,D0
000267a0 0c 80 00 00 40 00        |    @   |		CMPI.L	#0x00004000,D0
000267a6 63 02                    |c       |		BLS	0x267aa
000267a8 4e 4f                    |NO      |		TRAP	#15
000267aa 3d 40 ff 94              |=@      |		MOVE.W	D0,(A6-0x6c)
000267ae 3d 7c 04 00 ff 96        |=|      |		MOVE.W	#0x400,(A6-0x6a)
000267b4 10 39 00 02 c7 ce        | 9      |		MOVE.B	0x2c7ce,D0
000267ba 0c 00 00 6b              |   k    |		CMPI.B	#0x6b,D0
000267be 67 06                    |g       |		BEQ	0x267c6
000267c0 0c 00 00 4b              |   K    |		CMPI.B	#0x4b,D0
000267c4 66 08                    |f       |		BNE	0x267ce
000267c6 1d 42 ff 99              | B      |		MOVE.B	D2,(A6-0x67)
000267ca 1d 42 ff 98              | B      |		MOVE.B	D2,(A6-0x68)
000267ce 10 39 00 02 c7 ce        | 9      |		MOVE.B	0x2c7ce,D0
000267d4 0c 00 00 70              |   p    |		CMPI.B	#0x70,D0
000267d8 67 06                    |g       |		BEQ	0x267e0
000267da 0c 00 00 50              |   P    |		CMPI.B	#0x50,D0
000267de 66 04                    |f       |		BNE	0x267e4
000267e0 1d 42 ff 99              | B      |		MOVE.B	D2,(A6-0x67)
000267e4 42 14                    |B       |		CLR.B	(A4)
000267e6 48 6e ff 68              |Hn h    |		PEA.L	(A6-0x98)
000267ea 4e b9 00 01 03 04        |N       |		JSR	GetRtc() : TimeStamp
000267f0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000267f2 2d 6e ff 68 ff 9a        |-n h    |		MOVE.L	(A6-0x98),(A6-0x66)
000267f8 3d 42 ff 9e              |=B      |		MOVE.W	D2,(A6-0x62)
000267fc 41 ee ff 94              |A       |		LEA.L	(A6-0x6c),A0
00026800 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00026802 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00026804 51 c8 ff fc              |Q       |		DBF	D0,0x26802
00026808 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002680a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002680e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026810 3f 3c 00 1e              |?<      |		MOVE.W	#0x1e,-(A7)
00026814 4e 92                    |N       |		JSR	(A2)
00026816 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026818 2d 5f ff 72              |-_ r    |		MOVE.L	(A7)+,(A6-0x8e)
0002681c de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00026820 2e ae ff 72              |.  r    |		MOVE.L	(A6-0x8e),(A7)
00026824 42 27                    |B'      |		CLR.B	-(A7)
00026826 42 27                    |B'      |		CLR.B	-(A7)
00026828 48 78 00 01              |Hx      |		PEA.L	0x1
0002682c 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
00026830 48 53                    |HS      |		PEA.L	(A3)
00026832 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
00026838 de c3                    |        |		ADDA.W	D3,A7
0002683a 48 6e ff 72              |Hn r    |		PEA.L	(A6-0x8e)
0002683e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00026844 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00026846 3e ba a4 e4              |>       |		MOVE.W	0x20d2c,(A7)
0002684a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002684e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026850 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00026854 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026856 3f 04                    |?       |		MOVE.W	D4,-(A7)
00026858 4e 92                    |N       |		JSR	(A2)
0002685a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002685c 42 17                    |B       |		CLR.B	(A7)
0002685e 48 6e ff bb              |Hn      |		PEA.L	(A6-0x45)
00026862 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00026866 4e ba b4 86              |N       |		JSR	0x21cee
0002686a de c3                    |        |		ADDA.W	D3,A7
0002686c 4a 2e ff 6c              |J. l    |		TST.B	(A6-0x94)
00026870 66 00 00 ac              |f       |		BNE	0x2691e
00026874 4a 2e ff bb              |J.      |		TST.B	(A6-0x45)
00026878 67 2a                    |g*      |		BEQ	0x268a4
0002687a 20 53                    | S      |		MOVEA.L	(A3),A0
0002687c 10 28 00 3f              | ( ?    |		MOVE.B	(A0+0x3f),D0
00026880 ef 08                    |        |		LSL.B	#0x7,D0
00026882 ee 08                    |        |		LSR.B	#0x7,D0
00026884 67 04                    |g       |		BEQ	0x2688a
00026886 42 27                    |B'      |		CLR.B	-(A7)
00026888 60 02                    |`       |		BRA	0x2688c
0002688a 1f 04                    |        |		MOVE.B	D4,-(A7)
0002688c 1f 02                    |        |		MOVE.B	D2,-(A7)
0002688e 48 78 00 01              |Hx      |		PEA.L	0x1
00026892 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
00026896 48 53                    |HS      |		PEA.L	(A3)
00026898 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
0002689e de fc 00 10              |        |		ADDA.W	#0x10,A7
000268a2 60 78                    |`x      |		BRA	0x2691c
000268a4 9e fc 00 18              |        |		SUBA.W	#0x18,A7
000268a8 20 4f                    | O      |		MOVEA.L	A7,A0
000268aa 43 fa a4 82              |C       |		LEA.L	0x20d2e,A1
000268ae 70 16                    |p       |		MOVEQ.L	#0x16,D0
000268b0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000268b2 51 c8 ff fc              |Q       |		DBF	D0,0x268b0
000268b6 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000268b8 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000268bc 3f 02                    |?       |		MOVE.W	D2,-(A7)
000268be 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
000268c2 4e 92                    |N       |		JSR	(A2)
000268c4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000268c6 1e 82                    |        |		MOVE.B	D2,(A7)
000268c8 4e b9 00 01 03 f0        |N       |		JSR	AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
000268ce 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000268d0 4a 1f                    |J       |		TST.B	(A7)+
000268d2 67 2a                    |g*      |		BEQ	0x268fe
000268d4 20 53                    | S      |		MOVEA.L	(A3),A0
000268d6 10 28 00 3f              | ( ?    |		MOVE.B	(A0+0x3f),D0
000268da ef 08                    |        |		LSL.B	#0x7,D0
000268dc ee 08                    |        |		LSR.B	#0x7,D0
000268de 67 04                    |g       |		BEQ	0x268e4
000268e0 42 27                    |B'      |		CLR.B	-(A7)
000268e2 60 02                    |`       |		BRA	0x268e6
000268e4 1f 04                    |        |		MOVE.B	D4,-(A7)
000268e6 1f 02                    |        |		MOVE.B	D2,-(A7)
000268e8 48 78 00 01              |Hx      |		PEA.L	0x1
000268ec 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
000268f0 48 53                    |HS      |		PEA.L	(A3)
000268f2 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
000268f8 de fc 00 10              |        |		ADDA.W	#0x10,A7
000268fc 60 1a                    |`       |		BRA	0x26918
000268fe 42 27                    |B'      |		CLR.B	-(A7)
00026900 1f 02                    |        |		MOVE.B	D2,-(A7)
00026902 48 78 00 01              |Hx      |		PEA.L	0x1
00026906 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
0002690a 48 53                    |HS      |		PEA.L	(A3)
0002690c 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00026912 de fc 00 10              |        |		ADDA.W	#0x10,A7
00026916 7a 00                    |z       |		MOVEQ.L	#0x00,D5
00026918 de fc 00 18              |        |		ADDA.W	#0x18,A7
0002691c 60 18                    |`       |		BRA	0x26936
0002691e 42 27                    |B'      |		CLR.B	-(A7)
00026920 42 27                    |B'      |		CLR.B	-(A7)
00026922 48 78 00 01              |Hx      |		PEA.L	0x1
00026926 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
0002692a 48 53                    |HS      |		PEA.L	(A3)
0002692c 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00026932 de fc 00 10              |        |		ADDA.W	#0x10,A7
00026936 4a 05                    |J       |		TST.B	D5
00026938 67 00 01 d8              |g       |		BEQ	0x26b12
0002693c 41 ee ff 94              |A       |		LEA.L	(A6-0x6c),A0
00026940 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00026942 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00026944 51 c8 ff fc              |Q       |		DBF	D0,0x26942
00026948 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002694a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002694e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026950 3f 3c 00 1e              |?<      |		MOVE.W	#0x1e,-(A7)
00026954 4e 92                    |N       |		JSR	(A2)
00026956 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026958 2d 5f ff 72              |-_ r    |		MOVE.L	(A7)+,(A6-0x8e)
0002695c de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00026960 4a 2e ff 99              |J.      |		TST.B	(A6-0x67)
00026964 67 08                    |g       |		BEQ	0x2696e
00026966 30 2e ff 94              |0.      |		MOVE.W	(A6-0x6c),D0
0002696a 44 40                    |D@      |		NEG.W	D0
0002696c 60 04                    |`       |		BRA	0x26972
0002696e 30 2e ff 94              |0.      |		MOVE.W	(A6-0x6c),D0
00026972 48 c0                    |H       |		EXTW.L	D0
00026974 2c 00                    |,       |		MOVE.L	D0,D6
00026976 2f 2e ff 72              |/. r    |		MOVE.L	(A6-0x8e),-(A7)
0002697a 1f 02                    |        |		MOVE.B	D2,-(A7)
0002697c 1f 02                    |        |		MOVE.B	D2,-(A7)
0002697e 2f 06                    |/       |		MOVE.L	D6,-(A7)
00026980 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
00026984 48 53                    |HS      |		PEA.L	(A3)
00026986 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
0002698c de c3                    |        |		ADDA.W	D3,A7
0002698e 4a 2e ff 6c              |J. l    |		TST.B	(A6-0x94)
00026992 67 0a                    |g       |		BEQ	0x2699e
00026994 48 78 00 1a              |Hx      |		PEA.L	0x1a
00026998 4e ba a9 92              |N       |		JSR	0x2132c
0002699c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002699e 20 53                    | S      |		MOVEA.L	(A3),A0
000269a0 10 2e ff 99              | .      |		MOVE.B	(A6-0x67),D0
000269a4 02 28 00 fd 00 3f        | (   ?  |		ANDI.B	#0xfd,(A0+0x3f)
000269aa e3 08                    |        |		LSL.B	#0x1,D0
000269ac 81 28 00 3f              | ( ?    |		OR.B	D0,(A0+0x3f)
000269b0 10 2e ff 98              | .      |		MOVE.B	(A6-0x68),D0
000269b4 02 28 00 fb 00 3f        | (   ?  |		ANDI.B	#0xfb,(A0+0x3f)
000269ba e5 08                    |        |		LSL.B	#0x2,D0
000269bc 81 28 00 3f              | ( ?    |		OR.B	D0,(A0+0x3f)
000269c0 11 6e ff 9a 00 3a        | n   :  |		MOVE.B	(A6-0x66),(A0+0x3a)
000269c6 11 6e ff 9b 00 3b        | n   ;  |		MOVE.B	(A6-0x65),(A0+0x3b)
000269cc 11 6e ff 9c 00 3c        | n   <  |		MOVE.B	(A6-0x64),(A0+0x3c)
000269d2 11 6e ff 9d 00 3d        | n   =  |		MOVE.B	(A6-0x63),(A0+0x3d)
000269d8 11 42 00 4c              | B L    |		MOVE.B	D2,(A0+0x4c)
000269dc 42 b9 00 02 e1 c2        |B       |		CLR.L	0x2e1c2
000269e2 30 2e ff 94              |0.      |		MOVE.W	(A6-0x6c),D0
000269e6 53 40                    |S@      |		SUBQ.W	#0x1,D0
000269e8 48 c0                    |H       |		EXTW.L	D0
000269ea 2f 00                    |/       |		MOVE.L	D0,-(A7)
000269ec 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000269ee be 97                    |        |		CMP.L	(A7),D7
000269f0 6e 00 00 e8              |n       |		BGT	0x26ada
000269f4 4e ba aa ec              |N       |		JSR	0x214e2
000269f8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000269fa 30 2e ff 94              |0.      |		MOVE.W	(A6-0x6c),D0
000269fe 48 c0                    |H       |		EXTW.L	D0
00026a00 90 87                    |        |		SUB.L	D7,D0
00026a02 2f 00                    |/       |		MOVE.L	D0,-(A7)
00026a04 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00026a0a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026a0c 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00026a12 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026a14 4a 39 00 02 c7 c8        |J9      |		TST.B	0x2c7c8
00026a1a 66 06                    |f       |		BNE	0x26a22
00026a1c 4e ba f6 72              |N  r    |		JSR	0x26090
00026a20 60 04                    |`       |		BRA	0x26a26
00026a22 4e ba fa 7a              |N  z    |		JSR	0x2649e
00026a26 30 2e ff 94              |0.      |		MOVE.W	(A6-0x6c),D0
00026a2a 53 40                    |S@      |		SUBQ.W	#0x1,D0
00026a2c 48 c0                    |H       |		EXTW.L	D0
00026a2e be 80                    |        |		CMP.L	D0,D7
00026a30 66 68                    |fh      |		BNE	0x26a9a
00026a32 4e ba aa ae              |N       |		JSR	0x214e2
00026a36 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
00026a3a 20 4f                    | O      |		MOVEA.L	A7,A0
00026a3c 43 fa a3 08              |C       |		LEA.L	0x20d46,A1
00026a40 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00026a42 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00026a44 51 c8 ff fc              |Q       |		DBF	D0,0x26a42
00026a48 41 fa a3 2c              |A  ,    |		LEA.L	0x20d76,A0
00026a4c 70 08                    |p       |		MOVEQ.L	#0x08,D0
00026a4e 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00026a50 51 c8 ff fc              |Q       |		DBF	D0,0x26a4e
00026a54 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00026a56 48 6f 00 2c              |Ho ,    |		PEA.L	(A7+0x2c)
00026a5a 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026a5c 3f 3c 00 0b              |?<      |		MOVE.W	#0xb,-(A7)
00026a60 4e 92                    |N       |		JSR	(A2)
00026a62 2e ae ff 72              |.  r    |		MOVE.L	(A6-0x8e),(A7)
00026a66 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00026a6c 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00026a70 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026a72 3f 3c 00 24              |?< $    |		MOVE.W	#0x24,-(A7)
00026a76 4e 92                    |N       |		JSR	(A2)
00026a78 2e b9 00 02 e1 c2        |.       |		MOVE.L	0x2e1c2,(A7)
00026a7e 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00026a84 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026a86 4e b9 00 01 02 d8        |N       |		JSR	StringCat4(a, b, c, d : String) : String
00026a8c de fc 00 10              |        |		ADDA.W	#0x10,A7
00026a90 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00026a96 de fc 00 34              |   4    |		ADDA.W	#0x34,A7
00026a9a 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00026a9c 0c 87 00 00 40 00        |    @   |		CMPI.L	#0x00004000,D7
00026aa2 63 02                    |c       |		BLS	0x26aa6
00026aa4 4e 4f                    |NO      |		TRAP	#15
00026aa6 3f 07                    |?       |		MOVE.W	D7,-(A7)
00026aa8 42 67                    |Bg      |		CLR.W	-(A7)
00026aaa 3f 3c 02 00              |?<      |		MOVE.W	#0x200,-(A7)
00026aae 1f 02                    |        |		MOVE.B	D2,-(A7)
00026ab0 41 f9 00 02 d4 3a        |A    :  |		LEA.L	0x2d43a,A0
00026ab6 2f 08                    |/       |		MOVE.L	A0,-(A7)
00026ab8 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
00026abc 4e b9 00 01 03 88        |N       |		JSR	WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
00026ac2 de c3                    |        |		ADDA.W	D3,A7
00026ac4 4a 2e ff 6c              |J. l    |		TST.B	(A6-0x94)
00026ac8 67 0a                    |g       |		BEQ	0x26ad4
00026aca 48 78 00 1b              |Hx      |		PEA.L	0x1b
00026ace 4e ba a8 5c              |N  \    |		JSR	0x2132c
00026ad2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026ad4 52 87                    |R       |		ADDQ.L	#0x1,D7
00026ad6 68 00 ff 16              |h       |		BVC	0x269ee
00026ada 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026adc 48 6e ff 72              |Hn r    |		PEA.L	(A6-0x8e)
00026ae0 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00026ae6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00026ae8 42 17                    |B       |		CLR.B	(A7)
00026aea 1f 02                    |        |		MOVE.B	D2,-(A7)
00026aec 48 78 00 01              |Hx      |		PEA.L	0x1
00026af0 48 6e ff 6c              |Hn l    |		PEA.L	(A6-0x94)
00026af4 48 53                    |HS      |		PEA.L	(A3)
00026af6 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00026afc de fc 00 10              |        |		ADDA.W	#0x10,A7
00026b00 4a 2e ff 6c              |J. l    |		TST.B	(A6-0x94)
00026b04 67 0a                    |g       |		BEQ	0x26b10
00026b06 48 78 00 1c              |Hx      |		PEA.L	0x1c
00026b0a 4e ba a8 20              |N       |		JSR	0x2132c
00026b0e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026b10 60 28                    |`(      |		BRA	0x26b3a
00026b12 30 2e ff 94              |0.      |		MOVE.W	(A6-0x6c),D0
00026b16 53 40                    |S@      |		SUBQ.W	#0x1,D0
00026b18 48 c0                    |H       |		EXTW.L	D0
00026b1a 2f 00                    |/       |		MOVE.L	D0,-(A7)
00026b1c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00026b1e be 97                    |        |		CMP.L	(A7),D7
00026b20 6e 16                    |n       |		BGT	0x26b38
00026b22 4a 39 00 02 c7 c8        |J9      |		TST.B	0x2c7c8
00026b28 66 06                    |f       |		BNE	0x26b30
00026b2a 4e ba f5 64              |N  d    |		JSR	0x26090
00026b2e 60 04                    |`       |		BRA	0x26b34
00026b30 4e ba f9 6c              |N  l    |		JSR	0x2649e
00026b34 52 87                    |R       |		ADDQ.L	#0x1,D7
00026b36 68 e6                    |h       |		BVC	0x26b1e
00026b38 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026b3a 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00026b3e 4e 5e                    |N^      |		UNLK	A6
00026b40 4e 75                    |Nu      |		RTS
00026b42 ; --------------------------------------------------------------------------------------
00026b42 ; OMSI PASCAL Function
00026b42 ;    <LVAR -0x00a @ 4(r)>
00026b42 ; --------------------------------------------------------------------------------------
00026b42 4e 56 ff 6e              |NV n    |		LINK.W	A6,#0xff6e
00026b46 bf d5                    |        |		CMPA.L	(A5),A7
00026b48 62 06                    |b       |		BHI	0x26b50
00026b4a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00026b4e 4e 76                    |Nv      |		TRAPV
00026b50 de fc 00 7e              |   ~    |		ADDA.W	#0x7e,A7
00026b54 48 e7 f1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D3+D2+D1+D0,-(A7)
00026b58 45 ee ff f6              |E       |		LEA.L	(A6-0xa),A2
00026b5c 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00026b62 49 fa b6 d4              |I       |		LEA.L	0x22238,A4
00026b66 72 01                    |r       |		MOVEQ.L	#0x01,D1
00026b68 74 02                    |t       |		MOVEQ.L	#0x02,D2
00026b6a 76 28                    |v(      |		MOVEQ.L	#0x28,D3
00026b6c 41 fa a2 2a              |A  *    |		LEA.L	0x20d98,A0
00026b70 70 10                    |p       |		MOVEQ.L	#0x10,D0
00026b72 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00026b74 51 c8 ff fc              |Q       |		DBF	D0,0x26b72
00026b78 1f 02                    |        |		MOVE.B	D2,-(A7)
00026b7a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026b7c 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00026b80 3f 01                    |?       |		MOVE.W	D1,-(A7)
00026b82 3f 3c 00 22              |?< "    |		MOVE.W	#0x22,-(A7)
00026b86 4e 93                    |N       |		JSR	(A3)
00026b88 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026b8a 4e 94                    |N       |		JSR	(A4)
00026b8c de c3                    |        |		ADDA.W	D3,A7
00026b8e 41 fa a2 30              |A  0    |		LEA.L	0x20dc0,A0
00026b92 70 09                    |p       |		MOVEQ.L	#0x09,D0
00026b94 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00026b96 51 c8 ff fc              |Q       |		DBF	D0,0x26b94
00026b9a 1f 02                    |        |		MOVE.B	D2,-(A7)
00026b9c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026b9e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00026ba2 3f 01                    |?       |		MOVE.W	D1,-(A7)
00026ba4 3f 03                    |?       |		MOVE.W	D3,-(A7)
00026ba6 4e 93                    |N       |		JSR	(A3)
00026ba8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026baa 4e 94                    |N       |		JSR	(A4)
00026bac de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00026bb0 41 fa a5 62              |A  b    |		LEA.L	0x21114,A0
00026bb4 70 28                    |p(      |		MOVEQ.L	#0x28,D0
00026bb6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00026bb8 51 c8 ff fc              |Q       |		DBF	D0,0x26bb6
00026bbc 4e ba d1 4a              |N  J    |		JSR	0x23d08
00026bc0 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00026bc4 20 4f                    | O      |		MOVEA.L	A7,A0
00026bc6 43 fa a1 f8              |C       |		LEA.L	0x20dc0,A1
00026bca 70 2a                    |p*      |		MOVEQ.L	#0x2a,D0
00026bcc 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00026bce 51 c8 ff fc              |Q       |		DBF	D0,0x26bcc
00026bd2 1f 02                    |        |		MOVE.B	D2,-(A7)
00026bd4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026bd6 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00026bda 3f 01                    |?       |		MOVE.W	D1,-(A7)
00026bdc 3f 3c 00 2b              |?< +    |		MOVE.W	#0x2b,-(A7)
00026be0 4e 93                    |N       |		JSR	(A3)
00026be2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026be4 4e 94                    |N       |		JSR	(A4)
00026be6 de fc 00 32              |   2    |		ADDA.W	#0x32,A7
00026bea 4e ba e8 04              |N       |		JSR	0x253f0
00026bee 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00026bf0 42 92                    |B       |		CLR.L	(A2)
00026bf2 48 78 03 e8              |Hx      |		PEA.L	0x3e8
00026bf6 4e ba e9 56              |N  V    |		JSR	0x2554e
00026bfa 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026bfc 48 52                    |HR      |		PEA.L	(A2)
00026bfe 4e ba b3 bc              |N       |		JSR	0x21fbc
00026c02 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026c04 52 87                    |R       |		ADDQ.L	#0x1,D7
00026c06 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00026c08 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00026c0a 4e ba b1 42              |N  B    |		JSR	0x21d4e
00026c0e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026c10 4a 1f                    |J       |		TST.B	(A7)+
00026c12 67 e8                    |g       |		BEQ	0x26bfc
00026c14 4e ba e7 da              |N       |		JSR	0x253f0
00026c18 42 92                    |B       |		CLR.L	(A2)
00026c1a 0c 87 00 00 00 05        |        |		CMPI.L	#0x00000005,D7
00026c20 66 d0                    |f       |		BNE	0x26bf2
00026c22 13 c1 00 02 c7 d4        |        |		MOVE.B	D1,0x2c7d4
00026c28 4c df 1f 8f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D7+A0+A1+A2+A3+A4
00026c2c 4e 5e                    |N^      |		UNLK	A6
00026c2e 4e 75                    |Nu      |		RTS
00026c30 ; --------------------------------------------------------------------------------------
00026c30 ; OMSI PASCAL Function
00026c30 ;    <LVAR  0x008 4(r)>
00026c30 ;    <LVAR -0x006 @>
00026c30 ;    <LVAR -0x007 @ 1(r)>
00026c30 ;    <LVAR -0x008 @ 1(r)>
00026c30 ;    <LVAR -0x020 4(w)>
00026c30 ;    <LVAR -0x024 4(w)>
00026c30 ;    <LVAR -0x028 4(w)>
00026c30 ;    <LVAR -0x02c @ 4(w)>
00026c30 ;    <LVAR -0x030 4(rw)>
00026c30 ;    <LVAR -0x031 1(w)>
00026c30 ;    <LVAR -0x032 1(r)>
00026c30 ;    <LVAR -0x033 1(w)>
00026c30 ;    <LVAR -0x034 4(rw)>
00026c30 ;    <LVAR -0x037 1(w)>
00026c30 ;    <LVAR -0x038 4(rw)>
00026c30 ;    <LVAR -0x03c 4(rw)>
00026c30 ;    <LVAR -0x08c 4(r)>
00026c30 ;    <LVAR -0x08d 1(r)>
00026c30 ;    <LVAR -0x08e 1(r)>
00026c30 ;    <LVAR -0x08f 1(w)>
00026c30 ;    <LVAR -0x090 1(w)>
00026c30 ;    <LVAR -0x091 1(w)>
00026c30 ;    <LVAR -0x092 1(w)>
00026c30 ;    <LVAR -0x093 1(w)>
00026c30 ;    <LVAR -0x094 1(w)>
00026c30 ;    <LVAR -0x098 4(w)>
00026c30 ;    <LVAR -0x09c 4(w)>
00026c30 ;    <LVAR -0x0a0 4(w)>
00026c30 ;    <LVAR -0x0a2 2(w)>
00026c30 ;    <LVAR -0x0a4 2(r)>
00026c30 ;    <LVAR -0x0a6 2(r)>
00026c30 ;    <LVAR -0x0a8 2(r)>
00026c30 ;    <LVAR -0x0ac 4(rw)>
00026c30 ;    <LVAR -0x0b0 4(r)>
00026c30 ;    <LVAR -0x0b2 2(r)>
00026c30 ;    <LVAR -0x0b4 2(w)>
00026c30 ;    <LVAR -0x0b8 4(r)>
00026c30 ;    <LVAR -0x0ba 2(r)>
00026c30 ;    <LVAR -0x0bc @ 2(r)>
00026c30 ; --------------------------------------------------------------------------------------
00026c30 4e 56 fe fe              |NV      |		LINK.W	A6,#0xfefe
00026c34 bf d5                    |        |		CMPA.L	(A5),A7
00026c36 62 06                    |b       |		BHI	0x26c3e
00026c38 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00026c3c 4e 76                    |Nv      |		TRAPV
00026c3e de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00026c42 48 e7 f8 80              |H       |		MOVEM.L	A0+D4+D3+D2+D1+D0,-(A7)
00026c46 74 01                    |t       |		MOVEQ.L	#0x01,D2
00026c48 76 05                    |v       |		MOVEQ.L	#0x05,D3
00026c4a 78 06                    |x       |		MOVEQ.L	#0x06,D4
00026c4c 41 fa a1 ba              |A       |		LEA.L	0x20e08,A0
00026c50 70 06                    |p       |		MOVEQ.L	#0x06,D0
00026c52 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00026c54 51 c8 ff fc              |Q       |		DBF	D0,0x26c52
00026c58 1f 02                    |        |		MOVE.B	D2,-(A7)
00026c5a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026c5c 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00026c60 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026c62 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00026c66 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00026c6c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026c6e 4e ba b5 c8              |N       |		JSR	0x22238
00026c72 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00026c76 42 6e ff 44              |Bn D    |		CLR.W	(A6-0xbc)
00026c7a 42 6e ff 46              |Bn F    |		CLR.W	(A6-0xba)
00026c7e 42 ae ff 48              |B  H    |		CLR.L	(A6-0xb8)
00026c82 3d 7c 00 04 ff 4c        |=|   L  |		MOVE.W	#0x4,(A6-0xb4)
00026c88 42 6e ff 4e              |Bn N    |		CLR.W	(A6-0xb2)
00026c8c 42 ae ff 50              |B  P    |		CLR.L	(A6-0xb0)
00026c90 2d 7c 00 00 00 34 ff 54  |-|   4 T|		MOVE.L	#0x34,(A6-0xac)
00026c98 42 6e ff 58              |Bn X    |		CLR.W	(A6-0xa8)
00026c9c 42 6e ff 5a              |Bn Z    |		CLR.W	(A6-0xa6)
00026ca0 42 6e ff 5c              |Bn \    |		CLR.W	(A6-0xa4)
00026ca4 3d 43 ff 5e              |=C ^    |		MOVE.W	D3,(A6-0xa2)
00026ca8 2d 7c 00 00 00 2c ff 60  |-|   , `|		MOVE.L	#0x2c,(A6-0xa0)
00026cb0 2d 42 ff 64              |-B d    |		MOVE.L	D2,(A6-0x9c)
00026cb4 2d 6e ff 54 ff 68        |-n T h  |		MOVE.L	(A6-0xac),(A6-0x98)
00026cba 1d 7c 00 69 ff 6c        | | i l  |		MOVE.B	#0x69,(A6-0x94)
00026cc0 1d 7c 00 66 ff 6d        | | f m  |		MOVE.B	#0x66,(A6-0x93)
00026cc6 1d 7c 00 5f ff 6e        | | _ n  |		MOVE.B	#0x5f,(A6-0x92)
00026ccc 1d 7c 00 74 ff 6f        | | t o  |		MOVE.B	#0x74,(A6-0x91)
00026cd2 1d 7c 00 63 ff 70        | | c p  |		MOVE.B	#0x63,(A6-0x90)
00026cd8 1d 7c 00 70 ff 71        | | p q  |		MOVE.B	#0x70,(A6-0x8f)
00026cde 42 2e ff 72              |B. r    |		CLR.B	(A6-0x8e)
00026ce2 42 2e ff 73              |B. s    |		CLR.B	(A6-0x8d)
00026ce6 42 ae ff 74              |B  t    |		CLR.L	(A6-0x8c)
00026cea 2d 7a a4 64 ff c4        |-z d    |		MOVE.L	0x21150,(A6-0x3c)
00026cf0 2d 7a a4 62 ff c8        |-z b    |		MOVE.L	0x21154,(A6-0x38)
00026cf6 2d 7a a4 60 ff cc        |-z `    |		MOVE.L	0x21158,(A6-0x34)
00026cfc 2d 7a a4 5e ff d0        |-z ^    |		MOVE.L	0x2115c,(A6-0x30)
00026d02 02 2e 00 80 ff c9        | .      |		ANDI.B	#0x80,(A6-0x37)
00026d08 89 2e ff c9              | .      |		OR.B	D4,(A6-0x37)
00026d0c 02 2e 00 80 ff cf        | .      |		ANDI.B	#0x80,(A6-0x31)
00026d12 87 2e ff cf              | .      |		OR.B	D3,(A6-0x31)
00026d16 42 2e ff ce              |B.      |		CLR.B	(A6-0x32)
00026d1a 3f 3a a0 f0              |?:      |		MOVE.W	0x20e0c,-(A7)
00026d1e 3f 3a a0 ea              |?:      |		MOVE.W	0x20e0a,-(A7)
00026d22 3f 3a a0 e4              |?:      |		MOVE.W	0x20e08,-(A7)
00026d26 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00026d2a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026d2c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00026d30 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026d32 3f 04                    |?       |		MOVE.W	D4,-(A7)
00026d34 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00026d3a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00026d3c 42 17                    |B       |		CLR.B	(A7)
00026d3e 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
00026d42 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00026d46 4e ba af a6              |N       |		JSR	0x21cee
00026d4a de fc 00 18              |        |		ADDA.W	#0x18,A7
00026d4e 10 2e ff f9              | .      |		MOVE.B	(A6-0x7),D0
00026d52 02 2e 00 fb ff cd        | .      |		ANDI.B	#0xfb,(A6-0x33)
00026d58 e5 08                    |        |		LSL.B	#0x2,D0
00026d5a 81 2e ff cd              | .      |		OR.B	D0,(A6-0x33)
00026d5e 2d 6e ff c4 ff d4        |-n      |		MOVE.L	(A6-0x3c),(A6-0x2c)
00026d64 2d 6e ff c8 ff d8        |-n      |		MOVE.L	(A6-0x38),(A6-0x28)
00026d6a 2d 6e ff cc ff dc        |-n      |		MOVE.L	(A6-0x34),(A6-0x24)
00026d70 2d 6e ff d0 ff e0        |-n      |		MOVE.L	(A6-0x30),(A6-0x20)
00026d76 48 6e ff d4              |Hn      |		PEA.L	(A6-0x2c)
00026d7a 41 ee ff 44              |A  D    |		LEA.L	(A6-0xbc),A0
00026d7e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00026d80 3f 02                    |?       |		MOVE.W	D2,-(A7)
00026d82 48 78 00 80              |Hx      |		PEA.L	0x80
00026d86 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
00026d8c 48 78 00 00              |Hx      |		PEA.L	0x0
00026d90 4e ba b9 d4              |N       |		JSR	0x22766
00026d94 de fc 00 14              |        |		ADDA.W	#0x14,A7
00026d98 3e 82                    |>       |		MOVE.W	D2,(A7)
00026d9a 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00026d9e 4e ba b8 d6              |N       |		JSR	0x22676
00026da2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00026da4 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
00026da8 66 0a                    |f       |		BNE	0x26db4
00026daa 48 78 00 1e              |Hx      |		PEA.L	0x1e
00026dae 4e ba a5 7c              |N  |    |		JSR	0x2132c
00026db2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026db4 48 78 00 00              |Hx      |		PEA.L	0x0
00026db8 1f 02                    |        |		MOVE.B	D2,-(A7)
00026dba 48 78 00 01              |Hx      |		PEA.L	0x1
00026dbe 42 67                    |Bg      |		CLR.W	-(A7)
00026dc0 4e ba df 08              |N       |		JSR	0x24cca
00026dc4 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00026dc8 42 80                    |B       |		CLR.L	D0
00026dca 10 39 00 02 cc 45        | 9   E  |		MOVE.B	0x2cc45,D0
00026dd0 c0 fc 01 00              |        |		MULU.W	#0x100,D0
00026dd4 42 81                    |B       |		CLR.L	D1
00026dd6 12 39 00 02 cc 46        | 9   F  |		MOVE.B	0x2cc46,D1
00026ddc d2 40                    | @      |		ADD.W	D0,D1
00026dde 42 80                    |B       |		CLR.L	D0
00026de0 30 01                    |0       |		MOVE.W	D1,D0
00026de2 23 c0 00 02 c7 c4        |#       |		MOVE.L	D0,0x2c7c4
00026de8 4a 39 00 02 d0 2c        |J9   ,  |		TST.B	0x2d02c
00026dee 6f 10                    |o       |		BLE	0x26e00
00026df0 4a 39 00 02 cc 1d        |J9      |		TST.B	0x2cc1d
00026df6 66 08                    |f       |		BNE	0x26e00
00026df8 4a 39 00 02 cc 1e        |J9      |		TST.B	0x2cc1e
00026dfe 67 28                    |g(      |		BEQ	0x26e28
00026e00 2f 39 00 02 c7 e6        |/9      |		MOVE.L	0x2c7e6,-(A7)
00026e06 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
00026e0c 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
00026e12 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
00026e18 4e ba ae 76              |N  v    |		JSR	0x21c90
00026e1c de fc 00 10              |        |		ADDA.W	#0x10,A7
00026e20 4e ba cd 26              |N  &    |		JSR	0x23b48
00026e24 4e ba bb ae              |N       |		JSR	0x229d4
00026e28 4c df 01 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0
00026e2c 4e 5e                    |N^      |		UNLK	A6
00026e2e 4e 75                    |Nu      |		RTS
00026e30 ; --------------------------------------------------------------------------------------
00026e30 ; OMSI PASCAL Function
00026e30 ;    <LVAR -0x004 @ 1(r)>
00026e30 ;    <LVAR -0x008 4(w)>
00026e30 ;    <LVAR -0x00c 4(w)>
00026e30 ;    <LVAR -0x010 4(w)>
00026e30 ;    <LVAR -0x014 @ 4(w)>
00026e30 ;    <LVAR -0x018 4(rw)>
00026e30 ;    <LVAR -0x019 1(w)>
00026e30 ;    <LVAR -0x01a 1(w)>
00026e30 ;    <LVAR -0x01c 4(rw)>
00026e30 ;    <LVAR -0x01f 1(w)>
00026e30 ;    <LVAR -0x020 4(rw)>
00026e30 ;    <LVAR -0x024 4(rw)>
00026e30 ;    <LVAR -0x074 4(w)>
00026e30 ;    <LVAR -0x075 1(r)>
00026e30 ;    <LVAR -0x076 1(r)>
00026e30 ;    <LVAR -0x077 1(w)>
00026e30 ;    <LVAR -0x078 1(w)>
00026e30 ;    <LVAR -0x079 1(w)>
00026e30 ;    <LVAR -0x07a 1(w)>
00026e30 ;    <LVAR -0x07b 1(w)>
00026e30 ;    <LVAR -0x07c 1(w)>
00026e30 ;    <LVAR -0x080 4(w)>
00026e30 ;    <LVAR -0x084 4(w)>
00026e30 ;    <LVAR -0x088 4(w)>
00026e30 ;    <LVAR -0x08a 2(w)>
00026e30 ;    <LVAR -0x08c 2(r)>
00026e30 ;    <LVAR -0x08e 2(w)>
00026e30 ;    <LVAR -0x090 2(r)>
00026e30 ;    <LVAR -0x094 4(rw)>
00026e30 ;    <LVAR -0x098 4(r)>
00026e30 ;    <LVAR -0x09a 2(r)>
00026e30 ;    <LVAR -0x09c 2(w)>
00026e30 ;    <LVAR -0x0a0 4(r)>
00026e30 ;    <LVAR -0x0a2 2(r)>
00026e30 ;    <LVAR -0x0a4 @ 2(r)>
00026e30 ; --------------------------------------------------------------------------------------
00026e30 4e 56 ff 1e              |NV      |		LINK.W	A6,#0xff1e
00026e34 bf d5                    |        |		CMPA.L	(A5),A7
00026e36 62 06                    |b       |		BHI	0x26e3e
00026e38 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00026e3c 4e 76                    |Nv      |		TRAPV
00026e3e de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
00026e42 48 e7 e0 c0              |H       |		MOVEM.L	A1+A0+D2+D1+D0,-(A7)
00026e46 43 f9 00 02 c7 c4        |C       |		LEA.L	0x2c7c4,A1
00026e4c 72 01                    |r       |		MOVEQ.L	#0x01,D1
00026e4e 74 05                    |t       |		MOVEQ.L	#0x05,D2
00026e50 41 fa 9f d4              |A       |		LEA.L	0x20e26,A0
00026e54 70 05                    |p       |		MOVEQ.L	#0x05,D0
00026e56 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00026e58 51 c8 ff fc              |Q       |		DBF	D0,0x26e56
00026e5c 1f 01                    |        |		MOVE.B	D1,-(A7)
00026e5e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00026e60 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00026e64 3f 01                    |?       |		MOVE.W	D1,-(A7)
00026e66 3f 3c 00 18              |?<      |		MOVE.W	#0x18,-(A7)
00026e6a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00026e70 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00026e72 4e ba b3 c4              |N       |		JSR	0x22238
00026e76 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00026e7a 42 6e ff 5c              |Bn \    |		CLR.W	(A6-0xa4)
00026e7e 42 6e ff 5e              |Bn ^    |		CLR.W	(A6-0xa2)
00026e82 42 ae ff 60              |B  `    |		CLR.L	(A6-0xa0)
00026e86 3d 7c 00 04 ff 64        |=|   d  |		MOVE.W	#0x4,(A6-0x9c)
00026e8c 42 6e ff 66              |Bn f    |		CLR.W	(A6-0x9a)
00026e90 42 ae ff 68              |B  h    |		CLR.L	(A6-0x98)
00026e94 2d 7c 00 00 00 34 ff 6c  |-|   4 l|		MOVE.L	#0x34,(A6-0x94)
00026e9c 42 6e ff 70              |Bn p    |		CLR.W	(A6-0x90)
00026ea0 20 11                    |        |		MOVE.L	(A1),D0
00026ea2 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00026ea8 63 02                    |c       |		BLS	0x26eac
00026eaa 4e 4f                    |NO      |		TRAP	#15
00026eac 3d 40 ff 72              |=@ r    |		MOVE.W	D0,(A6-0x8e)
00026eb0 42 6e ff 74              |Bn t    |		CLR.W	(A6-0x8c)
00026eb4 3d 42 ff 76              |=B v    |		MOVE.W	D2,(A6-0x8a)
00026eb8 2d 7c 00 00 00 2c ff 78  |-|   , x|		MOVE.L	#0x2c,(A6-0x88)
00026ec0 2d 7c 00 00 00 03 ff 7c  |-|     ||		MOVE.L	#0x3,(A6-0x84)
00026ec8 2d 6e ff 6c ff 80        |-n l    |		MOVE.L	(A6-0x94),(A6-0x80)
00026ece 1d 7c 00 69 ff 84        | | i    |		MOVE.B	#0x69,(A6-0x7c)
00026ed4 1d 7c 00 66 ff 85        | | f    |		MOVE.B	#0x66,(A6-0x7b)
00026eda 1d 7c 00 5f ff 86        | | _    |		MOVE.B	#0x5f,(A6-0x7a)
00026ee0 1d 7c 00 74 ff 87        | | t    |		MOVE.B	#0x74,(A6-0x79)
00026ee6 1d 7c 00 63 ff 88        | | c    |		MOVE.B	#0x63,(A6-0x78)
00026eec 1d 7c 00 70 ff 89        | | p    |		MOVE.B	#0x70,(A6-0x77)
00026ef2 42 2e ff 8a              |B.      |		CLR.B	(A6-0x76)
00026ef6 42 2e ff 8b              |B.      |		CLR.B	(A6-0x75)
00026efa 2d 51 ff 8c              |-Q      |		MOVE.L	(A1),(A6-0x74)
00026efe 2d 7a a2 50 ff dc        |-z P    |		MOVE.L	0x21150,(A6-0x24)
00026f04 2d 7a a2 4e ff e0        |-z N    |		MOVE.L	0x21154,(A6-0x20)
00026f0a 2d 7a a2 4c ff e4        |-z L    |		MOVE.L	0x21158,(A6-0x1c)
00026f10 2d 7a a2 4a ff e8        |-z J    |		MOVE.L	0x2115c,(A6-0x18)
00026f16 02 2e 00 80 ff e1        | .      |		ANDI.B	#0x80,(A6-0x1f)
00026f1c 00 2e 00 06 ff e1        | .      |		ORI.B	#0x06,(A6-0x1f)
00026f22 02 2e 00 80 ff e7        | .      |		ANDI.B	#0x80,(A6-0x19)
00026f28 85 2e ff e7              | .      |		OR.B	D2,(A6-0x19)
00026f2c 20 11                    |        |		MOVE.L	(A1),D0
00026f2e 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00026f34 63 02                    |c       |		BLS	0x26f38
00026f36 4e 4f                    |NO      |		TRAP	#15
00026f38 1d 40 ff e6              | @      |		MOVE.B	D0,(A6-0x1a)
00026f3c 2d 6e ff dc ff ec        |-n      |		MOVE.L	(A6-0x24),(A6-0x14)
00026f42 2d 6e ff e0 ff f0        |-n      |		MOVE.L	(A6-0x20),(A6-0x10)
00026f48 2d 6e ff e4 ff f4        |-n      |		MOVE.L	(A6-0x1c),(A6-0xc)
00026f4e 2d 6e ff e8 ff f8        |-n      |		MOVE.L	(A6-0x18),(A6-0x8)
00026f54 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00026f58 41 ee ff 5c              |A  \    |		LEA.L	(A6-0xa4),A0
00026f5c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00026f5e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00026f60 48 78 00 80              |Hx      |		PEA.L	0x80
00026f64 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
00026f6a 48 78 00 00              |Hx      |		PEA.L	0x0
00026f6e 4e ba b7 f6              |N       |		JSR	0x22766
00026f72 de fc 00 14              |        |		ADDA.W	#0x14,A7
00026f76 3e 81                    |>       |		MOVE.W	D1,(A7)
00026f78 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00026f7c 4e ba b6 f8              |N       |		JSR	0x22676
00026f80 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00026f82 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
00026f86 66 0a                    |f       |		BNE	0x26f92
00026f88 48 78 00 27              |Hx '    |		PEA.L	0x27
00026f8c 4e ba a3 9e              |N       |		JSR	0x2132c
00026f90 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00026f92 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00026f94 1f 01                    |        |		MOVE.B	D1,-(A7)
00026f96 48 78 00 01              |Hx      |		PEA.L	0x1
00026f9a 42 67                    |Bg      |		CLR.W	-(A7)
00026f9c 4e ba dd 2c              |N  ,    |		JSR	0x24cca
00026fa0 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00026fa4 4a 39 00 02 d0 2c        |J9   ,  |		TST.B	0x2d02c
00026faa 6f 10                    |o       |		BLE	0x26fbc
00026fac 4a 39 00 02 cc 1d        |J9      |		TST.B	0x2cc1d
00026fb2 66 08                    |f       |		BNE	0x26fbc
00026fb4 4a 39 00 02 cc 1e        |J9      |		TST.B	0x2cc1e
00026fba 67 28                    |g(      |		BEQ	0x26fe4
00026fbc 2f 39 00 02 c7 e6        |/9      |		MOVE.L	0x2c7e6,-(A7)
00026fc2 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
00026fc8 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
00026fce 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
00026fd4 4e ba ac ba              |N       |		JSR	0x21c90
00026fd8 de fc 00 10              |        |		ADDA.W	#0x10,A7
00026fdc 4e ba cb 6a              |N  j    |		JSR	0x23b48
00026fe0 4e ba b9 f2              |N       |		JSR	0x229d4
00026fe4 4c df 03 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1
00026fe8 4e 5e                    |N^      |		UNLK	A6
00026fea 4e 75                    |Nu      |		RTS
00026fec ; --------------------------------------------------------------------------------------
00026fec ; OMSI PASCAL Function
00026fec ;    <LVAR -0x008 @ 1(r)>
00026fec ;    <LVAR -0x020 4(w)>
00026fec ;    <LVAR -0x024 4(w)>
00026fec ;    <LVAR -0x028 4(w)>
00026fec ;    <LVAR -0x02c @ 4(w)>
00026fec ;    <LVAR -0x030 4(rw)>
00026fec ;    <LVAR -0x031 1(w)>
00026fec ;    <LVAR -0x032 1(w)>
00026fec ;    <LVAR -0x034 4(rw)>
00026fec ;    <LVAR -0x037 1(w)>
00026fec ;    <LVAR -0x038 4(rw)>
00026fec ;    <LVAR -0x03c 4(rw)>
00026fec ;    <LVAR -0x040 4(w)>
00026fec ;    <LVAR -0x05c 4(r)>
00026fec ;    <LVAR -0x05e 2(r)>
00026fec ;    <LVAR -0x060 2(r)>
00026fec ;    <LVAR -0x07c 4(w)>
00026fec ;    <LVAR -0x07e 2(w)>
00026fec ;    <LVAR -0x080 @ 2(w)>
00026fec ;    <LVAR -0x084 4(w)>
00026fec ;    <LVAR -0x086 2(r)>
00026fec ;    <LVAR -0x088 2(r)>
00026fec ;    <LVAR -0x08a 2(r)>
00026fec ;    <LVAR -0x08c 2(r)>
00026fec ;    <LVAR -0x08d 1(r)>
00026fec ;    <LVAR -0x08e 1(r)>
00026fec ;    <LVAR -0x08f 1(w)>
00026fec ;    <LVAR -0x090 1(w)>
00026fec ;    <LVAR -0x091 1(w)>
00026fec ;    <LVAR -0x092 1(w)>
00026fec ;    <LVAR -0x093 1(w)>
00026fec ;    <LVAR -0x094 1(w)>
00026fec ;    <LVAR -0x098 4(w)>
00026fec ;    <LVAR -0x09c 4(w)>
00026fec ;    <LVAR -0x0a0 4(w)>
00026fec ;    <LVAR -0x0a2 2(w)>
00026fec ;    <LVAR -0x0a4 2(r)>
00026fec ;    <LVAR -0x0a6 2(w)>
00026fec ;    <LVAR -0x0a8 2(r)>
00026fec ;    <LVAR -0x0ac 4(rw)>
00026fec ;    <LVAR -0x0b0 4(r)>
00026fec ;    <LVAR -0x0b2 2(r)>
00026fec ;    <LVAR -0x0b4 2(w)>
00026fec ;    <LVAR -0x0b8 4(r)>
00026fec ;    <LVAR -0x0ba 2(r)>
00026fec ;    <LVAR -0x0bc @ 2(r)>
00026fec ; --------------------------------------------------------------------------------------
00026fec 4e 56 fe ec              |NV      |		LINK.W	A6,#0xfeec
00026ff0 bf d5                    |        |		CMPA.L	(A5),A7
00026ff2 62 06                    |b       |		BHI	0x26ffa
00026ff4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00026ff8 4e 76                    |Nv      |		TRAPV
00026ffa de fc 00 54              |   T    |		ADDA.W	#0x54,A7
00026ffe 48 e7 ff e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00027002 45 f9 00 02 c7 c4        |E       |		LEA.L	0x2c7c4,A2
00027008 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002700a 74 07                    |t       |		MOVEQ.L	#0x07,D2
0002700c 7a 0f                    |z       |		MOVEQ.L	#0x0f,D5
0002700e 2c 3c 00 00 ff ff        |,<      |		MOVE.L	#0xffff,D6
00027014 9e fc 00 16              |        |		SUBA.W	#0x16,A7
00027018 20 4f                    | O      |		MOVEA.L	A7,A0
0002701a 43 fa 9e 0a              |C       |		LEA.L	0x20e26,A1
0002701e 70 14                    |p       |		MOVEQ.L	#0x14,D0
00027020 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00027022 51 c8 ff fc              |Q       |		DBF	D0,0x27020
00027026 1f 01                    |        |		MOVE.B	D1,-(A7)
00027028 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002702a 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002702e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00027030 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
00027034 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002703a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002703c 4e ba b1 fa              |N       |		JSR	0x22238
00027040 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00027044 42 6e ff 44              |Bn D    |		CLR.W	(A6-0xbc)
00027048 42 6e ff 46              |Bn F    |		CLR.W	(A6-0xba)
0002704c 42 ae ff 48              |B  H    |		CLR.L	(A6-0xb8)
00027050 3d 7c 00 50 ff 4c        |=| P L  |		MOVE.W	#0x50,(A6-0xb4)
00027056 42 6e ff 4e              |Bn N    |		CLR.W	(A6-0xb2)
0002705a 42 ae ff 50              |B  P    |		CLR.L	(A6-0xb0)
0002705e 2d 7c 00 00 00 34 ff 54  |-|   4 T|		MOVE.L	#0x34,(A6-0xac)
00027066 42 6e ff 58              |Bn X    |		CLR.W	(A6-0xa8)
0002706a 20 12                    |        |		MOVE.L	(A2),D0
0002706c b0 86                    |        |		CMP.L	D6,D0
0002706e 63 02                    |c       |		BLS	0x27072
00027070 4e 4f                    |NO      |		TRAP	#15
00027072 3d 40 ff 5a              |=@ Z    |		MOVE.W	D0,(A6-0xa6)
00027076 42 6e ff 5c              |Bn \    |		CLR.W	(A6-0xa4)
0002707a 3d 7c 00 05 ff 5e        |=|   ^  |		MOVE.W	#0x5,(A6-0xa2)
00027080 2d 7c 00 00 00 2c ff 60  |-|   , `|		MOVE.L	#0x2c,(A6-0xa0)
00027088 2d 7c 00 00 00 04 ff 64  |-|     d|		MOVE.L	#0x4,(A6-0x9c)
00027090 2d 6e ff 54 ff 68        |-n T h  |		MOVE.L	(A6-0xac),(A6-0x98)
00027096 1d 7c 00 69 ff 6c        | | i l  |		MOVE.B	#0x69,(A6-0x94)
0002709c 1d 7c 00 66 ff 6d        | | f m  |		MOVE.B	#0x66,(A6-0x93)
000270a2 1d 7c 00 5f ff 6e        | | _ n  |		MOVE.B	#0x5f,(A6-0x92)
000270a8 1d 7c 00 74 ff 6f        | | t o  |		MOVE.B	#0x74,(A6-0x91)
000270ae 1d 7c 00 63 ff 70        | | c p  |		MOVE.B	#0x63,(A6-0x90)
000270b4 1d 7c 00 70 ff 71        | | p q  |		MOVE.B	#0x70,(A6-0x8f)
000270ba 42 2e ff 72              |B. r    |		CLR.B	(A6-0x8e)
000270be 42 2e ff 73              |B. s    |		CLR.B	(A6-0x8d)
000270c2 42 6e ff 74              |Bn t    |		CLR.W	(A6-0x8c)
000270c6 42 6e ff 76              |Bn v    |		CLR.W	(A6-0x8a)
000270ca 42 6e ff 78              |Bn x    |		CLR.W	(A6-0x88)
000270ce 42 6e ff 7a              |Bn z    |		CLR.W	(A6-0x86)
000270d2 2d 52 ff 7c              |-R |    |		MOVE.L	(A2),(A6-0x84)
000270d6 3d 7c 00 02 ff 80        |=|      |		MOVE.W	#0x2,(A6-0x80)
000270dc 42 84                    |B       |		CLR.L	D4
000270de 38 39 00 02 d8 b4        |89      |		MOVE.W	0x2d8b4,D4
000270e4 26 06                    |&       |		MOVE.L	D6,D3
000270e6 4e b9 00 01 02 98        |N       |		JSR	?divu_d3_d4
000270ec c6 86                    |        |		AND.L	D6,D3
000270ee 3d 43 ff 82              |=C      |		MOVE.W	D3,(A6-0x7e)
000270f2 2d 79 00 02 d0 24 ff 84  |-y   $  |		MOVE.L	0x2d024,(A6-0x7c)
000270fa 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000270fc be 82                    |        |		CMP.L	D2,D7
000270fe 63 02                    |c       |		BLS	0x27102
00027100 4e 4f                    |NO      |		TRAP	#15
00027102 41 ee ff 80              |A       |		LEA.L	(A6-0x80),A0
00027106 42 30 78 08              |B0x     |		CLR.B	(A0+D7.L+#0x8)
0002710a 52 87                    |R       |		ADDQ.L	#0x1,D7
0002710c be 82                    |        |		CMP.L	D2,D7
0002710e 6f ec                    |o       |		BLE	0x270fc
00027110 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027112 be 85                    |        |		CMP.L	D5,D7
00027114 63 02                    |c       |		BLS	0x27118
00027116 4e 4f                    |NO      |		TRAP	#15
00027118 41 ee ff 80              |A       |		LEA.L	(A6-0x80),A0
0002711c 42 30 78 10              |B0x     |		CLR.B	(A0+D7.L+#0x10)
00027120 52 87                    |R       |		ADDQ.L	#0x1,D7
00027122 be 85                    |        |		CMP.L	D5,D7
00027124 6f ec                    |o       |		BLE	0x27112
00027126 42 6e ff a0              |Bn      |		CLR.W	(A6-0x60)
0002712a 42 6e ff a2              |Bn      |		CLR.W	(A6-0x5e)
0002712e 42 ae ff a4              |B       |		CLR.L	(A6-0x5c)
00027132 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027134 be 82                    |        |		CMP.L	D2,D7
00027136 63 02                    |c       |		BLS	0x2713a
00027138 4e 4f                    |NO      |		TRAP	#15
0002713a 42 36 78 a8              |B6x     |		CLR.B	(A6+D7.L-#0x58)
0002713e 52 87                    |R       |		ADDQ.L	#0x1,D7
00027140 be 82                    |        |		CMP.L	D2,D7
00027142 6f f0                    |o       |		BLE	0x27134
00027144 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027146 be 85                    |        |		CMP.L	D5,D7
00027148 63 02                    |c       |		BLS	0x2714c
0002714a 4e 4f                    |NO      |		TRAP	#15
0002714c 42 36 78 b0              |B6x     |		CLR.B	(A6+D7.L-#0x50)
00027150 52 87                    |R       |		ADDQ.L	#0x1,D7
00027152 be 85                    |        |		CMP.L	D5,D7
00027154 6f f0                    |o       |		BLE	0x27146
00027156 2d 41 ff c0              |-A      |		MOVE.L	D1,(A6-0x40)
0002715a 2d 7a 9f f4 ff c4        |-z      |		MOVE.L	0x21150,(A6-0x3c)
00027160 2d 7a 9f f2 ff c8        |-z      |		MOVE.L	0x21154,(A6-0x38)
00027166 2d 7a 9f f0 ff cc        |-z      |		MOVE.L	0x21158,(A6-0x34)
0002716c 2d 7a 9f ee ff d0        |-z      |		MOVE.L	0x2115c,(A6-0x30)
00027172 02 2e 00 80 ff c9        | .      |		ANDI.B	#0x80,(A6-0x37)
00027178 00 2e 00 06 ff c9        | .      |		ORI.B	#0x06,(A6-0x37)
0002717e 02 2e 00 80 ff cf        | .      |		ANDI.B	#0x80,(A6-0x31)
00027184 00 2e 00 05 ff cf        | .      |		ORI.B	#0x05,(A6-0x31)
0002718a 20 12                    |        |		MOVE.L	(A2),D0
0002718c 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00027192 63 02                    |c       |		BLS	0x27196
00027194 4e 4f                    |NO      |		TRAP	#15
00027196 1d 40 ff ce              | @      |		MOVE.B	D0,(A6-0x32)
0002719a 2d 6e ff c4 ff d4        |-n      |		MOVE.L	(A6-0x3c),(A6-0x2c)
000271a0 2d 6e ff c8 ff d8        |-n      |		MOVE.L	(A6-0x38),(A6-0x28)
000271a6 2d 6e ff cc ff dc        |-n      |		MOVE.L	(A6-0x34),(A6-0x24)
000271ac 2d 6e ff d0 ff e0        |-n      |		MOVE.L	(A6-0x30),(A6-0x20)
000271b2 48 6e ff d4              |Hn      |		PEA.L	(A6-0x2c)
000271b6 41 ee ff 44              |A  D    |		LEA.L	(A6-0xbc),A0
000271ba 2f 08                    |/       |		MOVE.L	A0,-(A7)
000271bc 3f 01                    |?       |		MOVE.W	D1,-(A7)
000271be 48 78 00 80              |Hx      |		PEA.L	0x80
000271c2 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
000271c8 48 78 00 00              |Hx      |		PEA.L	0x0
000271cc 4e ba b5 98              |N       |		JSR	0x22766
000271d0 de fc 00 14              |        |		ADDA.W	#0x14,A7
000271d4 3e 81                    |>       |		MOVE.W	D1,(A7)
000271d6 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000271da 4e ba b4 9a              |N       |		JSR	0x22676
000271de 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000271e0 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
000271e4 66 0a                    |f       |		BNE	0x271f0
000271e6 48 78 00 1d              |Hx      |		PEA.L	0x1d
000271ea 4e ba a1 40              |N  @    |		JSR	0x2132c
000271ee 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000271f0 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000271f2 1f 01                    |        |		MOVE.B	D1,-(A7)
000271f4 48 78 00 01              |Hx      |		PEA.L	0x1
000271f8 42 67                    |Bg      |		CLR.W	-(A7)
000271fa 4e ba da ce              |N       |		JSR	0x24cca
000271fe de fc 00 0c              |        |		ADDA.W	#0xc,A7
00027202 4a 39 00 02 d0 2c        |J9   ,  |		TST.B	0x2d02c
00027208 6f 10                    |o       |		BLE	0x2721a
0002720a 4a 39 00 02 cc 1d        |J9      |		TST.B	0x2cc1d
00027210 66 08                    |f       |		BNE	0x2721a
00027212 4a 39 00 02 cc 1e        |J9      |		TST.B	0x2cc1e
00027218 67 28                    |g(      |		BEQ	0x27242
0002721a 2f 39 00 02 c7 e6        |/9      |		MOVE.L	0x2c7e6,-(A7)
00027220 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
00027226 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
0002722c 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
00027232 4e ba aa 5c              |N  \    |		JSR	0x21c90
00027236 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002723a 4e ba c9 0c              |N       |		JSR	0x23b48
0002723e 4e ba b7 94              |N       |		JSR	0x229d4
00027242 4c df 07 ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2
00027246 4e 5e                    |N^      |		UNLK	A6
00027248 4e 75                    |Nu      |		RTS
0002724a ; --------------------------------------------------------------------------------------
0002724a ; OMSI PASCAL Function
0002724a ;    <LVAR  0x008 4(r)>
0002724a ;    <LVAR -0x006 4(rw)>
0002724a ;    <LVAR -0x00a 4(rw)>
0002724a ;    <LVAR -0x00e 4(rw)>
0002724a ;    <LVAR -0x012 4(rw)>
0002724a ;    <LVAR -0x014 @ 1(r)>
0002724a ;    <LVAR -0x018 4(rw)>
0002724a ;    <LVAR -0x019 1(w)>
0002724a ;    <LVAR -0x01a 1(w)>
0002724a ;    <LVAR -0x01c 4(rw)>
0002724a ;    <LVAR -0x01f 1(w)>
0002724a ;    <LVAR -0x020 4(rw)>
0002724a ;    <LVAR -0x024 4(rw)>
0002724a ;    <LVAR -0x028 4(w)>
0002724a ;    <LVAR -0x044 4(w)>
0002724a ;    <LVAR -0x046 2(w)>
0002724a ;    <LVAR -0x048 2(w)>
0002724a ;    <LVAR -0x064 4(w)>
0002724a ;    <LVAR -0x066 2(w)>
0002724a ;    <LVAR -0x068 2(w)>
0002724a ;    <LVAR -0x06c 4(w)>
0002724a ;    <LVAR -0x06e 2(r)>
0002724a ;    <LVAR -0x070 2(r)>
0002724a ;    <LVAR -0x072 2(r)>
0002724a ;    <LVAR -0x074 2(r)>
0002724a ;    <LVAR -0x076 2(w)>
0002724a ;    <LVAR -0x078 2(r)>
0002724a ;    <LVAR -0x07a 2(rw)>
0002724a ;    <LVAR -0x07c 2(r)>
0002724a ;    <LVAR -0x080 4(w)>
0002724a ;    <LVAR -0x084 4(r)>
0002724a ;    <LVAR -0x086 2(r)>
0002724a ;    <LVAR -0x088 2(w)>
0002724a ;    <LVAR -0x08c 4(r)>
0002724a ;    <LVAR -0x08e 2(r)>
0002724a ;    <LVAR -0x090 @ 2(r)>
0002724a ;    <LVAR -0x09c 4(rw)>
0002724a ;    <LVAR -0x0a0 4(rw)>
0002724a ;    <LVAR -0x0a4 4(rw)>
0002724a ;    <LVAR -0x0a8 @ 4(rw)>
0002724a ; --------------------------------------------------------------------------------------
0002724a 4e 56 ff 02              |NV      |		LINK.W	A6,#0xff02
0002724e bf d5                    |        |		CMPA.L	(A5),A7
00027250 62 06                    |b       |		BHI	0x27258
00027252 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00027256 4e 76                    |Nv      |		TRAPV
00027258 de fc 00 56              |   V    |		ADDA.W	#0x56,A7
0002725c 48 e7 ff c0              |H       |		MOVEM.L	A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00027260 43 f9 00 02 c7 c4        |C       |		LEA.L	0x2c7c4,A1
00027266 72 01                    |r       |		MOVEQ.L	#0x01,D1
00027268 74 07                    |t       |		MOVEQ.L	#0x07,D2
0002726a 7a 0f                    |z       |		MOVEQ.L	#0x0f,D5
0002726c 7c 02                    ||       |		MOVEQ.L	#0x02,D6
0002726e 41 fa 9b e8              |A       |		LEA.L	0x20e58,A0
00027272 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027274 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00027276 51 c8 ff fc              |Q       |		DBF	D0,0x27274
0002727a 1f 01                    |        |		MOVE.B	D1,-(A7)
0002727c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002727e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00027282 3f 01                    |?       |		MOVE.W	D1,-(A7)
00027284 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00027288 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002728e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027290 4e ba af a6              |N       |		JSR	0x22238
00027294 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00027298 42 6e ff 70              |Bn p    |		CLR.W	(A6-0x90)
0002729c 42 6e ff 72              |Bn r    |		CLR.W	(A6-0x8e)
000272a0 42 ae ff 74              |B  t    |		CLR.L	(A6-0x8c)
000272a4 3d 7c 00 50 ff 78        |=| P x  |		MOVE.W	#0x50,(A6-0x88)
000272aa 42 6e ff 7a              |Bn z    |		CLR.W	(A6-0x86)
000272ae 42 ae ff 7c              |B  |    |		CLR.L	(A6-0x84)
000272b2 2d 7c 00 00 00 20 ff 80  |-|      |		MOVE.L	#0x20,(A6-0x80)
000272ba 42 6e ff 84              |Bn      |		CLR.W	(A6-0x7c)
000272be 20 11                    |        |		MOVE.L	(A1),D0
000272c0 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
000272c6 63 02                    |c       |		BLS	0x272ca
000272c8 4e 4f                    |NO      |		TRAP	#15
000272ca 3d 40 ff 86              |=@      |		MOVE.W	D0,(A6-0x7a)
000272ce 42 6e ff 88              |Bn      |		CLR.W	(A6-0x78)
000272d2 3d 46 ff 8a              |=F      |		MOVE.W	D6,(A6-0x76)
000272d6 42 6e ff 8c              |Bn      |		CLR.W	(A6-0x74)
000272da 42 6e ff 8e              |Bn      |		CLR.W	(A6-0x72)
000272de 42 6e ff 90              |Bn      |		CLR.W	(A6-0x70)
000272e2 42 6e ff 92              |Bn      |		CLR.W	(A6-0x6e)
000272e6 2d 51 ff 94              |-Q      |		MOVE.L	(A1),(A6-0x6c)
000272ea 3d 46 ff 98              |=F      |		MOVE.W	D6,(A6-0x68)
000272ee 42 84                    |B       |		CLR.L	D4
000272f0 38 39 00 02 d8 b4        |89      |		MOVE.W	0x2d8b4,D4
000272f6 26 3c 00 00 ff ff        |&<      |		MOVE.L	#0xffff,D3
000272fc 4e b9 00 01 02 98        |N       |		JSR	?divu_d3_d4
00027302 02 83 00 00 ff ff        |        |		ANDI.L	#0x0000ffff,D3
00027308 3d 43 ff 9a              |=C      |		MOVE.W	D3,(A6-0x66)
0002730c 2d 79 00 02 d0 24 ff 9c  |-y   $  |		MOVE.L	0x2d024,(A6-0x64)
00027314 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027316 be 82                    |        |		CMP.L	D2,D7
00027318 63 02                    |c       |		BLS	0x2731c
0002731a 4e 4f                    |NO      |		TRAP	#15
0002731c 42 36 78 a0              |B6x     |		CLR.B	(A6+D7.L-#0x60)
00027320 52 87                    |R       |		ADDQ.L	#0x1,D7
00027322 be 82                    |        |		CMP.L	D2,D7
00027324 6f f0                    |o       |		BLE	0x27316
00027326 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027328 be 85                    |        |		CMP.L	D5,D7
0002732a 63 02                    |c       |		BLS	0x2732e
0002732c 4e 4f                    |NO      |		TRAP	#15
0002732e 42 36 78 a8              |B6x     |		CLR.B	(A6+D7.L-#0x58)
00027332 52 87                    |R       |		ADDQ.L	#0x1,D7
00027334 be 85                    |        |		CMP.L	D5,D7
00027336 6f f0                    |o       |		BLE	0x27328
00027338 3d 46 ff b8              |=F      |		MOVE.W	D6,(A6-0x48)
0002733c 3d 7c 01 1a ff ba        |=|      |		MOVE.W	#0x11a,(A6-0x46)
00027342 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027344 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00027348 4e ba e4 ba              |N       |		JSR	0x25804
0002734c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002734e 2d 5f ff bc              |-_      |		MOVE.L	(A7)+,(A6-0x44)
00027352 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027354 be 82                    |        |		CMP.L	D2,D7
00027356 63 02                    |c       |		BLS	0x2735a
00027358 4e 4f                    |NO      |		TRAP	#15
0002735a 42 36 78 c0              |B6x     |		CLR.B	(A6+D7.L-#0x40)
0002735e 52 87                    |R       |		ADDQ.L	#0x1,D7
00027360 be 82                    |        |		CMP.L	D2,D7
00027362 6f f0                    |o       |		BLE	0x27354
00027364 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00027366 be 85                    |        |		CMP.L	D5,D7
00027368 63 02                    |c       |		BLS	0x2736c
0002736a 4e 4f                    |NO      |		TRAP	#15
0002736c 42 36 78 c8              |B6x     |		CLR.B	(A6+D7.L-#0x38)
00027370 52 87                    |R       |		ADDQ.L	#0x1,D7
00027372 be 85                    |        |		CMP.L	D5,D7
00027374 6f f0                    |o       |		BLE	0x27366
00027376 2d 7c 00 00 00 05 ff d8  |-|      |		MOVE.L	#0x5,(A6-0x28)
0002737e 2d 7a 9d d0 ff dc        |-z      |		MOVE.L	0x21150,(A6-0x24)
00027384 2d 7a 9d ce ff e0        |-z      |		MOVE.L	0x21154,(A6-0x20)
0002738a 2d 7a 9d cc ff e4        |-z      |		MOVE.L	0x21158,(A6-0x1c)
00027390 2d 7a 9d ca ff e8        |-z      |		MOVE.L	0x2115c,(A6-0x18)
00027396 02 2e 00 80 ff e1        | .      |		ANDI.B	#0x80,(A6-0x1f)
0002739c 00 2e 00 06 ff e1        | .      |		ORI.B	#0x06,(A6-0x1f)
000273a2 02 2e 00 80 ff e7        | .      |		ANDI.B	#0x80,(A6-0x19)
000273a8 00 2e 00 05 ff e7        | .      |		ORI.B	#0x05,(A6-0x19)
000273ae 30 2e ff 86              |0.      |		MOVE.W	(A6-0x7a),D0
000273b2 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
000273b6 1d 40 ff e6              | @      |		MOVE.B	D0,(A6-0x1a)
000273ba 2d 6e ff dc ff 58        |-n   X  |		MOVE.L	(A6-0x24),(A6-0xa8)
000273c0 2d 6e ff e0 ff 5c        |-n   \  |		MOVE.L	(A6-0x20),(A6-0xa4)
000273c6 2d 6e ff e4 ff 60        |-n   `  |		MOVE.L	(A6-0x1c),(A6-0xa0)
000273cc 2d 6e ff e8 ff 64        |-n   d  |		MOVE.L	(A6-0x18),(A6-0x9c)
000273d2 48 6e ff 58              |Hn X    |		PEA.L	(A6-0xa8)
000273d6 41 ee ff 70              |A  p    |		LEA.L	(A6-0x90),A0
000273da 2f 08                    |/       |		MOVE.L	A0,-(A7)
000273dc 3f 01                    |?       |		MOVE.W	D1,-(A7)
000273de 48 78 00 6c              |Hx l    |		PEA.L	0x6c
000273e2 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
000273e8 48 78 00 00              |Hx      |		PEA.L	0x0
000273ec 4e ba b3 78              |N  x    |		JSR	0x22766
000273f0 de fc 00 14              |        |		ADDA.W	#0x14,A7
000273f4 3e 81                    |>       |		MOVE.W	D1,(A7)
000273f6 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
000273fa 4e ba b2 7a              |N  z    |		JSR	0x22676
000273fe 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027400 4a 39 00 02 d0 2c        |J9   ,  |		TST.B	0x2d02c
00027406 6e 30                    |n0      |		BGT	0x27438
00027408 2d 6e ff 58 ff ee        |-n X    |		MOVE.L	(A6-0xa8),(A6-0x12)
0002740e 2d 6e ff 5c ff f2        |-n \    |		MOVE.L	(A6-0xa4),(A6-0xe)
00027414 2d 6e ff 60 ff f6        |-n `    |		MOVE.L	(A6-0xa0),(A6-0xa)
0002741a 2d 6e ff 64 ff fa        |-n d    |		MOVE.L	(A6-0x9c),(A6-0x6)
00027420 2f 2e ff fa              |/.      |		MOVE.L	(A6-0x6),-(A7)
00027424 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
00027428 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
0002742c 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
00027430 4e ba a8 5e              |N  ^    |		JSR	0x21c90
00027434 de fc 00 10              |        |		ADDA.W	#0x10,A7
00027438 4a 2e ff ec              |J.      |		TST.B	(A6-0x14)
0002743c 66 0a                    |f       |		BNE	0x27448
0002743e 48 78 00 28              |Hx (    |		PEA.L	0x28
00027442 4e ba 9e e8              |N       |		JSR	0x2132c
00027446 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027448 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002744a 1f 01                    |        |		MOVE.B	D1,-(A7)
0002744c 48 78 00 01              |Hx      |		PEA.L	0x1
00027450 42 67                    |Bg      |		CLR.W	-(A7)
00027452 4e ba d8 76              |N  v    |		JSR	0x24cca
00027456 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002745a 4a 39 00 02 d0 2c        |J9   ,  |		TST.B	0x2d02c
00027460 6f 10                    |o       |		BLE	0x27472
00027462 4a 39 00 02 cc 2f        |J9   /  |		TST.B	0x2cc2f
00027468 66 08                    |f       |		BNE	0x27472
0002746a 4a 39 00 02 cc 30        |J9   0  |		TST.B	0x2cc30
00027470 67 28                    |g(      |		BEQ	0x2749a
00027472 2f 39 00 02 c7 e6        |/9      |		MOVE.L	0x2c7e6,-(A7)
00027478 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
0002747e 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
00027484 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
0002748a 4e ba a8 04              |N       |		JSR	0x21c90
0002748e de fc 00 10              |        |		ADDA.W	#0x10,A7
00027492 4e ba c6 b4              |N       |		JSR	0x23b48
00027496 4e ba b5 3c              |N  <    |		JSR	0x229d4
0002749a 4c df 03 ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1
0002749e 4e 5e                    |N^      |		UNLK	A6
000274a0 4e 75                    |Nu      |		RTS
000274a2 ; --------------------------------------------------------------------------------------
000274a2 ; OMSI PASCAL Function
000274a2 ;    <LVAR  0x008 4(r)>
000274a2 ;    <LVAR -0x00c @>
000274a2 ;    <LVAR -0x014 4(rw)>
000274a2 ;    <LVAR -0x018 4(rw)>
000274a2 ;    <LVAR -0x01c 4(rw)>
000274a2 ;    <LVAR -0x020 @ 4(rw)>
000274a2 ;    <LVAR -0x022 2(w)>
000274a2 ;    <LVAR -0x023 1(w)>
000274a2 ;    <LVAR -0x024 1(w) 4(rw)>
000274a2 ;    <LVAR -0x025 1(w)>
000274a2 ;    <LVAR -0x026 1(w)>
000274a2 ;    <LVAR -0x028 4(rw)>
000274a2 ;    <LVAR -0x02b 1(w)>
000274a2 ;    <LVAR -0x02c 4(rw)>
000274a2 ;    <LVAR -0x030 4(rw)>
000274a2 ;    <LVAR -0x430 @>
000274a2 ; --------------------------------------------------------------------------------------
000274a2 4e 56 fb 80              |NV      |		LINK.W	A6,#0xfb80
000274a6 bf d5                    |        |		CMPA.L	(A5),A7
000274a8 62 06                    |b       |		BHI	0x274b0
000274aa 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000274ae 4e 76                    |Nv      |		TRAPV
000274b0 de fc 00 50              |   P    |		ADDA.W	#0x50,A7
000274b4 48 e7 e1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
000274b8 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
000274bc 47 ee ff dc              |G       |		LEA.L	(A6-0x24),A3
000274c0 49 ee ff e0              |I       |		LEA.L	(A6-0x20),A4
000274c4 74 01                    |t       |		MOVEQ.L	#0x01,D2
000274c6 9e fc 00 1a              |        |		SUBA.W	#0x1a,A7
000274ca 20 4f                    | O      |		MOVEA.L	A7,A0
000274cc 43 fa 99 8a              |C       |		LEA.L	0x20e58,A1
000274d0 70 18                    |p       |		MOVEQ.L	#0x18,D0
000274d2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000274d4 51 c8 ff fc              |Q       |		DBF	D0,0x274d2
000274d8 1f 02                    |        |		MOVE.B	D2,-(A7)
000274da 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000274dc 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000274e0 3f 02                    |?       |		MOVE.W	D2,-(A7)
000274e2 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
000274e6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000274ec 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000274ee 4e ba ad 48              |N  H    |		JSR	0x22238
000274f2 de fc 00 20              |        |		ADDA.W	#0x20,A7
000274f6 20 52                    | R      |		MOVEA.L	(A2),A0
000274f8 1f 02                    |        |		MOVE.B	D2,-(A7)
000274fa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000274fc 2f 10                    |/       |		MOVE.L	(A0),-(A7)
000274fe 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00027504 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027506 4e ba ad 30              |N  0    |		JSR	0x22238
0002750a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002750c 20 50                    | P      |		MOVEA.L	(A0),A0
0002750e 30 10                    |0       |		MOVE.W	(A0),D0
00027510 48 c0                    |H       |		EXTW.L	D0
00027512 2f 00                    |/       |		MOVE.L	D0,-(A7)
00027514 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00027516 be 97                    |        |		CMP.L	(A7),D7
00027518 6e 2e                    |n.      |		BGT	0x27548
0002751a 20 07                    |        |		MOVE.L	D7,D0
0002751c 53 80                    |S       |		SUBQ.L	#0x1,D0
0002751e 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
00027524 63 02                    |c       |		BLS	0x27528
00027526 4e 4f                    |NO      |		TRAP	#15
00027528 41 ee fb d0              |A       |		LEA.L	(A6-0x430),A0
0002752c 22 52                    |"R      |		MOVEA.L	(A2),A1
0002752e 22 51                    |"Q      |		MOVEA.L	(A1),A1
00027530 22 07                    |"       |		MOVE.L	D7,D1
00027532 53 81                    |S       |		SUBQ.L	#0x1,D1
00027534 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
0002753a 63 02                    |c       |		BLS	0x2753e
0002753c 4e 4f                    |NO      |		TRAP	#15
0002753e 11 b1 18 02 08 00        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L)
00027544 52 87                    |R       |		ADDQ.L	#0x1,D7
00027546 68 ce                    |h       |		BVC	0x27516
00027548 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002754a 2d 7a 9c 04 ff d0        |-z      |		MOVE.L	0x21150,(A6-0x30)
00027550 2d 7a 9c 02 ff d4        |-z      |		MOVE.L	0x21154,(A6-0x2c)
00027556 2d 7a 9c 00 ff d8        |-z      |		MOVE.L	0x21158,(A6-0x28)
0002755c 26 ba 9b fe              |&       |		MOVE.L	0x2115c,(A3)
00027560 02 2e 00 80 ff d5        | .      |		ANDI.B	#0x80,(A6-0x2b)
00027566 00 2e 00 06 ff d5        | .      |		ORI.B	#0x06,(A6-0x2b)
0002756c 20 39 00 02 c7 c4        | 9      |		MOVE.L	0x2c7c4,D0
00027572 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00027578 63 02                    |c       |		BLS	0x2757c
0002757a 4e 4f                    |NO      |		TRAP	#15
0002757c 1d 40 ff da              | @      |		MOVE.B	D0,(A6-0x26)
00027580 02 2e 00 80 ff db        | .      |		ANDI.B	#0x80,(A6-0x25)
00027586 00 2e 00 07 ff db        | .      |		ORI.B	#0x07,(A6-0x25)
0002758c 16 82                    |        |		MOVE.B	D2,(A3)
0002758e 1d 7c 00 36 ff dd        | | 6    |		MOVE.B	#0x36,(A6-0x23)
00027594 20 52                    | R      |		MOVEA.L	(A2),A0
00027596 22 50                    |"P      |		MOVEA.L	(A0),A1
00027598 30 11                    |0       |		MOVE.W	(A1),D0
0002759a 0c 40 ff ff              | @      |		CMPI.W	#0xffff,D0
0002759e 63 02                    |c       |		BLS	0x275a2
000275a0 4e 4f                    |NO      |		TRAP	#15
000275a2 3d 40 ff de              |=@      |		MOVE.W	D0,(A6-0x22)
000275a6 28 ae ff d0              |(       |		MOVE.L	(A6-0x30),(A4)
000275aa 2d 6e ff d4 ff e4        |-n      |		MOVE.L	(A6-0x2c),(A6-0x1c)
000275b0 2d 6e ff d8 ff e8        |-n      |		MOVE.L	(A6-0x28),(A6-0x18)
000275b6 2d 53 ff ec              |-S      |		MOVE.L	(A3),(A6-0x14)
000275ba 48 54                    |HT      |		PEA.L	(A4)
000275bc 43 ee fb d0              |C       |		LEA.L	(A6-0x430),A1
000275c0 2f 09                    |/       |		MOVE.L	A1,-(A7)
000275c2 3f 02                    |?       |		MOVE.W	D2,-(A7)
000275c4 42 81                    |B       |		CLR.L	D1
000275c6 32 00                    |2       |		MOVE.W	D0,D1
000275c8 2f 01                    |/       |		MOVE.L	D1,-(A7)
000275ca 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
000275d0 48 78 00 00              |Hx      |		PEA.L	0x0
000275d4 4e ba b1 90              |N       |		JSR	0x22766
000275d8 de fc 00 14              |        |		ADDA.W	#0x14,A7
000275dc 3e 82                    |>       |		MOVE.W	D2,(A7)
000275de 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
000275e2 4e ba b0 92              |N       |		JSR	0x22676
000275e6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000275e8 4a 39 00 02 d0 2c        |J9   ,  |		TST.B	0x2d02c
000275ee 6e 16                    |n       |		BGT	0x27606
000275f0 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
000275f4 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
000275f8 2f 2e ff e4              |/.      |		MOVE.L	(A6-0x1c),-(A7)
000275fc 2f 14                    |/       |		MOVE.L	(A4),-(A7)
000275fe 4e ba a6 32              |N  2    |		JSR	0x21c32
00027602 de fc 00 10              |        |		ADDA.W	#0x10,A7
00027606 48 50                    |HP      |		PEA.L	(A0)
00027608 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002760e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027610 4c df 1f 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4
00027614 4e 5e                    |N^      |		UNLK	A6
00027616 4e 75                    |Nu      |		RTS
00027618 ; --------------------------------------------------------------------------------------
00027618 ; OMSI PASCAL Function
00027618 ;    <LVAR  0x008 4(w)>
00027618 ;    <LVAR -0x008 @ 4(r)>
00027618 ; --------------------------------------------------------------------------------------
00027618 4e 56 ff 9e              |NV      |		LINK.W	A6,#0xff9e
0002761c bf d5                    |        |		CMPA.L	(A5),A7
0002761e 62 06                    |b       |		BHI	0x27626
00027620 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00027624 4e 76                    |Nv      |		TRAPV
00027626 de fc 00 56              |   V    |		ADDA.W	#0x56,A7
0002762a 48 e7 f3 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7)
0002762e 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
00027632 47 fa 9c f8              |G       |		LEA.L	0x2132c,A3
00027636 49 f9 00 02 c7 94        |I       |		LEA.L	0x2c794,A4
0002763c 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002763e 76 3a                    |v:      |		MOVEQ.L	#0x3a,D3
00027640 41 fa 98 48              |A  H    |		LEA.L	0x20e8a,A0
00027644 70 05                    |p       |		MOVEQ.L	#0x05,D0
00027646 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00027648 51 c8 ff fc              |Q       |		DBF	D0,0x27646
0002764c 1f 02                    |        |		MOVE.B	D2,-(A7)
0002764e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027650 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00027654 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027656 3f 3c 00 18              |?<      |		MOVE.W	#0x18,-(A7)
0002765a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00027660 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027662 4e ba ab d4              |N       |		JSR	0x22238
00027666 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002766a 4e ba eb 24              |N  $    |		JSR	0x26190
0002766e 48 52                    |HR      |		PEA.L	(A2)
00027670 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00027676 2e b9 00 02 c7 c4        |.       |		MOVE.L	0x2c7c4,(A7)
0002767c 1f 02                    |        |		MOVE.B	D2,-(A7)
0002767e 48 78 00 01              |Hx      |		PEA.L	0x1
00027682 42 67                    |Bg      |		CLR.W	-(A7)
00027684 4e ba d6 44              |N  D    |		JSR	0x24cca
00027688 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002768c 42 80                    |B       |		CLR.L	D0
0002768e 10 39 00 02 c7 e7        | 9      |		MOVE.B	0x2c7e7,D0
00027694 0c 40 00 ff              | @      |		CMPI.W	#0x00ff,D0
00027698 67 0c                    |g       |		BEQ	0x276a6
0002769a 42 80                    |B       |		CLR.L	D0
0002769c 30 39 00 02 c7 e8        |09      |		MOVE.W	0x2c7e8,D0
000276a2 2c 00                    |,       |		MOVE.L	D0,D6
000276a4 60 08                    |`       |		BRA	0x276ae
000276a6 48 78 00 2e              |Hx .    |		PEA.L	0x2e
000276aa 4e 93                    |N       |		JSR	(A3)
000276ac 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000276ae 42 80                    |B       |		CLR.L	D0
000276b0 10 39 00 02 cc 13        | 9      |		MOVE.B	0x2cc13,D0
000276b6 b0 43                    | C      |		CMP.W	D3,D0
000276b8 67 08                    |g       |		BEQ	0x276c2
000276ba 48 78 00 19              |Hx      |		PEA.L	0x19
000276be 4e 93                    |N       |		JSR	(A3)
000276c0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000276c2 20 06                    |        |		MOVE.L	D6,D0
000276c4 53 80                    |S       |		SUBQ.L	#0x1,D0
000276c6 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
000276cc 63 02                    |c       |		BLS	0x276d0
000276ce 4e 4f                    |NO      |		TRAP	#15
000276d0 20 4c                    | L      |		MOVEA.L	A4,A0
000276d2 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
000276d6 42 81                    |B       |		CLR.L	D1
000276d8 12 28 04 7f              | (      |		MOVE.B	(A0+0x47f),D1
000276dc b2 43                    | C      |		CMP.W	D3,D1
000276de 67 08                    |g       |		BEQ	0x276e8
000276e0 48 78 00 2a              |Hx *    |		PEA.L	0x2a
000276e4 4e 93                    |N       |		JSR	(A3)
000276e6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000276e8 20 52                    | R      |		MOVEA.L	(A2),A0
000276ea 22 06                    |"       |		MOVE.L	D6,D1
000276ec 55 81                    |U       |		SUBQ.L	#0x2,D1
000276ee 04 81 ff ff 80 00        |        |		SUBI.L	#0xffff8000,D1
000276f4 0c 81 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D1
000276fa 63 02                    |c       |		BLS	0x276fe
000276fc 4e 4f                    |NO      |		TRAP	#15
000276fe 06 81 ff ff 80 00        |        |		ADDI.L	#0xffff8000,D1
00027704 30 81                    |0       |		MOVE.W	D1,(A0)
00027706 2f 00                    |/       |		MOVE.L	D0,-(A7)
00027708 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002770a be 97                    |        |		CMP.L	(A7),D7
0002770c 6e 2a                    |n*      |		BGT	0x27738
0002770e 20 52                    | R      |		MOVEA.L	(A2),A0
00027710 20 07                    |        |		MOVE.L	D7,D0
00027712 53 80                    |S       |		SUBQ.L	#0x1,D0
00027714 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
0002771a 63 02                    |c       |		BLS	0x2771e
0002771c 4e 4f                    |NO      |		TRAP	#15
0002771e 0c 87 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D7
00027724 63 02                    |c       |		BLS	0x27728
00027726 4e 4f                    |NO      |		TRAP	#15
00027728 22 4c                    |"L      |		MOVEA.L	A4,A1
0002772a 43 f1 78 00              |C x     |		LEA.L	(A1+D7.L),A1
0002772e 11 a9 04 7f 08 02        |        |		MOVE.B	(A1+0x47f),(A0+D0.L+#0x2)
00027734 52 87                    |R       |		ADDQ.L	#0x1,D7
00027736 68 d2                    |h       |		BVC	0x2770a
00027738 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002773a 2d 52 00 08              |-R      |		MOVE.L	(A2),(A6+0x8)
0002773e 1f 02                    |        |		MOVE.B	D2,-(A7)
00027740 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027742 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00027744 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
0002774a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002774c 4e ba aa ea              |N       |		JSR	0x22238
00027750 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027752 4c df 1f cf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2+A3+A4
00027756 4e 5e                    |N^      |		UNLK	A6
00027758 4e 75                    |Nu      |		RTS
0002775a ; --------------------------------------------------------------------------------------
0002775a ; OMSI PASCAL Function
0002775a ;    <LVAR -0x004 @ 1(r)>
0002775a ;    <LVAR -0x008 4(rw)>
0002775a ;    <LVAR -0x00c 4(rw)>
0002775a ;    <LVAR -0x010 4(rw)>
0002775a ;    <LVAR -0x014 @ 4(rw)>
0002775a ;    <LVAR -0x018 4(rw)>
0002775a ;    <LVAR -0x019 1(w)>
0002775a ;    <LVAR -0x01a 1(w)>
0002775a ;    <LVAR -0x01c 4(rw)>
0002775a ;    <LVAR -0x01f 1(w)>
0002775a ;    <LVAR -0x020 4(rw)>
0002775a ;    <LVAR -0x024 4(rw)>
0002775a ;    <LVAR -0x026 2(w)>
0002775a ;    <LVAR -0x028 2(r)>
0002775a ;    <LVAR -0x02a 2(w)>
0002775a ;    <LVAR -0x02c 2(r)>
0002775a ;    <LVAR -0x030 4(w)>
0002775a ;    <LVAR -0x034 4(r)>
0002775a ;    <LVAR -0x036 2(r)>
0002775a ;    <LVAR -0x038 2(r)>
0002775a ;    <LVAR -0x03c 4(r)>
0002775a ;    <LVAR -0x03e 2(r)>
0002775a ;    <LVAR -0x040 @ 2(r)>
0002775a ; --------------------------------------------------------------------------------------
0002775a 4e 56 ff 7a              |NV z    |		LINK.W	A6,#0xff7a
0002775e bf d5                    |        |		CMPA.L	(A5),A7
00027760 62 06                    |b       |		BHI	0x27768
00027762 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00027766 4e 76                    |Nv      |		TRAPV
00027768 de fc 00 46              |   F    |		ADDA.W	#0x46,A7
0002776c 48 e7 f0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
00027770 45 f9 00 02 c7 c4        |E       |		LEA.L	0x2c7c4,A2
00027776 47 f9 00 02 d0 2c        |G    ,  |		LEA.L	0x2d02c,A3
0002777c 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002777e 74 14                    |t       |		MOVEQ.L	#0x14,D2
00027780 76 10                    |v       |		MOVEQ.L	#0x10,D3
00027782 9e c2                    |        |		SUBA.W	D2,A7
00027784 20 4f                    | O      |		MOVEA.L	A7,A0
00027786 43 fa 97 02              |C       |		LEA.L	0x20e8a,A1
0002778a 70 12                    |p       |		MOVEQ.L	#0x12,D0
0002778c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002778e 51 c8 ff fc              |Q       |		DBF	D0,0x2778c
00027792 1f 01                    |        |		MOVE.B	D1,-(A7)
00027794 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027796 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002779a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002779c 3f 3c 00 13              |?<      |		MOVE.W	#0x13,-(A7)
000277a0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000277a6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000277a8 4e ba aa 8e              |N       |		JSR	0x22238
000277ac de fc 00 1a              |        |		ADDA.W	#0x1a,A7
000277b0 4a 13                    |J       |		TST.B	(A3)
000277b2 6e 3c                    |n<      |		BGT	0x277f0
000277b4 9e c3                    |        |		SUBA.W	D3,A7
000277b6 20 4f                    | O      |		MOVEA.L	A7,A0
000277b8 43 fa 96 e4              |C       |		LEA.L	0x20e9e,A1
000277bc 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
000277be 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000277c0 51 c8 ff fc              |Q       |		DBF	D0,0x277be
000277c4 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000277c6 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000277ca 3f 01                    |?       |		MOVE.W	D1,-(A7)
000277cc 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
000277d0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000277d6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000277d8 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
000277de 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000277e0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000277e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000277e8 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000277ee de c2                    |        |		ADDA.W	D2,A7
000277f0 42 6e ff c0              |Bn      |		CLR.W	(A6-0x40)
000277f4 42 6e ff c2              |Bn      |		CLR.W	(A6-0x3e)
000277f8 42 ae ff c4              |B       |		CLR.L	(A6-0x3c)
000277fc 42 6e ff c8              |Bn      |		CLR.W	(A6-0x38)
00027800 42 6e ff ca              |Bn      |		CLR.W	(A6-0x36)
00027804 42 ae ff cc              |B       |		CLR.L	(A6-0x34)
00027808 2d 7c 00 00 00 20 ff d0  |-|      |		MOVE.L	#0x20,(A6-0x30)
00027810 42 6e ff d4              |Bn      |		CLR.W	(A6-0x2c)
00027814 20 12                    |        |		MOVE.L	(A2),D0
00027816 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
0002781c 63 02                    |c       |		BLS	0x27820
0002781e 4e 4f                    |NO      |		TRAP	#15
00027820 3d 40 ff d6              |=@      |		MOVE.W	D0,(A6-0x2a)
00027824 42 6e ff d8              |Bn      |		CLR.W	(A6-0x28)
00027828 3d 7c 00 04 ff da        |=|      |		MOVE.W	#0x4,(A6-0x26)
0002782e 2d 7a 99 20 ff dc        |-z      |		MOVE.L	0x21150,(A6-0x24)
00027834 2d 7a 99 1e ff e0        |-z      |		MOVE.L	0x21154,(A6-0x20)
0002783a 2d 7a 99 1c ff e4        |-z      |		MOVE.L	0x21158,(A6-0x1c)
00027840 2d 7a 99 1a ff e8        |-z      |		MOVE.L	0x2115c,(A6-0x18)
00027846 02 2e 00 80 ff e1        | .      |		ANDI.B	#0x80,(A6-0x1f)
0002784c 00 2e 00 06 ff e1        | .      |		ORI.B	#0x06,(A6-0x1f)
00027852 02 2e 00 80 ff e7        | .      |		ANDI.B	#0x80,(A6-0x19)
00027858 00 2e 00 05 ff e7        | .      |		ORI.B	#0x05,(A6-0x19)
0002785e 20 12                    |        |		MOVE.L	(A2),D0
00027860 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00027866 63 02                    |c       |		BLS	0x2786a
00027868 4e 4f                    |NO      |		TRAP	#15
0002786a 1d 40 ff e6              | @      |		MOVE.B	D0,(A6-0x1a)
0002786e 2d 6e ff dc ff ec        |-n      |		MOVE.L	(A6-0x24),(A6-0x14)
00027874 2d 6e ff e0 ff f0        |-n      |		MOVE.L	(A6-0x20),(A6-0x10)
0002787a 2d 6e ff e4 ff f4        |-n      |		MOVE.L	(A6-0x1c),(A6-0xc)
00027880 2d 6e ff e8 ff f8        |-n      |		MOVE.L	(A6-0x18),(A6-0x8)
00027886 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
0002788a 41 ee ff c0              |A       |		LEA.L	(A6-0x40),A0
0002788e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00027890 3f 01                    |?       |		MOVE.W	D1,-(A7)
00027892 48 78 00 1c              |Hx      |		PEA.L	0x1c
00027896 2f 3c 93 03 fc 00        |/<      |		MOVE.L	#0x9303fc00,-(A7)
0002789c 48 78 00 00              |Hx      |		PEA.L	0x0
000278a0 4e ba ae c4              |N       |		JSR	0x22766
000278a4 de c2                    |        |		ADDA.W	D2,A7
000278a6 3e 81                    |>       |		MOVE.W	D1,(A7)
000278a8 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000278ac 4e ba ad c8              |N       |		JSR	0x22676
000278b0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000278b2 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
000278b6 66 0a                    |f       |		BNE	0x278c2
000278b8 48 78 00 2d              |Hx -    |		PEA.L	0x2d
000278bc 4e ba 9a 6e              |N  n    |		JSR	0x2132c
000278c0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000278c2 23 ee ff ec 00 02 c7 da  |#       |		MOVE.L	(A6-0x14),0x2c7da
000278ca 23 ee ff f0 00 02 c7 de  |#       |		MOVE.L	(A6-0x10),0x2c7de
000278d2 23 ee ff f4 00 02 c7 e2  |#       |		MOVE.L	(A6-0xc),0x2c7e2
000278da 23 ee ff f8 00 02 c7 e6  |#       |		MOVE.L	(A6-0x8),0x2c7e6
000278e2 4a 13                    |J       |		TST.B	(A3)
000278e4 6e 1e                    |n       |		BGT	0x27904
000278e6 2f 39 00 02 c7 e6        |/9      |		MOVE.L	0x2c7e6,-(A7)
000278ec 2f 39 00 02 c7 e2        |/9      |		MOVE.L	0x2c7e2,-(A7)
000278f2 2f 39 00 02 c7 de        |/9      |		MOVE.L	0x2c7de,-(A7)
000278f8 2f 39 00 02 c7 da        |/9      |		MOVE.L	0x2c7da,-(A7)
000278fe 4e ba a3 90              |N       |		JSR	0x21c90
00027902 de c3                    |        |		ADDA.W	D3,A7
00027904 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00027906 1f 01                    |        |		MOVE.B	D1,-(A7)
00027908 48 78 00 01              |Hx      |		PEA.L	0x1
0002790c 42 67                    |Bg      |		CLR.W	-(A7)
0002790e 4e ba d3 ba              |N       |		JSR	0x24cca
00027912 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00027916 4c df 0f 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1+A2+A3
0002791a 4e 5e                    |N^      |		UNLK	A6
0002791c 4e 75                    |Nu      |		RTS
0002791e ; --------------------------------------------------------------------------------------
0002791e ; OMSI PASCAL Function
0002791e ;    <LVAR  0x008 4(r)>
0002791e ;    <LVAR -0x004 @ 4(r)>
0002791e ;    <LVAR -0x008 @>
0002791e ;    <LVAR -0x00a @ 1(r)>
0002791e ;    <LVAR -0x010 @ 1(r)>
0002791e ;    <LVAR -0x016 @ 1(r)>
0002791e ;    <LVAR -0x01a @ 4(r)>
0002791e ;    <LVAR -0x01c @ 1(r)>
0002791e ; --------------------------------------------------------------------------------------
0002791e 4e 56 ff 78              |NV x    |		LINK.W	A6,#0xff78
00027922 bf d5                    |        |		CMPA.L	(A5),A7
00027924 62 06                    |b       |		BHI	0x2792c
00027926 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002792a 4e 76                    |Nv      |		TRAPV
0002792c de fc 00 6c              |   l    |		ADDA.W	#0x6c,A7
00027930 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00027934 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
0002793a 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
0002793e 74 01                    |t       |		MOVEQ.L	#0x01,D2
00027940 76 02                    |v       |		MOVEQ.L	#0x02,D3
00027942 78 16                    |x       |		MOVEQ.L	#0x16,D4
00027944 7a 03                    |z       |		MOVEQ.L	#0x03,D5
00027946 7c 0c                    ||       |		MOVEQ.L	#0x0c,D6
00027948 4a 39 00 02 c7 d4        |J9      |		TST.B	0x2c7d4
0002794e 66 00 00 ba              |f       |		BNE	0x27a0a
00027952 3f 3a 95 5a              |?: Z    |		MOVE.W	0x20eae,-(A7)
00027956 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027958 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002795a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002795e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027960 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027962 4e 92                    |N       |		JSR	(A2)
00027964 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027966 42 17                    |B       |		CLR.B	(A7)
00027968 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
0002796c 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00027970 4e ba a3 7c              |N  |    |		JSR	0x21cee
00027974 de fc 00 10              |        |		ADDA.W	#0x10,A7
00027978 1e ba 95 36              |   6    |		MOVE.B	0x20eb0,(A7)
0002797c 1f 7a 95 33 00 01        | z 3    |		MOVE.B	0x20eb1,(A7+0x1)
00027982 1f 7a 95 2e 00 02        | z .    |		MOVE.B	0x20eb2,(A7+0x2)
00027988 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002798a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002798c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027990 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027992 3f 05                    |?       |		MOVE.W	D5,-(A7)
00027994 4e 92                    |N       |		JSR	(A2)
00027996 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027998 42 17                    |B       |		CLR.B	(A7)
0002799a 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
0002799e 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000279a2 4e ba a3 4a              |N  J    |		JSR	0x21cee
000279a6 de c4                    |        |		ADDA.W	D4,A7
000279a8 4a 2e ff ea              |J.      |		TST.B	(A6-0x16)
000279ac 66 06                    |f       |		BNE	0x279b4
000279ae 4a 2e ff f6              |J.      |		TST.B	(A6-0xa)
000279b2 67 52                    |gR      |		BEQ	0x27a06
000279b4 13 c2 00 02 c7 d4        |        |		MOVE.B	D2,0x2c7d4
000279ba 13 c2 00 02 cc 12        |        |		MOVE.B	D2,0x2cc12
000279c0 42 39 00 02 e0 f6        |B9      |		CLR.B	0x2e0f6
000279c6 13 c2 00 02 e0 f7        |        |		MOVE.B	D2,0x2e0f7
000279cc 42 39 00 02 e0 f8        |B9      |		CLR.B	0x2e0f8
000279d2 42 79 00 02 e0 fa        |By      |		CLR.W	0x2e0fa
000279d8 33 c2 00 02 e0 fc        |3       |		MOVE.W	D2,0x2e0fc
000279de 41 f9 00 02 c8 12        |A       |		LEA.L	0x2c812,A0
000279e4 2f 08                    |/       |		MOVE.L	A0,-(A7)
000279e6 23 df 00 02 e0 fe        |#       |		MOVE.L	(A7)+,0x2e0fe
000279ec 23 fc 00 00 04 00 00 02  |#       |		MOVE.L	#0x400,0x2e102
000279f4 e1 02                    |        |
000279f6 41 f9 00 02 c8 02        |A       |		LEA.L	0x2c802,A0
000279fc 2f 08                    |/       |		MOVE.L	A0,-(A7)
000279fe 23 df 00 02 e1 06        |#       |		MOVE.L	(A7)+,0x2e106
00027a04 60 04                    |`       |		BRA	0x27a0a
00027a06 4e ba f1 3a              |N  :    |		JSR	0x26b42
00027a0a 4e ba e2 1c              |N       |		JSR	0x25c28
00027a0e 4e ba dd 0e              |N       |		JSR	0x2571e
00027a12 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027a14 4e ba df 92              |N       |		JSR	0x259a8
00027a18 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00027a1a 20 4f                    | O      |		MOVEA.L	A7,A0
00027a1c 43 fa 94 96              |C       |		LEA.L	0x20eb4,A1
00027a20 70 04                    |p       |		MOVEQ.L	#0x04,D0
00027a22 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00027a24 51 c8 ff fc              |Q       |		DBF	D0,0x27a22
00027a28 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027a2a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027a2e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027a30 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00027a34 4e 92                    |N       |		JSR	(A2)
00027a36 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027a38 4e ba e3 38              |N  8    |		JSR	0x25d72
00027a3c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027a3e 4e ba e4 b0              |N       |		JSR	0x25ef0
00027a42 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00027a44 2f 3a 94 78              |/: x    |		MOVE.L	0x20ebe,-(A7)
00027a48 2f 3a 94 70              |/: p    |		MOVE.L	0x20eba,-(A7)
00027a4c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027a4e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027a50 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027a54 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027a56 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
00027a5a 4e 92                    |N       |		JSR	(A2)
00027a5c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027a5e 1e 82                    |        |		MOVE.B	D2,(A7)
00027a60 48 6e ff e4              |Hn      |		PEA.L	(A6-0x1c)
00027a64 48 6e ff e6              |Hn      |		PEA.L	(A6-0x1a)
00027a68 4e ba a2 84              |N       |		JSR	0x21cee
00027a6c de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00027a70 4a 2e ff e4              |J.      |		TST.B	(A6-0x1c)
00027a74 67 3c                    |g<      |		BEQ	0x27ab2
00027a76 3f 3a 94 4a              |?: J    |		MOVE.W	0x20ec2,-(A7)
00027a7a 3f 3a 94 48              |?: H    |		MOVE.W	0x20ec4,-(A7)
00027a7e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027a80 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00027a84 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027a86 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027a88 4e 92                    |N       |		JSR	(A2)
00027a8a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027a8c 2e ae ff e6              |.       |		MOVE.L	(A6-0x1a),(A7)
00027a90 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027a92 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00027a96 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027a98 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027a9a 4e 92                    |N       |		JSR	(A2)
00027a9c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027a9e 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
00027aa4 de c6                    |        |		ADDA.W	D6,A7
00027aa6 23 df 00 02 d8 be        |#       |		MOVE.L	(A7)+,0x2d8be
00027aac 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027aae 60 00 00 ae              |`       |		BRA	0x27b5e
00027ab2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027ab4 1e ba 94 10              |        |		MOVE.B	0x20ec6,(A7)
00027ab8 1f 7a 94 0d 00 01        | z      |		MOVE.B	0x20ec7,(A7+0x1)
00027abe 1f 7a 94 08 00 02        | z      |		MOVE.B	0x20ec8,(A7+0x2)
00027ac4 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027ac6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027ac8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027acc 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027ace 3f 05                    |?       |		MOVE.W	D5,-(A7)
00027ad0 4e 92                    |N       |		JSR	(A2)
00027ad2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027ad4 1e 82                    |        |		MOVE.B	D2,(A7)
00027ad6 48 6e ff e4              |Hn      |		PEA.L	(A6-0x1c)
00027ada 48 6e ff e6              |Hn      |		PEA.L	(A6-0x1a)
00027ade 4e ba a2 0e              |N       |		JSR	0x21cee
00027ae2 de c4                    |        |		ADDA.W	D4,A7
00027ae4 4a 2e ff e4              |J.      |		TST.B	(A6-0x1c)
00027ae8 67 0a                    |g       |		BEQ	0x27af4
00027aea 3f 3a 93 de              |?:      |		MOVE.W	0x20eca,-(A7)
00027aee 3f 3a 93 dc              |?:      |		MOVE.W	0x20ecc,-(A7)
00027af2 60 8a                    |`       |		BRA	0x27a7e
00027af4 3f 3a 93 d8              |?:      |		MOVE.W	0x20ece,-(A7)
00027af8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027afa 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027afe 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027b00 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027b02 4e 92                    |N       |		JSR	(A2)
00027b04 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027b06 23 df 00 02 d8 be        |#       |		MOVE.L	(A7)+,0x2d8be
00027b0c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00027b0e 41 fa 93 dc              |A       |		LEA.L	0x20eec,A0
00027b12 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027b14 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00027b16 51 c8 ff fc              |Q       |		DBF	D0,0x27b14
00027b1a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027b1c 2f 39 00 02 d8 be        |/9      |		MOVE.L	0x2d8be,-(A7)
00027b22 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027b24 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00027b28 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027b2a 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00027b2e 4e 92                    |N       |		JSR	(A2)
00027b30 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027b32 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
00027b38 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027b3a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00027b40 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027b42 23 df 00 02 d8 be        |#       |		MOVE.L	(A7)+,0x2d8be
00027b48 de fc 00 18              |        |		ADDA.W	#0x18,A7
00027b4c 2e b9 00 02 d8 be        |.       |		MOVE.L	0x2d8be,(A7)
00027b52 1f 3c 00 3a              | < :    |		MOVE.B	#0x3a,-(A7)
00027b56 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00027b5c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027b5e 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00027b62 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00027b68 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027b6a 20 6e ff fc              | n      |		MOVEA.L	(A6-0x4),A0
00027b6e 22 79 00 02 d8 be        |"y      |		MOVEA.L	0x2d8be,A1
00027b74 30 11                    |0       |		MOVE.W	(A1),D0
00027b76 48 c0                    |H       |		EXTW.L	D0
00027b78 55 80                    |U       |		SUBQ.L	#0x2,D0
00027b7a 04 80 ff ff 80 00        |        |		SUBI.L	#0xffff8000,D0
00027b80 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00027b86 63 02                    |c       |		BLS	0x27b8a
00027b88 4e 4f                    |NO      |		TRAP	#15
00027b8a 06 80 ff ff 80 00        |        |		ADDI.L	#0xffff8000,D0
00027b90 30 80                    |0       |		MOVE.W	D0,(A0)
00027b92 48 c0                    |H       |		EXTW.L	D0
00027b94 2f 00                    |/       |		MOVE.L	D0,-(A7)
00027b96 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00027b98 be 97                    |        |		CMP.L	(A7),D7
00027b9a 6e 32                    |n2      |		BGT	0x27bce
00027b9c 20 6e ff fc              | n      |		MOVEA.L	(A6-0x4),A0
00027ba0 20 07                    |        |		MOVE.L	D7,D0
00027ba2 53 80                    |S       |		SUBQ.L	#0x1,D0
00027ba4 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
00027baa 63 02                    |c       |		BLS	0x27bae
00027bac 4e 4f                    |NO      |		TRAP	#15
00027bae 22 79 00 02 d8 be        |"y      |		MOVEA.L	0x2d8be,A1
00027bb4 22 07                    |"       |		MOVE.L	D7,D1
00027bb6 52 81                    |R       |		ADDQ.L	#0x1,D1
00027bb8 53 81                    |S       |		SUBQ.L	#0x1,D1
00027bba 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
00027bc0 63 02                    |c       |		BLS	0x27bc4
00027bc2 4e 4f                    |NO      |		TRAP	#15
00027bc4 11 b1 18 02 08 02        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x2)
00027bca 52 87                    |R       |		ADDQ.L	#0x1,D7
00027bcc 68 ca                    |h       |		BVC	0x27b98
00027bce 2e b9 00 02 d8 be        |.       |		MOVE.L	0x2d8be,(A7)
00027bd4 4e ba e1 9c              |N       |		JSR	0x25d72
00027bd8 4e ba e3 16              |N       |		JSR	0x25ef0
00027bdc 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00027bde 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027be0 20 4f                    | O      |		MOVEA.L	A7,A0
00027be2 43 fa 93 08              |C       |		LEA.L	0x20eec,A1
00027be6 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027be8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00027bea 51 c8 ff fc              |Q       |		DBF	D0,0x27be8
00027bee 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00027bf0 2f 0c                    |/       |		MOVE.L	A4,-(A7)
00027bf2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027bf4 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00027bf8 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027bfa 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00027bfe 4e 92                    |N       |		JSR	(A2)
00027c00 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027c02 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
00027c08 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027c0a 4a 1f                    |J       |		TST.B	(A7)+
00027c0c 67 5a                    |gZ      |		BEQ	0x27c68
00027c0e 41 fa 92 f2              |A       |		LEA.L	0x20f02,A0
00027c12 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027c14 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00027c16 51 c8 ff fc              |Q       |		DBF	D0,0x27c14
00027c1a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027c1c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027c20 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027c22 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00027c26 4e 92                    |N       |		JSR	(A2)
00027c28 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027c2a 48 78 00 1d              |Hx      |		PEA.L	0x1d
00027c2e 4e b9 00 01 04 50        |N    P  |		JSR	FS_10450(&, &)
00027c34 de fc 00 12              |        |		ADDA.W	#0x12,A7
00027c38 2e ba 92 c8              |.       |		MOVE.L	0x20f02,(A7)
00027c3c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027c3e 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027c42 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027c44 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00027c48 4e 92                    |N       |		JSR	(A2)
00027c4a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027c4c 2e ae ff fc              |.       |		MOVE.L	(A6-0x4),(A7)
00027c50 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00027c56 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027c58 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00027c5e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027c60 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00027c66 60 56                    |`V      |		BRA	0x27cbe
00027c68 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00027c6c 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00027c72 2e 8c                    |.       |		MOVE.L	A4,(A7)
00027c74 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00027c78 48 79 00 02 c7 d6        |Hy      |		PEA.L	0x2c7d6
00027c7e 4e b9 00 01 02 ec        |N       |		JSR	String2Long(src : String; VAR status : Bool; VAR retval : Long)
00027c84 de c6                    |        |		ADDA.W	D6,A7
00027c86 4a 2e ff f0              |J.      |		TST.B	(A6-0x10)
00027c8a 66 2a                    |f*      |		BNE	0x27cb6
00027c8c 41 fa 92 86              |A       |		LEA.L	0x20f14,A0
00027c90 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027c92 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00027c94 51 c8 ff fc              |Q       |		DBF	D0,0x27c92
00027c98 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027c9a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027c9e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027ca0 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00027ca4 4e 92                    |N       |		JSR	(A2)
00027ca6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027ca8 48 78 00 22              |Hx "    |		PEA.L	0x22
00027cac 4e b9 00 01 04 50        |N    P  |		JSR	FS_10450(&, &)
00027cb2 de c4                    |        |		ADDA.W	D4,A7
00027cb4 60 08                    |`       |		BRA	0x27cbe
00027cb6 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027cb8 4e ba e8 6c              |N  l    |		JSR	0x26526
00027cbc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027cbe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027cc0 4e ba de 50              |N  P    |		JSR	0x25b12
00027cc4 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00027cc8 4e 5e                    |N^      |		UNLK	A6
00027cca 4e 75                    |Nu      |		RTS
00027ccc ; --------------------------------------------------------------------------------------
00027ccc ; OMSI PASCAL Function
00027ccc ;    <LVAR  0x008 4(r)>
00027ccc ;    <LVAR -0x004 @ 4(r)>
00027ccc ;    <LVAR -0x008 @>
00027ccc ;    <LVAR -0x00a @ 1(r)>
00027ccc ;    <LVAR -0x00e @ 4(rw)>
00027ccc ;    <LVAR -0x010 @ 1(r)>
00027ccc ;    <LVAR -0x016 @ 1(r)>
00027ccc ;    <LVAR -0x01a @ 4(r)>
00027ccc ;    <LVAR -0x01c @ 1(r)>
00027ccc ;    <LVAR -0x020 @ 4(rw)>
00027ccc ; --------------------------------------------------------------------------------------
00027ccc 4e 56 ff 74              |NV t    |		LINK.W	A6,#0xff74
00027cd0 bf d5                    |        |		CMPA.L	(A5),A7
00027cd2 62 06                    |b       |		BHI	0x27cda
00027cd4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00027cd8 4e 76                    |Nv      |		TRAPV
00027cda de fc 00 6c              |   l    |		ADDA.W	#0x6c,A7
00027cde 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00027ce2 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00027ce8 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
00027cec 49 ee ff f2              |I       |		LEA.L	(A6-0xe),A4
00027cf0 74 01                    |t       |		MOVEQ.L	#0x01,D2
00027cf2 76 02                    |v       |		MOVEQ.L	#0x02,D3
00027cf4 78 16                    |x       |		MOVEQ.L	#0x16,D4
00027cf6 7a 0c                    |z       |		MOVEQ.L	#0x0c,D5
00027cf8 7c 03                    ||       |		MOVEQ.L	#0x03,D6
00027cfa 4a 39 00 02 c7 d4        |J9      |		TST.B	0x2c7d4
00027d00 66 00 00 92              |f       |		BNE	0x27d94
00027d04 3f 3a 92 0e              |?:      |		MOVE.W	0x20f14,-(A7)
00027d08 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027d0a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027d0c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027d10 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027d12 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027d14 4e 92                    |N       |		JSR	(A2)
00027d16 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027d18 42 17                    |B       |		CLR.B	(A7)
00027d1a 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
00027d1e 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00027d22 4e ba 9f ca              |N       |		JSR	0x21cee
00027d26 de fc 00 10              |        |		ADDA.W	#0x10,A7
00027d2a 1e ba 91 ea              |        |		MOVE.B	0x20f16,(A7)
00027d2e 1f 7a 91 e7 00 01        | z      |		MOVE.B	0x20f17,(A7+0x1)
00027d34 1f 7a 91 e2 00 02        | z      |		MOVE.B	0x20f18,(A7+0x2)
00027d3a 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027d3c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027d3e 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027d42 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027d44 3f 06                    |?       |		MOVE.W	D6,-(A7)
00027d46 4e 92                    |N       |		JSR	(A2)
00027d48 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027d4a 42 17                    |B       |		CLR.B	(A7)
00027d4c 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00027d50 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00027d54 4e ba 9f 98              |N       |		JSR	0x21cee
00027d58 de c4                    |        |		ADDA.W	D4,A7
00027d5a 4a 2e ff ea              |J.      |		TST.B	(A6-0x16)
00027d5e 66 06                    |f       |		BNE	0x27d66
00027d60 4a 2e ff f6              |J.      |		TST.B	(A6-0xa)
00027d64 67 08                    |g       |		BEQ	0x27d6e
00027d66 13 c2 00 02 c7 d4        |        |		MOVE.B	D2,0x2c7d4
00027d6c 60 0e                    |`       |		BRA	0x27d7c
00027d6e 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027d70 4e ba c9 b2              |N       |		JSR	0x24724
00027d74 2e 93                    |.       |		MOVE.L	(A3),(A7)
00027d76 4e ba d0 68              |N  h    |		JSR	0x24de0
00027d7a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027d7c 41 f8 12 00              |A       |		LEA.L	0x1200,A0
00027d80 2f 08                    |/       |		MOVE.L	A0,-(A7)
00027d82 41 f9 00 02 e1 98        |A       |		LEA.L	0x2e198,A0
00027d88 2f 08                    |/       |		MOVE.L	A0,-(A7)
00027d8a 48 78 00 20              |Hx      |		PEA.L	0x20
00027d8e 4e ba c8 22              |N  "    |		JSR	0x245b2
00027d92 de c5                    |        |		ADDA.W	D5,A7
00027d94 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027d96 4e ba ee 98              |N       |		JSR	0x26c30
00027d9a 2e 93                    |.       |		MOVE.L	(A3),(A7)
00027d9c 4e ba f0 92              |N       |		JSR	0x26e30
00027da0 2e 93                    |.       |		MOVE.L	(A3),(A7)
00027da2 4e ba f2 48              |N  H    |		JSR	0x26fec
00027da6 2e 93                    |.       |		MOVE.L	(A3),(A7)
00027da8 4e ba f4 a0              |N       |		JSR	0x2724a
00027dac 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00027dae 20 4f                    | O      |		MOVEA.L	A7,A0
00027db0 43 fa 91 68              |C  h    |		LEA.L	0x20f1a,A1
00027db4 70 04                    |p       |		MOVEQ.L	#0x04,D0
00027db6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00027db8 51 c8 ff fc              |Q       |		DBF	D0,0x27db6
00027dbc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027dbe 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027dc2 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027dc4 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
00027dc8 4e 92                    |N       |		JSR	(A2)
00027dca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027dcc 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
00027dce 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027dd0 48 54                    |HT      |		PEA.L	(A4)
00027dd2 4e ba f6 ce              |N       |		JSR	0x274a2
00027dd6 4e ba f8 40              |N  @    |		JSR	0x27618
00027dda 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
00027ddc 2f 3a 91 46              |/: F    |		MOVE.L	0x20f24,-(A7)
00027de0 2f 3a 91 3e              |/: >    |		MOVE.L	0x20f20,-(A7)
00027de4 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027de6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027de8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027dec 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027dee 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
00027df2 4e 92                    |N       |		JSR	(A2)
00027df4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027df6 1e 82                    |        |		MOVE.B	D2,(A7)
00027df8 48 6e ff e4              |Hn      |		PEA.L	(A6-0x1c)
00027dfc 48 6e ff e6              |Hn      |		PEA.L	(A6-0x1a)
00027e00 4e ba 9e ec              |N       |		JSR	0x21cee
00027e04 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00027e08 4a 2e ff e4              |J.      |		TST.B	(A6-0x1c)
00027e0c 67 3c                    |g<      |		BEQ	0x27e4a
00027e0e 3f 3a 91 18              |?:      |		MOVE.W	0x20f28,-(A7)
00027e12 3f 3a 91 16              |?:      |		MOVE.W	0x20f2a,-(A7)
00027e16 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027e18 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00027e1c 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027e1e 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027e20 4e 92                    |N       |		JSR	(A2)
00027e22 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027e24 2e ae ff e6              |.       |		MOVE.L	(A6-0x1a),(A7)
00027e28 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027e2a 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00027e2e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027e30 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027e32 4e 92                    |N       |		JSR	(A2)
00027e34 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027e36 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
00027e3c de c5                    |        |		ADDA.W	D5,A7
00027e3e 23 df 00 02 d8 be        |#       |		MOVE.L	(A7)+,0x2d8be
00027e44 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027e46 60 00 00 ae              |`       |		BRA	0x27ef6
00027e4a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027e4c 1e ba 90 de              |        |		MOVE.B	0x20f2c,(A7)
00027e50 1f 7a 90 db 00 01        | z      |		MOVE.B	0x20f2d,(A7+0x1)
00027e56 1f 7a 90 d6 00 02        | z      |		MOVE.B	0x20f2e,(A7+0x2)
00027e5c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00027e5e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027e60 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027e64 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027e66 3f 06                    |?       |		MOVE.W	D6,-(A7)
00027e68 4e 92                    |N       |		JSR	(A2)
00027e6a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027e6c 1e 82                    |        |		MOVE.B	D2,(A7)
00027e6e 48 6e ff e4              |Hn      |		PEA.L	(A6-0x1c)
00027e72 48 6e ff e6              |Hn      |		PEA.L	(A6-0x1a)
00027e76 4e ba 9e 76              |N  v    |		JSR	0x21cee
00027e7a de c4                    |        |		ADDA.W	D4,A7
00027e7c 4a 2e ff e4              |J.      |		TST.B	(A6-0x1c)
00027e80 67 0a                    |g       |		BEQ	0x27e8c
00027e82 3f 3a 90 ac              |?:      |		MOVE.W	0x20f30,-(A7)
00027e86 3f 3a 90 aa              |?:      |		MOVE.W	0x20f32,-(A7)
00027e8a 60 8a                    |`       |		BRA	0x27e16
00027e8c 3f 3a 90 a6              |?:      |		MOVE.W	0x20f34,-(A7)
00027e90 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027e92 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027e96 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027e98 3f 03                    |?       |		MOVE.W	D3,-(A7)
00027e9a 4e 92                    |N       |		JSR	(A2)
00027e9c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027e9e 23 df 00 02 d8 be        |#       |		MOVE.L	(A7)+,0x2d8be
00027ea4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00027ea6 41 fa 90 aa              |A       |		LEA.L	0x20f52,A0
00027eaa 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027eac 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00027eae 51 c8 ff fc              |Q       |		DBF	D0,0x27eac
00027eb2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027eb4 2f 39 00 02 d8 be        |/9      |		MOVE.L	0x2d8be,-(A7)
00027eba 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027ebc 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00027ec0 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027ec2 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00027ec6 4e 92                    |N       |		JSR	(A2)
00027ec8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027eca 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
00027ed0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027ed2 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00027ed8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027eda 23 df 00 02 d8 be        |#       |		MOVE.L	(A7)+,0x2d8be
00027ee0 de fc 00 18              |        |		ADDA.W	#0x18,A7
00027ee4 2e b9 00 02 d8 be        |.       |		MOVE.L	0x2d8be,(A7)
00027eea 1f 3c 00 3a              | < :    |		MOVE.B	#0x3a,-(A7)
00027eee 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00027ef4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00027ef6 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00027efa 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00027f00 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027f02 20 6e ff fc              | n      |		MOVEA.L	(A6-0x4),A0
00027f06 22 79 00 02 d8 be        |"y      |		MOVEA.L	0x2d8be,A1
00027f0c 30 11                    |0       |		MOVE.W	(A1),D0
00027f0e 48 c0                    |H       |		EXTW.L	D0
00027f10 55 80                    |U       |		SUBQ.L	#0x2,D0
00027f12 04 80 ff ff 80 00        |        |		SUBI.L	#0xffff8000,D0
00027f18 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00027f1e 63 02                    |c       |		BLS	0x27f22
00027f20 4e 4f                    |NO      |		TRAP	#15
00027f22 06 80 ff ff 80 00        |        |		ADDI.L	#0xffff8000,D0
00027f28 30 80                    |0       |		MOVE.W	D0,(A0)
00027f2a 48 c0                    |H       |		EXTW.L	D0
00027f2c 2f 00                    |/       |		MOVE.L	D0,-(A7)
00027f2e 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00027f30 be 97                    |        |		CMP.L	(A7),D7
00027f32 6e 32                    |n2      |		BGT	0x27f66
00027f34 20 6e ff fc              | n      |		MOVEA.L	(A6-0x4),A0
00027f38 20 07                    |        |		MOVE.L	D7,D0
00027f3a 53 80                    |S       |		SUBQ.L	#0x1,D0
00027f3c 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
00027f42 63 02                    |c       |		BLS	0x27f46
00027f44 4e 4f                    |NO      |		TRAP	#15
00027f46 22 79 00 02 d8 be        |"y      |		MOVEA.L	0x2d8be,A1
00027f4c 22 07                    |"       |		MOVE.L	D7,D1
00027f4e 52 81                    |R       |		ADDQ.L	#0x1,D1
00027f50 53 81                    |S       |		SUBQ.L	#0x1,D1
00027f52 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
00027f58 63 02                    |c       |		BLS	0x27f5c
00027f5a 4e 4f                    |NO      |		TRAP	#15
00027f5c 11 b1 18 02 08 02        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x2)
00027f62 52 87                    |R       |		ADDQ.L	#0x1,D7
00027f64 68 ca                    |h       |		BVC	0x27f30
00027f66 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027f68 48 79 00 02 d8 be        |Hy      |		PEA.L	0x2d8be
00027f6e 4e ba f5 32              |N  2    |		JSR	0x274a2
00027f72 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027f74 48 54                    |HT      |		PEA.L	(A4)
00027f76 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00027f7c 4e ba f6 9a              |N       |		JSR	0x27618
00027f80 28 97                    |(       |		MOVE.L	(A7),(A4)
00027f82 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027f84 20 4f                    | O      |		MOVEA.L	A7,A0
00027f86 43 fa 8f ca              |C       |		LEA.L	0x20f52,A1
00027f8a 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027f8c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00027f8e 51 c8 ff fc              |Q       |		DBF	D0,0x27f8c
00027f92 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027f94 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027f98 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027f9a 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00027f9e 4e 92                    |N       |		JSR	(A2)
00027fa0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027fa2 2d 5f ff e0              |-_      |		MOVE.L	(A7)+,(A6-0x20)
00027fa6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00027fa8 2e 94                    |.       |		MOVE.L	(A4),(A7)
00027faa 2f 2e ff e0              |/.      |		MOVE.L	(A6-0x20),-(A7)
00027fae 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
00027fb4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027fb6 4a 1f                    |J       |		TST.B	(A7)+
00027fb8 67 5a                    |gZ      |		BEQ	0x28014
00027fba 41 fa 8f ac              |A       |		LEA.L	0x20f68,A0
00027fbe 70 06                    |p       |		MOVEQ.L	#0x06,D0
00027fc0 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00027fc2 51 c8 ff fc              |Q       |		DBF	D0,0x27fc0
00027fc6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00027fc8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00027fcc 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027fce 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00027fd2 4e 92                    |N       |		JSR	(A2)
00027fd4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00027fd6 48 78 00 1d              |Hx      |		PEA.L	0x1d
00027fda 4e b9 00 01 04 50        |N    P  |		JSR	FS_10450(&, &)
00027fe0 de fc 00 12              |        |		ADDA.W	#0x12,A7
00027fe4 2e ba 8f 82              |.       |		MOVE.L	0x20f68,(A7)
00027fe8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00027fea 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00027fee 3f 02                    |?       |		MOVE.W	D2,-(A7)
00027ff0 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00027ff4 4e 92                    |N       |		JSR	(A2)
00027ff6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00027ff8 2e ae ff fc              |.       |		MOVE.L	(A6-0x4),(A7)
00027ffc 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00028002 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00028004 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002800a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002800c 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00028012 60 56                    |`V      |		BRA	0x2806a
00028014 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00028018 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002801e 2e 94                    |.       |		MOVE.L	(A4),(A7)
00028020 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00028024 48 79 00 02 c7 d6        |Hy      |		PEA.L	0x2c7d6
0002802a 4e b9 00 01 02 ec        |N       |		JSR	String2Long(src : String; VAR status : Bool; VAR retval : Long)
00028030 de c5                    |        |		ADDA.W	D5,A7
00028032 4a 2e ff f0              |J.      |		TST.B	(A6-0x10)
00028036 66 2a                    |f*      |		BNE	0x28062
00028038 41 fa 8f 40              |A  @    |		LEA.L	0x20f7a,A0
0002803c 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002803e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00028040 51 c8 ff fc              |Q       |		DBF	D0,0x2803e
00028044 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028046 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002804a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002804c 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00028050 4e 92                    |N       |		JSR	(A2)
00028052 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00028054 48 78 00 22              |Hx "    |		PEA.L	0x22
00028058 4e b9 00 01 04 50        |N    P  |		JSR	FS_10450(&, &)
0002805e de c4                    |        |		ADDA.W	D4,A7
00028060 60 08                    |`       |		BRA	0x2806a
00028062 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00028064 4e ba e4 c0              |N       |		JSR	0x26526
00028068 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002806a 48 6e ff e0              |Hn      |		PEA.L	(A6-0x20)
0002806e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00028074 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00028076 4e ba f6 e2              |N       |		JSR	0x2775a
0002807a 30 39 00 02 d8 b4        |09      |		MOVE.W	0x2d8b4,D0
00028080 0c 40 ff fe              | @      |		CMPI.W	#0xfffe,D0
00028084 66 0a                    |f       |		BNE	0x28090
00028086 33 fc 04 01 00 02 d8 b4  |3       |		MOVE.W	#0x401,0x2d8b4
0002808e 60 18                    |`       |		BRA	0x280a8
00028090 52 40                    |R@      |		ADDQ.W	#0x1,D0
00028092 04 40 04 01              | @      |		SUBI.W	#0x0401,D0
00028096 0c 40 fb fd              | @      |		CMPI.W	#0xfbfd,D0
0002809a 63 02                    |c       |		BLS	0x2809e
0002809c 4e 4f                    |NO      |		TRAP	#15
0002809e 06 40 04 01              | @      |		ADDI.W	#0x0401,D0
000280a2 33 c0 00 02 d8 b4        |3       |		MOVE.W	D0,0x2d8b4
000280a8 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000280ac 4e 5e                    |N^      |		UNLK	A6
000280ae 4e 75                    |Nu      |		RTS
000280b0 ; --------------------------------------------------------------------------------------
000280b0 ; OMSI PASCAL Function
000280b0 ; --------------------------------------------------------------------------------------
000280b0 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
000280b4 bf d5                    |        |		CMPA.L	(A5),A7
000280b6 62 06                    |b       |		BHI	0x280be
000280b8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000280bc 4e 76                    |Nv      |		TRAPV
000280be de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
000280c2 48 e7 81 80              |H       |		MOVEM.L	A0+D7+D0,-(A7)
000280c6 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000280c8 41 fa 8e be              |A       |		LEA.L	0x20f88,A0
000280cc 70 06                    |p       |		MOVEQ.L	#0x06,D0
000280ce 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000280d0 51 c8 ff fc              |Q       |		DBF	D0,0x280ce
000280d4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000280d6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000280da 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000280de 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
000280e2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000280e8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000280ea 2e 87                    |.       |		MOVE.L	D7,(A7)
000280ec 4e b9 00 01 04 50        |N    P  |		JSR	FS_10450(&, &)
000280f2 de fc 00 16              |        |		ADDA.W	#0x16,A7
000280f6 52 87                    |R       |		ADDQ.L	#0x1,D7
000280f8 0c 87 00 00 00 22        |     "  |		CMPI.L	#0x00000022,D7
000280fe 6f c8                    |o       |		BLE	0x280c8
00028100 4c df 01 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0
00028104 4e 5e                    |N^      |		UNLK	A6
00028106 4e 75                    |Nu      |		RTS
00028108 ; --------------------------------------------------------------------------------------
00028108 ; OMSI PASCAL Function
00028108 ;    <LVAR  0x008 4(r)>
00028108 ;    <LVAR -0x006 @>
00028108 ;    <LVAR -0x008 @ 1(r)>
00028108 ; --------------------------------------------------------------------------------------
00028108 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
0002810c bf d5                    |        |		CMPA.L	(A5),A7
0002810e 62 06                    |b       |		BHI	0x28116
00028110 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028114 4e 76                    |Nv      |		TRAPV
00028116 de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
0002811a 48 e7 f0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
0002811e 41 f9 00 02 d0 2c        |A    ,  |		LEA.L	0x2d02c,A0
00028124 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
00028128 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
0002812c 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00028132 49 ee ff fa              |I       |		LEA.L	(A6-0x6),A4
00028136 70 01                    |p       |		MOVEQ.L	#0x01,D0
00028138 72 02                    |r       |		MOVEQ.L	#0x02,D1
0002813a 74 14                    |t       |		MOVEQ.L	#0x14,D2
0002813c 76 03                    |v       |		MOVEQ.L	#0x03,D3
0002813e 10 83                    |        |		MOVE.B	D3,(A0)
00028140 3f 3a 8e 46              |?: F    |		MOVE.W	0x20f88,-(A7)
00028144 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00028146 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028148 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002814c 3f 00                    |?       |		MOVE.W	D0,-(A7)
0002814e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00028150 4e 93                    |N       |		JSR	(A3)
00028152 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00028154 42 17                    |B       |		CLR.B	(A7)
00028156 48 51                    |HQ      |		PEA.L	(A1)
00028158 48 54                    |HT      |		PEA.L	(A4)
0002815a 4e ba 9b 92              |N       |		JSR	0x21cee
0002815e de c2                    |        |		ADDA.W	D2,A7
00028160 4a 11                    |J       |		TST.B	(A1)
00028162 67 04                    |g       |		BEQ	0x28168
00028164 42 10                    |B       |		CLR.B	(A0)
00028166 60 76                    |`v      |		BRA	0x281de
00028168 3f 3a 8e 20              |?:      |		MOVE.W	0x20f8a,-(A7)
0002816c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002816e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028170 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00028174 3f 00                    |?       |		MOVE.W	D0,-(A7)
00028176 3f 01                    |?       |		MOVE.W	D1,-(A7)
00028178 4e 93                    |N       |		JSR	(A3)
0002817a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002817c 42 17                    |B       |		CLR.B	(A7)
0002817e 48 51                    |HQ      |		PEA.L	(A1)
00028180 48 54                    |HT      |		PEA.L	(A4)
00028182 4e ba 9b 6a              |N  j    |		JSR	0x21cee
00028186 de c2                    |        |		ADDA.W	D2,A7
00028188 4a 11                    |J       |		TST.B	(A1)
0002818a 67 04                    |g       |		BEQ	0x28190
0002818c 10 80                    |        |		MOVE.B	D0,(A0)
0002818e 60 4e                    |`N      |		BRA	0x281de
00028190 3f 3a 8d fa              |?:      |		MOVE.W	0x20f8c,-(A7)
00028194 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00028196 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028198 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002819c 3f 00                    |?       |		MOVE.W	D0,-(A7)
0002819e 3f 01                    |?       |		MOVE.W	D1,-(A7)
000281a0 4e 93                    |N       |		JSR	(A3)
000281a2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000281a4 42 17                    |B       |		CLR.B	(A7)
000281a6 48 51                    |HQ      |		PEA.L	(A1)
000281a8 48 54                    |HT      |		PEA.L	(A4)
000281aa 4e ba 9b 42              |N  B    |		JSR	0x21cee
000281ae de c2                    |        |		ADDA.W	D2,A7
000281b0 4a 11                    |J       |		TST.B	(A1)
000281b2 67 04                    |g       |		BEQ	0x281b8
000281b4 10 81                    |        |		MOVE.B	D1,(A0)
000281b6 60 26                    |`&      |		BRA	0x281de
000281b8 3f 3a 8d d4              |?:      |		MOVE.W	0x20f8e,-(A7)
000281bc 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000281be 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000281c0 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000281c4 3f 00                    |?       |		MOVE.W	D0,-(A7)
000281c6 3f 01                    |?       |		MOVE.W	D1,-(A7)
000281c8 4e 93                    |N       |		JSR	(A3)
000281ca 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000281cc 42 17                    |B       |		CLR.B	(A7)
000281ce 48 51                    |HQ      |		PEA.L	(A1)
000281d0 48 54                    |HT      |		PEA.L	(A4)
000281d2 4e ba 9b 1a              |N       |		JSR	0x21cee
000281d6 de c2                    |        |		ADDA.W	D2,A7
000281d8 4a 11                    |J       |		TST.B	(A1)
000281da 67 02                    |g       |		BEQ	0x281de
000281dc 10 83                    |        |		MOVE.B	D3,(A0)
000281de 4c df 1f 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4
000281e2 4e 5e                    |N^      |		UNLK	A6
000281e4 4e 75                    |Nu      |		RTS
000281e6 ; --------------------------------------------------------------------------------------
000281e6 ; OMSI PASCAL Function
000281e6 ;    <LVAR  0x008 1(rw)>
000281e6 ;    <LVAR -0x004 @ 2(r)>
000281e6 ; --------------------------------------------------------------------------------------
000281e6 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
000281ea bf d5                    |        |		CMPA.L	(A5),A7
000281ec 62 06                    |b       |		BHI	0x281f4
000281ee 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000281f2 4e 76                    |Nv      |		TRAPV
000281f4 de fc 00 16              |        |		ADDA.W	#0x16,A7
000281f8 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
000281fc 48 78 f8 03              |Hx      |		PEA.L	0xfffff803
00028200 41 ee ff fc              |A       |		LEA.L	(A6-0x4),A0
00028204 2f 08                    |/       |		MOVE.L	A0,-(A7)
00028206 52 97                    |R       |		ADDQ.L	#0x1,(A7)
00028208 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002820c 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00028212 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00028216 42 2e 00 08              |B.      |		CLR.B	(A6+0x8)
0002821a 30 2e ff fc              |0.      |		MOVE.W	(A6-0x4),D0
0002821e 02 40 00 70              | @ p    |		ANDI.W	#0x0070,D0
00028222 0c 40 00 20              | @      |		CMPI.W	#0x0020,D0
00028226 66 04                    |f       |		BNE	0x2822c
00028228 52 2e 00 08              |R.      |		ADDQ.B	#0x1,(A6+0x8)
0002822c 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00028230 4e 5e                    |N^      |		UNLK	A6
00028232 4e 75                    |Nu      |		RTS
00028234 ; --------------------------------------------------------------------------------------
00028234 ; OMSI PASCAL Function
00028234 ; --------------------------------------------------------------------------------------
00028234 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00028238 bf d5                    |        |		CMPA.L	(A5),A7
0002823a 62 06                    |b       |		BHI	0x28242
0002823c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028240 4e 76                    |Nv      |		TRAPV
00028242 de fc 00 20              |        |		ADDA.W	#0x20,A7
00028246 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002824a 41 f9 00 02 c7 c8        |A       |		LEA.L	0x2c7c8,A0
00028250 70 01                    |p       |		MOVEQ.L	#0x01,D0
00028252 42 39 00 02 c7 d4        |B9      |		CLR.B	0x2c7d4
00028258 42 39 00 02 c7 ea        |B9      |		CLR.B	0x2c7ea
0002825e 42 39 00 02 c7 eb        |B9      |		CLR.B	0x2c7eb
00028264 42 39 00 02 c7 f0        |B9      |		CLR.B	0x2c7f0
0002826a 42 39 00 02 cc 12        |B9      |		CLR.B	0x2cc12
00028270 23 fc 93 03 fc 00 00 02  |#       |		MOVE.L	#0x9303fc00,0x2d014
00028278 d0 14                    |        |
0002827a 42 b9 00 02 d0 1c        |B       |		CLR.L	0x2d01c
00028280 13 fc 00 03 00 02 d0 2c  |       ,|		MOVE.B	#0x03,0x2d02c
00028288 33 fc 04 01 00 02 d8 b4  |3       |		MOVE.W	#0x401,0x2d8b4
00028290 2f 3a 8d 02              |/:      |		MOVE.L	0x20f94,-(A7)
00028294 2f 3a 8c fa              |/:      |		MOVE.L	0x20f90,-(A7)
00028298 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002829a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002829e 3f 00                    |?       |		MOVE.W	D0,-(A7)
000282a0 3f 3c 00 08              |?<      |		MOVE.W	#0x8,-(A7)
000282a4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000282aa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000282ac 23 df 00 02 d8 b6        |#       |		MOVE.L	(A7)+,0x2d8b6
000282b2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000282b4 42 b9 00 02 d8 ba        |B       |		CLR.L	0x2d8ba
000282ba 42 39 00 02 e1 c6        |B9      |		CLR.B	0x2e1c6
000282c0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000282c2 4e ba bb 44              |N  D    |		JSR	0x23e08
000282c6 4a 1f                    |J       |		TST.B	(A7)+
000282c8 67 04                    |g       |		BEQ	0x282ce
000282ca 42 10                    |B       |		CLR.B	(A0)
000282cc 60 06                    |`       |		BRA	0x282d4
000282ce 10 80                    |        |		MOVE.B	D0,(A0)
000282d0 4e ba 92 70              |N  p    |		JSR	0x21542
000282d4 23 fc 93 03 e0 0c 00 02  |#       |		MOVE.L	#0x9303e00c,0x2c79c
000282dc c7 9c                    |        |
000282de 23 fc 93 03 e1 02 00 02  |#       |		MOVE.L	#0x9303e102,0x2c7a0
000282e6 c7 a0                    |        |
000282e8 23 fc 93 03 e1 0a 00 02  |#       |		MOVE.L	#0x9303e10a,0x2c7a4
000282f0 c7 a4                    |        |
000282f2 23 fc 93 03 e0 08 00 02  |#       |		MOVE.L	#0x9303e008,0x2c7a8
000282fa c7 a8                    |        |
000282fc 23 fc 93 03 e1 06 00 02  |#       |		MOVE.L	#0x9303e106,0x2c7ac
00028304 c7 ac                    |        |
00028306 23 fc 93 03 e2 02 00 02  |#       |		MOVE.L	#0x9303e202,0x2c7b0
0002830e c7 b0                    |        |
00028310 23 fc 93 03 fc 00 00 02  |#       |		MOVE.L	#0x9303fc00,0x2c7b4
00028318 c7 b4                    |        |
0002831a 23 fc 93 03 f8 00 00 02  |#       |		MOVE.L	#0x9303f800,0x2c7b8
00028322 c7 b8                    |        |
00028324 23 fc 93 03 f4 00 00 02  |#       |		MOVE.L	#0x9303f400,0x2c7bc
0002832c c7 bc                    |        |
0002832e 23 fc 93 03 f0 00 00 02  |#       |		MOVE.L	#0x9303f000,0x2c7c0
00028336 c7 c0                    |        |
00028338 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002833a 4e ba fe aa              |N       |		JSR	0x281e6
0002833e 4a 1f                    |J       |		TST.B	(A7)+
00028340 67 08                    |g       |		BEQ	0x2834a
00028342 42 39 00 02 d8 b2        |B9      |		CLR.B	0x2d8b2
00028348 60 06                    |`       |		BRA	0x28350
0002834a 13 c0 00 02 d8 b2        |        |		MOVE.B	D0,0x2d8b2
00028350 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00028354 4e 5e                    |N^      |		UNLK	A6
00028356 4e 75                    |Nu      |		RTS
00028358 ; --------------------------------------------------------------------------------------
00028358 ; OMSI PASCAL Function
00028358 ;    <LVAR  0x010 4(r)>
00028358 ;    <LVAR  0x00c 4(r)>
00028358 ;    <LVAR  0x008 4(r)>
00028358 ;    <LVAR -0x006 @ 4(rw)>
00028358 ; --------------------------------------------------------------------------------------
00028358 4e 56 ff 6a              |NV j    |		LINK.W	A6,#0xff6a
0002835c bf d5                    |        |		CMPA.L	(A5),A7
0002835e 62 06                    |b       |		BHI	0x28366
00028360 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028364 4e 76                    |Nv      |		TRAPV
00028366 de fc 00 8e              |        |		ADDA.W	#0x8e,A7
0002836a 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002836e 45 f9 00 02 c7 c8        |E       |		LEA.L	0x2c7c8,A2
00028374 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002837a 49 ee 00 0c              |I       |		LEA.L	(A6+0xc),A4
0002837e 72 01                    |r       |		MOVEQ.L	#0x01,D1
00028380 74 0a                    |t       |		MOVEQ.L	#0x0a,D2
00028382 76 0b                    |v       |		MOVEQ.L	#0x0b,D3
00028384 78 22                    |x"      |		MOVEQ.L	#0x22,D4
00028386 7a 21                    |z!      |		MOVEQ.L	#0x21,D5
00028388 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002838c 42 10                    |B       |		CLR.B	(A0)
0002838e 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00028390 10 07                    |        |		MOVE.B	D7,D0
00028392 48 80                    |H       |		EXTB.W	D0
00028394 c1 c2                    |        |		MULS.W	D2,D0
00028396 41 fa 8f 1c              |A       |		LEA.L	0x212b4,A0
0002839a 9e c2                    |        |		SUBA.W	D2,A7
0002839c 22 4f                    |"O      |		MOVEA.L	A7,A1
0002839e 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
000283a2 70 09                    |p       |		MOVEQ.L	#0x09,D0
000283a4 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000283a6 51 c8 ff fc              |Q       |		DBF	D0,0x283a4
000283aa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000283ac 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000283b0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000283b2 3f 02                    |?       |		MOVE.W	D2,-(A7)
000283b4 4e 93                    |N       |		JSR	(A3)
000283b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000283b8 2d 5f ff fa              |-_      |		MOVE.L	(A7)+,(A6-0x6)
000283bc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000283be 2e ae ff fa              |.       |		MOVE.L	(A6-0x6),(A7)
000283c2 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
000283c6 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
000283cc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000283ce 10 1f                    |        |		MOVE.B	(A7)+,D0
000283d0 48 80                    |H       |		EXTB.W	D0
000283d2 41 81                    |A       |		CHK.W	D1,D0
000283d4 1c 00                    |        |		MOVE.B	D0,D6
000283d6 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
000283da 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
000283e0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000283e2 4a 06                    |J       |		TST.B	D6
000283e4 67 00 00 da              |g       |		BEQ	0x284c0
000283e8 4a 12                    |J       |		TST.B	(A2)
000283ea 66 00 00 d4              |f       |		BNE	0x284c0
000283ee 10 07                    |        |		MOVE.B	D7,D0
000283f0 48 80                    |H       |		EXTB.W	D0
000283f2 b0 43                    | C      |		CMP.W	D3,D0
000283f4 63 02                    |c       |		BLS	0x283f8
000283f6 4e 4e                    |NN      |		TRAP	#14
000283f8 d0 40                    | @      |		ADD.W	D0,D0
000283fa 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00028402 00 18                    |        |		.CONST	0x18			; [0x0] -> 0x2841a
00028404 00 30                    | 0      |		.CONST	0x30			; [0x1] -> 0x28432
00028406 00 3a                    | :      |		.CONST	0x3a			; [0x2] -> 0x2843c
00028408 00 66                    | f      |		.CONST	0x66			; [0x3] -> 0x28468
0002840a 00 6c                    | l      |		.CONST	0x6c			; [0x4] -> 0x2846e
0002840c 00 74                    | t      |		.CONST	0x74			; [0x5] -> 0x28476
0002840e 00 7a                    | z      |		.CONST	0x7a			; [0x6] -> 0x2847c
00028410 00 80                    |        |		.CONST	0x80			; [0x7] -> 0x28482
00028412 00 84                    |        |		.CONST	0x84			; [0x8] -> 0x28486
00028414 00 88                    |        |		.CONST	0x88			; [0x9] -> 0x2848a
00028416 00 8a                    |        |		.CONST	0x8a			; [0xa] -> 0x2848c
00028418 00 b0                    |        |		.CONST	0xb0			; [0xb] -> 0x284b2
0002841a					switch@0x283fa[0x0]:
0002841a 41 fa 8c a6              |A       |		LEA.L	0x210c2,A0
0002841e 70 28                    |p(      |		MOVEQ.L	#0x28,D0
00028420 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00028422 51 c8 ff fc              |Q       |		DBF	D0,0x28420
00028426 4e ba b8 e0              |N       |		JSR	0x23d08
0002842a de fc 00 52              |   R    |		ADDA.W	#0x52,A7
0002842e 60 00 00 86              |`       |		BRA	0x284b6
00028432					switch@0x283fa[0x1]:
00028432 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00028434 4e ba fc d2              |N       |		JSR	0x28108
00028438 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002843a 60 7a                    |`z      |		BRA	0x284b6
0002843c					switch@0x283fa[0x2]:
0002843c 9e c4                    |        |		SUBA.W	D4,A7
0002843e 20 4f                    | O      |		MOVEA.L	A7,A0
00028440 43 f9 00 02 01 0a        |C       |		LEA.L	0x2010a,A1
00028446 70 20                    |p       |		MOVEQ.L	#0x20,D0
00028448 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002844a 51 c8 ff fc              |Q       |		DBF	D0,0x28448
0002844e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028450 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00028454 3f 01                    |?       |		MOVE.W	D1,-(A7)
00028456 3f 05                    |?       |		MOVE.W	D5,-(A7)
00028458 4e 93                    |N       |		JSR	(A3)
0002845a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002845c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00028462 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00028466 60 4e                    |`N      |		BRA	0x284b6
00028468					switch@0x283fa[0x3]:
00028468 4e ba ba 0c              |N       |		JSR	0x23e76
0002846c 60 48                    |`H      |		BRA	0x284b6
0002846e					switch@0x283fa[0x4]:
0002846e 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00028470 4e ba f4 ac              |N       |		JSR	0x2791e
00028474 60 c2                    |`       |		BRA	0x28438
00028476					switch@0x283fa[0x5]:
00028476 4e ba ce 92              |N       |		JSR	0x2530a
0002847a 60 3a                    |`:      |		BRA	0x284b6
0002847c					switch@0x283fa[0x6]:
0002847c 4e ba ce 12              |N       |		JSR	0x25290
00028480 60 34                    |`4      |		BRA	0x284b6
00028482					switch@0x283fa[0x7]:
00028482 42 12                    |B       |		CLR.B	(A2)
00028484 60 30                    |`0      |		BRA	0x284b6
00028486					switch@0x283fa[0x8]:
00028486 14 81                    |        |		MOVE.B	D1,(A2)
00028488 60 2c                    |`,      |		BRA	0x284b6
0002848a					switch@0x283fa[0x9]:
0002848a 60 2a                    |`*      |		BRA	0x284b6
0002848c					switch@0x283fa[0xa]:
0002848c 3f 3a 8b 86              |?:      |		MOVE.W	0x21014,-(A7)
00028490 3f 3a 8b 80              |?:      |		MOVE.W	0x21012,-(A7)
00028494 3f 3a 8b 7a              |?: z    |		MOVE.W	0x21010,-(A7)
00028498 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002849a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002849e 3f 01                    |?       |		MOVE.W	D1,-(A7)
000284a0 3f 3c 00 06              |?<      |		MOVE.W	#0x6,-(A7)
000284a4 4e 93                    |N       |		JSR	(A3)
000284a6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000284a8 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000284ae de c2                    |        |		ADDA.W	D2,A7
000284b0 60 04                    |`       |		BRA	0x284b6
000284b2					switch@0x283fa[0xb]:
000284b2 4e ba fb fc              |N       |		JSR	0x280b0
000284b6 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000284ba 10 81                    |        |		MOVE.B	D1,(A0)
000284bc 60 00 00 da              |`       |		BRA	0x28598
000284c0 4a 06                    |J       |		TST.B	D6
000284c2 67 00 00 cc              |g       |		BEQ	0x28590
000284c6 10 12                    |        |		MOVE.B	(A2),D0
000284c8 b0 01                    |        |		CMP.B	D1,D0
000284ca 66 00 00 c4              |f       |		BNE	0x28590
000284ce 10 07                    |        |		MOVE.B	D7,D0
000284d0 48 80                    |H       |		EXTB.W	D0
000284d2 b0 43                    | C      |		CMP.W	D3,D0
000284d4 63 02                    |c       |		BLS	0x284d8
000284d6 4e 4e                    |NN      |		TRAP	#14
000284d8 d0 40                    | @      |		ADD.W	D0,D0
000284da 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
000284e2 00 18                    |        |		.CONST	0x18			; [0x0] -> 0x284fa
000284e4 00 42                    | B      |		.CONST	0x42			; [0x1] -> 0x28524
000284e6 00 4c                    | L      |		.CONST	0x4c			; [0x2] -> 0x2852e
000284e8 00 78                    | x      |		.CONST	0x78			; [0x3] -> 0x2855a
000284ea 00 80                    |        |		.CONST	0x80			; [0x4] -> 0x28562
000284ec 00 88                    |        |		.CONST	0x88			; [0x5] -> 0x2856a
000284ee 00 8e                    |        |		.CONST	0x8e			; [0x6] -> 0x28570
000284f0 00 90                    |        |		.CONST	0x90			; [0x7] -> 0x28572
000284f2 00 94                    |        |		.CONST	0x94			; [0x8] -> 0x28576
000284f4 00 98                    |        |		.CONST	0x98			; [0x9] -> 0x2857a
000284f6 00 9e                    |        |		.CONST	0x9e			; [0xa] -> 0x28580
000284f8 00 a6                    |        |		.CONST	0xa6			; [0xb] -> 0x28588
000284fa					switch@0x284da[0x0]:
000284fa 41 f9 00 02 02 6c        |A    l  |		LEA.L	0x2026c,A0
00028500 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00028502 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00028504 51 c8 ff fc              |Q       |		DBF	D0,0x28502
00028508 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002850a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002850e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00028510 3f 3c 00 34              |?< 4    |		MOVE.W	#0x34,-(A7)
00028514 4e 93                    |N       |		JSR	(A3)
00028516 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00028518 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002851e de fc 00 38              |   8    |		ADDA.W	#0x38,A7
00028522 60 68                    |`h      |		BRA	0x2858c
00028524					switch@0x284da[0x1]:
00028524 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00028526 4e ba fb e0              |N       |		JSR	0x28108
0002852a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002852c 60 5e                    |`^      |		BRA	0x2858c
0002852e					switch@0x284da[0x2]:
0002852e 9e c4                    |        |		SUBA.W	D4,A7
00028530 20 4f                    | O      |		MOVEA.L	A7,A0
00028532 43 f9 00 02 01 0a        |C       |		LEA.L	0x2010a,A1
00028538 70 20                    |p       |		MOVEQ.L	#0x20,D0
0002853a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002853c 51 c8 ff fc              |Q       |		DBF	D0,0x2853a
00028540 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028542 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00028546 3f 01                    |?       |		MOVE.W	D1,-(A7)
00028548 3f 05                    |?       |		MOVE.W	D5,-(A7)
0002854a 4e 93                    |N       |		JSR	(A3)
0002854c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002854e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00028554 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00028558 60 32                    |`2      |		BRA	0x2858c
0002855a					switch@0x284da[0x3]:
0002855a 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002855c 4e ba cc cc              |N       |		JSR	0x2522a
00028560 60 c8                    |`       |		BRA	0x2852a
00028562					switch@0x284da[0x4]:
00028562 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00028564 4e ba f7 66              |N  f    |		JSR	0x27ccc
00028568 60 c0                    |`       |		BRA	0x2852a
0002856a					switch@0x284da[0x5]:
0002856a 4e ba ce 34              |N  4    |		JSR	0x253a0
0002856e 60 1c                    |`       |		BRA	0x2858c
00028570					switch@0x284da[0x6]:
00028570 60 1a                    |`       |		BRA	0x2858c
00028572					switch@0x284da[0x7]:
00028572 42 12                    |B       |		CLR.B	(A2)
00028574 60 16                    |`       |		BRA	0x2858c
00028576					switch@0x284da[0x8]:
00028576 14 81                    |        |		MOVE.B	D1,(A2)
00028578 60 12                    |`       |		BRA	0x2858c
0002857a					switch@0x284da[0x9]:
0002857a 4e ba b5 cc              |N       |		JSR	0x23b48
0002857e 60 0c                    |`       |		BRA	0x2858c
00028580					switch@0x284da[0xa]:
00028580 42 39 00 02 d8 b2        |B9      |		CLR.B	0x2d8b2
00028586 60 04                    |`       |		BRA	0x2858c
00028588					switch@0x284da[0xb]:
00028588 4e ba fb 26              |N  &    |		JSR	0x280b0
0002858c 60 00 ff 28              |`  (    |		BRA	0x284b6
00028590 52 07                    |R       |		ADDQ.B	#0x1,D7
00028592 be 03                    |        |		CMP.B	D3,D7
00028594 6f 00 fd fa              |o       |		BLE	0x28390
00028598 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002859c 4e 5e                    |N^      |		UNLK	A6
0002859e 4e 75                    |Nu      |		RTS
000285a0 ; --------------------------------------------------------------------------------------
000285a0 ; OMSI PASCAL Function
000285a0 ;    <LVAR  0x008 4(r)>
000285a0 ; --------------------------------------------------------------------------------------
000285a0 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0
000285a4 bf d5                    |        |		CMPA.L	(A5),A7
000285a6 62 06                    |b       |		BHI	0x285ae
000285a8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000285ac 4e 76                    |Nv      |		TRAPV
000285ae de fc 00 10              |        |		ADDA.W	#0x10,A7
000285b2 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000285b6 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
000285bc 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000285c0 43 fa 8a 54              |C  T    |		LEA.L	0x21016,A1
000285c4 70 09                    |p       |		MOVEQ.L	#0x09,D0
000285c6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000285c8 51 c8 ff fc              |Q       |		DBF	D0,0x285c6
000285cc 4e ba 9b 7c              |N  |    |		JSR	0x2214a
000285d0 4e ba fc 62              |N  b    |		JSR	0x28234
000285d4 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
000285d8 4e 5e                    |N^      |		UNLK	A6
000285da 4e 75                    |Nu      |		RTS
000285dc ; --------------------------------------------------------------------------------------
000285dc ; COMMAND TABLE
000285dc ; --------------------------------------------------------------------------------------
000285dc					COMMAND_TABLE_285dc:
000285dc 21 40 23 24 25 5e 26 2a  |!@#$%^&*|		.TXT	'!@#$%^&*()'
000285e6 57 52 49 54 45 20 20 20  |WRITE   |		.TXT	'WRITE     '
000285f0 42 59 45 20 20 20 20 20  |BYE     |		.TXT	'BYE       '
000285fa 48 45 41 50 20 20 20 20  |HEAP    |		.TXT	'HEAP      '
00028604 48 45 4c 50 20 20 20 20  |HELP    |		.TXT	'HELP      '
0002860e 41 42 4f 52 54 20 20 20  |ABORT   |		.TXT	'ABORT     '
00028618 43 4f 4d 4d 45 4e 54 20  |COMMENT |		.TXT	'COMMENT   '
00028622 53 45 54 20 20 20 20 20  |SET     |		.TXT	'SET       '
0002862c 56 41 52 20 20 20 20 20  |VAR     |		.TXT	'VAR       '
00028636 56 41 52 53 20 20 20 20  |VARS    |		.TXT	'VARS      '
00028640 45 51 20 20 20 20 20 20  |EQ      |		.TXT	'EQ        '
0002864a 4e 45 20 20 20 20 20 20  |NE      |		.TXT	'NE        '
00028654 43 41 53 45 20 20 20 20  |CASE    |		.TXT	'CASE      '
0002865e 49 4e 53 45 52 54 20 20  |INSERT  |		.TXT	'INSERT    '
00028668 45 58 54 52 41 43 54 20  |EXTRACT |		.TXT	'EXTRACT   '
00028672 23 43 41 53 45 20 20 20  |#CASE   |		.TXT	'#CASE     '
0002867c 23 45 51 20 20 20 20 20  |#EQ     |		.TXT	'#EQ       '
00028686 23 4e 45 20 20 20 20 20  |#NE     |		.TXT	'#NE       '
00028690 23 4c 54 20 20 20 20 20  |#LT     |		.TXT	'#LT       '
0002869a 23 47 54 20 20 20 20 20  |#GT     |		.TXT	'#GT       '
000286a4 23 4c 45 20 20 20 20 20  |#LE     |		.TXT	'#LE       '
000286ae 23 47 45 20 20 20 20 20  |#GE     |		.TXT	'#GE       '
000286b8 41 44 44 20 20 20 20 20  |ADD     |		.TXT	'ADD       '
000286c2 53 55 42 20 20 20 20 20  |SUB     |		.TXT	'SUB       '
000286cc 4d 55 4c 20 20 20 20 20  |MUL     |		.TXT	'MUL       '
000286d6 44 49 56 20 20 20 20 20  |DIV     |		.TXT	'DIV       '
000286e0 4d 4f 44 20 20 20 20 20  |MOD     |		.TXT	'MOD       '
000286ea 4f 52 20 20 20 20 20 20  |OR      |		.TXT	'OR        '
000286f4 41 4e 44 20 20 20 20 20  |AND     |		.TXT	'AND       '
000286fe 58 4f 52 20 20 20 20 20  |XOR     |		.TXT	'XOR       '
00028708 4c 53 48 49 46 54 20 20  |LSHIFT  |		.TXT	'LSHIFT    '
00028712 52 53 48 49 46 54 20 20  |RSHIFT  |		.TXT	'RSHIFT    '
0002871c 4e 4f 54 20 20 20 20 20  |NOT     |		.TXT	'NOT       '
00028726 23 49 4e 53 45 52 54 20  |#INSERT |		.TXT	'#INSERT   '
00028730 23 45 58 54 52 41 43 54  |#EXTRACT|		.TXT	'#EXTRACT  '
0002873a 52 45 41 44 20 20 20 20  |READ    |		.TXT	'READ      '
00028744 4b 49 4c 4c 20 20 20 20  |KILL    |		.TXT	'KILL      '
0002874e 50 55 53 48 20 20 20 20  |PUSH    |		.TXT	'PUSH      '
00028758 4c 45 56 45 4c 20 20 20  |LEVEL   |		.TXT	'LEVEL     '
00028762 43 4f 4e 56 45 52 54 20  |CONVERT |		.TXT	'CONVERT   '
0002876c 43 4f 55 4e 54 5f 4f 4e  |COUNT_ON|		.TXT	'COUNT_ONES'
00028776 52 45 50 45 41 54 20 20  |REPEAT  |		.TXT	'REPEAT    '
00028780 4d 4f 44 45 4c 20 20 20  |MODEL   |		.TXT	'MODEL     '
0002878a 41 53 43 49 49 20 20 20  |ASCII   |		.TXT	'ASCII     '
00028794 57 72 6f 6e 67 20 6e 75  |Wrong nu|		.TXT	'Wrong number of arguments for :_'
000287b4 45 51 2c 4e              |EQ,N    |		.XXX[0x4]
000287b8 45 2c 23 45 51 2c 23 4e  |E,#EQ,#N|		.XXX[0x38]
000287c0 45 2c 23 4c 54 2c 23 47  |E,#LT,#G|
000287c8 54 2c 23 4c 45 2c 23 47  |T,#LE,#G|
000287d0 45 2c 45 4c 53 45 5d 45  |E,ELSE]E|
000287d8 4e 44 5d 43 41 53 45 2c  |ND]CASE,|
000287e0 23 43 41 53 45 2c 57 48  |#CASE,WH|
000287e8 45 4e 2c 45 4e 44 43 41  |EN,ENDCA|
000287f0 53 45 5d 20              |SE]     |		.XXX[0x4]
000287f4 45 76 61 6c 75 61 74 69  |Evaluati|		.TXT	'Evaluation buffer overflow. '
00028810 55 6e 62 61 6c 61 6e 63  |Unbalanc|		.TXT	'Unbalanced [ELSE] or [END]! '
0002882c 5b 57 48 45 4e 20 5d 20  |[WHEN ] |		.TXT	'[WHEN ]   '
00028836 4e 6f 20 63 61 73 65 20  |No case |		.TXT	'No case alternative found!'
00028850 4e 6f 20 5b 45 4e 44 43  |No [ENDC|		.TXT	'No [ENDCASE] found! '
00028864 4e 6f 20 68 65 6c 70 20  |No help |		.TXT	'No help available for_'
0002887a 2e 48 4c 50              |.HLP    |		.TXT	'.HLP'
0002887e 54 6f 6f 20 66 65 77 20  |Too few |		.TXT	'Too few arguments for SET '
00028898 55 6e 6b 6e 6f 77 6e 20  |Unknown |		.TXT	'Unknown variable :_ '
000288ac 20 69 73 20 6e 6f 74 20  | is not |		.TXT	' is not a program.'
000288be 43 4c                    |CL      |		.TXT	'CL'
000288c0 49 20                    |I       |		.XXX[0x2]
000288c2 2e 4d 32 30 30 20        |.M200   |		.TXT	'.M200 '
000288c8 53 54                    |ST      |		.TXT	'ST'
000288ca 41 54                    |AT      |		.TXT	'AT'
000288cc 55 53                    |US      |		.TXT	'US'
000288ce 52 45                    |RE      |		.TXT	'RE'
000288d0 53 55                    |SU      |		.TXT	'SU'
000288d2 4c 54                    |LT      |		.TXT	'LT'
000288d4 4f 66 66 73 65 74 2f 4c  |Offset/L|		.TXT	'Offset/Length error in [INSERT] '
000288f4 52 45 50 45 41 54 69 6e  |REPEATin|		.TXT	'REPEATing, type ^G to exit. '
00028910 41 53 43 49 49 20 61 72  |ASCII ar|		.TXT	'ASCII argument out of range.'
0002892c 4e 6f 74 20 61 20 63 6f  |Not a co|		.TXT	'Not a command or macro :_ '
00028946 49 6c 6c 65 67 61 6c 20  |Illegal |		.TXT	'Illegal marker argument '
0002895e 53 77 69 74 63 68 20 65  |Switch e|		.TXT	'Switch exclusion is unimplemented.'
00028980 49 6c 6c 65 67 61 6c 20  |Illegal |		.TXT	'Illegal argument marker.'
00028998 49 6c 6c 65 67 61 6c 20  |Illegal |		.TXT	'Illegal argument marker.'
000289b0 5b 49 4e 49 54 5d 5b 20  |[INIT][ |		.TXT	'[INIT][ '
000289b8 5d 5b 42 59 45 5d 3b 20  |][BYE]; |		.TXT	'][BYE]; '
000289c0 5b 49 4e 49 54 5d 3b 20  |[INIT]; |		.TXT	'[INIT]; '
000289c8 3e 5f                    |>_      |		.TXT	'>_'
000289ca 5b 20                    |[       |		.TXT	'[ '
000289cc 5d 3b                    |];      |		.TXT	'];'
000289ce ; --------------------------------------------------------------------------------------
000289ce ; COMMAND TABLE
000289ce ; --------------------------------------------------------------------------------------
000289ce					COMMAND_TABLE_289ce:
000289ce 21 40 23 24 25 5e 26 2a  |!@#$%^&*|		.TXT	'!@#$%^&*()'
000289d8 57 52 49 54 45 20 20 20  |WRITE   |		.TXT	'WRITE     '
000289e2 42 59 45 20 20 20 20 20  |BYE     |		.TXT	'BYE       '
000289ec 48 45 41 50 20 20 20 20  |HEAP    |		.TXT	'HEAP      '
000289f6 48 45 4c 50 20 20 20 20  |HELP    |		.TXT	'HELP      '
00028a00 41 42 4f 52 54 20 20 20  |ABORT   |		.TXT	'ABORT     '
00028a0a 43 4f 4d 4d 45 4e 54 20  |COMMENT |		.TXT	'COMMENT   '
00028a14 53 45 54 20 20 20 20 20  |SET     |		.TXT	'SET       '
00028a1e 56 41 52 20 20 20 20 20  |VAR     |		.TXT	'VAR       '
00028a28 56 41 52 53 20 20 20 20  |VARS    |		.TXT	'VARS      '
00028a32 45 51 20 20 20 20 20 20  |EQ      |		.TXT	'EQ        '
00028a3c 4e 45 20 20 20 20 20 20  |NE      |		.TXT	'NE        '
00028a46 43 41 53 45 20 20 20 20  |CASE    |		.TXT	'CASE      '
00028a50 49 4e 53 45 52 54 20 20  |INSERT  |		.TXT	'INSERT    '
00028a5a 45 58 54 52 41 43 54 20  |EXTRACT |		.TXT	'EXTRACT   '
00028a64 23 43 41 53 45 20 20 20  |#CASE   |		.TXT	'#CASE     '
00028a6e 23 45 51 20 20 20 20 20  |#EQ     |		.TXT	'#EQ       '
00028a78 23 4e 45 20 20 20 20 20  |#NE     |		.TXT	'#NE       '
00028a82 23 4c 54 20 20 20 20 20  |#LT     |		.TXT	'#LT       '
00028a8c 23 47 54 20 20 20 20 20  |#GT     |		.TXT	'#GT       '
00028a96 23 4c 45 20 20 20 20 20  |#LE     |		.TXT	'#LE       '
00028aa0 23 47 45 20 20 20 20 20  |#GE     |		.TXT	'#GE       '
00028aaa 41 44 44 20 20 20 20 20  |ADD     |		.TXT	'ADD       '
00028ab4 53 55 42 20 20 20 20 20  |SUB     |		.TXT	'SUB       '
00028abe 4d 55 4c 20 20 20 20 20  |MUL     |		.TXT	'MUL       '
00028ac8 44 49 56 20 20 20 20 20  |DIV     |		.TXT	'DIV       '
00028ad2 4d 4f 44 20 20 20 20 20  |MOD     |		.TXT	'MOD       '
00028adc 4f 52 20 20 20 20 20 20  |OR      |		.TXT	'OR        '
00028ae6 41 4e 44 20 20 20 20 20  |AND     |		.TXT	'AND       '
00028af0 58 4f 52 20 20 20 20 20  |XOR     |		.TXT	'XOR       '
00028afa 4c 53 48 49 46 54 20 20  |LSHIFT  |		.TXT	'LSHIFT    '
00028b04 52 53 48 49 46 54 20 20  |RSHIFT  |		.TXT	'RSHIFT    '
00028b0e 4e 4f 54 20 20 20 20 20  |NOT     |		.TXT	'NOT       '
00028b18 23 49 4e 53 45 52 54 20  |#INSERT |		.TXT	'#INSERT   '
00028b22 23 45 58 54 52 41 43 54  |#EXTRACT|		.TXT	'#EXTRACT  '
00028b2c 52 45 41 44 20 20 20 20  |READ    |		.TXT	'READ      '
00028b36 4b 49 4c 4c 20 20 20 20  |KILL    |		.TXT	'KILL      '
00028b40 50 55 53 48 20 20 20 20  |PUSH    |		.TXT	'PUSH      '
00028b4a 4c 45 56 45 4c 20 20 20  |LEVEL   |		.TXT	'LEVEL     '
00028b54 43 4f 4e 56 45 52 54 20  |CONVERT |		.TXT	'CONVERT   '
00028b5e 43 4f 55 4e 54 5f 4f 4e  |COUNT_ON|		.TXT	'COUNT_ONES'
00028b68 52 45 50 45 41 54 20 20  |REPEAT  |		.TXT	'REPEAT    '
00028b72 4d 4f 44 45 4c 20 20 20  |MODEL   |		.TXT	'MODEL     '
00028b7c 41 53 43 49 49 20 20 20  |ASCII   |		.TXT	'ASCII     '
00028b86 a5 34                    | 4      |		.XXX[0x2]
00028b88 45 73 34 22 46 75 33 33  |Es4"Fu33|		.XXX[0x98]
00028b90 33 33 33 32 33 66 37 84  |33323f7 |
00028b98 44 57 a6 55 0f 00 f0 ff  |DW U    |
00028ba0 10 22 14 31 22 22 22 22  | " 1""""|
00028ba8 22 22 22 22 14 3f 1f 03  |"""" ?  |
00028bb0 10 0f 00 00 00 00 ff ff  |        |
00028bb8 ff ff 00 01 01 00 01 01  |        |
00028bc0 00 01 02 00 00 01 02 00  |        |
00028bc8 01 02 00 01 14 06 01 14  |        |
00028bd0 08 14 0f 02 03 14 14 08  |        |
00028bd8 14 0f 14 14 14 14 14 14  |        |
00028be0 14 04 14 05 14 14 14 14  |        |
00028be8 14 14 14 14 14 14 14 04  |        |
00028bf0 14 14 14 14 14 14 04 14  |        |
00028bf8 07 14 14 14 14 04 14 14  |        |
00028c00 14 14 14 14 0c 14 14 09  |        |
00028c08 14 14 14 0d 14 14 14 0b  |        |
00028c10 0a 14 0e 14 14 14 08 14  |        |
00028c18 14 0c 14 14 09 14 14 14  |        |
00028c20 14 14 14 14 14 14 14 14  |        |		.BLANK	14[0x10]
00028c30 14 14 14 14 14 10 14 14  |        |		.XXX[0x28]
00028c38 11 14 14 14 14 14 14 14  |        |
00028c40 14 14 14 13 14 14 14 14  |        |
00028c48 14 12 14 14 14 11 14 14  |        |
00028c50 14 14 14 14 14 14 14 14  |        |
00028c58 ; --------------------------------------------------------------------------------------
00028c58 ; OMSI PASCAL Function
00028c58 ;    <LVAR  0x008 4(r)>
00028c58 ;    <LVAR -0x004 @ 4(w)>
00028c58 ; --------------------------------------------------------------------------------------
00028c58 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
00028c5c bf d5                    |        |		CMPA.L	(A5),A7
00028c5e 62 06                    |b       |		BHI	0x28c66
00028c60 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028c64 4e 76                    |Nv      |		TRAPV
00028c66 de fc 00 10              |        |		ADDA.W	#0x10,A7
00028c6a 48 e7 00 08              |H       |		MOVEM.L	A4,-(A7)
00028c6e 28 6e 00 08              |(n      |		MOVEA.L	(A6+0x8),A4
00028c72 b8 fc 00 01              |        |		CMPA.W	#0x1,A4
00028c76 67 1a                    |g       |		BEQ	0x28c92
00028c78 2d 4c ff fc              |-L      |		MOVE.L	A4,(A6-0x4)
00028c7c 28 6c 00 08              |(l      |		MOVEA.L	(A4+0x8),A4
00028c80 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00028c84 48 78 00 0c              |Hx      |		PEA.L	0xc
00028c88 4e b9 00 01 02 a8        |N       |		JSR	Free2(a : Pointer; b : Long)
00028c8e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00028c90 60 e0                    |`       |		BRA	0x28c72
00028c92 4c df 10 00              |L       |		MOVEM.L	(A7)+,A4
00028c96 4e 5e                    |N^      |		UNLK	A6
00028c98 4e 75                    |Nu      |		RTS
00028c9a ; --------------------------------------------------------------------------------------
00028c9a ; OMSI PASCAL Function
00028c9a ;    <LVAR  0x008 4(r)>
00028c9a ; --------------------------------------------------------------------------------------
00028c9a 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0
00028c9e bf d5                    |        |		CMPA.L	(A5),A7
00028ca0 62 06                    |b       |		BHI	0x28ca8
00028ca2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028ca6 4e 76                    |Nv      |		TRAPV
00028ca8 de fc 00 10              |        |		ADDA.W	#0x10,A7
00028cac 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
00028cb0 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00028cb4 b0 fc 00 01              |        |		CMPA.W	#0x1,A0
00028cb8 67 0a                    |g       |		BEQ	0x28cc4
00028cba 2f 08                    |/       |		MOVE.L	A0,-(A7)
00028cbc 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00028cc2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00028cc4 2e 6d 00 08              |.m      |		MOVEA.L	(A5+0x8),A7
00028cc8 3c 7c 00 00              |<|      |		MOVEA.W	#0x0,A6
00028ccc 4e f9 00 02 c5 76        |N    v  |		JMP	0x2c576
00028cd2 4c df 01 00 4e 5e        |L   N^  |		.XXX[0x6]
00028cd8 4e 75 4e 56 ff fc bf d5  |NuNV    |		.XXX[0x20]
00028ce0 62 06 44 fc 00 02 4e 76  |b D   Nv|
00028ce8 de fc 00 04 2d 79 00 02  |    -y  |
00028cf0 f1 e8 00 08 4e 5e 4e 75  |    N^Nu|
00028cf8 ; --------------------------------------------------------------------------------------
00028cf8 ; OMSI PASCAL Function
00028cf8 ;    <LVAR  0x008 1(rw)>
00028cf8 ; --------------------------------------------------------------------------------------
00028cf8 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0
00028cfc bf d5                    |        |		CMPA.L	(A5),A7
00028cfe 62 06                    |b       |		BHI	0x28d06
00028d00 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028d04 4e 76                    |Nv      |		TRAPV
00028d06 de fc 00 10              |        |		ADDA.W	#0x10,A7
00028d0a 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00028d0e 20 39 00 02 f1 e8        | 9      |		MOVE.L	0x2f1e8,D0
00028d14 b0 b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D0
00028d1a 6f 06                    |o       |		BLE	0x28d22
00028d1c 42 2e 00 08              |B.      |		CLR.B	(A6+0x8)
00028d20 60 0c                    |`       |		BRA	0x28d2e
00028d22 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
00028d28 1d 70 08 07 00 08        | p      |		MOVE.B	(A0+D0.L+#0x7),(A6+0x8)
00028d2e 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00028d32 4e 5e                    |N^      |		UNLK	A6
00028d34 4e 75                    |Nu      |		RTS
00028d36 ; --------------------------------------------------------------------------------------
00028d36 ; OMSI PASCAL Function
00028d36 ;    <LVAR  0x008 1(rw)>
00028d36 ; --------------------------------------------------------------------------------------
00028d36 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
00028d3a bf d5                    |        |		CMPA.L	(A5),A7
00028d3c 62 06                    |b       |		BHI	0x28d44
00028d3e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028d42 4e 76                    |Nv      |		TRAPV
00028d44 de fc 00 14              |        |		ADDA.W	#0x14,A7
00028d48 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00028d4c 43 f9 00 02 f1 e8        |C       |		LEA.L	0x2f1e8,A1
00028d52 20 11                    |        |		MOVE.L	(A1),D0
00028d54 b0 b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D0
00028d5a 6f 06                    |o       |		BLE	0x28d62
00028d5c 42 2e 00 08              |B.      |		CLR.B	(A6+0x8)
00028d60 60 0c                    |`       |		BRA	0x28d6e
00028d62 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
00028d68 1d 70 08 07 00 08        | p      |		MOVE.B	(A0+D0.L+#0x7),(A6+0x8)
00028d6e 52 80                    |R       |		ADDQ.L	#0x1,D0
00028d70 22 80                    |"       |		MOVE.L	D0,(A1)
00028d72 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00028d76 4e 5e                    |N^      |		UNLK	A6
00028d78 4e 75                    |Nu      |		RTS
00028d7a ; --------------------------------------------------------------------------------------
00028d7a ; OMSI PASCAL Function
00028d7a ;    <LVAR  0x00c 4(r)>
00028d7a ;    <LVAR  0x008 4(r)>
00028d7a ; --------------------------------------------------------------------------------------
00028d7a 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
00028d7e bf d5                    |        |		CMPA.L	(A5),A7
00028d80 62 06                    |b       |		BHI	0x28d88
00028d82 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028d86 4e 76                    |Nv      |		TRAPV
00028d88 de fc 00 38              |   8    |		ADDA.W	#0x38,A7
00028d8c 48 e7 ff f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00028d90 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00028d94 47 f9 00 02 f1 e8        |G       |		LEA.L	0x2f1e8,A3
00028d9a 72 5b                    |r[      |		MOVEQ.L	#0x5b,D1
00028d9c 74 02                    |t       |		MOVEQ.L	#0x02,D2
00028d9e 76 2c                    |v,      |		MOVEQ.L	#0x2c,D3
00028da0 78 3b                    |x;      |		MOVEQ.L	#0x3b,D4
00028da2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00028da4 4e ba ff 52              |N  R    |		JSR	0x28cf8
00028da8 10 1f                    |        |		MOVE.B	(A7)+,D0
00028daa b0 01                    |        |		CMP.B	D1,D0
00028dac 66 0a                    |f       |		BNE	0x28db8
00028dae 4e b9 00 02 c0 80        |N       |		JSR	0x2c080
00028db4 60 00 00 92              |`       |		BRA	0x28e48
00028db8 2c 13                    |,       |		MOVE.L	(A3),D6
00028dba 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00028dbc 4e ba ff 78              |N  x    |		JSR	0x28d36
00028dc0 1a 1f                    |        |		MOVE.B	(A7)+,D5
00028dc2 66 18                    |f       |		BNE	0x28ddc
00028dc4 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00028dc8 43 fa fd e8              |C       |		LEA.L	0x28bb2,A1
00028dcc 70 07                    |p       |		MOVEQ.L	#0x07,D0
00028dce 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00028dd0 51 c8 ff fc              |Q       |		DBF	D0,0x28dce
00028dd4 20 52                    | R      |		MOVEA.L	(A2),A0
00028dd6 10 82                    |        |		MOVE.B	D2,(A0)
00028dd8 60 72                    |`r      |		BRA	0x28e4c
00028dda 60 5c                    |`\      |		.XXX[0x2]
00028ddc ba 03                    |        |		CMP.B	D3,D5
00028dde 66 08                    |f       |		BNE	0x28de8
00028de0 20 52                    | R      |		MOVEA.L	(A2),A0
00028de2 10 bc 00 03              |        |		MOVE.B	#0x03,(A0)
00028de6 60 50                    |`P      |		BRA	0x28e38
00028de8 ba 04                    |        |		CMP.B	D4,D5
00028dea 66 08                    |f       |		BNE	0x28df4
00028dec 20 52                    | R      |		MOVEA.L	(A2),A0
00028dee 10 bc 00 01              |        |		MOVE.B	#0x01,(A0)
00028df2 60 44                    |`D      |		BRA	0x28e38
00028df4 0c 05 00 5d              |   ]    |		CMPI.B	#0x5d,D5
00028df8 66 06                    |f       |		BNE	0x28e00
00028dfa 20 52                    | R      |		MOVEA.L	(A2),A0
00028dfc 10 82                    |        |		MOVE.B	D2,(A0)
00028dfe 60 38                    |`8      |		BRA	0x28e38
00028e00 20 52                    | R      |		MOVEA.L	(A2),A0
00028e02 42 10                    |B       |		CLR.B	(A0)
00028e04 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00028e06 4e ba fe f0              |N       |		JSR	0x28cf8
00028e0a 1e 1f                    |        |		MOVE.B	(A7)+,D7
00028e0c be 01                    |        |		CMP.B	D1,D7
00028e0e 66 08                    |f       |		BNE	0x28e18
00028e10 4e b9 00 02 c0 80        |N       |		JSR	0x2c080
00028e16 60 1e                    |`       |		BRA	0x28e36
00028e18 be 04                    |        |		CMP.B	D4,D7
00028e1a 67 0e                    |g       |		BEQ	0x28e2a
00028e1c be 03                    |        |		CMP.B	D3,D7
00028e1e 67 0a                    |g       |		BEQ	0x28e2a
00028e20 0c 07 00 5d              |   ]    |		CMPI.B	#0x5d,D7
00028e24 67 04                    |g       |		BEQ	0x28e2a
00028e26 4a 07                    |J       |		TST.B	D7
00028e28 66 04                    |f       |		BNE	0x28e2e
00028e2a 60 0c                    |`       |		BRA	0x28e38
00028e2c 60 08                    |`       |		.XXX[0x2]
00028e2e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00028e30 4e ba ff 04              |N       |		JSR	0x28d36
00028e34 1e 1f                    |        |		MOVE.B	(A7)+,D7
00028e36 60 cc                    |`       |		BRA	0x28e04
00028e38 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00028e3c 20 86                    |        |		MOVE.L	D6,(A0)
00028e3e 21 53 00 04              |!S      |		MOVE.L	(A3),(A0+0x4)
00028e42 53 a8 00 04              |S       |		SUBQ.L	#0x1,(A0+0x4)
00028e46 60 04                    |`       |		BRA	0x28e4c
00028e48 60 00 ff 58              |`  X    |		BRA	0x28da2
00028e4c 4c df 0f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3
00028e50 4e 5e                    |N^      |		UNLK	A6
00028e52 4e 75                    |Nu      |		RTS
00028e54 ; --------------------------------------------------------------------------------------
00028e54 ; OMSI PASCAL Function
00028e54 ;    <LVAR  0x010 4(r)>
00028e54 ;    <LVAR  0x00c 4(r)>
00028e54 ;    <LVAR  0x008 4(r)>
00028e54 ;    <LVAR -0x004 @ 1(rw)>
00028e54 ;    <LVAR -0x008 4(w)>
00028e54 ;    <LVAR -0x00c @ 4(w)>
00028e54 ; --------------------------------------------------------------------------------------
00028e54 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
00028e58 bf d5                    |        |		CMPA.L	(A5),A7
00028e5a 62 06                    |b       |		BHI	0x28e62
00028e5c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028e60 4e 76                    |Nv      |		TRAPV
00028e62 de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
00028e66 48 e7 c0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D1+D0,-(A7)
00028e6a 45 ee ff fc              |E       |		LEA.L	(A6-0x4),A2
00028e6e 47 ee ff f4              |G       |		LEA.L	(A6-0xc),A3
00028e72 72 03                    |r       |		MOVEQ.L	#0x03,D1
00028e74 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00028e78 10 10                    |        |		MOVE.B	(A0),D0
00028e7a 0c 00 00 01              |        |		CMPI.B	#0x01,D0
00028e7e 67 06                    |g       |		BEQ	0x28e86
00028e80 0c 00 00 02              |        |		CMPI.B	#0x02,D0
00028e84 66 0e                    |f       |		BNE	0x28e94
00028e86 26 ba fd 2a              |&  *    |		MOVE.L	0x28bb2,(A3)
00028e8a 2d 7a fd 2a ff f8        |-z *    |		MOVE.L	0x28bb6,(A6-0x8)
00028e90 14 80                    |        |		MOVE.B	D0,(A2)
00028e92 60 3c                    |`<      |		BRA	0x28ed0
00028e94 48 53                    |HS      |		PEA.L	(A3)
00028e96 48 52                    |HR      |		PEA.L	(A2)
00028e98 4e ba fe e0              |N       |		JSR	0x28d7a
00028e9c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00028e9e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00028ea2 4a 12                    |J       |		TST.B	(A2)
00028ea4 67 1c                    |g       |		BEQ	0x28ec2
00028ea6 10 10                    |        |		MOVE.B	(A0),D0
00028ea8 b0 01                    |        |		CMP.B	D1,D0
00028eaa 66 16                    |f       |		BNE	0x28ec2
00028eac 10 12                    |        |		MOVE.B	(A2),D0
00028eae 48 80                    |H       |		EXTB.W	D0
00028eb0 41 81                    |A       |		CHK.W	D1,D0
00028eb2 10 80                    |        |		MOVE.B	D0,(A0)
00028eb4 26 ba fc fc              |&       |		MOVE.L	0x28bb2,(A3)
00028eb8 2d 7a fc fc ff f8        |-z      |		MOVE.L	0x28bb6,(A6-0x8)
00028ebe 42 12                    |B       |		CLR.B	(A2)
00028ec0 60 08                    |`       |		BRA	0x28eca
00028ec2 10 12                    |        |		MOVE.B	(A2),D0
00028ec4 48 80                    |H       |		EXTB.W	D0
00028ec6 41 81                    |A       |		CHK.W	D1,D0
00028ec8 10 80                    |        |		MOVE.B	D0,(A0)
00028eca 10 12                    |        |		MOVE.B	(A2),D0
00028ecc b0 01                    |        |		CMP.B	D1,D0
00028ece 67 c4                    |g       |		BEQ	0x28e94
00028ed0 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00028ed4 22 4b                    |"K      |		MOVEA.L	A3,A1
00028ed6 70 07                    |p       |		MOVEQ.L	#0x07,D0
00028ed8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00028eda 51 c8 ff fc              |Q       |		DBF	D0,0x28ed8
00028ede 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00028ee2 10 12                    |        |		MOVE.B	(A2),D0
00028ee4 48 80                    |H       |		EXTB.W	D0
00028ee6 41 81                    |A       |		CHK.W	D1,D0
00028ee8 10 80                    |        |		MOVE.B	D0,(A0)
00028eea 4c df 0f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3
00028eee 4e 5e                    |N^      |		UNLK	A6
00028ef0 4e 75                    |Nu      |		RTS
00028ef2 ; --------------------------------------------------------------------------------------
00028ef2 ; OMSI PASCAL Function
00028ef2 ;    <LVAR  0x008 4(rw)>
00028ef2 ;    <LVAR -0x004 1(rw)>
00028ef2 ;    <LVAR -0x010 2(rw)>
00028ef2 ; --------------------------------------------------------------------------------------
00028ef2 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
00028ef6 bf d5                    |        |		CMPA.L	(A5),A7
00028ef8 62 06                    |b       |		BHI	0x28f00
00028efa 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00028efe 4e 76                    |Nv      |		TRAPV
00028f00 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00028f04 48 e7 c7 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7)
00028f08 43 ee ff f0              |C       |		LEA.L	(A6-0x10),A1
00028f0c 45 ee ff fc              |E       |		LEA.L	(A6-0x4),A2
00028f10 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
00028f14 72 20                    |r       |		MOVEQ.L	#0x20,D1
00028f16 7c 01                    ||       |		MOVEQ.L	#0x01,D6
00028f18 42 51                    |BQ      |		CLR.W	(A1)
00028f1a 7a 01                    |z       |		MOVEQ.L	#0x01,D5
00028f1c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00028f1e 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00028f20 4e b9 00 01 02 f0        |N       |		JSR	ToUpper(a : String) : String
00028f26 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00028f28 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00028f2a 20 53                    | S      |		MOVEA.L	(A3),A0
00028f2c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00028f2e 20 57                    | W      |		MOVEA.L	(A7),A0
00028f30 30 10                    |0       |		MOVE.W	(A0),D0
00028f32 48 c0                    |H       |		EXTW.L	D0
00028f34 bc 80                    |        |		CMP.L	D0,D6
00028f36 6e 00 00 b0              |n       |		BGT	0x28fe8
00028f3a 42 80                    |B       |		CLR.L	D0
00028f3c 10 30 68 01              | 0h     |		MOVE.B	(A0+D6.L+#0x1),D0
00028f40 02 40 00 7f              | @      |		ANDI.W	#0x007f,D0
00028f44 14 80                    |        |		MOVE.B	D0,(A2)
00028f46 0c 00 00 09              |        |		CMPI.B	#0x09,D0
00028f4a 66 02                    |f       |		BNE	0x28f4e
00028f4c 14 81                    |        |		MOVE.B	D1,(A2)
00028f4e 42 80                    |B       |		CLR.L	D0
00028f50 10 12                    |        |		MOVE.B	(A2),D0
00028f52 90 41                    | A      |		SUB.W	D1,D0
00028f54 0c 40 00 0c              | @      |		CMPI.W	#0x000c,D0
00028f58 62 30                    |b0      |		BHI	switch@0x28f5c[0x2]
00028f5a d0 40                    | @      |		ADD.W	D0,D0
00028f5c 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00028f64 00 1e                    |        |		.CONST	0x1e			; [0x0] -> 0x28f82
00028f66 00 1a                    |        |		.CONST	0x1a			; [0x1] -> 0x28f7e
00028f68 00 26                    | &      |		.CONST	0x26			; [0x2] -> 0x28f8a
00028f6a 00 26                    | &      |		.CONST	0x26			; [0x3] -> 0x28f8a
00028f6c 00 26                    | &      |		.CONST	0x26			; [0x4] -> 0x28f8a
00028f6e 00 26                    | &      |		.CONST	0x26			; [0x5] -> 0x28f8a
00028f70 00 26                    | &      |		.CONST	0x26			; [0x6] -> 0x28f8a
00028f72 00 26                    | &      |		.CONST	0x26			; [0x7] -> 0x28f8a
00028f74 00 26                    | &      |		.CONST	0x26			; [0x8] -> 0x28f8a
00028f76 00 26                    | &      |		.CONST	0x26			; [0x9] -> 0x28f8a
00028f78 00 26                    | &      |		.CONST	0x26			; [0xa] -> 0x28f8a
00028f7a 00 26                    | &      |		.CONST	0x26			; [0xb] -> 0x28f8a
00028f7c 00 22                    | "      |		.CONST	0x22			; [0xc] -> 0x28f86
00028f7e					switch@0x28f5c[0x1]:
00028f7e 60 68                    |`h      |		BRA	0x28fe8
00028f80 60 0a                    |`       |		.XXX[0x2]
00028f82					switch@0x28f5c[0x0]:
00028f82 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00028f84 60 06                    |`       |		BRA	0x28f8c
00028f86					switch@0x28f5c[0xc]:
00028f86 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00028f88 60 02                    |`       |		BRA	0x28f8c
00028f8a					switch@0x28f5c[0x2]:
00028f8a					switch@0x28f5c[0x3]:
00028f8a					switch@0x28f5c[0x4]:
00028f8a					switch@0x28f5c[0x5]:
00028f8a					switch@0x28f5c[0x6]:
00028f8a					switch@0x28f5c[0x7]:
00028f8a					switch@0x28f5c[0x8]:
00028f8a					switch@0x28f5c[0x9]:
00028f8a					switch@0x28f5c[0xa]:
00028f8a					switch@0x28f5c[0xb]:
00028f8a 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00028f8c 70 03                    |p       |		MOVEQ.L	#0x03,D0
00028f8e c1 d1                    |        |		MULS.W	(A1),D0
00028f90 41 fa fc 28              |A  (    |		LEA.L	0x28bba,A0
00028f94 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00028f98 42 80                    |B       |		CLR.L	D0
00028f9a 10 30 70 00              | 0p     |		MOVE.B	(A0+D7.W),D0
00028f9e 0c 40 00 02              | @      |		CMPI.W	#0x0002,D0
00028fa2 63 02                    |c       |		BLS	0x28fa6
00028fa4 4e 4e                    |NN      |		TRAP	#14
00028fa6 d0 40                    | @      |		ADD.W	D0,D0
00028fa8 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00028fb0 00 06                    |        |		.CONST	0x6			; [0x0] -> 0x28fb6
00028fb2 00 08                    |        |		.CONST	0x8			; [0x1] -> 0x28fb8
00028fb4 00 12                    |        |		.CONST	0x12			; [0x2] -> 0x28fc2
00028fb6					switch@0x28fa8[0x0]:
00028fb6 60 16                    |`       |		BRA	0x28fce
00028fb8					switch@0x28fa8[0x1]:
00028fb8 20 57                    | W      |		MOVEA.L	(A7),A0
00028fba 11 92 58 01              |  X     |		MOVE.B	(A2),(A0+D5.L+#0x1)
00028fbe 52 85                    |R       |		ADDQ.L	#0x1,D5
00028fc0 60 0c                    |`       |		BRA	0x28fce
00028fc2					switch@0x28fa8[0x2]:
00028fc2 20 57                    | W      |		MOVEA.L	(A7),A0
00028fc4 11 bc 00 2c 58 01        |   ,X   |		MOVE.B	#0x2c,(A0+D5.L+#0x1)
00028fca 52 85                    |R       |		ADDQ.L	#0x1,D5
00028fcc 53 86                    |S       |		SUBQ.L	#0x1,D6
00028fce 70 03                    |p       |		MOVEQ.L	#0x03,D0
00028fd0 c1 d1                    |        |		MULS.W	(A1),D0
00028fd2 41 fa fb ef              |A       |		LEA.L	0x28bc3,A0
00028fd6 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00028fda 42 80                    |B       |		CLR.L	D0
00028fdc 10 30 70 00              | 0p     |		MOVE.B	(A0+D7.W),D0
00028fe0 32 80                    |2       |		MOVE.W	D0,(A1)
00028fe2 52 86                    |R       |		ADDQ.L	#0x1,D6
00028fe4 60 00 ff 48              |`  H    |		BRA	0x28f2e
00028fe8 20 57                    | W      |		MOVEA.L	(A7),A0
00028fea 20 05                    |        |		MOVE.L	D5,D0
00028fec 53 80                    |S       |		SUBQ.L	#0x1,D0
00028fee 30 80                    |0       |		MOVE.W	D0,(A0)
00028ff0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00028ff2 4c df 0f e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3
00028ff6 4e 5e                    |N^      |		UNLK	A6
00028ff8 4e 75                    |Nu      |		RTS
00028ffa ; --------------------------------------------------------------------------------------
00028ffa ; OMSI PASCAL Function
00028ffa ;    <LVAR  0x00c 4(r)>
00028ffa ;    <LVAR  0x008 4(r)>
00028ffa ;    <LVAR -0x002 @ 1(r)>
00028ffa ;    <LVAR -0x00a @>
00028ffa ;    <LVAR -0x00e @ 4(r)>
00028ffa ;    <LVAR -0x014 @ 1(r)>
00028ffa ; --------------------------------------------------------------------------------------
00028ffa 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
00028ffe bf d5                    |        |		CMPA.L	(A5),A7
00029000 62 06                    |b       |		BHI	0x29008
00029002 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029006 4e 76                    |Nv      |		TRAPV
00029008 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
0002900c 48 e7 c1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D1+D0,-(A7)
00029010 47 ee ff f2              |G       |		LEA.L	(A6-0xe),A3
00029014 72 01                    |r       |		MOVEQ.L	#0x01,D1
00029016 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00029018 4e ba fc de              |N       |		JSR	0x28cf8
0002901c 10 1f                    |        |		MOVE.B	(A7)+,D0
0002901e 0c 00 00 5b              |   [    |		CMPI.B	#0x5b,D0
00029022 66 08                    |f       |		BNE	0x2902c
00029024 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00029026 4e ba fd 0e              |N       |		JSR	0x28d36
0002902a 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002902c 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00029030 20 81                    |        |		MOVE.L	D1,(A0)
00029032 42 2e ff ec              |B.      |		CLR.B	(A6-0x14)
00029036 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
0002903a 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002903e 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00029042 4e ba fe 10              |N       |		JSR	0x28e54
00029046 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002904a 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
0002904e 66 36                    |f6      |		BNE	0x29086
00029050 48 53                    |HS      |		PEA.L	(A3)
00029052 48 78 00 0c              |Hx      |		PEA.L	0xc
00029056 4e b9 00 01 02 9c        |N       |		JSR	Malloc1(length : Long) : Pointer
0002905c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002905e 20 53                    | S      |		MOVEA.L	(A3),A0
00029060 22 48                    |"H      |		MOVEA.L	A0,A1
00029062 45 ee ff f6              |E       |		LEA.L	(A6-0xa),A2
00029066 70 07                    |p       |		MOVEQ.L	#0x07,D0
00029068 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002906a 51 c8 ff fc              |Q       |		DBF	D0,0x29068
0002906e 21 41 00 08              |!A      |		MOVE.L	D1,(A0+0x8)
00029072 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00029076 22 50                    |"P      |		MOVEA.L	(A0),A1
00029078 b2 c1                    |        |		CMPA.W	D1,A1
0002907a 66 04                    |f       |		BNE	0x29080
0002907c 20 93                    |        |		MOVE.L	(A3),(A0)
0002907e 60 04                    |`       |		BRA	0x29084
00029080 29 53 00 08              |)S      |		MOVE.L	(A3),(A4+0x8)
00029084 28 53                    |(S      |		MOVEA.L	(A3),A4
00029086 4a 2e ff fe              |J.      |		TST.B	(A6-0x2)
0002908a 67 aa                    |g       |		BEQ	0x29036
0002908c 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00029090 42 10                    |B       |		CLR.B	(A0)
00029092 10 2e ff fe              | .      |		MOVE.B	(A6-0x2),D0
00029096 0c 00 00 02              |        |		CMPI.B	#0x02,D0
0002909a 66 02                    |f       |		BNE	0x2909e
0002909c 52 10                    |R       |		ADDQ.B	#0x1,(A0)
0002909e 4c df 1f 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2+A3+A4
000290a2 4e 5e                    |N^      |		UNLK	A6
000290a4 4e 75                    |Nu      |		RTS
000290a6 ; --------------------------------------------------------------------------------------
000290a6 ; OMSI PASCAL Function
000290a6 ;    <LVAR  0x00c 4(w)>
000290a6 ;    <LVAR  0x008 4(r)>
000290a6 ; --------------------------------------------------------------------------------------
000290a6 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
000290aa bf d5                    |        |		CMPA.L	(A5),A7
000290ac 62 06                    |b       |		BHI	0x290b4
000290ae 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000290b2 4e 76                    |Nv      |		TRAPV
000290b4 de fc 00 0c              |        |		ADDA.W	#0xc,A7
000290b8 48 e7 01 08              |H       |		MOVEM.L	A4+D7,-(A7)
000290bc 7e ff                    |~       |		MOVEQ.L	#-0x01,D7
000290be 28 6e 00 08              |(n      |		MOVEA.L	(A6+0x8),A4
000290c2 b8 fc 00 01              |        |		CMPA.W	#0x1,A4
000290c6 67 08                    |g       |		BEQ	0x290d0
000290c8 52 87                    |R       |		ADDQ.L	#0x1,D7
000290ca 28 6c 00 08              |(l      |		MOVEA.L	(A4+0x8),A4
000290ce 60 f2                    |`       |		BRA	0x290c2
000290d0 2d 47 00 0c              |-G      |		MOVE.L	D7,(A6+0xc)
000290d4 4c df 10 80              |L       |		MOVEM.L	(A7)+,D7+A4
000290d8 4e 5e                    |N^      |		UNLK	A6
000290da 4e 75                    |Nu      |		RTS
000290dc ; --------------------------------------------------------------------------------------
000290dc ; OMSI PASCAL Function
000290dc ;    <LVAR  0x00c 4(r)>
000290dc ;    <LVAR  0x008 4(r)>
000290dc ; --------------------------------------------------------------------------------------
000290dc 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
000290e0 bf d5                    |        |		CMPA.L	(A5),A7
000290e2 62 06                    |b       |		BHI	0x290ea
000290e4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000290e8 4e 76                    |Nv      |		TRAPV
000290ea de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
000290ee 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000290f2 72 01                    |r       |		MOVEQ.L	#0x01,D1
000290f4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000290f6 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000290fa 4e ba ff aa              |N       |		JSR	0x290a6
000290fe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029100 20 1f                    |        |		MOVE.L	(A7)+,D0
00029102 b0 ae 00 08              |        |		CMP.L	(A6+0x8),D0
00029106 67 58                    |gX      |		BEQ	0x29160
00029108 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002910c 4e ba fb 4a              |N  J    |		JSR	0x28c58
00029110 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029112 41 fa f6 a0              |A       |		LEA.L	0x287b4,A0
00029116 70 07                    |p       |		MOVEQ.L	#0x07,D0
00029118 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
0002911a 51 c8 ff fc              |Q       |		DBF	D0,0x29118
0002911e 41 ee 00 1a              |A       |		LEA.L	(A6+0x1a),A0
00029122 70 04                    |p       |		MOVEQ.L	#0x04,D0
00029124 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00029126 51 c8 ff fc              |Q       |		DBF	D0,0x29124
0002912a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002912c 48 6f 00 12              |Ho      |		PEA.L	(A7+0x12)
00029130 3f 01                    |?       |		MOVE.W	D1,-(A7)
00029132 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
00029136 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002913c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002913e 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00029142 3f 01                    |?       |		MOVE.W	D1,-(A7)
00029144 3f 3c 00 0a              |?<      |		MOVE.W	#0xa,-(A7)
00029148 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002914e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029150 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00029156 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029158 4e ba fb 40              |N  @    |		JSR	0x28c9a
0002915c de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00029160 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00029164 4e 5e                    |N^      |		UNLK	A6
00029166 4e 75                    |Nu      |		RTS
00029168 ; --------------------------------------------------------------------------------------
00029168 ; OMSI PASCAL Function
00029168 ;    <LVAR  0x014 1(rw)>
00029168 ;    <LVAR  0x010 4(r)>
00029168 ;    <LVAR  0x00c 4(r)>
00029168 ;    <LVAR  0x008 4(r)>
00029168 ; --------------------------------------------------------------------------------------
00029168 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc		; Spelunked
0002916c bf d5                    |        |		CMPA.L	(A5),A7
0002916e 62 06                    |b       |		BHI	0x29176
00029170 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029174 4e 76                    |Nv      |		TRAPV
00029176 de fc 00 20              |        |		ADDA.W	#0x20,A7
0002917a 48 e7 c1 c0              |H       |		MOVEM.L	A1+A0+D7+D1+D0,-(A7)
0002917e 42 2e 00 14              |B.      |		CLR.B	(A6+0x14)
00029182 20 2e 00 10              | .      |		MOVE.L	(A6+0x10),D0
00029186 d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
0002918a b0 b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D0
00029190 6e 4e                    |nN      |		BGT	0x291e0
00029192 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029196 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029198 be 97                    |        |		CMP.L	(A7),D7
0002919a 6e 42                    |nB      |		BGT	0x291de
0002919c 20 2e 00 10              | .      |		MOVE.L	(A6+0x10),D0
000291a0 d0 87                    |        |		ADD.L	D7,D0
000291a2 53 80                    |S       |		SUBQ.L	#0x1,D0
000291a4 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
000291aa 63 02                    |c       |		BLS	0x291ae
000291ac 4e 4f                    |NO      |		TRAP	#15
000291ae 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
000291b4 22 2e 00 0c              |".      |		MOVE.L	(A6+0xc),D1
000291b8 d2 87                    |        |		ADD.L	D7,D1
000291ba 53 81                    |S       |		SUBQ.L	#0x1,D1
000291bc 53 81                    |S       |		SUBQ.L	#0x1,D1
000291be 0c 81 00 00 00 3e        |     >  |		CMPI.L	#0x0000003e,D1
000291c4 63 02                    |c       |		BLS	0x291c8
000291c6 4e 4f                    |NO      |		TRAP	#15
000291c8 43 fa f5 ea              |C       |		LEA.L	0x287b4,A1
000291cc 10 30 08 08              | 0      |		MOVE.B	(A0+D0.L+#0x8),D0
000291d0 b0 31 18 00              | 1      |		CMP.B	(A1+D1.L),D0
000291d4 67 04                    |g       |		BEQ	0x291da
000291d6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000291d8 60 0c                    |`       |		BRA	0x291e6
000291da 52 87                    |R       |		ADDQ.L	#0x1,D7
000291dc 68 ba                    |h       |		BVC	0x29198
000291de 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000291e0 1d 7c 00 01 00 14        | |      |		MOVE.B	#0x01,(A6+0x14)
000291e6 4c df 03 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1
000291ea 4e 5e                    |N^      |		UNLK	A6
000291ec 4e 75                    |Nu      |		RTS
000291ee ; --------------------------------------------------------------------------------------
000291ee ; OMSI PASCAL Function
000291ee ;    <LVAR  0x00c 4(r)>
000291ee ;    <LVAR  0x008 4(r)>
000291ee ; --------------------------------------------------------------------------------------
000291ee 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
000291f2 bf d5                    |        |		CMPA.L	(A5),A7
000291f4 62 06                    |b       |		BHI	0x291fc
000291f6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000291fa 4e 76                    |Nv      |		TRAPV
000291fc de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00029200 48 e7 80 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D0,-(A7)
00029204 45 f9 00 02 f1 ec        |E       |		LEA.L	0x2f1ec,A2
0002920a 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
0002920e 4a 93                    |J       |		TST.L	(A3)
00029210 6c 3e                    |l>      |		BGE	0x29250
00029212 20 13                    |        |		MOVE.L	(A3),D0
00029214 44 80                    |D       |		NEG.L	D0
00029216 d0 92                    |        |		ADD.L	(A2),D0
00029218 0c 80 00 00 10 00        |        |		CMPI.L	#0x00001000,D0
0002921e 6f 30                    |o0      |		BLE	0x29250
00029220 9e fc 00 1c              |        |		SUBA.W	#0x1c,A7
00029224 20 4f                    | O      |		MOVEA.L	A7,A0
00029226 43 fa f5 cc              |C       |		LEA.L	0x287f4,A1
0002922a 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
0002922c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002922e 51 c8 ff fc              |Q       |		DBF	D0,0x2922c
00029232 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029234 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00029238 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002923c 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
00029240 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029246 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029248 4e ba fa 50              |N  P    |		JSR	0x28c9a
0002924c de fc 00 20              |        |		ADDA.W	#0x20,A7
00029250 41 f9 00 02 e1 e8        |A       |		LEA.L	0x2e1e8,A0
00029256 2f 08                    |/       |		MOVE.L	A0,-(A7)
00029258 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002925a 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002925e 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00029260 4e b9 00 01 03 64        |N    d  |		JSR	MovStringTail(Base, Len, Ptr, Delta)
00029266 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002926a 20 12                    |        |		MOVE.L	(A2),D0
0002926c 90 93                    |        |		SUB.L	(A3),D0
0002926e 24 80                    |$       |		MOVE.L	D0,(A2)
00029270 4c df 0f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3
00029274 4e 5e                    |N^      |		UNLK	A6
00029276 4e 75                    |Nu      |		RTS
00029278 ; --------------------------------------------------------------------------------------
00029278 ; OMSI PASCAL Function
00029278 ;    <LVAR  0x00c 4(r)>
00029278 ;    <LVAR  0x008 4(r)>
00029278 ; --------------------------------------------------------------------------------------
00029278 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
0002927c bf d5                    |        |		CMPA.L	(A5),A7
0002927e 62 06                    |b       |		BHI	0x29286
00029280 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029284 4e 76                    |Nv      |		TRAPV
00029286 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002928a 48 e7 c1 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D1+D0,-(A7)
0002928e 45 ee 00 0c              |E       |		LEA.L	(A6+0xc),A2
00029292 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00029296 2f 08                    |/       |		MOVE.L	A0,-(A7)
00029298 22 52                    |"R      |		MOVEA.L	(A2),A1
0002929a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002929c 30 10                    |0       |		MOVE.W	(A0),D0
0002929e 48 c0                    |H       |		EXTW.L	D0
000292a0 44 80                    |D       |		NEG.L	D0
000292a2 2f 00                    |/       |		MOVE.L	D0,-(A7)
000292a4 4e ba ff 48              |N  H    |		JSR	0x291ee
000292a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000292aa 30 10                    |0       |		MOVE.W	(A0),D0
000292ac 48 c0                    |H       |		EXTW.L	D0
000292ae 2f 00                    |/       |		MOVE.L	D0,-(A7)
000292b0 7e 01                    |~       |		MOVEQ.L	#0x01,D7
000292b2 be 97                    |        |		CMP.L	(A7),D7
000292b4 6e 36                    |n6      |		BGT	0x292ec
000292b6 20 52                    | R      |		MOVEA.L	(A2),A0
000292b8 20 07                    |        |		MOVE.L	D7,D0
000292ba d0 90                    |        |		ADD.L	(A0),D0
000292bc 53 80                    |S       |		SUBQ.L	#0x1,D0
000292be 53 80                    |S       |		SUBQ.L	#0x1,D0
000292c0 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
000292c6 63 02                    |c       |		BLS	0x292ca
000292c8 4e 4f                    |NO      |		TRAP	#15
000292ca 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
000292d0 22 07                    |"       |		MOVE.L	D7,D1
000292d2 53 81                    |S       |		SUBQ.L	#0x1,D1
000292d4 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
000292da 63 02                    |c       |		BLS	0x292de
000292dc 4e 4f                    |NO      |		TRAP	#15
000292de 22 6f 00 04              |"o      |		MOVEA.L	(A7+0x4),A1
000292e2 11 b1 18 02 08 08        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x8)
000292e8 52 87                    |R       |		ADDQ.L	#0x1,D7
000292ea 68 c6                    |h       |		BVC	0x292b2
000292ec 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000292ee 20 52                    | R      |		MOVEA.L	(A2),A0
000292f0 22 57                    |"W      |		MOVEA.L	(A7),A1
000292f2 30 11                    |0       |		MOVE.W	(A1),D0
000292f4 48 c0                    |H       |		EXTW.L	D0
000292f6 d1 90                    |        |		ADD.L	D0,(A0)
000292f8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000292fa 4c df 07 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2
000292fe 4e 5e                    |N^      |		UNLK	A6
00029300 4e 75                    |Nu      |		RTS
00029302 ; --------------------------------------------------------------------------------------
00029302 ; OMSI PASCAL Function
00029302 ;    <LVAR  0x00c 4(r)>
00029302 ;    <LVAR  0x008 4(r)>
00029302 ; --------------------------------------------------------------------------------------
00029302 4e 56 ff a8              |NV      |		LINK.W	A6,#0xffa8
00029306 bf d5                    |        |		CMPA.L	(A5),A7
00029308 62 06                    |b       |		BHI	0x29310
0002930a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002930e 4e 76                    |Nv      |		TRAPV
00029310 de fc 00 50              |   P    |		ADDA.W	#0x50,A7
00029314 48 e7 c3 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D1+D0,-(A7)
00029318 45 fa fe 4e              |E  N    |		LEA.L	0x29168,A2
0002931c 47 f8 00 04              |G       |		LEA.L	0x4,A3
00029320 49 ee 00 08              |I       |		LEA.L	(A6+0x8),A4
00029324 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
00029326 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00029328 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002932c 42 90                    |B       |		CLR.L	(A0)
0002932e 20 54                    | T      |		MOVEA.L	(A4),A0
00029330 42 90                    |B       |		CLR.L	(A0)
00029332 2c 39 00 02 f1 e8        |,9      |		MOVE.L	0x2f1e8,D6
00029338 20 06                    |        |		MOVE.L	D6,D0
0002933a 53 80                    |S       |		SUBQ.L	#0x1,D0
0002933c 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
00029342 63 02                    |c       |		BLS	0x29346
00029344 4e 4f                    |NO      |		TRAP	#15
00029346 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002934c 10 30 08 08              | 0      |		MOVE.B	(A0+D0.L+#0x8),D0
00029350 0c 00 00 5b              |   [    |		CMPI.B	#0x5b,D0
00029354 66 00 00 d4              |f       |		BNE	0x2942a
00029358 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002935a 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002935c 48 78 00 01              |Hx      |		PEA.L	0x1
00029360 48 78 00 03              |Hx      |		PEA.L	0x3
00029364 4e 92                    |N       |		JSR	(A2)
00029366 de c1                    |        |		ADDA.W	D1,A7
00029368 4a 1f                    |J       |		TST.B	(A7)+
0002936a 66 7e                    |f~      |		BNE	0x293ea
0002936c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002936e 2f 06                    |/       |		MOVE.L	D6,-(A7)
00029370 48 53                    |HS      |		PEA.L	(A3)
00029372 48 78 00 03              |Hx      |		PEA.L	0x3
00029376 4e 92                    |N       |		JSR	(A2)
00029378 de c1                    |        |		ADDA.W	D1,A7
0002937a 4a 1f                    |J       |		TST.B	(A7)+
0002937c 66 6c                    |fl      |		BNE	0x293ea
0002937e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00029380 2f 06                    |/       |		MOVE.L	D6,-(A7)
00029382 48 78 00 07              |Hx      |		PEA.L	0x7
00029386 48 53                    |HS      |		PEA.L	(A3)
00029388 4e 92                    |N       |		JSR	(A2)
0002938a de c1                    |        |		ADDA.W	D1,A7
0002938c 4a 1f                    |J       |		TST.B	(A7)+
0002938e 66 5a                    |fZ      |		BNE	0x293ea
00029390 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00029392 2f 06                    |/       |		MOVE.L	D6,-(A7)
00029394 48 78 00 0b              |Hx      |		PEA.L	0xb
00029398 48 53                    |HS      |		PEA.L	(A3)
0002939a 4e 92                    |N       |		JSR	(A2)
0002939c de c1                    |        |		ADDA.W	D1,A7
0002939e 4a 1f                    |J       |		TST.B	(A7)+
000293a0 66 48                    |fH      |		BNE	0x293ea
000293a2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000293a4 2f 06                    |/       |		MOVE.L	D6,-(A7)
000293a6 48 78 00 0f              |Hx      |		PEA.L	0xf
000293aa 48 53                    |HS      |		PEA.L	(A3)
000293ac 4e 92                    |N       |		JSR	(A2)
000293ae de c1                    |        |		ADDA.W	D1,A7
000293b0 4a 1f                    |J       |		TST.B	(A7)+
000293b2 66 36                    |f6      |		BNE	0x293ea
000293b4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000293b6 2f 06                    |/       |		MOVE.L	D6,-(A7)
000293b8 48 78 00 13              |Hx      |		PEA.L	0x13
000293bc 48 53                    |HS      |		PEA.L	(A3)
000293be 4e 92                    |N       |		JSR	(A2)
000293c0 de c1                    |        |		ADDA.W	D1,A7
000293c2 4a 1f                    |J       |		TST.B	(A7)+
000293c4 66 24                    |f$      |		BNE	0x293ea
000293c6 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000293c8 2f 06                    |/       |		MOVE.L	D6,-(A7)
000293ca 48 78 00 17              |Hx      |		PEA.L	0x17
000293ce 48 53                    |HS      |		PEA.L	(A3)
000293d0 4e 92                    |N       |		JSR	(A2)
000293d2 de c1                    |        |		ADDA.W	D1,A7
000293d4 4a 1f                    |J       |		TST.B	(A7)+
000293d6 66 12                    |f       |		BNE	0x293ea
000293d8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000293da 2f 06                    |/       |		MOVE.L	D6,-(A7)
000293dc 48 78 00 1b              |Hx      |		PEA.L	0x1b
000293e0 48 53                    |HS      |		PEA.L	(A3)
000293e2 4e 92                    |N       |		JSR	(A2)
000293e4 de c1                    |        |		ADDA.W	D1,A7
000293e6 4a 1f                    |J       |		TST.B	(A7)+
000293e8 67 04                    |g       |		BEQ	0x293ee
000293ea 52 87                    |R       |		ADDQ.L	#0x1,D7
000293ec 60 3c                    |`<      |		BRA	0x2942a
000293ee 4a 87                    |J       |		TST.L	D7
000293f0 66 1c                    |f       |		BNE	0x2940e
000293f2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000293f4 2f 06                    |/       |		MOVE.L	D6,-(A7)
000293f6 48 78 00 1f              |Hx      |		PEA.L	0x1f
000293fa 48 78 00 05              |Hx      |		PEA.L	0x5
000293fe 4e 92                    |N       |		JSR	(A2)
00029400 de c1                    |        |		ADDA.W	D1,A7
00029402 4a 1f                    |J       |		TST.B	(A7)+
00029404 67 08                    |g       |		BEQ	0x2940e
00029406 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002940a 20 86                    |        |		MOVE.L	D6,(A0)
0002940c 60 1c                    |`       |		BRA	0x2942a
0002940e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00029410 2f 06                    |/       |		MOVE.L	D6,-(A7)
00029412 48 78 00 24              |Hx $    |		PEA.L	0x24
00029416 48 53                    |HS      |		PEA.L	(A3)
00029418 4e 92                    |N       |		JSR	(A2)
0002941a de c1                    |        |		ADDA.W	D1,A7
0002941c 4a 1f                    |J       |		TST.B	(A7)+
0002941e 67 0a                    |g       |		BEQ	0x2942a
00029420 4a 87                    |J       |		TST.L	D7
00029422 66 04                    |f       |		BNE	0x29428
00029424 20 54                    | T      |		MOVEA.L	(A4),A0
00029426 60 e2                    |`       |		BRA	0x2940a
00029428 53 87                    |S       |		SUBQ.L	#0x1,D7
0002942a 52 86                    |R       |		ADDQ.L	#0x1,D6
0002942c bc b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D6
00029432 6e 0e                    |n       |		BGT	0x29442
00029434 4a 87                    |J       |		TST.L	D7
00029436 66 00 ff 00              |f       |		BNE	0x29338
0002943a 20 54                    | T      |		MOVEA.L	(A4),A0
0002943c 4a 90                    |J       |		TST.L	(A0)
0002943e 67 00 fe f8              |g       |		BEQ	0x29338
00029442 bc b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D6
00029448 6f 30                    |o0      |		BLE	0x2947a
0002944a 9e fc 00 1c              |        |		SUBA.W	#0x1c,A7
0002944e 20 4f                    | O      |		MOVEA.L	A7,A0
00029450 43 fa f3 be              |C       |		LEA.L	0x28810,A1
00029454 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
00029456 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00029458 51 c8 ff fc              |Q       |		DBF	D0,0x29456
0002945c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002945e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00029462 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00029466 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
0002946a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029470 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029472 4e ba f8 26              |N  &    |		JSR	0x28c9a
00029476 de fc 00 20              |        |		ADDA.W	#0x20,A7
0002947a 4c df 1f c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0+A1+A2+A3+A4
0002947e 4e 5e                    |N^      |		UNLK	A6
00029480 4e 75                    |Nu      |		RTS
00029482 ; --------------------------------------------------------------------------------------
00029482 ; OMSI PASCAL Function
00029482 ;    <LVAR -0x004 @ 4(r)>
00029482 ;    <LVAR -0x008 @ 4(rw)>
00029482 ; --------------------------------------------------------------------------------------
00029482 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc
00029486 bf d5                    |        |		CMPA.L	(A5),A7
00029488 62 06                    |b       |		BHI	0x29490
0002948a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002948e 4e 76                    |Nv      |		TRAPV
00029490 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00029494 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00029498 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
0002949c 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
000294a0 48 50                    |HP      |		PEA.L	(A0)
000294a2 48 51                    |HQ      |		PEA.L	(A1)
000294a4 4e ba fe 5c              |N  \    |		JSR	0x29302
000294a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000294aa 4a 90                    |J       |		TST.L	(A0)
000294ac 66 02                    |f       |		BNE	0x294b0
000294ae 20 91                    |        |		MOVE.L	(A1),(A0)
000294b0 20 11                    |        |		MOVE.L	(A1),D0
000294b2 5a 80                    |Z       |		ADDQ.L	#0x5,D0
000294b4 2f 00                    |/       |		MOVE.L	D0,-(A7)
000294b6 90 90                    |        |		SUB.L	(A0),D0
000294b8 2f 00                    |/       |		MOVE.L	D0,-(A7)
000294ba 4e ba fd 32              |N  2    |		JSR	0x291ee
000294be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000294c0 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
000294c4 4e 5e                    |N^      |		UNLK	A6
000294c6 4e 75                    |Nu      |		RTS
000294c8 ; --------------------------------------------------------------------------------------
000294c8 ; OMSI PASCAL Function
000294c8 ;    <LVAR -0x004 @ 4(r)>
000294c8 ;    <LVAR -0x008 @ 4(r)>
000294c8 ; --------------------------------------------------------------------------------------
000294c8 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc
000294cc bf d5                    |        |		CMPA.L	(A5),A7
000294ce 62 06                    |b       |		BHI	0x294d6
000294d0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000294d4 4e 76                    |Nv      |		TRAPV
000294d6 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000294da 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000294de 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
000294e2 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
000294e6 48 50                    |HP      |		PEA.L	(A0)
000294e8 48 51                    |HQ      |		PEA.L	(A1)
000294ea 4e ba fe 16              |N       |		JSR	0x29302
000294ee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000294f0 4a 90                    |J       |		TST.L	(A0)
000294f2 66 06                    |f       |		BNE	0x294fa
000294f4 20 11                    |        |		MOVE.L	(A1),D0
000294f6 5a 80                    |Z       |		ADDQ.L	#0x5,D0
000294f8 60 12                    |`       |		BRA	0x2950c
000294fa 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000294fc 5a 97                    |Z       |		ADDQ.L	#0x5,(A7)
000294fe 48 78 00 05              |Hx      |		PEA.L	0x5
00029502 4e ba fc ea              |N       |		JSR	0x291ee
00029506 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029508 20 10                    |        |		MOVE.L	(A0),D0
0002950a 5c 80                    |\       |		ADDQ.L	#0x6,D0
0002950c 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002950e 90 b9 00 02 f1 e8        |        |		SUB.L	0x2f1e8,D0
00029514 2f 00                    |/       |		MOVE.L	D0,-(A7)
00029516 4e ba fc d6              |N       |		JSR	0x291ee
0002951a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002951c 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00029520 4e 5e                    |N^      |		UNLK	A6
00029522 4e 75                    |Nu      |		RTS
00029524 ; --------------------------------------------------------------------------------------
00029524 ; OMSI PASCAL Function
00029524 ;    <LVAR  0x008 4(r)>
00029524 ;    <LVAR -0x004 @>
00029524 ;    <LVAR -0x008 @ 4(r)>
00029524 ;    <LVAR -0x00c @ 4(rw)>
00029524 ;    <LVAR -0x010 4(rw)>
00029524 ;    <LVAR -0x014 4(rw)>
00029524 ; --------------------------------------------------------------------------------------
00029524 4e 56 ff ba              |NV      |		LINK.W	A6,#0xffba
00029528 bf d5                    |        |		CMPA.L	(A5),A7
0002952a 62 06                    |b       |		BHI	0x29532
0002952c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029530 4e 76                    |Nv      |		TRAPV
00029532 de fc 00 32              |   2    |		ADDA.W	#0x32,A7
00029536 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
0002953a 43 f9 00 02 f1 fa        |C       |		LEA.L	0x2f1fa,A1
00029540 45 f9 00 02 f2 00        |E       |		LEA.L	0x2f200,A2
00029546 47 f9 00 02 f1 e8        |G       |		LEA.L	0x2f1e8,A3
0002954c 49 ee ff f8              |I       |		LEA.L	(A6-0x8),A4
00029550 72 01                    |r       |		MOVEQ.L	#0x01,D1
00029552 4a 11                    |J       |		TST.B	(A1)
00029554 67 0a                    |g       |		BEQ	0x29560
00029556 4a 92                    |J       |		TST.L	(A2)
00029558 66 06                    |f       |		BNE	0x29560
0002955a 24 ae 00 08              |$       |		MOVE.L	(A6+0x8),(A2)
0002955e 53 92                    |S       |		SUBQ.L	#0x1,(A2)
00029560 4a 11                    |J       |		TST.B	(A1)
00029562 66 00 00 cc              |f       |		BNE	0x29630
00029566 26 ae 00 08              |&       |		MOVE.L	(A6+0x8),(A3)
0002956a 5c 93                    |\       |		ADDQ.L	#0x6,(A3)
0002956c 48 54                    |HT      |		PEA.L	(A4)
0002956e 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00029572 4e ba fa 86              |N       |		JSR	0x28ffa
00029576 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029578 41 fa f2 bc              |A       |		LEA.L	0x28836,A0
0002957c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002957e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00029580 51 c8 ff fc              |Q       |		DBF	D0,0x2957e
00029584 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00029586 48 78 00 00              |Hx      |		PEA.L	0x0
0002958a 4e ba fb 50              |N  P    |		JSR	0x290dc
0002958e de fc 00 12              |        |		ADDA.W	#0x12,A7
00029592 4a 39 00 02 f2 04        |J9      |		TST.B	0x2f204
00029598 67 1a                    |g       |		BEQ	0x295b4
0002959a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002959c 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002959e 48 78 00 00              |Hx      |		PEA.L	0x0
000295a2 4e b9 00 02 99 f4        |N       |		JSR	0x299f4
000295a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000295aa 2d 5f ff ec              |-_      |		MOVE.L	(A7)+,(A6-0x14)
000295ae 2d 5f ff f0              |-_      |		MOVE.L	(A7)+,(A6-0x10)
000295b2 60 14                    |`       |		BRA	0x295c8
000295b4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000295b6 2f 14                    |/       |		MOVE.L	(A4),-(A7)
000295b8 48 78 00 00              |Hx      |		PEA.L	0x0
000295bc 4e b9 00 02 99 c2        |N       |		JSR	0x299c2
000295c2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000295c4 2d 5f ff f4              |-_      |		MOVE.L	(A7)+,(A6-0xc)
000295c8 2f 14                    |/       |		MOVE.L	(A4),-(A7)
000295ca 4e ba f6 8c              |N       |		JSR	0x28c58
000295ce 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000295d0 23 d3 00 02 f1 fc        |#       |		MOVE.L	(A3),0x2f1fc
000295d6 4a 39 00 02 f2 04        |J9      |		TST.B	0x2f204
000295dc 67 2a                    |g*      |		BEQ	0x29608
000295de 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000295e0 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
000295e4 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
000295e8 2f 39 00 02 f2 0e        |/9      |		MOVE.L	0x2f20e,-(A7)
000295ee 2f 39 00 02 f2 0a        |/9      |		MOVE.L	0x2f20a,-(A7)
000295f4 4e b9 00 01 03 2c        |N    ,  |		JSR	IsEqual(a, b : Quad) : Bool
000295fa de fc 00 10              |        |		ADDA.W	#0x10,A7
000295fe 10 1f                    |        |		MOVE.B	(A7)+,D0
00029600 48 80                    |H       |		EXTB.W	D0
00029602 41 81                    |A       |		CHK.W	D1,D0
00029604 12 80                    |        |		MOVE.B	D0,(A1)
00029606 60 28                    |`(      |		BRA	0x29630
00029608 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002960a 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
0002960e 2f 39 00 02 f2 06        |/9      |		MOVE.L	0x2f206,-(A7)
00029614 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
0002961a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002961c 10 1f                    |        |		MOVE.B	(A7)+,D0
0002961e 48 80                    |H       |		EXTB.W	D0
00029620 41 81                    |A       |		CHK.W	D1,D0
00029622 12 80                    |        |		MOVE.B	D0,(A1)
00029624 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00029628 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002962e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029630 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
00029634 4e 5e                    |N^      |		UNLK	A6
00029636 4e 75                    |Nu      |		RTS
00029638 ; --------------------------------------------------------------------------------------
00029638 ; OMSI PASCAL Function
00029638 ;    <LVAR  0x010 4(r)>
00029638 ;    <LVAR  0x00c 4(r)>
00029638 ;    <LVAR  0x008 4(r)>
00029638 ; --------------------------------------------------------------------------------------
00029638 4e 56 ff 9e              |NV      |		LINK.W	A6,#0xff9e
0002963c bf d5                    |        |		CMPA.L	(A5),A7
0002963e 62 06                    |b       |		BHI	0x29646
00029640 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029644 4e 76                    |Nv      |		TRAPV
00029646 de fc 00 56              |   V    |		ADDA.W	#0x56,A7
0002964a 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002964e 45 f9 00 02 f2 00        |E       |		LEA.L	0x2f200,A2
00029654 47 fa fb 12              |G       |		LEA.L	0x29168,A3
00029658 49 f9 00 02 f1 fa        |I       |		LEA.L	0x2f1fa,A4
0002965e 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
00029660 74 01                    |t       |		MOVEQ.L	#0x01,D2
00029662 42 14                    |B       |		CLR.B	(A4)
00029664 42 b9 00 02 f1 fc        |B       |		CLR.L	0x2f1fc
0002966a 42 92                    |B       |		CLR.L	(A2)
0002966c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002966e 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00029670 2a 39 00 02 f1 e8        |*9      |		MOVE.L	0x2f1e8,D5
00029676 4a 86                    |J       |		TST.L	D6
00029678 66 00 00 a0              |f       |		BNE	0x2971a
0002967c ba b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D5
00029682 6e 00 00 96              |n       |		BGT	0x2971a
00029686 20 05                    |        |		MOVE.L	D5,D0
00029688 53 80                    |S       |		SUBQ.L	#0x1,D0
0002968a 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
00029690 63 02                    |c       |		BLS	0x29694
00029692 4e 4f                    |NO      |		TRAP	#15
00029694 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002969a 10 30 08 08              | 0      |		MOVE.B	(A0+D0.L+#0x8),D0
0002969e 0c 00 00 5b              |   [    |		CMPI.B	#0x5b,D0
000296a2 66 6c                    |fl      |		BNE	0x29710
000296a4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000296a6 2f 05                    |/       |		MOVE.L	D5,-(A7)
000296a8 48 78 00 28              |Hx (    |		PEA.L	0x28
000296ac 48 78 00 05              |Hx      |		PEA.L	0x5
000296b0 4e 93                    |N       |		JSR	(A3)
000296b2 de c1                    |        |		ADDA.W	D1,A7
000296b4 4a 1f                    |J       |		TST.B	(A7)+
000296b6 66 14                    |f       |		BNE	0x296cc
000296b8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000296ba 2f 05                    |/       |		MOVE.L	D5,-(A7)
000296bc 48 78 00 2d              |Hx -    |		PEA.L	0x2d
000296c0 48 78 00 06              |Hx      |		PEA.L	0x6
000296c4 4e 93                    |N       |		JSR	(A3)
000296c6 de c1                    |        |		ADDA.W	D1,A7
000296c8 4a 1f                    |J       |		TST.B	(A7)+
000296ca 67 04                    |g       |		BEQ	0x296d0
000296cc 52 87                    |R       |		ADDQ.L	#0x1,D7
000296ce 60 40                    |`@      |		BRA	0x29710
000296d0 4a 87                    |J       |		TST.L	D7
000296d2 66 1e                    |f       |		BNE	0x296f2
000296d4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000296d6 2f 05                    |/       |		MOVE.L	D5,-(A7)
000296d8 48 78 00 33              |Hx 3    |		PEA.L	0x33
000296dc 48 78 00 05              |Hx      |		PEA.L	0x5
000296e0 4e 93                    |N       |		JSR	(A3)
000296e2 de c1                    |        |		ADDA.W	D1,A7
000296e4 4a 1f                    |J       |		TST.B	(A7)+
000296e6 67 0a                    |g       |		BEQ	0x296f2
000296e8 2f 05                    |/       |		MOVE.L	D5,-(A7)
000296ea 4e ba fe 38              |N  8    |		JSR	0x29524
000296ee 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000296f0 60 1e                    |`       |		BRA	0x29710
000296f2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000296f4 2f 05                    |/       |		MOVE.L	D5,-(A7)
000296f6 48 78 00 38              |Hx 8    |		PEA.L	0x38
000296fa 48 78 00 08              |Hx      |		PEA.L	0x8
000296fe 4e 93                    |N       |		JSR	(A3)
00029700 de c1                    |        |		ADDA.W	D1,A7
00029702 4a 1f                    |J       |		TST.B	(A7)+
00029704 67 0a                    |g       |		BEQ	0x29710
00029706 4a 87                    |J       |		TST.L	D7
00029708 66 04                    |f       |		BNE	0x2970e
0002970a 2c 05                    |,       |		MOVE.L	D5,D6
0002970c 60 02                    |`       |		BRA	0x29710
0002970e 53 87                    |S       |		SUBQ.L	#0x1,D7
00029710 4a 86                    |J       |		TST.L	D6
00029712 66 02                    |f       |		BNE	0x29716
00029714 52 85                    |R       |		ADDQ.L	#0x1,D5
00029716 60 00 ff 5e              |`  ^    |		BRA	0x29676
0002971a 4a 39 00 02 f2 04        |J9      |		TST.B	0x2f204
00029720 66 0e                    |f       |		BNE	0x29730
00029722 48 79 00 02 f2 06        |Hy      |		PEA.L	0x2f206
00029728 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002972e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029730 4a 14                    |J       |		TST.B	(A4)
00029732 66 28                    |f(      |		BNE	0x2975c
00029734 41 fa f1 1a              |A       |		LEA.L	0x28850,A0
00029738 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002973a 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002973c 51 c8 ff fc              |Q       |		DBF	D0,0x2973a
00029740 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029742 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00029746 3f 02                    |?       |		MOVE.W	D2,-(A7)
00029748 3f 3c 00 1a              |?<      |		MOVE.W	#0x1a,-(A7)
0002974c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029752 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029754 4e ba f5 44              |N  D    |		JSR	0x28c9a
00029758 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002975c 4a 86                    |J       |		TST.L	D6
0002975e 66 2e                    |f.      |		BNE	0x2978e
00029760 9e fc 00 14              |        |		SUBA.W	#0x14,A7
00029764 20 4f                    | O      |		MOVEA.L	A7,A0
00029766 43 fa f0 e8              |C       |		LEA.L	0x28850,A1
0002976a 70 12                    |p       |		MOVEQ.L	#0x12,D0
0002976c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002976e 51 c8 ff fc              |Q       |		DBF	D0,0x2976c
00029772 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029774 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00029778 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002977a 3f 3c 00 13              |?<      |		MOVE.W	#0x13,-(A7)
0002977e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029784 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029786 4e ba f5 12              |N       |		JSR	0x28c9a
0002978a de fc 00 18              |        |		ADDA.W	#0x18,A7
0002978e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00029792 20 86                    |        |		MOVE.L	D6,(A0)
00029794 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00029798 20 b9 00 02 f1 fc        |        |		MOVE.L	0x2f1fc,(A0)
0002979e 4a 92                    |J       |		TST.L	(A2)
000297a0 66 0a                    |f       |		BNE	0x297ac
000297a2 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
000297a6 20 86                    |        |		MOVE.L	D6,(A0)
000297a8 53 90                    |S       |		SUBQ.L	#0x1,(A0)
000297aa 60 06                    |`       |		BRA	0x297b2
000297ac 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
000297b0 20 92                    |        |		MOVE.L	(A2),(A0)
000297b2 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
000297b6 4e 5e                    |N^      |		UNLK	A6
000297b8 4e 75                    |Nu      |		RTS
000297ba ; --------------------------------------------------------------------------------------
000297ba ; OMSI PASCAL Function
000297ba ;    <LVAR  0x008 4(r)>
000297ba ;    <LVAR -0x008 @ 4(r)>
000297ba ;    <LVAR -0x00c @ 4(r)>
000297ba ;    <LVAR -0x010 @ 4(r)>
000297ba ; --------------------------------------------------------------------------------------
000297ba 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
000297be bf d5                    |        |		CMPA.L	(A5),A7
000297c0 62 06                    |b       |		BHI	0x297c8
000297c2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000297c6 4e 76                    |Nv      |		TRAPV
000297c8 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000297cc 48 e7 83 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D0,-(A7)
000297d0 41 f9 00 02 f1 e8        |A       |		LEA.L	0x2f1e8,A0
000297d6 43 ee ff f0              |C       |		LEA.L	(A6-0x10),A1
000297da 2c 10                    |,       |		MOVE.L	(A0),D6
000297dc 42 39 00 02 f2 04        |B9      |		CLR.B	0x2f204
000297e2 23 ee 00 08 00 02 f2 06  |#       |		MOVE.L	(A6+0x8),0x2f206
000297ea 2e 10                    |.       |		MOVE.L	(A0),D7
000297ec 48 51                    |HQ      |		PEA.L	(A1)
000297ee 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
000297f2 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000297f6 4e ba fe 40              |N  @    |		JSR	0x29638
000297fa de fc 00 0c              |        |		ADDA.W	#0xc,A7
000297fe 20 86                    |        |		MOVE.L	D6,(A0)
00029800 20 2e ff f8              | .      |		MOVE.L	(A6-0x8),D0
00029804 06 80 00 00 00 09        |        |		ADDI.L	#0x00000009,D0
0002980a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002980c 90 ae ff f4              |        |		SUB.L	(A6-0xc),D0
00029810 53 80                    |S       |		SUBQ.L	#0x1,D0
00029812 2f 00                    |/       |		MOVE.L	D0,-(A7)
00029814 4e ba f9 d8              |N       |		JSR	0x291ee
00029818 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002981a 2e 91                    |.       |		MOVE.L	(A1),(A7)
0002981c 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002981e 9f 97                    |        |		SUB.L	D7,(A7)
00029820 4e ba f9 cc              |N       |		JSR	0x291ee
00029824 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029826 4c df 03 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A1
0002982a 4e 5e                    |N^      |		UNLK	A6
0002982c 4e 75                    |Nu      |		RTS
0002982e ; --------------------------------------------------------------------------------------
0002982e ; OMSI PASCAL Function
0002982e ;    <LVAR  0x00c 4(r)>
0002982e ;    <LVAR  0x008 4(r)>
0002982e ;    <LVAR -0x008 @ 4(r)>
0002982e ;    <LVAR -0x00c @ 4(r)>
0002982e ;    <LVAR -0x010 @ 4(r)>
0002982e ; --------------------------------------------------------------------------------------
0002982e 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
00029832 bf d5                    |        |		CMPA.L	(A5),A7
00029834 62 06                    |b       |		BHI	0x2983c
00029836 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002983a 4e 76                    |Nv      |		TRAPV
0002983c de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00029840 48 e7 83 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D0,-(A7)
00029844 41 f9 00 02 f1 e8        |A       |		LEA.L	0x2f1e8,A0
0002984a 43 ee ff f0              |C       |		LEA.L	(A6-0x10),A1
0002984e 2c 10                    |,       |		MOVE.L	(A0),D6
00029850 13 fc 00 01 00 02 f2 04  |        |		MOVE.B	#0x01,0x2f204
00029858 23 ee 00 08 00 02 f2 0a  |#       |		MOVE.L	(A6+0x8),0x2f20a
00029860 23 ee 00 0c 00 02 f2 0e  |#       |		MOVE.L	(A6+0xc),0x2f20e
00029868 2e 10                    |.       |		MOVE.L	(A0),D7
0002986a 48 51                    |HQ      |		PEA.L	(A1)
0002986c 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00029870 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00029874 4e ba fd c2              |N       |		JSR	0x29638
00029878 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002987c 20 86                    |        |		MOVE.L	D6,(A0)
0002987e 20 2e ff f8              | .      |		MOVE.L	(A6-0x8),D0
00029882 06 80 00 00 00 09        |        |		ADDI.L	#0x00000009,D0
00029888 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002988a 90 ae ff f4              |        |		SUB.L	(A6-0xc),D0
0002988e 53 80                    |S       |		SUBQ.L	#0x1,D0
00029890 2f 00                    |/       |		MOVE.L	D0,-(A7)
00029892 4e ba f9 5a              |N  Z    |		JSR	0x291ee
00029896 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029898 2e 91                    |.       |		MOVE.L	(A1),(A7)
0002989a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002989c 9f 97                    |        |		SUB.L	D7,(A7)
0002989e 4e ba f9 4e              |N  N    |		JSR	0x291ee
000298a2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000298a4 4c df 03 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A1
000298a8 4e 5e                    |N^      |		UNLK	A6
000298aa 4e 75                    |Nu      |		RTS
000298ac ; --------------------------------------------------------------------------------------
000298ac ; OMSI PASCAL Function
000298ac ;    <LVAR  0x010 4(rw)>
000298ac ;    <LVAR  0x00c 4(r)>
000298ac ;    <LVAR  0x008 4(r)>
000298ac ; --------------------------------------------------------------------------------------
000298ac 4e 56 ff f8              |NV      |		LINK.W	A6,#0xfff8
000298b0 bf d5                    |        |		CMPA.L	(A5),A7
000298b2 62 06                    |b       |		BHI	0x298ba
000298b4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000298b8 4e 76                    |Nv      |		TRAPV
000298ba de fc 00 08              |        |		ADDA.W	#0x8,A7
000298be 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
000298c2 4a ae 00 08              |J       |		TST.L	(A6+0x8)
000298c6 66 06                    |f       |		BNE	0x298ce
000298c8 42 ae 00 10              |B       |		CLR.L	(A6+0x10)
000298cc 60 0e                    |`       |		BRA	0x298dc
000298ce 20 2e 00 0c              | .      |		MOVE.L	(A6+0xc),D0
000298d2 90 ae 00 08              |        |		SUB.L	(A6+0x8),D0
000298d6 52 80                    |R       |		ADDQ.L	#0x1,D0
000298d8 2d 40 00 10              |-@      |		MOVE.L	D0,(A6+0x10)
000298dc 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
000298e0 4e 5e                    |N^      |		UNLK	A6
000298e2 4e 75                    |Nu      |		RTS
000298e4 ; --------------------------------------------------------------------------------------
000298e4 ; OMSI PASCAL Function
000298e4 ;    <LVAR  0x014 4(w)>
000298e4 ;    <LVAR  0x010 @ 4(w)>
000298e4 ;    <LVAR  0x00c 4(r)>
000298e4 ;    <LVAR  0x008 4(r)>
000298e4 ; --------------------------------------------------------------------------------------
000298e4 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
000298e8 bf d5                    |        |		CMPA.L	(A5),A7
000298ea 62 06                    |b       |		BHI	0x298f2
000298ec 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000298f0 4e 76                    |Nv      |		TRAPV
000298f2 de fc 00 20              |        |		ADDA.W	#0x20,A7
000298f6 48 e7 81 c8              |H       |		MOVEM.L	A4+A1+A0+D7+D0,-(A7)
000298fa 28 6e 00 0c              |(n      |		MOVEA.L	(A6+0xc),A4
000298fe 2d 7a f2 b2 00 10        |-z      |		MOVE.L	0x28bb2,(A6+0x10)
00029904 2d 7a f2 b0 00 14        |-z      |		MOVE.L	0x28bb6,(A6+0x14)
0002990a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002990e 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00029910 be 97                    |        |		CMP.L	(A7),D7
00029912 6e 28                    |n(      |		BGT	0x2993c
00029914 b8 fc 00 01              |        |		CMPA.W	#0x1,A4
00029918 66 04                    |f       |		BNE	0x2991e
0002991a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002991c 60 20                    |`       |		BRA	0x2993e
0002991e be ae 00 08              |        |		CMP.L	(A6+0x8),D7
00029922 66 10                    |f       |		BNE	0x29934
00029924 41 ee 00 10              |A       |		LEA.L	(A6+0x10),A0
00029928 22 4c                    |"L      |		MOVEA.L	A4,A1
0002992a 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002992c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002992e 51 c8 ff fc              |Q       |		DBF	D0,0x2992c
00029932 60 04                    |`       |		BRA	0x29938
00029934 28 6c 00 08              |(l      |		MOVEA.L	(A4+0x8),A4
00029938 52 87                    |R       |		ADDQ.L	#0x1,D7
0002993a 68 d4                    |h       |		BVC	0x29910
0002993c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002993e 4c df 13 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1+A4
00029942 4e 5e                    |N^      |		UNLK	A6
00029944 4e 75                    |Nu      |		RTS
00029946 ; --------------------------------------------------------------------------------------
00029946 ; OMSI PASCAL Function
00029946 ;    <LVAR  0x010 4(w)>
00029946 ;    <LVAR  0x00c 4(r)>
00029946 ;    <LVAR  0x008 4(r)>
00029946 ;    <LVAR -0x008 @ 4(r)>
00029946 ; --------------------------------------------------------------------------------------
00029946 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
0002994a bf d5                    |        |		CMPA.L	(A5),A7
0002994c 62 06                    |b       |		BHI	0x29954
0002994e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029952 4e 76                    |Nv      |		TRAPV
00029954 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00029958 48 e7 83 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D0,-(A7)
0002995c 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
00029960 48 51                    |HQ      |		PEA.L	(A1)
00029962 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00029968 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002996c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029970 4e ba ff 3a              |N  :    |		JSR	0x298ac
00029974 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029976 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029978 be 97                    |        |		CMP.L	(A7),D7
0002997a 6e 38                    |n8      |		BGT	0x299b4
0002997c 20 07                    |        |		MOVE.L	D7,D0
0002997e d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
00029982 53 80                    |S       |		SUBQ.L	#0x1,D0
00029984 53 80                    |S       |		SUBQ.L	#0x1,D0
00029986 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
0002998c 63 02                    |c       |		BLS	0x29990
0002998e 4e 4f                    |NO      |		TRAP	#15
00029990 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
00029996 1c 30 08 08              | 0      |		MOVE.B	(A0+D0.L+#0x8),D6
0002999a 0c 06 00 2f              |   /    |		CMPI.B	#0x2f,D6
0002999e 66 04                    |f       |		BNE	0x299a4
000299a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000299a2 60 12                    |`       |		BRA	0x299b6
000299a4 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000299a6 1f 06                    |        |		MOVE.B	D6,-(A7)
000299a8 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
000299ae 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000299b0 52 87                    |R       |		ADDQ.L	#0x1,D7
000299b2 68 c4                    |h       |		BVC	0x29978
000299b4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000299b6 2d 51 00 10              |-Q      |		MOVE.L	(A1),(A6+0x10)
000299ba 4c df 03 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A1
000299be 4e 5e                    |N^      |		UNLK	A6
000299c0 4e 75                    |Nu      |		RTS
000299c2 ; --------------------------------------------------------------------------------------
000299c2 ; OMSI PASCAL Function
000299c2 ;    <LVAR  0x010 4(w)>
000299c2 ;    <LVAR  0x00c 4(r)>
000299c2 ;    <LVAR  0x008 4(r)>
000299c2 ; --------------------------------------------------------------------------------------
000299c2 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
000299c6 bf d5                    |        |		CMPA.L	(A5),A7
000299c8 62 06                    |b       |		BHI	0x299d0
000299ca 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000299ce 4e 76                    |Nv      |		TRAPV
000299d0 de fc 00 18              |        |		ADDA.W	#0x18,A7
000299d4 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
000299d8 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000299dc 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000299e0 4e ba ff 02              |N       |		JSR	0x298e4
000299e4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000299e6 4e ba ff 5e              |N  ^    |		JSR	0x29946
000299ea 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000299ec 2d 5f 00 10              |-_      |		MOVE.L	(A7)+,(A6+0x10)
000299f0 4e 5e                    |N^      |		UNLK	A6
000299f2 4e 75                    |Nu      |		RTS
000299f4 ; --------------------------------------------------------------------------------------
000299f4 ; OMSI PASCAL Function
000299f4 ;    <LVAR  0x014 4(w)>
000299f4 ;    <LVAR  0x010 4(w)>
000299f4 ;    <LVAR  0x00c 4(r)>
000299f4 ;    <LVAR  0x008 4(r)>
000299f4 ; --------------------------------------------------------------------------------------
000299f4 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
000299f8 bf d5                    |        |		CMPA.L	(A5),A7
000299fa 62 06                    |b       |		BHI	0x29a02
000299fc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029a00 4e 76                    |Nv      |		TRAPV
00029a02 de fc 00 18              |        |		ADDA.W	#0x18,A7
00029a06 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
00029a0a 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00029a0e 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029a12 4e ba ff ae              |N       |		JSR	0x299c2
00029a16 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029a18 48 78 00 10              |Hx      |		PEA.L	0x10
00029a1c 4e b9 00 01 03 60        |N    `  |		JSR	?StringToInt64()
00029a22 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029a24 2d 5f 00 10              |-_      |		MOVE.L	(A7)+,(A6+0x10)
00029a28 2d 5f 00 14              |-_      |		MOVE.L	(A7)+,(A6+0x14)
00029a2c 4e 5e                    |N^      |		UNLK	A6
00029a2e 4e 75                    |Nu      |		RTS
00029a30 ; --------------------------------------------------------------------------------------
00029a30 ; OMSI PASCAL Function
00029a30 ;    <LVAR  0x010 4(w)>
00029a30 ;    <LVAR  0x00c 4(r)>
00029a30 ;    <LVAR  0x008 4(r)>
00029a30 ; --------------------------------------------------------------------------------------
00029a30 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
00029a34 bf d5                    |        |		CMPA.L	(A5),A7
00029a36 62 06                    |b       |		BHI	0x29a3e
00029a38 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029a3c 4e 76                    |Nv      |		TRAPV
00029a3e de fc 00 18              |        |		ADDA.W	#0x18,A7
00029a42 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
00029a46 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00029a4a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029a4e 4e ba ff a4              |N       |		JSR	0x299f4
00029a52 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029a54 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
00029a5a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029a5c 2d 5f 00 10              |-_      |		MOVE.L	(A7)+,(A6+0x10)
00029a60 4e 5e                    |N^      |		UNLK	A6
00029a62 4e 75                    |Nu      |		RTS
00029a64 ; --------------------------------------------------------------------------------------
00029a64 ; OMSI PASCAL Function
00029a64 ;    <LVAR  0x008 @ 4(r)>
00029a64 ; --------------------------------------------------------------------------------------
00029a64 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
00029a68 bf d5                    |        |		CMPA.L	(A5),A7
00029a6a 62 06                    |b       |		BHI	0x29a72
00029a6c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029a70 4e 76                    |Nv      |		TRAPV
00029a72 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00029a76 48 e7 c1 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D1+D0,-(A7)
00029a7a 45 f9 00 02 f1 e8        |E       |		LEA.L	0x2f1e8,A2
00029a80 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00029a84 2f 08                    |/       |		MOVE.L	A0,-(A7)
00029a86 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00029a88 30 10                    |0       |		MOVE.W	(A0),D0
00029a8a 48 c0                    |H       |		EXTW.L	D0
00029a8c 44 80                    |D       |		NEG.L	D0
00029a8e 2f 00                    |/       |		MOVE.L	D0,-(A7)
00029a90 4e ba f7 5c              |N  \    |		JSR	0x291ee
00029a94 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029a96 30 10                    |0       |		MOVE.W	(A0),D0
00029a98 48 c0                    |H       |		EXTW.L	D0
00029a9a 2f 00                    |/       |		MOVE.L	D0,-(A7)
00029a9c 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029a9e be 97                    |        |		CMP.L	(A7),D7
00029aa0 6e 34                    |n4      |		BGT	0x29ad6
00029aa2 20 07                    |        |		MOVE.L	D7,D0
00029aa4 d0 92                    |        |		ADD.L	(A2),D0
00029aa6 53 80                    |S       |		SUBQ.L	#0x1,D0
00029aa8 53 80                    |S       |		SUBQ.L	#0x1,D0
00029aaa 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
00029ab0 63 02                    |c       |		BLS	0x29ab4
00029ab2 4e 4f                    |NO      |		TRAP	#15
00029ab4 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
00029aba 22 07                    |"       |		MOVE.L	D7,D1
00029abc 53 81                    |S       |		SUBQ.L	#0x1,D1
00029abe 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
00029ac4 63 02                    |c       |		BLS	0x29ac8
00029ac6 4e 4f                    |NO      |		TRAP	#15
00029ac8 22 6f 00 04              |"o      |		MOVEA.L	(A7+0x4),A1
00029acc 11 b1 18 02 08 08        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x8)
00029ad2 52 87                    |R       |		ADDQ.L	#0x1,D7
00029ad4 68 c8                    |h       |		BVC	0x29a9e
00029ad6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029ad8 48 6e 00 08              |Hn      |		PEA.L	(A6+0x8)
00029adc 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00029ae2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029ae4 4c df 07 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2
00029ae8 4e 5e                    |N^      |		UNLK	A6
00029aea 4e 75                    |Nu      |		RTS
00029aec ; --------------------------------------------------------------------------------------
00029aec ; OMSI PASCAL Function
00029aec ;    <LVAR  0x00c 4(r)>
00029aec ;    <LVAR  0x008 4(r)>
00029aec ; --------------------------------------------------------------------------------------
00029aec 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
00029af0 bf d5                    |        |		CMPA.L	(A5),A7
00029af2 62 06                    |b       |		BHI	0x29afa
00029af4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029af8 4e 76                    |Nv      |		TRAPV
00029afa de fc 00 14              |        |		ADDA.W	#0x14,A7
00029afe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029b00 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00029b04 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029b08 48 78 00 10              |Hx      |		PEA.L	0x10
00029b0c 4e b9 00 01 03 5c        |N    \  |		JSR	Quad2String(a : Quad; radix : Long ) : String
00029b12 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00029b16 4e ba ff 4c              |N  L    |		JSR	0x29a64
00029b1a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029b1c 4e 5e                    |N^      |		UNLK	A6
00029b1e 4e 75                    |Nu      |		RTS
00029b20 ; --------------------------------------------------------------------------------------
00029b20 ; OMSI PASCAL Function
00029b20 ;    <LVAR  0x008 4(r)>
00029b20 ; --------------------------------------------------------------------------------------
00029b20 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4
00029b24 bf d5                    |        |		CMPA.L	(A5),A7
00029b26 62 06                    |b       |		BHI	0x29b2e
00029b28 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029b2c 4e 76                    |Nv      |		TRAPV
00029b2e de fc 00 0c              |        |		ADDA.W	#0xc,A7
00029b32 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029b34 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029b38 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00029b3e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029b40 4e ba ff 22              |N  "    |		JSR	0x29a64
00029b44 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029b46 4e 5e                    |N^      |		UNLK	A6
00029b48 4e 75                    |Nu      |		RTS
00029b4a ; --------------------------------------------------------------------------------------
00029b4a ; OMSI PASCAL Function
00029b4a ;    <LVAR  0x008 4(r)>
00029b4a ;    <LVAR -0x004 @ 4(r)>
00029b4a ;    <LVAR -0x008 4(rw)>
00029b4a ; --------------------------------------------------------------------------------------
00029b4a 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
00029b4e bf d5                    |        |		CMPA.L	(A5),A7
00029b50 62 06                    |b       |		BHI	0x29b58
00029b52 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029b56 4e 76                    |Nv      |		TRAPV
00029b58 de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
00029b5c 48 e7 81 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D0,-(A7)
00029b60 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
00029b64 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
00029b68 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00029b6c 24 a8 00 08              |$       |		MOVE.L	(A0+0x8),(A2)
00029b70 48 51                    |HQ      |		PEA.L	(A1)
00029b72 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00029b78 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029b7a 20 52                    | R      |		MOVEA.L	(A2),A0
00029b7c b0 fc 00 01              |        |		CMPA.W	#0x1,A0
00029b80 67 00 00 86              |g       |		BEQ	0x29c08
00029b84 4a 90                    |J       |		TST.L	(A0)
00029b86 67 68                    |gh      |		BEQ	0x29bf0
00029b88 2f 28 00 04              |/(      |		MOVE.L	(A0+0x4),-(A7)
00029b8c 2e 10                    |.       |		MOVE.L	(A0),D7
00029b8e be 97                    |        |		CMP.L	(A7),D7
00029b90 6e 14                    |n       |		BGT	0x29ba6
00029b92 20 17                    |        |		MOVE.L	(A7),D0
00029b94 0c 87 80 00 00 01        |        |		CMPI.L	#0x80000001,D7
00029b9a 6d 08                    |m       |		BLT	0x29ba4
00029b9c 0c 80 7f ff ff ff        |        |		CMPI.L	#0x7fffffff,D0
00029ba2 6f 02                    |o       |		BLE	0x29ba6
00029ba4 4e 4f                    |NO      |		TRAP	#15
00029ba6 be 97                    |        |		CMP.L	(A7),D7
00029ba8 6e 44                    |nD      |		BGT	0x29bee
00029baa 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00029bac 20 07                    |        |		MOVE.L	D7,D0
00029bae 53 80                    |S       |		SUBQ.L	#0x1,D0
00029bb0 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
00029bb6 63 02                    |c       |		BLS	0x29bba
00029bb8 4e 4f                    |NO      |		TRAP	#15
00029bba 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
00029bc0 1f 30 08 08              | 0      |		MOVE.B	(A0+D0.L+#0x8),-(A7)
00029bc4 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00029bca 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00029bcc 20 51                    | Q      |		MOVEA.L	(A1),A0
00029bce 30 10                    |0       |		MOVE.W	(A0),D0
00029bd0 0c 40 00 7a              | @ z    |		CMPI.W	#0x007a,D0
00029bd4 6d 14                    |m       |		BLT	0x29bea
00029bd6 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00029bd8 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00029bde 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029be0 48 51                    |HQ      |		PEA.L	(A1)
00029be2 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00029be8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029bea 52 87                    |R       |		ADDQ.L	#0x1,D7
00029bec 68 b8                    |h       |		BVC	0x29ba6
00029bee 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029bf0 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00029bf2 1f 3c 00 20              | <      |		MOVE.B	#0x20,-(A7)
00029bf6 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00029bfc 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00029bfe 20 52                    | R      |		MOVEA.L	(A2),A0
00029c00 24 a8 00 08              |$       |		MOVE.L	(A0+0x8),(A2)
00029c04 60 00 ff 74              |`  t    |		BRA	0x29b7a
00029c08 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00029c0a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00029c10 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029c12 4c df 07 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1+A2
00029c16 4e 5e                    |N^      |		UNLK	A6
00029c18 4e 75                    |Nu      |		RTS
00029c1a ; --------------------------------------------------------------------------------------
00029c1a ; OMSI PASCAL Function
00029c1a ;    <LVAR  0x008 @ 4(r)>
00029c1a ;    <LVAR -0x003 @ 1(r)>
00029c1a ;    <LVAR -0x004 @ 1(r)>
00029c1a ;    <LVAR -0x008 @ 4(r)>
00029c1a ;    <LVAR -0x00c @ 4(rw)>
00029c1a ; --------------------------------------------------------------------------------------
00029c1a 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
00029c1e bf d5                    |        |		CMPA.L	(A5),A7
00029c20 62 06                    |b       |		BHI	0x29c28
00029c22 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029c26 4e 76                    |Nv      |		TRAPV
00029c28 de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00029c2c 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
00029c30 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
00029c34 45 ee ff f4              |E       |		LEA.L	(A6-0xc),A2
00029c38 47 ee ff fc              |G       |		LEA.L	(A6-0x4),A3
00029c3c 49 ee ff f8              |I       |		LEA.L	(A6-0x8),A4
00029c40 72 01                    |r       |		MOVEQ.L	#0x01,D1
00029c42 2f 3a ec 36              |/: 6    |		MOVE.L	0x2887a,-(A7)
00029c46 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00029c48 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00029c4a 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00029c50 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00029c54 3f 01                    |?       |		MOVE.W	D1,-(A7)
00029c56 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00029c5a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029c60 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029c62 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00029c68 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029c6a 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00029c6c 2e 92                    |.       |		MOVE.L	(A2),(A7)
00029c6e 42 27                    |B'      |		CLR.B	-(A7)
00029c70 42 27                    |B'      |		CLR.B	-(A7)
00029c72 48 78 00 00              |Hx      |		PEA.L	0x0
00029c76 48 53                    |HS      |		PEA.L	(A3)
00029c78 48 54                    |HT      |		PEA.L	(A4)
00029c7a 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
00029c80 de fc 00 14              |        |		ADDA.W	#0x14,A7
00029c84 4a 13                    |J       |		TST.B	(A3)
00029c86 67 36                    |g6      |		BEQ	0x29cbe
00029c88 41 fa eb f0              |A       |		LEA.L	0x2887a,A0
00029c8c 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00029c8e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00029c90 51 c8 ff fc              |Q       |		DBF	D0,0x29c8e
00029c94 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00029c96 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00029c9a 3f 01                    |?       |		MOVE.W	D1,-(A7)
00029c9c 3f 3c 00 16              |?<      |		MOVE.W	#0x16,-(A7)
00029ca0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029ca6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029ca8 2e 91                    |.       |		MOVE.L	(A1),(A7)
00029caa 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00029cb0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029cb2 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00029cb8 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00029cbc 60 54                    |`T      |		BRA	0x29d12
00029cbe 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00029cc0 48 51                    |HQ      |		PEA.L	(A1)
00029cc2 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00029cc6 4e b9 00 01 04 3c        |N    <  |		JSR	FileReadLine(file : File; VAR a : String; VAR b : Byte)
00029ccc de fc 00 0c              |        |		ADDA.W	#0xc,A7
00029cd0 4a 2e ff fd              |J.      |		TST.B	(A6-0x3)
00029cd4 66 14                    |f       |		BNE	0x29cea
00029cd6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029cd8 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00029cda 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00029ce0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029ce2 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00029ce8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029cea 4a 2e ff fd              |J.      |		TST.B	(A6-0x3)
00029cee 67 ce                    |g       |		BEQ	0x29cbe
00029cf0 42 27                    |B'      |		CLR.B	-(A7)
00029cf2 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00029cf6 48 78 00 01              |Hx      |		PEA.L	0x1
00029cfa 48 53                    |HS      |		PEA.L	(A3)
00029cfc 48 54                    |HT      |		PEA.L	(A4)
00029cfe 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00029d04 de fc 00 10              |        |		ADDA.W	#0x10,A7
00029d08 48 51                    |HQ      |		PEA.L	(A1)
00029d0a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00029d10 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029d12 48 52                    |HR      |		PEA.L	(A2)
00029d14 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00029d1a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029d1c 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
00029d20 4e 5e                    |N^      |		UNLK	A6
00029d22 4e 75                    |Nu      |		RTS
00029d24 ; --------------------------------------------------------------------------------------
00029d24 ; OMSI PASCAL Function
00029d24 ;    <LVAR  0x008 4(r)>
00029d24 ; --------------------------------------------------------------------------------------
00029d24 4e 56 ff c6              |NV      |		LINK.W	A6,#0xffc6
00029d28 bf d5                    |        |		CMPA.L	(A5),A7
00029d2a 62 06                    |b       |		BHI	0x29d32
00029d2c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029d30 4e 76                    |Nv      |		TRAPV
00029d32 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00029d36 48 e7 83 88              |H       |		MOVEM.L	A4+A0+D7+D6+D0,-(A7)
00029d3a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029d3c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029d40 4e ba f3 64              |N  d    |		JSR	0x290a6
00029d44 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029d46 2c 1f                    |,       |		MOVE.L	(A7)+,D6
00029d48 66 2e                    |f.      |		BNE	0x29d78
00029d4a 41 f9 00 02 f1 fa        |A       |		LEA.L	0x2f1fa,A0
00029d50 70 04                    |p       |		MOVEQ.L	#0x04,D0
00029d52 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00029d54 51 c8 ff fc              |Q       |		DBF	D0,0x29d52
00029d58 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029d5a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00029d5e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00029d62 3f 3c 00 0a              |?<      |		MOVE.W	#0xa,-(A7)
00029d66 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00029d6c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029d6e 4e ba fe aa              |N       |		JSR	0x29c1a
00029d72 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00029d76 60 26                    |`&      |		BRA	0x29d9e
00029d78 2f 06                    |/       |		MOVE.L	D6,-(A7)
00029d7a 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029d7c be 97                    |        |		CMP.L	(A7),D7
00029d7e 6e 1c                    |n       |		BGT	0x29d9c
00029d80 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029d82 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00029d86 2f 07                    |/       |		MOVE.L	D7,-(A7)
00029d88 4e ba fc 38              |N  8    |		JSR	0x299c2
00029d8c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029d8e 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00029d90 2f 0c                    |/       |		MOVE.L	A4,-(A7)
00029d92 4e ba fe 86              |N       |		JSR	0x29c1a
00029d96 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029d98 52 87                    |R       |		ADDQ.L	#0x1,D7
00029d9a 68 e0                    |h       |		BVC	0x29d7c
00029d9c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029d9e 4c df 11 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A4
00029da2 4e 5e                    |N^      |		UNLK	A6
00029da4 4e 75                    |Nu      |		RTS
00029da6 ; --------------------------------------------------------------------------------------
00029da6 ; OMSI PASCAL Function
00029da6 ;    <LVAR  0x00c @>
00029da6 ;    <LVAR  0x008 @ 4(r)>
00029da6 ;    <LVAR -0x020 @>
00029da6 ; --------------------------------------------------------------------------------------
00029da6 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
00029daa bf d5                    |        |		CMPA.L	(A5),A7
00029dac 62 06                    |b       |		BHI	0x29db4
00029dae 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029db2 4e 76                    |Nv      |		TRAPV
00029db4 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00029db8 48 e7 e1 c0              |H       |		MOVEM.L	A1+A0+D7+D2+D1+D0,-(A7)
00029dbc 74 1d                    |t       |		MOVEQ.L	#0x1d,D2
00029dbe 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029dc0 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00029dc4 30 10                    |0       |		MOVE.W	(A0),D0
00029dc6 48 c0                    |H       |		EXTW.L	D0
00029dc8 be 80                    |        |		CMP.L	D0,D7
00029dca 6f 10                    |o       |		BLE	0x29ddc
00029dcc 20 07                    |        |		MOVE.L	D7,D0
00029dce 53 80                    |S       |		SUBQ.L	#0x1,D0
00029dd0 b0 82                    |        |		CMP.L	D2,D0
00029dd2 63 02                    |c       |		BLS	0x29dd6
00029dd4 4e 4f                    |NO      |		TRAP	#15
00029dd6 42 36 08 e0              |B6      |		CLR.B	(A6+D0.L-#0x20)
00029dda 60 1e                    |`       |		BRA	0x29dfa
00029ddc 20 07                    |        |		MOVE.L	D7,D0
00029dde 53 80                    |S       |		SUBQ.L	#0x1,D0
00029de0 b0 82                    |        |		CMP.L	D2,D0
00029de2 63 02                    |c       |		BLS	0x29de6
00029de4 4e 4f                    |NO      |		TRAP	#15
00029de6 22 07                    |"       |		MOVE.L	D7,D1
00029de8 53 81                    |S       |		SUBQ.L	#0x1,D1
00029dea 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
00029df0 63 02                    |c       |		BLS	0x29df4
00029df2 4e 4f                    |NO      |		TRAP	#15
00029df4 1d b0 18 02 08 e0        |        |		MOVE.B	(A0+D1.L+#0x2),(A6+D0.L-#0x20)
00029dfa 52 87                    |R       |		ADDQ.L	#0x1,D7
00029dfc 0c 87 00 00 00 1e        |        |		CMPI.L	#0x0000001e,D7
00029e02 6f bc                    |o       |		BLE	0x29dc0
00029e04 48 6e 00 08              |Hn      |		PEA.L	(A6+0x8)
00029e08 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00029e0e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029e10 41 ee 00 0c              |A       |		LEA.L	(A6+0xc),A0
00029e14 43 ee ff e0              |C       |		LEA.L	(A6-0x20),A1
00029e18 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00029e1a 30 d9                    |0       |		MOVE.W	(A1)+,(A0)+
00029e1c 51 c8 ff fc              |Q       |		DBF	D0,0x29e1a
00029e20 4c df 03 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1
00029e24 4e 5e                    |N^      |		UNLK	A6
00029e26 4e 75                    |Nu      |		RTS
00029e28 ; --------------------------------------------------------------------------------------
00029e28 ; OMSI PASCAL Function
00029e28 ;    <LVAR  0x026 4(w)>
00029e28 ;    <LVAR  0x008 @>
00029e28 ;    <LVAR -0x006 4(rw)>
00029e28 ; --------------------------------------------------------------------------------------
00029e28 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
00029e2c bf d5                    |        |		CMPA.L	(A5),A7
00029e2e 62 06                    |b       |		BHI	0x29e36
00029e30 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029e34 4e 76                    |Nv      |		TRAPV
00029e36 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00029e3a 48 e7 c1 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D1+D0,-(A7)
00029e3e 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
00029e42 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00029e44 26 b9 00 02 f2 12        |&       |		MOVE.L	0x2f212,(A3)
00029e4a 20 53                    | S      |		MOVEA.L	(A3),A0
00029e4c b0 fc 00 01              |        |		CMPA.W	#0x1,A0
00029e50 67 1e                    |g       |		BEQ	0x29e70
00029e52 4a 07                    |J       |		TST.B	D7
00029e54 66 1a                    |f       |		BNE	0x29e70
00029e56 22 48                    |"H      |		MOVEA.L	A0,A1
00029e58 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00029e5c 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
00029e5e b5 09                    |        |		CMPM.B	(A1)+,(A2)+
00029e60 56 c8 ff fc              |V       |		DBNE	D0,0x29e5e
00029e64 66 04                    |f       |		BNE	0x29e6a
00029e66 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029e68 60 04                    |`       |		BRA	0x29e6e
00029e6a 26 a8 00 26              |&  &    |		MOVE.L	(A0+0x26),(A3)
00029e6e 60 da                    |`       |		BRA	0x29e4a
00029e70 2d 48 00 26              |-H &    |		MOVE.L	A0,(A6+0x26)
00029e74 4c df 0f 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2+A3
00029e78 4e 5e                    |N^      |		UNLK	A6
00029e7a 4e 75                    |Nu      |		RTS
00029e7c ; --------------------------------------------------------------------------------------
00029e7c ; OMSI PASCAL Function
00029e7c ;    <LVAR  0x008 @ 4(r)>
00029e7c ; --------------------------------------------------------------------------------------
00029e7c 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
00029e80 bf d5                    |        |		CMPA.L	(A5),A7
00029e82 62 06                    |b       |		BHI	0x29e8a
00029e84 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029e88 4e 76                    |Nv      |		TRAPV
00029e8a de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00029e8e 48 e7 81 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D0,-(A7)
00029e92 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
00029e96 45 f9 00 02 f2 12        |E       |		LEA.L	0x2f212,A2
00029e9c 70 01                    |p       |		MOVEQ.L	#0x01,D0
00029e9e 20 51                    | Q      |		MOVEA.L	(A1),A0
00029ea0 b0 c0                    |        |		CMPA.W	D0,A0
00029ea2 67 56                    |gV      |		BEQ	0x29efa
00029ea4 4a a8 00 1e              |J       |		TST.L	(A0+0x1e)
00029ea8 67 10                    |g       |		BEQ	0x29eba
00029eaa 2f 28 00 22              |/( "    |		MOVE.L	(A0+0x22),-(A7)
00029eae 2f 28 00 1e              |/(      |		MOVE.L	(A0+0x1e),-(A7)
00029eb2 4e b9 00 01 02 a4        |N       |		JSR	Free1(a : Pointer; b : Long)
00029eb8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029eba 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00029ebc 38 40                    |8@      |		MOVEA.W	D0,A4
00029ebe 26 52                    |&R      |		MOVEA.L	(A2),A3
00029ec0 b6 c0                    |        |		CMPA.W	D0,A3
00029ec2 67 14                    |g       |		BEQ	0x29ed8
00029ec4 4a 07                    |J       |		TST.B	D7
00029ec6 66 10                    |f       |		BNE	0x29ed8
00029ec8 b7 d1                    |        |		CMPA.L	(A1),A3
00029eca 66 04                    |f       |		BNE	0x29ed0
00029ecc 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00029ece 60 06                    |`       |		BRA	0x29ed6
00029ed0 28 4b                    |(K      |		MOVEA.L	A3,A4
00029ed2 26 6b 00 26              |&k &    |		MOVEA.L	(A3+0x26),A3
00029ed6 60 e8                    |`       |		BRA	0x29ec0
00029ed8 4a 07                    |J       |		TST.B	D7
00029eda 67 1e                    |g       |		BEQ	0x29efa
00029edc b8 c0                    |        |		CMPA.W	D0,A4
00029ede 66 06                    |f       |		BNE	0x29ee6
00029ee0 24 ab 00 26              |$  &    |		MOVE.L	(A3+0x26),(A2)
00029ee4 60 06                    |`       |		BRA	0x29eec
00029ee6 29 6b 00 26 00 26        |)k & &  |		MOVE.L	(A3+0x26),(A4+0x26)
00029eec 48 51                    |HQ      |		PEA.L	(A1)
00029eee 48 78 00 2a              |Hx *    |		PEA.L	0x2a
00029ef2 4e b9 00 01 02 a8        |N       |		JSR	Free2(a : Pointer; b : Long)
00029ef8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029efa 4c df 1f 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1+A2+A3+A4
00029efe 4e 5e                    |N^      |		UNLK	A6
00029f00 4e 75                    |Nu      |		RTS
00029f02 ; --------------------------------------------------------------------------------------
00029f02 ; OMSI PASCAL Function
00029f02 ;    <LVAR  0x010 4(w)>
00029f02 ;    <LVAR  0x00c 4(r)>
00029f02 ;    <LVAR  0x008 4(r)>
00029f02 ;    <LVAR -0x006 @ 4(rw)>
00029f02 ;    <LVAR -0x024 @>
00029f02 ; --------------------------------------------------------------------------------------
00029f02 4e 56 ff 9a              |NV      |		LINK.W	A6,#0xff9a
00029f06 bf d5                    |        |		CMPA.L	(A5),A7
00029f08 62 06                    |b       |		BHI	0x29f10
00029f0a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029f0e 4e 76                    |Nv      |		TRAPV
00029f10 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00029f14 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
00029f18 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
00029f1c 49 ee 00 08              |I       |		LEA.L	(A6+0x8),A4
00029f20 72 1e                    |r       |		MOVEQ.L	#0x1e,D1
00029f22 9e c1                    |        |		SUBA.W	D1,A7
00029f24 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00029f28 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00029f2a 4e ba fe 7a              |N  z    |		JSR	0x29da6
00029f2e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029f30 41 ee ff dc              |A       |		LEA.L	(A6-0x24),A0
00029f34 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00029f36 30 df                    |0       |		MOVE.W	(A7)+,(A0)+
00029f38 51 c8 ff fc              |Q       |		DBF	D0,0x29f36
00029f3c 4a 94                    |J       |		TST.L	(A4)
00029f3e 6c 02                    |l       |		BGE	0x29f42
00029f40 42 94                    |B       |		CLR.L	(A4)
00029f42 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029f44 20 4b                    | K      |		MOVEA.L	A3,A0
00029f46 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00029f48 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00029f4a 51 c8 ff fc              |Q       |		DBF	D0,0x29f48
00029f4e 4e ba fe d8              |N       |		JSR	0x29e28
00029f52 de c1                    |        |		ADDA.W	D1,A7
00029f54 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00029f56 20 53                    | S      |		MOVEA.L	(A3),A0
00029f58 b0 fc 00 01              |        |		CMPA.W	#0x1,A0
00029f5c 67 12                    |g       |		BEQ	0x29f70
00029f5e 20 28 00 1e              | (      |		MOVE.L	(A0+0x1e),D0
00029f62 b0 94                    |        |		CMP.L	(A4),D0
00029f64 66 02                    |f       |		BNE	0x29f68
00029f66 60 4c                    |`L      |		BRA	0x29fb4
00029f68 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00029f6a 4e ba ff 10              |N       |		JSR	0x29e7c
00029f6e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029f70 48 53                    |HS      |		PEA.L	(A3)
00029f72 48 78 00 2a              |Hx *    |		PEA.L	0x2a
00029f76 4e b9 00 01 02 9c        |N       |		JSR	Malloc1(length : Long) : Pointer
00029f7c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029f7e 20 53                    | S      |		MOVEA.L	(A3),A0
00029f80 21 79 00 02 f2 12 00 26  |!y     &|		MOVE.L	0x2f212,(A0+0x26)
00029f88 23 d3 00 02 f2 12        |#       |		MOVE.L	(A3),0x2f212
00029f8e 22 48                    |"H      |		MOVEA.L	A0,A1
00029f90 45 ee ff dc              |E       |		LEA.L	(A6-0x24),A2
00029f94 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
00029f96 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00029f98 51 c8 ff fc              |Q       |		DBF	D0,0x29f96
00029f9c 21 54 00 1e              |!T      |		MOVE.L	(A4),(A0+0x1e)
00029fa0 4a 94                    |J       |		TST.L	(A4)
00029fa2 67 10                    |g       |		BEQ	0x29fb4
00029fa4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029fa6 2f 14                    |/       |		MOVE.L	(A4),-(A7)
00029fa8 4e b9 00 01 02 a0        |N       |		JSR	Malloc2(VAR dst : Pointer; length : Word)
00029fae 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00029fb0 21 5f 00 22              |!_ "    |		MOVE.L	(A7)+,(A0+0x22)
00029fb4 2d 53 00 10              |-S      |		MOVE.L	(A3),(A6+0x10)
00029fb8 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
00029fbc 4e 5e                    |N^      |		UNLK	A6
00029fbe 4e 75                    |Nu      |		RTS
00029fc0 ; --------------------------------------------------------------------------------------
00029fc0 ; OMSI PASCAL Function
00029fc0 ;    <LVAR  0x00c @>
00029fc0 ;    <LVAR  0x008 @ 4(r)>
00029fc0 ;    <LVAR -0x008 4(rw)>
00029fc0 ; --------------------------------------------------------------------------------------
00029fc0 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
00029fc4 bf d5                    |        |		CMPA.L	(A5),A7
00029fc6 62 06                    |b       |		BHI	0x29fce
00029fc8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00029fcc 4e 76                    |Nv      |		TRAPV
00029fce de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00029fd2 48 e7 c3 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D1+D0,-(A7)
00029fd6 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00029fda 20 52                    | R      |		MOVEA.L	(A2),A0
00029fdc 30 10                    |0       |		MOVE.W	(A0),D0
00029fde 48 c0                    |H       |		EXTW.L	D0
00029fe0 2c 00                    |,       |		MOVE.L	D0,D6
00029fe2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00029fe4 48 6e 00 0c              |Hn      |		PEA.L	(A6+0xc)
00029fe8 2f 06                    |/       |		MOVE.L	D6,-(A7)
00029fea 4e ba ff 16              |N       |		JSR	0x29f02
00029fee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00029ff0 2d 5f ff f8              |-_      |		MOVE.L	(A7)+,(A6-0x8)
00029ff4 4a 86                    |J       |		TST.L	D6
00029ff6 67 40                    |g@      |		BEQ	0x2a038
00029ff8 20 6e ff f8              | n      |		MOVEA.L	(A6-0x8),A0
00029ffc 20 68 00 22              | h "    |		MOVEA.L	(A0+0x22),A0
0002a000 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002a002 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002a004 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002a006 be 97                    |        |		CMP.L	(A7),D7
0002a008 6e 2c                    |n,      |		BGT	0x2a036
0002a00a 20 07                    |        |		MOVE.L	D7,D0
0002a00c 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a00e 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
0002a014 63 02                    |c       |		BLS	0x2a018
0002a016 4e 4f                    |NO      |		TRAP	#15
0002a018 20 6f 00 04              | o      |		MOVEA.L	(A7+0x4),A0
0002a01c 22 52                    |"R      |		MOVEA.L	(A2),A1
0002a01e 22 07                    |"       |		MOVE.L	D7,D1
0002a020 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a022 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
0002a028 63 02                    |c       |		BLS	0x2a02c
0002a02a 4e 4f                    |NO      |		TRAP	#15
0002a02c 11 b1 18 02 08 00        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L)
0002a032 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a034 68 d0                    |h       |		BVC	0x2a006
0002a036 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a038 48 52                    |HR      |		PEA.L	(A2)
0002a03a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a040 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a042 4c df 07 c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0+A1+A2
0002a046 4e 5e                    |N^      |		UNLK	A6
0002a048 4e 75                    |Nu      |		RTS
0002a04a ; --------------------------------------------------------------------------------------
0002a04a ; OMSI PASCAL Function
0002a04a ;    <LVAR  0x008 4(r)>
0002a04a ;    <LVAR -0x004 @ 4(w)>
0002a04a ;    <LVAR -0x008 4(rw)>
0002a04a ;    <LVAR -0x00c 4(rw)>
0002a04a ;    <LVAR -0x010 4(rw)>
0002a04a ;    <LVAR -0x01c 4(rw)>
0002a04a ;    <LVAR -0x020 4(rw)>
0002a04a ; --------------------------------------------------------------------------------------
0002a04a 4e 56 ff 82              |NV      |		LINK.W	A6,#0xff82
0002a04e bf d5                    |        |		CMPA.L	(A5),A7
0002a050 62 06                    |b       |		BHI	0x2a058
0002a052 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a056 4e 76                    |Nv      |		TRAPV
0002a058 de fc 00 5a              |   Z    |		ADDA.W	#0x5a,A7
0002a05c 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002a060 45 ee ff f4              |E       |		LEA.L	(A6-0xc),A2
0002a064 47 ee ff f0              |G       |		LEA.L	(A6-0x10),A3
0002a068 49 ee 00 08              |I       |		LEA.L	(A6+0x8),A4
0002a06c 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002a06e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a070 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a072 4e ba f0 32              |N  2    |		JSR	0x290a6
0002a076 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a078 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
0002a07a 20 13                    |        |		MOVE.L	(A3),D0
0002a07c b0 82                    |        |		CMP.L	D2,D0
0002a07e 6c 2e                    |l.      |		BGE	0x2a0ae
0002a080 9e fc 00 1a              |        |		SUBA.W	#0x1a,A7
0002a084 20 4f                    | O      |		MOVEA.L	A7,A0
0002a086 43 fa e7 f6              |C       |		LEA.L	0x2887e,A1
0002a08a 72 18                    |r       |		MOVEQ.L	#0x18,D1
0002a08c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002a08e 51 c9 ff fc              |Q       |		DBF	D1,0x2a08c
0002a092 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a094 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002a098 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a09a 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002a09e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002a0a4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a0a6 4e ba eb f2              |N       |		JSR	0x28c9a
0002a0aa de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002a0ae 42 92                    |B       |		CLR.L	(A2)
0002a0b0 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002a0b2 7c 02                    ||       |		MOVEQ.L	#0x02,D6
0002a0b4 bc 97                    |        |		CMP.L	(A7),D6
0002a0b6 6e 1e                    |n       |		BGT	0x2a0d6
0002a0b8 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
0002a0bc 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a0be 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002a0c0 4e ba f8 22              |N  "    |		JSR	0x298e4
0002a0c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a0c6 4e ba f7 e4              |N       |		JSR	0x298ac
0002a0ca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a0cc 20 12                    |        |		MOVE.L	(A2),D0
0002a0ce d0 9f                    |        |		ADD.L	(A7)+,D0
0002a0d0 24 80                    |$       |		MOVE.L	D0,(A2)
0002a0d2 52 86                    |R       |		ADDQ.L	#0x1,D6
0002a0d4 68 de                    |h       |		BVC	0x2a0b4
0002a0d6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a0d8 20 13                    |        |		MOVE.L	(A3),D0
0002a0da 55 80                    |U       |		SUBQ.L	#0x2,D0
0002a0dc d1 92                    |        |		ADD.L	D0,(A2)
0002a0de 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a0e0 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a0e2 48 78 00 01              |Hx      |		PEA.L	0x1
0002a0e6 4e ba f8 da              |N       |		JSR	0x299c2
0002a0ea 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a0ec 2d 57 ff fc              |-W      |		MOVE.L	(A7),(A6-0x4)
0002a0f0 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002a0f4 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a0f6 4e ba fe 0a              |N       |		JSR	0x29f02
0002a0fa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a0fc 2d 5f ff f8              |-_      |		MOVE.L	(A7)+,(A6-0x8)
0002a100 4a 92                    |J       |		TST.L	(A2)
0002a102 6f 00 00 aa              |o       |		BLE	0x2a1ae
0002a106 20 6e ff f8              | n      |		MOVEA.L	(A6-0x8),A0
0002a10a 20 68 00 22              | h "    |		MOVEA.L	(A0+0x22),A0
0002a10e 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002a110 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002a112 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002a114 7c 02                    ||       |		MOVEQ.L	#0x02,D6
0002a116 bc 97                    |        |		CMP.L	(A7),D6
0002a118 6e 00 00 92              |n       |		BGT	0x2a1ac
0002a11c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a11e 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a120 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002a122 4e ba f7 c0              |N       |		JSR	0x298e4
0002a126 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a128 2d 5f ff e0              |-_      |		MOVE.L	(A7)+,(A6-0x20)
0002a12c 2d 5f ff e4              |-_      |		MOVE.L	(A7)+,(A6-0x1c)
0002a130 2f 2e ff e4              |/.      |		MOVE.L	(A6-0x1c),-(A7)
0002a134 2a 2e ff e0              |*.      |		MOVE.L	(A6-0x20),D5
0002a138 ba 97                    |        |		CMP.L	(A7),D5
0002a13a 6e 14                    |n       |		BGT	0x2a150
0002a13c 20 17                    |        |		MOVE.L	(A7),D0
0002a13e 0c 85 80 00 00 01        |        |		CMPI.L	#0x80000001,D5
0002a144 6d 08                    |m       |		BLT	0x2a14e
0002a146 0c 80 7f ff ff ff        |        |		CMPI.L	#0x7fffffff,D0
0002a14c 6f 02                    |o       |		BLE	0x2a150
0002a14e 4e 4f                    |NO      |		TRAP	#15
0002a150 ba 97                    |        |		CMP.L	(A7),D5
0002a152 6e 32                    |n2      |		BGT	0x2a186
0002a154 20 07                    |        |		MOVE.L	D7,D0
0002a156 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a158 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
0002a15e 63 02                    |c       |		BLS	0x2a162
0002a160 4e 4f                    |NO      |		TRAP	#15
0002a162 20 6f 00 08              | o      |		MOVEA.L	(A7+0x8),A0
0002a166 22 05                    |"       |		MOVE.L	D5,D1
0002a168 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a16a 0c 81 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D1
0002a170 63 02                    |c       |		BLS	0x2a174
0002a172 4e 4f                    |NO      |		TRAP	#15
0002a174 43 f9 00 02 e1 e0        |C       |		LEA.L	0x2e1e0,A1
0002a17a 11 b1 18 08 08 00        |        |		MOVE.B	(A1+D1.L+#0x8),(A0+D0.L)
0002a180 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a182 52 85                    |R       |		ADDQ.L	#0x1,D5
0002a184 68 ca                    |h       |		BVC	0x2a150
0002a186 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a188 bc 93                    |        |		CMP.L	(A3),D6
0002a18a 67 1a                    |g       |		BEQ	0x2a1a6
0002a18c 20 07                    |        |		MOVE.L	D7,D0
0002a18e 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a190 0c 80 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D0
0002a196 63 02                    |c       |		BLS	0x2a19a
0002a198 4e 4f                    |NO      |		TRAP	#15
0002a19a 20 6f 00 04              | o      |		MOVEA.L	(A7+0x4),A0
0002a19e 11 bc 00 2c 08 00        |   ,    |		MOVE.B	#0x2c,(A0+D0.L)
0002a1a4 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a1a6 52 86                    |R       |		ADDQ.L	#0x1,D6
0002a1a8 68 00 ff 6c              |h  l    |		BVC	0x2a116
0002a1ac 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a1ae 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
0002a1b2 4e 5e                    |N^      |		UNLK	A6
0002a1b4 4e 75                    |Nu      |		RTS
0002a1b6 ; --------------------------------------------------------------------------------------
0002a1b6 ; OMSI PASCAL Function
0002a1b6 ;    <LVAR  0x008 4(r)>
0002a1b6 ;    <LVAR -0x00c 4(rw)>
0002a1b6 ; --------------------------------------------------------------------------------------
0002a1b6 4e 56 ff a0              |NV      |		LINK.W	A6,#0xffa0
0002a1ba bf d5                    |        |		CMPA.L	(A5),A7
0002a1bc 62 06                    |b       |		BHI	0x2a1c4
0002a1be 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a1c2 4e 76                    |Nv      |		TRAPV
0002a1c4 de fc 00 54              |   T    |		ADDA.W	#0x54,A7
0002a1c8 48 e7 e1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
0002a1cc 47 f9 00 02 f1 e8        |G       |		LEA.L	0x2f1e8,A3
0002a1d2 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002a1d4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a1d6 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a1da 48 78 00 01              |Hx      |		PEA.L	0x1
0002a1de 4e ba f7 e2              |N       |		JSR	0x299c2
0002a1e2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a1e4 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
0002a1e6 9e fc 00 22              |   "    |		SUBA.W	#0x22,A7
0002a1ea 2f 0c                    |/       |		MOVE.L	A4,-(A7)
0002a1ec 4e ba fb b8              |N       |		JSR	0x29da6
0002a1f0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a1f2 4e ba fc 34              |N  4    |		JSR	0x29e28
0002a1f6 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002a1fa 2d 5f ff f4              |-_      |		MOVE.L	(A7)+,(A6-0xc)
0002a1fe 20 6e ff f4              | n      |		MOVEA.L	(A6-0xc),A0
0002a202 b0 c2                    |        |		CMPA.W	D2,A0
0002a204 66 42                    |fB      |		BNE	0x2a248
0002a206 9e fc 00 14              |        |		SUBA.W	#0x14,A7
0002a20a 22 4f                    |"O      |		MOVEA.L	A7,A1
0002a20c 45 fa e6 8a              |E       |		LEA.L	0x28898,A2
0002a210 70 12                    |p       |		MOVEQ.L	#0x12,D0
0002a212 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002a214 51 c8 ff fc              |Q       |		DBF	D0,0x2a212
0002a218 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a21a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002a21e 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a220 3f 3c 00 13              |?<      |		MOVE.W	#0x13,-(A7)
0002a224 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002a22a 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
0002a22e 48 78 00 01              |Hx      |		PEA.L	0x1
0002a232 4e ba f7 8e              |N       |		JSR	0x299c2
0002a236 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a238 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002a23e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a240 4e ba ea 58              |N  X    |		JSR	0x28c9a
0002a244 de fc 00 18              |        |		ADDA.W	#0x18,A7
0002a248 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002a24a 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002a24c 2f 28 00 1e              |/(      |		MOVE.L	(A0+0x1e),-(A7)
0002a250 44 97                    |D       |		NEG.L	(A7)
0002a252 4e ba ef 9a              |N       |		JSR	0x291ee
0002a256 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a258 2e a8 00 1e              |.       |		MOVE.L	(A0+0x1e),(A7)
0002a25c 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002a25e be 97                    |        |		CMP.L	(A7),D7
0002a260 6e 38                    |n8      |		BGT	0x2a29a
0002a262 20 07                    |        |		MOVE.L	D7,D0
0002a264 d0 93                    |        |		ADD.L	(A3),D0
0002a266 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a268 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a26a 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
0002a270 63 02                    |c       |		BLS	0x2a274
0002a272 4e 4f                    |NO      |		TRAP	#15
0002a274 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002a27a 22 6f 00 04              |"o      |		MOVEA.L	(A7+0x4),A1
0002a27e 22 69 00 22              |"i "    |		MOVEA.L	(A1+0x22),A1
0002a282 22 07                    |"       |		MOVE.L	D7,D1
0002a284 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a286 0c 81 00 00 03 ff        |        |		CMPI.L	#0x000003ff,D1
0002a28c 63 02                    |c       |		BLS	0x2a290
0002a28e 4e 4f                    |NO      |		TRAP	#15
0002a290 11 b1 18 00 08 08        |        |		MOVE.B	(A1+D1.L),(A0+D0.L+#0x8)
0002a296 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a298 68 c4                    |h       |		BVC	0x2a25e
0002a29a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a29c 4c df 1f 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4
0002a2a0 4e 5e                    |N^      |		UNLK	A6
0002a2a2 4e 75                    |Nu      |		RTS
0002a2a4 ; --------------------------------------------------------------------------------------
0002a2a4 ; OMSI PASCAL Function
0002a2a4 ;    <LVAR -0x004 4(rw)>
0002a2a4 ; --------------------------------------------------------------------------------------
0002a2a4 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
0002a2a8 bf d5                    |        |		CMPA.L	(A5),A7
0002a2aa 62 06                    |b       |		BHI	0x2a2b2
0002a2ac 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a2b0 4e 76                    |Nv      |		TRAPV
0002a2b2 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
0002a2b6 48 e7 e0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D2+D1+D0,-(A7)
0002a2ba 47 ee ff fc              |G       |		LEA.L	(A6-0x4),A3
0002a2be 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002a2c0 74 1e                    |t       |		MOVEQ.L	#0x1e,D2
0002a2c2 26 b9 00 02 f2 12        |&       |		MOVE.L	0x2f212,(A3)
0002a2c8 20 53                    | S      |		MOVEA.L	(A3),A0
0002a2ca b0 c1                    |        |		CMPA.W	D1,A0
0002a2cc 67 30                    |g0      |		BEQ	0x2a2fe
0002a2ce 9e c2                    |        |		SUBA.W	D2,A7
0002a2d0 22 4f                    |"O      |		MOVEA.L	A7,A1
0002a2d2 24 48                    |$H      |		MOVEA.L	A0,A2
0002a2d4 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
0002a2d6 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002a2d8 51 c8 ff fc              |Q       |		DBF	D0,0x2a2d6
0002a2dc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a2de 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002a2e2 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002a2e4 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a2e6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002a2ec 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a2ee 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002a2f4 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
0002a2f8 26 a8 00 26              |&  &    |		MOVE.L	(A0+0x26),(A3)
0002a2fc 60 ca                    |`       |		BRA	0x2a2c8
0002a2fe 4c df 0f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3
0002a302 4e 5e                    |N^      |		UNLK	A6
0002a304 4e 75                    |Nu      |		RTS
0002a306 ; --------------------------------------------------------------------------------------
0002a306 ; OMSI PASCAL Function
0002a306 ;    <LVAR  0x008 4(r)>
0002a306 ; --------------------------------------------------------------------------------------
0002a306 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
0002a30a bf d5                    |        |		CMPA.L	(A5),A7
0002a30c 62 06                    |b       |		BHI	0x2a314
0002a30e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a312 4e 76                    |Nv      |		TRAPV
0002a314 de fc 00 32              |   2    |		ADDA.W	#0x32,A7
0002a318 9e fc 00 26              |   &    |		SUBA.W	#0x26,A7
0002a31c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a320 48 78 00 01              |Hx      |		PEA.L	0x1
0002a324 4e ba f6 9c              |N       |		JSR	0x299c2
0002a328 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a32a 4e ba fa 7a              |N  z    |		JSR	0x29da6
0002a32e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a330 4e ba fa f6              |N       |		JSR	0x29e28
0002a334 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002a338 4e ba fb 42              |N  B    |		JSR	0x29e7c
0002a33c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a33e 4e 5e                    |N^      |		UNLK	A6
0002a340 4e 75                    |Nu      |		RTS
0002a342 ; --------------------------------------------------------------------------------------
0002a342 ; OMSI PASCAL Function
0002a342 ; --------------------------------------------------------------------------------------
0002a342 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4
0002a346 bf d5                    |        |		CMPA.L	(A5),A7
0002a348 62 06                    |b       |		BHI	0x2a350
0002a34a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a34e 4e 76                    |Nv      |		TRAPV
0002a350 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002a354 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a356 4e b9 00 01 03 cc        |N       |		JSR	GetPushLevel() : Long
0002a35c 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
0002a362 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a364 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002a36a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a36c 4e 5e                    |N^      |		UNLK	A6
0002a36e 4e 75                    |Nu      |		RTS
0002a370 ; --------------------------------------------------------------------------------------
0002a370 ; OMSI PASCAL Function
0002a370 ;    <LVAR  0x008 4(r)>
0002a370 ;    <LVAR -0x004 1(rw)>
0002a370 ;    <LVAR -0x008 @ 4(rw)>
0002a370 ;    <LVAR -0x00c @ 4(r)>
0002a370 ;    <LVAR -0x010 @ 4(r)>
0002a370 ;    <LVAR -0x012 @ 1(r)>
0002a370 ;    <LVAR -0x013 @ 1(r)>
0002a370 ;    <LVAR -0x014 @ 1(r)>
0002a370 ;    <LVAR -0x024 4(rw)>
0002a370 ;    <LVAR -0x028 4(rw)>
0002a370 ;    <LVAR -0x02c 4(rw)>
0002a370 ;    <LVAR -0x030 @ 4(r)>
0002a370 ;    <LVAR -0x032 1(w)>
0002a370 ;    <LVAR -0x036 @ 4(r)>
0002a370 ;    <LVAR -0x038 @ 1(r)>
0002a370 ;    <LVAR -0x03c @ 4(rw)>
0002a370 ; --------------------------------------------------------------------------------------
0002a370 4e 56 ff 64              |NV d    |		LINK.W	A6,#0xff64
0002a374 bf d5                    |        |		CMPA.L	(A5),A7
0002a376 62 06                    |b       |		BHI	0x2a37e
0002a378 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a37c 4e 76                    |Nv      |		TRAPV
0002a37e de fc 00 60              |   `    |		ADDA.W	#0x60,A7
0002a382 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002a386 45 ee ff c4              |E       |		LEA.L	(A6-0x3c),A2
0002a38a 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
0002a38e 49 f9 00 01 02 c4        |I       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A4
0002a394 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002a396 76 14                    |v       |		MOVEQ.L	#0x14,D3
0002a398 28 3c ff ff 80 00        |(<      |		MOVE.L	#0xffff8000,D4
0002a39e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a3a0 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002a3a2 4e ba ed 02              |N       |		JSR	0x290a6
0002a3a6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a3a8 2d 5f ff d4              |-_      |		MOVE.L	(A7)+,(A6-0x2c)
0002a3ac 66 28                    |f(      |		BNE	0x2a3d6
0002a3ae 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a3b0 1e ba e5 0c              |        |		MOVE.B	0x288be,(A7)
0002a3b4 1f 7a e5 09 00 01        | z      |		MOVE.B	0x288bf,(A7+0x1)
0002a3ba 1f 7a e5 04 00 02        | z      |		MOVE.B	0x288c0,(A7+0x2)
0002a3c0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a3c2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002a3c6 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a3c8 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
0002a3cc 4e 94                    |N       |		JSR	(A4)
0002a3ce 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a3d0 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002a3d2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a3d4 60 10                    |`       |		BRA	0x2a3e6
0002a3d6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a3d8 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002a3da 48 78 00 01              |Hx      |		PEA.L	0x1
0002a3de 4e ba f5 e2              |N       |		JSR	0x299c2
0002a3e2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a3e4 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002a3e6 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002a3e8 20 4f                    | O      |		MOVEA.L	A7,A0
0002a3ea 43 fa e4 d6              |C       |		LEA.L	0x288c2,A1
0002a3ee 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002a3f0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002a3f2 51 c8 ff fc              |Q       |		DBF	D0,0x2a3f0
0002a3f6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a3f8 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a3fa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a3fc 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
0002a400 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a402 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
0002a406 4e 94                    |N       |		JSR	(A4)
0002a408 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a40a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002a410 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a412 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002a414 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a416 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002a418 42 27                    |B'      |		CLR.B	-(A7)
0002a41a 1f 02                    |        |		MOVE.B	D2,-(A7)
0002a41c 48 78 00 00              |Hx      |		PEA.L	0x0
0002a420 48 6e ff c8              |Hn      |		PEA.L	(A6-0x38)
0002a424 48 6e ff ca              |Hn      |		PEA.L	(A6-0x36)
0002a428 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
0002a42e de c3                    |        |		ADDA.W	D3,A7
0002a430 4a 2e ff c8              |J.      |		TST.B	(A6-0x38)
0002a434 67 0e                    |g       |		BEQ	0x2a444
0002a436 48 52                    |HR      |		PEA.L	(A2)
0002a438 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a43e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a440 60 00 02 4e              |`  N    |		BRA	0x2a690
0002a444 20 6e ff ca              | n      |		MOVEA.L	(A6-0x36),A0
0002a448 10 28 00 3f              | ( ?    |		MOVE.B	(A0+0x3f),D0
0002a44c ed 08                    |        |		LSL.B	#0x6,D0
0002a44e ee 08                    |        |		LSR.B	#0x7,D0
0002a450 1d 40 ff ce              | @      |		MOVE.B	D0,(A6-0x32)
0002a454 42 27                    |B'      |		CLR.B	-(A7)
0002a456 1f 02                    |        |		MOVE.B	D2,-(A7)
0002a458 48 78 00 01              |Hx      |		PEA.L	0x1
0002a45c 48 6e ff c8              |Hn      |		PEA.L	(A6-0x38)
0002a460 48 6e ff ca              |Hn      |		PEA.L	(A6-0x36)
0002a464 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
0002a46a de fc 00 10              |        |		ADDA.W	#0x10,A7
0002a46e 20 52                    | R      |		MOVEA.L	(A2),A0
0002a470 32 10                    |2       |		MOVE.W	(A0),D1
0002a472 48 c1                    |H       |		EXTW.L	D1
0002a474 5b 81                    |[       |		SUBQ.L	#0x5,D1
0002a476 92 84                    |        |		SUB.L	D4,D1
0002a478 0c 81 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D1
0002a47e 63 02                    |c       |		BLS	0x2a482
0002a480 4e 4f                    |NO      |		TRAP	#15
0002a482 d2 84                    |        |		ADD.L	D4,D1
0002a484 30 81                    |0       |		MOVE.W	D1,(A0)
0002a486 4a 00                    |J       |		TST.B	D0
0002a488 66 36                    |f6      |		BNE	0x2a4c0
0002a48a 41 fa e4 32              |A  2    |		LEA.L	0x288be,A0
0002a48e 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002a490 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002a492 51 c8 ff fc              |Q       |		DBF	D0,0x2a490
0002a496 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a498 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a49a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a49c 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
0002a4a0 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a4a2 3f 3c 00 12              |?<      |		MOVE.W	#0x12,-(A7)
0002a4a6 4e 94                    |N       |		JSR	(A4)
0002a4a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a4aa 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002a4b0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a4b2 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002a4b8 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002a4bc 60 00 01 d2              |`       |		BRA	0x2a690
0002a4c0 48 6e ff d0              |Hn      |		PEA.L	(A6-0x30)
0002a4c4 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
0002a4ca 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a4cc 20 6e ff d0              | n      |		MOVEA.L	(A6-0x30),A0
0002a4d0 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002a4d2 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002a4d4 2f 2e ff d4              |/.      |		MOVE.L	(A6-0x2c),-(A7)
0002a4d8 7a 02                    |z       |		MOVEQ.L	#0x02,D5
0002a4da ba 97                    |        |		CMP.L	(A7),D5
0002a4dc 6e 00 00 94              |n       |		BGT	0x2a572
0002a4e0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a4e2 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002a4e4 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002a4e6 4e ba f3 fc              |N       |		JSR	0x298e4
0002a4ea 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a4ec 2d 5f ff d8              |-_      |		MOVE.L	(A7)+,(A6-0x28)
0002a4f0 2d 5f ff dc              |-_      |		MOVE.L	(A7)+,(A6-0x24)
0002a4f4 2f 2e ff dc              |/.      |		MOVE.L	(A6-0x24),-(A7)
0002a4f8 2c 2e ff d8              |,.      |		MOVE.L	(A6-0x28),D6
0002a4fc bc 97                    |        |		CMP.L	(A7),D6
0002a4fe 6e 14                    |n       |		BGT	0x2a514
0002a500 20 17                    |        |		MOVE.L	(A7),D0
0002a502 0c 86 80 00 00 01        |        |		CMPI.L	#0x80000001,D6
0002a508 6d 08                    |m       |		BLT	0x2a512
0002a50a 0c 80 7f ff ff ff        |        |		CMPI.L	#0x7fffffff,D0
0002a510 6f 02                    |o       |		BLE	0x2a514
0002a512 4e 4f                    |NO      |		TRAP	#15
0002a514 bc 97                    |        |		CMP.L	(A7),D6
0002a516 6e 32                    |n2      |		BGT	0x2a54a
0002a518 20 07                    |        |		MOVE.L	D7,D0
0002a51a 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a51c 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
0002a522 63 02                    |c       |		BLS	0x2a526
0002a524 4e 4f                    |NO      |		TRAP	#15
0002a526 20 6f 00 08              | o      |		MOVEA.L	(A7+0x8),A0
0002a52a 22 06                    |"       |		MOVE.L	D6,D1
0002a52c 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a52e 0c 81 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D1
0002a534 63 02                    |c       |		BLS	0x2a538
0002a536 4e 4f                    |NO      |		TRAP	#15
0002a538 43 f9 00 02 e1 e0        |C       |		LEA.L	0x2e1e0,A1
0002a53e 11 b1 18 08 08 02        |        |		MOVE.B	(A1+D1.L+#0x8),(A0+D0.L+#0x2)
0002a544 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a546 52 86                    |R       |		ADDQ.L	#0x1,D6
0002a548 68 ca                    |h       |		BVC	0x2a514
0002a54a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a54c ba ae ff d4              |        |		CMP.L	(A6-0x2c),D5
0002a550 67 1a                    |g       |		BEQ	0x2a56c
0002a552 20 07                    |        |		MOVE.L	D7,D0
0002a554 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a556 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
0002a55c 63 02                    |c       |		BLS	0x2a560
0002a55e 4e 4f                    |NO      |		TRAP	#15
0002a560 20 6f 00 04              | o      |		MOVEA.L	(A7+0x4),A0
0002a564 11 bc 00 2c 08 02        |   ,    |		MOVE.B	#0x2c,(A0+D0.L+#0x2)
0002a56a 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a56c 52 85                    |R       |		ADDQ.L	#0x1,D5
0002a56e 68 00 ff 6a              |h  j    |		BVC	0x2a4da
0002a572 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a574 20 57                    | W      |		MOVEA.L	(A7),A0
0002a576 20 07                    |        |		MOVE.L	D7,D0
0002a578 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a57a 90 84                    |        |		SUB.L	D4,D0
0002a57c 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
0002a582 63 02                    |c       |		BLS	0x2a586
0002a584 4e 4f                    |NO      |		TRAP	#15
0002a586 d0 84                    |        |		ADD.L	D4,D0
0002a588 30 80                    |0       |		MOVE.W	D0,(A0)
0002a58a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a58c 3e ba e3 3e              |>  >    |		MOVE.W	0x288cc,(A7)
0002a590 3f 3a e3 38              |?: 8    |		MOVE.W	0x288ca,-(A7)
0002a594 3f 3a e3 32              |?: 2    |		MOVE.W	0x288c8,-(A7)
0002a598 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a59a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002a59e 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a5a0 3f 3c 00 06              |?<      |		MOVE.W	#0x6,-(A7)
0002a5a4 4e 94                    |N       |		JSR	(A4)
0002a5a6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a5a8 2d 5f ff f8              |-_      |		MOVE.L	(A7)+,(A6-0x8)
0002a5ac 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a5ae 2e 93                    |.       |		MOVE.L	(A3),(A7)
0002a5b0 48 78 00 00              |Hx      |		PEA.L	0x0
0002a5b4 2f 2e ff f8              |/.      |		MOVE.L	(A6-0x8),-(A7)
0002a5b8 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
0002a5bc 48 6e ff ed              |Hn      |		PEA.L	(A6-0x13)
0002a5c0 4e b9 00 02 be fa        |N       |		JSR	0x2befa
0002a5c6 de c3                    |        |		ADDA.W	D3,A7
0002a5c8 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002a5cc 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a5d2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a5d4 3e ba e2 fc              |>       |		MOVE.W	0x288d2,(A7)
0002a5d8 3f 3a e2 f6              |?:      |		MOVE.W	0x288d0,-(A7)
0002a5dc 3f 3a e2 f0              |?:      |		MOVE.W	0x288ce,-(A7)
0002a5e0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a5e2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002a5e6 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002a5e8 3f 3c 00 06              |?<      |		MOVE.W	#0x6,-(A7)
0002a5ec 4e 94                    |N       |		JSR	(A4)
0002a5ee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a5f0 2d 5f ff f8              |-_      |		MOVE.L	(A7)+,(A6-0x8)
0002a5f4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a5f6 2e 93                    |.       |		MOVE.L	(A3),(A7)
0002a5f8 48 78 00 00              |Hx      |		PEA.L	0x0
0002a5fc 2f 2e ff f8              |/.      |		MOVE.L	(A6-0x8),-(A7)
0002a600 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
0002a604 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
0002a608 4e b9 00 02 be fa        |N       |		JSR	0x2befa
0002a60e de c3                    |        |		ADDA.W	D3,A7
0002a610 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002a614 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a61a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a61c 4a 2e ff ed              |J.      |		TST.B	(A6-0x13)
0002a620 66 06                    |f       |		BNE	0x2a628
0002a622 4a 2e ff ee              |J.      |		TST.B	(A6-0x12)
0002a626 67 06                    |g       |		BEQ	0x2a62e
0002a628 42 2e ff fc              |B.      |		CLR.B	(A6-0x4)
0002a62c 60 04                    |`       |		BRA	0x2a632
0002a62e 1d 42 ff fc              | B      |		MOVE.B	D2,(A6-0x4)
0002a632 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a634 2f 2e ff d0              |/.      |		MOVE.L	(A6-0x30),-(A7)
0002a638 10 2e ff fc              | .      |		MOVE.B	(A6-0x4),D0
0002a63c 48 80                    |H       |		EXTB.W	D0
0002a63e 41 bc 00 02              |A       |		CHK.W	#0x2,D0
0002a642 1f 00                    |        |		MOVE.B	D0,-(A7)
0002a644 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
0002a648 4e b9 00 01 03 b0        |N       |		JSR	PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
0002a64e de fc 00 0e              |        |		ADDA.W	#0xe,A7
0002a652 4a 2e ff ed              |J.      |		TST.B	(A6-0x13)
0002a656 67 20                    |g       |		BEQ	0x2a678
0002a658 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002a65c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a65e 10 2e ff ec              | .      |		MOVE.B	(A6-0x14),D0
0002a662 48 80                    |H       |		EXTB.W	D0
0002a664 41 bc 00 0e              |A       |		CHK.W	#0xe,D0
0002a668 1f 00                    |        |		MOVE.B	D0,-(A7)
0002a66a 4e b9 00 01 03 c0        |N       |		JSR	ExpErrMsg(a: Byte) : String
0002a670 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a672 4e ba f9 4c              |N  L    |		JSR	0x29fc0
0002a676 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a678 4a 2e ff ee              |J.      |		TST.B	(A6-0x12)
0002a67c 67 12                    |g       |		BEQ	0x2a690
0002a67e 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
0002a682 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a684 4e b9 00 01 03 c8        |N       |		JSR	FSCALL_103c8
0002a68a 4e ba f9 34              |N  4    |		JSR	0x29fc0
0002a68e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a690 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002a694 4e 5e                    |N^      |		UNLK	A6
0002a696 4e 75                    |Nu      |		RTS
0002a698 ; --------------------------------------------------------------------------------------
0002a698 ; OMSI PASCAL Function
0002a698 ;    <LVAR  0x008 4(r)>
0002a698 ;    <LVAR -0x004 @ 4(rw)>
0002a698 ;    <LVAR -0x008 @ 4(rw)>
0002a698 ; --------------------------------------------------------------------------------------
0002a698 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
0002a69c bf d5                    |        |		CMPA.L	(A5),A7
0002a69e 62 06                    |b       |		BHI	0x2a6a6
0002a6a0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a6a4 4e 76                    |Nv      |		TRAPV
0002a6a6 de fc 00 18              |        |		ADDA.W	#0x18,A7
0002a6aa 48 e7 00 c0              |H       |		MOVEM.L	A1+A0,-(A7)
0002a6ae 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
0002a6b2 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
0002a6b6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a6b8 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a6bc 48 78 00 01              |Hx      |		PEA.L	0x1
0002a6c0 4e ba f3 00              |N       |		JSR	0x299c2
0002a6c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a6c6 20 97                    |        |		MOVE.L	(A7),(A0)
0002a6c8 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a6cc 48 78 00 02              |Hx      |		PEA.L	0x2
0002a6d0 4e ba f2 f0              |N       |		JSR	0x299c2
0002a6d4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a6d6 22 97                    |"       |		MOVE.L	(A7),(A1)
0002a6d8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a6da 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002a6dc 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002a6de 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
0002a6e4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a6e6 4a 1f                    |J       |		TST.B	(A7)+
0002a6e8 67 06                    |g       |		BEQ	0x2a6f0
0002a6ea 4e ba ed 96              |N       |		JSR	0x29482
0002a6ee 60 04                    |`       |		BRA	0x2a6f4
0002a6f0 4e ba ed d6              |N       |		JSR	0x294c8
0002a6f4 48 51                    |HQ      |		PEA.L	(A1)
0002a6f6 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a6fc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a6fe 48 50                    |HP      |		PEA.L	(A0)
0002a700 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a706 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a708 4c df 03 00              |L       |		MOVEM.L	(A7)+,A0+A1
0002a70c 4e 5e                    |N^      |		UNLK	A6
0002a70e 4e 75                    |Nu      |		RTS
0002a710 ; --------------------------------------------------------------------------------------
0002a710 ; OMSI PASCAL Function
0002a710 ;    <LVAR  0x008 4(r)>
0002a710 ;    <LVAR -0x004 @ 4(rw)>
0002a710 ;    <LVAR -0x008 @ 4(rw)>
0002a710 ; --------------------------------------------------------------------------------------
0002a710 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
0002a714 bf d5                    |        |		CMPA.L	(A5),A7
0002a716 62 06                    |b       |		BHI	0x2a71e
0002a718 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a71c 4e 76                    |Nv      |		TRAPV
0002a71e de fc 00 18              |        |		ADDA.W	#0x18,A7
0002a722 48 e7 00 c0              |H       |		MOVEM.L	A1+A0,-(A7)
0002a726 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
0002a72a 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
0002a72e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a730 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a734 48 78 00 01              |Hx      |		PEA.L	0x1
0002a738 4e ba f2 88              |N       |		JSR	0x299c2
0002a73c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a73e 20 97                    |        |		MOVE.L	(A7),(A0)
0002a740 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a744 48 78 00 02              |Hx      |		PEA.L	0x2
0002a748 4e ba f2 78              |N  x    |		JSR	0x299c2
0002a74c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a74e 22 97                    |"       |		MOVE.L	(A7),(A1)
0002a750 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002a752 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002a754 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002a756 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
0002a75c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a75e 4a 1f                    |J       |		TST.B	(A7)+
0002a760 66 06                    |f       |		BNE	0x2a768
0002a762 4e ba ed 1e              |N       |		JSR	0x29482
0002a766 60 04                    |`       |		BRA	0x2a76c
0002a768 4e ba ed 5e              |N  ^    |		JSR	0x294c8
0002a76c 48 51                    |HQ      |		PEA.L	(A1)
0002a76e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a774 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a776 48 50                    |HP      |		PEA.L	(A0)
0002a778 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a77e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a780 4c df 03 00              |L       |		MOVEM.L	(A7)+,A0+A1
0002a784 4e 5e                    |N^      |		UNLK	A6
0002a786 4e 75                    |Nu      |		RTS
0002a788 ; --------------------------------------------------------------------------------------
0002a788 ; OMSI PASCAL Function
0002a788 ;    <LVAR  0x008 4(r)>
0002a788 ; --------------------------------------------------------------------------------------
0002a788 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0
0002a78c bf d5                    |        |		CMPA.L	(A5),A7
0002a78e 62 06                    |b       |		BHI	0x2a796
0002a790 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a794 4e 76                    |Nv      |		TRAPV
0002a796 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002a79a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a79c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a7a0 48 78 00 01              |Hx      |		PEA.L	0x1
0002a7a4 4e ba f2 1c              |N       |		JSR	0x299c2
0002a7a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a7aa 4e ba f0 0e              |N       |		JSR	0x297ba
0002a7ae 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a7b0 4e 5e                    |N^      |		UNLK	A6
0002a7b2 4e 75                    |Nu      |		RTS
0002a7b4 ; --------------------------------------------------------------------------------------
0002a7b4 ; OMSI PASCAL Function
0002a7b4 ;    <LVAR  0x008 4(r)>
0002a7b4 ;    <LVAR -0x014 @ 4(rw)>
0002a7b4 ; --------------------------------------------------------------------------------------
0002a7b4 4e 56 ff 90              |NV      |		LINK.W	A6,#0xff90
0002a7b8 bf d5                    |        |		CMPA.L	(A5),A7
0002a7ba 62 06                    |b       |		BHI	0x2a7c2
0002a7bc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a7c0 4e 76                    |Nv      |		TRAPV
0002a7c2 de fc 00 5c              |   \    |		ADDA.W	#0x5c,A7
0002a7c6 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002a7ca 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
0002a7ce 47 ee ff ec              |G       |		LEA.L	(A6-0x14),A3
0002a7d2 74 7d                    |t}      |		MOVEQ.L	#0x7d,D2
0002a7d4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a7d6 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a7d8 48 78 00 01              |Hx      |		PEA.L	0x1
0002a7dc 4e ba f1 e4              |N       |		JSR	0x299c2
0002a7e0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a7e2 26 97                    |&       |		MOVE.L	(A7),(A3)
0002a7e4 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a7e6 48 78 00 02              |Hx      |		PEA.L	0x2
0002a7ea 4e ba f1 d6              |N       |		JSR	0x299c2
0002a7ee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a7f0 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
0002a7f2 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
0002a7f6 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a7f8 48 78 00 03              |Hx      |		PEA.L	0x3
0002a7fc 4e ba f1 f6              |N       |		JSR	0x299f4
0002a800 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a802 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
0002a808 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a80a 2c 17                    |,       |		MOVE.L	(A7),D6
0002a80c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a80e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002a810 48 78 00 04              |Hx      |		PEA.L	0x4
0002a814 4e ba f1 de              |N       |		JSR	0x299f4
0002a818 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a81a 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
0002a820 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a822 2a 1f                    |*       |		MOVE.L	(A7)+,D5
0002a824 20 06                    |        |		MOVE.L	D6,D0
0002a826 d0 85                    |        |		ADD.L	D5,D0
0002a828 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a82a 32 14                    |2       |		MOVE.W	(A4),D1
0002a82c 48 c1                    |H       |		EXTW.L	D1
0002a82e b0 81                    |        |		CMP.L	D1,D0
0002a830 6f 30                    |o0      |		BLE	0x2a862
0002a832 9e fc 00 20              |        |		SUBA.W	#0x20,A7
0002a836 20 4f                    | O      |		MOVEA.L	A7,A0
0002a838 43 fa e0 9a              |C       |		LEA.L	0x288d4,A1
0002a83c 70 1e                    |p       |		MOVEQ.L	#0x1e,D0
0002a83e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002a840 51 c8 ff fc              |Q       |		DBF	D0,0x2a83e
0002a844 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a846 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002a84a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002a84e 3f 3c 00 1f              |?<      |		MOVE.W	#0x1f,-(A7)
0002a852 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002a858 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a85a 4e ba e4 3e              |N  >    |		JSR	0x28c9a
0002a85e de fc 00 24              |   $    |		ADDA.W	#0x24,A7
0002a862 20 53                    | S      |		MOVEA.L	(A3),A0
0002a864 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002a866 30 10                    |0       |		MOVE.W	(A0),D0
0002a868 48 c0                    |H       |		EXTW.L	D0
0002a86a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002a86c 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002a86e be 97                    |        |		CMP.L	(A7),D7
0002a870 6e 26                    |n&      |		BGT	0x2a898
0002a872 20 06                    |        |		MOVE.L	D6,D0
0002a874 d0 87                    |        |		ADD.L	D7,D0
0002a876 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a878 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a87a b0 82                    |        |		CMP.L	D2,D0
0002a87c 63 02                    |c       |		BLS	0x2a880
0002a87e 4e 4f                    |NO      |		TRAP	#15
0002a880 22 07                    |"       |		MOVE.L	D7,D1
0002a882 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a884 b2 82                    |        |		CMP.L	D2,D1
0002a886 63 02                    |c       |		BLS	0x2a88a
0002a888 4e 4f                    |NO      |		TRAP	#15
0002a88a 20 6f 00 04              | o      |		MOVEA.L	(A7+0x4),A0
0002a88e 19 b0 18 02 08 02        |        |		MOVE.B	(A0+D1.L+#0x2),(A4+D0.L+#0x2)
0002a894 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a896 68 d6                    |h       |		BVC	0x2a86e
0002a898 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a89a 2e 8c                    |.       |		MOVE.L	A4,(A7)
0002a89c 4e ba f1 c6              |N       |		JSR	0x29a64
0002a8a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a8a2 48 53                    |HS      |		PEA.L	(A3)
0002a8a4 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a8aa 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a8ac 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
0002a8b0 4e 5e                    |N^      |		UNLK	A6
0002a8b2 4e 75                    |Nu      |		RTS
0002a8b4 ; --------------------------------------------------------------------------------------
0002a8b4 ; OMSI PASCAL Function
0002a8b4 ;    <LVAR  0x008 4(r)>
0002a8b4 ;    <LVAR -0x010 @ 4(r)>
0002a8b4 ;    <LVAR -0x014 @ 4(rw)>
0002a8b4 ; --------------------------------------------------------------------------------------
0002a8b4 4e 56 ff a8              |NV      |		LINK.W	A6,#0xffa8
0002a8b8 bf d5                    |        |		CMPA.L	(A5),A7
0002a8ba 62 06                    |b       |		BHI	0x2a8c2
0002a8bc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a8c0 4e 76                    |Nv      |		TRAPV
0002a8c2 de fc 00 44              |   D    |		ADDA.W	#0x44,A7
0002a8c6 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002a8ca 45 ee ff ec              |E       |		LEA.L	(A6-0x14),A2
0002a8ce 47 ee ff f0              |G       |		LEA.L	(A6-0x10),A3
0002a8d2 49 ee 00 08              |I       |		LEA.L	(A6+0x8),A4
0002a8d6 74 7d                    |t}      |		MOVEQ.L	#0x7d,D2
0002a8d8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002a8da 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a8dc 48 78 00 01              |Hx      |		PEA.L	0x1
0002a8e0 4e ba f0 e0              |N       |		JSR	0x299c2
0002a8e4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a8e6 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002a8e8 48 53                    |HS      |		PEA.L	(A3)
0002a8ea 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
0002a8f0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a8f2 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a8f4 48 78 00 02              |Hx      |		PEA.L	0x2
0002a8f8 4e ba f0 fa              |N       |		JSR	0x299f4
0002a8fc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a8fe 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
0002a904 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a906 2a 17                    |*       |		MOVE.L	(A7),D5
0002a908 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a90a 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002a90c 48 78 00 03              |Hx      |		PEA.L	0x3
0002a910 4e ba f0 e2              |N       |		JSR	0x299f4
0002a914 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a916 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
0002a91c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a91e 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002a920 20 52                    | R      |		MOVEA.L	(A2),A0
0002a922 20 05                    |        |		MOVE.L	D5,D0
0002a924 d0 86                    |        |		ADD.L	D6,D0
0002a926 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a928 32 10                    |2       |		MOVE.W	(A0),D1
0002a92a 48 c1                    |H       |		EXTW.L	D1
0002a92c b0 81                    |        |		CMP.L	D1,D0
0002a92e 6f 06                    |o       |		BLE	0x2a936
0002a930 52 81                    |R       |		ADDQ.L	#0x1,D1
0002a932 92 85                    |        |		SUB.L	D5,D1
0002a934 2c 01                    |,       |		MOVE.L	D1,D6
0002a936 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002a938 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002a93a be 97                    |        |		CMP.L	(A7),D7
0002a93c 6e 26                    |n&      |		BGT	0x2a964
0002a93e 20 53                    | S      |		MOVEA.L	(A3),A0
0002a940 20 07                    |        |		MOVE.L	D7,D0
0002a942 53 80                    |S       |		SUBQ.L	#0x1,D0
0002a944 b0 82                    |        |		CMP.L	D2,D0
0002a946 63 02                    |c       |		BLS	0x2a94a
0002a948 4e 4f                    |NO      |		TRAP	#15
0002a94a 22 52                    |"R      |		MOVEA.L	(A2),A1
0002a94c 22 07                    |"       |		MOVE.L	D7,D1
0002a94e d2 85                    |        |		ADD.L	D5,D1
0002a950 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a952 53 81                    |S       |		SUBQ.L	#0x1,D1
0002a954 b2 82                    |        |		CMP.L	D2,D1
0002a956 63 02                    |c       |		BLS	0x2a95a
0002a958 4e 4f                    |NO      |		TRAP	#15
0002a95a 11 b1 18 02 08 02        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x2)
0002a960 52 87                    |R       |		ADDQ.L	#0x1,D7
0002a962 68 d6                    |h       |		BVC	0x2a93a
0002a964 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a966 20 53                    | S      |		MOVEA.L	(A3),A0
0002a968 04 86 ff ff 80 00        |        |		SUBI.L	#0xffff8000,D6
0002a96e 0c 86 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D6
0002a974 63 02                    |c       |		BLS	0x2a978
0002a976 4e 4f                    |NO      |		TRAP	#15
0002a978 06 86 ff ff 80 00        |        |		ADDI.L	#0xffff8000,D6
0002a97e 30 86                    |0       |		MOVE.W	D6,(A0)
0002a980 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002a982 4e ba f0 e0              |N       |		JSR	0x29a64
0002a986 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a988 48 52                    |HR      |		PEA.L	(A2)
0002a98a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002a990 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002a992 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
0002a996 4e 5e                    |N^      |		UNLK	A6
0002a998 4e 75                    |Nu      |		RTS
0002a99a ; --------------------------------------------------------------------------------------
0002a99a ; OMSI PASCAL Function
0002a99a ;    <LVAR  0x008 4(r)>
0002a99a ; --------------------------------------------------------------------------------------
0002a99a 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
0002a99e bf d5                    |        |		CMPA.L	(A5),A7
0002a9a0 62 06                    |b       |		BHI	0x2a9a8
0002a9a2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a9a6 4e 76                    |Nv      |		TRAPV
0002a9a8 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002a9ac 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002a9ae 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a9b2 48 78 00 01              |Hx      |		PEA.L	0x1
0002a9b6 4e ba f0 3c              |N  <    |		JSR	0x299f4
0002a9ba 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a9bc 4e ba ee 70              |N  p    |		JSR	0x2982e
0002a9c0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a9c2 4e 5e                    |N^      |		UNLK	A6
0002a9c4 4e 75                    |Nu      |		RTS
0002a9c6 ; --------------------------------------------------------------------------------------
0002a9c6 ; OMSI PASCAL Function
0002a9c6 ;    <LVAR  0x008 4(r)>
0002a9c6 ; --------------------------------------------------------------------------------------
0002a9c6 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002a9ca bf d5                    |        |		CMPA.L	(A5),A7
0002a9cc 62 06                    |b       |		BHI	0x2a9d4
0002a9ce 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002a9d2 4e 76                    |Nv      |		TRAPV
0002a9d4 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002a9d8 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002a9dc 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a9e0 48 78 00 01              |Hx      |		PEA.L	0x1
0002a9e4 4e ba f0 0e              |N       |		JSR	0x299f4
0002a9e8 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002a9ec 48 78 00 02              |Hx      |		PEA.L	0x2
0002a9f0 4e ba f0 02              |N       |		JSR	0x299f4
0002a9f4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002a9f6 4e b9 00 01 03 2c        |N    ,  |		JSR	IsEqual(a, b : Quad) : Bool
0002a9fc de fc 00 10              |        |		ADDA.W	#0x10,A7
0002aa00 4a 1f                    |J       |		TST.B	(A7)+
0002aa02 67 06                    |g       |		BEQ	0x2aa0a
0002aa04 4e ba ea 7c              |N  |    |		JSR	0x29482
0002aa08 60 04                    |`       |		BRA	0x2aa0e
0002aa0a 4e ba ea bc              |N       |		JSR	0x294c8
0002aa0e 4e 5e                    |N^      |		UNLK	A6
0002aa10 4e 75                    |Nu      |		RTS
0002aa12 ; --------------------------------------------------------------------------------------
0002aa12 ; OMSI PASCAL Function
0002aa12 ;    <LVAR  0x008 4(r)>
0002aa12 ; --------------------------------------------------------------------------------------
0002aa12 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002aa16 bf d5                    |        |		CMPA.L	(A5),A7
0002aa18 62 06                    |b       |		BHI	0x2aa20
0002aa1a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002aa1e 4e 76                    |Nv      |		TRAPV
0002aa20 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002aa24 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002aa28 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002aa2c 48 78 00 01              |Hx      |		PEA.L	0x1
0002aa30 4e ba ef c2              |N       |		JSR	0x299f4
0002aa34 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002aa38 48 78 00 02              |Hx      |		PEA.L	0x2
0002aa3c 4e ba ef b6              |N       |		JSR	0x299f4
0002aa40 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aa42 4e b9 00 01 03 2c        |N    ,  |		JSR	IsEqual(a, b : Quad) : Bool
0002aa48 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002aa4c 4a 1f                    |J       |		TST.B	(A7)+
0002aa4e 66 06                    |f       |		BNE	0x2aa56
0002aa50 4e ba ea 30              |N  0    |		JSR	0x29482
0002aa54 60 04                    |`       |		BRA	0x2aa5a
0002aa56 4e ba ea 70              |N  p    |		JSR	0x294c8
0002aa5a 4e 5e                    |N^      |		UNLK	A6
0002aa5c 4e 75                    |Nu      |		RTS
0002aa5e ; --------------------------------------------------------------------------------------
0002aa5e ; OMSI PASCAL Function
0002aa5e ;    <LVAR  0x008 4(r)>
0002aa5e ; --------------------------------------------------------------------------------------
0002aa5e 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002aa62 bf d5                    |        |		CMPA.L	(A5),A7
0002aa64 62 06                    |b       |		BHI	0x2aa6c
0002aa66 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002aa6a 4e 76                    |Nv      |		TRAPV
0002aa6c de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002aa70 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002aa74 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002aa78 48 78 00 01              |Hx      |		PEA.L	0x1
0002aa7c 4e ba ef 76              |N  v    |		JSR	0x299f4
0002aa80 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002aa84 48 78 00 02              |Hx      |		PEA.L	0x2
0002aa88 4e ba ef 6a              |N  j    |		JSR	0x299f4
0002aa8c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aa8e 4e b9 00 01 03 28        |N    (  |		JSR	IsSmaller(a, b : Quad) : Bool
0002aa94 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002aa98 4a 1f                    |J       |		TST.B	(A7)+
0002aa9a 67 06                    |g       |		BEQ	0x2aaa2
0002aa9c 4e ba e9 e4              |N       |		JSR	0x29482
0002aaa0 60 04                    |`       |		BRA	0x2aaa6
0002aaa2 4e ba ea 24              |N  $    |		JSR	0x294c8
0002aaa6 4e 5e                    |N^      |		UNLK	A6
0002aaa8 4e 75                    |Nu      |		RTS
0002aaaa ; --------------------------------------------------------------------------------------
0002aaaa ; OMSI PASCAL Function
0002aaaa ;    <LVAR  0x008 4(r)>
0002aaaa ; --------------------------------------------------------------------------------------
0002aaaa 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002aaae bf d5                    |        |		CMPA.L	(A5),A7
0002aab0 62 06                    |b       |		BHI	0x2aab8
0002aab2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002aab6 4e 76                    |Nv      |		TRAPV
0002aab8 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002aabc 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002aac0 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002aac4 48 78 00 01              |Hx      |		PEA.L	0x1
0002aac8 4e ba ef 2a              |N  *    |		JSR	0x299f4
0002aacc 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002aad0 48 78 00 02              |Hx      |		PEA.L	0x2
0002aad4 4e ba ef 1e              |N       |		JSR	0x299f4
0002aad8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aada 4e b9 00 01 03 24        |N    $  |		JSR	IsGreater(a, b : Quad) : Bool
0002aae0 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002aae4 4a 1f                    |J       |		TST.B	(A7)+
0002aae6 67 06                    |g       |		BEQ	0x2aaee
0002aae8 4e ba e9 98              |N       |		JSR	0x29482
0002aaec 60 04                    |`       |		BRA	0x2aaf2
0002aaee 4e ba e9 d8              |N       |		JSR	0x294c8
0002aaf2 4e 5e                    |N^      |		UNLK	A6
0002aaf4 4e 75                    |Nu      |		RTS
0002aaf6 ; --------------------------------------------------------------------------------------
0002aaf6 ; OMSI PASCAL Function
0002aaf6 ;    <LVAR  0x008 4(r)>
0002aaf6 ; --------------------------------------------------------------------------------------
0002aaf6 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002aafa bf d5                    |        |		CMPA.L	(A5),A7
0002aafc 62 06                    |b       |		BHI	0x2ab04
0002aafe 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ab02 4e 76                    |Nv      |		TRAPV
0002ab04 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002ab08 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002ab0c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ab10 48 78 00 01              |Hx      |		PEA.L	0x1
0002ab14 4e ba ee de              |N       |		JSR	0x299f4
0002ab18 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ab1c 48 78 00 02              |Hx      |		PEA.L	0x2
0002ab20 4e ba ee d2              |N       |		JSR	0x299f4
0002ab24 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ab26 4e b9 00 01 03 24        |N    $  |		JSR	IsGreater(a, b : Quad) : Bool
0002ab2c de fc 00 10              |        |		ADDA.W	#0x10,A7
0002ab30 4a 1f                    |J       |		TST.B	(A7)+
0002ab32 66 06                    |f       |		BNE	0x2ab3a
0002ab34 4e ba e9 4c              |N  L    |		JSR	0x29482
0002ab38 60 04                    |`       |		BRA	0x2ab3e
0002ab3a 4e ba e9 8c              |N       |		JSR	0x294c8
0002ab3e 4e 5e                    |N^      |		UNLK	A6
0002ab40 4e 75                    |Nu      |		RTS
0002ab42 ; --------------------------------------------------------------------------------------
0002ab42 ; OMSI PASCAL Function
0002ab42 ;    <LVAR  0x008 4(r)>
0002ab42 ; --------------------------------------------------------------------------------------
0002ab42 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002ab46 bf d5                    |        |		CMPA.L	(A5),A7
0002ab48 62 06                    |b       |		BHI	0x2ab50
0002ab4a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ab4e 4e 76                    |Nv      |		TRAPV
0002ab50 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002ab54 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002ab58 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ab5c 48 78 00 01              |Hx      |		PEA.L	0x1
0002ab60 4e ba ee 92              |N       |		JSR	0x299f4
0002ab64 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ab68 48 78 00 02              |Hx      |		PEA.L	0x2
0002ab6c 4e ba ee 86              |N       |		JSR	0x299f4
0002ab70 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ab72 4e b9 00 01 03 28        |N    (  |		JSR	IsSmaller(a, b : Quad) : Bool
0002ab78 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002ab7c 4a 1f                    |J       |		TST.B	(A7)+
0002ab7e 66 06                    |f       |		BNE	0x2ab86
0002ab80 4e ba e9 00              |N       |		JSR	0x29482
0002ab84 60 04                    |`       |		BRA	0x2ab8a
0002ab86 4e ba e9 40              |N  @    |		JSR	0x294c8
0002ab8a 4e 5e                    |N^      |		UNLK	A6
0002ab8c 4e 75                    |Nu      |		RTS
0002ab8e ; --------------------------------------------------------------------------------------
0002ab8e ; OMSI PASCAL Function
0002ab8e ;    <LVAR  0x008 4(r)>
0002ab8e ; --------------------------------------------------------------------------------------
0002ab8e 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002ab92 bf d5                    |        |		CMPA.L	(A5),A7
0002ab94 62 06                    |b       |		BHI	0x2ab9c
0002ab96 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ab9a 4e 76                    |Nv      |		TRAPV
0002ab9c de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002aba0 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002aba4 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002aba6 9e c0                    |        |		SUBA.W	D0,A7
0002aba8 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002abac 48 78 00 01              |Hx      |		PEA.L	0x1
0002abb0 4e ba ee 42              |N  B    |		JSR	0x299f4
0002abb4 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002abb8 48 78 00 02              |Hx      |		PEA.L	0x2
0002abbc 4e ba ee 36              |N  6    |		JSR	0x299f4
0002abc0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002abc2 4e b9 00 01 03 14        |N       |		JSR	Add(a, b : Quad) : Quad
0002abc8 de c0                    |        |		ADDA.W	D0,A7
0002abca 4e ba ef 20              |N       |		JSR	0x29aec
0002abce 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002abd0 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002abd4 4e 5e                    |N^      |		UNLK	A6
0002abd6 4e 75                    |Nu      |		RTS
0002abd8 ; --------------------------------------------------------------------------------------
0002abd8 ; OMSI PASCAL Function
0002abd8 ;    <LVAR  0x008 4(r)>
0002abd8 ; --------------------------------------------------------------------------------------
0002abd8 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002abdc bf d5                    |        |		CMPA.L	(A5),A7
0002abde 62 06                    |b       |		BHI	0x2abe6
0002abe0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002abe4 4e 76                    |Nv      |		TRAPV
0002abe6 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002abea 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002abee 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002abf0 9e c0                    |        |		SUBA.W	D0,A7
0002abf2 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002abf6 48 78 00 01              |Hx      |		PEA.L	0x1
0002abfa 4e ba ed f8              |N       |		JSR	0x299f4
0002abfe 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ac02 48 78 00 02              |Hx      |		PEA.L	0x2
0002ac06 4e ba ed ec              |N       |		JSR	0x299f4
0002ac0a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ac0c 4e b9 00 01 03 18        |N       |		JSR	Subtract(a, b : Quad) : Quad
0002ac12 de c0                    |        |		ADDA.W	D0,A7
0002ac14 4e ba ee d6              |N       |		JSR	0x29aec
0002ac18 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ac1a 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002ac1e 4e 5e                    |N^      |		UNLK	A6
0002ac20 4e 75                    |Nu      |		RTS
0002ac22 ; --------------------------------------------------------------------------------------
0002ac22 ; OMSI PASCAL Function
0002ac22 ;    <LVAR  0x008 4(r)>
0002ac22 ; --------------------------------------------------------------------------------------
0002ac22 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002ac26 bf d5                    |        |		CMPA.L	(A5),A7
0002ac28 62 06                    |b       |		BHI	0x2ac30
0002ac2a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ac2e 4e 76                    |Nv      |		TRAPV
0002ac30 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002ac34 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002ac38 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002ac3a 9e c0                    |        |		SUBA.W	D0,A7
0002ac3c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ac40 48 78 00 01              |Hx      |		PEA.L	0x1
0002ac44 4e ba ed ae              |N       |		JSR	0x299f4
0002ac48 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ac4c 48 78 00 02              |Hx      |		PEA.L	0x2
0002ac50 4e ba ed a2              |N       |		JSR	0x299f4
0002ac54 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ac56 4e b9 00 01 03 1c        |N       |		JSR	Multiply(a, b : Quad) : Quad
0002ac5c de c0                    |        |		ADDA.W	D0,A7
0002ac5e 4e ba ee 8c              |N       |		JSR	0x29aec
0002ac62 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ac64 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002ac68 4e 5e                    |N^      |		UNLK	A6
0002ac6a 4e 75                    |Nu      |		RTS
0002ac6c ; --------------------------------------------------------------------------------------
0002ac6c ; OMSI PASCAL Function
0002ac6c ;    <LVAR  0x008 4(r)>
0002ac6c ; --------------------------------------------------------------------------------------
0002ac6c 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002ac70 bf d5                    |        |		CMPA.L	(A5),A7
0002ac72 62 06                    |b       |		BHI	0x2ac7a
0002ac74 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ac78 4e 76                    |Nv      |		TRAPV
0002ac7a de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002ac7e 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002ac82 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002ac84 9e c0                    |        |		SUBA.W	D0,A7
0002ac86 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ac8a 48 78 00 01              |Hx      |		PEA.L	0x1
0002ac8e 4e ba ed 64              |N  d    |		JSR	0x299f4
0002ac92 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ac96 48 78 00 02              |Hx      |		PEA.L	0x2
0002ac9a 4e ba ed 58              |N  X    |		JSR	0x299f4
0002ac9e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aca0 4e b9 00 01 03 20        |N       |		JSR	Divide(a, b : Quad) : Quad
0002aca6 de c0                    |        |		ADDA.W	D0,A7
0002aca8 4e ba ee 42              |N  B    |		JSR	0x29aec
0002acac 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002acae 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002acb2 4e 5e                    |N^      |		UNLK	A6
0002acb4 4e 75                    |Nu      |		RTS
0002acb6 ; --------------------------------------------------------------------------------------
0002acb6 ; OMSI PASCAL Function
0002acb6 ;    <LVAR  0x008 4(r)>
0002acb6 ; --------------------------------------------------------------------------------------
0002acb6 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002acba bf d5                    |        |		CMPA.L	(A5),A7
0002acbc 62 06                    |b       |		BHI	0x2acc4
0002acbe 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002acc2 4e 76                    |Nv      |		TRAPV
0002acc4 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002acc8 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002accc 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002acce 9e c0                    |        |		SUBA.W	D0,A7
0002acd0 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002acd4 48 78 00 01              |Hx      |		PEA.L	0x1
0002acd8 4e ba ed 1a              |N       |		JSR	0x299f4
0002acdc 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ace0 48 78 00 02              |Hx      |		PEA.L	0x2
0002ace4 4e ba ed 0e              |N       |		JSR	0x299f4
0002ace8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002acea 4e b9 00 01 03 58        |N    X  |		JSR	Modulus(a, b : Quad) : Quad
0002acf0 de c0                    |        |		ADDA.W	D0,A7
0002acf2 4e ba ed f8              |N       |		JSR	0x29aec
0002acf6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002acf8 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002acfc 4e 5e                    |N^      |		UNLK	A6
0002acfe 4e 75                    |Nu      |		RTS
0002ad00 ; --------------------------------------------------------------------------------------
0002ad00 ; OMSI PASCAL Function
0002ad00 ;    <LVAR  0x008 4(r)>
0002ad00 ; --------------------------------------------------------------------------------------
0002ad00 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002ad04 bf d5                    |        |		CMPA.L	(A5),A7
0002ad06 62 06                    |b       |		BHI	0x2ad0e
0002ad08 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ad0c 4e 76                    |Nv      |		TRAPV
0002ad0e de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002ad12 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002ad16 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002ad18 9e c0                    |        |		SUBA.W	D0,A7
0002ad1a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ad1e 48 78 00 01              |Hx      |		PEA.L	0x1
0002ad22 4e ba ec d0              |N       |		JSR	0x299f4
0002ad26 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ad2a 48 78 00 02              |Hx      |		PEA.L	0x2
0002ad2e 4e ba ec c4              |N       |		JSR	0x299f4
0002ad32 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ad34 4e b9 00 01 03 34        |N    4  |		JSR	BitOr(a, b : Quad) : Quad
0002ad3a de c0                    |        |		ADDA.W	D0,A7
0002ad3c 4e ba ed ae              |N       |		JSR	0x29aec
0002ad40 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ad42 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002ad46 4e 5e                    |N^      |		UNLK	A6
0002ad48 4e 75                    |Nu      |		RTS
0002ad4a ; --------------------------------------------------------------------------------------
0002ad4a ; OMSI PASCAL Function
0002ad4a ;    <LVAR  0x008 4(r)>
0002ad4a ; --------------------------------------------------------------------------------------
0002ad4a 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002ad4e bf d5                    |        |		CMPA.L	(A5),A7
0002ad50 62 06                    |b       |		BHI	0x2ad58
0002ad52 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ad56 4e 76                    |Nv      |		TRAPV
0002ad58 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002ad5c 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002ad60 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002ad62 9e c0                    |        |		SUBA.W	D0,A7
0002ad64 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ad68 48 78 00 01              |Hx      |		PEA.L	0x1
0002ad6c 4e ba ec 86              |N       |		JSR	0x299f4
0002ad70 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ad74 48 78 00 02              |Hx      |		PEA.L	0x2
0002ad78 4e ba ec 7a              |N  z    |		JSR	0x299f4
0002ad7c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ad7e 4e b9 00 01 03 30        |N    0  |		JSR	BitAnd(a, b : Quad) : Quad
0002ad84 de c0                    |        |		ADDA.W	D0,A7
0002ad86 4e ba ed 64              |N  d    |		JSR	0x29aec
0002ad8a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ad8c 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002ad90 4e 5e                    |N^      |		UNLK	A6
0002ad92 4e 75                    |Nu      |		RTS
0002ad94 ; --------------------------------------------------------------------------------------
0002ad94 ; OMSI PASCAL Function
0002ad94 ;    <LVAR  0x008 4(r)>
0002ad94 ; --------------------------------------------------------------------------------------
0002ad94 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002ad98 bf d5                    |        |		CMPA.L	(A5),A7
0002ad9a 62 06                    |b       |		BHI	0x2ada2
0002ad9c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ada0 4e 76                    |Nv      |		TRAPV
0002ada2 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002ada6 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002adaa 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002adac 9e c0                    |        |		SUBA.W	D0,A7
0002adae 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002adb2 48 78 00 01              |Hx      |		PEA.L	0x1
0002adb6 4e ba ec 3c              |N  <    |		JSR	0x299f4
0002adba 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002adbe 48 78 00 02              |Hx      |		PEA.L	0x2
0002adc2 4e ba ec 30              |N  0    |		JSR	0x299f4
0002adc6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002adc8 4e b9 00 01 03 40        |N    @  |		JSR	BitXor(a, b : Quad) : Quad
0002adce de c0                    |        |		ADDA.W	D0,A7
0002add0 4e ba ed 1a              |N       |		JSR	0x29aec
0002add4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002add6 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002adda 4e 5e                    |N^      |		UNLK	A6
0002addc 4e 75                    |Nu      |		RTS
0002adde ; --------------------------------------------------------------------------------------
0002adde ; OMSI PASCAL Function
0002adde ;    <LVAR  0x008 4(r)>
0002adde ; --------------------------------------------------------------------------------------
0002adde 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
0002ade2 bf d5                    |        |		CMPA.L	(A5),A7
0002ade4 62 06                    |b       |		BHI	0x2adec
0002ade6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002adea 4e 76                    |Nv      |		TRAPV
0002adec de fc 00 20              |        |		ADDA.W	#0x20,A7
0002adf0 9e fc 00 10              |        |		SUBA.W	#0x10,A7
0002adf4 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002adf8 48 78 00 01              |Hx      |		PEA.L	0x1
0002adfc 4e ba eb f6              |N       |		JSR	0x299f4
0002ae00 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
0002ae04 48 78 00 02              |Hx      |		PEA.L	0x2
0002ae08 4e ba ec 26              |N  &    |		JSR	0x29a30
0002ae0c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae0e 4e b9 00 01 03 44        |N    D  |		JSR	BitShift(a : Quad ; howmuch : integer) : Quad
0002ae14 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002ae18 4e ba ec d2              |N       |		JSR	0x29aec
0002ae1c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae1e 4e 5e                    |N^      |		UNLK	A6
0002ae20 4e 75                    |Nu      |		RTS
0002ae22 ; --------------------------------------------------------------------------------------
0002ae22 ; OMSI PASCAL Function
0002ae22 ;    <LVAR  0x008 4(r)>
0002ae22 ; --------------------------------------------------------------------------------------
0002ae22 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
0002ae26 bf d5                    |        |		CMPA.L	(A5),A7
0002ae28 62 06                    |b       |		BHI	0x2ae30
0002ae2a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ae2e 4e 76                    |Nv      |		TRAPV
0002ae30 de fc 00 20              |        |		ADDA.W	#0x20,A7
0002ae34 9e fc 00 10              |        |		SUBA.W	#0x10,A7
0002ae38 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ae3c 48 78 00 01              |Hx      |		PEA.L	0x1
0002ae40 4e ba eb b2              |N       |		JSR	0x299f4
0002ae44 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
0002ae48 48 78 00 02              |Hx      |		PEA.L	0x2
0002ae4c 4e ba eb e2              |N       |		JSR	0x29a30
0002ae50 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae52 44 97                    |D       |		NEG.L	(A7)
0002ae54 4e b9 00 01 03 44        |N    D  |		JSR	BitShift(a : Quad ; howmuch : integer) : Quad
0002ae5a de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002ae5e 4e ba ec 8c              |N       |		JSR	0x29aec
0002ae62 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae64 4e 5e                    |N^      |		UNLK	A6
0002ae66 4e 75                    |Nu      |		RTS
0002ae68 ; --------------------------------------------------------------------------------------
0002ae68 ; OMSI PASCAL Function
0002ae68 ;    <LVAR  0x008 4(r)>
0002ae68 ; --------------------------------------------------------------------------------------
0002ae68 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
0002ae6c bf d5                    |        |		CMPA.L	(A5),A7
0002ae6e 62 06                    |b       |		BHI	0x2ae76
0002ae70 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ae74 4e 76                    |Nv      |		TRAPV
0002ae76 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
0002ae7a 9e fc 00 10              |        |		SUBA.W	#0x10,A7
0002ae7e 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002ae82 48 78 00 01              |Hx      |		PEA.L	0x1
0002ae86 4e ba eb 6c              |N  l    |		JSR	0x299f4
0002ae8a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae8c 4e b9 00 01 03 38        |N    8  |		JSR	BitNot(a : Quad) : Quad
0002ae92 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae94 4e ba ec 56              |N  V    |		JSR	0x29aec
0002ae98 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002ae9a 4e 5e                    |N^      |		UNLK	A6
0002ae9c 4e 75                    |Nu      |		RTS
0002ae9e ; --------------------------------------------------------------------------------------
0002ae9e ; OMSI PASCAL Function
0002ae9e ;    <LVAR  0x008 4(r)>
0002ae9e ;    <LVAR -0x00c 4(rw)>
0002ae9e ;    <LVAR -0x010 4(rw)>
0002ae9e ;    <LVAR -0x014 4(rw)>
0002ae9e ;    <LVAR -0x018 4(rw)>
0002ae9e ; --------------------------------------------------------------------------------------
0002ae9e 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
0002aea2 bf d5                    |        |		CMPA.L	(A5),A7
0002aea4 62 06                    |b       |		BHI	0x2aeac
0002aea6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002aeaa 4e 76                    |Nv      |		TRAPV
0002aeac de fc 00 30              |   0    |		ADDA.W	#0x30,A7
0002aeb0 48 e7 03 80              |H       |		MOVEM.L	A0+D7+D6,-(A7)
0002aeb4 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
0002aeb8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002aeba 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002aebc 48 78 00 01              |Hx      |		PEA.L	0x1
0002aec0 4e ba eb 32              |N  2    |		JSR	0x299f4
0002aec4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aec6 2d 5f ff e8              |-_      |		MOVE.L	(A7)+,(A6-0x18)
0002aeca 2d 57 ff ec              |-W      |		MOVE.L	(A7),(A6-0x14)
0002aece 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002aed0 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002aed2 48 78 00 02              |Hx      |		PEA.L	0x2
0002aed6 4e ba eb 1c              |N       |		JSR	0x299f4
0002aeda 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aedc 2d 5f ff f0              |-_      |		MOVE.L	(A7)+,(A6-0x10)
0002aee0 2d 57 ff f4              |-W      |		MOVE.L	(A7),(A6-0xc)
0002aee4 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002aee6 48 78 00 03              |Hx      |		PEA.L	0x3
0002aeea 4e ba eb 44              |N  D    |		JSR	0x29a30
0002aeee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aef0 2e 17                    |.       |		MOVE.L	(A7),D7
0002aef2 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002aef4 48 78 00 04              |Hx      |		PEA.L	0x4
0002aef8 4e ba eb 36              |N  6    |		JSR	0x29a30
0002aefc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002aefe 2c 17                    |,       |		MOVE.L	(A7),D6
0002af00 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002af02 2f 2e ff ec              |/.      |		MOVE.L	(A6-0x14),-(A7)
0002af06 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
0002af0a 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
0002af0e 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002af12 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002af14 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002af16 4e b9 00 01 03 48        |N    H  |		JSR	?BitField_something_()
0002af1c de fc 00 18              |        |		ADDA.W	#0x18,A7
0002af20 4e ba eb ca              |N       |		JSR	0x29aec
0002af24 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002af26 4c df 01 c0              |L       |		MOVEM.L	(A7)+,D6+D7+A0
0002af2a 4e 5e                    |N^      |		UNLK	A6
0002af2c 4e 75                    |Nu      |		RTS
0002af2e ; --------------------------------------------------------------------------------------
0002af2e ; OMSI PASCAL Function
0002af2e ;    <LVAR  0x008 4(r)>
0002af2e ;    <LVAR -0x00c 4(rw)>
0002af2e ;    <LVAR -0x010 4(rw)>
0002af2e ; --------------------------------------------------------------------------------------
0002af2e 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
0002af32 bf d5                    |        |		CMPA.L	(A5),A7
0002af34 62 06                    |b       |		BHI	0x2af3c
0002af36 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002af3a 4e 76                    |Nv      |		TRAPV
0002af3c de fc 00 28              |   (    |		ADDA.W	#0x28,A7
0002af40 48 e7 03 80              |H       |		MOVEM.L	A0+D7+D6,-(A7)
0002af44 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
0002af48 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002af4a 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002af4c 48 78 00 01              |Hx      |		PEA.L	0x1
0002af50 4e ba ea a2              |N       |		JSR	0x299f4
0002af54 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002af56 2d 5f ff f0              |-_      |		MOVE.L	(A7)+,(A6-0x10)
0002af5a 2d 57 ff f4              |-W      |		MOVE.L	(A7),(A6-0xc)
0002af5e 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002af60 48 78 00 02              |Hx      |		PEA.L	0x2
0002af64 4e ba ea ca              |N       |		JSR	0x29a30
0002af68 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002af6a 2e 17                    |.       |		MOVE.L	(A7),D7
0002af6c 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002af6e 48 78 00 03              |Hx      |		PEA.L	0x3
0002af72 4e ba ea bc              |N       |		JSR	0x29a30
0002af76 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002af78 2c 17                    |,       |		MOVE.L	(A7),D6
0002af7a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002af7c 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
0002af80 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002af84 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002af86 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002af88 4e b9 00 01 03 4c        |N    L  |		JSR	FSCALL_1034c
0002af8e de fc 00 10              |        |		ADDA.W	#0x10,A7
0002af92 4e ba eb 58              |N  X    |		JSR	0x29aec
0002af96 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002af98 4c df 01 c0              |L       |		MOVEM.L	(A7)+,D6+D7+A0
0002af9c 4e 5e                    |N^      |		UNLK	A6
0002af9e 4e 75                    |Nu      |		RTS
0002afa0 ; --------------------------------------------------------------------------------------
0002afa0 ; OMSI PASCAL Function
0002afa0 ;    <LVAR  0x008 4(r)>
0002afa0 ; --------------------------------------------------------------------------------------
0002afa0 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
0002afa4 bf d5                    |        |		CMPA.L	(A5),A7
0002afa6 62 06                    |b       |		BHI	0x2afae
0002afa8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002afac 4e 76                    |Nv      |		TRAPV
0002afae de fc 00 20              |        |		ADDA.W	#0x20,A7
0002afb2 48 e7 01 08              |H       |		MOVEM.L	A4+D7,-(A7)
0002afb6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002afb8 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002afbc 4e ba e0 e8              |N       |		JSR	0x290a6
0002afc0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002afc2 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002afc4 be 97                    |        |		CMP.L	(A7),D7
0002afc6 6e 26                    |n&      |		BGT	0x2afee
0002afc8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002afca 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002afce 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002afd0 4e ba e9 f0              |N       |		JSR	0x299c2
0002afd4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002afd6 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002afdc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002afde 1e bc 00 20              |        |		MOVE.B	#0x20,(A7)
0002afe2 4e b9 00 01 03 d0        |N       |		JSR	WriteConsoleChar(chr : char)
0002afe8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002afea 52 87                    |R       |		ADDQ.L	#0x1,D7
0002afec 68 d6                    |h       |		BVC	0x2afc4
0002afee 48 78 00 01              |Hx      |		PEA.L	0x1
0002aff2 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
0002aff8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002affa 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
0002affc 2f 0c                    |/       |		MOVE.L	A4,-(A7)
0002affe 4e ba de f2              |N       |		JSR	0x28ef2
0002b002 2e 8c                    |.       |		MOVE.L	A4,(A7)
0002b004 4e ba ea 5e              |N  ^    |		JSR	0x29a64
0002b008 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b00a 4c df 10 80              |L       |		MOVEM.L	(A7)+,D7+A4
0002b00e 4e 5e                    |N^      |		UNLK	A6
0002b010 4e 75                    |Nu      |		RTS
0002b012 ; --------------------------------------------------------------------------------------
0002b012 ; OMSI PASCAL Function
0002b012 ;    <LVAR  0x008 4(r)>
0002b012 ; --------------------------------------------------------------------------------------
0002b012 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
0002b016 bf d5                    |        |		CMPA.L	(A5),A7
0002b018 62 06                    |b       |		BHI	0x2b020
0002b01a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b01e 4e 76                    |Nv      |		TRAPV
0002b020 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
0002b024 48 e7 83 88              |H       |		MOVEM.L	A4+A0+D7+D6+D0,-(A7)
0002b028 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
0002b02c 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002b02e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b030 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b032 48 78 00 01              |Hx      |		PEA.L	0x1
0002b036 4e ba e9 8a              |N       |		JSR	0x299c2
0002b03a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b03c 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
0002b03e 9e c0                    |        |		SUBA.W	D0,A7
0002b040 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b042 48 78 00 02              |Hx      |		PEA.L	0x2
0002b046 4e ba e9 ac              |N       |		JSR	0x299f4
0002b04a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b04c 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
0002b052 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b054 2e 17                    |.       |		MOVE.L	(A7),D7
0002b056 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b058 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b05a 48 78 00 03              |Hx      |		PEA.L	0x3
0002b05e 4e ba e9 94              |N       |		JSR	0x299f4
0002b062 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b064 4e b9 00 01 03 50        |N    P  |		JSR	Quad2Long(a : Quad) : Long
0002b06a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b06c 2c 17                    |,       |		MOVE.L	(A7),D6
0002b06e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b070 2f 0c                    |/       |		MOVE.L	A4,-(A7)
0002b072 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002b074 4e b9 00 01 03 60        |N    `  |		JSR	?StringToInt64()
0002b07a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b07c 2e 86                    |.       |		MOVE.L	D6,(A7)
0002b07e 4e b9 00 01 03 5c        |N    \  |		JSR	Quad2String(a : Quad; radix : Long ) : String
0002b084 de c0                    |        |		ADDA.W	D0,A7
0002b086 4e ba e9 dc              |N       |		JSR	0x29a64
0002b08a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b08c 4c df 11 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A4
0002b090 4e 5e                    |N^      |		UNLK	A6
0002b092 4e 75                    |Nu      |		RTS
0002b094 ; --------------------------------------------------------------------------------------
0002b094 ; OMSI PASCAL Function
0002b094 ;    <LVAR  0x008 4(r)>
0002b094 ;    <LVAR -0x00a 2(r)>
0002b094 ;    <LVAR -0x00c 4(rw)>
0002b094 ;    <LVAR -0x010 4(rw)>
0002b094 ; --------------------------------------------------------------------------------------
0002b094 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc
0002b098 bf d5                    |        |		CMPA.L	(A5),A7
0002b09a 62 06                    |b       |		BHI	0x2b0a2
0002b09c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b0a0 4e 76                    |Nv      |		TRAPV
0002b0a2 de fc 00 34              |   4    |		ADDA.W	#0x34,A7
0002b0a6 48 e7 c3 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D1+D0,-(A7)
0002b0aa 41 ee ff f0              |A       |		LEA.L	(A6-0x10),A0
0002b0ae 43 ee ff f4              |C       |		LEA.L	(A6-0xc),A1
0002b0b2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b0b4 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b0b8 48 78 00 01              |Hx      |		PEA.L	0x1
0002b0bc 4e ba e9 36              |N  6    |		JSR	0x299f4
0002b0c0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b0c2 20 9f                    |        |		MOVE.L	(A7)+,(A0)
0002b0c4 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
0002b0c6 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002b0c8 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002b0ca 30 2e ff f6              |0.      |		MOVE.W	(A6-0xa),D0
0002b0ce 02 40 00 01              | @      |		ANDI.W	#0x0001,D0
0002b0d2 42 81                    |B       |		CLR.L	D1
0002b0d4 32 00                    |2       |		MOVE.W	D0,D1
0002b0d6 de 81                    |        |		ADD.L	D1,D7
0002b0d8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b0da 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b0dc 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b0de 48 78 ff ff              |Hx      |		PEA.L	0xffffffff
0002b0e2 4e b9 00 01 03 44        |N    D  |		JSR	BitShift(a : Quad ; howmuch : integer) : Quad
0002b0e8 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b0ec 20 9f                    |        |		MOVE.L	(A7)+,(A0)
0002b0ee 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
0002b0f0 52 86                    |R       |		ADDQ.L	#0x1,D6
0002b0f2 0c 86 00 00 00 3f        |     ?  |		CMPI.L	#0x0000003f,D6
0002b0f8 6f d0                    |o       |		BLE	0x2b0ca
0002b0fa 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b0fc 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002b0fe 4e b9 00 01 03 54        |N    T  |		JSR	Long2Quad(a : Long) : Quad
0002b104 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b106 4e ba e9 e4              |N       |		JSR	0x29aec
0002b10a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b10c 4c df 03 c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0+A1
0002b110 4e 5e                    |N^      |		UNLK	A6
0002b112 4e 75                    |Nu      |		RTS
0002b114 ; --------------------------------------------------------------------------------------
0002b114 ; OMSI PASCAL Function
0002b114 ;    <LVAR  0x008 4(r)>
0002b114 ;    <LVAR -0x004 @ 1(r)>
0002b114 ; --------------------------------------------------------------------------------------
0002b114 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
0002b118 bf d5                    |        |		CMPA.L	(A5),A7
0002b11a 62 06                    |b       |		BHI	0x2b122
0002b11c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b120 4e 76                    |Nv      |		TRAPV
0002b122 de fc 00 44              |   D    |		ADDA.W	#0x44,A7
0002b126 48 e7 e0 e0              |H       |		MOVEM.L	A2+A1+A0+D2+D1+D0,-(A7)
0002b12a 45 f9 00 02 f2 1a        |E       |		LEA.L	0x2f21a,A2
0002b130 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002b132 74 00                    |t       |		MOVEQ.L	#0x00,D2
0002b134 4a 12                    |J       |		TST.B	(A2)
0002b136 66 32                    |f2      |		BNE	0x2b16a
0002b138 9e fc 00 1c              |        |		SUBA.W	#0x1c,A7
0002b13c 20 4f                    | O      |		MOVEA.L	A7,A0
0002b13e 43 fa d7 b4              |C       |		LEA.L	0x288f4,A1
0002b142 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
0002b144 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002b146 51 c8 ff fc              |Q       |		DBF	D0,0x2b144
0002b14a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b14c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002b150 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002b152 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
0002b156 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002b15c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b15e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002b164 de fc 00 20              |        |		ADDA.W	#0x20,A7
0002b168 14 81                    |        |		MOVE.B	D1,(A2)
0002b16a 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002b16c 4e b9 00 01 03 f8        |N       |		JSR	GetConsoleConfig() : Long
0002b172 20 1f                    |        |		MOVE.L	(A7)+,D0
0002b174 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
0002b17a 63 02                    |c       |		BLS	0x2b17e
0002b17c 4e 4f                    |NO      |		TRAP	#15
0002b17e 3e 80                    |>       |		MOVE.W	D0,(A7)
0002b180 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002b184 4e b9 00 01 02 12        |N       |		JSR	KC09_PortStatus(Port : Word; VAR b: Byte)
0002b18a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b18c 10 2e ff fc              | .      |		MOVE.B	(A6-0x4),D0
0002b190 b0 01                    |        |		CMP.B	D1,D0
0002b192 67 16                    |g       |		BEQ	0x2b1aa
0002b194 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b198 4e ba da be              |N       |		JSR	0x28c58
0002b19c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b19e 2e 6d 00 08              |.m      |		MOVEA.L	(A5+0x8),A7
0002b1a2 3c 42                    |<B      |		MOVEA.W	D2,A6
0002b1a4 4e f9 00 02 c5 3c        |N    <  |		JMP	0x2c53c
0002b1aa 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b1ac 4e b9 00 01 03 d4        |N       |		JSR	ReadChar() : Byte
0002b1b2 10 1f                    |        |		MOVE.B	(A7)+,D0
0002b1b4 0c 00 00 07              |        |		CMPI.B	#0x07,D0
0002b1b8 67 16                    |g       |		BEQ	0x2b1d0
0002b1ba 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b1be 4e ba da 98              |N       |		JSR	0x28c58
0002b1c2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b1c4 2e 6d 00 08              |.m      |		MOVEA.L	(A5+0x8),A7
0002b1c8 3c 42                    |<B      |		MOVEA.W	D2,A6
0002b1ca 4e f9 00 02 c5 3c        |N    <  |		JMP	0x2c53c
0002b1d0 4c df 07 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2
0002b1d4 4e 5e                    |N^      |		UNLK	A6
0002b1d6 4e 75                    |Nu      |		RTS
0002b1d8 ; --------------------------------------------------------------------------------------
0002b1d8 ; OMSI PASCAL Function
0002b1d8 ; --------------------------------------------------------------------------------------
0002b1d8 4e 56 ff f8              |NV      |		LINK.W	A6,#0xfff8
0002b1dc bf d5                    |        |		CMPA.L	(A5),A7
0002b1de 62 06                    |b       |		BHI	0x2b1e6
0002b1e0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b1e4 4e 76                    |Nv      |		TRAPV
0002b1e6 de fc 00 08              |        |		ADDA.W	#0x8,A7
0002b1ea 48 78 00 c8              |Hx      |		PEA.L	0xc8
0002b1ee 4e ba e9 30              |N  0    |		JSR	0x29b20
0002b1f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b1f4 4e 5e                    |N^      |		UNLK	A6
0002b1f6 4e 75                    |Nu      |		RTS
0002b1f8 ; --------------------------------------------------------------------------------------
0002b1f8 ; OMSI PASCAL Function
0002b1f8 ;    <LVAR  0x008 4(r)>
0002b1f8 ;    <LVAR -0x00c @ 4(r)>
0002b1f8 ; --------------------------------------------------------------------------------------
0002b1f8 4e 56 ff ac              |NV      |		LINK.W	A6,#0xffac
0002b1fc bf d5                    |        |		CMPA.L	(A5),A7
0002b1fe 62 06                    |b       |		BHI	0x2b206
0002b200 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b204 4e 76                    |Nv      |		TRAPV
0002b206 de fc 00 48              |   H    |		ADDA.W	#0x48,A7
0002b20a 48 e7 83 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D0,-(A7)
0002b20e 43 ee ff f4              |C       |		LEA.L	(A6-0xc),A1
0002b212 48 51                    |HQ      |		PEA.L	(A1)
0002b214 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
0002b21a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b21e 4e ba de 86              |N       |		JSR	0x290a6
0002b222 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b224 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002b226 be 97                    |        |		CMP.L	(A7),D7
0002b228 6e 6a                    |nj      |		BGT	0x2b294
0002b22a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b22c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b230 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002b232 4e ba e7 fc              |N       |		JSR	0x29a30
0002b236 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b238 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002b23a 6d 20                    |m       |		BLT	0x2b25c
0002b23c 0c 86 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D6
0002b242 6e 18                    |n       |		BGT	0x2b25c
0002b244 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b246 0c 86 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D6
0002b24c 63 02                    |c       |		BLS	0x2b250
0002b24e 4e 4f                    |NO      |		TRAP	#15
0002b250 1f 06                    |        |		MOVE.B	D6,-(A7)
0002b252 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b258 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b25a 60 34                    |`4      |		BRA	0x2b290
0002b25c 48 51                    |HQ      |		PEA.L	(A1)
0002b25e 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002b264 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b266 41 fa d6 c4              |A       |		LEA.L	0x2892c,A0
0002b26a 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002b26c 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
0002b26e 51 c8 ff fc              |Q       |		DBF	D0,0x2b26c
0002b272 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b274 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002b278 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002b27c 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
0002b280 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002b286 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b288 4e ba da 10              |N       |		JSR	0x28c9a
0002b28c de fc 00 20              |        |		ADDA.W	#0x20,A7
0002b290 52 87                    |R       |		ADDQ.L	#0x1,D7
0002b292 68 92                    |h       |		BVC	0x2b226
0002b294 2e 91                    |.       |		MOVE.L	(A1),(A7)
0002b296 4e ba e7 cc              |N       |		JSR	0x29a64
0002b29a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b29c 4c df 03 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A1
0002b2a0 4e 5e                    |N^      |		UNLK	A6
0002b2a2 4e 75                    |Nu      |		RTS
0002b2a4 ; --------------------------------------------------------------------------------------
0002b2a4 ; OMSI PASCAL Function
0002b2a4 ;    <LVAR  0x00c 1(rw)>
0002b2a4 ;    <LVAR  0x008 4(r)>
0002b2a4 ; --------------------------------------------------------------------------------------
0002b2a4 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
0002b2a8 bf d5                    |        |		CMPA.L	(A5),A7
0002b2aa 62 06                    |b       |		BHI	0x2b2b2
0002b2ac 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b2b0 4e 76                    |Nv      |		TRAPV
0002b2b2 de fc 00 34              |   4    |		ADDA.W	#0x34,A7
0002b2b6 48 e7 e7 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002b2ba 42 2e 00 0c              |B.      |		CLR.B	(A6+0xc)
0002b2be 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002b2c2 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002b2c4 70 00                    |p       |		MOVEQ.L	#0x00,D0
0002b2c6 52 40                    |R@      |		ADDQ.W	#0x1,D0
0002b2c8 1c 00                    |        |		MOVE.B	D0,D6
0002b2ca 0c 06 00 2b              |   +    |		CMPI.B	#0x2b,D6
0002b2ce 6e 00 00 82              |n       |		BGT	0x2b352
0002b2d2 41 fa d8 b2              |A       |		LEA.L	0x28b86,A0
0002b2d6 10 06                    |        |		MOVE.B	D6,D0
0002b2d8 48 80                    |H       |		EXTB.W	D0
0002b2da 48 c0                    |H       |		EXTW.L	D0
0002b2dc e2 98                    |        |		ROR.L	#0x1,D0
0002b2de d0 c0                    |        |		ADDA.W	D0,A0
0002b2e0 48 40                    |H@      |		SWAP.W	D0
0002b2e2 e7 58                    | X      |		ROL.W	#0x3,D0
0002b2e4 42 81                    |B       |		CLR.L	D1
0002b2e6 12 10                    |        |		MOVE.B	(A0),D1
0002b2e8 e1 29                    | )      |		LSL.B	D0,D1
0002b2ea e8 09                    |        |		LSR.B	#0x4,D1
0002b2ec 2a 01                    |*       |		MOVE.L	D1,D5
0002b2ee 20 57                    | W      |		MOVEA.L	(A7),A0
0002b2f0 30 10                    |0       |		MOVE.W	(A0),D0
0002b2f2 48 c0                    |H       |		EXTW.L	D0
0002b2f4 ba 80                    |        |		CMP.L	D0,D5
0002b2f6 66 54                    |fT      |		BNE	0x2b34c
0002b2f8 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b2fa 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002b2fc be 97                    |        |		CMP.L	(A7),D7
0002b2fe 6e 42                    |nB      |		BGT	0x2b342
0002b300 10 06                    |        |		MOVE.B	D6,D0
0002b302 48 80                    |H       |		EXTB.W	D0
0002b304 c1 fc 00 0a              |        |		MULS.W	#0xa,D0
0002b308 22 07                    |"       |		MOVE.L	D7,D1
0002b30a 53 81                    |S       |		SUBQ.L	#0x1,D1
0002b30c 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
0002b312 63 02                    |c       |		BLS	0x2b316
0002b314 4e 4f                    |NO      |		TRAP	#15
0002b316 20 6f 00 04              | o      |		MOVEA.L	(A7+0x4),A0
0002b31a 43 fa d6 b2              |C       |		LEA.L	COMMAND_TABLE_289ce,A1
0002b31e 24 07                    |$       |		MOVE.L	D7,D2
0002b320 53 82                    |S       |		SUBQ.L	#0x1,D2
0002b322 0c 82 00 00 00 09        |        |		CMPI.L	#0x00000009,D2
0002b328 63 02                    |c       |		BLS	0x2b32c
0002b32a 4e 4f                    |NO      |		TRAP	#15
0002b32c 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
0002b330 10 30 18 02              | 0      |		MOVE.B	(A0+D1.L+#0x2),D0
0002b334 b0 31 28 00              | 1(     |		CMP.B	(A1+D2.L),D0
0002b338 67 04                    |g       |		BEQ	0x2b33e
0002b33a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b33c 60 0e                    |`       |		BRA	0x2b34c
0002b33e 52 87                    |R       |		ADDQ.L	#0x1,D7
0002b340 68 ba                    |h       |		BVC	0x2b2fc
0002b342 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b344 1d 46 00 0c              | F      |		MOVE.B	D6,(A6+0xc)
0002b348 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b34a 60 08                    |`       |		BRA	0x2b354
0002b34c 52 06                    |R       |		ADDQ.B	#0x1,D6
0002b34e 68 00 ff 7a              |h  z    |		BVC	0x2b2ca
0002b352 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b354 4c df 03 e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1
0002b358 4e 5e                    |N^      |		UNLK	A6
0002b35a 4e 75                    |Nu      |		RTS
0002b35c ; --------------------------------------------------------------------------------------
0002b35c ; OMSI PASCAL Function
0002b35c ;    <LVAR  0x00c 4(r)>
0002b35c ;    <LVAR  0x008 4(r)>
0002b35c ;    <LVAR -0x002 @ 1(r)>
0002b35c ;    <LVAR -0x006 @ 4(w)>
0002b35c ;    <LVAR -0x008 @ 1(r)>
0002b35c ;    <LVAR -0x00c @ 4(r)>
0002b35c ;    <LVAR -0x010 @ 4(rw)>
0002b35c ; --------------------------------------------------------------------------------------
0002b35c 4e 56 ff a6              |NV      |		LINK.W	A6,#0xffa6
0002b360 bf d5                    |        |		CMPA.L	(A5),A7
0002b362 62 06                    |b       |		BHI	0x2b36a
0002b364 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b368 4e 76                    |Nv      |		TRAPV
0002b36a de fc 00 4a              |   J    |		ADDA.W	#0x4a,A7
0002b36e 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
0002b372 45 ee ff f0              |E       |		LEA.L	(A6-0x10),A2
0002b376 47 ee ff fe              |G       |		LEA.L	(A6-0x2),A3
0002b37a 49 ee ff f4              |I       |		LEA.L	(A6-0xc),A4
0002b37e 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002b380 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b382 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b386 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
0002b38c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b38e 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002b390 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b392 1f 3c 00 2e              | < .    |		MOVE.B	#0x2e,-(A7)
0002b396 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b39c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b39e 41 f9 00 02 f1 fa        |A       |		LEA.L	0x2f1fa,A0
0002b3a4 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002b3a6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002b3a8 51 c8 ff fc              |Q       |		DBF	D0,0x2b3a6
0002b3ac 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b3ae 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b3b0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b3b2 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
0002b3b6 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002b3b8 3f 3c 00 0a              |?<      |		MOVE.W	#0xa,-(A7)
0002b3bc 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002b3c2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b3c4 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002b3ca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b3cc 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002b3ce 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b3d0 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002b3d2 42 27                    |B'      |		CLR.B	-(A7)
0002b3d4 1f 01                    |        |		MOVE.B	D1,-(A7)
0002b3d6 48 78 00 00              |Hx      |		PEA.L	0x0
0002b3da 48 53                    |HS      |		PEA.L	(A3)
0002b3dc 48 54                    |HT      |		PEA.L	(A4)
0002b3de 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
0002b3e4 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002b3e8 4a 13                    |J       |		TST.B	(A3)
0002b3ea 67 4a                    |gJ      |		BEQ	0x2b436
0002b3ec 48 52                    |HR      |		PEA.L	(A2)
0002b3ee 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002b3f4 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
0002b3f8 4e ba d8 5e              |N  ^    |		JSR	0x28c58
0002b3fc 9e fc 00 16              |        |		SUBA.W	#0x16,A7
0002b400 20 4f                    | O      |		MOVEA.L	A7,A0
0002b402 43 fa d5 28              |C  (    |		LEA.L	0x2892c,A1
0002b406 70 18                    |p       |		MOVEQ.L	#0x18,D0
0002b408 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002b40a 51 c8 ff fc              |Q       |		DBF	D0,0x2b408
0002b40e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b410 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002b414 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002b416 3f 3c 00 19              |?<      |		MOVE.W	#0x19,-(A7)
0002b41a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002b420 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b422 2e ae 00 0c              |.       |		MOVE.L	(A6+0xc),(A7)
0002b426 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002b42c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b42e 4e ba d8 6a              |N  j    |		JSR	0x28c9a
0002b432 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002b436 2d 79 00 02 f1 e8 ff fa  |-y      |		MOVE.L	0x2f1e8,(A6-0x6)
0002b43e 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002b440 48 52                    |HR      |		PEA.L	(A2)
0002b442 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002b446 4e b9 00 01 04 3c        |N    <  |		JSR	FileReadLine(file : File; VAR a : String; VAR b : Byte)
0002b44c de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b450 20 52                    | R      |		MOVEA.L	(A2),A0
0002b452 4a 50                    |JP      |		TST.W	(A0)
0002b454 67 14                    |g       |		BEQ	0x2b46a
0002b456 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b458 4e ba da 98              |N       |		JSR	0x28ef2
0002b45c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b45e 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
0002b462 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b464 4e ba de 12              |N       |		JSR	0x29278
0002b468 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b46a 4a 2e ff f8              |J.      |		TST.B	(A6-0x8)
0002b46e 67 ce                    |g       |		BEQ	0x2b43e
0002b470 42 27                    |B'      |		CLR.B	-(A7)
0002b472 1f 01                    |        |		MOVE.B	D1,-(A7)
0002b474 48 78 00 01              |Hx      |		PEA.L	0x1
0002b478 48 53                    |HS      |		PEA.L	(A3)
0002b47a 48 54                    |HT      |		PEA.L	(A4)
0002b47c 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
0002b482 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002b486 48 52                    |HR      |		PEA.L	(A2)
0002b488 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002b48e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b490 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
0002b494 4e 5e                    |N^      |		UNLK	A6
0002b496 4e 75                    |Nu      |		RTS
0002b498 ; --------------------------------------------------------------------------------------
0002b498 ; OMSI PASCAL Function
0002b498 ;    <LVAR  0x014 1(w)>
0002b498 ;    <LVAR  0x00c 4(r)>
0002b498 ;    <LVAR  0x008 4(r)>
0002b498 ; --------------------------------------------------------------------------------------
0002b498 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4
0002b49c bf d5                    |        |		CMPA.L	(A5),A7
0002b49e 62 06                    |b       |		BHI	0x2b4a6
0002b4a0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b4a4 4e 76                    |Nv      |		TRAPV
0002b4a6 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b4aa 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002b4ae 20 2e 00 0c              | .      |		MOVE.L	(A6+0xc),D0
0002b4b2 d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
0002b4b6 53 80                    |S       |		SUBQ.L	#0x1,D0
0002b4b8 53 80                    |S       |		SUBQ.L	#0x1,D0
0002b4ba 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
0002b4c0 63 02                    |c       |		BLS	0x2b4c4
0002b4c2 4e 4f                    |NO      |		TRAP	#15
0002b4c4 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002b4ca 1d 70 08 08 00 14        | p      |		MOVE.B	(A0+D0.L+#0x8),(A6+0x14)
0002b4d0 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
0002b4d4 4e 5e                    |N^      |		UNLK	A6
0002b4d6 4e 75                    |Nu      |		RTS
0002b4d8 ; --------------------------------------------------------------------------------------
0002b4d8 ; OMSI PASCAL Function
0002b4d8 ;    <LVAR  0x010 4(w)>
0002b4d8 ;    <LVAR  0x00c 4(r)>
0002b4d8 ;    <LVAR  0x008 4(r)>
0002b4d8 ;    <LVAR -0x004 @ 1(r)>
0002b4d8 ;    <LVAR -0x008 @ 4(r)>
0002b4d8 ; --------------------------------------------------------------------------------------
0002b4d8 4e 56 ff c4              |NV      |		LINK.W	A6,#0xffc4
0002b4dc bf d5                    |        |		CMPA.L	(A5),A7
0002b4de 62 06                    |b       |		BHI	0x2b4e6
0002b4e0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b4e4 4e 76                    |Nv      |		TRAPV
0002b4e6 de fc 00 34              |   4    |		ADDA.W	#0x34,A7
0002b4ea 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
0002b4ee 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b4f0 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b4f4 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b4f8 4e ba e4 4c              |N  L    |		JSR	0x29946
0002b4fc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b4fe 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002b502 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002b506 4e b9 00 01 02 ec        |N       |		JSR	String2Long(src : String; VAR status : Bool; VAR retval : Long)
0002b50c de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b510 4a 2e ff fc              |J.      |		TST.B	(A6-0x4)
0002b514 66 30                    |f0      |		BNE	0x2b546
0002b516 9e fc 00 18              |        |		SUBA.W	#0x18,A7
0002b51a 20 4f                    | O      |		MOVEA.L	A7,A0
0002b51c 43 fa d4 28              |C  (    |		LEA.L	0x28946,A1
0002b520 70 16                    |p       |		MOVEQ.L	#0x16,D0
0002b522 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002b524 51 c8 ff fc              |Q       |		DBF	D0,0x2b522
0002b528 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b52a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002b52e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002b532 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
0002b536 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002b53c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b53e 4e ba d7 5a              |N  Z    |		JSR	0x28c9a
0002b542 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
0002b546 2d 6e ff f8 00 10        |-n      |		MOVE.L	(A6-0x8),(A6+0x10)
0002b54c 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
0002b550 4e 5e                    |N^      |		UNLK	A6
0002b552 4e 75                    |Nu      |		RTS
0002b554 ; --------------------------------------------------------------------------------------
0002b554 ; OMSI PASCAL Function
0002b554 ;    <LVAR  0x014 4(r)>
0002b554 ;    <LVAR  0x010 4(r)>
0002b554 ;    <LVAR  0x00c 4(r)>
0002b554 ;    <LVAR  0x008 4(r)>
0002b554 ;    <LVAR -0x00c 4(rw)>
0002b554 ;    <LVAR -0x010 4(rw)>
0002b554 ;    <LVAR -0x014 4(rw)>
0002b554 ;    <LVAR -0x018 4(w)>
0002b554 ;    <LVAR -0x020 4(rw)>
0002b554 ; --------------------------------------------------------------------------------------
0002b554 4e 56 ff 8e              |NV      |		LINK.W	A6,#0xff8e
0002b558 bf d5                    |        |		CMPA.L	(A5),A7
0002b55a 62 06                    |b       |		BHI	0x2b562
0002b55c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b560 4e 76                    |Nv      |		TRAPV
0002b562 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
0002b566 48 e7 c7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7)
0002b56a 43 ee ff e0              |C       |		LEA.L	(A6-0x20),A1
0002b56e 45 ee ff f0              |E       |		LEA.L	(A6-0x10),A2
0002b572 47 ee ff f4              |G       |		LEA.L	(A6-0xc),A3
0002b576 49 ee ff ec              |I       |		LEA.L	(A6-0x14),A4
0002b57a 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002b57c 22 ae 00 14              |"       |		MOVE.L	(A6+0x14),(A1)
0002b580 20 39 00 02 f1 e8        | 9      |		MOVE.L	0x2f1e8,D0
0002b586 90 ae 00 14              |        |		SUB.L	(A6+0x14),D0
0002b58a 28 80                    |(       |		MOVE.L	D0,(A4)
0002b58c 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b590 2a 2e 00 10              |*.      |		MOVE.L	(A6+0x10),D5
0002b594 ba 97                    |        |		CMP.L	(A7),D5
0002b596 6e 2c                    |n,      |		BGT	0x2b5c4
0002b598 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b59a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b59e 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b5a0 4e ba e3 42              |N  B    |		JSR	0x298e4
0002b5a4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b5a6 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002b5a8 26 97                    |&       |		MOVE.L	(A7),(A3)
0002b5aa 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002b5ac 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b5ae 4e ba e2 fc              |N       |		JSR	0x298ac
0002b5b2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b5b4 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002b5b6 de 86                    |        |		ADD.L	D6,D7
0002b5b8 ba ae 00 0c              |        |		CMP.L	(A6+0xc),D5
0002b5bc 6c 02                    |l       |		BGE	0x2b5c0
0002b5be 52 87                    |R       |		ADDQ.L	#0x1,D7
0002b5c0 52 85                    |R       |		ADDQ.L	#0x1,D5
0002b5c2 68 d0                    |h       |		BVC	0x2b594
0002b5c4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b5c6 20 11                    |        |		MOVE.L	(A1),D0
0002b5c8 d0 94                    |        |		ADD.L	(A4),D0
0002b5ca 2d 40 ff e8              |-@      |		MOVE.L	D0,(A6-0x18)
0002b5ce be 94                    |        |		CMP.L	(A4),D7
0002b5d0 67 0c                    |g       |		BEQ	0x2b5de
0002b5d2 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002b5d4 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002b5d6 9f 97                    |        |		SUB.L	D7,(A7)
0002b5d8 4e ba dc 14              |N       |		JSR	0x291ee
0002b5dc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b5de 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b5e2 2a 2e 00 10              |*.      |		MOVE.L	(A6+0x10),D5
0002b5e6 ba 97                    |        |		CMP.L	(A7),D5
0002b5e8 6e 00 00 88              |n       |		BGT	0x2b672
0002b5ec 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002b5ee 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b5f2 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b5f4 4e ba e2 ee              |N       |		JSR	0x298e4
0002b5f8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b5fa 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002b5fc 26 97                    |&       |		MOVE.L	(A7),(A3)
0002b5fe 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002b600 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b602 4e ba e2 a8              |N       |		JSR	0x298ac
0002b606 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b608 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002b60a 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002b60c 70 01                    |p       |		MOVEQ.L	#0x01,D0
0002b60e b0 97                    |        |		CMP.L	(A7),D0
0002b610 6e 30                    |n0      |		BGT	0x2b642
0002b612 22 11                    |"       |		MOVE.L	(A1),D1
0002b614 d2 80                    |        |		ADD.L	D0,D1
0002b616 53 81                    |S       |		SUBQ.L	#0x1,D1
0002b618 53 81                    |S       |		SUBQ.L	#0x1,D1
0002b61a 0c 81 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D1
0002b620 63 02                    |c       |		BLS	0x2b624
0002b622 4e 4f                    |NO      |		TRAP	#15
0002b624 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002b62a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b62c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002b62e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b630 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002b632 4e ba fe 64              |N  d    |		JSR	0x2b498
0002b636 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b63a 11 9f 18 08              |        |		MOVE.B	(A7)+,(A0+D1.L+#0x8)
0002b63e 52 80                    |R       |		ADDQ.L	#0x1,D0
0002b640 68 cc                    |h       |		BVC	0x2b60e
0002b642 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b644 ba ae 00 0c              |        |		CMP.L	(A6+0xc),D5
0002b648 6c 22                    |l"      |		BGE	0x2b66c
0002b64a 20 11                    |        |		MOVE.L	(A1),D0
0002b64c d0 86                    |        |		ADD.L	D6,D0
0002b64e 22 00                    |"       |		MOVE.L	D0,D1
0002b650 53 81                    |S       |		SUBQ.L	#0x1,D1
0002b652 0c 81 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D1
0002b658 63 02                    |c       |		BLS	0x2b65c
0002b65a 4e 4f                    |NO      |		TRAP	#15
0002b65c 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002b662 11 bc 00 2c 18 08        |   ,    |		MOVE.B	#0x2c,(A0+D1.L+#0x8)
0002b668 52 80                    |R       |		ADDQ.L	#0x1,D0
0002b66a 22 80                    |"       |		MOVE.L	D0,(A1)
0002b66c 52 85                    |R       |		ADDQ.L	#0x1,D5
0002b66e 68 00 ff 76              |h  v    |		BVC	0x2b5e6
0002b672 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b674 4c df 1f e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4
0002b678 4e 5e                    |N^      |		UNLK	A6
0002b67a 4e 75                    |Nu      |		RTS
0002b67c ; --------------------------------------------------------------------------------------
0002b67c ; OMSI PASCAL Function
0002b67c ;    <LVAR  0x018 4(rw)>
0002b67c ;    <LVAR  0x014 4(r)>
0002b67c ;    <LVAR  0x010 4(r)>
0002b67c ;    <LVAR  0x00c 4(r)>
0002b67c ;    <LVAR  0x008 4(r)>
0002b67c ;    <LVAR -0x008 4(rw)>
0002b67c ;    <LVAR -0x00c 4(rw)>
0002b67c ;    <LVAR -0x018 4(w)>
0002b67c ; --------------------------------------------------------------------------------------
0002b67c 4e 56 ff 9e              |NV      |		LINK.W	A6,#0xff9e
0002b680 bf d5                    |        |		CMPA.L	(A5),A7
0002b682 62 06                    |b       |		BHI	0x2b68a
0002b684 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b688 4e 76                    |Nv      |		TRAPV
0002b68a de fc 00 4a              |   J    |		ADDA.W	#0x4a,A7
0002b68e 48 e7 c7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7)
0002b692 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
0002b696 43 ee 00 14              |C       |		LEA.L	(A6+0x14),A1
0002b69a 45 ee 00 10              |E       |		LEA.L	(A6+0x10),A2
0002b69e 47 ee ff f4              |G       |		LEA.L	(A6-0xc),A3
0002b6a2 49 fa fd f4              |I       |		LEA.L	0x2b498,A4
0002b6a6 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
0002b6a8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b6aa 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b6ac 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b6ae 4e ba e1 fc              |N       |		JSR	0x298ac
0002b6b2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b6b4 26 97                    |&       |		MOVE.L	(A7),(A3)
0002b6b6 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b6ba 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b6be 4e ba e1 ec              |N       |		JSR	0x298ac
0002b6c2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b6c4 20 9f                    |        |		MOVE.L	(A7)+,(A0)
0002b6c6 52 90                    |R       |		ADDQ.L	#0x1,(A0)
0002b6c8 20 13                    |        |		MOVE.L	(A3),D0
0002b6ca 90 90                    |        |		SUB.L	(A0),D0
0002b6cc 52 80                    |R       |		ADDQ.L	#0x1,D0
0002b6ce 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002b6d0 70 01                    |p       |		MOVEQ.L	#0x01,D0
0002b6d2 b0 97                    |        |		CMP.L	(A7),D0
0002b6d4 6e 00 00 8e              |n       |		BGT	0x2b764
0002b6d8 2d 40 ff e8              |-@      |		MOVE.L	D0,(A6-0x18)
0002b6dc 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002b6de 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002b6e0 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b6e2 7a 01                    |z       |		MOVEQ.L	#0x01,D5
0002b6e4 ba 97                    |        |		CMP.L	(A7),D5
0002b6e6 6e 42                    |nB      |		BGT	0x2b72a
0002b6e8 0c 85 00 00 00 01        |        |		CMPI.L	#0x00000001,D5
0002b6ee 66 04                    |f       |		BNE	0x2b6f4
0002b6f0 7e 2f                    |~/      |		MOVEQ.L	#0x2f,D7
0002b6f2 60 14                    |`       |		BRA	0x2b708
0002b6f4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b6f6 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b6fa 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b6fe 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b700 53 97                    |S       |		SUBQ.L	#0x1,(A7)
0002b702 4e 94                    |N       |		JSR	(A4)
0002b704 de c1                    |        |		ADDA.W	D1,A7
0002b706 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002b708 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b70a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b70c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b70e 20 2f 00 0e              | /      |		MOVE.L	(A7+0xe),D0
0002b712 d0 85                    |        |		ADD.L	D5,D0
0002b714 53 80                    |S       |		SUBQ.L	#0x1,D0
0002b716 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002b718 4e 94                    |N       |		JSR	(A4)
0002b71a de c1                    |        |		ADDA.W	D1,A7
0002b71c be 1f                    |        |		CMP.B	(A7)+,D7
0002b71e 67 04                    |g       |		BEQ	0x2b724
0002b720 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b722 60 08                    |`       |		BRA	0x2b72c
0002b724 2c 05                    |,       |		MOVE.L	D5,D6
0002b726 52 85                    |R       |		ADDQ.L	#0x1,D5
0002b728 68 ba                    |h       |		BVC	0x2b6e4
0002b72a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b72c bc 90                    |        |		CMP.L	(A0),D6
0002b72e 66 2c                    |f,      |		BNE	0x2b75c
0002b730 20 17                    |        |		MOVE.L	(A7),D0
0002b732 2d 40 00 18              |-@      |		MOVE.L	D0,(A6+0x18)
0002b736 d0 90                    |        |		ADD.L	(A0),D0
0002b738 b0 93                    |        |		CMP.L	(A3),D0
0002b73a 6d 02                    |m       |		BLT	0x2b73e
0002b73c 60 1a                    |`       |		BRA	0x2b758
0002b73e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b740 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b742 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b744 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002b746 4e 94                    |N       |		JSR	(A4)
0002b748 de c1                    |        |		ADDA.W	D1,A7
0002b74a 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002b74c 0c 07 00 2f              |   /    |		CMPI.B	#0x2f,D7
0002b750 67 06                    |g       |		BEQ	0x2b758
0002b752 0c 07 00 3d              |   =    |		CMPI.B	#0x3d,D7
0002b756 66 04                    |f       |		BNE	0x2b75c
0002b758 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b75a 60 0e                    |`       |		BRA	0x2b76a
0002b75c 20 1f                    |        |		MOVE.L	(A7)+,D0
0002b75e 52 80                    |R       |		ADDQ.L	#0x1,D0
0002b760 68 00 ff 70              |h  p    |		BVC	0x2b6d2
0002b764 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b766 42 ae 00 18              |B       |		CLR.L	(A6+0x18)
0002b76a 4c df 1f e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4
0002b76e 4e 5e                    |N^      |		UNLK	A6
0002b770 4e 75                    |Nu      |		RTS
0002b772 ; --------------------------------------------------------------------------------------
0002b772 ; OMSI PASCAL Function
0002b772 ;    <LVAR  0x018 4(r)>
0002b772 ;    <LVAR  0x014 4(r)>
0002b772 ;    <LVAR  0x010 4(r)>
0002b772 ;    <LVAR  0x00c 4(r)>
0002b772 ;    <LVAR  0x008 4(r)>
0002b772 ; --------------------------------------------------------------------------------------
0002b772 4e 56 ff be              |NV      |		LINK.W	A6,#0xffbe
0002b776 bf d5                    |        |		CMPA.L	(A5),A7
0002b778 62 06                    |b       |		BHI	0x2b780
0002b77a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b77e 4e 76                    |Nv      |		TRAPV
0002b780 de fc 00 36              |   6    |		ADDA.W	#0x36,A7
0002b784 48 e7 c7 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D5+D1+D0,-(A7)
0002b788 41 ee 00 14              |A       |		LEA.L	(A6+0x14),A0
0002b78c 43 ee 00 10              |C       |		LEA.L	(A6+0x10),A1
0002b790 72 2f                    |r/      |		MOVEQ.L	#0x2f,D1
0002b792 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b794 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b796 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b798 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b79c 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b7a0 4e ba fe da              |N       |		JSR	0x2b67c
0002b7a4 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002b7a8 2a 1f                    |*       |		MOVE.L	(A7)+,D5
0002b7aa 6f 52                    |oR      |		BLE	0x2b7fe
0002b7ac 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
0002b7b0 1f 01                    |        |		MOVE.B	D1,-(A7)
0002b7b2 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b7b8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b7ba 20 05                    |        |		MOVE.L	D5,D0
0002b7bc 52 80                    |R       |		ADDQ.L	#0x1,D0
0002b7be 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b7c0 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b7c2 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b7c4 4e ba e0 e6              |N       |		JSR	0x298ac
0002b7c8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b7ca 2c 00                    |,       |		MOVE.L	D0,D6
0002b7cc bc 97                    |        |		CMP.L	(A7),D6
0002b7ce 6e 2c                    |n,      |		BGT	0x2b7fc
0002b7d0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b7d2 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b7d4 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b7d6 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002b7d8 4e ba fc be              |N       |		JSR	0x2b498
0002b7dc de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b7e0 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002b7e2 be 01                    |        |		CMP.B	D1,D7
0002b7e4 66 04                    |f       |		BNE	0x2b7ea
0002b7e6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b7e8 60 14                    |`       |		BRA	0x2b7fe
0002b7ea 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
0002b7ee 1f 07                    |        |		MOVE.B	D7,-(A7)
0002b7f0 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b7f6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b7f8 52 86                    |R       |		ADDQ.L	#0x1,D6
0002b7fa 68 d0                    |h       |		BVC	0x2b7cc
0002b7fc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b7fe 4c df 03 e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1
0002b802 4e 5e                    |N^      |		UNLK	A6
0002b804 4e 75                    |Nu      |		RTS
0002b806 ; --------------------------------------------------------------------------------------
0002b806 ; OMSI PASCAL Function
0002b806 ;    <LVAR  0x018 4(r)>
0002b806 ;    <LVAR  0x014 4(r)>
0002b806 ;    <LVAR  0x010 4(r)>
0002b806 ;    <LVAR  0x00c 4(r)>
0002b806 ;    <LVAR  0x008 4(r)>
0002b806 ;    <LVAR -0x006 4(rw)>
0002b806 ;    <LVAR -0x014 4(rw)>
0002b806 ; --------------------------------------------------------------------------------------
0002b806 4e 56 ff aa              |NV      |		LINK.W	A6,#0xffaa
0002b80a bf d5                    |        |		CMPA.L	(A5),A7
0002b80c 62 06                    |b       |		BHI	0x2b814
0002b80e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b812 4e 76                    |Nv      |		TRAPV
0002b814 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
0002b818 48 e7 c7 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D5+D1+D0,-(A7)
0002b81c 41 ee 00 14              |A       |		LEA.L	(A6+0x14),A0
0002b820 43 ee 00 10              |C       |		LEA.L	(A6+0x10),A1
0002b824 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
0002b828 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
0002b82a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b82c 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b82e 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b830 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b834 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b838 4e ba fe 42              |N  B    |		JSR	0x2b67c
0002b83c de fc 00 10              |        |		ADDA.W	#0x10,A7
0002b840 2d 5f ff ec              |-_      |		MOVE.L	(A7)+,(A6-0x14)
0002b844 6f 6e                    |on      |		BLE	0x2b8b4
0002b846 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b848 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b84a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b84c 4e ba e0 5e              |N  ^    |		JSR	0x298ac
0002b850 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b852 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002b854 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b856 2a 2e ff ec              |*.      |		MOVE.L	(A6-0x14),D5
0002b85a ba 97                    |        |		CMP.L	(A7),D5
0002b85c 6e 54                    |nT      |		BGT	0x2b8b2
0002b85e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b860 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b862 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b864 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b866 4e ba fc 30              |N  0    |		JSR	0x2b498
0002b86a de c1                    |        |		ADDA.W	D1,A7
0002b86c 10 1f                    |        |		MOVE.B	(A7)+,D0
0002b86e 0c 00 00 3d              |   =    |		CMPI.B	#0x3d,D0
0002b872 66 3a                    |f:      |		BNE	0x2b8ae
0002b874 20 05                    |        |		MOVE.L	D5,D0
0002b876 52 80                    |R       |		ADDQ.L	#0x1,D0
0002b878 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002b87a 2c 00                    |,       |		MOVE.L	D0,D6
0002b87c bc 97                    |        |		CMP.L	(A7),D6
0002b87e 6e 2c                    |n,      |		BGT	0x2b8ac
0002b880 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b882 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b884 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b886 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002b888 4e ba fc 0e              |N       |		JSR	0x2b498
0002b88c de c1                    |        |		ADDA.W	D1,A7
0002b88e 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002b890 0c 07 00 2f              |   /    |		CMPI.B	#0x2f,D7
0002b894 66 04                    |f       |		BNE	0x2b89a
0002b896 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b898 60 1a                    |`       |		BRA	0x2b8b4
0002b89a 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
0002b89e 1f 07                    |        |		MOVE.B	D7,-(A7)
0002b8a0 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b8a6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b8a8 52 86                    |R       |		ADDQ.L	#0x1,D6
0002b8aa 68 d0                    |h       |		BVC	0x2b87c
0002b8ac 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b8ae 52 85                    |R       |		ADDQ.L	#0x1,D5
0002b8b0 68 a8                    |h       |		BVC	0x2b85a
0002b8b2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b8b4 4c df 07 e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1+A2
0002b8b8 4e 5e                    |N^      |		UNLK	A6
0002b8ba 4e 75                    |Nu      |		RTS
0002b8bc ; --------------------------------------------------------------------------------------
0002b8bc ; OMSI PASCAL Function
0002b8bc ;    <LVAR  0x010 4(r)>
0002b8bc ;    <LVAR  0x00c 4(r)>
0002b8bc ;    <LVAR  0x008 4(r)>
0002b8bc ; --------------------------------------------------------------------------------------
0002b8bc 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
0002b8c0 bf d5                    |        |		CMPA.L	(A5),A7
0002b8c2 62 06                    |b       |		BHI	0x2b8ca
0002b8c4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b8c8 4e 76                    |Nv      |		TRAPV
0002b8ca de fc 00 42              |   B    |		ADDA.W	#0x42,A7
0002b8ce 48 e7 c7 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D5+D1+D0,-(A7)
0002b8d2 41 ee 00 0c              |A       |		LEA.L	(A6+0xc),A0
0002b8d6 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
0002b8da 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
0002b8dc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b8de 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b8e0 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b8e2 4e ba df c8              |N       |		JSR	0x298ac
0002b8e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b8e8 2a 1f                    |*       |		MOVE.L	(A7)+,D5
0002b8ea 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b8ec 7c 01                    ||       |		MOVEQ.L	#0x01,D6
0002b8ee bc 97                    |        |		CMP.L	(A7),D6
0002b8f0 6e 46                    |nF      |		BGT	0x2b938
0002b8f2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b8f4 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b8f6 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b8f8 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002b8fa 4e ba fb 9c              |N       |		JSR	0x2b498
0002b8fe de c1                    |        |		ADDA.W	D1,A7
0002b900 10 1f                    |        |		MOVE.B	(A7)+,D0
0002b902 0c 00 00 2f              |   /    |		CMPI.B	#0x2f,D0
0002b906 66 2c                    |f,      |		BNE	0x2b934
0002b908 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002b90a 2e 06                    |.       |		MOVE.L	D6,D7
0002b90c be 97                    |        |		CMP.L	(A7),D7
0002b90e 6e 1e                    |n       |		BGT	0x2b92e
0002b910 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
0002b914 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b916 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002b918 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002b91a 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002b91c 4e ba fb 7a              |N  z    |		JSR	0x2b498
0002b920 de c1                    |        |		ADDA.W	D1,A7
0002b922 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b928 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b92a 52 87                    |R       |		ADDQ.L	#0x1,D7
0002b92c 68 de                    |h       |		BVC	0x2b90c
0002b92e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b930 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b932 60 06                    |`       |		BRA	0x2b93a
0002b934 52 86                    |R       |		ADDQ.L	#0x1,D6
0002b936 68 b6                    |h       |		BVC	0x2b8ee
0002b938 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b93a 4c df 03 e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1
0002b93e 4e 5e                    |N^      |		UNLK	A6
0002b940 4e 75                    |Nu      |		RTS
0002b942 ; --------------------------------------------------------------------------------------
0002b942 ; OMSI PASCAL Function
0002b942 ;    <LVAR  0x010 4(r)>
0002b942 ;    <LVAR  0x00c 4(r)>
0002b942 ;    <LVAR  0x008 4(r)>
0002b942 ; --------------------------------------------------------------------------------------
0002b942 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
0002b946 bf d5                    |        |		CMPA.L	(A5),A7
0002b948 62 06                    |b       |		BHI	0x2b950
0002b94a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b94e 4e 76                    |Nv      |		TRAPV
0002b950 de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
0002b954 48 e7 03 80              |H       |		MOVEM.L	A0+D7+D6,-(A7)
0002b958 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
0002b95c 42 50                    |BP      |		CLR.W	(A0)
0002b95e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b960 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b964 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b968 4e ba df 42              |N  B    |		JSR	0x298ac
0002b96c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b96e 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002b970 be 97                    |        |		CMP.L	(A7),D7
0002b972 6e 34                    |n4      |		BGT	0x2b9a8
0002b974 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002b976 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002b97a 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
0002b97e 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002b980 4e ba fb 16              |N       |		JSR	0x2b498
0002b984 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002b988 1c 1f                    |        |		MOVE.B	(A7)+,D6
0002b98a 0c 06 00 2f              |   /    |		CMPI.B	#0x2f,D6
0002b98e 67 10                    |g       |		BEQ	0x2b9a0
0002b990 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
0002b994 1f 06                    |        |		MOVE.B	D6,-(A7)
0002b996 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002b99c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002b99e 60 04                    |`       |		BRA	0x2b9a4
0002b9a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b9a2 60 06                    |`       |		BRA	0x2b9aa
0002b9a4 52 87                    |R       |		ADDQ.L	#0x1,D7
0002b9a6 68 c8                    |h       |		BVC	0x2b970
0002b9a8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002b9aa 4c df 01 c0              |L       |		MOVEM.L	(A7)+,D6+D7+A0
0002b9ae 4e 5e                    |N^      |		UNLK	A6
0002b9b0 4e 75                    |Nu      |		RTS
0002b9b2 ; --------------------------------------------------------------------------------------
0002b9b2 ; OMSI PASCAL Function
0002b9b2 ; --------------------------------------------------------------------------------------
0002b9b2 4e 56 ff c6              |NV      |		LINK.W	A6,#0xffc6
0002b9b6 bf d5                    |        |		CMPA.L	(A5),A7
0002b9b8 62 06                    |b       |		BHI	0x2b9c0
0002b9ba 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002b9be 4e 76                    |Nv      |		TRAPV
0002b9c0 de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
0002b9c4 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002b9c8 41 fa cf b6              |A       |		LEA.L	0x28980,A0
0002b9cc 70 10                    |p       |		MOVEQ.L	#0x10,D0
0002b9ce 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002b9d0 51 c8 ff fc              |Q       |		DBF	D0,0x2b9ce
0002b9d4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002b9d6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002b9da 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002b9de 3f 3c 00 22              |?< "    |		MOVE.W	#0x22,-(A7)
0002b9e2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002b9e8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002b9ea 4e ba d2 ae              |N       |		JSR	0x28c9a
0002b9ee de fc 00 26              |   &    |		ADDA.W	#0x26,A7
0002b9f2 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
0002b9f6 4e 5e                    |N^      |		UNLK	A6
0002b9f8 4e 75                    |Nu      |		RTS
0002b9fa ; --------------------------------------------------------------------------------------
0002b9fa ; OMSI PASCAL Function
0002b9fa ;    <LVAR  0x00c 4(r)>
0002b9fa ;    <LVAR  0x008 4(r)>
0002b9fa ;    <LVAR -0x006 4(rw)>
0002b9fa ; --------------------------------------------------------------------------------------
0002b9fa 4e 56 ff a0              |NV      |		LINK.W	A6,#0xffa0
0002b9fe bf d5                    |        |		CMPA.L	(A5),A7
0002ba00 62 06                    |b       |		BHI	0x2ba08
0002ba02 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002ba06 4e 76                    |Nv      |		TRAPV
0002ba08 de fc 00 58              |   X    |		ADDA.W	#0x58,A7
0002ba0c 48 e7 ff f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002ba10 43 ee 00 0c              |C       |		LEA.L	(A6+0xc),A1
0002ba14 45 f9 00 02 f1 e8        |E       |		LEA.L	0x2f1e8,A2
0002ba1a 47 fa d3 1a              |G       |		LEA.L	0x28d36,A3
0002ba1e 72 30                    |r0      |		MOVEQ.L	#0x30,D1
0002ba20 74 39                    |t9      |		MOVEQ.L	#0x39,D2
0002ba22 76 25                    |v%      |		MOVEQ.L	#0x25,D3
0002ba24 78 2d                    |x-      |		MOVEQ.L	#0x2d,D4
0002ba26 2d 52 ff fa              |-R      |		MOVE.L	(A2),(A6-0x6)
0002ba2a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002ba2c 4e 93                    |N       |		JSR	(A3)
0002ba2e 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002ba30 be 03                    |        |		CMP.B	D3,D7
0002ba32 66 08                    |f       |		BNE	0x2ba3c
0002ba34 20 51                    | Q      |		MOVEA.L	(A1),A0
0002ba36 42 90                    |B       |		CLR.L	(A0)
0002ba38 60 00 00 e2              |`       |		BRA	0x2bb1c
0002ba3c be 04                    |        |		CMP.B	D4,D7
0002ba3e 66 0c                    |f       |		BNE	0x2ba4c
0002ba40 20 51                    | Q      |		MOVEA.L	(A1),A0
0002ba42 20 bc 00 00 00 01        |        |		MOVE.L	#0x1,(A0)
0002ba48 60 00 00 d2              |`       |		BRA	0x2bb1c
0002ba4c 0c 07 00 2f              |   /    |		CMPI.B	#0x2f,D7
0002ba50 66 0c                    |f       |		BNE	0x2ba5e
0002ba52 20 51                    | Q      |		MOVEA.L	(A1),A0
0002ba54 20 bc 00 00 00 04        |        |		MOVE.L	#0x4,(A0)
0002ba5a 60 00 00 c0              |`       |		BRA	0x2bb1c
0002ba5e 0c 07 00 3d              |   =    |		CMPI.B	#0x3d,D7
0002ba62 66 0c                    |f       |		BNE	0x2ba70
0002ba64 20 51                    | Q      |		MOVEA.L	(A1),A0
0002ba66 20 bc 00 00 00 05        |        |		MOVE.L	#0x5,(A0)
0002ba6c 60 00 00 ae              |`       |		BRA	0x2bb1c
0002ba70 0c 07 00 5c              |   \    |		CMPI.B	#0x5c,D7
0002ba74 66 0c                    |f       |		BNE	0x2ba82
0002ba76 20 51                    | Q      |		MOVEA.L	(A1),A0
0002ba78 20 bc 00 00 00 06        |        |		MOVE.L	#0x6,(A0)
0002ba7e 60 00 00 9c              |`       |		BRA	0x2bb1c
0002ba82 4a 07                    |J       |		TST.B	D7
0002ba84 66 2c                    |f,      |		BNE	0x2bab2
0002ba86 41 fa cf 10              |A       |		LEA.L	0x28998,A0
0002ba8a 70 05                    |p       |		MOVEQ.L	#0x05,D0
0002ba8c 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
0002ba8e 51 c8 ff fc              |Q       |		DBF	D0,0x2ba8c
0002ba92 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002ba94 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002ba98 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002ba9c 3f 3c 00 18              |?<      |		MOVE.W	#0x18,-(A7)
0002baa0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002baa6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002baa8 4e ba d1 f0              |N       |		JSR	0x28c9a
0002baac de fc 00 1c              |        |		ADDA.W	#0x1c,A7
0002bab0 60 6a                    |`j      |		BRA	0x2bb1c
0002bab2 be 01                    |        |		CMP.B	D1,D7
0002bab4 65 2c                    |e,      |		BCS	0x2bae2
0002bab6 be 02                    |        |		CMP.B	D2,D7
0002bab8 62 28                    |b(      |		BHI	0x2bae2
0002baba 20 51                    | Q      |		MOVEA.L	(A1),A0
0002babc 20 bc 00 00 00 02        |        |		MOVE.L	#0x2,(A0)
0002bac2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002bac4 4e ba d2 32              |N  2    |		JSR	0x28cf8
0002bac8 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002baca be 01                    |        |		CMP.B	D1,D7
0002bacc 65 0a                    |e       |		BCS	0x2bad8
0002bace be 02                    |        |		CMP.B	D2,D7
0002bad0 62 06                    |b       |		BHI	0x2bad8
0002bad2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002bad4 4e 93                    |N       |		JSR	(A3)
0002bad6 1c 1f                    |        |		MOVE.B	(A7)+,D6
0002bad8 be 01                    |        |		CMP.B	D1,D7
0002bada 65 04                    |e       |		BCS	0x2bae0
0002badc be 02                    |        |		CMP.B	D2,D7
0002bade 63 e2                    |c       |		BLS	0x2bac2
0002bae0 60 3a                    |`:      |		BRA	0x2bb1c
0002bae2 20 51                    | Q      |		MOVEA.L	(A1),A0
0002bae4 20 bc 00 00 00 03        |        |		MOVE.L	#0x3,(A0)
0002baea 7a 00                    |z       |		MOVEQ.L	#0x00,D5
0002baec 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002baee 4e ba d2 08              |N       |		JSR	0x28cf8
0002baf2 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002baf4 be 03                    |        |		CMP.B	D3,D7
0002baf6 67 16                    |g       |		BEQ	0x2bb0e
0002baf8 be 04                    |        |		CMP.B	D4,D7
0002bafa 67 12                    |g       |		BEQ	0x2bb0e
0002bafc 0c 07 00 2f              |   /    |		CMPI.B	#0x2f,D7
0002bb00 67 0c                    |g       |		BEQ	0x2bb0e
0002bb02 0c 07 00 3d              |   =    |		CMPI.B	#0x3d,D7
0002bb06 67 06                    |g       |		BEQ	0x2bb0e
0002bb08 0c 07 00 5c              |   \    |		CMPI.B	#0x5c,D7
0002bb0c 66 04                    |f       |		BNE	0x2bb12
0002bb0e 7a 01                    |z       |		MOVEQ.L	#0x01,D5
0002bb10 60 06                    |`       |		BRA	0x2bb18
0002bb12 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002bb14 4e 93                    |N       |		JSR	(A3)
0002bb16 1c 1f                    |        |		MOVE.B	(A7)+,D6
0002bb18 4a 05                    |J       |		TST.B	D5
0002bb1a 67 d0                    |g       |		BEQ	0x2baec
0002bb1c 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002bb20 20 ae ff fa              |        |		MOVE.L	(A6-0x6),(A0)
0002bb24 21 52 00 04              |!R      |		MOVE.L	(A2),(A0+0x4)
0002bb28 53 a8 00 04              |S       |		SUBQ.L	#0x1,(A0+0x4)
0002bb2c 4c df 0f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3
0002bb30 4e 5e                    |N^      |		UNLK	A6
0002bb32 4e 75                    |Nu      |		RTS
0002bb34 ; --------------------------------------------------------------------------------------
0002bb34 ; OMSI PASCAL Function
0002bb34 ;    <LVAR  0x00c 4(r)>
0002bb34 ;    <LVAR  0x008 4(r)>
0002bb34 ; --------------------------------------------------------------------------------------
0002bb34 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
0002bb38 bf d5                    |        |		CMPA.L	(A5),A7
0002bb3a 62 06                    |b       |		BHI	0x2bb42
0002bb3c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002bb40 4e 76                    |Nv      |		TRAPV
0002bb42 de fc 00 34              |   4    |		ADDA.W	#0x34,A7
0002bb46 48 e7 c7 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D5+D1+D0,-(A7)
0002bb4a 45 ee 00 0c              |E       |		LEA.L	(A6+0xc),A2
0002bb4e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002bb52 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002bb54 2c 39 00 02 f1 e8        |,9      |		MOVE.L	0x2f1e8,D6
0002bb5a 9c 92                    |        |		SUB.L	(A2),D6
0002bb5c 2a 12                    |*       |		MOVE.L	(A2),D5
0002bb5e da 86                    |        |		ADD.L	D6,D5
0002bb60 30 10                    |0       |		MOVE.W	(A0),D0
0002bb62 48 c0                    |H       |		EXTW.L	D0
0002bb64 b0 86                    |        |		CMP.L	D6,D0
0002bb66 67 0c                    |g       |		BEQ	0x2bb74
0002bb68 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002bb6a 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bb6c 91 97                    |        |		SUB.L	D0,(A7)
0002bb6e 4e ba d6 7e              |N  ~    |		JSR	0x291ee
0002bb72 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bb74 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002bb76 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002bb78 be 97                    |        |		CMP.L	(A7),D7
0002bb7a 6e 34                    |n4      |		BGT	0x2bbb0
0002bb7c 20 12                    |        |		MOVE.L	(A2),D0
0002bb7e d0 87                    |        |		ADD.L	D7,D0
0002bb80 53 80                    |S       |		SUBQ.L	#0x1,D0
0002bb82 53 80                    |S       |		SUBQ.L	#0x1,D0
0002bb84 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
0002bb8a 63 02                    |c       |		BLS	0x2bb8e
0002bb8c 4e 4f                    |NO      |		TRAP	#15
0002bb8e 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002bb94 22 07                    |"       |		MOVE.L	D7,D1
0002bb96 53 81                    |S       |		SUBQ.L	#0x1,D1
0002bb98 0c 81 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D1
0002bb9e 63 02                    |c       |		BLS	0x2bba2
0002bba0 4e 4f                    |NO      |		TRAP	#15
0002bba2 22 6f 00 04              |"o      |		MOVEA.L	(A7+0x4),A1
0002bba6 11 b1 18 02 08 08        |        |		MOVE.B	(A1+D1.L+#0x2),(A0+D0.L+#0x8)
0002bbac 52 87                    |R       |		ADDQ.L	#0x1,D7
0002bbae 68 c8                    |h       |		BVC	0x2bb78
0002bbb0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bbb2 4c df 07 e3              |L       |		MOVEM.L	(A7)+,D0+D1+D5+D6+D7+A0+A1+A2
0002bbb6 4e 5e                    |N^      |		UNLK	A6
0002bbb8 4e 75                    |Nu      |		RTS
0002bbba ; --------------------------------------------------------------------------------------
0002bbba ; OMSI PASCAL Function
0002bbba ;    <LVAR  0x00c 4(r)>
0002bbba ;    <LVAR  0x008 4(r)>
0002bbba ;    <LVAR -0x008 @ 4(r)>
0002bbba ;    <LVAR -0x00c @ 4(r)>
0002bbba ;    <LVAR -0x010 4(r)>
0002bbba ;    <LVAR -0x014 @ 4(r)>
0002bbba ;    <LVAR -0x018 4(rw)>
0002bbba ;    <LVAR -0x01c 4(rw)>
0002bbba ;    <LVAR -0x020 4(rw)>
0002bbba ;    <LVAR -0x024 4(rw)>
0002bbba ;    <LVAR -0x028 4(rw)>
0002bbba ;    <LVAR -0x034 4(rw)>
0002bbba ; --------------------------------------------------------------------------------------
0002bbba 4e 56 ff 70              |NV p    |		LINK.W	A6,#0xff70
0002bbbe bf d5                    |        |		CMPA.L	(A5),A7
0002bbc0 62 06                    |b       |		BHI	0x2bbc8
0002bbc2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002bbc6 4e 76                    |Nv      |		TRAPV
0002bbc8 de fc 00 5c              |   \    |		ADDA.W	#0x5c,A7
0002bbcc 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002bbd0 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
0002bbd4 45 ee ff ec              |E       |		LEA.L	(A6-0x14),A2
0002bbd8 47 ee ff dc              |G       |		LEA.L	(A6-0x24),A3
0002bbdc 49 ee ff e0              |I       |		LEA.L	(A6-0x20),A4
0002bbe0 74 14                    |t       |		MOVEQ.L	#0x14,D2
0002bbe2 2d 79 00 02 f1 e8 ff d8  |-y      |		MOVE.L	0x2f1e8,(A6-0x28)
0002bbea 48 51                    |HQ      |		PEA.L	(A1)
0002bbec 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
0002bbf2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002bbf4 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
0002bbf8 48 52                    |HR      |		PEA.L	(A2)
0002bbfa 4e ba fd fe              |N       |		JSR	0x2b9fa
0002bbfe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bc00 42 ae ff cc              |B       |		CLR.L	(A6-0x34)
0002bc04 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002bc06 20 2e ff cc              | .      |		MOVE.L	(A6-0x34),D0
0002bc0a b0 82                    |        |		CMP.L	D2,D0
0002bc0c 63 02                    |c       |		BLS	0x2bc10
0002bc0e 4e 4e                    |NN      |		TRAP	#14
0002bc10 d0 40                    | @      |		ADD.W	D0,D0
0002bc12 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
0002bc1a 00 2a                    | *      |		.CONST	0x2a			; [0x0] -> 0x2bc44
0002bc1c 00 34                    | 4      |		.CONST	0x34			; [0x1] -> 0x2bc4e
0002bc1e 00 48                    | H      |		.CONST	0x48			; [0x2] -> 0x2bc62
0002bc20 00 64                    | d      |		.CONST	0x64			; [0x3] -> 0x2bc7e
0002bc22 00 68                    | h      |		.CONST	0x68			; [0x4] -> 0x2bc82
0002bc24 00 76                    | v      |		.CONST	0x76			; [0x5] -> 0x2bc90
0002bc26 00 8a                    |        |		.CONST	0x8a			; [0x6] -> 0x2bca4
0002bc28 00 90                    |        |		.CONST	0x90			; [0x7] -> 0x2bcaa
0002bc2a 00 92                    |        |		.CONST	0x92			; [0x8] -> 0x2bcac
0002bc2c 00 a8                    |        |		.CONST	0xa8			; [0x9] -> 0x2bcc2
0002bc2e 00 b6                    |        |		.CONST	0xb6			; [0xa] -> 0x2bcd0
0002bc30 00 ce                    |        |		.CONST	0xce			; [0xb] -> 0x2bce8
0002bc32 00 e2                    |        |		.CONST	0xe2			; [0xc] -> 0x2bcfc
0002bc34 00 f6                    |        |		.CONST	0xf6			; [0xd] -> 0x2bd10
0002bc36 01 0c                    |        |		.CONST	0x10c			; [0xe] -> 0x2bd26
0002bc38 01 0e                    |        |		.CONST	0x10e			; [0xf] -> 0x2bd28
0002bc3a 01 28                    | (      |		.CONST	0x128			; [0x10] -> 0x2bd42
0002bc3c 01 3e                    | >      |		.CONST	0x13e			; [0x11] -> 0x2bd58
0002bc3e 01 4c                    | L      |		.CONST	0x14c			; [0x12] -> 0x2bd66
0002bc40 01 4e                    | N      |		.CONST	0x14e			; [0x13] -> 0x2bd68
0002bc42 01 50                    | P      |		.CONST	0x150			; [0x14] -> 0x2bd6a
0002bc44					switch@0x2bc12[0x0]:
0002bc44 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002bc46 2a 2e 00 08              |*.      |		MOVE.L	(A6+0x8),D5
0002bc4a 60 00 01 48              |`  H    |		BRA	0x2bd94
0002bc4e					switch@0x2bc12[0x1]:
0002bc4e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002bc50 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002bc54 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bc56 4e ba f8 80              |N       |		JSR	0x2b4d8
0002bc5a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bc5c 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002bc5e 60 00 01 34              |`  4    |		BRA	0x2bd94
0002bc62					switch@0x2bc12[0x2]:
0002bc62 2f 2e ff d8              |/.      |		MOVE.L	(A6-0x28),-(A7)
0002bc66 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bc68 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bc6a 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002bc6e 4e ba f8 e4              |N       |		JSR	0x2b554
0002bc72 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002bc76 60 00 01 78              |`  x    |		BRA	0x2bdf0
0002bc7a 60 00 01 18              |`       |		.XXX[0x4]
0002bc7e					switch@0x2bc12[0x3]:
0002bc7e 60 00 01 14              |`       |		BRA	0x2bd94
0002bc82					switch@0x2bc12[0x4]:
0002bc82 2f 2e ff d8              |/.      |		MOVE.L	(A6-0x28),-(A7)
0002bc86 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bc88 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002bc8a 60 de                    |`       |		BRA	0x2bc6a
0002bc8c 60 00 01 06              |`       |		.XXX[0x4]
0002bc90					switch@0x2bc12[0x5]:
0002bc90 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002bc92 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002bc96 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bc98 4e ba f8 3e              |N  >    |		JSR	0x2b4d8
0002bc9c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bc9e 2a 1f                    |*       |		MOVE.L	(A7)+,D5
0002bca0 60 00 00 f2              |`       |		BRA	0x2bd94
0002bca4					switch@0x2bc12[0x6]:
0002bca4 7c 01                    ||       |		MOVEQ.L	#0x01,D6
0002bca6 60 00 00 ec              |`       |		BRA	0x2bd94
0002bcaa					switch@0x2bc12[0x7]:
0002bcaa 60 e4                    |`       |		BRA	switch@0x2bc12[0x5]
0002bcac					switch@0x2bc12[0x8]:
0002bcac 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002bcae 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002bcb2 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bcb4 4e ba dc 2e              |N  .    |		JSR	0x298e4
0002bcb8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bcba 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
0002bcbc 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
0002bcbe 60 00 00 d4              |`       |		BRA	0x2bd94
0002bcc2					switch@0x2bc12[0x9]:
0002bcc2 2d 52 ff e4              |-R      |		MOVE.L	(A2),(A6-0x1c)
0002bcc6 2d 6e ff f0 ff e8        |-n      |		MOVE.L	(A6-0x10),(A6-0x18)
0002bccc 60 00 00 c6              |`       |		BRA	0x2bd94
0002bcd0					switch@0x2bc12[0xa]:
0002bcd0 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bcd2 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002bcd4 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bcd6 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
0002bcda 2f 2e ff e4              |/.      |		MOVE.L	(A6-0x1c),-(A7)
0002bcde 4e ba fb 26              |N  &    |		JSR	0x2b806
0002bce2 de c2                    |        |		ADDA.W	D2,A7
0002bce4 60 00 00 ae              |`       |		BRA	0x2bd94
0002bce8					switch@0x2bc12[0xb]:
0002bce8 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bcea 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002bcec 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bcee 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
0002bcf2 2f 2e ff e4              |/.      |		MOVE.L	(A6-0x1c),-(A7)
0002bcf6 4e ba fa 7a              |N  z    |		JSR	0x2b772
0002bcfa 60 e6                    |`       |		BRA	0x2bce2
0002bcfc					switch@0x2bc12[0xc]:
0002bcfc 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bcfe 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002bd00 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bd02 4e ba fb b8              |N       |		JSR	0x2b8bc
0002bd06 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002bd0a 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002bd0c 60 00 00 86              |`       |		BRA	0x2bd94
0002bd10					switch@0x2bc12[0xd]:
0002bd10 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bd12 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002bd14 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bd16 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
0002bd1a 2f 2e ff e4              |/.      |		MOVE.L	(A6-0x1c),-(A7)
0002bd1e 4e ba fa 52              |N  R    |		JSR	0x2b772
0002bd22 de c2                    |        |		ADDA.W	D2,A7
0002bd24 60 e4                    |`       |		BRA	0x2bd0a
0002bd26					switch@0x2bc12[0xe]:
0002bd26 60 e2                    |`       |		BRA	0x2bd0a
0002bd28					switch@0x2bc12[0xf]:
0002bd28 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bd2a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002bd2c 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002bd30 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bd32 4e ba db b0              |N       |		JSR	0x298e4
0002bd36 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bd38 4e ba fb 82              |N       |		JSR	0x2b8bc
0002bd3c de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002bd40 60 52                    |`R      |		BRA	0x2bd94
0002bd42					switch@0x2bc12[0x10]:
0002bd42 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bd44 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002bd46 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002bd4a 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002bd4c 4e ba db 96              |N       |		JSR	0x298e4
0002bd50 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bd52 4e ba fb ee              |N       |		JSR	0x2b942
0002bd56 60 ae                    |`       |		BRA	0x2bd06
0002bd58					switch@0x2bc12[0x11]:
0002bd58 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bd5a 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
0002bd5e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bd60 4e ba fc 50              |N  P    |		JSR	0x2b9b2
0002bd64 60 d6                    |`       |		BRA	0x2bd3c
0002bd66					switch@0x2bc12[0x12]:
0002bd66 60 2c                    |`,      |		BRA	0x2bd94
0002bd68					switch@0x2bc12[0x13]:
0002bd68 60 a0                    |`       |		BRA	0x2bd0a
0002bd6a					switch@0x2bc12[0x14]:
0002bd6a 41 fa cc 44              |A  D    |		LEA.L	0x289b0,A0
0002bd6e 70 05                    |p       |		MOVEQ.L	#0x05,D0
0002bd70 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
0002bd72 51 c8 ff fc              |Q       |		DBF	D0,0x2bd70
0002bd76 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002bd78 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002bd7c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002bd80 3f 3c 00 18              |?<      |		MOVE.W	#0x18,-(A7)
0002bd84 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002bd8a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bd8c 4e ba cf 0c              |N       |		JSR	0x28c9a
0002bd90 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
0002bd94 4a 07                    |J       |		TST.B	D7
0002bd96 66 46                    |fF      |		BNE	0x2bdde
0002bd98 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
0002bd9c 48 52                    |HR      |		PEA.L	(A2)
0002bd9e 4e ba fc 5a              |N  Z    |		JSR	0x2b9fa
0002bda2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bda4 20 2e ff cc              | .      |		MOVE.L	(A6-0x34),D0
0002bda8 0c 80 00 00 00 13        |        |		CMPI.L	#0x00000013,D0
0002bdae 63 02                    |c       |		BLS	0x2bdb2
0002bdb0 4e 4f                    |NO      |		TRAP	#15
0002bdb2 28 00                    |(       |		MOVE.L	D0,D4
0002bdb4 76 07                    |v       |		MOVEQ.L	#0x07,D3
0002bdb6 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
0002bdbc 41 fa ce 0e              |A       |		LEA.L	0x28bcc,A0
0002bdc0 20 2e ff f4              | .      |		MOVE.L	(A6-0xc),D0
0002bdc4 0c 80 00 00 00 06        |        |		CMPI.L	#0x00000006,D0
0002bdca 63 02                    |c       |		BLS	0x2bdce
0002bdcc 4e 4f                    |NO      |		TRAP	#15
0002bdce 41 f0 48 00              |A H     |		LEA.L	(A0+D4.L),A0
0002bdd2 12 30 08 00              | 0      |		MOVE.B	(A0+D0.L),D1
0002bdd6 48 81                    |H       |		EXTB.W	D1
0002bdd8 48 c1                    |H       |		EXTW.L	D1
0002bdda 2d 41 ff cc              |-A      |		MOVE.L	D1,(A6-0x34)
0002bdde 4a 07                    |J       |		TST.B	D7
0002bde0 67 00 fe 24              |g  $    |		BEQ	0x2bc06
0002bde4 2f 2e ff d8              |/.      |		MOVE.L	(A6-0x28),-(A7)
0002bde8 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002bdea 4e ba fd 48              |N  H    |		JSR	0x2bb34
0002bdee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bdf0 48 51                    |HQ      |		PEA.L	(A1)
0002bdf2 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002bdf8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002bdfa 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002bdfe 4e 5e                    |N^      |		UNLK	A6
0002be00 4e 75                    |Nu      |		RTS
0002be02 ; --------------------------------------------------------------------------------------
0002be02 ; OMSI PASCAL Function
0002be02 ;    <LVAR  0x014 4(rw)>
0002be02 ;    <LVAR  0x010 4(r)>
0002be02 ;    <LVAR  0x00c 4(r)>
0002be02 ;    <LVAR  0x008 4(r)>
0002be02 ;    <LVAR -0x008 4(rw)>
0002be02 ;    <LVAR -0x00c 4(rw)>
0002be02 ;    <LVAR -0x018 4(w)>
0002be02 ; --------------------------------------------------------------------------------------
0002be02 4e 56 ff 96              |NV      |		LINK.W	A6,#0xff96
0002be06 bf d5                    |        |		CMPA.L	(A5),A7
0002be08 62 06                    |b       |		BHI	0x2be10
0002be0a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002be0e 4e 76                    |Nv      |		TRAPV
0002be10 de fc 00 52              |   R    |		ADDA.W	#0x52,A7
0002be14 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002be18 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
0002be1c 45 ee 00 10              |E       |		LEA.L	(A6+0x10),A2
0002be20 47 ee 00 0c              |G       |		LEA.L	(A6+0xc),A3
0002be24 49 ee ff f4              |I       |		LEA.L	(A6-0xc),A4
0002be28 74 0c                    |t       |		MOVEQ.L	#0x0c,D2
0002be2a 42 ae 00 14              |B       |		CLR.L	(A6+0x14)
0002be2e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002be30 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002be32 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002be34 4e ba da 76              |N  v    |		JSR	0x298ac
0002be38 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002be3a 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
0002be3c 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002be40 30 10                    |0       |		MOVE.W	(A0),D0
0002be42 48 c0                    |H       |		EXTW.L	D0
0002be44 52 80                    |R       |		ADDQ.L	#0x1,D0
0002be46 22 80                    |"       |		MOVE.L	D0,(A1)
0002be48 44 80                    |D       |		NEG.L	D0
0002be4a d0 94                    |        |		ADD.L	(A4),D0
0002be4c 52 80                    |R       |		ADDQ.L	#0x1,D0
0002be4e 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002be50 70 01                    |p       |		MOVEQ.L	#0x01,D0
0002be52 b0 97                    |        |		CMP.L	(A7),D0
0002be54 6e 00 00 9a              |n       |		BGT	0x2bef0
0002be58 2d 40 ff e8              |-@      |		MOVE.L	D0,(A6-0x18)
0002be5c 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002be5e 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002be60 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002be62 7a 01                    |z       |		MOVEQ.L	#0x01,D5
0002be64 ba 97                    |        |		CMP.L	(A7),D5
0002be66 6e 48                    |nH      |		BGT	0x2beb0
0002be68 0c 85 00 00 00 01        |        |		CMPI.L	#0x00000001,D5
0002be6e 66 04                    |f       |		BNE	0x2be74
0002be70 7e 2f                    |~/      |		MOVEQ.L	#0x2f,D7
0002be72 60 18                    |`       |		BRA	0x2be8c
0002be74 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002be78 20 05                    |        |		MOVE.L	D5,D0
0002be7a 53 80                    |S       |		SUBQ.L	#0x1,D0
0002be7c 53 80                    |S       |		SUBQ.L	#0x1,D0
0002be7e 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
0002be84 63 02                    |c       |		BLS	0x2be88
0002be86 4e 4f                    |NO      |		TRAP	#15
0002be88 1e 30 08 02              | 0      |		MOVE.B	(A0+D0.L+#0x2),D7
0002be8c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002be8e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002be90 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002be92 20 2f 00 0e              | /      |		MOVE.L	(A7+0xe),D0
0002be96 d0 85                    |        |		ADD.L	D5,D0
0002be98 53 80                    |S       |		SUBQ.L	#0x1,D0
0002be9a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002be9c 4e ba f5 fa              |N       |		JSR	0x2b498
0002bea0 de c2                    |        |		ADDA.W	D2,A7
0002bea2 be 1f                    |        |		CMP.B	(A7)+,D7
0002bea4 67 04                    |g       |		BEQ	0x2beaa
0002bea6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002bea8 60 08                    |`       |		BRA	0x2beb2
0002beaa 2c 05                    |,       |		MOVE.L	D5,D6
0002beac 52 85                    |R       |		ADDQ.L	#0x1,D5
0002beae 68 b4                    |h       |		BVC	0x2be64
0002beb0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002beb2 bc 91                    |        |		CMP.L	(A1),D6
0002beb4 66 32                    |f2      |		BNE	0x2bee8
0002beb6 20 17                    |        |		MOVE.L	(A7),D0
0002beb8 22 00                    |"       |		MOVE.L	D0,D1
0002beba d2 91                    |        |		ADD.L	(A1),D1
0002bebc b2 94                    |        |		CMP.L	(A4),D1
0002bebe 6c 26                    |l&      |		BGE	0x2bee6
0002bec0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002bec2 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bec4 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bec6 2f 01                    |/       |		MOVE.L	D1,-(A7)
0002bec8 4e ba f5 ce              |N       |		JSR	0x2b498
0002becc de c2                    |        |		ADDA.W	D2,A7
0002bece 1e 1f                    |        |		MOVE.B	(A7)+,D7
0002bed0 0c 07 00 2f              |   /    |		CMPI.B	#0x2f,D7
0002bed4 67 06                    |g       |		BEQ	0x2bedc
0002bed6 0c 07 00 3d              |   =    |		CMPI.B	#0x3d,D7
0002beda 66 08                    |f       |		BNE	0x2bee4
0002bedc 2d 40 00 14              |-@      |		MOVE.L	D0,(A6+0x14)
0002bee0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bee2 60 0e                    |`       |		BRA	0x2bef2
0002bee4 60 02                    |`       |		BRA	0x2bee8
0002bee6 60 f4                    |`       |		BRA	0x2bedc
0002bee8 20 1f                    |        |		MOVE.L	(A7)+,D0
0002beea 52 80                    |R       |		ADDQ.L	#0x1,D0
0002beec 68 00 ff 64              |h  d    |		BVC	0x2be52
0002bef0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002bef2 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
0002bef6 4e 5e                    |N^      |		UNLK	A6
0002bef8 4e 75                    |Nu      |		RTS
0002befa ; --------------------------------------------------------------------------------------
0002befa ; OMSI PASCAL Function
0002befa ;    <LVAR  0x018 4(r)>
0002befa ;    <LVAR  0x014 4(r)>
0002befa ;    <LVAR  0x010 4(r)>
0002befa ;    <LVAR  0x00c 4(r)>
0002befa ;    <LVAR  0x008 4(r)>
0002befa ;    <LVAR -0x008 4(rw)>
0002befa ;    <LVAR -0x014 4(rw)>
0002befa ;    <LVAR -0x018 4(rw)>
0002befa ;    <LVAR -0x01c 4(rw)>
0002befa ; --------------------------------------------------------------------------------------
0002befa 4e 56 ff 8e              |NV      |		LINK.W	A6,#0xff8e
0002befe bf d5                    |        |		CMPA.L	(A5),A7
0002bf00 62 06                    |b       |		BHI	0x2bf08
0002bf02 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002bf06 4e 76                    |Nv      |		TRAPV
0002bf08 de fc 00 56              |   V    |		ADDA.W	#0x56,A7
0002bf0c 48 e7 e7 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7)
0002bf10 45 ee ff e4              |E       |		LEA.L	(A6-0x1c),A2
0002bf14 47 ee ff e8              |G       |		LEA.L	(A6-0x18),A3
0002bf18 49 ee ff f8              |I       |		LEA.L	(A6-0x8),A4
0002bf1c 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
0002bf1e 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002bf20 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002bf24 42 10                    |B       |		CLR.B	(A0)
0002bf26 22 6e 00 0c              |"n      |		MOVEA.L	(A6+0xc),A1
0002bf2a 22 82                    |"       |		MOVE.L	D2,(A1)
0002bf2c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002bf2e 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
0002bf32 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
0002bf36 4e ba d9 ac              |N       |		JSR	0x298e4
0002bf3a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bf3c 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002bf3e 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
0002bf40 4a 92                    |J       |		TST.L	(A2)
0002bf42 67 00 00 96              |g       |		BEQ	0x2bfda
0002bf46 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002bf48 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bf4a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bf4c 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
0002bf50 4e ba fe b0              |N       |		JSR	0x2be02
0002bf54 de c1                    |        |		ADDA.W	D1,A7
0002bf56 2d 5f ff ec              |-_      |		MOVE.L	(A7)+,(A6-0x14)
0002bf5a 67 7e                    |g~      |		BEQ	0x2bfda
0002bf5c 10 82                    |        |		MOVE.B	D2,(A0)
0002bf5e 48 51                    |HQ      |		PEA.L	(A1)
0002bf60 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
0002bf66 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bf68 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bf6a 4e ba d9 40              |N  @    |		JSR	0x298ac
0002bf6e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bf70 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
0002bf72 20 2e ff ec              | .      |		MOVE.L	(A6-0x14),D0
0002bf76 52 80                    |R       |		ADDQ.L	#0x1,D0
0002bf78 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002bf7a 2a 00                    |*       |		MOVE.L	D0,D5
0002bf7c ba 97                    |        |		CMP.L	(A7),D5
0002bf7e 6e 58                    |nX      |		BGT	0x2bfd8
0002bf80 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002bf82 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bf84 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bf86 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002bf88 4e ba f5 0e              |N       |		JSR	0x2b498
0002bf8c de c1                    |        |		ADDA.W	D1,A7
0002bf8e 10 1f                    |        |		MOVE.B	(A7)+,D0
0002bf90 0c 00 00 3d              |   =    |		CMPI.B	#0x3d,D0
0002bf94 66 3e                    |f>      |		BNE	0x2bfd4
0002bf96 20 05                    |        |		MOVE.L	D5,D0
0002bf98 52 80                    |R       |		ADDQ.L	#0x1,D0
0002bf9a 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002bf9c 2e 00                    |.       |		MOVE.L	D0,D7
0002bf9e be 97                    |        |		CMP.L	(A7),D7
0002bfa0 6e 2e                    |n.      |		BGT	0x2bfd0
0002bfa2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002bfa4 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002bfa6 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002bfa8 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002bfaa 4e ba f4 ec              |N       |		JSR	0x2b498
0002bfae de c1                    |        |		ADDA.W	D1,A7
0002bfb0 1c 1f                    |        |		MOVE.B	(A7)+,D6
0002bfb2 0c 06 00 2f              |   /    |		CMPI.B	#0x2f,D6
0002bfb6 66 04                    |f       |		BNE	0x2bfbc
0002bfb8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bfba 60 1e                    |`       |		BRA	0x2bfda
0002bfbc 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002bfc0 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002bfc2 1f 06                    |        |		MOVE.B	D6,-(A7)
0002bfc4 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
0002bfca 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002bfcc 52 87                    |R       |		ADDQ.L	#0x1,D7
0002bfce 68 ce                    |h       |		BVC	0x2bf9e
0002bfd0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002bfd2 60 06                    |`       |		BRA	0x2bfda
0002bfd4 52 85                    |R       |		ADDQ.L	#0x1,D5
0002bfd6 68 a4                    |h       |		BVC	0x2bf7c
0002bfd8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002bfda 4c df 1f e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4
0002bfde 4e 5e                    |N^      |		UNLK	A6
0002bfe0 4e 75                    |Nu      |		RTS
0002bfe2 ; --------------------------------------------------------------------------------------
0002bfe2 ; OMSI PASCAL Function
0002bfe2 ;    <LVAR  0x00c @ 4(r)>
0002bfe2 ;    <LVAR  0x008 4(r)>
0002bfe2 ;    <LVAR -0x010 @ 1(r)>
0002bfe2 ; --------------------------------------------------------------------------------------
0002bfe2 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
0002bfe6 bf d5                    |        |		CMPA.L	(A5),A7
0002bfe8 62 06                    |b       |		BHI	0x2bff0
0002bfea 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002bfee 4e 76                    |Nv      |		TRAPV
0002bff0 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
0002bff4 48 e7 87 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D0,-(A7)
0002bff8 43 f9 00 02 f1 e8        |C       |		LEA.L	0x2f1e8,A1
0002bffe 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
0002c002 47 ee 00 0c              |G       |		LEA.L	(A6+0xc),A3
0002c006 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002c008 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c00a 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
0002c00e 4e b9 00 02 83 58        |N    X  |		JSR	0x28358
0002c014 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002c018 4a 2e ff f0              |J.      |		TST.B	(A6-0x10)
0002c01c 66 50                    |fP      |		BNE	0x2c06e
0002c01e 2e 11                    |.       |		MOVE.L	(A1),D7
0002c020 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c022 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c024 4e ba d0 80              |N       |		JSR	0x290a6
0002c028 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c02a 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002c02c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002c02e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c030 4e ba f3 2a              |N  *    |		JSR	0x2b35c
0002c034 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c036 2a 11                    |*       |		MOVE.L	(A1),D5
0002c038 20 07                    |        |		MOVE.L	D7,D0
0002c03a 53 80                    |S       |		SUBQ.L	#0x1,D0
0002c03c 0c 80 00 00 0f ff        |        |		CMPI.L	#0x00000fff,D0
0002c042 63 02                    |c       |		BLS	0x2c046
0002c044 4e 4f                    |NO      |		TRAP	#15
0002c046 41 f9 00 02 e1 e0        |A       |		LEA.L	0x2e1e0,A0
0002c04c 10 30 08 08              | 0      |		MOVE.B	(A0+D0.L+#0x8),D0
0002c050 0c 00 00 25              |   %    |		CMPI.B	#0x25,D0
0002c054 66 0c                    |f       |		BNE	0x2c062
0002c056 22 87                    |"       |		MOVE.L	D7,(A1)
0002c058 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c05a 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002c05c 4e ba fb 5c              |N  \    |		JSR	0x2bbba
0002c060 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c062 52 87                    |R       |		ADDQ.L	#0x1,D7
0002c064 be b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D7
0002c06a 6f cc                    |o       |		BLE	0x2c038
0002c06c 22 85                    |"       |		MOVE.L	D5,(A1)
0002c06e 48 53                    |HS      |		PEA.L	(A3)
0002c070 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002c076 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c078 4c df 0f e1              |L       |		MOVEM.L	(A7)+,D0+D5+D6+D7+A0+A1+A2+A3
0002c07c 4e 5e                    |N^      |		UNLK	A6
0002c07e 4e 75                    |Nu      |		RTS
0002c080 ; --------------------------------------------------------------------------------------
0002c080 ; OMSI PASCAL Function
0002c080 ;    <LVAR -0x006 @ 4(r)>
0002c080 ;    <LVAR -0x00a @ 4(rw)>
0002c080 ;    <LVAR -0x00b 1(w)>
0002c080 ;    <LVAR -0x00c @ 1(r)>
0002c080 ; --------------------------------------------------------------------------------------
0002c080 4e 56 ff 94              |NV      |		LINK.W	A6,#0xff94
0002c084 bf d5                    |        |		CMPA.L	(A5),A7
0002c086 62 06                    |b       |		BHI	0x2c08e
0002c088 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002c08c 4e 76                    |Nv      |		TRAPV
0002c08e de fc 00 54              |   T    |		ADDA.W	#0x54,A7
0002c092 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002c096 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
0002c09a 47 f9 00 02 f1 e8        |G       |		LEA.L	0x2f1e8,A3
0002c0a0 49 ee ff f6              |I       |		LEA.L	(A6-0xa),A4
0002c0a4 2e 13                    |.       |		MOVE.L	(A3),D7
0002c0a6 48 52                    |HR      |		PEA.L	(A2)
0002c0a8 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
0002c0ac 4e ba cf 4c              |N  L    |		JSR	0x28ffa
0002c0b0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c0b2 2c 13                    |,       |		MOVE.L	(A3),D6
0002c0b4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c0b6 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c0b8 4e ba cf ec              |N       |		JSR	0x290a6
0002c0bc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c0be 20 1f                    |        |		MOVE.L	(A7)+,D0
0002c0c0 0c 80 ff ff ff ff        |        |		CMPI.L	#0xffffffff,D0
0002c0c6 67 00 02 ac              |g       |		BEQ	0x2c374
0002c0ca 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c0cc 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c0ce 48 78 00 00              |Hx      |		PEA.L	0x0
0002c0d2 4e ba d8 ee              |N       |		JSR	0x299c2
0002c0d6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c0d8 28 97                    |(       |		MOVE.L	(A7),(A4)
0002c0da 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002c0dc 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002c0de 4e ba f1 c4              |N       |		JSR	0x2b2a4
0002c0e2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c0e4 10 1f                    |        |		MOVE.B	(A7)+,D0
0002c0e6 48 80                    |H       |		EXTB.W	D0
0002c0e8 41 bc 00 2b              |A  +    |		CHK.W	#0x2b,D0
0002c0ec 1d 40 ff f5              | @      |		MOVE.B	D0,(A6-0xb)
0002c0f0 4a 00                    |J       |		TST.B	D0
0002c0f2 66 0e                    |f       |		BNE	0x2c102
0002c0f4 2f 14                    |/       |		MOVE.L	(A4),-(A7)
0002c0f6 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c0f8 4e ba fe e8              |N       |		JSR	0x2bfe2
0002c0fc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c0fe 60 00 02 6c              |`  l    |		BRA	0x2c36c
0002c102 48 54                    |HT      |		PEA.L	(A4)
0002c104 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002c10a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c10c 12 00                    |        |		MOVE.B	D0,D1
0002c10e 48 81                    |H       |		EXTB.W	D1
0002c110 43 bc 00 2b              |C  +    |		CHK.W	#0x2b,D1
0002c114 41 fa ca 86              |A       |		LEA.L	0x28b9c,A0
0002c118 30 01                    |0       |		MOVE.W	D1,D0
0002c11a 48 c0                    |H       |		EXTW.L	D0
0002c11c 24 00                    |$       |		MOVE.L	D0,D2
0002c11e e2 9a                    |        |		ROR.L	#0x1,D2
0002c120 d0 c2                    |        |		ADDA.W	D2,A0
0002c122 48 42                    |HB      |		SWAP.W	D2
0002c124 e7 5a                    | Z      |		ROL.W	#0x3,D2
0002c126 42 83                    |B       |		CLR.L	D3
0002c128 16 10                    |        |		MOVE.B	(A0),D3
0002c12a e5 2b                    | +      |		LSL.B	D2,D3
0002c12c e8 0b                    |        |		LSR.B	#0x4,D3
0002c12e 2a 03                    |*       |		MOVE.L	D3,D5
0002c130 0c 85 00 00 00 0f        |        |		CMPI.L	#0x0000000f,D5
0002c136 67 2c                    |g,      |		BEQ	0x2c164
0002c138 28 00                    |(       |		MOVE.L	D0,D4
0002c13a 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
0002c13c 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
0002c142 41 fa c8 8a              |A       |		LEA.L	COMMAND_TABLE_289ce,A0
0002c146 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002c14a 22 4f                    |"O      |		MOVEA.L	A7,A1
0002c14c 41 f0 40 00              |A @     |		LEA.L	(A0+D4.W),A0
0002c150 70 09                    |p       |		MOVEQ.L	#0x09,D0
0002c152 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002c154 51 c8 ff fc              |Q       |		DBF	D0,0x2c152
0002c158 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c15a 2f 05                    |/       |		MOVE.L	D5,-(A7)
0002c15c 4e ba cf 7e              |N  ~    |		JSR	0x290dc
0002c160 de fc 00 12              |        |		ADDA.W	#0x12,A7
0002c164 53 41                    |SA      |		SUBQ.W	#0x1,D1
0002c166 0c 41 00 2a              | A *    |		CMPI.W	#0x002a,D1
0002c16a 63 02                    |c       |		BLS	0x2c16e
0002c16c 4e 4e                    |NN      |		TRAP	#14
0002c16e d2 41                    | A      |		ADD.W	D1,D1
0002c170 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
0002c178 00 56                    | V      |		.CONST	0x56			; [0x0] -> 0x2c1ce
0002c17a 00 62                    | b      |		.CONST	0x62			; [0x1] -> 0x2c1da
0002c17c 00 74                    | t      |		.CONST	0x74			; [0x2] -> 0x2c1ec
0002c17e 00 82                    |        |		.CONST	0x82			; [0x3] -> 0x2c1fa
0002c180 01 e6                    |        |		.CONST	0x1e6			; [0x4] -> 0x2c35e
0002c182 00 8a                    |        |		.CONST	0x8a			; [0x5] -> 0x2c202
0002c184 00 8e                    |        |		.CONST	0x8e			; [0x6] -> 0x2c206
0002c186 00 96                    |        |		.CONST	0x96			; [0x7] -> 0x2c20e
0002c188 00 9e                    |        |		.CONST	0x9e			; [0x8] -> 0x2c216
0002c18a 00 a6                    |        |		.CONST	0xa6			; [0x9] -> 0x2c21e
0002c18c 00 ae                    |        |		.CONST	0xae			; [0xa] -> 0x2c226
0002c18e 00 b6                    |        |		.CONST	0xb6			; [0xb] -> 0x2c22e
0002c190 00 be                    |        |		.CONST	0xbe			; [0xc] -> 0x2c236
0002c192 00 c6                    |        |		.CONST	0xc6			; [0xd] -> 0x2c23e
0002c194 00 ce                    |        |		.CONST	0xce			; [0xe] -> 0x2c246
0002c196 00 d6                    |        |		.CONST	0xd6			; [0xf] -> 0x2c24e
0002c198 00 e0                    |        |		.CONST	0xe0			; [0x10] -> 0x2c258
0002c19a 00 ea                    |        |		.CONST	0xea			; [0x11] -> 0x2c262
0002c19c 00 f4                    |        |		.CONST	0xf4			; [0x12] -> 0x2c26c
0002c19e 00 fe                    |        |		.CONST	0xfe			; [0x13] -> 0x2c276
0002c1a0 01 08                    |        |		.CONST	0x108			; [0x14] -> 0x2c280
0002c1a2 01 12                    |        |		.CONST	0x112			; [0x15] -> 0x2c28a
0002c1a4 01 1c                    |        |		.CONST	0x11c			; [0x16] -> 0x2c294
0002c1a6 01 26                    | &      |		.CONST	0x126			; [0x17] -> 0x2c29e
0002c1a8 01 30                    | 0      |		.CONST	0x130			; [0x18] -> 0x2c2a8
0002c1aa 01 3a                    | :      |		.CONST	0x13a			; [0x19] -> 0x2c2b2
0002c1ac 01 44                    | D      |		.CONST	0x144			; [0x1a] -> 0x2c2bc
0002c1ae 01 4e                    | N      |		.CONST	0x14e			; [0x1b] -> 0x2c2c6
0002c1b0 01 58                    | X      |		.CONST	0x158			; [0x1c] -> 0x2c2d0
0002c1b2 01 62                    | b      |		.CONST	0x162			; [0x1d] -> 0x2c2da
0002c1b4 01 6c                    | l      |		.CONST	0x16c			; [0x1e] -> 0x2c2e4
0002c1b6 01 76                    | v      |		.CONST	0x176			; [0x1f] -> 0x2c2ee
0002c1b8 01 80                    |        |		.CONST	0x180			; [0x20] -> 0x2c2f8
0002c1ba 01 8a                    |        |		.CONST	0x18a			; [0x21] -> 0x2c302
0002c1bc 01 94                    |        |		.CONST	0x194			; [0x22] -> 0x2c30c
0002c1be 01 9e                    |        |		.CONST	0x19e			; [0x23] -> 0x2c316
0002c1c0 01 a8                    |        |		.CONST	0x1a8			; [0x24] -> 0x2c320
0002c1c2 01 b2                    |        |		.CONST	0x1b2			; [0x25] -> 0x2c32a
0002c1c4 01 b8                    |        |		.CONST	0x1b8			; [0x26] -> 0x2c330
0002c1c6 01 c2                    |        |		.CONST	0x1c2			; [0x27] -> 0x2c33a
0002c1c8 01 cc                    |        |		.CONST	0x1cc			; [0x28] -> 0x2c344
0002c1ca 01 d6                    |        |		.CONST	0x1d6			; [0x29] -> 0x2c34e
0002c1cc 01 dc                    |        |		.CONST	0x1dc			; [0x2a] -> 0x2c354
0002c1ce					switch@0x2c170[0x0]:
0002c1ce 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c1d0 4e ba d9 78              |N  x    |		JSR	0x29b4a
0002c1d4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c1d6 60 00 01 94              |`       |		BRA	0x2c36c
0002c1da					switch@0x2c170[0x1]:
0002c1da 42 27                    |B'      |		CLR.B	-(A7)
0002c1dc 48 78 00 01              |Hx      |		PEA.L	0x1
0002c1e0 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002c1e6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002c1e8 60 00 01 82              |`       |		BRA	0x2c36c
0002c1ec					switch@0x2c170[0x2]:
0002c1ec 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c1ee 4e b9 00 01 02 ac        |N       |		JSR	FSCALL_102ac
0002c1f4 4e ba d9 2a              |N  *    |		JSR	0x29b20
0002c1f8 60 da                    |`       |		BRA	0x2c1d4
0002c1fa					switch@0x2c170[0x3]:
0002c1fa 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c1fc 4e ba db 26              |N  &    |		JSR	0x29d24
0002c200 60 d2                    |`       |		BRA	0x2c1d4
0002c202					switch@0x2c170[0x5]:
0002c202 60 00 01 68              |`  h    |		BRA	0x2c36c
0002c206					switch@0x2c170[0x6]:
0002c206 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c208 4e ba de 40              |N  @    |		JSR	0x2a04a
0002c20c 60 c6                    |`       |		BRA	0x2c1d4
0002c20e					switch@0x2c170[0x7]:
0002c20e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c210 4e ba df a4              |N       |		JSR	0x2a1b6
0002c214 60 be                    |`       |		BRA	0x2c1d4
0002c216					switch@0x2c170[0x8]:
0002c216 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c218 4e ba e0 8a              |N       |		JSR	0x2a2a4
0002c21c 60 b6                    |`       |		BRA	0x2c1d4
0002c21e					switch@0x2c170[0x9]:
0002c21e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c220 4e ba e4 76              |N  v    |		JSR	0x2a698
0002c224 60 ae                    |`       |		BRA	0x2c1d4
0002c226					switch@0x2c170[0xa]:
0002c226 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c228 4e ba e4 e6              |N       |		JSR	0x2a710
0002c22c 60 a6                    |`       |		BRA	0x2c1d4
0002c22e					switch@0x2c170[0xb]:
0002c22e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c230 4e ba e5 56              |N  V    |		JSR	0x2a788
0002c234 60 9e                    |`       |		BRA	0x2c1d4
0002c236					switch@0x2c170[0xc]:
0002c236 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c238 4e ba e5 7a              |N  z    |		JSR	0x2a7b4
0002c23c 60 96                    |`       |		BRA	0x2c1d4
0002c23e					switch@0x2c170[0xd]:
0002c23e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c240 4e ba e6 72              |N  r    |		JSR	0x2a8b4
0002c244 60 8e                    |`       |		BRA	0x2c1d4
0002c246					switch@0x2c170[0xe]:
0002c246 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c248 4e ba e7 50              |N  P    |		JSR	0x2a99a
0002c24c 60 86                    |`       |		BRA	0x2c1d4
0002c24e					switch@0x2c170[0xf]:
0002c24e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c250 4e ba e7 74              |N  t    |		JSR	0x2a9c6
0002c254 60 00 ff 7e              |`  ~    |		BRA	0x2c1d4
0002c258					switch@0x2c170[0x10]:
0002c258 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c25a 4e ba e7 b6              |N       |		JSR	0x2aa12
0002c25e 60 00 ff 74              |`  t    |		BRA	0x2c1d4
0002c262					switch@0x2c170[0x11]:
0002c262 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c264 4e ba e7 f8              |N       |		JSR	0x2aa5e
0002c268 60 00 ff 6a              |`  j    |		BRA	0x2c1d4
0002c26c					switch@0x2c170[0x12]:
0002c26c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c26e 4e ba e8 3a              |N  :    |		JSR	0x2aaaa
0002c272 60 00 ff 60              |`  `    |		BRA	0x2c1d4
0002c276					switch@0x2c170[0x13]:
0002c276 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c278 4e ba e8 7c              |N  |    |		JSR	0x2aaf6
0002c27c 60 00 ff 56              |`  V    |		BRA	0x2c1d4
0002c280					switch@0x2c170[0x14]:
0002c280 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c282 4e ba e8 be              |N       |		JSR	0x2ab42
0002c286 60 00 ff 4c              |`  L    |		BRA	0x2c1d4
0002c28a					switch@0x2c170[0x15]:
0002c28a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c28c 4e ba e9 00              |N       |		JSR	0x2ab8e
0002c290 60 00 ff 42              |`  B    |		BRA	0x2c1d4
0002c294					switch@0x2c170[0x16]:
0002c294 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c296 4e ba e9 40              |N  @    |		JSR	0x2abd8
0002c29a 60 00 ff 38              |`  8    |		BRA	0x2c1d4
0002c29e					switch@0x2c170[0x17]:
0002c29e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2a0 4e ba e9 80              |N       |		JSR	0x2ac22
0002c2a4 60 00 ff 2e              |`  .    |		BRA	0x2c1d4
0002c2a8					switch@0x2c170[0x18]:
0002c2a8 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2aa 4e ba e9 c0              |N       |		JSR	0x2ac6c
0002c2ae 60 00 ff 24              |`  $    |		BRA	0x2c1d4
0002c2b2					switch@0x2c170[0x19]:
0002c2b2 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2b4 4e ba ea 00              |N       |		JSR	0x2acb6
0002c2b8 60 00 ff 1a              |`       |		BRA	0x2c1d4
0002c2bc					switch@0x2c170[0x1a]:
0002c2bc 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2be 4e ba ea 40              |N  @    |		JSR	0x2ad00
0002c2c2 60 00 ff 10              |`       |		BRA	0x2c1d4
0002c2c6					switch@0x2c170[0x1b]:
0002c2c6 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2c8 4e ba ea 80              |N       |		JSR	0x2ad4a
0002c2cc 60 00 ff 06              |`       |		BRA	0x2c1d4
0002c2d0					switch@0x2c170[0x1c]:
0002c2d0 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2d2 4e ba ea c0              |N       |		JSR	0x2ad94
0002c2d6 60 00 fe fc              |`       |		BRA	0x2c1d4
0002c2da					switch@0x2c170[0x1d]:
0002c2da 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2dc 4e ba eb 00              |N       |		JSR	0x2adde
0002c2e0 60 00 fe f2              |`       |		BRA	0x2c1d4
0002c2e4					switch@0x2c170[0x1e]:
0002c2e4 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2e6 4e ba eb 3a              |N  :    |		JSR	0x2ae22
0002c2ea 60 00 fe e8              |`       |		BRA	0x2c1d4
0002c2ee					switch@0x2c170[0x1f]:
0002c2ee 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2f0 4e ba eb 76              |N  v    |		JSR	0x2ae68
0002c2f4 60 00 fe de              |`       |		BRA	0x2c1d4
0002c2f8					switch@0x2c170[0x20]:
0002c2f8 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c2fa 4e ba eb a2              |N       |		JSR	0x2ae9e
0002c2fe 60 00 fe d4              |`       |		BRA	0x2c1d4
0002c302					switch@0x2c170[0x21]:
0002c302 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c304 4e ba ec 28              |N  (    |		JSR	0x2af2e
0002c308 60 00 fe ca              |`       |		BRA	0x2c1d4
0002c30c					switch@0x2c170[0x22]:
0002c30c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c30e 4e ba ec 90              |N       |		JSR	0x2afa0
0002c312 60 00 fe c0              |`       |		BRA	0x2c1d4
0002c316					switch@0x2c170[0x23]:
0002c316 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c318 4e ba df ec              |N       |		JSR	0x2a306
0002c31c 60 00 fe b6              |`       |		BRA	0x2c1d4
0002c320					switch@0x2c170[0x24]:
0002c320 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c322 4e ba e0 4c              |N  L    |		JSR	0x2a370
0002c326 60 00 fe ac              |`       |		BRA	0x2c1d4
0002c32a					switch@0x2c170[0x25]:
0002c32a 4e ba e0 16              |N       |		JSR	0x2a342
0002c32e 60 3c                    |`<      |		BRA	0x2c36c
0002c330					switch@0x2c170[0x26]:
0002c330 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c332 4e ba ec de              |N       |		JSR	0x2b012
0002c336 60 00 fe 9c              |`       |		BRA	0x2c1d4
0002c33a					switch@0x2c170[0x27]:
0002c33a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c33c 4e ba ed 56              |N  V    |		JSR	0x2b094
0002c340 60 00 fe 92              |`       |		BRA	0x2c1d4
0002c344					switch@0x2c170[0x28]:
0002c344 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c346 4e ba ed cc              |N       |		JSR	0x2b114
0002c34a 60 00 fe 88              |`       |		BRA	0x2c1d4
0002c34e					switch@0x2c170[0x29]:
0002c34e 4e ba ee 88              |N       |		JSR	0x2b1d8
0002c352 60 18                    |`       |		BRA	0x2c36c
0002c354					switch@0x2c170[0x2a]:
0002c354 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c356 4e ba ee a0              |N       |		JSR	0x2b1f8
0002c35a 60 00 fe 78              |`  x    |		BRA	0x2c1d4
0002c35e					switch@0x2c170[0x4]:
0002c35e 2e 6d 00 08              |.m      |		MOVEA.L	(A5+0x8),A7
0002c362 3c 7c 00 00              |<|      |		MOVEA.W	#0x0,A6
0002c366 4e f9 00 02 c5 76        |N    v  |		JMP	0x2c576
0002c36c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002c36e 4e ba c8 e8              |N       |		JSR	0x28c58
0002c372 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c374 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002c376 2f 06                    |/       |		MOVE.L	D6,-(A7)
0002c378 9f 97                    |        |		SUB.L	D7,(A7)
0002c37a 4e ba ce 72              |N  r    |		JSR	0x291ee
0002c37e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c380 26 87                    |&       |		MOVE.L	D7,(A3)
0002c382 4a 2e ff f4              |J.      |		TST.B	(A6-0xc)
0002c386 67 00 fd 1c              |g       |		BEQ	0x2c0a4
0002c38a 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002c38e 4e 5e                    |N^      |		UNLK	A6
0002c390 4e 75                    |Nu      |		RTS
0002c392 ; --------------------------------------------------------------------------------------
0002c392 ; OMSI PASCAL Function
0002c392 ; --------------------------------------------------------------------------------------
0002c392					START:
0002c392 4f fa 00 08              |O       |		LEA.L	MAIN,A7
0002c396 4e f9 00 01 02 80        |N       |		JMP	?start_program
0002c39c					MAIN:
0002c39c 23 fc 00 00 00 01 00 02  |#       |		MOVE.L	#0x1,0x2f212
0002c3a4 f2 12                    |        |
0002c3a6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c3a8 4e b9 00 01 03 c4        |N       |		JSR	GetArgv() : String
0002c3ae 23 df 00 02 f2 16        |#       |		MOVE.L	(A7)+,0x2f216
0002c3b4 48 79 00 02 f1 f0        |Hy      |		PEA.L	0x2f1f0
0002c3ba 4e b9 00 02 85 a0        |N       |		JSR	0x285a0
0002c3c0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c3c2 20 79 00 02 f2 16        | y      |		MOVEA.L	0x2f216,A0
0002c3c8 4a 50                    |JP      |		TST.W	(A0)
0002c3ca 6f 68                    |oh      |		BLE	0x2c434
0002c3cc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c3ce 20 4f                    | O      |		MOVEA.L	A7,A0
0002c3d0 43 fa c5 de              |C       |		LEA.L	0x289b0,A1
0002c3d4 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002c3d6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002c3d8 51 c8 ff fc              |Q       |		DBF	D0,0x2c3d6
0002c3dc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c3de 20 4f                    | O      |		MOVEA.L	A7,A0
0002c3e0 43 fa c5 d6              |C       |		LEA.L	0x289b8,A1
0002c3e4 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002c3e6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002c3e8 51 c8 ff fc              |Q       |		DBF	D0,0x2c3e6
0002c3ec 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c3ee 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
0002c3f2 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c3f6 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
0002c3fa 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c400 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c402 2e b9 00 02 f2 16        |.       |		MOVE.L	0x2f216,(A7)
0002c408 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c40a 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
0002c40e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c412 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
0002c416 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c41c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c41e 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
0002c424 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002c428 23 df 00 02 f2 16        |#       |		MOVE.L	(A7)+,0x2f216
0002c42e de fc 00 10              |        |		ADDA.W	#0x10,A7
0002c432 60 3a                    |`:      |		BRA	0x2c46e
0002c434 48 79 00 02 f2 16        |Hy      |		PEA.L	0x2f216
0002c43a 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002c440 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c442 20 4f                    | O      |		MOVEA.L	A7,A0
0002c444 43 fa c5 7a              |C  z    |		LEA.L	0x289c0,A1
0002c448 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002c44a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002c44c 51 c8 ff fc              |Q       |		DBF	D0,0x2c44a
0002c450 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c452 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002c456 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c45a 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
0002c45e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c464 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c466 23 df 00 02 f2 16        |#       |		MOVE.L	(A7)+,0x2f216
0002c46c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c46e 13 fc 00 01 00 02 f2 20  |        |		MOVE.B	#0x01,0x2f220
0002c476 4a 39 00 02 f2 20        |J9      |		TST.B	0x2f220
0002c47c 67 0a                    |g       |		BEQ	0x2c488
0002c47e 42 39 00 02 f2 20        |B9      |		CLR.B	0x2f220
0002c484 60 00 00 b0              |`       |		BRA	0x2c536
0002c488 41 f9 00 02 f1 fa        |A       |		LEA.L	0x2f1fa,A0
0002c48e 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002c490 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002c492 51 c8 ff fc              |Q       |		DBF	D0,0x2c490
0002c496 3f 3a c5 30              |?: 0    |		MOVE.W	0x289c8,-(A7)
0002c49a 9e fc 00 0c              |        |		SUBA.W	#0xc,A7
0002c49e 48 6f 00 0e              |Ho      |		PEA.L	(A7+0xe)
0002c4a2 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c4a6 3f 3c 00 0a              |?<      |		MOVE.W	#0xa,-(A7)
0002c4aa 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c4b0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c4b2 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
0002c4b6 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c4ba 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
0002c4be 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c4c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c4c6 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002c4cc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c4ce 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
0002c4d4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c4d6 23 df 00 02 f2 1c        |#       |		MOVE.L	(A7)+,0x2f21c
0002c4dc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c4de 2e b9 00 02 f2 1c        |.       |		MOVE.L	0x2f21c,(A7)
0002c4e4 4e ba ca 0c              |N       |		JSR	0x28ef2
0002c4e8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002c4ea 3e ba c4 de              |>       |		MOVE.W	0x289ca,(A7)
0002c4ee 3f 3a c4 dc              |?:      |		MOVE.W	0x289cc,-(A7)
0002c4f2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c4f4 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
0002c4f8 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c4fc 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
0002c500 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c506 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c508 2e b9 00 02 f2 1c        |.       |		MOVE.L	0x2f21c,(A7)
0002c50e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c510 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
0002c514 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c518 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
0002c51c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c522 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c524 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
0002c52a de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002c52e 23 df 00 02 f2 16        |#       |		MOVE.L	(A7)+,0x2f216
0002c534 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c536 42 39 00 02 f2 1a        |B9      |		CLR.B	0x2f21a
0002c53c 23 fc 00 00 00 01 00 02  |#       |		MOVE.L	#0x1,0x2f1e8
0002c544 f1 e8                    |        |
0002c546 42 b9 00 02 f1 ec        |B       |		CLR.L	0x2f1ec
0002c54c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c54e 2f 39 00 02 f2 16        |/9      |		MOVE.L	0x2f216,-(A7)
0002c554 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
0002c55a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c55c 4e ba d5 06              |N       |		JSR	0x29a64
0002c560 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c562 20 39 00 02 f1 e8        | 9      |		MOVE.L	0x2f1e8,D0
0002c568 b0 b9 00 02 f1 ec        |        |		CMP.L	0x2f1ec,D0
0002c56e 6e 06                    |n       |		BGT	0x2c576
0002c570 4e ba fb 0e              |N       |		JSR	0x2c080
0002c574 60 ec                    |`       |		BRA	0x2c562
0002c576 48 79 00 02 f2 16        |Hy      |		PEA.L	0x2f216
0002c57c 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002c582 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c584 60 00 fe f0              |`       |		BRA	0x2c476
0002c588 4e b9 00 01 02 84        |N       |		.XXX[0x6]
0002c58e 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
0002c59c ; --------------------------------------------------------------------------------------
0002c59c ; OMSI PASCAL Function
0002c59c ;    <LVAR  0x008 1(r)>
0002c59c ; --------------------------------------------------------------------------------------
0002c59c					PROG_FAIL:
0002c59c 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
0002c5a0 bf d5                    |        |		CMPA.L	(A5),A7
0002c5a2 62 06                    |b       |		BHI	0x2c5aa
0002c5a4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002c5a8 4e 76                    |Nv      |		TRAPV
0002c5aa de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
0002c5ae 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002c5b2 41 fa ff e8              |A       |		LEA.L	PROG_FAIL,A0
0002c5b6 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002c5b8 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002c5ba 51 c8 ff fc              |Q       |		DBF	D0,0x2c5b8
0002c5be 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
0002c5c2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c5c4 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
0002c5c8 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002c5cc 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
0002c5d0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002c5d6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c5d8 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
0002c5dc 48 80                    |H       |		EXTB.W	D0
0002c5de 48 c0                    |H       |		EXTW.L	D0
0002c5e0 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002c5e2 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
0002c5e8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c5ea 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002c5f0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c5f2 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002c5f8 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002c5fc 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
0002c600 4e 5e                    |N^      |		UNLK	A6
0002c602 4e 75                    |Nu      |		RTS
0002c604 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_ '
0002c612 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_ '
0002c620 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_ '
0002c62e 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
0002c640 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error. '
0002c658 ; --------------------------------------------------------------------------------------
0002c658 ; OMSI PASCAL Function
0002c658 ;    <LVAR  0x00e 1(r)>
0002c658 ;    <LVAR  0x00a 4(r)>
0002c658 ;    <LVAR  0x008 1(r)>
0002c658 ; --------------------------------------------------------------------------------------
0002c658					EXP_FAIL:
0002c658 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
0002c65c bf d5                    |        |		CMPA.L	(A5),A7
0002c65e 62 06                    |b       |		BHI	0x2c666
0002c660 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002c664 4e 76                    |Nv      |		TRAPV
0002c666 de fc 00 74              |   t    |		ADDA.W	#0x74,A7
0002c66a 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
0002c66e 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002c674 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
0002c67a 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002c67c 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
0002c67e 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
0002c680 78 12                    |x       |		MOVEQ.L	#0x12,D4
0002c682 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
0002c684 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
0002c68a 41 fa ff b4              |A       |		LEA.L	0x2c640,A0
0002c68e 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002c690 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002c692 51 c8 ff fc              |Q       |		DBF	D0,0x2c690
0002c696 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c698 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002c69c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002c69e 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002c6a0 4e 93                    |N       |		JSR	(A3)
0002c6a2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c6a4 4e 94                    |N       |		JSR	(A4)
0002c6a6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c6a8 20 4f                    | O      |		MOVEA.L	A7,A0
0002c6aa 43 fa ff 58              |C  X    |		LEA.L	0x2c604,A1
0002c6ae 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002c6b0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002c6b2 51 c8 ff fc              |Q       |		DBF	D0,0x2c6b0
0002c6b6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c6b8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002c6bc 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002c6be 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002c6c0 4e 93                    |N       |		JSR	(A3)
0002c6c2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002c6c4 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
0002c6c8 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
0002c6ce 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002c6d0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002c6d6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c6d8 4e 94                    |N       |		JSR	(A4)
0002c6da de c4                    |        |		ADDA.W	D4,A7
0002c6dc 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
0002c6e0 b0 c1                    |        |		CMPA.W	D1,A0
0002c6e2 67 48                    |gH      |		BEQ	0x2c72c
0002c6e4 9e c5                    |        |		SUBA.W	D5,A7
0002c6e6 22 4f                    |"O      |		MOVEA.L	A7,A1
0002c6e8 45 fa ff 28              |E  (    |		LEA.L	0x2c612,A2
0002c6ec 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002c6ee 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002c6f0 51 c8 ff fc              |Q       |		DBF	D0,0x2c6ee
0002c6f4 9e c3                    |        |		SUBA.W	D3,A7
0002c6f6 22 4f                    |"O      |		MOVEA.L	A7,A1
0002c6f8 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
0002c6fc 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
0002c6fe 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002c700 51 c8 ff fc              |Q       |		DBF	D0,0x2c6fe
0002c704 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c706 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
0002c70a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002c70c 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002c70e 4e 93                    |N       |		JSR	(A3)
0002c710 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002c712 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
0002c716 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002c718 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002c71a 4e 93                    |N       |		JSR	(A3)
0002c71c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c71e 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002c724 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c726 4e 94                    |N       |		JSR	(A4)
0002c728 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
0002c72c 9e c5                    |        |		SUBA.W	D5,A7
0002c72e 20 4f                    | O      |		MOVEA.L	A7,A0
0002c730 43 fa fe ee              |C       |		LEA.L	0x2c620,A1
0002c734 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002c736 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002c738 51 c8 ff fc              |Q       |		DBF	D0,0x2c736
0002c73c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002c73e 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002c742 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002c744 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002c746 4e 93                    |N       |		JSR	(A3)
0002c748 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002c74a 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
0002c74e 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
0002c754 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002c756 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002c75c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c75e 4e 94                    |N       |		JSR	(A4)
0002c760 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002c762 20 4f                    | O      |		MOVEA.L	A7,A0
0002c764 43 fa fe da              |C       |		LEA.L	0x2c640,A1
0002c768 70 16                    |p       |		MOVEQ.L	#0x16,D0
0002c76a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002c76c 51 c8 ff fc              |Q       |		DBF	D0,0x2c76a
0002c770 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
0002c774 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002c776 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002c77a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002c77c 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
0002c780 4e 93                    |N       |		JSR	(A3)
0002c782 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002c784 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002c78a de c3                    |        |		ADDA.W	D3,A7
0002c78c 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002c790 4e 5e                    |N^      |		UNLK	A6
0002c792 4e 75                    |Nu      |		RTS