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

⟦23b982ee6⟧ M200

    Length: 13312 (0x3400)
    Types: M200
    Notes: M200_PROGRAM
    Names: »EMWCSP.M200«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »EMWCSP.M200« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »EMWCSP.M200« 
    └─ ⟦this⟧ »EMWCSP.M200« 

Disassembly

0x20aec


@ 20aec
        <LVAR  0x016 1(r)>
        <LVAR  0x012 4(r)>
        <LVAR  0x010 1(r)>
        <LVAR  0x00e 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @>
    <POP 20aec-20bb4 Body>                                   Δ+10       
        <POP 20aec-20b02 Prologue>                           Σ0         ↓
        <POP 20b02-20b0a RegCacheLoad>                       Σ0         ↓
        <POP 20b0a-20b2a Naked>                              Σ0         ↓ →0x20b38
            <Call 0x20b0a 0x10538>                                              {}
                IPC_Init(void)
            <MI 20b10  MOVE.L  (A6+0x12),-(A7)>              Δ-4                {[4, '(A6+0x12)']}
            <Call 0x20b14 0x10508>                                              {[4, '(A6+0x12)']}
                IPC_PutString(a : String)
            <POP 20b1a-20b1c StackAdj>                       Δ+2                {[-2-]}
            <MI 20b1c  MOVE.B  (A6+0x10),(A7)>                                  {[-2-]}
            <Call 0x20b20 0x10502>                                              {[-2-]}
                IPC_PutBool(a : Bool)
            <POP 20b22-20b24 StackAdj>                       Δ+2                {}
            <MI 20b24  TST.B   (A6+0x16)>                                       {}
            <MI 20b28  BNE     0x20b38>                                         {}
        <POP 20b2a-20b38 Naked>                              Σ0         ↓
            <MI 20b2a  MOVE.B  (A6+0xe),-(A7)>               Δ-2                {[2, '(A6+0xe)']}
            <Call 0x20b2e 0x10502>                                              {[2, '(A6+0xe)']}
                IPC_PutBool(a : Bool)
            <MI 20b30  MOVE.B  (A6+0xc),(A7)>                                   {[-2-]}
            <Call 0x20b34 0x10502>                                              {[-2-]}
                IPC_PutBool(a : Bool)
            <POP 20b36-20b38 StackAdj>                       Δ+2                {}
        <POP 20b38-20b44 Naked>                              Σ0         ↓ →0x20b56 ←0x20b0a
            <Call 0x20b38 0x10514>                                              {}
                IPC_PutEnd(void)
            <MI 20b3e  TST.B   (A6+0x16)>                                       {}
            <MI 20b42  BEQ     0x20b56>                                         {}
        <POP 20b44-20b56 Naked>                              Σ0 Δ-10    →0x20b66
            <Blob 0x20b44 [10] @>                            Δ-10               {[«10""»]}
            <MI 20b54  BRA     0x20b66>                                         {[«10""»]}
        <POP 20b56-20b66 Naked>                              Σ0 Δ-10    ↓ ←0x20b38
            <Blob 0x20b56 [10] @>                            Δ-10               {[«10""»]}
        <POP 20b66-20bac Naked>                              Σ-10 Δ+10  ↓ ←0x20b44
            <POP 20b66-20b68 StackAdj>                       Δ-4                {[-14-]}
            <Lit 0x20b68>                                                       {[-10-]|[$$…]}
                <Pointer.sp 0x20b68 4>                       Δ-4        
                <Const 0x20b6c 0x1.2>                        Δ-2        
                <Const 0x20b70 0x9.2>                        Δ-2        
                <Call 0x20b74 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20b7a-20b7c StackAdj>                   Δ+8        
            <Const 0x20b7c 0x1.4>                            Δ-4                {[-10-]|[$$…]|[##1]}
            <Const 0x20b80 0x2.2>                            Δ-2                {[-10-]|[$$…]|[##1]|[#2]}
            <Pointer.fp 0x20b84 <LVAR -0x004 @>>             Δ-4                {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
            <Call 0x20b88 0x103b0>                                              {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
                PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
            <POP 20b8e-20b92 StackAdj>                       Δ+24               {}
            <Call 0x20b92 0x10538>                                              {}
                IPC_Init(void)
            <MI 20b98  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20b9c  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20b9e 0x10526>                                              {[4, '^(A0)']}
                IPC_GetBool() : Bool
            <POP 20ba4-20ba6 StackAdj>                       Δ+4                {}
            <Call 0x20ba6 0x1051a>                                              {}
                IPC_GetEnd(void)
        <POP 20bac-20bb4 Epilogue>                           Σ0         

0x20bb4


@ 20bb4
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x00e @ 4(rw)>
        <LVAR -0x40e @ 2(r)>
        <LVAR -0x410 @>
    <POP 20bb4-20d2e Body>                                              
        <POP 20bb4-20bca Prologue>                           Σ0         ↓
        <POP 20bca-20bde RegCacheLoad>                       Σ0         ↓
        <POP 20bde-20ccc Naked>                              Σ0         ↓ →0x20d02
            <Blob 0x20bde [10] @>                            Δ-10               {[«10""»]}
            <POP 20bea-20bec StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x20bec 10>                                                    {[«10""»]|[$$LAST_UCODE]}
            <MI 20c00  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {[«10""»]}
            <POP 20c04-20c08 StackAdj>                       Δ+10               {}
            <Const 0x20c08 0x23370.4>                        Δ-4                {[##144240]}
            <Call 0x20c0a 0x102b8>                                              {[##144240]}
                NewString(VAR a : String)
            <MI 20c10  MOVE.L  (A6-0xe),(A7)>                                   {[4, '(A6-0xe)']}
            <MI 20c14  CLR.B   -(A7)>                        Δ-2                {[4, '(A6-0xe)']|[#0]}
            <Const 0x20c16 0x2.2>                            Δ-2                {[4, '(A6-0xe)']|[#0]|[#2]}
            <Const 0x20c18 0x0.4>                            Δ-4                {[4, '(A6-0xe)']|[#0]|[#2]|[##0]}
            <Pointer.fp 0x20c1c <LVAR -0x410 @>>             Δ-4                {[4, '(A6-0xe)']|[#0]|[#2]|[##0]|[@@-1040]}
            <Pointer.fp 0x20c1e <LVAR -0x00a @ 4(r)>>        Δ-4                {[4, '(A6-0xe)']|[#0]|[#2]|[##0]|[@@-1040]|[@@-10]}
            <Call 0x20c22 0x10380>                                              {[4, '(A6-0xe)']|[#0]|[#2]|[##0]|[@@-1040]|[@@-10]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 20c28-20c2a StackAdj>                       Δ+16               {[4, '(A6-0xe)']}
            <MI 20c2a  MOVE.L  (A6-0xa),(A7)>                                   {[4, '(A6-0xa)']}
            <MI 20c2e  CLR.W   -(A7)>                        Δ-2                {[4, '(A6-0xa)']|[#0]}
            <MI 20c30  CLR.W   -(A7)>                        Δ-2                {[4, '(A6-0xa)']|[#0]|[#0]}
            <Const 0x20c32 0x40.2>                           Δ-2                {[4, '(A6-0xa)']|[#0]|[#0]|[#64]}
            <Const 0x20c36 0x2.2>                            Δ-2                {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]}
            <Blob 0x20c38 [4] 0x23370>                       Δ-4                {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]|[«4»]}
            <Pointer.fp 0x20c3a <LVAR -0x410 @>>             Δ-4                {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]|[«4»]|[@@-1040]}
            <Call 0x20c3c 0x10384>                                              {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]|[«4»]|[@@-1040]}
                ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
            <POP 20c42-20c46 StackAdj>                       Δ+18               {[-2-]}
            <MI 20c46  CLR.B   (A7)>                                            {[-2-]}
            <Const 0x20c48 0x2.2>                            Δ-2                {[-2-]|[#2]}
            <Const 0x20c4a 0x1.4>                            Δ-4                {[-2-]|[#2]|[##1]}
            <Pointer.fp 0x20c4e <LVAR -0x410 @>>             Δ-4                {[-2-]|[#2]|[##1]|[@@-1040]}
            <Pointer.fp 0x20c50 <LVAR -0x00a @ 4(r)>>        Δ-4                {[-2-]|[#2]|[##1]|[@@-1040]|[@@-10]}
            <Call 0x20c54 0x1038c>                                              {[-2-]|[#2]|[##1]|[@@-1040]|[@@-10]}
                CloseFile(a : L; VAR status : B; VAR file : File)
            <POP 20c5a-20c5c StackAdj>                       Δ+16               {}
            <Pointer.fp 0x20c5c <LVAR -0x00e @ 4(rw)>>       Δ-4                {[@@-14]}
            <Call 0x20c60 0x102bc>                                              {[@@-14]}
                FreeString(VAR a : String)
            <POP 20c66-20c67 StackAdj>                       Δ+4                {}
            <Blob 0x20c67 [4] 0x23370>                       Δ-4                {[«4»]}
            <MI 20c68  CLR.B   -(A7)>                        Δ-2                {[«4»]|[#0]}
            <Const 0x20c6a 0x2.2>                            Δ-2                {[«4»]|[#0]|[#2]}
            <Const 0x20c6c 0x0.4>                            Δ-4                {[«4»]|[#0]|[#2]|[##0]}
            <Pointer.fp 0x20c70 <LVAR -0x410 @>>             Δ-4                {[«4»]|[#0]|[#2]|[##0]|[@@-1040]}
            <Const 0x20c72 0x23374.4>                        Δ-4                {[«4»]|[#0]|[#2]|[##0]|[@@-1040]|[##144244]}
            <Call 0x20c74 0x10380>                                              {[«4»]|[#0]|[#2]|[##0]|[@@-1040]|[##144244]}
                OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
            <POP 20c7a-20c7c StackAdj>                       Δ+16               {[«4»]}
            <POP 20c7c-20c7d StackAdj>                       Δ+4                {}
            <Blob 0x20c7d [4] 0x23374>                       Δ-4                {[«4»]}
            <MI 20c7e  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#0]}
            <MI 20c80  CLR.W   -(A7)>                        Δ-2                {[«4»]|[#0]|[#0]}
            <Const 0x20c82 0x200.2>                          Δ-2                {[«4»]|[#0]|[#0]|[#512]}
            <Const 0x20c86 0x2.2>                            Δ-2                {[«4»]|[#0]|[#0]|[#512]|[#2]}
            <MI 20c88  LEA.L   (A6-0x40e),A0>                                   {[«4»]|[#0]|[#0]|[#512]|[#2]}
            <MI 20c8c  MOVE.L  A0,-(A7)>                     Δ-4                {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']}
            <Pointer.fp 0x20c8e <LVAR -0x410 @>>             Δ-4                {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-1040]}
            <Call 0x20c90 0x10384>                                              {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-1040]}
                ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
            <POP 20c96-20c9a StackAdj>                       Δ+20               {}
            <MI 20c9a  MOVEA.L 0x23374,A0>                                      {}
            <MI 20c9c  MOVE.W  (A0+0x20),D7>                                    {}
            <MI 20ca0  MOVE.W  (A6-0x40e),D6>                                   {}
            <MI 20ca4  CLR.L   D0>                                              {}
            <MI 20ca6  MOVE.W  D7,D0>                                           {}
            <MI 20ca8  SUBQ.L  #0x1,D0>                                         {}
            <MI 20caa  SUBI.L  #0x00000028,D0>                                  {}
            <MI 20cb0  MOVE.L  D0,D4>                                           {}
            <MI 20cb2  MOVEQ.L #0x01,D3>                                        {}
            <Call 0x20cb4 0x10294>                                              {}
                ?divs_d3_d4
            <MI 20cba  ASL.L   #0x5,D4>                                         {}
            <POP 0x20cbc LimitCheck 0x0 ≤ D4 ≤ 0xffff>                          {}
            <MI 20cc6  MOVE.W  D4,D5>                                           {}
            <MI 20cc8  CMP.W   D5,D6>                                           {}
            <MI 20cca  BEQ     0x20d02>                                         {}
        <POP 20ccc-20d02 Naked>                              Σ0         ↓
            <Blob 0x20ccc [34] @>                            Δ-34               {[«34""»]}
            <Const 0x20cde 0xe.2>                            Δ-2                {[«34""»]|[#14]}
            <POP 20ce2-20ce4 StackAdj>                       Δ-4                {[«34""»]|[#14]|[-4-]}
            <Lit 0x20ce4 33>                                                    {[«34""»]|[#14]|[$$Inconsistent microcode file size.]}
            <Call 0x20cf8 0x103b8>                                              {[«34""»]|[#14]|[$$Inconsistent microcode file size.]}
                PopProgram(status : Byte; msg : String)
            <POP 20cfe-20d02 StackAdj>                       Δ+40               {}
        <POP 20d02-20d26 Naked>                              Σ0         ↓ ←0x20bde
            <MI 20d02  MOVE.W  #0x100,0x23378>                                  {}
            <MI 20d0a  CLR.L   D0>                                              {}
            <MI 20d0c  MOVE.W  D6,D0>                                           {}
            <MI 20d0e  ADDI.L  #0x00000100,D0>                                  {}
            <MI 20d14  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x20d16 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 20d20  MOVE.W  D0,0x2337a>                                      {}
        <POP 20d26-20d2e Epilogue>                           Σ0         

0x20d2e


@ 20d2e
        <LVAR  0x012 1(rw)>
        <LVAR  0x008 2(r)>
    <POP 20d2e-20d80 Body>                                              
        <POP 20d2e-20d44 Prologue>                           Σ0         ↓
        <POP 20d44-20d74 Naked>                              Σ0         ↓ →0x20d78
            <MI 20d44  CLR.B   (A6+0x12)>                                       {}
            <MI 20d48  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 20d4c  LSR.W   #0x4,D0>                                         {}
            <POP 0x20d4e LimitCheck 0x0 ≤ D0 ≤ 0x3>                             {}
            <MI 20d52  ASL.W   #0x1,D0>                                         {}
            <MI 20d54  CLR.L   D1>                                              {}
            <MI 20d56  MOVE.W  D0,D1>                                           {}
            <MI 20d58  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 20d5c  ANDI.W  #0x000f,D0>                                      {}
            <MI 20d60  ASL.W   #0x1,D0>                                         {}
            <MI 20d62  CLR.L   D2>                                              {}
            <MI 20d64  MOVE.W  D0,D2>                                           {}
            <MI 20d66  LEA.L   0x2077c,A0>                                      {}
            <MI 20d6a  MOVE.W  (A6+D1.L+#0xa),D0>                               {}
            <MI 20d6e  AND.W   (A0+D2.L),D0>                                    {}
            <MI 20d72  BEQ     0x20d78>                                         {}
        <POP 20d74-20d78 Naked>                              Σ0         ↓
            <MI 20d74  ADDQ.B  #0x1,(A6+0x12)>                                  {}
        <POP 20d78-20d80 Epilogue>                           Σ0         ←0x20d44

0x20d80


@ 20d80
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 2(r)>
    <POP 20d80-20dda Body>                                              
        <POP 20d80-20d96 Prologue>                           Σ0         ↓
        <POP 20d96-20dd2 Naked>                              Σ0         ↓
            <MI 20d96  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 20d9a  LSR.W   #0x4,D0>                                         {}
            <MI 20d9c  CLR.L   D1>                                              {}
            <MI 20d9e  MOVE.W  D0,D1>                                           {}
            <MI 20da0  MOVE.L  D1,D7>                                           {}
            <MI 20da2  MOVEA.L (A6+0xa),A0>                                     {}
            <POP 0x20da6 LimitCheck 0x0 ≤ D7 ≤ 0x3>                             {}
            <MI 20db0  MOVE.L  D7,D0>                                           {}
            <MI 20db2  ASL.L   #0x1,D0>                                         {}
            <MI 20db4  MOVE.W  (A6+0x8),D1>                                     {}
            <MI 20db8  ANDI.W  #0x000f,D1>                                      {}
            <MI 20dbc  ASL.W   #0x1,D1>                                         {}
            <MI 20dbe  CLR.L   D2>                                              {}
            <MI 20dc0  MOVE.W  D1,D2>                                           {}
            <MI 20dc2  LEA.L   0x2077c,A1>                                      {}
            <MI 20dc6  MOVE.W  (A1+D2.L),D1>                                    {}
            <MI 20dca  OR.W    (A0+D0.L),D1>                                    {}
            <MI 20dce  MOVE.W  D1,(A0+D0.L)>                                    {}
        <POP 20dd2-20dda Epilogue>                           Σ0         

0x20dda


@ 20dda
        <LVAR  0x010 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 20dda-20e2e Body>                                              
        <POP 20dda-20df0 Prologue>                           Σ0         ↓
        <POP 20df0-20df4 Naked>                              Σ0         ↓
            <MI 20df0  MOVEQ.L #0x00,D7>                                        {}
            <MI 20df2  MOVEQ.L #0x00,D6>                                        {}
        <POP 20df4-20e16 Naked>                              Σ0         ↓ →0x20e18 ←0x20e18
            <POP 20df4-20df6 StackAdj>                       Δ-2                {[-2-]}
            <MI 20df6  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-2-]|[4, '(A6+0xc)']}
            <MI 20dfa  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 0x20dfe LimitCheck 0x0 ≤ D6 ≤ 0xffff>                          {[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <MI 20e08  MOVE.W  D6,-(A7)>                     Δ-2                {[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[2, 'D6']}
            <Call 0x20e0a 0x20d2e>                                              {[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[2, 'D6']}
            <POP 20e0e-20e12 StackAdj>                       Δ+10               {[-2-]}
            <MI 20e12  TST.B   (A7)+>                        Δ+2                {}
            <MI 20e14  BEQ     0x20e18>                                         {}
        <POP 20e16-20e18 Naked>                              Σ0         ↓
            <MI 20e16  ADDQ.L  #0x1,D7>                                         {}
        <POP 20e18-20e22 Naked>                              Σ0         ↓ →0x20df4 ←0x20df4
            <MI 20e18  ADDQ.L  #0x1,D6>                                         {}
            <MI 20e1a  CMPI.L  #0x0000003f,D6>                                  {}
            <MI 20e20  BLE     0x20df4>                                         {}
        <POP 20e22-20e26 Naked>                              Σ0         ↓
            <MI 20e22  MOVE.L  D7,(A6+0x10)>                                    {}
        <POP 20e26-20e2e Epilogue>                           Σ0         

0x20e2e


@ 20e2e
        <LVAR  0x048 4(r)>
        <LVAR  0x044 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 20e2e-20ee0 Body>                                              
        <POP 20e2e-20e44 Prologue>                           Σ0         ↓
        <POP 20e44-20e4a RegCacheLoad>                       Σ0         ↓
        <POP 20e4a-20e5a Naked>                              Σ0         ↓
            <MI 20e4a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20e4c  LEA.L   0x2079c,A1>                                      {}
            <BlockMove 8,A1,A0>                                                 {}
            <MI 20e58  MOVEQ.L #0x10,D7>                                        {}
        <POP 20e5a-20e74 Naked>                              Σ0         ↓ →0x20ea2 ←0x20ea2
            <MI 20e5a  MOVE.L  D7,D0>                                           {}
            <MI 20e5c  SUB.L   #0x10,D0>                                        {}
            <POP 0x20e5e LimitCheck 0x0 ≤ D0 ≤ 0x2f>                            {}
            <MI 20e68  CLR.L   D1>                                              {}
            <MI 20e6a  MOVE.B  (A6+D0.L+#0x14),D1>                              {}
            <MI 20e6e  CMPI.W  #0x0040,D1>                                      {}
            <MI 20e72  BEQ     0x20ea2>                                         {}
        <POP 20e74-20e8c Naked>                              Σ0         ↓ →0x20ea2
            <POP 20e74-20e76 StackAdj>                       Δ-2                {[-2-]}
            <MI 20e76  MOVE.L  (A6+0x48),-(A7)>              Δ-4                {[-2-]|[4, '(A6+0x48)']}
            <MI 20e7a  MOVE.L  (A6+0x44),-(A7)>              Δ-4                {[-2-]|[4, '(A6+0x48)']|[4, '(A6+0x44)']}
            <MI 20e7e  MOVE.W  D1,-(A7)>                     Δ-2                {[-2-]|[4, '(A6+0x48)']|[4, '(A6+0x44)']|[2, 'D1']}
            <Call 0x20e80 0x20d2e>                                              {[-2-]|[4, '(A6+0x48)']|[4, '(A6+0x44)']|[2, 'D1']}
            <POP 20e84-20e88 StackAdj>                       Δ+10               {[-2-]}
            <MI 20e88  TST.B   (A7)+>                        Δ+2                {}
            <MI 20e8a  BEQ     0x20ea2>                                         {}
        <POP 20e8c-20ea2 Naked>                              Σ0         ↓
            <MI 20e8c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20e8e  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <POP 0x20e90 LimitCheck 0x0 ≤ D7 ≤ 0xffff>                          {[4, '^(A0)']}
            <MI 20e9a  MOVE.W  D7,-(A7)>                     Δ-2                {[4, '^(A0)']|[2, 'D7']}
            <Call 0x20e9c 0x20d80>                                              {[4, '^(A0)']|[2, 'D7']}
            <POP 20ea0-20ea2 StackAdj>                       Δ+6                {}
        <POP 20ea2-20eac Naked>                              Σ0         ↓ →0x20e5a ←0x20e5a ←0x20e74
            <MI 20ea2  ADDQ.L  #0x1,D7>                                         {}
            <MI 20ea4  CMPI.L  #0x0000003f,D7>                                  {}
            <MI 20eaa  BLE     0x20e5a>                                         {}
        <POP 20eac-20ed8 Naked>                              Σ0         ↓
            <MI 20eac  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 20eae-20eb0 StackAdj>                       Δ-16               {[-16-]}
            <MI 20eb0  MOVEA.L A7,A1>                                           {[-16-]}
            <MI 20eb2  MOVEA.L A0,A2>                                           {[-16-]}
            <BlockMove 8,A2,A1>                                                 {[-16-]}
            <MI 20ebc  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-16-]|[4, '(A6+0x10)']}
            <MI 20ec0  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-16-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <Call 0x20ec4 0x10340>                                              {[-16-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
                BitXor(a, b : Quad) : Quad
            <POP 20eca-20ecc StackAdj>                       Δ+16               {[-8-]}
            <MI 20ecc  MOVEA.L A7,A1>                                           {[-8-]}
            <BlockMove 8,A1,A0>                                                 {[-8-]}
            <POP 20ed6-20ed8 StackAdj>                       Δ+8                {}
        <POP 20ed8-20ee0 Epilogue>                           Σ0         

0x20ee0


@ 20ee0
        <LVAR  0x02c 4(w)>
        <LVAR  0x028 4(w)>
        <LVAR  0x01c 4(r)>
        <LVAR  0x018 4(r)>
        <LVAR -0x006 4(r)>
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x00b 1(r)>
        <LVAR -0x00c 1(r)>
        <LVAR -0x00d 1(r)>
        <LVAR -0x00e 1(r)>
        <LVAR -0x00f 1(r)>
        <LVAR -0x010 1(r)>
        <LVAR -0x011 1(r)>
        <LVAR -0x012 @ 1(r)>
        <LVAR -0x013 1(w)>
        <LVAR -0x014 1(w) 2(r)>
    <POP 20ee0-20fa6 Body>                                              
        <POP 20ee0-20ef6 Prologue>                           Σ0         ↓
        <POP 20ef6-20ef8 RegCacheLoad>                       Σ0         ↓
        <POP 20ef8-20f9e Naked>                              Σ0         ↓
            <MI 20ef8  MOVE.L  (A6+0x1c),-(A7)>              Δ-4                {[4, '(A6+0x1c)']}
            <MI 20efc  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']}
            <Pointer.fp 0x20f00 <LVAR -0x012 @ 1(r)>>        Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-18]}
            <Const 0x20f04 0x0.4>                            Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-18]|[##0]}
            <Const 0x20f08 0x7.4>                            Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-18]|[##0]|[##7]}
            <Call 0x20f0c 0x104ae>                                              {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-18]|[##0]|[##7]}
                FSCALL_104ae
            <POP 20f12-20f16 StackAdj>                       Δ+20               {}
            <MI 20f16  CLR.L   D0>                                              {}
            <MI 20f18  MOVE.B  (A6-0x12),D0>                                    {}
            <MI 20f1c  AND.W   #0x03,D0>                                        {}
            <MI 20f1e  ASL.W   #0x6,D0>                                         {}
            <MI 20f20  CLR.L   D1>                                              {}
            <MI 20f22  MOVE.B  (A6-0x11),D1>                                    {}
            <MI 20f26  AND.W   #0x03,D1>                                        {}
            <MI 20f28  ASL.W   #0x4,D1>                                         {}
            <MI 20f2a  ADD.W   D0,D1>                                           {}
            <MI 20f2c  CLR.L   D0>                                              {}
            <MI 20f2e  MOVE.B  (A6-0x10),D0>                                    {}
            <MI 20f32  AND.W   #0x03,D0>                                        {}
            <MI 20f34  ASL.W   #0x2,D0>                                         {}
            <MI 20f36  ADD.W   D1,D0>                                           {}
            <MI 20f38  CLR.L   D1>                                              {}
            <MI 20f3a  MOVE.B  (A6-0xf),D1>                                     {}
            <MI 20f3e  AND.W   #0x03,D1>                                        {}
            <MI 20f40  ADD.W   D0,D1>                                           {}
            <MI 20f42  MOVE.B  D1,(A6-0x14)>                                    {}
            <MI 20f46  CLR.L   D0>                                              {}
            <MI 20f48  MOVE.B  (A6-0xe),D0>                                     {}
            <MI 20f4c  AND.W   #0x03,D0>                                        {}
            <MI 20f4e  ASL.W   #0x6,D0>                                         {}
            <MI 20f50  CLR.L   D1>                                              {}
            <MI 20f52  MOVE.B  (A6-0xd),D1>                                     {}
            <MI 20f56  AND.W   #0x03,D1>                                        {}
            <MI 20f58  ASL.W   #0x4,D1>                                         {}
            <MI 20f5a  ADD.W   D0,D1>                                           {}
            <MI 20f5c  CLR.L   D0>                                              {}
            <MI 20f5e  MOVE.B  (A6-0xc),D0>                                     {}
            <MI 20f62  AND.W   #0x03,D0>                                        {}
            <MI 20f64  ASL.W   #0x2,D0>                                         {}
            <MI 20f66  ADD.W   D1,D0>                                           {}
            <MI 20f68  CLR.L   D1>                                              {}
            <MI 20f6a  MOVE.B  (A6-0xb),D1>                                     {}
            <MI 20f6e  AND.W   #0x03,D1>                                        {}
            <MI 20f70  ADD.W   D0,D1>                                           {}
            <MI 20f72  MOVE.B  D1,(A6-0x13)>                                    {}
            <MI 20f76  MOVE.W  (A6-0x14),-(A7)>              Δ-2                {[2, '(A6-0x14)']}
            <MI 20f7a  PEA.L   (A7)>                         Δ-4                {[2, '(A6-0x14)']|[4, '^(A7)']}
            <Const 0x20f7c 0x0.4>                            Δ-4                {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]}
            <Const 0x20f80 0x1.4>                            Δ-4                {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]}
            <Pointer.fp 0x20f84 <LVAR -0x00a @ 4(r)>>        Δ-4                {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]|[@@-10]}
            <Call 0x20f88 0x104b4>                                              {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]|[@@-10]}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 20f8e-20f92 StackAdj>                       Δ+18               {}
            <MI 20f92  MOVE.L  (A6-0xa),(A6+0x28)>                              {}
            <MI 20f98  MOVE.L  (A6-0x6),(A6+0x2c)>                              {}
        <POP 20f9e-20fa6 Epilogue>                           Σ0         

0x20fa6


@ 20fa6
        <LVAR  0x02c 4(w)>
        <LVAR  0x028 4(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 4(r)>
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x00c 2(r)>
        <LVAR -0x00e 2(r)>
        <LVAR -0x010 @ 2(r)>
        <LVAR -0x014 4(r)>
        <LVAR -0x018 @ 4(r)>
    <POP 20fa6-21020 Body>                                              
        <POP 20fa6-20fb8 Prologue>                           Σ0         ↓
        <POP 20fb8-2101c Naked>                              Σ0         ↓
            <MI 20fb8  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0xc)']}
            <MI 20fbc  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Pointer.fp 0x20fc0 <LVAR -0x018 @ 4(r)>>        Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-24]}
            <Const 0x20fc4 0x0.4>                            Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-24]|[##0]}
            <Const 0x20fc8 0x7.4>                            Δ-4                {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-24]|[##0]|[##7]}
            <Call 0x20fcc 0x104ae>                                              {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-24]|[##0]|[##7]}
                FSCALL_104ae
            <POP 20fd2-20fd6 StackAdj>                       Δ+16               {[4, '(A6+0xc)']}
            <MI 20fd6  MOVE.L  (A6-0x14),(A7)>                                  {[4, '(A6-0x14)']}
            <MI 20fda  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Pointer.fp 0x20fde <LVAR -0x010 @ 2(r)>>        Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
            <Call 0x20fe2 0x23050>                                              {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
                exp_UNPERMUTE_UIR.TYP(Sw_8, &Sr_6)
            <POP 20fe8-20fec StackAdj>                       Δ+10               {[-2-]}
            <MI 20fec  MOVE.W  (A6-0xc),(A7)>                                   {[2, '(A6-0xc)']}
            <MI 20ff0  MOVE.W  (A6-0xe),-(A7)>               Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']}
            <MI 20ff4  MOVE.W  (A6-0x10),-(A7)>              Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']}
            <MI 20ff8  PEA.L   (A7)>                         Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']}
            <Const 0x20ffa 0x0.4>                            Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]}
            <Const 0x20ffe 0x5.4>                            Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]}
            <Pointer.fp 0x21002 <LVAR -0x00a @ 4(r)>>        Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]|[@@-10]}
            <Call 0x21006 0x104b4>                                              {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]|[@@-10]}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 2100c-21010 StackAdj>                       Δ+22               {}
            <MI 21010  MOVE.L  (A6-0xa),(A6+0x28)>                              {}
            <MI 21016  MOVE.L  (A6-0x6),(A6+0x2c)>                              {}
        <POP 2101c-21020 Epilogue>                           Σ0         

0x21020


@ 21020
        <LVAR  0x02c 4(w)>
        <LVAR  0x028 4(w)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR -0x006 4(r)>
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x010 @>
        <LVAR -0x014 4(r)>
        <LVAR -0x018 @ 4(r)>
    <POP 21020-210a2 Body>                                              
        <POP 21020-21036 Prologue>                           Σ0         ↓
        <POP 21036-2109a Naked>                              Σ0         ↓
            <MI 21036  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[4, '(A6+0x14)']}
            <MI 2103a  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
            <Pointer.fp 0x2103e <LVAR -0x018 @ 4(r)>>        Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[@@-24]}
            <Const 0x21042 0x0.4>                            Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[@@-24]|[##0]}
            <Const 0x21046 0x7.4>                            Δ-4                {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[@@-24]|[##0]|[##7]}
            <Call 0x2104a 0x104ae>                                              {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[@@-24]|[##0]|[##7]}
                FSCALL_104ae
            <POP 21050-21054 StackAdj>                       Δ+16               {[4, '(A6+0x14)']}
            <MI 21054  MOVE.L  (A6-0x14),(A7)>                                  {[4, '(A6-0x14)']}
            <MI 21058  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Pointer.fp 0x2105c <LVAR -0x010 @>>             Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
            <Call 0x21060 0x230e8>                                              {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
                exp_UNPERMUTE_UIR.VAL(Sw_8, &Sr_5)
            <POP 21066-21067 StackAdj>                       Δ+12       ↓       {}
            <Blob 0x21067 [6] (A6-0x10)>                     Δ-6                {[«6»]}
            <MI 21076  PEA.L   (A7)>                         Δ-4                {[«6»]|[4, '^(A7)']}
            <Const 0x21078 0x0.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]}
            <Const 0x2107c 0x4.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]}
            <Pointer.fp 0x21080 <LVAR -0x00a @ 4(r)>>        Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]|[@@-10]}
            <Call 0x21084 0x104b4>                                              {[«6»]|[4, '^(A7)']|[##0]|[##4]|[@@-10]}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 2108a-2108e StackAdj>                       Δ+22               {}
            <MI 2108e  MOVE.L  (A6-0xa),(A6+0x28)>                              {}
            <MI 21094  MOVE.L  (A6-0x6),(A6+0x2c)>                              {}
        <POP 2109a-210a2 Epilogue>                           Σ0         

0x210a2


@ 210a2
        <LVAR  0x02c 4(w)>
        <LVAR  0x028 4(w)>
        <LVAR  0x024 4(r)>
        <LVAR  0x020 4(r)>
        <LVAR -0x006 4(r)>
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x00c 2(r)>
        <LVAR -0x00e 2(r)>
        <LVAR -0x010 @ 2(r)>
        <LVAR -0x014 4(r)>
        <LVAR -0x018 @ 4(r)>
    <POP 210a2-2111c Body>                                              
        <POP 210a2-210b4 Prologue>                           Σ0         ↓
        <POP 210b4-21118 Naked>                              Σ0         ↓
            <MI 210b4  MOVE.L  (A6+0x24),-(A7)>              Δ-4                {[4, '(A6+0x24)']}
            <MI 210b8  MOVE.L  (A6+0x20),-(A7)>              Δ-4                {[4, '(A6+0x24)']|[4, '(A6+0x20)']}
            <Pointer.fp 0x210bc <LVAR -0x018 @ 4(r)>>        Δ-4                {[4, '(A6+0x24)']|[4, '(A6+0x20)']|[@@-24]}
            <Const 0x210c0 0x0.4>                            Δ-4                {[4, '(A6+0x24)']|[4, '(A6+0x20)']|[@@-24]|[##0]}
            <Const 0x210c4 0x7.4>                            Δ-4                {[4, '(A6+0x24)']|[4, '(A6+0x20)']|[@@-24]|[##0]|[##7]}
            <Call 0x210c8 0x104ae>                                              {[4, '(A6+0x24)']|[4, '(A6+0x20)']|[@@-24]|[##0]|[##7]}
                FSCALL_104ae
            <POP 210ce-210d2 StackAdj>                       Δ+16               {[4, '(A6+0x24)']}
            <MI 210d2  MOVE.L  (A6-0x14),(A7)>                                  {[4, '(A6-0x14)']}
            <MI 210d6  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Pointer.fp 0x210da <LVAR -0x010 @ 2(r)>>        Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
            <Call 0x210de 0x22e28>                                              {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
                exp_UNPERMUTE_UIR.SEQ(Sw_8, &Sr_6)
            <POP 210e4-210e8 StackAdj>                       Δ+10               {[-2-]}
            <MI 210e8  MOVE.W  (A6-0xc),(A7)>                                   {[2, '(A6-0xc)']}
            <MI 210ec  MOVE.W  (A6-0xe),-(A7)>               Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']}
            <MI 210f0  MOVE.W  (A6-0x10),-(A7)>              Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']}
            <MI 210f4  PEA.L   (A7)>                         Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']}
            <Const 0x210f6 0x0.4>                            Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]}
            <Const 0x210fa 0x5.4>                            Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]}
            <Pointer.fp 0x210fe <LVAR -0x00a @ 4(r)>>        Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]|[@@-10]}
            <Call 0x21102 0x104b4>                                              {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]|[@@-10]}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 21108-2110c StackAdj>                       Δ+22               {}
            <MI 2110c  MOVE.L  (A6-0xa),(A6+0x28)>                              {}
            <MI 21112  MOVE.L  (A6-0x6),(A6+0x2c)>                              {}
        <POP 21118-2111c Epilogue>                           Σ0         

0x2111c


@ 2111c
        <LVAR  0x02c 4(w)>
        <LVAR  0x028 4(w)>
        <LVAR  0x01c 4(r)>
        <LVAR  0x018 4(r)>
        <LVAR -0x006 4(r)>
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x00c 2(r)>
        <LVAR -0x00e 2(r)>
        <LVAR -0x010 @ 2(r)>
        <LVAR -0x014 4(r)>
        <LVAR -0x018 @ 4(r)>
    <POP 2111c-21196 Body>                                              
        <POP 2111c-2112e Prologue>                           Σ0         ↓
        <POP 2112e-21192 Naked>                              Σ0         ↓
            <MI 2112e  MOVE.L  (A6+0x1c),-(A7)>              Δ-4                {[4, '(A6+0x1c)']}
            <MI 21132  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']}
            <Pointer.fp 0x21136 <LVAR -0x018 @ 4(r)>>        Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-24]}
            <Const 0x2113a 0x0.4>                            Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-24]|[##0]}
            <Const 0x2113e 0x7.4>                            Δ-4                {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-24]|[##0]|[##7]}
            <Call 0x21142 0x104ae>                                              {[4, '(A6+0x1c)']|[4, '(A6+0x18)']|[@@-24]|[##0]|[##7]}
                FSCALL_104ae
            <POP 21148-2114c StackAdj>                       Δ+16               {[4, '(A6+0x1c)']}
            <MI 2114c  MOVE.L  (A6-0x14),(A7)>                                  {[4, '(A6-0x14)']}
            <MI 21150  MOVE.L  (A6-0x18),-(A7)>              Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']}
            <Pointer.fp 0x21154 <LVAR -0x010 @ 2(r)>>        Δ-4                {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
            <Call 0x21158 0x22d7a>                                              {[4, '(A6-0x14)']|[4, '(A6-0x18)']|[@@-16]}
                exp_UNPERMUTE_UIR.FIU(Sw_8, &Sr_6)
            <POP 2115e-21162 StackAdj>                       Δ+10               {[-2-]}
            <MI 21162  MOVE.W  (A6-0xc),(A7)>                                   {[2, '(A6-0xc)']}
            <MI 21166  MOVE.W  (A6-0xe),-(A7)>               Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']}
            <MI 2116a  MOVE.W  (A6-0x10),-(A7)>              Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']}
            <MI 2116e  PEA.L   (A7)>                         Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']}
            <Const 0x21170 0x0.4>                            Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]}
            <Const 0x21174 0x5.4>                            Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]}
            <Pointer.fp 0x21178 <LVAR -0x00a @ 4(r)>>        Δ-4                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]|[@@-10]}
            <Call 0x2117c 0x104b4>                                              {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']|[4, '^(A7)']|[##0]|[##5]|[@@-10]}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 21182-21186 StackAdj>                       Δ+22               {}
            <MI 21186  MOVE.L  (A6-0xa),(A6+0x28)>                              {}
            <MI 2118c  MOVE.L  (A6-0x6),(A6+0x2c)>                              {}
        <POP 21192-21196 Epilogue>                           Σ0         

0x21196


@ 21196
        <LVAR  0x008 4(r)>
    <POP 21196-21256 Body>                                              
        <POP 21196-211ac Prologue>                           Σ0         ↓
        <POP 211ac-211b2 RegCacheLoad>                       Σ0         ↓
        <POP 211b2-2124e Naked>                              Σ0         ↓
            <MI 211b2  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 211b6-211b8 StackAdj>                       Δ-8                {[-8-]}
            <Blob 0x211b8 [32] (A6+0x2c)>                    Δ-32               {[-8-]|[«32»]}
            <Call 0x211c2 0x20ee0>                                              {[-8-]|[«32»]}
            <POP 211c6-211c8 StackAdj>                       Δ+32               {[-8-]}
            <MI 211c8  LEA.L   (A0+0x20),A1>                                    {[-8-]}
            <MI 211cc  MOVEA.L A7,A2>                                           {[-8-]}
            <BlockMove 8,A2,A1>                                                 {[-8-]}
            <Blob 0x211d6 [32] (A6+0x2c)>                    Δ-32               {[-8-]|[«32»]}
            <Call 0x211e0 0x20fa6>                                              {[-8-]|[«32»]}
            <POP 211e4-211e6 StackAdj>                       Δ+32               {[-8-]}
            <MI 211e6  LEA.L   (A0+0x8),A1>                                     {[-8-]}
            <MI 211ea  MOVEA.L A7,A2>                                           {[-8-]}
            <BlockMove 8,A2,A1>                                                 {[-8-]}
            <Blob 0x211f4 [32] (A6+0x2c)>                    Δ-32               {[-8-]|[«32»]}
            <Call 0x211fe 0x21020>                                              {[-8-]|[«32»]}
            <POP 21202-21204 StackAdj>                       Δ+32               {[-8-]}
            <MI 21204  MOVEA.L A0,A1>                                           {[-8-]}
            <MI 21206  MOVEA.L A7,A2>                                           {[-8-]}
            <BlockMove 8,A2,A1>                                                 {[-8-]}
            <Blob 0x21210 [32] (A6+0x2c)>                    Δ-32               {[-8-]|[«32»]}
            <Call 0x2121a 0x210a2>                                              {[-8-]|[«32»]}
            <POP 2121e-21220 StackAdj>                       Δ+32               {[-8-]}
            <MI 21220  LEA.L   (A0+0x10),A1>                                    {[-8-]}
            <MI 21224  MOVEA.L A7,A2>                                           {[-8-]}
            <BlockMove 8,A2,A1>                                                 {[-8-]}
            <Blob 0x2122e [32] (A6+0x2c)>                    Δ-32               {[-8-]|[«32»]}
            <Call 0x21238 0x2111c>                                              {[-8-]|[«32»]}
            <POP 2123c-2123e StackAdj>                       Δ+32               {[-8-]}
            <MI 2123e  LEA.L   (A0+0x18),A0>                                    {[-8-]}
            <MI 21242  MOVEA.L A7,A1>                                           {[-8-]}
            <BlockMove 8,A1,A0>                                                 {[-8-]}
            <POP 2124c-2124e StackAdj>                       Δ+8                {}
        <POP 2124e-21256 Epilogue>                           Σ0         

0x21256


@ 21256
        <LVAR  0x00c 2(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x001 @ 1(r)>
        <LVAR -0x002 1(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x009 @>
        <LVAR -0x00f @>
        <LVAR -0x014 @>
        <LVAR -0x016 2(r)>
        <LVAR -0x018 2(r)>
        <LVAR -0x01a @ 2(r)>
        <LVAR -0x01c @ 2(r)>
        <LVAR -0x020 4(rw)>
        <LVAR -0x022 @>
        <LVAR -0x028 2(w)>
        <LVAR -0x42a @>
    <POP 21256-2148a Body>                                              
        <POP 21256-2126c Prologue>                           Σ0         ↓
        <POP 2126c-21276 RegCacheLoad>                       Σ0         ↓
        <POP 21276-212b8 Naked>                              Σ0         ↓
            <MI 21276  MOVEQ.L #0x01,D7>                                        {}
            <MI 21278  CLR.L   D0>                                              {}
            <MI 2127a  MOVE.W  (A6+0xc),D0>                                     {}
            <MI 2127e  CLR.L   D1>                                              {}
            <MI 21280  MOVE.W  0x23378,D1>                                      {}
            <MI 21286  NEG.L   D1>                                              {}
            <MI 21288  ADD.L   D0,D1>                                           {}
            <MI 2128a  MOVE.L  D1,D4>                                           {}
            <MI 2128c  MOVEQ.L #0x20,D3>                                        {}
            <Call 0x2128e 0x10294>                                              {}
                ?divs_d3_d4
            <MI 21294  ADDQ.L  #0x1,D4>                                         {}
            <MI 21296  ADDI.W  #0x0028,D4>                                      {}
            <POP 0x2129a LimitCheck 0x0 ≤ D4 ≤ 0xffff>                          {}
            <MI 212a2  MOVE.W  D4,(A6-0x28)>                                    {}
            <MI 212a6  ANDI.W  #0x001f,D0>                                      {}
            <MI 212aa  MOVE.W  D0,D5>                                           {}
            <MI 212ac  LEA.L   (A6-0x42a),A0>                                   {}
            <MI 212b0  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 212b2  MOVE.L  (A7)+,(A6-0x20)>              Δ+4                {}
            <MI 212b6  MOVE.W  D4,D6>                                           {}
        <POP 212b8-21306 Naked>                              Σ0         ↓ →0x212b8 ←0x212b8
            <Blob 0x212b8 [4] 0x23374>                       Δ-4                {[«4»]}
            <POP 0x212be LimitCheck 0x0 ≤ D6 ≤ 0x4000>                          {[«4»]}
            <MI 212c2  MOVE.W  D6,-(A7)>                     Δ-2                {[«4»]|[2, 'D6']}
            <MI 212c4  CLR.W   -(A7)>                        Δ-2                {[«4»]|[2, 'D6']|[#0]}
            <Const 0x212c6 0x200.2>                          Δ-2                {[«4»]|[2, 'D6']|[#0]|[#512]}
            <Const 0x212ca 0x2.2>                            Δ-2                {[«4»]|[2, 'D6']|[#0]|[#512]|[#2]}
            <MI 212ce  MOVE.L  (A6-0x20),-(A7)>              Δ-4                {[«4»]|[2, 'D6']|[#0]|[#512]|[#2]|[4, '(A6-0x20)']}
            <Pointer.fp 0x212d2 <LVAR -0x022 @>>             Δ-4                {[«4»]|[2, 'D6']|[#0]|[#512]|[#2]|[4, '(A6-0x20)']|[@@-34]}
            <Call 0x212d6 0x10384>                                              {[«4»]|[2, 'D6']|[#0]|[#512]|[#2]|[4, '(A6-0x20)']|[@@-34]}
                ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
            <POP 212dc-212e0 StackAdj>                       Δ+20               {}
            <MI 212e0  CLR.L   D0>                                              {}
            <MI 212e2  MOVE.W  D6,D0>                                           {}
            <MI 212e4  ADDQ.L  #0x1,D0>                                         {}
            <POP 0x212e6 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 212f0  MOVE.W  D0,D6>                                           {}
            <MI 212f2  CLR.L   D0>                                              {}
            <MI 212f4  MOVE.W  D7,D0>                                           {}
            <MI 212f6  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x212f8 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 21302  MOVE.W  D0,D7>                                           {}
            <MI 21304  BNE     0x212b8>                                         {}
        <POP 21306-21482 Naked>                              Σ0         ↓
            <MI 21306  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 0x2130a LimitCheck 0x0 ≤ D5 ≤ 0x1f>                            {}
            <MI 2130e  CLR.L   D0>                                              {}
            <MI 21310  MOVE.W  D5,D0>                                           {}
            <MI 21312  ASL.L   #0x5,D0>                                         {}
            <MI 21314  LEA.L   (A6-0x42a),A1>                                   {}
            <Blob 0x21318 [32] (A1+D0.L+#0x20)>              Δ-32               {[«32»]}
            <MI 21324  PEA.L   (A0)>                         Δ-4                {[«32»]|[4, '^(A0)']}
            <Call 0x21326 0x21196>                                              {[«32»]|[4, '^(A0)']}
            <POP 2132a-2132e StackAdj>                       Δ+28               {[-8-]}
            <MI 2132e  CLR.L   D0>                                              {[-8-]}
            <MI 21330  MOVE.W  (A6+0xc),D0>                                     {[-8-]}
            <MI 21334  MOVE.L  D0,-(A7)>                     Δ-4                {[-8-]|[4, 'D0']}
            <Call 0x21336 0x10354>                                              {[-8-]|[4, 'D0']}
                Long2Quad(a : Long) : Quad
            <POP 2133c-2133e StackAdj>                       Δ+4                {[-8-]}
            <Pointer.fp 0x2133e <LVAR -0x01c @ 2(r)>>        Δ-4                {[-8-]|[@@-28]}
            <Const 0x21340 0x0.4>                            Δ-4                {[-8-]|[@@-28]|[##0]}
            <Const 0x21344 0x1.4>                            Δ-4                {[-8-]|[@@-28]|[##0]|[##1]}
            <Call 0x21348 0x104ae>                                              {[-8-]|[@@-28]|[##0]|[##1]}
                FSCALL_104ae
            <POP 2134e-21352 StackAdj>                       Δ+18               {[-2-]}
            <MI 21352  MOVE.W  (A6-0x1c),(A7)>                                  {[2, '(A6-0x1c)']}
            <MI 21354  CLR.B   -(A7)>                        Δ-2                {[2, '(A6-0x1c)']|[#0]}
            <Pointer.fp 0x21356 <LVAR -0x01a @ 2(r)>>        Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-26]}
            <Pointer.fp 0x2135a <LVAR -0x001 @ 1(r)>>        Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-26]|[@@-1]}
            <Call 0x2135c 0x22d9a>                                              {[2, '(A6-0x1c)']|[#0]|[@@-26]|[@@-1]}
                exp_READ_WCS.FIU(Sw_2, Sw_1, &Sr_6, &Fr)
            <POP 21362-21366 StackAdj>                       Δ+10               {[2, '(A6-0x1c)']}
            <MI 21366  MOVE.W  (A6-0x16),(A7)>                                  {[2, '(A6-0x16)']}
            <MI 2136a  MOVE.W  (A6-0x18),-(A7)>              Δ-2                {[2, '(A6-0x16)']|[2, '(A6-0x18)']}
            <MI 2136e  MOVE.W  (A6-0x1a),-(A7)>              Δ-2                {[2, '(A6-0x16)']|[2, '(A6-0x18)']|[2, '(A6-0x1a)']}
            <MI 21372  PEA.L   (A7)>                         Δ-4                {[2, '(A6-0x16)']|[2, '(A6-0x18)']|[2, '(A6-0x1a)']|[4, '^(A7)']}
            <Const 0x21374 0x0.4>                            Δ-4                {[2, '(A6-0x16)']|[2, '(A6-0x18)']|[2, '(A6-0x1a)']|[4, '^(A7)']|[##0]}
            <Const 0x21378 0x5.4>                            Δ-4                {[2, '(A6-0x16)']|[2, '(A6-0x18)']|[2, '(A6-0x1a)']|[4, '^(A7)']|[##0]|[##5]}
            <MI 2137c  PEA.L   (A0+0x40)>                    Δ-4                {[2, '(A6-0x16)']|[2, '(A6-0x18)']|[2, '(A6-0x1a)']|[4, '^(A7)']|[##0]|[##5]|[4, '^(A0+0x40)']}
            <Call 0x21380 0x104b4>                                              {[2, '(A6-0x16)']|[2, '(A6-0x18)']|[2, '(A6-0x1a)']|[4, '^(A7)']|[##0]|[##5]|[4, '^(A0+0x40)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 21386-21388 StackAdj>                       Δ+22               {}
            <MI 21388  MOVE.B  (A6-0x1),(A0+0x53)>                              {}
            <MI 2138c  NEG.B   (A0+0x53)>                                       {}
            <MI 21390  ADDQ.B  #0x1,(A0+0x53)>                                  {}
            <MI 21394  MOVE.W  (A6-0x1c),-(A7)>              Δ-2                {[2, '(A6-0x1c)']}
            <MI 21396  CLR.B   -(A7)>                        Δ-2                {[2, '(A6-0x1c)']|[#0]}
            <Pointer.fp 0x21398 <LVAR -0x014 @>>             Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-20]}
            <Pointer.fp 0x2139c <LVAR -0x001 @ 1(r)>>        Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-20]|[@@-1]}
            <Call 0x2139e 0x23108>                                              {[2, '(A6-0x1c)']|[#0]|[@@-20]|[@@-1]}
                exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr)
            <POP 213a4-213a5 StackAdj>                       Δ+12       ↓       {}
            <Blob 0x213a5 [6] (A6-0x14)>                     Δ-6                {[«6»]}
            <MI 213b4  PEA.L   (A7)>                         Δ-4                {[«6»]|[4, '^(A7)']}
            <Const 0x213b6 0x0.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]}
            <Const 0x213ba 0x4.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]}
            <MI 213be  PEA.L   (A0+0x28)>                    Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]|[4, '^(A0+0x28)']}
            <Call 0x213c2 0x104b4>                                              {[«6»]|[4, '^(A7)']|[##0]|[##4]|[4, '^(A0+0x28)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 213c8-213ca StackAdj>                       Δ+22               {}
            <MI 213ca  MOVE.B  (A6-0x1),(A0+0x50)>                              {}
            <MI 213ce  MOVE.W  (A6-0x1c),-(A7)>              Δ-2                {[2, '(A6-0x1c)']}
            <MI 213d0  CLR.B   -(A7)>                        Δ-2                {[2, '(A6-0x1c)']|[#0]}
            <Pointer.fp 0x213d2 <LVAR -0x00f @>>             Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-15]}
            <Pointer.fp 0x213d6 <LVAR -0x001 @ 1(r)>>        Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-15]|[@@-1]}
            <Call 0x213d8 0x23070>                                              {[2, '(A6-0x1c)']|[#0]|[@@-15]|[@@-1]}
                exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr)
            <POP 213de-213df StackAdj>                       Δ+12       ↓       {}
            <Blob 0x213df [6] (A6-0xf)>                      Δ-6                {[«6»]}
            <MI 213ee  PEA.L   (A7)>                         Δ-4                {[«6»]|[4, '^(A7)']}
            <Const 0x213f0 0x0.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]}
            <Const 0x213f4 0x5.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##5]}
            <MI 213f8  PEA.L   (A0+0x30)>                    Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##5]|[4, '^(A0+0x30)']}
            <Call 0x213fc 0x104b4>                                              {[«6»]|[4, '^(A7)']|[##0]|[##5]|[4, '^(A0+0x30)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 21402-21404 StackAdj>                       Δ+22               {}
            <MI 21404  MOVE.B  (A6-0x1),(A0+0x51)>                              {}
            <MI 21408  MOVE.W  (A6-0x1c),-(A7)>              Δ-2                {[2, '(A6-0x1c)']}
            <Pointer.fp 0x2140a <LVAR -0x009 @>>             Δ-4                {[2, '(A6-0x1c)']|[@@-9]}
            <Pointer.fp 0x2140e <LVAR -0x001 @ 1(r)>>        Δ-4                {[2, '(A6-0x1c)']|[@@-9]|[@@-1]}
            <Call 0x21410 0x22f30>                                              {[2, '(A6-0x1c)']|[@@-9]|[@@-1]}
                exp_READ_WCS_AND_PARITY.SEQ(Sw_2, &Sr_6, &Fr)
            <POP 21416-21417 StackAdj>                       Δ+10       ↓       {}
            <Blob 0x21417 [6] (A6-0x9)>                      Δ-6                {[«6»]}
            <MI 21426  PEA.L   (A7)>                         Δ-4                {[«6»]|[4, '^(A7)']}
            <Const 0x21428 0x0.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]}
            <Const 0x2142c 0x5.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##5]}
            <MI 21430  PEA.L   (A0+0x38)>                    Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##5]|[4, '^(A0+0x38)']}
            <Call 0x21434 0x104b4>                                              {[«6»]|[4, '^(A7)']|[##0]|[##5]|[4, '^(A0+0x38)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 2143a-2143c StackAdj>                       Δ+22               {}
            <MI 2143c  MOVE.B  (A6-0x1),(A0+0x52)>                              {}
            <MI 21440  NEG.B   (A0+0x52)>                                       {}
            <MI 21444  ADDQ.B  #0x1,(A0+0x52)>                                  {}
            <MI 21448  MOVE.W  (A6-0x1c),-(A7)>              Δ-2                {[2, '(A6-0x1c)']}
            <MI 2144a  CLR.B   -(A7)>                        Δ-2                {[2, '(A6-0x1c)']|[#0]}
            <Pointer.fp 0x2144c <LVAR -0x003 @ 1(r)>>        Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-3]}
            <Pointer.fp 0x21450 <LVAR -0x001 @ 1(r)>>        Δ-4                {[2, '(A6-0x1c)']|[#0]|[@@-3]|[@@-1]}
            <Call 0x21452 0x23126>                                              {[2, '(A6-0x1c)']|[#0]|[@@-3]|[@@-1]}
                exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr)
            <POP 21458-2145c StackAdj>                       Δ+10               {[2, '(A6-0x1c)']}
            <MI 2145c  MOVE.B  (A6-0x3),(A7)>                                   {[-2-]}
            <MI 21460  MOVE.B  (A6-0x2),(A7+0x1)>                               {[-2-]}
            <MI 21466  PEA.L   (A7)>                         Δ-4                {[-2-]|[4, '^(A7)']}
            <Const 0x21468 0x0.4>                            Δ-4                {[-2-]|[4, '^(A7)']|[##0]}
            <Const 0x2146c 0x1.4>                            Δ-4                {[-2-]|[4, '^(A7)']|[##0]|[##1]}
            <MI 21470  PEA.L   (A0+0x48)>                    Δ-4                {[-2-]|[4, '^(A7)']|[##0]|[##1]|[4, '^(A0+0x48)']}
            <Call 0x21474 0x104b4>                                              {[-2-]|[4, '^(A7)']|[##0]|[##1]|[4, '^(A0+0x48)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 2147a-2147e StackAdj>                       Δ+18               {}
            <MI 2147e  MOVE.B  (A6-0x1),(A0+0x54)>                              {}
        <POP 21482-2148a Epilogue>                           Σ0         

0x2148a


@ 2148a
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 2148a-214f6 Body>                                              
        <POP 2148a-214a0 Prologue>                           Σ0         ↓
        <POP 214a0-214ee Naked>                              Σ0         ↓
            <MI 214a0  MOVEA.L (A6+0x18),A0>                                    {}
            <MI 214a4  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x214a6 0x22f58>                                              {[4, '^(A0)']}
                exp_READ_UIR.SEQ(&Sr_6)
            <POP 214ac-214ae StackAdj>                       Δ+4                {}
            <MI 214ae  MOVEA.L (A6+0x14),A0>                                    {}
            <MI 214b2  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x214b4 0x22fb0>                                              {[4, '^(A0)']}
                exp_READ_MISC.SEQ(&Sr_2_2_1_1_3)
            <POP 214ba-214bc StackAdj>                       Δ+4                {}
            <MI 214bc  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 214c0  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x214c2 0x22fec>                                              {[4, '^(A0)']}
                exp_READ_DEC.SEQ(&Sr_2_1_1_1)
            <POP 214c8-214ca StackAdj>                       Δ+2                {[-2-]}
            <MI 214ca  CLR.B   (A7)>                                            {[-2-]}
            <MI 214cc  MOVEA.L (A6+0xc),A0>                                     {[-2-]}
            <MI 214d0  PEA.L   (A0)>                         Δ-4                {[-2-]|[4, '^(A0)']}
            <Call 0x214d2 0x2308e>                                              {[-2-]|[4, '^(A0)']}
                exp_READ_UIR.TYP(Sw_1, &Sr_6)
            <POP 214d8-214da StackAdj>                       Δ+6                {}
            <Call 0x214da 0x230c6>                                              {}
                exp_LOAD_BENIGN_UWORD.TYP()
            <MI 214e0  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 214e4  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x214e6 0x22f72>                                              {[4, '^(A0)']}
                exp_READ_SDR.SEQ(&Sr_8_8)
            <POP 214ec-214ee StackAdj>                       Δ+4                {}
        <POP 214ee-214f6 Epilogue>                           Σ0         

0x214f6


@ 214f6
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 214f6-215a4 Body>                                              
        <POP 214f6-2150c Prologue>                           Σ0         ↓
        <POP 2150c-21510 RegCacheLoad>                       Σ0         ↓
        <POP 21510-2159c Naked>                              Σ0         ↓
            <MI 21510  MOVEA.L (A6+0x18),A0>                                    {}
            <POP 21514-21516 StackAdj>                       Δ-6                {[-6-]}
            <MI 21516  MOVEA.L A7,A1>                                           {[-6-]}
            <BlockMove 6,A0,A1>                                                 {[-6-]}
            <Call 0x21520 0x22db8>                                              {[-6-]}
                exp_WRITE_UIR.SEQ(Sw_6)
            <POP 21526-21528 StackAdj>                       Δ+6                {}
            <MI 21528  MOVEA.L (A6+0x14),A0>                                    {}
            <POP 2152c-2152e StackAdj>                       Δ-10               {[-10-]}
            <MI 2152e  MOVEA.L A7,A1>                                           {[-10-]}
            <BlockMove 9,A0,A1>                                                 {[-10-]}
            <Call 0x21538 0x22df0>                                              {[-10-]}
                exp_WRITE_MISC.SEQ(Sw_2_2_1_1_3)
            <POP 2153e-21540 StackAdj>                       Δ+10               {}
            <MI 21540  MOVEA.L (A6+0x10),A0>                                    {}
            <POP 21544-21546 StackAdj>                       Δ-6                {[-6-]}
            <MI 21546  MOVEA.L A7,A1>                                           {[-6-]}
            <BlockMove 5,A0,A1>                                                 {[-6-]}
            <Call 0x21550 0x22e0c>                                              {[-6-]}
                exp_WRITE_DEC.SEQ(Sw_2_1_1_1)
            <POP 21556-21558 StackAdj>                       Δ+6                {}
            <MI 21558  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 2155c-2155e StackAdj>                       Δ-16               {[-16-]}
            <MI 2155e  MOVEA.L A7,A1>                                           {[-16-]}
            <BlockMove 16,A0,A1>                                                {[-16-]}
            <Call 0x21568 0x22dd4>                                              {[-16-]}
                exp_WRITE_SDR.SEQ(Sw_8_8)
            <POP 2156e-21570 StackAdj>                       Δ+16               {}
            <Call 0x21570 0x22f8c>                                              {}
                exp_RESTORE_PREDECODES.SEQ()
            <MI 21576  MOVEA.L (A6+0xc),A0>                                     {}
            <POP 2157a-2157c StackAdj>                       Δ-6                {[-6-]}
            <MI 2157c  MOVEA.L A7,A1>                                           {[-6-]}
            <BlockMove 6,A0,A1>                                                 {[-6-]}
            <MI 21586  CLR.B   -(A7)>                        Δ-2                {[-6-]|[#0]}
            <Call 0x21588 0x230aa>                                              {[-6-]|[#0]}
                exp_LOAD_UIR.TYP(Sw_6, Sw_1)
            <POP 2158e-21590 StackAdj>                       Δ+6                {[-2-]}
            <POP 21590-21591 StackAdj>                       Δ+2                {}
            <Const 0x21591 0xffff.2>                         Δ-2                {[#65535]}
            <Call 0x21594 0x23032>                                              {[#65535]}
                exp_LOAD_COUNTER.SEQ(Sw_2)
            <POP 2159a-2159c StackAdj>                       Δ+2                {}
        <POP 2159c-215a4 Epilogue>                           Σ0         

0x215a4


@ 215a4
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 @>
        <LVAR -0x00c 4(r)>
        <LVAR -0x010 @ 4(r)>
    <POP 215a4-2161c Body>                                              
        <POP 215a4-215ba Prologue>                           Σ0         ↓
        <POP 215ba-21614 Naked>                              Σ0         ↓
            <MI 215ba  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[4, '(A6+0x10)']}
            <MI 215be  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <Pointer.fp 0x215c2 <LVAR -0x010 @ 4(r)>>        Δ-4                {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[@@-16]}
            <Const 0x215c6 0x0.4>                            Δ-4                {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[@@-16]|[##0]}
            <Const 0x215ca 0x7.4>                            Δ-4                {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[@@-16]|[##0]|[##7]}
            <Call 0x215ce 0x104ae>                                              {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[@@-16]|[##0]|[##7]}
                FSCALL_104ae
            <POP 215d4-215d8 StackAdj>                       Δ+16               {[4, '(A6+0x10)']}
            <MI 215d8  MOVE.L  (A6-0xc),(A7)>                                   {[4, '(A6-0xc)']}
            <MI 215dc  MOVE.L  (A6-0x10),-(A7)>              Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']}
            <Pointer.fp 0x215e0 <LVAR -0x008 @>>             Δ-4                {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[@@-8]}
            <Call 0x215e4 0x22e48>                                              {[4, '(A6-0xc)']|[4, '(A6-0x10)']|[@@-8]}
                exp_UNPERMUTE_DECODE.SEQ(Sw_8, &Sr_5)
            <POP 215ea-215eb StackAdj>                       Δ+12       ↓       {}
            <Blob 0x215eb [6] (A6-0x8)>                      Δ-6                {[«6»]}
            <MI 215fa  PEA.L   (A7)>                         Δ-4                {[«6»]|[4, '^(A7)']}
            <Const 0x215fc 0x0.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]}
            <Const 0x21600 0x4.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]}
            <MI 21604  MOVEA.L (A6+0x8),A0>                                     {[«6»]|[4, '^(A7)']|[##0]|[##4]}
            <MI 21608  PEA.L   (A0)>                         Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]|[4, '^(A0)']}
            <Call 0x2160a 0x104b4>                                              {[«6»]|[4, '^(A7)']|[##0]|[##4]|[4, '^(A0)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 21610-21614 StackAdj>                       Δ+22               {}
        <POP 21614-2161c Epilogue>                           Σ0         

0x2161c


@ 2161c
        <LVAR  0x00e 2(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x408 @>
        <LVAR -0x40a @>
        <LVAR -0x40c 2(rw)>
        <LVAR -0x40e 2(rw)>
        <LVAR -0x410 @>
    <POP 2161c-216f8 Body>                                              
        <POP 2161c-21632 Prologue>                           Σ0         ↓
        <POP 21632-2163a RegCacheLoad>                       Σ0         ↓
        <POP 2163a-21652 Naked>                              Σ0         ↓ →0x21664
            <MI 2163a  MOVE.W  #0x01,(A6-0x40e)>                                {}
            <MI 2163e  MOVE.W  (A6+0xe),D5>                                     {}
            <MI 21642  LSR.W   #0x7,D5>                                         {}
            <MI 21644  ADDQ.W  #0x1,D5>                                         {}
            <MI 21646  ADDI.W  #0x0018,D5>                                      {}
            <MI 2164a  MOVE.B  (A6+0xc),D0>                                     {}
            <MI 2164e  CMP.B   #0x01,D0>                                        {}
            <MI 21650  BNE     0x21664>                                         {}
        <POP 21652-21664 Naked>                              Σ0         ↓
            <MI 21652  CLR.L   D0>                                              {}
            <MI 21654  MOVE.W  D5,D0>                                           {}
            <MI 21656  ADDQ.L  #0x8,D0>                                         {}
            <POP 0x21658 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 21662  MOVE.W  D0,D5>                                           {}
        <POP 21664-2168c Naked>                              Σ0 Δ-4     ↓ →0x21694 ←0x2163a
            <MI 21664  MOVE.W  (A6+0xe),(A6-0x40c)>                             {}
            <MI 21668  AND.W   #0x7f,(A6-0x40c)>                                {}
            <MI 2166a  LEA.L   (A6-0x408),A0>                                   {}
            <MI 2166e  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 21670  MOVE.L  (A7)+,D7>                     Δ+4                {}
            <MI 21672  CLR.L   D0>                                              {}
            <MI 21674  MOVE.W  D5,D0>                                           {}
            <MI 21676  CLR.L   D1>                                              {}
            <MI 21678  MOVE.W  (A6-0x40e),D1>                                   {}
            <MI 2167c  ADD.L   D0,D1>                                           {}
            <MI 2167e  SUBQ.L  #0x1,D1>                                         {}
            <MI 21680  MOVE.L  D1,-(A7)>                     Δ-4                {[4, 'D1']}
            <MI 21682  CLR.L   D0>                                              {[4, 'D1']}
            <MI 21684  MOVE.W  D5,D0>                                           {[4, 'D1']}
            <MI 21686  MOVE.L  D0,D6>                                           {[4, 'D1']}
            <MI 21688  CMP.L   (A7),D6>                                         {[4, 'D1']}
            <MI 2168a  BHI     0x21694>                                         {[4, 'D1']}
        <POP 2168c-21692 Naked>                              Σ-4        →0x21694
            <MI 2168c  MOVE.L  (A7),D0>                                         {[-4-]}
            <MI 2168e  CMP.L   D0,D6>                                           {[-4-]}
            <MI 21690  BLT     0x21694>                                         {[-4-]}
        <POP 21692-21694 Naked>                              Σ0         
            <MI 21692  TRAP    #15>                                             {}
        <POP 21694-2169a Naked>                              Σ-4        ↓ →0x216ca ←0x21664 ←0x2168c ←0x2169a
            <MI 21694  CMP.W   (A7+0x2),D6>                                     {[-4-]}
            <MI 21698  BHI     0x216ca>                                         {[-4-]}
        <POP 2169a-216ca Naked>                              Σ-4        ↓ →0x21694
            <Blob 0x2169a [4] 0x23374>                       Δ-4                {[-4-]|[«4»]}
            <POP 0x216a0 LimitCheck 0x0 ≤ D6 ≤ 0x4000>                          {[-4-]|[«4»]}
            <MI 216a4  MOVE.W  D6,-(A7)>                     Δ-2                {[-4-]|[«4»]|[2, 'D6']}
            <MI 216a6  CLR.W   -(A7)>                        Δ-2                {[-4-]|[«4»]|[2, 'D6']|[#0]}
            <Const 0x216a8 0x200.2>                          Δ-2                {[-4-]|[«4»]|[2, 'D6']|[#0]|[#512]}
            <Const 0x216ac 0x2.2>                            Δ-2                {[-4-]|[«4»]|[2, 'D6']|[#0]|[#512]|[#2]}
            <MI 216b0  MOVE.L  D7,-(A7)>                     Δ-4                {[-4-]|[«4»]|[2, 'D6']|[#0]|[#512]|[#2]|[4, 'D7']}
            <Pointer.fp 0x216b2 <LVAR -0x40a @>>             Δ-4                {[-4-]|[«4»]|[2, 'D6']|[#0]|[#512]|[#2]|[4, 'D7']|[@@-1034]}
            <Call 0x216b6 0x10384>                                              {[-4-]|[«4»]|[2, 'D6']|[#0]|[#512]|[#2]|[4, 'D7']|[@@-1034]}
                ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
            <POP 216bc-216c0 StackAdj>                       Δ+20               {[-4-]}
            <MI 216c0  ADDI.L  #0x00000400,D7>                                  {[-4-]}
            <MI 216c6  ADDQ.W  #0x1,D6>                                         {[-4-]}
            <MI 216c8  BCC     0x21694>                                         {[-4-]}
        <POP 216ca-216f0 Naked>                              Σ-4 Δ+4    ↓ ←0x21694
            <POP 216ca-216cc StackAdj>                       Δ+4                {}
            <MI 216cc  MOVE.W  (A6-0x40c),D0>                                   {}
            <POP 0x216ce LimitCheck 0x0 ≤ D0 ≤ 0x7f>                            {}
            <MI 216d0  CLR.L   D1>                                              {}
            <MI 216d2  MOVE.W  D0,D1>                                           {}
            <MI 216d4  ASL.L   #0x3,D1>                                         {}
            <MI 216d6  LEA.L   (A6-0x410),A0>                                   {}
            <MI 216da  MOVE.L  (A0+D1.L+#0xc),-(A7)>         Δ-4                {[4, '(A0+D1.L+#0xc)']}
            <MI 216de  MOVE.L  (A0+D1.L+#0x8),-(A7)>         Δ-4                {[4, '(A0+D1.L+#0xc)']|[4, '(A0+D1.L+#0x8)']}
            <MI 216e2  MOVEA.L (A6+0x8),A0>                                     {[4, '(A0+D1.L+#0xc)']|[4, '(A0+D1.L+#0x8)']}
            <MI 216e6  PEA.L   (A0)>                         Δ-4                {[4, '(A0+D1.L+#0xc)']|[4, '(A0+D1.L+#0x8)']|[4, '^(A0)']}
            <Call 0x216e8 0x215a4>                                              {[4, '(A0+D1.L+#0xc)']|[4, '(A0+D1.L+#0x8)']|[4, '^(A0)']}
            <POP 216ec-216f0 StackAdj>                       Δ+12               {}
        <POP 216f0-216f8 Epilogue>                           Σ0         

0x216f8


@ 216f8
        <LVAR  0x00c 2(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x003 1(w)>
        <LVAR -0x004 1(rw)>
        <LVAR -0x005 1(w)>
        <LVAR -0x006 1(w)>
        <LVAR -0x007 1(w)>
        <LVAR -0x008 @ 1(r)>
        <LVAR -0x00a @ 2(r)>
        <LVAR -0x00b 1(r)>
        <LVAR -0x00c 1(r)>
        <LVAR -0x00d @ 1(r)>
        <LVAR -0x00e 1(r)>
        <LVAR -0x00f 1(r)>
        <LVAR -0x010 1(r)>
        <LVAR -0x011 1(r)>
        <LVAR -0x012 @ 1(r)>
        <LVAR -0x013 1(w)>
        <LVAR -0x014 1(w) 2(r)>
        <LVAR -0x024 @>
        <LVAR -0x02a @>
        <LVAR -0x02f @>
        <LVAR -0x038 @>
        <LVAR -0x03e @>
        <LVAR -0x040 @>
        <LVAR -0x042 @ 4(r)>
        <LVAR -0x044 @>
        <LVAR -0x046 @ 4(r)>
        <LVAR -0x048 @>
        <LVAR -0x04a @ 4(r)>
        <LVAR -0x04c @>
        <LVAR -0x04e @ 4(r)>
    <POP 216f8-2185c Body>                                              
        <POP 216f8-2170e Prologue>                           Σ0         ↓
        <POP 2170e-21716 RegCacheLoad>                       Σ0         ↓
        <POP 21716-217c6 Naked>                              Σ0         ↓ →0x217d4
            <Pointer.fp 0x21716 <LVAR -0x03e @>>             Δ-4                {[@@-62]}
            <Pointer.fp 0x2171a <LVAR -0x038 @>>             Δ-4                {[@@-62]|[@@-56]}
            <Pointer.fp 0x2171e <LVAR -0x02f @>>             Δ-4                {[@@-62]|[@@-56]|[@@-47]}
            <Pointer.fp 0x21722 <LVAR -0x02a @>>             Δ-4                {[@@-62]|[@@-56]|[@@-47]|[@@-42]}
            <Pointer.fp 0x21726 <LVAR -0x024 @>>             Δ-4                {[@@-62]|[@@-56]|[@@-47]|[@@-42]|[@@-36]}
            <Call 0x2172a 0x2148a>                                              {[@@-62]|[@@-56]|[@@-47]|[@@-42]|[@@-36]}
            <POP 2172e-21730 StackAdj>                       Δ+18               {[-2-]}
            <MI 21730  CLR.B   (A7)>                                            {[-2-]}
            <Pointer.fp 0x21732 <LVAR -0x00d @ 1(r)>>        Δ-4                {[-2-]|[@@-13]}
            <Pointer.fp 0x21736 <LVAR -0x00a @ 2(r)>>        Δ-4                {[-2-]|[@@-13]|[@@-10]}
            <Pointer.fp 0x2173a <LVAR -0x008 @ 1(r)>>        Δ-4                {[-2-]|[@@-13]|[@@-10]|[@@-8]}
            <Call 0x2173e 0x22e6c>                                              {[-2-]|[@@-13]|[@@-10]|[@@-8]}
                exp_TEST_READ_MACRO_PC.SEQ(Sw_1, &Sr_3, &Sr_2, &Sr_1)
            <POP 21744-21748 StackAdj>                       Δ+12               {[-2-]}
            <MI 21748  CLR.B   (A7)>                                            {[-2-]}
            <Pointer.fp 0x2174a <LVAR -0x04e @ 4(r)>>        Δ-4                {[-2-]|[@@-78]}
            <Pointer.fp 0x2174e <LVAR -0x04c @>>             Δ-4                {[-2-]|[@@-78]|[@@-76]}
            <Pointer.fp 0x21752 <LVAR -0x04a @ 4(r)>>        Δ-4                {[-2-]|[@@-78]|[@@-76]|[@@-74]}
            <Pointer.fp 0x21756 <LVAR -0x048 @>>             Δ-4                {[-2-]|[@@-78]|[@@-76]|[@@-74]|[@@-72]}
            <Pointer.fp 0x2175a <LVAR -0x046 @ 4(r)>>        Δ-4                {[-2-]|[@@-78]|[@@-76]|[@@-74]|[@@-72]|[@@-70]}
            <Pointer.fp 0x2175e <LVAR -0x044 @>>             Δ-4                {[-2-]|[@@-78]|[@@-76]|[@@-74]|[@@-72]|[@@-70]|[@@-68]}
            <Pointer.fp 0x21762 <LVAR -0x042 @ 4(r)>>        Δ-4                {[-2-]|[@@-78]|[@@-76]|[@@-74]|[@@-72]|[@@-70]|[@@-68]|[@@-66]}
            <Pointer.fp 0x21766 <LVAR -0x040 @>>             Δ-4                {[-2-]|[@@-78]|[@@-76]|[@@-74]|[@@-72]|[@@-70]|[@@-68]|[@@-66]|[@@-64]}
            <Call 0x2176a 0x22e94>                                              {[-2-]|[@@-78]|[@@-76]|[@@-74]|[@@-72]|[@@-70]|[@@-68]|[@@-66]|[@@-64]}
                exp_TEST_READ_IBUFF.SEQ(Sw_1, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2)
            <POP 21770-21774 StackAdj>                       Δ+34               {}
            <MI 21774  MOVE.W  (A6+0xc),D0>                                     {}
            <MI 21776  LSR.W   #0x8,D0>                                         {}
            <MI 21778  MOVE.B  D0,(A6-0x14)>                                    {}
            <MI 2177c  MOVE.W  (A6+0xc),D0>                                     {}
            <MI 2177e  ANDI.W  #0x00ff,D0>                                      {}
            <MI 21782  MOVE.B  D0,(A6-0x13)>                                    {}
            <MI 21786  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 21788  MOVE.W  (A6-0x14),-(A7)>              Δ-2                {[#0]|[2, '(A6-0x14)']}
            <Pointer.fp 0x2178c <LVAR -0x012 @ 1(r)>>        Δ-4                {[#0]|[2, '(A6-0x14)']|[@@-18]}
            <Call 0x21790 0x22fcc>                                              {[#0]|[2, '(A6-0x14)']|[@@-18]}
                exp_READ_DECODE.SEQ(Sw_1, Sw_2, &Sr_2_1_1_1)
            <POP 21796-21798 StackAdj>                       Δ+8                {}
            <MI 21798  MOVE.B  (A6-0x12),(A6-0x7)>                              {}
            <MI 2179e  MOVE.B  (A6-0x11),(A6-0x6)>                              {}
            <MI 217a4  CLR.L   D0>                                              {}
            <MI 217a6  MOVE.B  (A6-0x10),D0>                                    {}
            <MI 217aa  ANDI.W  #0x0003,D0>                                      {}
            <MI 217ae  MOVE.B  D0,(A6-0x5)>                                     {}
            <MI 217b2  MOVE.B  (A6-0xf),(A6-0x4)>                               {}
            <MI 217b8  MOVE.B  (A6-0xe),(A6-0x3)>                               {}
            <MI 217be  MOVE.W  (A6+0xc),D0>                                     {}
            <MI 217c0  CMPI.W  #0x03ff,D0>                                      {}
            <MI 217c4  BLS     0x217d4>                                         {}
        <POP 217c6-217d4 Naked>                              Σ0         ↓
            <MI 217c6  CLR.L   D0>                                              {}
            <MI 217c8  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 217cc  ANDI.W  #0x00df,D0>                                      {}
            <MI 217d0  MOVE.B  D0,(A6-0x4)>                                     {}
        <POP 217d4-21854 Naked>                              Σ0         ↓ ←0x21716
            <Blob 0x217d4 [6] (A6-0x7)>                      Δ-6                {[«6»]}
            <MI 217e4  PEA.L   (A7)>                         Δ-4                {[«6»]|[4, '^(A7)']}
            <Const 0x217e6 0x0.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]}
            <Const 0x217ea 0x4.4>                            Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]}
            <MI 217ee  MOVEA.L (A6+0x8),A0>                                     {[«6»]|[4, '^(A7)']|[##0]|[##4]}
            <MI 217f2  PEA.L   (A0)>                         Δ-4                {[«6»]|[4, '^(A7)']|[##0]|[##4]|[4, '^(A0)']}
            <Call 0x217f4 0x104b4>                                              {[«6»]|[4, '^(A7)']|[##0]|[##4]|[4, '^(A0)']}
                ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
            <POP 217fa-217fc StackAdj>                       Δ+20               {[-2-]}
            <MI 217fc  CLR.B   (A7)>                                            {[-2-]}
            <POP 217fe-21800 StackAdj>                       Δ-4                {[-6-]}
            <MI 21800  MOVE.B  (A6-0xd),(A7)>                                   {[-6-]}
            <MI 21804  MOVE.B  (A6-0xc),(A7+0x1)>                               {[-6-]}
            <MI 2180a  MOVE.B  (A6-0xb),(A7+0x2)>                               {[-6-]}
            <MI 21810  MOVE.W  (A6-0xa),-(A7)>               Δ-2                {[-6-]|[2, '(A6-0xa)']}
            <MI 21814  MOVE.B  (A6-0x8),-(A7)>               Δ-2                {[-6-]|[2, '(A6-0xa)']|[2, '(A6-0x8)']}
            <Call 0x21818 0x22ee4>                                              {[-6-]|[2, '(A6-0xa)']|[2, '(A6-0x8)']}
                exp_TEST_LOAD_MACRO_PC.SEQ(Sw_1, Sw_3, Sw_2, Sw_1)
            <POP 2181e-21820 StackAdj>                       Δ+8                {[-2-]}
            <MI 21820  CLR.B   (A7)>                                            {[-2-]}
            <MI 21822  MOVE.L  (A6-0x4a),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x4a)']}
            <MI 21826  MOVE.L  (A6-0x4e),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x4a)']|[4, '(A6-0x4e)']}
            <MI 2182a  MOVE.L  (A6-0x42),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x4a)']|[4, '(A6-0x4e)']|[4, '(A6-0x42)']}
            <MI 2182e  MOVE.L  (A6-0x46),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x4a)']|[4, '(A6-0x4e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']}
            <Call 0x21832 0x22f0c>                                              {[-2-]|[4, '(A6-0x4a)']|[4, '(A6-0x4e)']|[4, '(A6-0x42)']|[4, '(A6-0x46)']}
                exp_TEST_LOAD_IBUFF.SEQ(Sw_1, Sw_8, Sw_8)
            <POP 21838-2183a StackAdj>                       Δ+18               {}
            <Pointer.fp 0x2183a <LVAR -0x03e @>>             Δ-4                {[@@-62]}
            <Pointer.fp 0x2183e <LVAR -0x038 @>>             Δ-4                {[@@-62]|[@@-56]}
            <Pointer.fp 0x21842 <LVAR -0x02f @>>             Δ-4                {[@@-62]|[@@-56]|[@@-47]}
            <Pointer.fp 0x21846 <LVAR -0x02a @>>             Δ-4                {[@@-62]|[@@-56]|[@@-47]|[@@-42]}
            <Pointer.fp 0x2184a <LVAR -0x024 @>>             Δ-4                {[@@-62]|[@@-56]|[@@-47]|[@@-42]|[@@-36]}
            <Call 0x2184e 0x214f6>                                              {[@@-62]|[@@-56]|[@@-47]|[@@-42]|[@@-36]}
            <POP 21852-21854 StackAdj>                       Δ+20               {}
        <POP 21854-2185c Epilogue>                           Σ0         

0x2185c


@ 2185c
        <LVAR  0x010 1(w)>
        <LVAR  0x00f 1(w)>
        <LVAR  0x00e 1(w)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
    <POP 2185c-218c6 Body>                                              
        <POP 2185c-21872 Prologue>                           Σ0         ↓
        <POP 21872-21874 RegCacheLoad>                       Σ0         ↓
        <POP 21874-2187a Naked>                              Σ0         ↓ →0x21894
            <MI 21874  TST.B   (A6+0xc)>                                        {}
            <MI 21878  BNE     0x21894>                                         {}
        <POP 2187a-21894 Naked>                              Σ0         →0x218ac
            <MI 2187a  MOVE.L  (A6+0x8),D0>                                     {}
            <POP 0x2187e LimitCheck 0x0 ≤ D0 ≤ 0x27>                            {}
            <MI 21884  MOVE.L  D0,D4>                                           {}
            <MI 21886  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x21888 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 2188e  LEA.L   0x208ac,A0>                                      {}
            <MI 21892  BRA     0x218ac>                                         {}
        <POP 21894-218ac Naked>                              Σ0         ↓ ←0x21874
            <MI 21894  MOVE.L  (A6+0x8),D0>                                     {}
            <POP 0x21898 LimitCheck 0x0 ≤ D0 ≤ 0x27>                            {}
            <MI 2189e  MOVE.L  D0,D4>                                           {}
            <MI 218a0  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x218a2 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 218a8  LEA.L   0x20834,A0>                                      {}
        <POP 218ac-218be Naked>                              Σ0         ↓ ←0x2187a
            <MI 218ac  MOVE.B  (A0+D4.L),(A6+0xe)>                              {}
            <MI 218b2  MOVE.B  (A0+D4.L+#0x1),(A6+0xf)>                         {}
            <MI 218b8  MOVE.B  (A0+D4.L+#0x2),(A6+0x10)>                        {}
        <POP 218be-218c6 Epilogue>                           Σ0         

0x218c6


@ 218c6
        <LVAR  0x00a 1(w)>
        <LVAR  0x008 2(r)>
    <POP 218c6-218f6 Body>                                              
        <POP 218c6-218dc Prologue>                           Σ0         ↓
        <POP 218dc-218ee Naked>                              Σ0         ↓
            <MI 218dc  MOVE.W  (A6+0x8),D7>                                     {}
            <MI 218e0  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <MI 218e2  CLR.L   D0>                                              {[2, 'D7']}
            <MI 218e4  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <POP 0x218e6 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {}
            <MI 218ea  MOVE.B  D0,(A6+0xa)>                                     {}
        <POP 218ee-218f6 Epilogue>                           Σ0         

0x218f6


@ 218f6
        <LVAR  0x00c 4(w)>
        <LVAR  0x008 4(r)>
    <POP 218f6-219b8 Body>                                   Δ+16       
        <POP 218f6-2190c Prologue>                           Σ0         ↓
        <POP 2190c-21926 Naked>                              Σ0         →0x21932 →0x21946 →0x2195a →0x2196e →0x21982
            <MI 2190c  MOVE.L  (A6+0x8),D0>                                     {}
            <MI 21910  SUBQ.L  #0x2,D0>                                         {}
            <POP 0x21912 LimitCheck 0x0 ≤ D0 ≤ 0x5>                             {}
            <MI 2191c  ADD.W   D0,D0>                                           {}
            <MI 2191e  SWITCH  D0.W>                                            {}
        <POP 21932-21946 Naked>                              Σ0 Δ-4     →0x21994 ←0x2190c
            <POP 21932-21934 StackAdj>                       Δ-4                {[-4-]}
            <POP 21934-21935 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x21935 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 21938  MOVE.B  0x20635,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2193e  MOVE.B  0x20636,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 21944  BRA     0x21994>                                         {[-2-]|[«2""»]}
        <POP 21946-2195a Naked>                              Σ0 Δ-4     →0x21994 ←0x2190c
            <POP 21946-21948 StackAdj>                       Δ-4                {[-4-]}
            <POP 21948-21949 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x21949 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 2194c  MOVE.B  0x20639,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 21952  MOVE.B  0x2063a,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 21958  BRA     0x21994>                                         {[-2-]|[«2""»]}
        <POP 2195a-2196e Naked>                              Σ0 Δ-4     →0x21994 ←0x2190c
            <POP 2195a-2195c StackAdj>                       Δ-4                {[-4-]}
            <POP 2195c-2195d StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2195d [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 21960  MOVE.B  0x2063d,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 21966  MOVE.B  0x2063e,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 2196c  BRA     0x21994>                                         {[-2-]|[«2""»]}
        <POP 2196e-21982 Naked>                              Σ0 Δ-4     →0x21994 ←0x2190c
            <POP 2196e-21970 StackAdj>                       Δ-4                {[-4-]}
            <POP 21970-21971 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x21971 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 21974  MOVE.B  0x20641,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2197a  MOVE.B  0x20642,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 21980  BRA     0x21994>                                         {[-2-]|[«2""»]}
        <POP 21982-21994 Naked>                              Σ0 Δ-4     ↓ ←0x2190c
            <POP 21982-21984 StackAdj>                       Δ-4                {[-4-]}
            <POP 21984-21985 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x21985 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 21988  MOVE.B  0x20645,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2198e  MOVE.B  0x20646,(A7+0x2)>                                {[-2-]|[«2""»]}
        <POP 21994-219b0 Naked>                              Σ-4 Δ+4    ↓ ←0x21932 ←0x21946 ←0x2195a ←0x2196e
            <POP 21994-21996 StackAdj>                       Δ-4                {[-8-]}
            <Lit 0x21996>                                                       {[-4-]|[$$…]}
                <Pointer.sp 0x21996 4>                       Δ-4        
                <Const 0x2199a 0x1.2>                        Δ-2        
                <Const 0x2199e 0x3.2>                        Δ-2        
                <Call 0x219a2 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 219a8-219aa StackAdj>                   Δ+8        
            <MI 219aa  MOVE.L  (A7)+,(A6+0xc)>               Δ+4                {[-4-]}
            <POP 219ae-219b0 StackAdj>                       Δ+4                {}
        <POP 219b0-219b8 Epilogue>                           Σ0         

0x219b8


@ 219b8
        <LVAR  0x008 4(r)>
    <POP 219b8-219fc Body>                                              
        <POP 219b8-219ce Prologue>                           Σ0         ↓
        <POP 219ce-219d4 RegCacheLoad>                       Σ0         ↓
        <POP 219d4-219f4 Naked>                              Σ0         ↓
            <POP 219d4-219d6 StackAdj>                       Δ-4                {[-4-]}
            <Blob 0x219d6 [4] 0x2337c>                       Δ-4                {[-4-]|[«4»]}
            <MI 219d8  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[«4»]|[4, '(A6+0x8)']}
            <Call 0x219dc 0x102d0>                                              {[-4-]|[«4»]|[4, '(A6+0x8)']}
                StringCat2(a, b : String) : String
            <POP 219e2-219e4 StackAdj>                       Δ+8                {[-4-]}
            <MI 219e4  MOVE.L  (A7)+,0x2337c>                Δ+4                {}
            <Blob 0x219e6 [4] 0x2337c>                       Δ-4                {[«4»]}
            <Const 0x219e8 0x5c.2>                           Δ-2                {[«4»]|[#92]}
            <Call 0x219ec 0x102c0>                                              {[«4»]|[#92]}
                AppendChar(MOD b : String; a : char)
            <POP 219f2-219f4 StackAdj>                       Δ+6                {}
        <POP 219f4-219fc Epilogue>                           Σ0         

0x219fc


@ 219fc
    <POP 219fc-21a4a Body>                                              
        <POP 219fc-21a12 Prologue>                           Σ0         ↓
        <POP 21a12-21a14 RegCacheLoad>                       Σ0         ↓
        <POP 21a14-21a16 Naked>                              Σ0         ↓
            <MI 21a14  MOVEQ.L #0x00,D7>                                        {}
        <POP 21a16-21a22 Naked>                              Σ0         ↓ →0x21a26 ←0x21a26
            <POP 0x21a16 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {}
            <MI 21a1c  TST.B   (A6+D7.L+#0x8)>                                  {}
            <MI 21a20  BNE     0x21a26>                                         {}
        <POP 21a22-21a24 Naked>                              Σ0         →0x21a42
            <MI 21a22  BRA     0x21a42>                                         {}
        <POP 21a26-21a42 Naked>                              Σ0         ↓ →0x21a16 ←0x21a16
            <POP 21a26-21a28 StackAdj>                       Δ-4                {[-4-]}
            <MI 21a28  CLR.L   D0>                                              {[-4-]}
            <MI 21a2a  MOVE.B  (A6+D7.L+#0x8),D0>                               {[-4-]}
            <MI 21a2e  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Call 0x21a30 0x218f6>                                              {[-4-]|[4, 'D0']}
            <POP 21a34-21a36 StackAdj>                       Δ+4                {[-4-]}
            <Call 0x21a36 0x219b8>                                              {[-4-]}
            <POP 21a3a-21a3c StackAdj>                       Δ+4                {}
            <MI 21a3c  ADDQ.L  #0x1,D7>                                         {}
            <MI 21a3e  CMP.L   #0x07,D7>                                        {}
            <MI 21a40  BLE     0x21a16>                                         {}
        <POP 21a42-21a4a Epilogue>                           Σ0         ←0x21a22

0x21a4a


@ 21a4a
        <LVAR  0x010 1(rw)>
        <LVAR  0x00e 2(w)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 21a4a-21a94 Body>                                              
        <POP 21a4a-21a60 Prologue>                           Σ0         ↓
        <POP 21a60-21a88 Naked>                              Σ0         ↓ →0x21a8c
            <MI 21a60  ANDI.W  #0xdff0,(A6+0xe)>                                {}
            <MI 21a66  CLR.B   (A6+0x10)>                                       {}
            <POP 21a6a-21a6c StackAdj>                       Δ-4                {[-4-]}
            <MI 21a6c  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 21a70  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x21a74 0x20dda>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 21a78-21a7a StackAdj>                       Δ+8                {[-4-]}
            <MI 21a7a  MOVE.L  (A7)+,D4>                     Δ+4                {}
            <MI 21a7c  MOVEQ.L #0x02,D3>                                        {}
            <Call 0x21a7e 0x10294>                                              {}
                ?divs_d3_d4
            <MI 21a84  TST.L   D3>                                              {}
            <MI 21a86  BNE     0x21a8c>                                         {}
        <POP 21a88-21a8c Naked>                              Σ0         ↓
            <MI 21a88  ADDQ.B  #0x1,(A6+0x10)>                                  {}
        <POP 21a8c-21a94 Epilogue>                           Σ0         ←0x21a60

0x21a94


@ 21a94
        <LVAR  0x070 1(r)>
        <LVAR  0x06f 1(r)>
        <LVAR  0x06e 1(r)>
        <LVAR  0x06d 1(r)>
        <LVAR  0x06c 1(r)>
        <LVAR  0x018 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 21a94-21b52 Body>                                              
        <POP 21a94-21aaa Prologue>                           Σ0         ↓
        <POP 21aaa-21aac RegCacheLoad>                       Σ0         ↓
        <POP 21aac-21aba Naked>                              Σ0 Δ-4     ↓
            <MI 21aac  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 21ab0  CLR.L   (A0)>                                            {}
            <MI 21ab2  MOVE.L  (A6+0x18),-(A7)>              Δ-4                {[4, '(A6+0x18)']}
            <MI 21ab6  SUBQ.L  #0x1,(A7)>                                       {[-4-]}
            <MI 21ab8  MOVEQ.L #0x00,D6>                                        {[-4-]}
        <POP 21aba-21ac0 Naked>                              Σ-4        ↓ →0x21b48 ←0x21b42
            <MI 21aba  CMP.L   (A7),D6>                                         {[-4-]}
            <MI 21abc  BGT     0x21b48>                                         {[-4-]}
        <POP 21ac0-21afc Naked>                              Σ-4        →0x21b0e →0x21b08 →0x21b20 →0x21b1a →0x21b14
            <POP 21ac0-21ac2 StackAdj>                       Δ-2                {[-6-]}
            <POP 0x21ac2 LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {[-6-]}
            <MI 21acc  CLR.L   D0>                                              {[-6-]}
            <MI 21ace  MOVE.B  (A6+D6.L+#0x10),D0>                              {[-6-]}
            <MI 21ad2  MOVE.W  D0,-(A7)>                     Δ-2                {[-6-]|[2, 'D0']}
            <Call 0x21ad4 0x218c6>                                              {[-6-]|[2, 'D0']}
            <POP 21ad8-21ada StackAdj>                       Δ+2                {[-6-]}
            <MI 21ada  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 21adc  EXTB.W  D0>                                              {[-4-]}
            <POP 0x21ade LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-4-]}
            <MI 21ae0  MOVE.B  D0,D5>                                           {[-4-]}
            <MI 21ae2  MOVE.B  D5,D0>                                           {[-4-]}
            <MI 21ae4  EXTB.W  D0>                                              {[-4-]}
            <MI 21ae6  MOVE.W  D0,D1>                                           {[-4-]}
            <MI 21ae8  SUBQ.W  #0x2,D1>                                         {[-4-]}
            <POP 0x21aea LimitCheck 0x0 ≤ D1 ≤ 0x5>                             {[-4-]}
            <MI 21af2  ADD.W   D1,D1>                                           {[-4-]}
            <MI 21af4  SWITCH  D1.W>                                            {[-4-]}
        <POP 21b08-21b0e Naked>                              Σ-4        →0x21b24 ←0x21ac0
            <MI 21b08  MOVE.B  (A6+0x6f),D7>                                    {[-4-]}
            <MI 21b0c  BRA     0x21b24>                                         {[-4-]}
        <POP 21b0e-21b14 Naked>                              Σ-4        →0x21b24 ←0x21ac0
            <MI 21b0e  MOVE.B  (A6+0x6e),D7>                                    {[-4-]}
            <MI 21b12  BRA     0x21b24>                                         {[-4-]}
        <POP 21b14-21b1a Naked>                              Σ-4        →0x21b24 ←0x21ac0
            <MI 21b14  MOVE.B  (A6+0x6c),D7>                                    {[-4-]}
            <MI 21b18  BRA     0x21b24>                                         {[-4-]}
        <POP 21b1a-21b20 Naked>                              Σ-4        →0x21b24 ←0x21ac0
            <MI 21b1a  MOVE.B  (A6+0x6d),D7>                                    {[-4-]}
            <MI 21b1e  BRA     0x21b24>                                         {[-4-]}
        <POP 21b20-21b24 Naked>                              Σ-4        ↓ ←0x21ac0
            <MI 21b20  MOVE.B  (A6+0x70),D7>                                    {[-4-]}
        <POP 21b24-21b3c Naked>                              Σ-4        ↓ →0x21b42 ←0x21b08 ←0x21b0e ←0x21b14 ←0x21b1a
            <MI 21b24  MOVEA.L (A6+0x8),A0>                                     {[-4-]}
            <POP 0x21b28 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-4-]}
            <MI 21b2a  ASL.W   #0x1,D0>                                         {[-4-]}
            <MI 21b2c  MOVE.B  D7,D1>                                           {[-4-]}
            <MI 21b2e  EXTB.W  D1>                                              {[-4-]}
            <POP 0x21b30 LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {[-4-]}
            <MI 21b34  MOVE.B  D1,(A0+D0.W)>                                    {[-4-]}
            <MI 21b38  TST.W   D1>                                              {[-4-]}
            <MI 21b3a  BEQ     0x21b42>                                         {[-4-]}
        <POP 21b3c-21b42 Naked>                              Σ-4        ↓
            <MI 21b3c  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 21b40  ADDQ.L  #0x1,(A0)>                                       {[-4-]}
        <POP 21b42-21b48 Naked>                              Σ-4        ↓ →0x21aba ←0x21b24
            <MI 21b42  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 21b44  BVC     0x21aba>                                         {[-4-]}
        <POP 21b48-21b4a Naked>                              Σ-4 Δ+4    ↓ ←0x21aba
            <POP 21b48-21b4a StackAdj>                       Δ+4                {}
        <POP 21b4a-21b52 Epilogue>                           Σ0         

0x21b52


@ 21b52
        <LVAR  0x064 4(w)>
        <LVAR  0x060 4(w)>
        <LVAR  0x056 4(r)>
        <LVAR  0x052 4(r)>
        <LVAR  0x04e 4(r)>
        <LVAR  0x04a 4(r)>
        <LVAR  0x046 4(r)>
        <LVAR  0x042 4(r)>
        <LVAR  0x03e 4(r)>
        <LVAR  0x03a 4(r)>
        <LVAR  0x036 4(r)>
        <LVAR  0x032 4(r)>
        <LVAR  0x02e 4(r)>
        <LVAR  0x02a 4(r)>
        <LVAR  0x026 4(r)>
        <LVAR  0x022 4(r)>
        <LVAR  0x01e 4(r)>
        <LVAR  0x01a 4(r)>
        <LVAR  0x016 4(r)>
        <LVAR  0x012 4(r)>
        <LVAR  0x00e 4(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 21b52-21c0a Body>                                   Δ+96       
        <POP 21b52-21b68 Prologue>                           Σ0         ↓
        <POP 21b68-21b82 Naked>                              Σ0         →0x21bca →0x21b8e →0x21bde →0x21ba2 →0x21bb6
            <MI 21b68  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 21b6c  EXTB.W  D0>                                              {}
            <MI 21b6e  SUBQ.W  #0x2,D0>                                         {}
            <POP 0x21b70 LimitCheck 0x0 ≤ D0 ≤ 0x5>                             {}
            <MI 21b78  ADD.W   D0,D0>                                           {}
            <MI 21b7a  SWITCH  D0.W>                                            {}
        <POP 21b8e-21ba2 Naked>                              Σ0 Δ-24    →0x21bf0 ←0x21b68
            <POP 21b8e-21b90 StackAdj>                       Δ-8                {[-8-]}
            <MI 21b90  MOVE.L  (A6+0x26),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x26)']}
            <MI 21b94  MOVE.L  (A6+0x22),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x26)']|[4, '(A6+0x22)']}
            <MI 21b98  MOVE.L  (A6+0x4e),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x26)']|[4, '(A6+0x22)']|[4, '(A6+0x4e)']}
            <MI 21b9c  MOVE.L  (A6+0x4a),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x26)']|[4, '(A6+0x22)']|[4, '(A6+0x4e)']|[4, '(A6+0x4a)']}
            <MI 21ba0  BRA     0x21bf0>                                         {[-8-]|[4, '(A6+0x26)']|[4, '(A6+0x22)']|[4, '(A6+0x4e)']|[4, '(A6+0x4a)']}
        <POP 21ba2-21bb6 Naked>                              Σ0 Δ-24    →0x21bf0 ←0x21b68
            <POP 21ba2-21ba4 StackAdj>                       Δ-8                {[-8-]}
            <MI 21ba4  MOVE.L  (A6+0x16),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x16)']}
            <MI 21ba8  MOVE.L  (A6+0x12),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x16)']|[4, '(A6+0x12)']}
            <MI 21bac  MOVE.L  (A6+0x3e),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[4, '(A6+0x3e)']}
            <MI 21bb0  MOVE.L  (A6+0x3a),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[4, '(A6+0x3e)']|[4, '(A6+0x3a)']}
            <MI 21bb4  BRA     0x21bf0>                                         {[-8-]|[4, '(A6+0x16)']|[4, '(A6+0x12)']|[4, '(A6+0x3e)']|[4, '(A6+0x3a)']}
        <POP 21bb6-21bca Naked>                              Σ0 Δ-24    →0x21bf0 ←0x21b68
            <POP 21bb6-21bb8 StackAdj>                       Δ-8                {[-8-]}
            <MI 21bb8  MOVE.L  (A6+0xe),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0xe)']}
            <MI 21bbc  MOVE.L  (A6+0xa),-(A7)>               Δ-4                {[-8-]|[4, '(A6+0xe)']|[4, '(A6+0xa)']}
            <MI 21bc0  MOVE.L  (A6+0x36),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0xe)']|[4, '(A6+0xa)']|[4, '(A6+0x36)']}
            <MI 21bc4  MOVE.L  (A6+0x32),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0xe)']|[4, '(A6+0xa)']|[4, '(A6+0x36)']|[4, '(A6+0x32)']}
            <MI 21bc8  BRA     0x21bf0>                                         {[-8-]|[4, '(A6+0xe)']|[4, '(A6+0xa)']|[4, '(A6+0x36)']|[4, '(A6+0x32)']}
        <POP 21bca-21bde Naked>                              Σ0 Δ-24    →0x21bf0 ←0x21b68
            <POP 21bca-21bcc StackAdj>                       Δ-8                {[-8-]}
            <MI 21bcc  MOVE.L  (A6+0x1e),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x1e)']}
            <MI 21bd0  MOVE.L  (A6+0x1a),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x1e)']|[4, '(A6+0x1a)']}
            <MI 21bd4  MOVE.L  (A6+0x46),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x1e)']|[4, '(A6+0x1a)']|[4, '(A6+0x46)']}
            <MI 21bd8  MOVE.L  (A6+0x42),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x1e)']|[4, '(A6+0x1a)']|[4, '(A6+0x46)']|[4, '(A6+0x42)']}
            <MI 21bdc  BRA     0x21bf0>                                         {[-8-]|[4, '(A6+0x1e)']|[4, '(A6+0x1a)']|[4, '(A6+0x46)']|[4, '(A6+0x42)']}
        <POP 21bde-21bf0 Naked>                              Σ0 Δ-24    ↓ ←0x21b68
            <POP 21bde-21be0 StackAdj>                       Δ-8                {[-8-]}
            <MI 21be0  MOVE.L  (A6+0x2e),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x2e)']}
            <MI 21be4  MOVE.L  (A6+0x2a),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x2e)']|[4, '(A6+0x2a)']}
            <MI 21be8  MOVE.L  (A6+0x56),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x2e)']|[4, '(A6+0x2a)']|[4, '(A6+0x56)']}
            <MI 21bec  MOVE.L  (A6+0x52),-(A7)>              Δ-4                {[-8-]|[4, '(A6+0x2e)']|[4, '(A6+0x2a)']|[4, '(A6+0x56)']|[4, '(A6+0x52)']}
        <POP 21bf0-21c02 Naked>                              Σ-24 Δ+24  ↓ ←0x21b8e ←0x21ba2 ←0x21bb6 ←0x21bca
            <Call 0x21bf0 0x10340>                                              {[-24-]}
                BitXor(a, b : Quad) : Quad
            <POP 21bf6-21bfa StackAdj>                       Δ+16               {[-8-]}
            <MI 21bfa  MOVE.L  (A7)+,(A6+0x60)>              Δ+4                {[-4-]}
            <MI 21bfe  MOVE.L  (A7)+,(A6+0x64)>              Δ+4                {}
        <POP 21c02-21c0a Epilogue>                           Σ0         

0x21c0a


@ 21c0a
        <LVAR  0x01c 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 4(rw)>
        <LVAR -0x008 4(rw)>
    <POP 21c0a-21cee Body>                                              
        <POP 21c0a-21c20 Prologue>                           Σ0         ↓
        <POP 21c20-21c2a RegCacheLoad>                       Σ0         ↓
        <POP 21c2a-21c3e Naked>                              Σ0 Δ-4     ↓
            <MI 21c2a  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 21c2e  CLR.L   (A0)>                                            {}
            <MI 21c30  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 21c34  CLR.L   (A0)>                                            {}
            <MI 21c36  MOVE.L  (A6+0x1c),-(A7)>              Δ-4                {[4, '(A6+0x1c)']}
            <MI 21c3a  SUBQ.L  #0x1,(A7)>                                       {[-4-]}
            <MI 21c3c  MOVEQ.L #0x00,D7>                                        {[-4-]}
        <POP 21c3e-21c44 Naked>                              Σ-4        ↓ →0x21ce4 ←0x21cde
            <MI 21c3e  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 21c40  BGT     0x21ce4>                                         {[-4-]}
        <POP 21c44-21cc0 Naked>                              Σ-4        ↓ →0x21cc8
            <POP 21c44-21c46 StackAdj>                       Δ-2                {[-6-]}
            <POP 0x21c46 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {[-6-]}
            <MI 21c50  CLR.L   D0>                                              {[-6-]}
            <MI 21c52  MOVE.B  (A6+D7.L+#0x14),D0>                              {[-6-]}
            <MI 21c56  MOVE.W  D0,-(A7)>                     Δ-2                {[-6-]|[2, 'D0']}
            <Call 0x21c58 0x218c6>                                              {[-6-]|[2, 'D0']}
            <POP 21c5c-21c5e StackAdj>                       Δ+2                {[-6-]}
            <MI 21c5e  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 21c60  EXTB.W  D0>                                              {[-4-]}
            <POP 0x21c62 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-4-]}
            <MI 21c64  MOVE.B  D0,D6>                                           {[-4-]}
            <POP 21c66-21c67 StackAdj>                       Δ-8        ↓       {[-12-]}
            <Blob 0x21c67 [86] (A6+0x20)>                    Δ-86               {[-12-]|[«86»]}
            <MI 21c78  MOVE.B  D6,D0>                                           {[-12-]|[«86»]}
            <MI 21c7a  EXTB.W  D0>                                              {[-12-]|[«86»]}
            <POP 0x21c7c LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-12-]|[«86»]}
            <MI 21c7e  MOVE.B  D0,-(A7)>                     Δ-2                {[-12-]|[«86»]|[2, 'D0']}
            <Call 0x21c80 0x21b52>                                              {[-12-]|[«86»]|[2, 'D0']}
            <POP 21c84-21c88 StackAdj>                       Δ+88               {[-12-]}
            <MI 21c88  MOVE.L  (A7)+,(A6-0x8)>               Δ+4                {[-8-]}
            <MI 21c8a  MOVE.L  (A7)+,(A6-0x4)>               Δ+4                {[-4-]}
            <MI 21c8c  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 21c90  MOVE.B  D6,D0>                                           {[-4-]}
            <MI 21c92  EXTB.W  D0>                                              {[-4-]}
            <POP 0x21c94 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-4-]}
            <MI 21c96  ASL.W   #0x1,D0>                                         {[-4-]}
            <POP 21c98-21c9a StackAdj>                       Δ-2                {[-6-]}
            <MI 21c9a  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-6-]|[4, '(A6-0x4)']}
            <MI 21c9c  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-6-]|[4, '(A6-0x4)']|[4, '(A6-0x8)']}
            <Blob 0x21c9e [4] @>                             Δ-4                {[-6-]|[4, '(A6-0x4)']|[4, '(A6-0x8)']|[«4""»]}
            <Blob 0x21ca2 [4] @>                             Δ-4                {[-6-]|[4, '(A6-0x4)']|[4, '(A6-0x8)']|[«4""»]|[«4""»]}
            <Call 0x21ca6 0x1032c>                                              {[-6-]|[4, '(A6-0x4)']|[4, '(A6-0x8)']|[«4""»]|[«4""»]}
                IsEqual(a, b : Quad) : Bool
            <POP 21cac-21cb0 StackAdj>                       Δ+16               {[-6-]}
            <MI 21cb0  MOVE.B  (A7)+,D1>                     Δ+2                {[-4-]}
            <MI 21cb2  EXTB.W  D1>                                              {[-4-]}
            <POP 0x21cb4 LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {[-4-]}
            <MI 21cb8  MOVE.B  D1,(A0+D0.W+#0x1)>                               {[-4-]}
            <MI 21cbc  TST.B   D1>                                              {[-4-]}
            <MI 21cbe  BEQ     0x21cc8>                                         {[-4-]}
        <POP 21cc0-21cc8 Naked>                              Σ-4        →0x21cde
            <MI 21cc0  MOVEA.L (A6+0x10),A0>                                    {[-4-]}
            <MI 21cc4  ADDQ.L  #0x1,(A0)>                                       {[-4-]}
            <MI 21cc6  BRA     0x21cde>                                         {[-4-]}
        <POP 21cc8-21cde Naked>                              Σ-4        ↓ ←0x21c44
            <MI 21cc8  MOVEA.L (A6+0x8),A0>                                     {[-4-]}
            <POP 21ccc-21cce StackAdj>                       Δ-4                {[-8-]}
            <MI 21cce  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0x4)']}
            <MI 21cd0  MOVE.L  (A6-0x8),-(A7)>               Δ-4                {[-8-]|[4, '(A6-0x4)']|[4, '(A6-0x8)']}
            <Call 0x21cd2 0x20dda>                                              {[-8-]|[4, '(A6-0x4)']|[4, '(A6-0x8)']}
            <POP 21cd6-21cd8 StackAdj>                       Δ+8                {[-8-]}
            <MI 21cd8  MOVE.L  (A0),D0>                                         {[-8-]}
            <MI 21cda  ADD.L   (A7)+,D0>                     Δ+4                {[-4-]}
            <MI 21cdc  MOVE.L  D0,(A0)>                                         {[-4-]}
        <POP 21cde-21ce4 Naked>                              Σ-4        ↓ →0x21c3e ←0x21cc0
            <MI 21cde  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 21ce0  BVC     0x21c3e>                                         {[-4-]}
        <POP 21ce4-21ce6 Naked>                              Σ-4 Δ+4    ↓ ←0x21c3e
            <POP 21ce4-21ce6 StackAdj>                       Δ+4                {}
        <POP 21ce6-21cee Epilogue>                           Σ0         

0x21cee


@ 21cee
        <LVAR  0x008 1(rw)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x004 @>
    <POP 21cee-21d28 Body>                                              
        <POP 21cee-21d04 Prologue>                           Σ0         ↓
        <POP 21d04-21d08 RegCacheLoad>                       Σ0         ↓
        <POP 21d08-21d20 Naked>                              Σ0         ↓
            <Pointer.fp 0x21d08 <LVAR -0x004 @>>             Δ-4                {[@@-4]}
            <Pointer.fp 0x21d0c <LVAR -0x002 @ 1(r)>>        Δ-4                {[@@-4]|[@@-2]}
            <Call 0x21d10 0x23006>                                              {[@@-4]|[@@-2]}
                exp_READ_CUR_UADR_AND_PARITY.SEQ(&Sr_2, &Fr)
            <POP 21d16-21d18 StackAdj>                       Δ+8                {}
            <MI 21d18  MOVE.B  (A6-0x2),(A6+0x8)>                               {}
            <MI 21d1c  NEG.B   (A6+0x8)>                                        {}
            <MI 21d1e  ADDQ.B  #0x1,(A6+0x8)>                                   {}
        <POP 21d20-21d28 Epilogue>                           Σ0         

0x21d28


@ 21d28
        <LVAR  0x00a 1(r)>
        <LVAR  0x009 1(r)>
        <LVAR  0x008 1(r)>
    <POP 21d28-21d9c Body>                                              
        <POP 21d28-21d3e Prologue>                           Σ0         ↓
        <POP 21d3e-21d46 RegCacheLoad>                       Σ0         ↓
        <POP 21d46-21d94 Naked>                              Σ0         ↓
            <POP 21d46-21d48 StackAdj>                       Δ-4                {[-4-]}
            <MI 21d48  MOVE.B  (A6+0x8),(A7)>                                   {[-4-]}
            <MI 21d4c  MOVE.B  (A6+0x9),(A7+0x1)>                               {[-4-]}
            <MI 21d52  MOVE.B  (A6+0xa),(A7+0x2)>                               {[-4-]}
            <Blob 0x21d58 [2] @>                             Δ-2                {[-4-]|[«2""»]}
            <POP 21d5c-21d5e StackAdj>                       Δ-4                {[-4-]|[«2""»]|[-4-]}
            <Blob 0x21d5e [4] 0x2337c>                       Δ-4                {[-4-]|[«2""»]|[-4-]|[«4»]}
            <POP 21d60-21d62 StackAdj>                       Δ-4                {[-4-]|[«2""»]|[-4-]|[«4»]|[-4-]}
            <Lit 0x21d62>                                                       {[-4-]|[«2""»]|[-4-]|[«4»]|[$$…]}
                <Pointer.sp 0x21d62 14>                      Δ-4        
                <Const 0x21d66 0x1.2>                        Δ-2        
                <Const 0x21d68 0x3.2>                        Δ-2        
                <Call 0x21d6c 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 21d72-21d74 StackAdj>                   Δ+8        
            <POP 21d72-21d74 StackAdj>                       Δ-4                {[-4-]|[«2""»]|[-4-]|[«4»]|[$$…]|[-4-]}
            <Lit 0x21d74 2>                                                     {[-4-]|[«2""»]|[-4-]|[«4»]|[$$…]|[$$\ ]}
            <Call 0x21d86 0x102d4>                                              {[-4-]|[«2""»]|[-4-]|[«4»]|[$$…]|[$$\ ]}
                StringCat3(a, b, c : String) : String
            <POP 21d8c-21d90 StackAdj>                       Δ+12               {[-4-]|[«2""»]|[-4-]}
            <MI 21d90  MOVE.L  (A7)+,0x2337c>                Δ+4                {[-4-]|[«2""»]}
            <POP 21d92-21d94 StackAdj>                       Δ+6                {}
        <POP 21d94-21d9c Epilogue>                           Σ0         

0x21d9c


@ 21d9c
        <LVAR  0x010 4(r)>
        <LVAR  0x008 1(r)>
        <LVAR -0x058 @>
        <LVAR -0x05c 4(rw)>
        <LVAR -0x060 4(rw)>
    <POP 21d9c-21fe6 Body>                                              
        <POP 21d9c-21db2 Prologue>                           Σ0         ↓
        <POP 21db2-21dc8 RegCacheLoad>                       Σ0         ↓
        <POP 21dc8-21e2e Naked>                              Σ0         →0x21f90 →0x21e3a →0x21f38 →0x21ee6 →0x21e8c
            <MI 21dc8  MOVE.L  (A6+0x10),D0>                                    {}
            <POP 0x21dcc LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 21dd2  MOVE.W  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Pointer.fp 0x21dd4 <LVAR -0x058 @>>             Δ-4                {[2, 'D0']|[@@-88]}
            <Call 0x21dd8 0x21256>                                              {[2, 'D0']|[@@-88]}
            <POP 21ddc-21dde StackAdj>                       Δ+4                {[2, 'D0']}
            <MI 21dde  CLR.L   D0>                                              {[2, 'D0']}
            <MI 21de0  MOVE.B  (A6+0x8),D0>                                     {[2, 'D0']}
            <MI 21de4  MOVE.W  D0,-(A7)>                     Δ-2                {[2, 'D0']|[2, 'D0']}
            <Call 0x21de6 0x218c6>                                              {[2, 'D0']|[2, 'D0']}
            <POP 21dea-21dec StackAdj>                       Δ+2                {[2, 'D0']}
            <MI 21dec  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 21dee  EXTB.W  D0>                                              {}
            <POP 0x21df0 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {}
            <MI 21df4  MOVE.B  D0,D6>                                           {}
            <POP 21df6-21df7 StackAdj>                       Δ-8        ↓       {[-8-]}
            <Blob 0x21df7 [86] (A6-0x58)>                    Δ-86               {[-8-]|[«86»]}
            <MI 21e08  MOVE.B  D6,-(A7)>                     Δ-2                {[-8-]|[«86»]|[2, 'D6']}
            <Call 0x21e0a 0x21b52>                                              {[-8-]|[«86»]|[2, 'D6']}
            <POP 21e0e-21e12 StackAdj>                       Δ+88               {[-8-]}
            <MI 21e12  MOVE.L  (A7)+,(A6-0x60)>              Δ+4                {[-4-]}
            <MI 21e14  MOVE.L  (A7)+,(A6-0x5c)>              Δ+4                {}
            <MI 21e16  MOVE.B  D6,D0>                                           {}
            <MI 21e18  EXTB.W  D0>                                              {}
            <MI 21e1a  SUBQ.W  #0x2,D0>                                         {}
            <POP 0x21e1c LimitCheck 0x0 ≤ D0 ≤ 0x5>                             {}
            <MI 21e24  ADD.W   D0,D0>                                           {}
            <MI 21e26  SWITCH  D0.W>                                            {}
        <POP 21e3a-21e3c Naked>                              Σ0         ↓ ←0x21dc8
            <MI 21e3a  MOVEQ.L #0x00,D7>                                        {}
        <POP 21e3c-21e56 Naked>                              Σ0         ↓ →0x21e82 ←0x21e82
            <POP 21e3c-21e3e StackAdj>                       Δ-2                {[-2-]}
            <MI 21e3e  MOVE.L  (A6-0x5c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']}
            <MI 21e40  MOVE.L  (A6-0x60),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21e42  MOVEQ.L #0x10,D0>                                        {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21e44  ADD.L   D7,D0>                                           {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <POP 0x21e46 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21e4c  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <Call 0x21e4e 0x20d2e>                                              {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <POP 21e50-21e52 StackAdj>                       Δ+10               {[-2-]}
            <MI 21e52  TST.B   (A7)+>                        Δ+2                {}
            <MI 21e54  BEQ     0x21e82>                                         {}
        <POP 21e56-21e82 Naked>                              Σ0         ↓
            <POP 0x21e56 LimitCheck 0x0 ≤ D7 ≤ 0x2f>                            {}
            <MI 21e5c  MOVE.L  D7,D4>                                           {}
            <MI 21e5e  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x21e60 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 21e66  LEA.L   0x20954,A0>                                      {}
            <POP 21e6a-21e6c StackAdj>                       Δ-4                {[-4-]}
            <MI 21e6c  MOVE.B  (A0+D4.L),(A7)>                                  {[-4-]}
            <MI 21e70  MOVE.B  (A0+D4.L+#0x1),(A7+0x1)>                         {[-4-]}
            <MI 21e76  MOVE.B  (A0+D4.L+#0x2),(A7+0x2)>                         {[-4-]}
            <Call 0x21e7c 0x21d28>                                              {[-4-]}
            <POP 21e80-21e82 StackAdj>                       Δ+4                {}
        <POP 21e82-21e88 Naked>                              Σ0         ↓ →0x21e3c ←0x21e3c
            <MI 21e82  ADDQ.L  #0x1,D7>                                         {}
            <MI 21e84  CMP.L   #0x2f,D7>                                        {}
            <MI 21e86  BLE     0x21e3c>                                         {}
        <POP 21e88-21e8c Naked>                              Σ0         →0x21fde
            <MI 21e88  BRA     0x21fde>                                         {}
        <POP 21e8c-21e8e Naked>                              Σ0         ↓ ←0x21dc8
            <MI 21e8c  MOVEQ.L #0x00,D7>                                        {}
        <POP 21e8e-21ea8 Naked>                              Σ0         ↓ →0x21ed8 ←0x21ed8
            <POP 21e8e-21e90 StackAdj>                       Δ-2                {[-2-]}
            <MI 21e90  MOVE.L  (A6-0x5c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']}
            <MI 21e92  MOVE.L  (A6-0x60),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21e94  MOVEQ.L #0x18,D0>                                        {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21e96  ADD.L   D7,D0>                                           {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <POP 0x21e98 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21e9e  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <Call 0x21ea0 0x20d2e>                                              {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <POP 21ea2-21ea4 StackAdj>                       Δ+10               {[-2-]}
            <MI 21ea4  TST.B   (A7)+>                        Δ+2                {}
            <MI 21ea6  BEQ     0x21ed8>                                         {}
        <POP 21ea8-21ed8 Naked>                              Σ0         ↓
            <POP 0x21ea8 LimitCheck 0x0 ≤ D7 ≤ 0x27>                            {}
            <MI 21eb2  MOVE.L  D7,D4>                                           {}
            <MI 21eb4  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x21eb6 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 21ebc  LEA.L   0x209e4,A0>                                      {}
            <POP 21ec0-21ec2 StackAdj>                       Δ-4                {[-4-]}
            <MI 21ec2  MOVE.B  (A0+D4.L),(A7)>                                  {[-4-]}
            <MI 21ec6  MOVE.B  (A0+D4.L+#0x1),(A7+0x1)>                         {[-4-]}
            <MI 21ecc  MOVE.B  (A0+D4.L+#0x2),(A7+0x2)>                         {[-4-]}
            <Call 0x21ed2 0x21d28>                                              {[-4-]}
            <POP 21ed6-21ed8 StackAdj>                       Δ+4                {}
        <POP 21ed8-21ee2 Naked>                              Σ0         ↓ →0x21e8e ←0x21e8e
            <MI 21ed8  ADDQ.L  #0x1,D7>                                         {}
            <MI 21eda  CMPI.L  #0x00000027,D7>                                  {}
            <MI 21ee0  BLE     0x21e8e>                                         {}
        <POP 21ee2-21ee6 Naked>                              Σ0         →0x21fde
            <MI 21ee2  BRA     0x21fde>                                         {}
        <POP 21ee6-21ee8 Naked>                              Σ0         ↓ ←0x21dc8
            <MI 21ee6  MOVEQ.L #0x00,D7>                                        {}
        <POP 21ee8-21f02 Naked>                              Σ0         ↓ →0x21f2e ←0x21f2e
            <POP 21ee8-21eea StackAdj>                       Δ-2                {[-2-]}
            <MI 21eea  MOVE.L  (A6-0x5c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']}
            <MI 21eec  MOVE.L  (A6-0x60),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21eee  MOVEQ.L #0x10,D0>                                        {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21ef0  ADD.L   D7,D0>                                           {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <POP 0x21ef2 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21ef8  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <Call 0x21efa 0x20d2e>                                              {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <POP 21efc-21efe StackAdj>                       Δ+10               {[-2-]}
            <MI 21efe  TST.B   (A7)+>                        Δ+2                {}
            <MI 21f00  BEQ     0x21f2e>                                         {}
        <POP 21f02-21f2e Naked>                              Σ0         ↓
            <POP 0x21f02 LimitCheck 0x0 ≤ D7 ≤ 0x2f>                            {}
            <MI 21f08  MOVE.L  D7,D4>                                           {}
            <MI 21f0a  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x21f0c 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 21f12  LEA.L   0x20a5c,A0>                                      {}
            <POP 21f16-21f18 StackAdj>                       Δ-4                {[-4-]}
            <MI 21f18  MOVE.B  (A0+D4.L),(A7)>                                  {[-4-]}
            <MI 21f1c  MOVE.B  (A0+D4.L+#0x1),(A7+0x1)>                         {[-4-]}
            <MI 21f22  MOVE.B  (A0+D4.L+#0x2),(A7+0x2)>                         {[-4-]}
            <Call 0x21f28 0x21d28>                                              {[-4-]}
            <POP 21f2c-21f2e StackAdj>                       Δ+4                {}
        <POP 21f2e-21f34 Naked>                              Σ0         ↓ →0x21ee8 ←0x21ee8
            <MI 21f2e  ADDQ.L  #0x1,D7>                                         {}
            <MI 21f30  CMP.L   #0x2f,D7>                                        {}
            <MI 21f32  BLE     0x21ee8>                                         {}
        <POP 21f34-21f38 Naked>                              Σ0         →0x21fde
            <MI 21f34  BRA     0x21fde>                                         {}
        <POP 21f38-21f3a Naked>                              Σ0         ↓ ←0x21dc8
            <MI 21f38  MOVEQ.L #0x00,D7>                                        {}
        <POP 21f3a-21f54 Naked>                              Σ0         ↓ →0x21f84 ←0x21f84
            <POP 21f3a-21f3c StackAdj>                       Δ-2                {[-2-]}
            <MI 21f3c  MOVE.L  (A6-0x5c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']}
            <MI 21f3e  MOVE.L  (A6-0x60),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21f40  MOVEQ.L #0x30,D0>                                        {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21f42  ADD.L   D7,D0>                                           {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <POP 0x21f44 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21f4a  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <Call 0x21f4c 0x20d2e>                                              {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <POP 21f4e-21f50 StackAdj>                       Δ+10               {[-2-]}
            <MI 21f50  TST.B   (A7)+>                        Δ+2                {}
            <MI 21f52  BEQ     0x21f84>                                         {}
        <POP 21f54-21f84 Naked>                              Σ0         ↓
            <POP 0x21f54 LimitCheck 0x0 ≤ D7 ≤ 0xf>                             {}
            <MI 21f5e  MOVE.L  D7,D4>                                           {}
            <MI 21f60  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x21f62 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 21f68  LEA.L   0x20924,A0>                                      {}
            <POP 21f6c-21f6e StackAdj>                       Δ-4                {[-4-]}
            <MI 21f6e  MOVE.B  (A0+D4.L),(A7)>                                  {[-4-]}
            <MI 21f72  MOVE.B  (A0+D4.L+#0x1),(A7+0x1)>                         {[-4-]}
            <MI 21f78  MOVE.B  (A0+D4.L+#0x2),(A7+0x2)>                         {[-4-]}
            <Call 0x21f7e 0x21d28>                                              {[-4-]}
            <POP 21f82-21f84 StackAdj>                       Δ+4                {}
        <POP 21f84-21f8e Naked>                              Σ0         ↓ →0x21f3a ←0x21f3a
            <MI 21f84  ADDQ.L  #0x1,D7>                                         {}
            <MI 21f86  CMPI.L  #0x0000000f,D7>                                  {}
            <MI 21f8c  BLE     0x21f3a>                                         {}
        <POP 21f8e-21f90 Naked>                              Σ0         →0x21fde
            <MI 21f8e  BRA     0x21fde>                                         {}
        <POP 21f90-21f92 Naked>                              Σ0         ↓ ←0x21dc8
            <MI 21f90  MOVEQ.L #0x00,D7>                                        {}
        <POP 21f92-21fac Naked>                              Σ0         ↓ →0x21fd8 ←0x21fd8
            <POP 21f92-21f94 StackAdj>                       Δ-2                {[-2-]}
            <MI 21f94  MOVE.L  (A6-0x5c),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']}
            <MI 21f96  MOVE.L  (A6-0x60),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21f98  MOVEQ.L #0x10,D0>                                        {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21f9a  ADD.L   D7,D0>                                           {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <POP 0x21f9c LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']}
            <MI 21fa2  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <Call 0x21fa4 0x20d2e>                                              {[-2-]|[4, '(A6-0x5c)']|[4, '(A6-0x60)']|[2, 'D0']}
            <POP 21fa6-21fa8 StackAdj>                       Δ+10               {[-2-]}
            <MI 21fa8  TST.B   (A7)+>                        Δ+2                {}
            <MI 21faa  BEQ     0x21fd8>                                         {}
        <POP 21fac-21fd8 Naked>                              Σ0         ↓
            <POP 0x21fac LimitCheck 0x0 ≤ D7 ≤ 0x2f>                            {}
            <MI 21fb2  MOVE.L  D7,D4>                                           {}
            <MI 21fb4  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x21fb6 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 21fbc  LEA.L   0x207a4,A0>                                      {}
            <POP 21fc0-21fc2 StackAdj>                       Δ-4                {[-4-]}
            <MI 21fc2  MOVE.B  (A0+D4.L),(A7)>                                  {[-4-]}
            <MI 21fc6  MOVE.B  (A0+D4.L+#0x1),(A7+0x1)>                         {[-4-]}
            <MI 21fcc  MOVE.B  (A0+D4.L+#0x2),(A7+0x2)>                         {[-4-]}
            <Call 0x21fd2 0x21d28>                                              {[-4-]}
            <POP 21fd6-21fd8 StackAdj>                       Δ+4                {}
        <POP 21fd8-21fde Naked>                              Σ0         ↓ →0x21f92 ←0x21f92
            <MI 21fd8  ADDQ.L  #0x1,D7>                                         {}
            <MI 21fda  CMP.L   #0x2f,D7>                                        {}
            <MI 21fdc  BLE     0x21f92>                                         {}
        <POP 21fde-21fe6 Epilogue>                           Σ0         ←0x21e88 ←0x21ee2 ←0x21f34 ←0x21f8e

0x21fe6


@ 21fe6
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 21fe6-2206c Body>                                   Δ-4        
        <POP 21fe6-21ffc Prologue>                           Σ0         ↓
        <POP 21ffc-22008 Naked>                              Σ0         ↓
            <MI 21ffc  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22000  CLR.L   (A0)>                                            {}
            <MI 22002  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22006  CLR.B   (A0)>                                            {}
        <POP 22008-2201a Naked>                              Σ0         ↓ →0x22064 ←0x22062
            <MI 22008  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2200c  MOVEA.L (A6+0xc),A1>                                     {}
            <MI 22010  MOVEA.L (A4+0x2a),A2>                                    {}
            <MI 22014  MOVE.L  (A0),D0>                                         {}
            <MI 22016  CMP.L   (A2),D0>                                         {}
            <MI 22018  BGE     0x22064>                                         {}
        <POP 2201a-2201e Naked>                              Σ0         ↓ →0x22064
            <MI 2201a  TST.B   (A1)>                                            {}
            <MI 2201c  BNE     0x22064>                                         {}
        <POP 2201e-22052 Naked>                              Σ0 Δ-4     ↓
            <MI 2201e  ADDQ.L  #0x1,D0>                                         {}
            <MI 22020  MOVE.L  D0,(A0)>                                         {}
            <MI 22022  CLR.B   (A1)>                                            {}
            <MI 22024  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x22026 LimitCheck 0x0 ≤ D0 ≤ 0x2>                             {}
            <MI 22030  MOVE.L  D0,D4>                                           {}
            <MI 22032  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x22034 0x1028c>                                              {}
                ?muls_d3_d4
            <POP 2203a-2203c StackAdj>                       Δ-4                {[-4-]}
            <MI 2203c  MOVE.B  (A4+0x36),-(A7)>              Δ-2                {[-4-]|[2, '(A4+0x36)']}
            <MI 22040  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-4-]|[2, '(A4+0x36)']|[4, '(A6+0x10)']}
            <Call 0x22044 0x2185c>                                              {[-4-]|[2, '(A4+0x36)']|[4, '(A6+0x10)']}
            <POP 22048-2204a StackAdj>                       Δ+6                {[-4-]}
            <MI 2204a  MOVEA.L A7,A0>                                           {[-4-]}
            <MI 2204c  LEA.L   (A4+D4.L+#0xa),A2>                               {[-4-]}
            <MI 22050  MOVEQ.L #0x02,D0>                                        {[-4-]}
        <POP 22052-22058 Naked>                              Σ-4        ↓ →0x22052 ←0x22052
            <MI 22052  CMPM.B  (A0)+,(A2)+>                                     {[-4-]}
            <MI 22054  DBNE    D0,0x22052>                                      {[-4-]}
        <POP 22058-2205a Naked>                              Σ-4        ↓ →0x2205e
            <MI 22058  BEQ     0x2205e>                                         {[-4-]}
        <POP 2205a-2205e Naked>                              Σ-4 Δ+4    →0x22062
            <POP 2205a-2205c StackAdj>                       Δ+4                {}
            <MI 2205c  BRA     0x22062>                                         {}
        <POP 2205e-22062 Naked>                              Σ-4 Δ+4    ↓ ←0x22058
            <MI 2205e  ADDQ.B  #0x1,(A1)>                                       {[-4-]}
            <POP 22060-22062 StackAdj>                       Δ+4                {}
        <POP 22062-22064 Naked>                              Σ0         →0x22008 ←0x2205a
            <MI 22062  BRA     0x22008>                                         {}
        <POP 22064-2206c Epilogue>                           Σ0         ←0x22008 ←0x2201a

0x2206c


@ 2206c
        <LVAR  0x014 1(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x01c @ 4(r)>
        <LVAR -0x022 @ 1(r)>
    <POP 2206c-221b2 Body>                                              
        <POP 2206c-22082 Prologue>                           Σ0         ↓
        <POP 22082-22092 RegCacheLoad>                       Σ0         ↓
        <POP 22092-22098 Naked>                              Σ0         ↓
            <MI 22092  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22094  CLR.L   (A0)>                                            {}
            <MI 22096  MOVEQ.L #0x00,D7>                                        {}
        <POP 22098-220be Naked>                              Σ0         ↓ →0x2213a ←0x2213a
            <POP 22098-2209a StackAdj>                       Δ-2                {[-2-]}
            <MI 2209a  MOVE.L  (A6+0x10),-(A7)>              Δ-4                {[-2-]|[4, '(A6+0x10)']}
            <MI 2209e  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-2-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 220a2  MOVEQ.L #0x18,D0>                                        {[-2-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 220a4  ADD.L   D7,D0>                                           {[-2-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <POP 0x220a6 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
            <MI 220b0  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[2, 'D0']}
            <Call 0x220b2 0x20d2e>                                              {[-2-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[2, 'D0']}
            <POP 220b6-220ba StackAdj>                       Δ+10               {[-2-]}
            <MI 220ba  TST.B   (A7)+>                        Δ+2                {}
            <MI 220bc  BEQ     0x2213a>                                         {}
        <POP 220be-220d4 Naked>                              Σ0         ↓ →0x220e8
            <MI 220be  MOVE.L  D7,-(A7)>                     Δ-4                {[4, 'D7']}
            <Pointer.fp 0x220c0 <LVAR -0x022 @ 1(r)>>        Δ-4                {[4, 'D7']|[@@-34]}
            <Pointer.fp 0x220c2 <LVAR -0x01c @ 4(r)>>        Δ-4                {[4, 'D7']|[@@-34]|[@@-28]}
            <MI 220c6  LEA.L   (A6-0x22),A4>                                    {[4, 'D7']|[@@-34]|[@@-28]}
            <Call 0x220c8 0x21fe6>                                              {[4, 'D7']|[@@-34]|[@@-28]}
            <POP 220cc-220d0 StackAdj>                       Δ+12               {}
            <MI 220d0  TST.B   (A6-0x22)>                                       {}
            <MI 220d2  BEQ     0x220e8>                                         {}
        <POP 220d4-220e8 Naked>                              Σ0         →0x2213a
            <MI 220d4  MOVE.L  (A6-0x1c),D0>                                    {}
            <MI 220d8  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x220da LimitCheck 0x0 ≤ D0 ≤ 0x2>                             {}
            <MI 220e0  ASL.L   #0x2,D0>                                         {}
            <MI 220e2  ADDQ.L  #0x1,(A6+D0.L-#0xe)>                             {}
            <MI 220e6  BRA     0x2213a>                                         {}
        <POP 220e8-220f6 Naked>                              Σ0         ↓ →0x220fa ←0x220be
            <MI 220e8  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 220ea  ADDQ.L  #0x1,(A0)>                                       {}
            <MI 220ec  MOVE.L  (A0),D0>                                         {}
            <MI 220ee  CMPI.L  #0x00000003,D0>                                  {}
            <MI 220f4  BLE     0x220fa>                                         {}
        <POP 220f6-220fa Naked>                              Σ0         →0x221aa
            <MI 220f6  BRA     0x221aa>                                         {}
        <POP 220fa-2213a Naked>                              Σ0         ↓ ←0x220e8
            <MI 220fa  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 220fc  MOVE.L  (A0),D0>                                         {}
            <MI 220fe  SUBQ.L  #0x1,D0>                                         {}
            <POP 0x22100 LimitCheck 0x0 ≤ D0 ≤ 0x2>                             {}
            <MI 22106  MOVE.L  D0,D4>                                           {}
            <MI 22108  MOVEQ.L #0x03,D3>                                        {}
            <Call 0x2210a 0x1028c>                                              {}
                ?muls_d3_d4
            <POP 22110-22112 StackAdj>                       Δ-4                {[-4-]}
            <MI 22112  MOVE.B  (A6+0x14),-(A7)>              Δ-2                {[-4-]|[2, '(A6+0x14)']}
            <MI 22116  MOVE.L  D7,-(A7)>                     Δ-4                {[-4-]|[2, '(A6+0x14)']|[4, 'D7']}
            <Call 0x22118 0x2185c>                                              {[-4-]|[2, '(A6+0x14)']|[4, 'D7']}
            <POP 2211c-2211e StackAdj>                       Δ+6                {[-4-]}
            <MI 2211e  MOVE.B  (A7),(A6+D4.L-#0x18)>                            {[-4-]}
            <MI 22122  MOVE.B  (A7+0x1),(A6+D4.L-#0x17)>                        {[-4-]}
            <MI 22128  MOVE.B  (A7+0x2),(A6+D4.L-#0x16)>                        {[-4-]}
            <POP 2212e-22130 StackAdj>                       Δ+4                {}
            <MI 22130  ASL.L   #0x2,D0>                                         {}
            <MI 22132  MOVE.L  #0x1,(A6+D0.L-#0xe)>                             {}
        <POP 2213a-22146 Naked>                              Σ0         ↓ →0x22098 ←0x22098 ←0x220d4
            <MI 2213a  ADDQ.L  #0x1,D7>                                         {}
            <MI 2213c  CMPI.L  #0x00000027,D7>                                  {}
            <MI 22142  BLE     0x22098>                                         {}
        <POP 22146-2214c Naked>                              Σ0 Δ-4     ↓
            <MI 22146  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22148  MOVE.L  (A0),-(A7)>                   Δ-4                {[4, '(A0)']}
            <MI 2214a  MOVEQ.L #0x01,D7>                                        {[4, '(A0)']}
        <POP 2214c-22150 Naked>                              Σ-4        ↓ →0x221a8 ←0x22150
            <MI 2214c  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 2214e  BGT     0x221a8>                                         {[-4-]}
        <POP 22150-221a8 Naked>                              Σ-4        ↓ →0x2214c
            <MI 22150  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 22152  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x22154 LimitCheck 0x0 ≤ D0 ≤ 0x2>                             {[-4-]}
            <MI 2215a  MOVE.L  D0,D4>                                           {[-4-]}
            <MI 2215c  MOVEQ.L #0x03,D3>                                        {[-4-]}
            <Call 0x2215e 0x1028c>                                              {[-4-]}
                ?muls_d3_d4
            <POP 22164-22166 StackAdj>                       Δ-4                {[-8-]}
            <MI 22166  MOVE.B  (A6+D4.L-#0x18),(A7)>                            {[-8-]}
            <MI 2216a  MOVE.B  (A6+D4.L-#0x17),(A7+0x1)>                        {[-8-]}
            <MI 22170  MOVE.B  (A6+D4.L-#0x16),(A7+0x2)>                        {[-8-]}
            <Call 0x22176 0x21d28>                                              {[-8-]}
            <Blob 0x2217a [4] 0x2337c>                       Δ-4                {[-8-]|[«4»]}
            <POP 2217c-2217e StackAdj>                       Δ-4                {[-8-]|[«4»]|[-4-]}
            <MI 2217e  ASL.L   #0x2,D0>                                         {[-8-]|[«4»]|[-4-]}
            <MI 22180  MOVE.L  (A6+D0.L-#0xe),-(A7)>         Δ-4                {[-8-]|[«4»]|[-4-]|[4, '(A6+D0.L-#0xe)']}
            <Call 0x22184 0x102e4>                                              {[-8-]|[«4»]|[-4-]|[4, '(A6+D0.L-#0xe)']}
                Long2String(a : Long) : String
            <POP 2218a-2218c StackAdj>                       Δ+4                {[-8-]|[«4»]|[-4-]}
            <Call 0x2218c 0x102d0>                                              {[-8-]|[«4»]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 22192-22194 StackAdj>                       Δ+8                {[-8-]}
            <MI 22194  MOVE.L  (A7)+,0x2337c>                Δ+4                {[-4-]}
            <Blob 0x22196 [4] 0x2337c>                       Δ-4                {[-4-]|[«4»]}
            <Const 0x22198 0x5c.2>                           Δ-2                {[-4-]|[«4»]|[#92]}
            <Call 0x2219c 0x102c0>                                              {[-4-]|[«4»]|[#92]}
                AppendChar(MOD b : String; a : char)
            <POP 221a2-221a4 StackAdj>                       Δ+6                {[-4-]}
            <MI 221a4  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 221a6  BVC     0x2214c>                                         {[-4-]}
        <POP 221a8-221aa Naked>                              Σ-4 Δ+4    ↓ ←0x2214c
            <POP 221a8-221aa StackAdj>                       Δ+4                {}
        <POP 221aa-221b2 Epilogue>                           Σ0         ←0x220f6

0x221b2


@ 221b2
        <LVAR  0x010 4(w)>
    <POP 221b2-221f0 Body>                                              
        <POP 221b2-221c8 Prologue>                           Σ0         ↓
        <POP 221c8-221ca RegCacheLoad>                       Σ0         ↓
        <POP 221ca-221ce Naked>                              Σ0         ↓
            <MI 221ca  MOVEQ.L #0x00,D7>                                        {}
            <MI 221cc  MOVEQ.L #0x00,D6>                                        {}
        <POP 221ce-221da Naked>                              Σ0         ↓ →0x221dc ←0x221dc
            <POP 0x221ce LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {}
            <MI 221d4  TST.B   (A6+D6.L+#0x8)>                                  {}
            <MI 221d8  BNE     0x221dc>                                         {}
        <POP 221da-221dc Naked>                              Σ0         →0x221e4
            <MI 221da  BRA     0x221e4>                                         {}
        <POP 221dc-221e4 Naked>                              Σ0         ↓ →0x221ce ←0x221ce
            <MI 221dc  ADDQ.L  #0x1,D7>                                         {}
            <MI 221de  ADDQ.L  #0x1,D6>                                         {}
            <MI 221e0  CMP.L   #0x07,D6>                                        {}
            <MI 221e2  BLE     0x221ce>                                         {}
        <POP 221e4-221e8 Naked>                              Σ0         ↓ ←0x221da
            <MI 221e4  MOVE.L  D7,(A6+0x10)>                                    {}
        <POP 221e8-221f0 Epilogue>                           Σ0         

0x221f0


@ 221f0
        <LVAR  0x034 1(rw)>
        <LVAR  0x028 4(r)>
    <POP 221f0-22266 Body>                                              
        <POP 221f0-22206 Prologue>                           Σ0         ↓
        <POP 22206-2220c RegCacheLoad>                       Σ0         ↓
        <POP 2220c-22216 Naked>                              Σ0 Δ-4     ↓
            <MI 2220c  MOVEQ.L #0x01,D7>                                        {}
            <MI 2220e  MOVE.L  (A6+0x28),-(A7)>              Δ-4                {[4, '(A6+0x28)']}
            <MI 22212  SUBQ.L  #0x1,(A7)>                                       {[-4-]}
            <MI 22214  MOVEQ.L #0x00,D6>                                        {[-4-]}
        <POP 22216-2221a Naked>                              Σ-4        ↓ →0x22256 ←0x2221a
            <MI 22216  CMP.L   (A7),D6>                                         {[-4-]}
            <MI 22218  BGT     0x22256>                                         {[-4-]}
        <POP 2221a-22256 Naked>                              Σ-4        ↓ →0x22216
            <POP 2221a-2221c StackAdj>                       Δ-2                {[-6-]}
            <POP 0x2221c LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {[-6-]}
            <MI 22226  CLR.L   D0>                                              {[-6-]}
            <MI 22228  MOVE.B  (A6+D6.L+#0x2c),D0>                              {[-6-]}
            <MI 2222c  MOVE.W  D0,-(A7)>                     Δ-2                {[-6-]|[2, 'D0']}
            <Call 0x2222e 0x218c6>                                              {[-6-]|[2, 'D0']}
            <POP 22232-22234 StackAdj>                       Δ+2                {[-6-]}
            <MI 22234  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 22236  EXTB.W  D0>                                              {[-4-]}
            <POP 0x22238 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-4-]}
            <MI 2223a  MOVE.B  D0,D5>                                           {[-4-]}
            <MI 2223c  MOVE.B  D5,D0>                                           {[-4-]}
            <MI 2223e  EXTB.W  D0>                                              {[-4-]}
            <POP 0x22240 LimitCheck 0x0 ≤ D0 ≤ 0xf>                             {[-4-]}
            <MI 22242  ASL.W   #0x1,D0>                                         {[-4-]}
            <MI 22244  MOVE.B  (A6+D0.W+#0x8),D1>                               {[-4-]}
            <MI 22248  AND.B   (A6+D0.W+#0x9),D1>                               {[-4-]}
            <MI 2224c  NEG.B   D1>                                              {[-4-]}
            <MI 2224e  ADDQ.B  #0x1,D1>                                         {[-4-]}
            <MI 22250  AND.B   D1,D7>                                           {[-4-]}
            <MI 22252  ADDQ.L  #0x1,D6>                                         {[-4-]}
            <MI 22254  BVC     0x22216>                                         {[-4-]}
        <POP 22256-2225e Naked>                              Σ-4 Δ+4    ↓ ←0x22216
            <POP 22256-22258 StackAdj>                       Δ+4                {}
            <MI 22258  MOVE.B  D7,(A6+0x34)>                                    {}
            <MI 2225a  NEG.B   (A6+0x34)>                                       {}
            <MI 2225c  ADDQ.B  #0x1,(A6+0x34)>                                  {}
        <POP 2225e-22266 Epilogue>                           Σ0         

0x22266


@ 22266
        <LVAR -0x004 @>
    <POP 22266-222aa Body>                                              
        <POP 22266-2227c Prologue>                           Σ0         ↓
        <POP 2227c-2227e RegCacheLoad>                       Σ0         ↓
        <POP 2227e-222a2 Naked>                              Σ0         ↓
            <MI 2227e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <POP 22280-22282 StackAdj>                       Δ-4                {[#0]|[-4-]}
            <Blob 0x22282 [4] 0x23370>                       Δ-4                {[#0]|[-4-]|[«4»]}
            <Call 0x22288 0x102cc>                                              {[#0]|[-4-]|[«4»]}
                StringDup(a : String) : String
            <POP 2228e-22290 StackAdj>                       Δ+2                {[#0]|[-4-]|[-2-]}
            <POP 22290-22291 StackAdj>                       Δ+2                {[#0]|[-4-]}
            <Const 0x22291 0x1.2>                            Δ-2                {[#0]|[-4-]|[#1]}
            <Const 0x22292 0x1.2>                            Δ-2                {[#0]|[-4-]|[#1]|[#1]}
            <Const 0x22294 0x1.2>                            Δ-2                {[#0]|[-4-]|[#1]|[#1]|[#1]}
            <Pointer.fp 0x22296 <LVAR -0x004 @>>             Δ-4                {[#0]|[-4-]|[#1]|[#1]|[#1]|[@@-4]}
            <Call 0x2229a 0x20aec>                                              {[#0]|[-4-]|[#1]|[#1]|[#1]|[@@-4]}
            <POP 2229e-222a2 StackAdj>                       Δ+16               {}
        <POP 222a2-222aa Epilogue>                           Σ0         

0x222aa


@ 222aa
        <LVAR  0x00c 1(w)>
        <LVAR  0x008 4(r)>
    <POP 222aa-2230e Body>                                              
        <POP 222aa-222c0 Prologue>                           Σ0         ↓
        <POP 222c0-222c6 RegCacheLoad>                       Σ0         ↓
        <POP 222c6-222d0 Naked>                              Σ0         ↓ →0x22302
            <MI 222c6  MOVE.L  (A6+0x8),D0>                                     {}
            <MI 222ca  SUBQ.L  #0x2,D0>                                         {}
            <MI 222cc  CMP.L   #0x05,D0>                                        {}
            <MI 222ce  BHI     0x22302>                                         {}
        <POP 222d0-222da Naked>                              Σ0         →0x222e6 →0x222ea →0x222f0 →0x22302 →0x222f6 →0x222fc
            <MI 222d0  ADD.W   D0,D0>                                           {}
            <MI 222d2  SWITCH  D0.W>                                            {}
        <POP 222e6-222ea Naked>                              Σ0         →0x22306 ←0x222d0
            <MI 222e6  MOVE.B  #0x05,(A6+0xc)>                                  {}
            <MI 222e8  BRA     0x22306>                                         {}
        <POP 222ea-222f0 Naked>                              Σ0         →0x22306 ←0x222d0
            <MI 222ea  MOVE.B  #0x06,(A6+0xc)>                                  {}
            <MI 222ee  BRA     0x22306>                                         {}
        <POP 222f0-222f6 Naked>                              Σ0         →0x22306 ←0x222d0
            <MI 222f0  MOVE.B  #0x2b,(A6+0xc)>                                  {}
            <MI 222f4  BRA     0x22306>                                         {}
        <POP 222f6-222fc Naked>                              Σ0         →0x22306 ←0x222d0
            <MI 222f6  MOVE.B  #0x03,(A6+0xc)>                                  {}
            <MI 222fa  BRA     0x22306>                                         {}
        <POP 222fc-22302 Naked>                              Σ0         →0x22306 ←0x222d0
            <MI 222fc  MOVE.B  #0x04,(A6+0xc)>                                  {}
            <MI 22300  BRA     0x22306>                                         {}
        <POP 22302-22306 Naked>                              Σ0         ↓ ←0x222c6 ←0x222d0
            <MI 22302  MOVE.B  #0x27,(A6+0xc)>                                  {}
        <POP 22306-2230e Epilogue>                           Σ0         ←0x222e6 ←0x222ea ←0x222f0 ←0x222f6 ←0x222fc

0x2230e


@ 2230e
        <LVAR  0x008 4(r)>
    <POP 2230e-2234c Body>                                              
        <POP 2230e-22324 Prologue>                           Σ0         ↓
        <POP 22324-22344 Naked>                              Σ0         ↓
            <MI 22324  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22328  MOVE.B  #0x25,(A0)>                                      {}
            <MI 2232c  MOVE.B  #0x29,(A0+0x1)>                                  {}
            <MI 22332  MOVE.B  #0x28,(A0+0x2)>                                  {}
            <MI 22338  MOVE.B  #0x01,(A0+0x3)>                                  {}
            <MI 2233e  MOVE.B  #0x2a,(A0+0x4)>                                  {}
        <POP 22344-2234c Epilogue>                           Σ0         

0x2234c


@ 2234c
        <LVAR  0x01a 4(r)>
        <LVAR  0x016 4(r)>
        <LVAR  0x012 4(r)>
        <LVAR  0x010 1(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 1(r) 4(r)>
    <POP 2234c-22536 Body>                                   Δ+8        
        <POP 2234c-22362 Prologue>                           Σ0         ↓
        <POP 22362-22376 RegCacheLoad>                       Σ0         ↓
        <POP 22376-223a8 Naked>                              Σ0         →0x223ce →0x223ce →0x223da →0x223e8 →0x223ec →0x223f4 →0x223f4 →0x223f4 →0x223f4 →0x22410 →0x22410 →0x22410 →0x22410 →0x22448 →0x2246c →0x2246e →0x224c2 →0x2246c →0x22528
            <MI 22376  MOVEA.L (A6+0x12),A0>                                    {}
            <MI 2237a  CLR.L   D0>                                              {}
            <MI 2237c  MOVE.B  (A0),D0>                                         {}
            <MI 2237e  MOVE.L  D0,D7>                                           {}
            <MI 22380  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <MI 22382  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 22384  EXTB.W  D0>                                              {}
            <POP 0x22386 LimitCheck 0x0 ≤ D0 ≤ 0x12>                            {}
            <MI 2238a  MOVE.B  D0,D6>                                           {}
            <MI 2238c  MOVEA.L (A6+0x1a),A0>                                    {}
            <MI 22390  CLR.B   (A0)>                                            {}
            <MI 22392  MOVE.B  D6,D0>                                           {}
            <MI 22394  EXTB.W  D0>                                              {}
            <POP 0x22396 LimitCheck 0x0 ≤ D0 ≤ 0x12>                            {}
            <MI 2239e  ADD.W   D0,D0>                                           {}
            <MI 223a0  SWITCH  D0.W>                                            {}
        <POP 223ce-223da Naked>                              Σ0         →0x2252e ←0x22376 ←0x22376
            <MI 223ce  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 223d0  MOVE.B  #0x2a,(A0)>                                      {}
            <MI 223d2  MOVE.B  #0x05,(A0+0x1)>                                  {}
            <MI 223d6  BRA     0x2252e>                                         {}
        <POP 223da-223e8 Naked>                              Σ0         →0x2252e ←0x22376
            <MI 223da  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 223dc  MOVE.B  #0x2a,(A0)>                                      {}
            <MI 223de  MOVE.B  #0x29,(A0+0x1)>                                  {}
            <MI 223e4  BRA     0x2252e>                                         {}
        <POP 223e8-223ec Naked>                              Σ0         →0x22528 ←0x22376
            <MI 223e8  BRA     0x22528>                                         {}
        <POP 223ec-223f4 Naked>                              Σ0         →0x2252e ←0x22376
            <MI 223ec  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 223ee  MOVE.B  #0x05,(A0)>                                      {}
            <MI 223f0  BRA     0x2252e>                                         {}
        <POP 223f4-223fa Naked>                              Σ0         ↓ →0x22400 ←0x22376 ←0x22376 ←0x22376 ←0x22376
            <MI 223f4  TST.B   (A6+0x10)>                                       {}
            <MI 223f8  BEQ     0x22400>                                         {}
        <POP 223fa-22400 Naked>                              Σ0         →0x2240c
            <MI 223fa  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 223fc  MOVE.B  #0x05,(A0)>                                      {}
            <MI 223fe  BRA     0x2240c>                                         {}
        <POP 22400-2240c Naked>                              Σ0         ↓ ←0x223f4
            <MI 22400  MOVEA.L (A6+0x16),A1>                                    {}
            <MI 22402  PEA.L   (A1)>                         Δ-4                {[4, '^(A1)']}
            <Call 0x22404 0x2230e>                                              {[4, '^(A1)']}
            <POP 22408-2240a StackAdj>                       Δ+4                {}
            <MI 2240a  MOVE.B  #0x01,(A0)>                                      {}
        <POP 2240c-22410 Naked>                              Σ0         →0x2252e ←0x223fa
            <MI 2240c  BRA     0x2252e>                                         {}
        <POP 22410-22416 Naked>                              Σ0         ↓ →0x22438 ←0x22376 ←0x22376 ←0x22376 ←0x22376
            <MI 22410  TST.B   (A6+0x10)>                                       {}
            <MI 22414  BEQ     0x22438>                                         {}
        <POP 22416-22438 Naked>                              Σ0         →0x22444
            <MI 22416  MOVEA.L (A6+0x16),A0>                                    {}
            <POP 22418-2241a StackAdj>                       Δ-2                {[-2-]}
            <MI 2241a  CLR.L   D0>                                              {[-2-]}
            <MI 2241c  MOVE.B  (A6+0x8),D0>                                     {[-2-]}
            <MI 2241e  MOVE.L  D0,-(A7)>                     Δ-4                {[-2-]|[4, 'D0']}
            <Call 0x22420 0x222aa>                                              {[-2-]|[4, 'D0']}
            <POP 22422-22424 StackAdj>                       Δ+4                {[-2-]}
            <MI 22424  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 22426  EXTB.W  D0>                                              {}
            <MI 22428  EXTW.L  D0>                                              {}
            <POP 0x2242a LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 22434  MOVE.B  D0,(A0)>                                         {}
            <MI 22436  BRA     0x22444>                                         {}
        <POP 22438-22442 Naked>                              Σ0 Δ-4     ↓ ←0x22410 ←0x2246c
            <MI 22438  MOVE.B  #0x01,(A0)>                                      {}
            <MI 2243a  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 2243c  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x2243e 0x2230e>                                              {[4, '^(A0)']}
        <POP 22442-22444 Naked>                              Σ-4 Δ+4    ↓ ←0x224c0
            <POP 22442-22444 StackAdj>                       Δ+4                {}
        <POP 22444-22448 Naked>                              Σ0         →0x2252e ←0x22416
            <MI 22444  BRA     0x2252e>                                         {}
        <POP 22448-2246c Naked>                              Σ0         →0x2252e ←0x22376
            <MI 22448  MOVEA.L (A6+0x16),A0>                                    {}
            <POP 2244a-2244c StackAdj>                       Δ-2                {[-2-]}
            <MI 2244c  CLR.L   D0>                                              {[-2-]}
            <MI 2244e  MOVE.B  (A6+0x8),D0>                                     {[-2-]}
            <MI 22450  MOVE.L  D0,-(A7)>                     Δ-4                {[-2-]|[4, 'D0']}
            <Call 0x22452 0x222aa>                                              {[-2-]|[4, 'D0']}
            <POP 22454-22456 StackAdj>                       Δ+4                {[-2-]}
            <MI 22456  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 22458  EXTB.W  D0>                                              {}
            <MI 2245a  EXTW.L  D0>                                              {}
            <POP 0x2245c LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 22466  MOVE.B  D0,(A0)>                                         {}
            <MI 22468  BRA     0x2252e>                                         {}
        <POP 2246c-2246e Naked>                              Σ0         →0x22438 ←0x22376 ←0x22376
            <MI 2246c  BRA     0x22438>                                         {}
        <POP 2246e-22484 Naked>                              Σ0 Δ-4     ↓ ←0x22376
            <MI 2246e  MOVE.B  #0x01,(A0)>                                      {}
            <MI 22470  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 22472  MOVE.B  #0x2a,(A0)>                                      {}
            <POP 22474-22476 StackAdj>                       Δ-4                {[-4-]}
            <MI 22476  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 2247a  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x2247c 0x221b2>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 22480-22482 StackAdj>                       Δ+8                {[-4-]}
            <MI 22482  MOVEQ.L #0x01,D7>                                        {[-4-]}
        <POP 22484-22488 Naked>                              Σ-4        ↓ →0x224c0 ←0x22488
            <MI 22484  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 22486  BGT     0x224c0>                                         {[-4-]}
        <POP 22488-224c0 Naked>                              Σ-4        ↓ →0x22484
            <MI 22488  MOVEA.L (A6+0x16),A0>                                    {[-4-]}
            <POP 0x2248a LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {[-4-]}
            <POP 22490-22492 StackAdj>                       Δ-2                {[-6-]}
            <MI 22492  MOVE.L  D7,D0>                                           {[-6-]}
            <MI 22494  SUBQ.L  #0x1,D0>                                         {[-6-]}
            <POP 0x22496 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {[-6-]}
            <MI 2249c  CLR.L   D1>                                              {[-6-]}
            <MI 2249e  MOVE.B  (A6+D0.L+#0x8),D1>                               {[-6-]}
            <MI 224a2  MOVE.L  D1,-(A7)>                     Δ-4                {[-6-]|[4, 'D1']}
            <Call 0x224a4 0x222aa>                                              {[-6-]|[4, 'D1']}
            <POP 224a6-224a8 StackAdj>                       Δ+4                {[-6-]}
            <MI 224a8  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 224aa  EXTB.W  D0>                                              {[-4-]}
            <MI 224ac  EXTW.L  D0>                                              {[-4-]}
            <POP 0x224ae LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {[-4-]}
            <MI 224b8  MOVE.B  D0,(A0+D7.L)>                                    {[-4-]}
            <MI 224bc  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 224be  BVC     0x22484>                                         {[-4-]}
        <POP 224c0-224c2 Naked>                              Σ-4        →0x22442 ←0x22484
            <MI 224c0  BRA     0x22442>                                         {[-4-]}
        <POP 224c2-224c8 Naked>                              Σ0         ↓ →0x2251a ←0x22376
            <MI 224c2  TST.B   (A6+0x10)>                                       {}
            <MI 224c6  BEQ     0x2251a>                                         {}
        <POP 224c8-224dc Naked>                              Σ0 Δ-4     ↓
            <MI 224c8  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 224ca  MOVE.B  #0x2a,(A0)>                                      {}
            <POP 224cc-224ce StackAdj>                       Δ-4                {[-4-]}
            <MI 224ce  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']}
            <MI 224d2  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <Call 0x224d4 0x221b2>                                              {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
            <POP 224d8-224da StackAdj>                       Δ+8                {[-4-]}
            <MI 224da  MOVEQ.L #0x01,D7>                                        {[-4-]}
        <POP 224dc-224e0 Naked>                              Σ-4        ↓ →0x22518 ←0x224e0
            <MI 224dc  CMP.L   (A7),D7>                                         {[-4-]}
            <MI 224de  BGT     0x22518>                                         {[-4-]}
        <POP 224e0-22518 Naked>                              Σ-4        ↓ →0x224dc
            <MI 224e0  MOVEA.L (A6+0x16),A0>                                    {[-4-]}
            <POP 0x224e2 LimitCheck 0x0 ≤ D7 ≤ 0x7>                             {[-4-]}
            <POP 224e8-224ea StackAdj>                       Δ-2                {[-6-]}
            <MI 224ea  MOVE.L  D7,D0>                                           {[-6-]}
            <MI 224ec  SUBQ.L  #0x1,D0>                                         {[-6-]}
            <POP 0x224ee LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {[-6-]}
            <MI 224f4  CLR.L   D1>                                              {[-6-]}
            <MI 224f6  MOVE.B  (A6+D0.L+#0x8),D1>                               {[-6-]}
            <MI 224fa  MOVE.L  D1,-(A7)>                     Δ-4                {[-6-]|[4, 'D1']}
            <Call 0x224fc 0x222aa>                                              {[-6-]|[4, 'D1']}
            <POP 224fe-22500 StackAdj>                       Δ+4                {[-6-]}
            <MI 22500  MOVE.B  (A7)+,D0>                     Δ+2                {[-4-]}
            <MI 22502  EXTB.W  D0>                                              {[-4-]}
            <MI 22504  EXTW.L  D0>                                              {[-4-]}
            <POP 0x22506 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {[-4-]}
            <MI 22510  MOVE.B  D0,(A0+D7.L)>                                    {[-4-]}
            <MI 22514  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 22516  BVC     0x224dc>                                         {[-4-]}
        <POP 22518-2251a Naked>                              Σ-4        →0x22524 ←0x224dc
            <MI 22518  BRA     0x22524>                                         {[-4-]}
        <POP 2251a-22524 Naked>                              Σ0 Δ-4     ↓ ←0x224c2
            <MI 2251a  MOVE.B  #0x01,(A0)>                                      {}
            <MI 2251c  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 2251e  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x22520 0x2230e>                                              {[4, '^(A0)']}
        <POP 22524-22528 Naked>                              Σ-4 Δ+4    →0x2252e ←0x22518
            <POP 22524-22526 StackAdj>                       Δ+4                {}
            <MI 22526  BRA     0x2252e>                                         {}
        <POP 22528-2252e Naked>                              Σ0         ↓ ←0x22376 ←0x223e8
            <MI 22528  MOVEA.L (A6+0x16),A0>                                    {}
            <MI 2252a  MOVE.B  #0x27,(A0)>                                      {}
        <POP 2252e-22536 Epilogue>                           Σ0         ←0x223ce ←0x223da ←0x223ec ←0x2240c ←0x22444 ←0x22448 ←0x22524

0x22536


@ 22536
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x001 1(r)>
        <LVAR -0x004 @>
    <POP 22536-22594 Body>                                              
        <POP 22536-2254c Prologue>                           Σ0         ↓
        <POP 2254c-2258c Naked>                              Σ0         ↓
            <Call 0x2254c 0x10538>                                              {}
                IPC_Init(void)
            <Pointer.fp 0x22552 <LVAR -0x004 @>>             Δ-4                {[@@-4]}
            <Call 0x22556 0x10532>                                              {[@@-4]}
                IPC_GetLong() : Long
            <POP 2255c-2255e StackAdj>                       Δ+4                {}
            <MI 2255e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22562  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Const 0x22564 0x0.4>                            Δ-4                {[4, '^(A0)']|[##0]}
            <Const 0x22568 0x7.4>                            Δ-4                {[4, '^(A0)']|[##0]|[##7]}
            <Call 0x2256c 0x10520>                                              {[4, '^(A0)']|[##0]|[##7]}
                IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
            <POP 22572-22576 StackAdj>                       Δ+12               {}
            <Call 0x22576 0x1051a>                                              {}
                IPC_GetEnd(void)
            <MI 2257c  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22580  MOVE.B  (A6-0x1),D0>                                     {}
            <MI 22584  EXTB.W  D0>                                              {}
            <POP 0x22586 LimitCheck 0x0 ≤ D0 ≤ 0xb>                             {}
            <MI 2258a  MOVE.B  D0,(A0)>                                         {}
        <POP 2258c-22594 Epilogue>                           Σ0         

0x22594


@ 22594
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x001 1(r)>
        <LVAR -0x002 @ 1(r)>
        <LVAR -0x012 @>
        <LVAR -0x018 @>
        <LVAR -0x01d @>
        <LVAR -0x026 @>
        <LVAR -0x02c @>
    <POP 22594-22634 Body>                                              
        <POP 22594-225aa Prologue>                           Σ0         ↓
        <POP 225aa-22610 Naked>                              Σ0         ↓ →0x22620
            <Pointer.fp 0x225aa <LVAR -0x02c @>>             Δ-4                {[@@-44]}
            <Pointer.fp 0x225ae <LVAR -0x026 @>>             Δ-4                {[@@-44]|[@@-38]}
            <Pointer.fp 0x225b2 <LVAR -0x01d @>>             Δ-4                {[@@-44]|[@@-38]|[@@-29]}
            <Pointer.fp 0x225b6 <LVAR -0x018 @>>             Δ-4                {[@@-44]|[@@-38]|[@@-29]|[@@-24]}
            <Pointer.fp 0x225ba <LVAR -0x012 @>>             Δ-4                {[@@-44]|[@@-38]|[@@-29]|[@@-24]|[@@-18]}
            <Call 0x225be 0x2148a>                                              {[@@-44]|[@@-38]|[@@-29]|[@@-24]|[@@-18]}
            <POP 225c2-225c6 StackAdj>                       Δ+18               {[-2-]}
            <MI 225c6  CLR.B   (A7)>                                            {[-2-]}
            <Pointer.fp 0x225c8 <LVAR -0x002 @ 1(r)>>        Δ-4                {[-2-]|[@@-2]}
            <Call 0x225cc 0x22ebe>                                              {[-2-]|[@@-2]}
                exp_TEST_READ_DISPATCH.SEQ(Sw_1, &Sr_2)
            <POP 225d2-225d4 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x225d4 <LVAR -0x02c @>>             Δ-4                {[@@-44]}
            <Pointer.fp 0x225d8 <LVAR -0x026 @>>             Δ-4                {[@@-44]|[@@-38]}
            <Pointer.fp 0x225dc <LVAR -0x01d @>>             Δ-4                {[@@-44]|[@@-38]|[@@-29]}
            <Pointer.fp 0x225e0 <LVAR -0x018 @>>             Δ-4                {[@@-44]|[@@-38]|[@@-29]|[@@-24]}
            <Pointer.fp 0x225e4 <LVAR -0x012 @>>             Δ-4                {[@@-44]|[@@-38]|[@@-29]|[@@-24]|[@@-18]}
            <Call 0x225e8 0x214f6>                                              {[@@-44]|[@@-38]|[@@-29]|[@@-24]|[@@-18]}
            <POP 225ec-225f0 StackAdj>                       Δ+20               {}
            <MI 225f0  MOVEA.L (A6+0x10),A0>                                    {}
            <MI 225f4  CLR.L   D0>                                              {}
            <MI 225f6  MOVE.B  (A6-0x2),D0>                                     {}
            <MI 225fa  MULU.W  #0x100,D0>                                       {}
            <MI 225fe  CLR.L   D1>                                              {}
            <MI 22600  MOVE.B  (A6-0x1),D1>                                     {}
            <MI 22604  ADD.W   D0,D1>                                           {}
            <MI 22606  MOVE.W  D1,(A0)>                                         {}
            <MI 22608  MOVE.W  D1,D0>                                           {}
            <MI 2260a  ANDI.W  #0xfc00,D0>                                      {}
            <MI 2260e  BEQ     0x22620>                                         {}
        <POP 22610-22620 Naked>                              Σ0         →0x2262a
            <MI 22610  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22614  MOVE.B  #0x01,(A0)>                                      {}
            <MI 22618  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2261c  LSR.W   #0x6,D1>                                         {}
            <MI 2261e  BRA     0x2262a>                                         {}
        <POP 22620-2262a Naked>                              Σ0         ↓ ←0x225aa
            <MI 22620  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22624  CLR.B   (A0)>                                            {}
            <MI 22626  MOVEA.L (A6+0x8),A0>                                     {}
        <POP 2262a-2262c Naked>                              Σ0         ↓ ←0x22610
            <MI 2262a  MOVE.W  D1,(A0)>                                         {}
        <POP 2262c-22634 Epilogue>                           Σ0         

0x22634


@ 22634
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 1(r)>
        <LVAR -0x006 @ 2(r)>
        <LVAR -0x00a @ 4(r)>
        <LVAR -0x00e 4(rw)>
        <LVAR -0x012 4(rw)>
        <LVAR -0x016 4(r)>
        <LVAR -0x01a @ 4(r)>
        <LVAR -0x01e 4(r)>
        <LVAR -0x022 @ 4(r)>
        <LVAR -0x024 @ 2(r)>
    <POP 22634-227b2 Body>                                              
        <POP 22634-2264a Prologue>                           Σ0         ↓
        <POP 2264a-22662 RegCacheLoad>                       Σ0         ↓
        <POP 22662-22694 Naked>                              Σ0         ↓ →0x2269c
            <Pointer.fp 0x22662 <LVAR -0x024 @ 2(r)>>        Δ-4                {[@@-36]}
            <Pointer.fp 0x22664 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-36]|[@@-4]}
            <Pointer.fp 0x22668 <LVAR -0x006 @ 2(r)>>        Δ-4                {[@@-36]|[@@-4]|[@@-6]}
            <Call 0x2266c 0x22594>                                              {[@@-36]|[@@-4]|[@@-6]}
            <POP 22670-22674 StackAdj>                       Δ+10               {[-2-]}
            <MI 22674  MOVE.W  (A6-0x6),(A7)>                                   {[2, '(A6-0x6)']}
            <MI 22678  MOVE.B  (A6-0x4),-(A7)>               Δ-2                {[2, '(A6-0x6)']|[2, '(A6-0x4)']}
            <Pointer.fp 0x2267c <LVAR -0x022 @ 4(r)>>        Δ-4                {[2, '(A6-0x6)']|[2, '(A6-0x4)']|[@@-34]}
            <Call 0x2267e 0x2161c>                                              {[2, '(A6-0x6)']|[2, '(A6-0x4)']|[@@-34]}
            <POP 22682-22684 StackAdj>                       Δ+2                {[2, '(A6-0x6)']|[2, '(A6-0x4)']|[-2-]}
            <MI 22684  MOVE.L  (A6-0x1e),(A7)>                                  {[2, '(A6-0x6)']|[4, '(A6-0x1e)']}
            <MI 22688  MOVE.L  (A6-0x22),-(A7)>              Δ-4                {[2, '(A6-0x6)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
            <Call 0x2268a 0x21a4a>                                              {[2, '(A6-0x6)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
            <POP 2268e-22690 StackAdj>                       Δ+8                {[2, '(A6-0x6)']}
            <MI 22690  TST.B   (A7)+>                        Δ+2                {}
            <MI 22692  BEQ     0x2269c>                                         {}
        <POP 22694-2269c Naked>                              Σ0         →0x227aa
            <MI 22694  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22696  MOVE.B  #0x03,(A0)>                                      {}
            <MI 22698  BRA     0x227aa>                                         {}
        <POP 2269c-226d6 Naked>                              Σ0         ↓ →0x226e0 ←0x22662
            <MI 2269c  MOVE.W  (A6-0x24),-(A7)>              Δ-2                {[2, '(A6-0x24)']}
            <Pointer.fp 0x2269e <LVAR -0x01a @ 4(r)>>        Δ-4                {[2, '(A6-0x24)']|[@@-26]}
            <Call 0x226a0 0x216f8>                                              {[2, '(A6-0x24)']|[@@-26]}
            <POP 226a4-226a6 StackAdj>                       Δ+2                {[2, '(A6-0x24)']|[-2-]}
            <MI 226a6  CLR.L   D0>                                              {[2, '(A6-0x24)']|[-2-]}
            <MI 226a8  MOVE.W  (A6-0x24),D0>                                    {[2, '(A6-0x24)']|[-2-]}
            <MI 226aa  MOVE.L  D0,-(A7)>                     Δ-4                {[2, '(A6-0x24)']|[-2-]|[4, 'D0']}
            <Const 0x226ac 0x4.4>                            Δ-4                {[2, '(A6-0x24)']|[-2-]|[4, 'D0']|[##4]}
            <Call 0x226b0 0x102e8>                                              {[2, '(A6-0x24)']|[-2-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 226b6-226b8 StackAdj>                       Δ+8                {[2, '(A6-0x24)']|[-2-]}
            <Call 0x226b8 0x219b8>                                              {[2, '(A6-0x24)']|[-2-]}
            <POP 226bc-226be StackAdj>                       Δ+2                {[2, '(A6-0x24)']}
            <MI 226be  MOVE.L  (A6-0x16),-(A7)>              Δ-4                {[2, '(A6-0x24)']|[4, '(A6-0x16)']}
            <MI 226c2  MOVE.L  (A6-0x1a),-(A7)>              Δ-4                {[2, '(A6-0x24)']|[4, '(A6-0x16)']|[4, '(A6-0x1a)']}
            <MI 226c4  MOVE.L  (A6-0x1e),-(A7)>              Δ-4                {[2, '(A6-0x24)']|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']}
            <MI 226c8  MOVE.L  (A6-0x22),-(A7)>              Δ-4                {[2, '(A6-0x24)']|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
            <Call 0x226ca 0x1032c>                                              {[2, '(A6-0x24)']|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
                IsEqual(a, b : Quad) : Bool
            <POP 226d0-226d2 StackAdj>                       Δ+16               {[2, '(A6-0x24)']}
            <MI 226d2  TST.B   (A7)+>                        Δ+2                {}
            <MI 226d4  BEQ     0x226e0>                                         {}
        <POP 226d6-226e0 Naked>                              Σ0         →0x2277a
            <MI 226d6  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 226d8  MOVE.B  #0x04,(A0)>                                      {}
            <MI 226dc  BRA     0x2277a>                                         {}
        <POP 226e0-2271c Naked>                              Σ0         ↓ →0x22774 ←0x2269c
            <POP 226e0-226e2 StackAdj>                       Δ-8                {[-8-]}
            <MI 226e2  MOVE.L  (A6-0x16),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x16)']}
            <MI 226e6  MOVE.L  (A6-0x1a),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']}
            <MI 226e8  MOVE.L  (A6-0x1e),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']}
            <MI 226ec  MOVE.L  (A6-0x22),-(A7)>              Δ-4                {[-8-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
            <Call 0x226ee 0x10340>                                              {[-8-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
                BitXor(a, b : Quad) : Quad
            <POP 226f4-226f6 StackAdj>                       Δ+16               {[-8-]}
            <MI 226f6  MOVE.L  (A7)+,(A6-0x12)>              Δ+4                {[-4-]}
            <MI 226fa  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {}
            <MI 226fe  MOVE.B  (A6-0x4),-(A7)>               Δ-2                {[2, '(A6-0x4)']}
            <MI 22702  MOVE.L  (A6-0xe),-(A7)>               Δ-4                {[2, '(A6-0x4)']|[4, '(A6-0xe)']}
            <MI 22706  MOVE.L  (A6-0x12),-(A7)>              Δ-4                {[2, '(A6-0x4)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
            <Pointer.fp 0x2270a <LVAR -0x00a @ 4(r)>>        Δ-4                {[2, '(A6-0x4)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']|[@@-10]}
            <Call 0x2270e 0x2206c>                                              {[2, '(A6-0x4)']|[4, '(A6-0xe)']|[4, '(A6-0x12)']|[@@-10]}
            <POP 22712-22714 StackAdj>                       Δ+14               {}
            <MI 22714  MOVE.L  (A6-0xa),D0>                                     {}
            <MI 22718  CMP.L   #0x03,D0>                                        {}
            <MI 2271a  BHI     0x22774>                                         {}
        <POP 2271c-22726 Naked>                              Σ0         →0x2272e →0x2275c →0x22764 →0x2276c
            <MI 2271c  ADD.W   D0,D0>                                           {}
            <MI 2271e  SWITCH  D0.W>                                            {}
        <POP 2272e-2275c Naked>                              Σ0         →0x2277a ←0x2271c
            <Blob 0x2272e [28] @>                            Δ-28               {[«28""»]}
            <Const 0x2273a 0xe.2>                            Δ-2                {[«28""»]|[#14]}
            <POP 2273c-2273e StackAdj>                       Δ-4                {[«28""»]|[#14]|[-4-]}
            <Lit 0x2273e 28>                                                    {[«28""»]|[#14]|[$$Post mortem error (EMWCSP-4)]}
            <Call 0x22750 0x103b8>                                              {[«28""»]|[#14]|[$$Post mortem error (EMWCSP-4)]}
                PopProgram(status : Byte; msg : String)
            <POP 22756-2275a StackAdj>                       Δ+34               {}
            <MI 2275a  BRA     0x2277a>                                         {}
        <POP 2275c-22764 Naked>                              Σ0         →0x2277a ←0x2271c
            <MI 2275c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2275e  MOVE.B  #0x05,(A0)>                                      {}
            <MI 22762  BRA     0x2277a>                                         {}
        <POP 22764-2276c Naked>                              Σ0         →0x2277a ←0x2271c
            <MI 22764  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22766  MOVE.B  #0x06,(A0)>                                      {}
            <MI 2276a  BRA     0x2277a>                                         {}
        <POP 2276c-22774 Naked>                              Σ0         →0x2277a ←0x2271c
            <MI 2276c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2276e  MOVE.B  #0x07,(A0)>                                      {}
            <MI 22772  BRA     0x2277a>                                         {}
        <POP 22774-2277a Naked>                              Σ0         ↓ ←0x226e0
            <MI 22774  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 22776  MOVE.B  #0x08,(A0)>                                      {}
        <POP 2277a-227aa Naked>                              Σ0         ↓ ←0x226d6 ←0x2272e ←0x2275c ←0x22764 ←0x2276c
            <Call 0x2277a 0x22266>                                              {}
            <MI 2277e  MOVE.W  (A6-0x24),-(A7)>              Δ-2                {[2, '(A6-0x24)']}
            <Pointer.fp 0x22780 <LVAR -0x01a @ 4(r)>>        Δ-4                {[2, '(A6-0x24)']|[@@-26]}
            <Call 0x22782 0x216f8>                                              {[2, '(A6-0x24)']|[@@-26]}
            <POP 22786-22788 StackAdj>                       Δ+6                {}
            <MI 22788  MOVEA.L (A6+0xc),A0>                                     {}
            <POP 2278c-2278e StackAdj>                       Δ-2                {[-2-]}
            <MI 2278e  MOVE.L  (A6-0x16),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x16)']}
            <MI 22792  MOVE.L  (A6-0x1a),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']}
            <MI 22794  MOVE.L  (A6-0x1e),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']}
            <MI 22798  MOVE.L  (A6-0x22),-(A7)>              Δ-4                {[-2-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
            <Call 0x2279a 0x1032c>                                              {[-2-]|[4, '(A6-0x16)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[4, '(A6-0x22)']}
                IsEqual(a, b : Quad) : Bool
            <POP 227a0-227a2 StackAdj>                       Δ+16               {[-2-]}
            <MI 227a2  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 227a4  EXTB.W  D0>                                              {}
            <POP 0x227a6 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 227a8  MOVE.B  D0,(A0)>                                         {}
        <POP 227aa-227b2 Epilogue>                           Σ0         ←0x22694

0x227b2


@ 227b2
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
    <POP 227b2-2289e Body>                                              
        <POP 227b2-227c8 Prologue>                           Σ0         ↓
        <POP 227c8-227ce RegCacheLoad>                       Σ0         ↓
        <POP 227ce-227d4 Naked>                              Σ0         ↓ →0x2280c
            <MI 227ce  TST.L   (A6+0x10)>                                       {}
            <MI 227d2  BNE     0x2280c>                                         {}
        <POP 227d4-2280c Naked>                              Σ0         →0x22896
            <Blob 0x227d4 [40] @>                            Δ-40               {[«40""»]}
            <Const 0x227e6 0xe.2>                            Δ-2                {[«40""»]|[#14]}
            <POP 227ea-227ec StackAdj>                       Δ-4                {[«40""»]|[#14]|[-4-]}
            <Lit 0x227ec 39>                                                    {[«40""»]|[#14]|[$$Post mortem invocation error (EMWCSP-2)]}
            <Call 0x227fe 0x103b8>                                              {[«40""»]|[#14]|[$$Post mortem invocation error (EMWCSP-2)]}
                PopProgram(status : Byte; msg : String)
            <POP 22804-22808 StackAdj>                       Δ+46               {}
            <MI 22808  BRA     0x22896>                                         {}
        <POP 2280c-22818 Naked>                              Σ0         ↓ →0x22846 ←0x227ce
            <MI 2280c  MOVE.L  (A6+0x10),D0>                                    {}
            <MI 22810  CMPI.L  #0x00000004,D0>                                  {}
            <MI 22816  BNE     0x22846>                                         {}
        <POP 22818-22822 Naked>                              Σ0         ↓ →0x2282a
            <POP 22818-2281a StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2281a 0x21cee>                                              {[-2-]}
            <MI 2281e  TST.B   (A7)+>                        Δ+2                {}
            <MI 22820  BEQ     0x2282a>                                         {}
        <POP 22822-2282a Naked>                              Σ0         →0x22844
            <MI 22822  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22824  MOVE.B  #0x02,(A0)>                                      {}
            <MI 22828  BRA     0x22844>                                         {}
        <POP 2282a-22844 Naked>                              Σ0         ↓ ←0x22818
            <MI 2282a  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 2282c  MOVE.B  #0x01,(A0)>                                      {}
            <MI 2282e  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 22832-22834 StackAdj>                       Δ-8                {[-8-]}
            <MI 22834  MOVEA.L A7,A1>                                           {[-8-]}
            <BlockMove 8,A0,A1>                                                 {[-8-]}
            <Call 0x2283e 0x219fc>                                              {[-8-]}
            <POP 22842-22844 StackAdj>                       Δ+8                {}
        <POP 22844-22846 Naked>                              Σ0         →0x22896 ←0x22822
            <MI 22844  BRA     0x22896>                                         {}
        <POP 22846-22854 Naked>                              Σ0         ↓ →0x22880 ←0x2280c
            <MI 22846  MOVEA.L (A6+0xc),A0>                                     {}
            <MI 22848  CLR.B   (A0)>                                            {}
            <POP 2284a-2284c StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2284c 0x21cee>                                              {[-2-]}
            <MI 22850  TST.B   (A7)+>                        Δ+2                {}
            <MI 22852  BEQ     0x22880>                                         {}
        <POP 22854-22880 Naked>                              Σ0         ↓
            <POP 22854-22856 StackAdj>                       Δ-4                {[-4-]}
            <POP 22856-22857 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x22857 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 2285a  MOVE.B  0x2068f,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 22860  MOVE.B  0x20690,(A7+0x2)>                                {[-2-]|[«2""»]}
            <POP 22866-22868 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[-4-]}
            <Lit 0x22868>                                                       {[-2-]|[«2""»]|[$$…]}
                <Pointer.sp 0x22868 4>                       Δ-4        
                <Const 0x2286c 0x1.2>                        Δ-2        
                <Const 0x2286e 0x3.2>                        Δ-2        
                <Call 0x22872 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 22878-2287a StackAdj>                   Δ+8        
            <Call 0x2287a 0x219b8>                                              {[-2-]|[«2""»]|[$$…]}
            <POP 2287e-22880 StackAdj>                       Δ+8                {}
        <POP 22880-22896 Naked>                              Σ0         ↓ ←0x22846
            <MI 22880  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 22884-22886 StackAdj>                       Δ-8                {[-8-]}
            <MI 22886  MOVEA.L A7,A1>                                           {[-8-]}
            <BlockMove 8,A0,A1>                                                 {[-8-]}
            <Call 0x22890 0x219fc>                                              {[-8-]}
            <POP 22894-22896 StackAdj>                       Δ+8                {}
        <POP 22896-2289e Epilogue>                           Σ0         ←0x227d4 ←0x22844

0x2289e


@ 2289e
        <LVAR  0x008 4(r)>
        <LVAR -0x003 1(r)>
        <LVAR -0x004 @ 1(r)>
    <POP 2289e-22954 Body>                                              
        <POP 2289e-228b4 Prologue>                           Σ0         ↓
        <POP 228b4-228b6 RegCacheLoad>                       Σ0         ↓
        <POP 228b6-228de Naked>                              Σ0         ↓ →0x2294c
            <Pointer.fp 0x228b6 <LVAR -0x004 @ 1(r)>>        Δ-4                {[@@-4]}
            <Call 0x228ba 0x23144>                                              {[@@-4]}
                exp_READ_LAST_PC.IOC(&Sr_2)
            <POP 228c0-228c2 StackAdj>                       Δ+4                {}
            <MI 228c2  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 228c6  CLR.L   D0>                                              {}
            <MI 228c8  MOVE.B  (A6-0x4),D0>                                     {}
            <MI 228cc  ASL.W   #0x8,D0>                                         {}
            <MI 228ce  CLR.L   D1>                                              {}
            <MI 228d0  MOVE.B  (A6-0x3),D1>                                     {}
            <MI 228d4  ADD.W   D0,D1>                                           {}
            <MI 228d6  MOVE.W  D1,(A0)>                                         {}
            <MI 228d8  CMPI.W  #0x0145,D1>                                      {}
            <MI 228dc  BCC     0x2294c>                                         {}
        <POP 228de-2294c Naked>                              Σ0         ↓
            <Blob 0x228de [26] @>                            Δ-26               {[«26""»]}
            <Blob 0x228ea [48] @>                            Δ-48               {[«26""»]|[«48""»]}
            <POP 228fc-228fe StackAdj>                       Δ-8                {[«26""»]|[«48""»]|[-8-]}
            <Lit 0x228fe 26>                                                    {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]}
            <POP 2290e-22910 StackAdj>                       Δ-4                {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]}
            <MI 22910  CLR.L   D0>                                              {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]}
            <MI 22912  MOVE.W  D1,D0>                                           {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]}
            <MI 22914  MOVE.L  D0,-(A7)>                     Δ-4                {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]|[4, 'D0']}
            <Const 0x22916 0x4.4>                            Δ-4                {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]|[4, 'D0']|[##4]}
            <Call 0x2291a 0x102e8>                                              {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]|[4, 'D0']|[##4]}
                Long2HexString(val : Long; ndig : Long) : String
            <POP 22920-22922 StackAdj>                       Δ+4                {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]|[4, 'D0']}
            <Lit 0x22922 47>                                                    {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]|[$$# ] is unreasonable, 16#0145# being substituted]}
            <Call 0x22934 0x102d4>                                              {[«26""»]|[«48""»]|[-4-]|[$$The failing MICRO PC [ 16#]|[-4-]|[$$# ] is unreasonable, 16#0145# being substituted]}
                StringCat3(a, b, c : String) : String
            <POP 2293a-2293e StackAdj>                       Δ+12               {[«26""»]|[«48""»]|[-4-]}
            <Call 0x2293e 0x103e0>                                              {[«26""»]|[«48""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 22944-22948 StackAdj>                       Δ+78               {}
            <MI 22948  MOVE.W  #0x145,(A0)>                                     {}
        <POP 2294c-22954 Epilogue>                           Σ0         ←0x228b6

0x22954


@ 22954
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x058 @>
        <LVAR -0x05a @ 2(r)>
        <LVAR -0x07a @>
        <LVAR -0x07e @ 4(r)>
        <LVAR -0x082 @ 4(r)>
        <LVAR -0x086 @ 4(r)>
        <LVAR -0x088 @>
    <POP 22954-22b8c Body>                                              
        <POP 22954-2296a Prologue>                           Σ0         ↓
        <POP 2296a-2297a RegCacheLoad>                       Σ0         ↓
        <POP 2297a-22984 Naked>                              Σ0         ↓
            <Pointer.fp 0x2297a <LVAR -0x05a @ 2(r)>>        Δ-4                {[@@-90]}
            <Call 0x2297c 0x2289e>                                              {[@@-90]}
            <POP 22980-22982 StackAdj>                       Δ+4                {}
            <MI 22982  MOVEQ.L #0x00,D7>                                        {}
        <POP 22984-22998 Naked>                              Σ0         ↓ →0x22984 ←0x22984
            <MI 22984  MOVE.B  D7,D0>                                           {}
            <MI 22986  EXTB.W  D0>                                              {}
            <MI 22988  ASL.W   #0x1,D0>                                         {}
            <MI 2298a  LEA.L   (A6-0x88),A0>                                    {}
            <MI 2298e  MOVE.W  #0x01,(A0+D0.W+#0xe)>                            {}
            <MI 22992  ADDQ.B  #0x1,D7>                                         {}
            <MI 22994  CMP.B   #0x0f,D7>                                        {}
            <MI 22996  BLE     0x22984>                                         {}
        <POP 22998-22a5a Naked>                              Σ0 Δ-4     ↓ →0x22a64
            <POP 22998-2299a StackAdj>                       Δ-12               {[-12-]}
            <MI 2299a  CLR.L   D0>                                              {[-12-]}
            <MI 2299c  MOVE.W  (A6-0x5a),D0>                                    {[-12-]}
            <MI 2299e  MOVE.L  D0,-(A7)>                     Δ-4                {[-12-]|[4, 'D0']}
            <Call 0x229a0 0x10354>                                              {[-12-]|[4, 'D0']}
                Long2Quad(a : Long) : Quad
            <POP 229a6-229a8 StackAdj>                       Δ+4                {[-12-]}
            <Const 0x229a8 0x10.4>                           Δ-4                {[-12-]|[##16]}
            <Call 0x229ac 0x1035c>                                              {[-12-]|[##16]}
                Quad2String(a : Quad; radix : Long ) : String
            <POP 229b2-229b4 StackAdj>                       Δ+12               {[-4-]}
            <Call 0x229b4 0x219b8>                                              {[-4-]}
            <POP 229b8-229ba StackAdj>                       Δ+2                {[-2-]}
            <MI 229ba  MOVE.W  (A6-0x5a),(A7)>                                  {[2, '(A6-0x5a)']}
            <Pointer.fp 0x229bc <LVAR -0x058 @>>             Δ-4                {[2, '(A6-0x5a)']|[@@-88]}
            <Call 0x229c0 0x21256>                                              {[2, '(A6-0x5a)']|[@@-88]}
            <POP 229c4-229c6 StackAdj>                       Δ+6                {}
            <MI 229c6  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 229ca  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <Blob 0x229cc [86] (A6-0x58)>                    Δ-86               {[4, 'A0']|[«86»]}
            <MI 229de  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']}
            <POP 229e2-229e4 StackAdj>                       Δ-8                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <MI 229e4  MOVEA.L A7,A1>                                           {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <MI 229e6  MOVEA.L A0,A2>                                           {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <BlockMove 8,A2,A1>                                                 {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <Pointer.fp 0x229f0 <LVAR -0x086 @ 4(r)>>        Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-134]}
            <Pointer.fp 0x229f4 <LVAR -0x07a @>>             Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-134]|[@@-122]}
            <Call 0x229f8 0x21a94>                                              {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-134]|[@@-122]}
            <POP 229fc-229fd StackAdj>                       Δ+106      ↓       {[4, 'A0']}
            <Blob 0x229fd [86] (A6-0x58)>                    Δ-86               {[4, 'A0']|[«86»]}
            <MI 22a0e  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']}
            <POP 22a12-22a14 StackAdj>                       Δ-8                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <MI 22a14  MOVEA.L A7,A1>                                           {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <MI 22a16  MOVEA.L A0,A2>                                           {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <BlockMove 8,A2,A1>                                                 {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <Pointer.fp 0x22a20 <LVAR -0x082 @ 4(r)>>        Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]}
            <Pointer.fp 0x22a24 <LVAR -0x07a @>>             Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]|[@@-122]}
            <Pointer.fp 0x22a28 <LVAR -0x07e @ 4(r)>>        Δ-4                {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]|[@@-122]|[@@-126]}
            <Call 0x22a2c 0x21c0a>                                              {[4, 'A0']|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]|[@@-122]|[@@-126]}
            <POP 22a30-22a34 StackAdj>                       Δ+100              {[4, 'A0']|[-10-]}
            <MI 22a34  MOVEA.L A7,A1>                                           {[4, 'A0']|[-10-]}
            <MI 22a36  MOVEA.L A0,A2>                                           {[4, 'A0']|[-10-]}
            <BlockMove 8,A2,A1>                                                 {[4, 'A0']|[-10-]}
            <MI 22a40  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[4, 'A0']|[-10-]|[4, '(A6+0x14)']}
            <Blob 0x22a44 [32] (A6-0x5a)>                    Δ-32               {[4, 'A0']|[-10-]|[4, '(A6+0x14)']|[«32»]}
            <Call 0x22a4e 0x221f0>                                              {[4, 'A0']|[-10-]|[4, '(A6+0x14)']|[«32»]}
            <POP 22a52-22a56 StackAdj>                       Δ+44               {[4, 'A0']|[-2-]}
            <MI 22a56  TST.B   (A7)+>                        Δ+2                {[4, 'A0']}
            <MI 22a58  BEQ     0x22a64>                                         {[4, 'A0']}
        <POP 22a5a-22a64 Naked>                              Σ-4        →0x22b1e
            <MI 22a5a  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22a5c  MOVE.B  #0x12,(A0)>                                      {[-4-]}
            <MI 22a60  BRA     0x22b1e>                                         {[-4-]}
        <POP 22a64-22a6e Naked>                              Σ-4        ↓ →0x22af0 ←0x22998
            <MI 22a64  MOVE.L  (A6+0x14),D0>                                    {[-4-]}
            <MI 22a68  CMP.L   #0x01,D0>                                        {[-4-]}
            <MI 22a6a  BNE     0x22af0>                                         {[-4-]}
        <POP 22a6e-22a8e Naked>                              Σ-4        ↓ →0x22abe
            <POP 22a6e-22a70 StackAdj>                       Δ-8                {[-12-]}
            <MI 22a70  MOVEA.L A7,A1>                                           {[-12-]}
            <MI 22a72  MOVEA.L A0,A2>                                           {[-12-]}
            <BlockMove 8,A2,A1>                                                 {[-12-]}
            <Call 0x22a7c 0x219fc>                                              {[-12-]}
            <POP 22a80-22a82 StackAdj>                       Δ+8                {[-4-]}
            <MI 22a82  MOVE.L  (A6-0x7e),D0>                                    {[-4-]}
            <MI 22a86  CMPI.L  #0x00000003,D0>                                  {[-4-]}
            <MI 22a8c  BHI     0x22abe>                                         {[-4-]}
        <POP 22a8e-22a98 Naked>                              Σ-4        →0x22aa0 →0x22aa6 →0x22aae →0x22ab6
            <MI 22a8e  ADD.W   D0,D0>                                           {[-4-]}
            <MI 22a90  SWITCH  D0.W>                                            {[-4-]}
        <POP 22aa0-22aa6 Naked>                              Σ-4        →0x22ac2 ←0x22a8e
            <MI 22aa0  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22aa2  MOVE.B  #0x0d,(A0)>                                      {[-4-]}
            <MI 22aa4  BRA     0x22ac2>                                         {[-4-]}
        <POP 22aa6-22aae Naked>                              Σ-4        →0x22ac2 ←0x22a8e
            <MI 22aa6  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22aa8  MOVE.B  #0x09,(A0)>                                      {[-4-]}
            <MI 22aac  BRA     0x22ac2>                                         {[-4-]}
        <POP 22aae-22ab6 Naked>                              Σ-4        →0x22ac2 ←0x22a8e
            <MI 22aae  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22ab0  MOVE.B  #0x0a,(A0)>                                      {[-4-]}
            <MI 22ab4  BRA     0x22ac2>                                         {[-4-]}
        <POP 22ab6-22abe Naked>                              Σ-4        →0x22ac2 ←0x22a8e
            <MI 22ab6  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22ab8  MOVE.B  #0x0b,(A0)>                                      {[-4-]}
            <MI 22abc  BRA     0x22ac2>                                         {[-4-]}
        <POP 22abe-22ac2 Naked>                              Σ-4        ↓ ←0x22a6e
            <MI 22abe  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22ac0  MOVE.B  #0x0c,(A0)>                                      {[-4-]}
        <POP 22ac2-22aca Naked>                              Σ-4        ↓ →0x22aee ←0x22aa0 ←0x22aa6 ←0x22aae ←0x22ab6
            <MI 22ac2  MOVE.L  (A6-0x7e),D0>                                    {[-4-]}
            <MI 22ac6  CMP.L   #0x01,D0>                                        {[-4-]}
            <MI 22ac8  BLT     0x22aee>                                         {[-4-]}
        <POP 22aca-22ad2 Naked>                              Σ-4        ↓ →0x22aee
            <MI 22aca  CMPI.L  #0x00000002,D0>                                  {[-4-]}
            <MI 22ad0  BGT     0x22aee>                                         {[-4-]}
        <POP 22ad2-22aee Naked>                              Σ-4        ↓
            <MI 22ad2  CLR.L   D0>                                              {[-4-]}
            <MI 22ad4  MOVE.W  (A6-0x5a),D0>                                    {[-4-]}
            <MI 22ad6  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <MI 22ad8  MOVEA.L (A7+0x4),A0>                                     {[-4-]|[4, 'D0']}
            <POP 22adc-22ade StackAdj>                       Δ-8                {[-4-]|[4, 'D0']|[-8-]}
            <MI 22ade  MOVEA.L A7,A1>                                           {[-4-]|[4, 'D0']|[-8-]}
            <BlockMove 8,A0,A1>                                                 {[-4-]|[4, 'D0']|[-8-]}
            <Call 0x22ae8 0x21d9c>                                              {[-4-]|[4, 'D0']|[-8-]}
            <POP 22aec-22aee StackAdj>                       Δ+12               {[-4-]}
        <POP 22aee-22af0 Naked>                              Σ-4        →0x22b1e ←0x22ac2 ←0x22aca
            <MI 22aee  BRA     0x22b1e>                                         {[-4-]}
        <POP 22af0-22af6 Naked>                              Σ-4        ↓ →0x22afe ←0x22a64
            <MI 22af0  CMP.L   (A6-0x86),D0>                                    {[-4-]}
            <MI 22af4  BNE     0x22afe>                                         {[-4-]}
        <POP 22af6-22afe Naked>                              Σ-4        →0x22b1e
            <MI 22af6  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22af8  MOVE.B  #0x0e,(A0)>                                      {[-4-]}
            <MI 22afc  BRA     0x22b1e>                                         {[-4-]}
        <POP 22afe-22b04 Naked>                              Σ-4        ↓ →0x22b0c ←0x22af0
            <MI 22afe  TST.L   (A6-0x86)>                                       {[-4-]}
            <MI 22b02  BEQ     0x22b0c>                                         {[-4-]}
        <POP 22b04-22b0c Naked>                              Σ-4        →0x22b1e
            <MI 22b04  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22b06  MOVE.B  #0x11,(A0)>                                      {[-4-]}
            <MI 22b0a  BRA     0x22b1e>                                         {[-4-]}
        <POP 22b0c-22b12 Naked>                              Σ-4        ↓ →0x22b18 ←0x22afe
            <MI 22b0c  CMP.L   (A6-0x82),D0>                                    {[-4-]}
            <MI 22b10  BNE     0x22b18>                                         {[-4-]}
        <POP 22b12-22b18 Naked>                              Σ-4        →0x22b1e
            <MI 22b12  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22b14  MOVE.B  #0x0f,(A0)>                                      {[-4-]}
            <MI 22b16  BRA     0x22b1e>                                         {[-4-]}
        <POP 22b18-22b1e Naked>                              Σ-4        ↓ ←0x22b0c
            <MI 22b18  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22b1a  MOVE.B  #0x10,(A0)>                                      {[-4-]}
        <POP 22b1e-22b28 Naked>                              Σ-4        ↓ →0x22b82 ←0x22a5a ←0x22aee ←0x22af6 ←0x22b04 ←0x22b12
            <MI 22b1e  MOVEA.L (A6+0xc),A0>                                     {[-4-]}
            <MI 22b20  CLR.L   D0>                                              {[-4-]}
            <MI 22b22  MOVE.B  (A0),D0>                                         {[-4-]}
            <MI 22b24  CMP.W   #0x0f,D0>                                        {[-4-]}
            <MI 22b26  BEQ     0x22b82>                                         {[-4-]}
        <POP 22b28-22b2c Naked>                              Σ-4        ↓ →0x22b82
            <MI 22b28  CMP.W   #0x0d,D0>                                        {[-4-]}
            <MI 22b2a  BEQ     0x22b82>                                         {[-4-]}
        <POP 22b2c-22b80 Naked>                              Σ-4        ↓ →0x22b82
            <Call 0x22b2c 0x22266>                                              {[-4-]}
            <MI 22b30  MOVE.W  (A6-0x5a),-(A7)>              Δ-2                {[-4-]|[2, '(A6-0x5a)']}
            <Pointer.fp 0x22b32 <LVAR -0x058 @>>             Δ-4                {[-4-]|[2, '(A6-0x5a)']|[@@-88]}
            <Call 0x22b36 0x21256>                                              {[-4-]|[2, '(A6-0x5a)']|[@@-88]}
            <POP 22b3a-22b3b StackAdj>                       Δ+6        ↓       {[-4-]}
            <Blob 0x22b3b [86] (A6-0x58)>                    Δ-86               {[-4-]|[«86»]}
            <MI 22b4c  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[-4-]|[«86»]|[4, '(A6+0x14)']}
            <MI 22b50  MOVEA.L (A7+0x5a),A0>                                    {[-4-]|[«86»]|[4, '(A6+0x14)']}
            <POP 22b54-22b56 StackAdj>                       Δ-8                {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <MI 22b56  MOVEA.L A7,A1>                                           {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <BlockMove 8,A0,A1>                                                 {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]}
            <Pointer.fp 0x22b60 <LVAR -0x082 @ 4(r)>>        Δ-4                {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]}
            <Pointer.fp 0x22b64 <LVAR -0x07a @>>             Δ-4                {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]|[@@-122]}
            <Pointer.fp 0x22b68 <LVAR -0x07e @ 4(r)>>        Δ-4                {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]|[@@-122]|[@@-126]}
            <Call 0x22b6c 0x21c0a>                                              {[-4-]|[«86»]|[4, '(A6+0x14)']|[-8-]|[@@-130]|[@@-122]|[@@-126]}
            <POP 22b70-22b74 StackAdj>                       Δ+110              {[-4-]}
            <MI 22b74  MOVEA.L (A6+0x10),A0>                                    {[-4-]}
            <MI 22b78  CLR.B   (A0)>                                            {[-4-]}
            <MI 22b7a  TST.L   (A6-0x7e)>                                       {[-4-]}
            <MI 22b7e  BNE     0x22b82>                                         {[-4-]}
        <POP 22b80-22b82 Naked>                              Σ-4        ↓
            <MI 22b80  ADDQ.B  #0x1,(A0)>                                       {[-4-]}
        <POP 22b82-22b84 Naked>                              Σ-4 Δ+4    ↓ ←0x22b1e ←0x22b28 ←0x22b2c
            <POP 22b82-22b84 StackAdj>                       Δ+4                {}
        <POP 22b84-22b8c Epilogue>                           Σ0         

0x22b8c


@ 22b8c
START
    <POP 22b8c--0001 Body>                                              
        <POP 22b8c-22b96 Prologue>                           Σ0         
        <POP 22b96-22bae RegCacheLoad>                       Σ0         ↓
        <POP 22bae-22be0 Naked>                              Σ0         ↓
            <Call 0x22bae 0x10398>                                              {}
                FSCALL_10398
            <Const 0x22bb4 0x0.4>                            Δ-4                {[##0]}
            <Call 0x22bb8 0x104d8>                                              {[##0]}
                ExpInit(a : Long)
            <POP 22bbe-22bc0 StackAdj>                       Δ+4                {}
            <Const 0x22bc0 0x2338a.4>                        Δ-4                {[##144266]}
            <Const 0x22bc6 0x23395.4>                        Δ-4                {[##144266]|[##144277]}
            <Call 0x22bc8 0x22536>                                              {[##144266]|[##144277]}
            <POP 22bcc-22bce StackAdj>                       Δ+8                {}
            <Const 0x22bce 0x2337c.4>                        Δ-4                {[##144252]}
            <Call 0x22bd4 0x102b8>                                              {[##144252]}
                NewString(VAR a : String)
            <POP 22bda-22bdc StackAdj>                       Δ+4                {}
            <MI 22bdc  CLR.B   0x23394>                                         {}
            <MI 22bde  MOVEQ.L #0x00,D0>                                        {}
        <POP 22be0-22bfc Naked>                              Σ0         ↓ →0x22be0 ←0x22be0
            <MI 22be0  MOVE.L  D0,0x23390>                                      {}
            <POP 0x22be6 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 22bec  LEA.L   0x23368,A0>                                      {}
            <MI 22bf2  CLR.B   (A0+D0.L+#0x19)>                                 {}
            <MI 22bf6  ADDQ.L  #0x1,D0>                                         {}
            <MI 22bf8  CMP.L   #0x07,D0>                                        {}
            <MI 22bfa  BLE     0x22be0>                                         {}
        <POP 22bfc-22c2a Naked>                              Σ0         ↓ →0x22c6e
            <Call 0x22bfc 0x20bb4>                                              {}
            <POP 22c00-22c01 StackAdj>                       Δ-4        ↓       {[-4-]}
            <Blob 0x22c01 [8] 0x23395>                       Δ-8                {[-4-]|[«8»]}
            <Call 0x22c0e 0x221b2>                                              {[-4-]|[«8»]}
            <POP 22c12-22c14 StackAdj>                       Δ+8                {[-4-]}
            <MI 22c14  MOVE.L  (A7)+,0x2338c>                Δ+4                {}
            <MI 22c1a  MOVE.B  0x2338a,D0>                                      {}
            <MI 22c20  EXTB.W  D0>                                              {}
            <MI 22c22  SUBQ.W  #0x3,D0>                                         {}
            <MI 22c24  CMPI.W  #0x0002,D0>                                      {}
            <MI 22c28  BHI     0x22c6e>                                         {}
        <POP 22c2a-22c34 Naked>                              Σ0         →0x22c46 →0x22c58 →0x22c3a
            <MI 22c2a  ADD.W   D0,D0>                                           {}
            <MI 22c2c  SWITCH  D0.W>                                            {}
        <POP 22c3a-22c46 Naked>                              Σ0         →0x22ca2 ←0x22c2a
            <Const 0x22c3a 0x23394.4>                        Δ-4                {[##144276]}
            <Const 0x22c3c 0x23380.4>                        Δ-4                {[##144276]|[##144256]}
            <Call 0x22c3e 0x22634>                                              {[##144276]|[##144256]}
            <POP 22c42-22c44 StackAdj>                       Δ+8                {}
            <MI 22c44  BRA     0x22ca2>                                         {}
        <POP 22c46-22c58 Naked>                              Σ0         →0x22ca2 ←0x22c2a
            <Blob 0x22c46 [4] 0x2338c>                       Δ-4                {[«4»]}
            <Const 0x22c4c 0x23380.4>                        Δ-4                {[«4»]|[##144256]}
            <Const 0x22c4e 0x23395.4>                        Δ-4                {[«4»]|[##144256]|[##144277]}
            <Call 0x22c50 0x227b2>                                              {[«4»]|[##144256]|[##144277]}
            <POP 22c54-22c56 StackAdj>                       Δ+12               {}
            <MI 22c56  BRA     0x22ca2>                                         {}
        <POP 22c58-22c6e Naked>                              Σ0         →0x22ca2 ←0x22c2a
            <Blob 0x22c58 [4] 0x2338c>                       Δ-4                {[«4»]}
            <Const 0x22c5e 0x23394.4>                        Δ-4                {[«4»]|[##144276]}
            <Const 0x22c60 0x23380.4>                        Δ-4                {[«4»]|[##144276]|[##144256]}
            <Const 0x22c62 0x23395.4>                        Δ-4                {[«4»]|[##144276]|[##144256]|[##144277]}
            <Call 0x22c64 0x22954>                                              {[«4»]|[##144276]|[##144256]|[##144277]}
            <POP 22c68-22c6c StackAdj>                       Δ+16               {}
            <MI 22c6c  BRA     0x22ca2>                                         {}
        <POP 22c6e-22ca2 Naked>                              Σ0         ↓ ←0x22bfc
            <Blob 0x22c6e [40] @>                            Δ-40               {[«40""»]}
            <Const 0x22c80 0xe.2>                            Δ-2                {[«40""»]|[#14]}
            <POP 22c84-22c86 StackAdj>                       Δ-4                {[«40""»]|[#14]|[-4-]}
            <Lit 0x22c86 39>                                                    {[«40""»]|[#14]|[$$Post mortem invocation error (EMWCSP-3)]}
            <Call 0x22c98 0x103b8>                                              {[«40""»]|[#14]|[$$Post mortem invocation error (EMWCSP-3)]}
                PopProgram(status : Byte; msg : String)
            <POP 22c9e-22ca2 StackAdj>                       Δ+46               {}
        <POP 22ca2-22ca6 Naked>                              Σ0         ↓ →0x22cd6 ←0x22c3a ←0x22c46 ←0x22c58
            <MI 22ca2  TST.B   0x23394>                                         {}
            <MI 22ca4  BEQ     0x22cd6>                                         {}
        <POP 22ca6-22cd6 Naked>                              Σ0         →0x22d04
            <Blob 0x22ca6 [54] @>                            Δ-54               {[«54""»]}
            <POP 22cb8-22cba StackAdj>                       Δ-4                {[«54""»]|[-4-]}
            <Lit 0x22cba 53>                                                    {[«54""»]|[$$Reloading the control store fixed the ram location(s)]}
            <Call 0x22ccc 0x219b8>                                              {[«54""»]|[$$Reloading the control store fixed the ram location(s)]}
            <POP 22cd0-22cd4 StackAdj>                       Δ+58               {}
            <MI 22cd4  BRA     0x22d04>                                         {}
        <POP 22cd6-22d04 Naked>                              Σ0         ↓ ←0x22ca2
            <Blob 0x22cd6 [60] @>                            Δ-60               {[«60""»]}
            <POP 22ce8-22cea StackAdj>                       Δ-4                {[«60""»]|[-4-]}
            <Lit 0x22cea 59>                                                    {[«60""»]|[$$Reloading the control store did NOT fix the ram location(s)]}
            <Call 0x22cfc 0x219b8>                                              {[«60""»]|[$$Reloading the control store did NOT fix the ram location(s)]}
            <POP 22d00-22d04 StackAdj>                       Δ+64               {}
        <POP 22d04-22d74 Naked>                              Σ0         ↓ ←0x22ca6
            <Const 0x22d04 0x23389.4>                        Δ-4                {[##144265]}
            <Const 0x22d0a 0x23381.4>                        Δ-4                {[##144265]|[##144257]}
            <Const 0x22d10 0x23380.4>                        Δ-4                {[##144265]|[##144257]|[##144256]}
            <Blob 0x22d12 [2] 0x23394>                       Δ-2                {[##144265]|[##144257]|[##144256]|[«2»]}
            <Blob 0x22d14 [8] 0x23395>                       Δ-8                {[##144265]|[##144257]|[##144256]|[«2»]|[«8»]}
            <Call 0x22d22 0x2234c>                                              {[##144265]|[##144257]|[##144256]|[«2»]|[«8»]}
            <POP 22d26-22d2a StackAdj>                       Δ+20               {[-2-]}
            <POP 22d2a-22d2b StackAdj>                       Δ+2                {}
            <Blob 0x22d2b [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x22d2e [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x22d32 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <Blob 0x22d36 [2] 0x23389>                       Δ-2                {[«2""»]|[«2""»]|[«2""»]|[«2»]}
            <POP 22d3c-22d3e StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[«2»]|[-4-]}
            <Lit 0x22d3e 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]}
            <POP 22d4e-22d50 StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]|[-4-]}
            <POP 22d50-22d51 StackAdj>                       Δ+4                {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]}
            <Blob 0x22d51 [4] 0x2337c>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]|[«4»]}
            <Blob 0x22d56 [2] 0x23380>                       Δ-2                {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]|[«4»]|[«2»]}
            <Blob 0x22d58 [8] 0x23381>                       Δ-8                {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]|[«4»]|[«2»]|[«8»]}
            <Call 0x22d6a 0x1054a>                                              {[«2""»]|[«2""»]|[«2""»]|[«2»]|[$$EMWCSP]|[«4»]|[«2»]|[«8»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 22d70-22d74 StackAdj>                       Δ+26               {}
        <POP 22d74-22d7a Naked>                              Σ0         
            <Call 0x22d74 0x10284>                                              {}
                ?exit

0x23170


@ 23170
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 23170-231d8 Body>                                              
        <POP 23170-23186 Prologue>                           Σ0         ↓
        <POP 23186-231d0 Naked>                              Σ0         ↓
            <Blob 0x23186 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x23192 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 23196-23198 StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x23198 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 231aa-231ac StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 231ac  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 231b0  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 231b2  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 231b4  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x231b6 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 231bc-231be StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x231be 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 231c4-231c6 StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x231c6 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 231cc-231d0 StackAdj>                       Δ+20               {}
        <POP 231d0-231d8 Epilogue>                           Σ0         

0x2322c


@ 2322c
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 2322c-23368 Body>                                              
        <POP 2322c-23242 Prologue>                           Σ0         ↓
        <POP 23242-23258 RegCacheLoad>                       Σ0         ↓
        <POP 23258-232b8 Naked>                              Σ0         ↓ →0x23300
            <Call 0x23258 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x2325e [18] @>                            Δ-18               {[«18""»]}
            <POP 2326a-2326c StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x2326c 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x23278 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 2327a-2327b StackAdj>                       Δ+22       ↓       {}
            <Blob 0x2327b [14] @>                            Δ-14               {[«14""»]}
            <POP 2328a-2328c StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x2328c 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 23296-23298 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 23298  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x2329c 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 232a2-232a4 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x232a4 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 232aa-232ac StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x232ac 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 232ae-232b0 StackAdj>                       Δ+18               {}
            <MI 232b0  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 232b4  CMPA.W  #0x01,A0>                                        {}
            <MI 232b6  BEQ     0x23300>                                         {}
        <POP 232b8-23300 Naked>                              Σ0         ↓
            <Blob 0x232b8 [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x232c8 [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 232d8-232da StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x232da 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 232e4-232e6 StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x232e6>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x232e6 12>                      Δ-4        
                <Const 0x232ea 0x1.2>                        Δ-2        
                <Const 0x232ec 0x1e.2>                       Δ-2        
                <Call 0x232ee 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 232f0-232f2 StackAdj>                   Δ+8        
            <Call 0x232f2 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 232f8-232fa StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x232fa 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 232fc-23300 StackAdj>                       Δ+48               {}
        <POP 23300-23360 Naked>                              Σ0         ↓ ←0x23258
            <Blob 0x23300 [14] @>                            Δ-14               {[«14""»]}
            <POP 23310-23312 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x23312 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 2331c-2331e StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 2331e  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x23322 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 23328-2332a StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x2332a 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 23330-23332 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x23332 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 23334-23335 StackAdj>                       Δ+18       ↓       {}
            <Blob 0x23335 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x23344 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 23348-2334a StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x2334a 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x23358 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 2335e-23360 StackAdj>                       Δ+30               {}
        <POP 23360-23368 Epilogue>                           Σ0         

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.627682346da2915b
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 2b 8c              |  +     |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 33 b0              |  3     |		.PTR	0x233b0
00020010					code.end:
00020010 00 02 33 68              |  3h    |		.PTR	0x23368
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 31 70              |  1p    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 32 2c              |  2,    |		.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 53 42 55 53 55 4c 4f 41  |SBUSULOA|		.TXT	'SBUSULOAD '
00020114 44 42 55 53 55 4c 4f 41  |DBUSULOA|		.TXT	'DBUSULOAD '
0002011e 52 65                    |Re      |		.XXX[0x2]
00020120 6c 6f 61 64 69 6e 67 20  |loading |		.XXX[0x4c8]
00020128 74 68 65 20 63 6f 6e 74  |the cont|
00020130 72 6f 6c 20 73 74 6f 72  |rol stor|
00020138 65 20 66 69 78 65 64 20  |e fixed |
00020140 74 68 65 20 72 61 6d 20  |the ram |
00020148 6c 6f 63 61 74 69 6f 6e  |location|
00020150 52 65 6c 6f 61 64 69 6e  |Reloadin|
00020158 67 20 74 68 65 20 63 6f  |g the co|
00020160 6e 74 72 6f 6c 20 73 74  |ntrol st|
00020168 6f 72 65 20 64 69 64 20  |ore did |
00020170 4e 4f 54 20 66 69 78 20  |NOT fix |
00020178 74 68 65 20 72 61 6d 20  |the ram |
00020180 6c 6f 63 61 74 69 6f 6e  |location|
00020188 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020190 4a 32 37 20 4b 32 37 20  |J27 K27 |
00020198 4a 32 36 20 4b 32 36 20  |J26 K26 |
000201a0 4a 32 35 20 4b 32 35 20  |J25 K25 |
000201a8 4a 32 34 20 4b 32 34 20  |J24 K24 |
000201b0 4a 32 33 20 4b 32 33 20  |J23 K23 |
000201b8 4a 32 32 20 4b 32 32 20  |J22 K22 |
000201c0 4a 32 31 20 4b 32 31 20  |J21 K21 |
000201c8 4a 33 38 20 4a 33 32 20  |J38 J32 |
000201d0 4a 33 31 20 4b 33 32 20  |J31 K32 |
000201d8 4a 33 36 20 4b 33 36 20  |J36 K36 |
000201e0 4a 33 33 20 4b 33 33 20  |J33 K33 |
000201e8 2d 2d 2d 20 4b 33 31 20  |--- K31 |
000201f0 4a 33 30 20 4b 33 30 20  |J30 K30 |
000201f8 4a 32 39 20 4b 32 39 20  |J29 K29 |
00020200 4a 32 38 20 4b 32 38 20  |J28 K28 |
00020208 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020210 4a 33 37 20 4b 33 37 20  |J37 K37 |
00020218 4b 33 34 20 4a 33 34 20  |K34 J34 |
00020220 4a 33 35 20 4b 33 35 20  |J35 K35 |
00020228 2d 2d 2d 20 4a 34 31 20  |--- J41 |
00020230 4b 34 31 20 4a 34 30 20  |K41 J40 |
00020238 4b 34 30 20 4a 33 39 20  |K40 J39 |
00020240 4b 33 39 20 4b 33 38 20  |K39 K38 |
00020248 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020250 44 31 39 20 45 31 39 20  |D19 E19 |
00020258 46 31 39 20 47 31 39 20  |F19 G19 |
00020260 44 31 39 20 45 31 39 20  |D19 E19 |
00020268 47 31 39 20 44 31 39 20  |G19 D19 |
00020270 45 31 39 20 46 31 39 20  |E19 F19 |
00020278 44 31 39 20 45 31 39 20  |D19 E19 |
00020280 46 31 39 20 2d 2d 2d 20  |F19 --- |
00020288 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020290 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020298 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
000202a0 48 31 38 20 49 31 38 20  |H18 I18 |
000202a8 2d 2d 2d 20 47 31 39 20  |--- G19 |
000202b0 2d 2d 2d 20 47 31 39 20  |--- G19 |
000202b8 46 31 39 20 48 31 38 20  |F19 H18 |
000202c0 48 31 38 20 48 31 38 20  |H18 H18 |
000202c8 2d 2d 2d 20 49 31 38 20  |--- I18 |
000202d0 49 31 38 20 49 31 38 20  |I18 I18 |
000202d8 49 30 32 20 49 30 32 20  |I02 I02 |
000202e0 49 30 32 20 49 30 32 20  |I02 I02 |
000202e8 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
000202f0 44 32 30 20 45 32 30 20  |D20 E20 |
000202f8 46 32 30 20 47 32 30 20  |F20 G20 |
00020300 44 32 30 20 45 32 30 20  |D20 E20 |
00020308 47 32 30 20 44 32 30 20  |G20 D20 |
00020310 45 32 30 20 46 32 30 20  |E20 F20 |
00020318 44 32 30 20 45 32 30 20  |D20 E20 |
00020320 46 32 30 20 2d 2d 2d 20  |F20 --- |
00020328 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020330 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020338 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020340 48 31 39 20 49 31 39 20  |H19 I19 |
00020348 2d 2d 2d 20 47 32 30 20  |--- G20 |
00020350 2d 2d 2d 20 47 32 30 20  |--- G20 |
00020358 46 32 30 20 48 31 39 20  |F20 H19 |
00020360 48 31 39 20 48 31 39 20  |H19 H19 |
00020368 2d 2d 2d 20 49 31 39 20  |--- I19 |
00020370 49 31 39 20 49 31 39 20  |I19 I19 |
00020378 48 30 32 20 48 30 32 20  |H02 H02 |
00020380 48 30 32 20 48 30 32 20  |H02 H02 |
00020388 45 33 39 20 45 33 39 20  |E39 E39 |
00020390 45 33 39 20 45 33 39 20  |E39 E39 |
00020398 45 33 38 20 45 33 38 20  |E38 E38 |
000203a0 45 33 38 20 45 33 38 20  |E38 E38 |
000203a8 45 33 37 20 45 33 37 20  |E37 E37 |
000203b0 45 33 37 20 45 33 37 20  |E37 E37 |
000203b8 45 33 36 20 45 33 36 20  |E36 E36 |
000203c0 45 33 36 20 45 33 36 20  |E36 E36 |
000203c8 2d 2d 2d 20 4c 31 34 20  |--- L14 |
000203d0 4c 31 35 20 4c 31 36 20  |L15 L16 |
000203d8 4c 31 37 20 4c 31 38 20  |L17 L18 |
000203e0 4c 31 39 20 4c 32 30 20  |L19 L20 |
000203e8 2d 2d 2d 20 4c 32 31 20  |--- L21 |
000203f0 4c 30 36 20 4c 30 37 20  |L06 L07 |
000203f8 4c 30 38 20 4c 30 39 20  |L08 L09 |
00020400 4c 31 30 20 4c 31 31 20  |L10 L11 |
00020408 4c 31 32 20 4c 31 33 20  |L12 L13 |
00020410 4c 32 32 20 4c 32 33 20  |L22 L23 |
00020418 4c 32 34 20 4c 32 35 20  |L24 L25 |
00020420 4c 30 35 20 4c 30 34 20  |L05 L04 |
00020428 4c 33 35 20 4c 33 36 20  |L35 L36 |
00020430 4c 33 37 20 4c 33 38 20  |L37 L38 |
00020438 4c 33 39 20 4c 34 31 20  |L39 L41 |
00020440 4c 34 30 20 4c 34 32 20  |L40 L42 |
00020448 2d 2d 2d 20 4c 32 38 20  |--- L28 |
00020450 4c 32 39 20 4c 33 30 20  |L29 L30 |
00020458 4c 33 31 20 4c 33 32 20  |L31 L32 |
00020460 4c 33 33 20 4c 33 34 20  |L33 L34 |
00020468 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020470 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020478 2d 2d 2d 20 2d 2d 2d 20  |--- --- |
00020480 4c 32 36 20 4c 32 37 20  |L26 L27 |
00020488 4c 32 33 20 4c 32 34 20  |L23 L24 |
00020490 4c 32 35 20 4c 32 36 20  |L25 L26 |
00020498 4c 32 37 20 4c 32 38 20  |L27 L28 |
000204a0 4c 32 39 20 4c 33 30 20  |L29 L30 |
000204a8 4c 33 31 20 4c 33 32 20  |L31 L32 |
000204b0 4c 33 33 20 4c 33 34 20  |L33 L34 |
000204b8 4b 32 35 20 4b 32 34 20  |K25 K24 |
000204c0 4b 32 33 20 4b 32 32 20  |K23 K22 |
000204c8 4a 32 35 20 4a 32 34 20  |J25 J24 |
000204d0 4c 33 35 20 4c 33 36 20  |L35 L36 |
000204d8 4c 33 37 20 4c 33 38 20  |L37 L38 |
000204e0 4c 33 39 20 49 31 38 20  |L39 I18 |
000204e8 49 31 39 20 4b 31 39 20  |I19 K19 |
000204f0 4a 32 30 20 4a 31 39 20  |J20 J19 |
000204f8 4a 31 38 20 4a 32 33 20  |J18 J23 |
00020500 4a 32 32 20 49 32 35 20  |J22 I25 |
00020508 49 32 34 20 49 32 33 20  |I24 I23 |
00020510 49 32 32 20 49 32 31 20  |I22 I21 |
00020518 4a 32 31 20 4b 32 31 20  |J21 K21 |
00020520 4b 32 30 20 49 32 30 20  |K20 I20 |
00020528 4c 32 33 20 4c 32 34 20  |L23 L24 |
00020530 4c 32 35 20 4c 32 36 20  |L25 L26 |
00020538 4c 32 37 20 4c 32 38 20  |L27 L28 |
00020540 4c 32 39 20 4c 33 30 20  |L29 L30 |
00020548 4c 33 31 20 4c 33 32 20  |L31 L32 |
00020550 4c 33 33 20 4c 33 34 20  |L33 L34 |
00020558 4c 33 35 20 4c 33 36 20  |L35 L36 |
00020560 4c 33 37 20 4c 33 38 20  |L37 L38 |
00020568 4c 33 39 20 49 31 38 20  |L39 I18 |
00020570 49 31 39 20 49 32 30 20  |I19 I20 |
00020578 4b 31 39 20 4a 32 30 20  |K19 J20 |
00020580 4a 31 39 20 4a 31 38 20  |J19 J18 |
00020588 4b 32 35 20 4b 32 34 20  |K25 K24 |
00020590 4b 32 33 20 4b 32 32 20  |K23 K22 |
00020598 4a 32 35 20 4a 32 34 20  |J25 J24 |
000205a0 4a 32 33 20 4a 32 32 20  |J23 J22 |
000205a8 49 32 35 20 49 32 34 20  |I25 I24 |
000205b0 49 32 33 20 49 32 32 20  |I23 I22 |
000205b8 49 32 31 20 4a 32 31 20  |I21 J21 |
000205c0 4b 32 31 20 4b 32 30 20  |K21 K20 |
000205c8 49 31 37 20 49 31 36 20  |I17 I16 |
000205d0 49 31 35 20 49 31 34 20  |I15 I14 |
000205d8 4c 31 36 20 4c 31 35 20  |L16 L15 |
000205e0 4c 31 34 20 2d 2d 2d 20  |L14 --- |
000205e8 4c 41 53 54 5f 55 43 4f  |LAST_UCO|		.TXT	'LAST_UCODE'
000205f2 49 6e 63 6f 6e 73 69 73  |Inconsis|		.TXT	'Inconsistent microcode file size. '
00020614 42 4f 41 52              |BOAR    |		.XXX[0x4]
00020618 44 5f 56 41 4c 55 45 5f  |D_VALUE_|		.XXX[0x18]
00020620 54 4f 5f 53 54 52 49 4e  |TO_STRIN|
00020628 47 2c 20 56 61 6c 75 65  |G, Value|
00020630 20 3d 5f 20              | =_     |		.XXX[0x4]
00020634 53 45                    |SE      |		.TXT	'SE'
00020636 51 20                    |Q       |		.XXX[0x2]
00020638 46 49                    |FI      |		.TXT	'FI'
0002063a 55 20                    |U       |		.XXX[0x2]
0002063c 49 4f                    |IO      |		.TXT	'IO'
0002063e 43 20                    |C       |		.XXX[0x2]
00020640 54 59                    |TY      |		.TXT	'TY'
00020642 50 20                    |P       |		.XXX[0x2]
00020644 56 41                    |VA      |		.TXT	'VA'
00020646 4c 20                    |L       |		.XXX[0x2]
00020648 5c 20                    |\       |		.TXT	'\ '
0002064a 50 6f 73 74 20 6d 6f 72  |Post mor|		.TXT	'Post mortem error (EMWCSP-4)'
00020666 50 6f 73 74 20 6d 6f 72  |Post mor|		.TXT	'Post mortem invocation error (EMWCSP-2) '
0002068e 53 45                    |SE      |		.TXT	'SE'
00020690 51 20                    |Q       |		.XXX[0x2]
00020692 54 68 65 20 66 61 69 6c  |The fail|		.TXT	'The failing MICRO PC [ 16#'
000206ac 23 20 5d 20 69 73 20 75  |# ] is u|		.TXT	'# ] is unreasonable, 16#0145# being substituted '
000206dc 50 6f 73 74 20 6d 6f 72  |Post mor|		.TXT	'Post mortem invocation error (EMWCSP-3) '
00020704 52 65 6c 6f 61 64 69 6e  |Reloadin|		.TXT	'Reloading the control store fixed the ram location(s) '
0002073a 52 65 6c 6f 61 64 69 6e  |Reloadin|		.TXT	'Reloading the control store did NOT fix the ram location(s) '
00020776 45 4d                    |EM      |		.TXT	'EM'
00020778 57 43                    |WC      |		.TXT	'WC'
0002077a 53 50                    |SP      |		.TXT	'SP'
0002077c 80 00 40 00              |  @     |		.XXX[0x4]
00020780 20 00 10 00 08 00 04 00  |        |		.XXX[0x18]
00020788 02 00 01 00 00 80 00 40  |       @|
00020790 00 20 00 10 00 08 00 04  |        |
00020798 00 02 00 01              |        |		.XXX[0x4]
0002079c 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
000207a0 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
000207a4 2d 2d 2d 2d              |----    |		.XXX[0x4]
000207a8 2d 2d 4a 32 37 4b 32 37  |--J27K27|		.XXX[0xc8]
000207b0 4a 32 36 4b 32 36 4a 32  |J26K26J2|
000207b8 35 4b 32 35 4a 32 34 4b  |5K25J24K|
000207c0 32 34 4a 32 33 4b 32 33  |24J23K23|
000207c8 4a 32 32 4b 32 32 4a 32  |J22K22J2|
000207d0 31 4b 32 31 4a 33 38 4a  |1K21J38J|
000207d8 33 32 4a 33 31 4b 33 32  |32J31K32|
000207e0 4a 33 36 4b 33 36 4a 33  |J36K36J3|
000207e8 33 4b 33 33 2d 2d 2d 4b  |3K33---K|
000207f0 33 31 4a 33 30 4b 33 30  |31J30K30|
000207f8 4a 32 39 4b 32 39 4a 32  |J29K29J2|
00020800 38 4b 32 38 2d 2d 2d 2d  |8K28----|
00020808 2d 2d 4a 33 37 4b 33 37  |--J37K37|
00020810 4b 33 34 4a 33 34 4a 33  |K34J34J3|
00020818 35 4b 33 35 2d 2d 2d 4a  |5K35---J|
00020820 34 31 4b 34 31 4a 34 30  |41K41J40|
00020828 4b 34 30 4a 33 39 4b 33  |K40J39K3|
00020830 39 4b 33 38 2d 2d 2d 2d  |9K38----|
00020838 2d 2d 44 31 39 45 31 39  |--D19E19|
00020840 46 31 39 47 31 39 44 31  |F19G19D1|
00020848 39 45 31 39 47 31 39 44  |9E19G19D|
00020850 31 39 45 31 39 46 31 39  |19E19F19|
00020858 44 31 39 45 31 39 46 31  |D19E19F1|
00020860 39 2d 2d 2d 2d 2d 2d 2d  |9-------|
00020868 2d 2d 2d 2d 2d 2d 2d 2d  |--------|
00020870 2d 2d 2d 2d 2d 2d        |------  |		.XXX[0x6]
00020876 48 31                    |H1      |		.XXX[0x2]
00020878 38 49 31 38 2d 2d 2d 47  |8I18---G|		.XXX[0x70]
00020880 31 39 2d 2d 2d 47 31 39  |19---G19|
00020888 46 31 39 48 31 38 48 31  |F19H18H1|
00020890 38 48 31 38 2d 2d 2d 49  |8H18---I|
00020898 31 38 49 31 38 49 31 38  |18I18I18|
000208a0 49 30 32 49 30 32 49 30  |I02I02I0|
000208a8 32 49 30 32 2d 2d 2d 2d  |2I02----|
000208b0 2d 2d 44 32 30 45 32 30  |--D20E20|
000208b8 46 32 30 47 32 30 44 32  |F20G20D2|
000208c0 30 45 32 30 47 32 30 44  |0E20G20D|
000208c8 32 30 45 32 30 46 32 30  |20E20F20|
000208d0 44 32 30 45 32 30 46 32  |D20E20F2|
000208d8 30 2d 2d 2d 2d 2d 2d 2d  |0-------|
000208e0 2d 2d 2d 2d 2d 2d 2d 2d  |--------|
000208e8 2d 2d 2d 2d 2d 2d        |------  |		.XXX[0x6]
000208ee 48 31                    |H1      |		.XXX[0x2]
000208f0 39 49 31 39 2d 2d 2d 47  |9I19---G|		.XXX[0xe8]
000208f8 32 30 2d 2d 2d 47 32 30  |20---G20|
00020900 46 32 30 48 31 39 48 31  |F20H19H1|
00020908 39 48 31 39 2d 2d 2d 49  |9H19---I|
00020910 31 39 49 31 39 49 31 39  |19I19I19|
00020918 48 30 32 48 30 32 48 30  |H02H02H0|
00020920 32 48 30 32 45 33 39 45  |2H02E39E|
00020928 33 39 45 33 39 45 33 39  |39E39E39|
00020930 45 33 38 45 33 38 45 33  |E38E38E3|
00020938 38 45 33 38 45 33 37 45  |8E38E37E|
00020940 33 37 45 33 37 45 33 37  |37E37E37|
00020948 45 33 36 45 33 36 45 33  |E36E36E3|
00020950 36 45 33 36 2d 2d 2d 4c  |6E36---L|
00020958 31 34 4c 31 35 4c 31 36  |14L15L16|
00020960 4c 31 37 4c 31 38 4c 31  |L17L18L1|
00020968 39 4c 32 30 2d 2d 2d 4c  |9L20---L|
00020970 32 31 4c 30 36 4c 30 37  |21L06L07|
00020978 4c 30 38 4c 30 39 4c 31  |L08L09L1|
00020980 30 4c 31 31 4c 31 32 4c  |0L11L12L|
00020988 31 33 4c 32 32 4c 32 33  |13L22L23|
00020990 4c 32 34 4c 32 35 4c 30  |L24L25L0|
00020998 35 4c 30 34 4c 33 35 4c  |5L04L35L|
000209a0 33 36 4c 33 37 4c 33 38  |36L37L38|
000209a8 4c 33 39 4c 34 31 4c 34  |L39L41L4|
000209b0 30 4c 34 32 2d 2d 2d 4c  |0L42---L|
000209b8 32 38 4c 32 39 4c 33 30  |28L29L30|
000209c0 4c 33 31 4c 33 32 4c 33  |L31L32L3|
000209c8 33 4c 33 34 2d 2d 2d 2d  |3L34----|
000209d0 2d 2d 2d 2d 2d 2d 2d 2d  |--------|
000209d8 2d 2d 2d 2d 2d 2d        |------  |		.XXX[0x6]
000209de 4c 32                    |L2      |		.XXX[0x2]
000209e0 36 4c 32 37 4c 32 33 4c  |6L27L23L|		.XXX[0x108]
000209e8 32 34 4c 32 35 4c 32 36  |24L25L26|
000209f0 4c 32 37 4c 32 38 4c 32  |L27L28L2|
000209f8 39 4c 33 30 4c 33 31 4c  |9L30L31L|
00020a00 33 32 4c 33 33 4c 33 34  |32L33L34|
00020a08 4b 32 35 4b 32 34 4b 32  |K25K24K2|
00020a10 33 4b 32 32 4a 32 35 4a  |3K22J25J|
00020a18 32 34 4c 33 35 4c 33 36  |24L35L36|
00020a20 4c 33 37 4c 33 38 4c 33  |L37L38L3|
00020a28 39 49 31 38 49 31 39 4b  |9I18I19K|
00020a30 31 39 4a 32 30 4a 31 39  |19J20J19|
00020a38 4a 31 38 4a 32 33 4a 32  |J18J23J2|
00020a40 32 49 32 35 49 32 34 49  |2I25I24I|
00020a48 32 33 49 32 32 49 32 31  |23I22I21|
00020a50 4a 32 31 4b 32 31 4b 32  |J21K21K2|
00020a58 30 49 32 30 4c 32 33 4c  |0I20L23L|
00020a60 32 34 4c 32 35 4c 32 36  |24L25L26|
00020a68 4c 32 37 4c 32 38 4c 32  |L27L28L2|
00020a70 39 4c 33 30 4c 33 31 4c  |9L30L31L|
00020a78 33 32 4c 33 33 4c 33 34  |32L33L34|
00020a80 4c 33 35 4c 33 36 4c 33  |L35L36L3|
00020a88 37 4c 33 38 4c 33 39 49  |7L38L39I|
00020a90 31 38 49 31 39 49 32 30  |18I19I20|
00020a98 4b 31 39 4a 32 30 4a 31  |K19J20J1|
00020aa0 39 4a 31 38 4b 32 35 4b  |9J18K25K|
00020aa8 32 34 4b 32 33 4b 32 32  |24K23K22|
00020ab0 4a 32 35 4a 32 34 4a 32  |J25J24J2|
00020ab8 33 4a 32 32 49 32 35 49  |3J22I25I|
00020ac0 32 34 49 32 33 49 32 32  |24I23I22|
00020ac8 49 32 31 4a 32 31 4b 32  |I21J21K2|
00020ad0 31 4b 32 30 49 31 37 49  |1K20I17I|
00020ad8 31 36 49 31 35 49 31 34  |16I15I14|
00020ae0 4c 31 36 4c 31 35 4c 31  |L16L15L1|
00020ae8 34 2d 2d 2d              |4---    |		.XXX[0x4]
00020aec ; --------------------------------------------------------------------------------------
00020aec ; OMSI PASCAL Function
00020aec ;    <LVAR  0x016 1(r)>
00020aec ;    <LVAR  0x012 4(r)>
00020aec ;    <LVAR  0x010 1(r)>
00020aec ;    <LVAR  0x00e 1(r)>
00020aec ;    <LVAR  0x00c 1(r)>
00020aec ;    <LVAR  0x008 4(r)>
00020aec ;    <LVAR -0x004 @>
00020aec ; --------------------------------------------------------------------------------------
00020aec 4e 56 ff cc              |NV      |		LINK.W	A6,#0xffcc
00020af0 bf d5                    |        |		CMPA.L	(A5),A7
00020af2 62 06                    |b       |		BHI	0x20afa
00020af4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020af8 4e 76                    |Nv      |		TRAPV
00020afa de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00020afe 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
00020b02 45 f9 00 01 05 02        |E       |		LEA.L	IPC_PutBool(a : Bool),A2
00020b08 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
00020b0a 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020b10 2f 2e 00 12              |/.      |		MOVE.L	(A6+0x12),-(A7)
00020b14 4e b9 00 01 05 08        |N       |		JSR	IPC_PutString(a : String)
00020b1a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b1c 1e ae 00 10              |        |		MOVE.B	(A6+0x10),(A7)
00020b20 4e 92                    |N       |		JSR	(A2)
00020b22 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b24 4a 2e 00 16              |J.      |		TST.B	(A6+0x16)
00020b28 66 0e                    |f       |		BNE	0x20b38
00020b2a 1f 2e 00 0e              | .      |		MOVE.B	(A6+0xe),-(A7)
00020b2e 4e 92                    |N       |		JSR	(A2)
00020b30 1e ae 00 0c              |        |		MOVE.B	(A6+0xc),(A7)
00020b34 4e 92                    |N       |		JSR	(A2)
00020b36 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b38 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
00020b3e 4a 2e 00 16              |J.      |		TST.B	(A6+0x16)
00020b42 67 12                    |g       |		BEQ	0x20b56
00020b44 9e c1                    |        |		SUBA.W	D1,A7
00020b46 20 4f                    | O      |		MOVEA.L	A7,A0
00020b48 43 fa f5 c0              |C       |		LEA.L	0x2010a,A1
00020b4c 70 08                    |p       |		MOVEQ.L	#0x08,D0
00020b4e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020b50 51 c8 ff fc              |Q       |		DBF	D0,0x20b4e
00020b54 60 10                    |`       |		BRA	0x20b66
00020b56 9e c1                    |        |		SUBA.W	D1,A7
00020b58 20 4f                    | O      |		MOVEA.L	A7,A0
00020b5a 43 fa f5 b8              |C       |		LEA.L	0x20114,A1
00020b5e 70 08                    |p       |		MOVEQ.L	#0x08,D0
00020b60 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020b62 51 c8 ff fc              |Q       |		DBF	D0,0x20b60
00020b66 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b68 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020b6c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020b70 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
00020b74 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020b7a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020b7c 48 78 00 01              |Hx      |		PEA.L	0x1
00020b80 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020b84 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020b88 4e b9 00 01 03 b0        |N       |		JSR	PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
00020b8e de fc 00 18              |        |		ADDA.W	#0x18,A7
00020b92 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020b98 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00020b9c 48 50                    |HP      |		PEA.L	(A0)
00020b9e 4e b9 00 01 05 26        |N    &  |		JSR	IPC_GetBool() : Bool
00020ba4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ba6 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
00020bac 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
00020bb0 4e 5e                    |N^      |		UNLK	A6
00020bb2 4e 75                    |Nu      |		RTS
00020bb4 ; --------------------------------------------------------------------------------------
00020bb4 ; OMSI PASCAL Function
00020bb4 ;    <LVAR -0x00a @ 4(r)>
00020bb4 ;    <LVAR -0x00e @ 4(rw)>
00020bb4 ;    <LVAR -0x40e @ 2(r)>
00020bb4 ;    <LVAR -0x410 @>
00020bb4 ; --------------------------------------------------------------------------------------
00020bb4 4e 56 fb 88              |NV      |		LINK.W	A6,#0xfb88
00020bb8 bf d5                    |        |		CMPA.L	(A5),A7
00020bba 62 06                    |b       |		BHI	0x20bc2
00020bbc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020bc0 4e 76                    |Nv      |		TRAPV
00020bc2 de fc 00 68              |   h    |		ADDA.W	#0x68,A7
00020bc6 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020bca 45 f9 00 02 33 70        |E   3p  |		LEA.L	0x23370,A2
00020bd0 47 ee fb f0              |G       |		LEA.L	(A6-0x410),A3
00020bd4 49 f9 00 02 33 74        |I   3t  |		LEA.L	0x23374,A4
00020bda 72 02                    |r       |		MOVEQ.L	#0x02,D1
00020bdc 74 10                    |t       |		MOVEQ.L	#0x10,D2
00020bde 41 fa fa 12              |A       |		LEA.L	0x205f2,A0
00020be2 70 04                    |p       |		MOVEQ.L	#0x04,D0
00020be4 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020be6 51 c8 ff fc              |Q       |		DBF	D0,0x20be4
00020bea 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020bec 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020bf0 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020bf4 3f 3c 00 0a              |?<      |		MOVE.W	#0xa,-(A7)
00020bf8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020bfe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020c00 2d 5f ff f2              |-_      |		MOVE.L	(A7)+,(A6-0xe)
00020c04 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020c08 48 52                    |HR      |		PEA.L	(A2)
00020c0a 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00020c10 2e ae ff f2              |.       |		MOVE.L	(A6-0xe),(A7)
00020c14 42 27                    |B'      |		CLR.B	-(A7)
00020c16 1f 01                    |        |		MOVE.B	D1,-(A7)
00020c18 48 78 00 00              |Hx      |		PEA.L	0x0
00020c1c 48 53                    |HS      |		PEA.L	(A3)
00020c1e 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00020c22 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
00020c28 de c2                    |        |		ADDA.W	D2,A7
00020c2a 2e ae ff f6              |.       |		MOVE.L	(A6-0xa),(A7)
00020c2e 42 67                    |Bg      |		CLR.W	-(A7)
00020c30 42 67                    |Bg      |		CLR.W	-(A7)
00020c32 3f 3c 00 40              |?< @    |		MOVE.W	#0x40,-(A7)
00020c36 1f 01                    |        |		MOVE.B	D1,-(A7)
00020c38 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00020c3a 48 53                    |HS      |		PEA.L	(A3)
00020c3c 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020c42 de fc 00 12              |        |		ADDA.W	#0x12,A7
00020c46 42 17                    |B       |		CLR.B	(A7)
00020c48 1f 01                    |        |		MOVE.B	D1,-(A7)
00020c4a 48 78 00 01              |Hx      |		PEA.L	0x1
00020c4e 48 53                    |HS      |		PEA.L	(A3)
00020c50 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00020c54 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00020c5a de c2                    |        |		ADDA.W	D2,A7
00020c5c 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00020c60 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00020c66 2e 92                    |.       |		MOVE.L	(A2),(A7)
00020c68 42 27                    |B'      |		CLR.B	-(A7)
00020c6a 1f 01                    |        |		MOVE.B	D1,-(A7)
00020c6c 48 78 00 00              |Hx      |		PEA.L	0x0
00020c70 48 53                    |HS      |		PEA.L	(A3)
00020c72 48 54                    |HT      |		PEA.L	(A4)
00020c74 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
00020c7a de c2                    |        |		ADDA.W	D2,A7
00020c7c 2e 94                    |.       |		MOVE.L	(A4),(A7)
00020c7e 42 67                    |Bg      |		CLR.W	-(A7)
00020c80 42 67                    |Bg      |		CLR.W	-(A7)
00020c82 3f 3c 02 00              |?<      |		MOVE.W	#0x200,-(A7)
00020c86 1f 01                    |        |		MOVE.B	D1,-(A7)
00020c88 41 ee fb f2              |A       |		LEA.L	(A6-0x40e),A0
00020c8c 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020c8e 48 53                    |HS      |		PEA.L	(A3)
00020c90 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020c96 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020c9a 20 54                    | T      |		MOVEA.L	(A4),A0
00020c9c 3e 28 00 20              |>(      |		MOVE.W	(A0+0x20),D7
00020ca0 3c 2e fb f2              |<.      |		MOVE.W	(A6-0x40e),D6
00020ca4 42 80                    |B       |		CLR.L	D0
00020ca6 30 07                    |0       |		MOVE.W	D7,D0
00020ca8 53 80                    |S       |		SUBQ.L	#0x1,D0
00020caa 04 80 00 00 00 28        |     (  |		SUBI.L	#0x00000028,D0
00020cb0 28 00                    |(       |		MOVE.L	D0,D4
00020cb2 76 01                    |v       |		MOVEQ.L	#0x01,D3
00020cb4 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00020cba eb 84                    |        |		ASL.L	#0x5,D4
00020cbc 0c 84 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D4
00020cc2 63 02                    |c       |		BLS	0x20cc6
00020cc4 4e 4f                    |NO      |		TRAP	#15
00020cc6 3a 04                    |:       |		MOVE.W	D4,D5
00020cc8 bc 45                    | E      |		CMP.W	D5,D6
00020cca 67 36                    |g6      |		BEQ	0x20d02
00020ccc 9e fc 00 22              |   "    |		SUBA.W	#0x22,A7
00020cd0 20 4f                    | O      |		MOVEA.L	A7,A0
00020cd2 43 fa f9 1e              |C       |		LEA.L	0x205f2,A1
00020cd6 70 20                    |p       |		MOVEQ.L	#0x20,D0
00020cd8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020cda 51 c8 ff fc              |Q       |		DBF	D0,0x20cd8
00020cde 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
00020ce2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020ce4 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020ce8 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020cec 3f 3c 00 21              |?< !    |		MOVE.W	#0x21,-(A7)
00020cf0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020cf6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020cf8 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020cfe de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00020d02 33 fc 01 00 00 02 33 78  |3     3x|		MOVE.W	#0x100,0x23378
00020d0a 42 80                    |B       |		CLR.L	D0
00020d0c 30 06                    |0       |		MOVE.W	D6,D0
00020d0e 06 80 00 00 01 00        |        |		ADDI.L	#0x00000100,D0
00020d14 53 80                    |S       |		SUBQ.L	#0x1,D0
00020d16 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00020d1c 63 02                    |c       |		BLS	0x20d20
00020d1e 4e 4f                    |NO      |		TRAP	#15
00020d20 33 c0 00 02 33 7a        |3   3z  |		MOVE.W	D0,0x2337a
00020d26 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00020d2a 4e 5e                    |N^      |		UNLK	A6
00020d2c 4e 75                    |Nu      |		RTS
00020d2e ; --------------------------------------------------------------------------------------
00020d2e ; OMSI PASCAL Function
00020d2e ;    <LVAR  0x012 1(rw)>
00020d2e ;    <LVAR  0x008 2(r)>
00020d2e ; --------------------------------------------------------------------------------------
00020d2e 4e 56 ff ea              |NV      |		LINK.W	A6,#0xffea
00020d32 bf d5                    |        |		CMPA.L	(A5),A7
00020d34 62 06                    |b       |		BHI	0x20d3c
00020d36 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020d3a 4e 76                    |Nv      |		TRAPV
00020d3c de fc 00 14              |        |		ADDA.W	#0x14,A7
00020d40 48 e7 e0 80              |H       |		MOVEM.L	A0+D2+D1+D0,-(A7)
00020d44 42 2e 00 12              |B.      |		CLR.B	(A6+0x12)
00020d48 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020d4c e8 48                    | H      |		LSR.W	#0x4,D0
00020d4e 41 bc 00 03              |A       |		CHK.W	#0x3,D0
00020d52 e3 40                    | @      |		ASL.W	#0x1,D0
00020d54 42 81                    |B       |		CLR.L	D1
00020d56 32 00                    |2       |		MOVE.W	D0,D1
00020d58 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020d5c 02 40 00 0f              | @      |		ANDI.W	#0x000f,D0
00020d60 e3 40                    | @      |		ASL.W	#0x1,D0
00020d62 42 82                    |B       |		CLR.L	D2
00020d64 34 00                    |4       |		MOVE.W	D0,D2
00020d66 41 fa fa 14              |A       |		LEA.L	0x2077c,A0
00020d6a 30 36 18 0a              |06      |		MOVE.W	(A6+D1.L+#0xa),D0
00020d6e c0 70 28 00              | p(     |		AND.W	(A0+D2.L),D0
00020d72 67 04                    |g       |		BEQ	0x20d78
00020d74 52 2e 00 12              |R.      |		ADDQ.B	#0x1,(A6+0x12)
00020d78 4c df 01 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0
00020d7c 4e 5e                    |N^      |		UNLK	A6
00020d7e 4e 75                    |Nu      |		RTS
00020d80 ; --------------------------------------------------------------------------------------
00020d80 ; OMSI PASCAL Function
00020d80 ;    <LVAR  0x00a 4(r)>
00020d80 ;    <LVAR  0x008 2(r)>
00020d80 ; --------------------------------------------------------------------------------------
00020d80 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6		; Spelunked
00020d84 bf d5                    |        |		CMPA.L	(A5),A7
00020d86 62 06                    |b       |		BHI	0x20d8e
00020d88 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020d8c 4e 76                    |Nv      |		TRAPV
00020d8e de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00020d92 48 e7 e1 c0              |H       |		MOVEM.L	A1+A0+D7+D2+D1+D0,-(A7)
00020d96 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020d9a e8 48                    | H      |		LSR.W	#0x4,D0
00020d9c 42 81                    |B       |		CLR.L	D1
00020d9e 32 00                    |2       |		MOVE.W	D0,D1
00020da0 2e 01                    |.       |		MOVE.L	D1,D7
00020da2 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
00020da6 0c 87 00 00 00 03        |        |		CMPI.L	#0x00000003,D7
00020dac 63 02                    |c       |		BLS	0x20db0
00020dae 4e 4f                    |NO      |		TRAP	#15
00020db0 20 07                    |        |		MOVE.L	D7,D0
00020db2 e3 80                    |        |		ASL.L	#0x1,D0
00020db4 32 2e 00 08              |2.      |		MOVE.W	(A6+0x8),D1
00020db8 02 41 00 0f              | A      |		ANDI.W	#0x000f,D1
00020dbc e3 41                    | A      |		ASL.W	#0x1,D1
00020dbe 42 82                    |B       |		CLR.L	D2
00020dc0 34 01                    |4       |		MOVE.W	D1,D2
00020dc2 43 fa f9 b8              |C       |		LEA.L	0x2077c,A1
00020dc6 32 31 28 00              |21(     |		MOVE.W	(A1+D2.L),D1
00020dca 82 70 08 00              | p      |		OR.W	(A0+D0.L),D1
00020dce 31 81 08 00              |1       |		MOVE.W	D1,(A0+D0.L)
00020dd2 4c df 03 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1
00020dd6 4e 5e                    |N^      |		UNLK	A6
00020dd8 4e 75                    |Nu      |		RTS
00020dda ; --------------------------------------------------------------------------------------
00020dda ; OMSI PASCAL Function
00020dda ;    <LVAR  0x010 4(w)>
00020dda ;    <LVAR  0x00c 4(r)>
00020dda ;    <LVAR  0x008 4(r)>
00020dda ; --------------------------------------------------------------------------------------
00020dda 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc
00020dde bf d5                    |        |		CMPA.L	(A5),A7
00020de0 62 06                    |b       |		BHI	0x20de8
00020de2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020de6 4e 76                    |Nv      |		TRAPV
00020de8 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00020dec 48 e7 03 00              |H       |		MOVEM.L	D7+D6,-(A7)
00020df0 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020df2 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020df4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020df6 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020dfa 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00020dfe 0c 86 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D6
00020e04 63 02                    |c       |		BLS	0x20e08
00020e06 4e 4f                    |NO      |		TRAP	#15
00020e08 3f 06                    |?       |		MOVE.W	D6,-(A7)
00020e0a 4e ba ff 22              |N  "    |		JSR	0x20d2e
00020e0e de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020e12 4a 1f                    |J       |		TST.B	(A7)+
00020e14 67 02                    |g       |		BEQ	0x20e18
00020e16 52 87                    |R       |		ADDQ.L	#0x1,D7
00020e18 52 86                    |R       |		ADDQ.L	#0x1,D6
00020e1a 0c 86 00 00 00 3f        |     ?  |		CMPI.L	#0x0000003f,D6
00020e20 6f d2                    |o       |		BLE	0x20df4
00020e22 2d 47 00 10              |-G      |		MOVE.L	D7,(A6+0x10)
00020e26 4c df 00 c0              |L       |		MOVEM.L	(A7)+,D6+D7
00020e2a 4e 5e                    |N^      |		UNLK	A6
00020e2c 4e 75                    |Nu      |		RTS
00020e2e ; --------------------------------------------------------------------------------------
00020e2e ; OMSI PASCAL Function
00020e2e ;    <LVAR  0x048 4(r)>
00020e2e ;    <LVAR  0x044 4(r)>
00020e2e ;    <LVAR  0x010 4(r)>
00020e2e ;    <LVAR  0x00c 4(r)>
00020e2e ;    <LVAR  0x008 4(r)>
00020e2e ; --------------------------------------------------------------------------------------
00020e2e 4e 56 ff bc              |NV      |		LINK.W	A6,#0xffbc		; Spelunked
00020e32 bf d5                    |        |		CMPA.L	(A5),A7
00020e34 62 06                    |b       |		BHI	0x20e3c
00020e36 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020e3a 4e 76                    |Nv      |		TRAPV
00020e3c de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00020e40 48 e7 e1 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
00020e44 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
00020e48 74 10                    |t       |		MOVEQ.L	#0x10,D2
00020e4a 20 53                    | S      |		MOVEA.L	(A3),A0
00020e4c 43 fa f9 4e              |C  N    |		LEA.L	0x2079c,A1
00020e50 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020e52 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020e54 51 c8 ff fc              |Q       |		DBF	D0,0x20e52
00020e58 7e 10                    |~       |		MOVEQ.L	#0x10,D7
00020e5a 20 07                    |        |		MOVE.L	D7,D0
00020e5c 90 82                    |        |		SUB.L	D2,D0
00020e5e 0c 80 00 00 00 2f        |     /  |		CMPI.L	#0x0000002f,D0
00020e64 63 02                    |c       |		BLS	0x20e68
00020e66 4e 4f                    |NO      |		TRAP	#15
00020e68 42 81                    |B       |		CLR.L	D1
00020e6a 12 36 08 14              | 6      |		MOVE.B	(A6+D0.L+#0x14),D1
00020e6e 0c 41 00 40              | A @    |		CMPI.W	#0x0040,D1
00020e72 67 2e                    |g.      |		BEQ	0x20ea2
00020e74 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020e76 2f 2e 00 48              |/. H    |		MOVE.L	(A6+0x48),-(A7)
00020e7a 2f 2e 00 44              |/. D    |		MOVE.L	(A6+0x44),-(A7)
00020e7e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020e80 4e ba fe ac              |N       |		JSR	0x20d2e
00020e84 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020e88 4a 1f                    |J       |		TST.B	(A7)+
00020e8a 67 16                    |g       |		BEQ	0x20ea2
00020e8c 20 53                    | S      |		MOVEA.L	(A3),A0
00020e8e 48 50                    |HP      |		PEA.L	(A0)
00020e90 0c 87 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D7
00020e96 63 02                    |c       |		BLS	0x20e9a
00020e98 4e 4f                    |NO      |		TRAP	#15
00020e9a 3f 07                    |?       |		MOVE.W	D7,-(A7)
00020e9c 4e ba fe e2              |N       |		JSR	0x20d80
00020ea0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020ea2 52 87                    |R       |		ADDQ.L	#0x1,D7
00020ea4 0c 87 00 00 00 3f        |     ?  |		CMPI.L	#0x0000003f,D7
00020eaa 6f ae                    |o       |		BLE	0x20e5a
00020eac 20 53                    | S      |		MOVEA.L	(A3),A0
00020eae 9e c2                    |        |		SUBA.W	D2,A7
00020eb0 22 4f                    |"O      |		MOVEA.L	A7,A1
00020eb2 24 48                    |$H      |		MOVEA.L	A0,A2
00020eb4 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020eb6 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020eb8 51 c8 ff fc              |Q       |		DBF	D0,0x20eb6
00020ebc 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
00020ec0 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020ec4 4e b9 00 01 03 40        |N    @  |		JSR	BitXor(a, b : Quad) : Quad
00020eca de c2                    |        |		ADDA.W	D2,A7
00020ecc 22 4f                    |"O      |		MOVEA.L	A7,A1
00020ece 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020ed0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020ed2 51 c8 ff fc              |Q       |		DBF	D0,0x20ed0
00020ed6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020ed8 4c df 0f 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1+A2+A3
00020edc 4e 5e                    |N^      |		UNLK	A6
00020ede 4e 75                    |Nu      |		RTS
00020ee0 ; --------------------------------------------------------------------------------------
00020ee0 ; OMSI PASCAL Function
00020ee0 ;    <LVAR  0x02c 4(w)>
00020ee0 ;    <LVAR  0x028 4(w)>
00020ee0 ;    <LVAR  0x01c 4(r)>
00020ee0 ;    <LVAR  0x018 4(r)>
00020ee0 ;    <LVAR -0x006 4(r)>
00020ee0 ;    <LVAR -0x00a @ 4(r)>
00020ee0 ;    <LVAR -0x00b 1(r)>
00020ee0 ;    <LVAR -0x00c 1(r)>
00020ee0 ;    <LVAR -0x00d 1(r)>
00020ee0 ;    <LVAR -0x00e 1(r)>
00020ee0 ;    <LVAR -0x00f 1(r)>
00020ee0 ;    <LVAR -0x010 1(r)>
00020ee0 ;    <LVAR -0x011 1(r)>
00020ee0 ;    <LVAR -0x012 @ 1(r)>
00020ee0 ;    <LVAR -0x013 1(w)>
00020ee0 ;    <LVAR -0x014 1(w) 2(r)>
00020ee0 ; --------------------------------------------------------------------------------------
00020ee0 4e 56 ff c8              |NV      |		LINK.W	A6,#0xffc8
00020ee4 bf d5                    |        |		CMPA.L	(A5),A7
00020ee6 62 06                    |b       |		BHI	0x20eee
00020ee8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020eec 4e 76                    |Nv      |		TRAPV
00020eee de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00020ef2 48 e7 e0 00              |H       |		MOVEM.L	D2+D1+D0,-(A7)
00020ef6 74 03                    |t       |		MOVEQ.L	#0x03,D2
00020ef8 2f 2e 00 1c              |/.      |		MOVE.L	(A6+0x1c),-(A7)
00020efc 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
00020f00 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00020f04 48 78 00 00              |Hx      |		PEA.L	0x0
00020f08 48 78 00 07              |Hx      |		PEA.L	0x7
00020f0c 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
00020f12 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020f16 42 80                    |B       |		CLR.L	D0
00020f18 10 2e ff ee              | .      |		MOVE.B	(A6-0x12),D0
00020f1c c0 42                    | B      |		AND.W	D2,D0
00020f1e ed 40                    | @      |		ASL.W	#0x6,D0
00020f20 42 81                    |B       |		CLR.L	D1
00020f22 12 2e ff ef              | .      |		MOVE.B	(A6-0x11),D1
00020f26 c2 42                    | B      |		AND.W	D2,D1
00020f28 e9 41                    | A      |		ASL.W	#0x4,D1
00020f2a d2 40                    | @      |		ADD.W	D0,D1
00020f2c 42 80                    |B       |		CLR.L	D0
00020f2e 10 2e ff f0              | .      |		MOVE.B	(A6-0x10),D0
00020f32 c0 42                    | B      |		AND.W	D2,D0
00020f34 e5 40                    | @      |		ASL.W	#0x2,D0
00020f36 d0 41                    | A      |		ADD.W	D1,D0
00020f38 42 81                    |B       |		CLR.L	D1
00020f3a 12 2e ff f1              | .      |		MOVE.B	(A6-0xf),D1
00020f3e c2 42                    | B      |		AND.W	D2,D1
00020f40 d2 40                    | @      |		ADD.W	D0,D1
00020f42 1d 41 ff ec              | A      |		MOVE.B	D1,(A6-0x14)
00020f46 42 80                    |B       |		CLR.L	D0
00020f48 10 2e ff f2              | .      |		MOVE.B	(A6-0xe),D0
00020f4c c0 42                    | B      |		AND.W	D2,D0
00020f4e ed 40                    | @      |		ASL.W	#0x6,D0
00020f50 42 81                    |B       |		CLR.L	D1
00020f52 12 2e ff f3              | .      |		MOVE.B	(A6-0xd),D1
00020f56 c2 42                    | B      |		AND.W	D2,D1
00020f58 e9 41                    | A      |		ASL.W	#0x4,D1
00020f5a d2 40                    | @      |		ADD.W	D0,D1
00020f5c 42 80                    |B       |		CLR.L	D0
00020f5e 10 2e ff f4              | .      |		MOVE.B	(A6-0xc),D0
00020f62 c0 42                    | B      |		AND.W	D2,D0
00020f64 e5 40                    | @      |		ASL.W	#0x2,D0
00020f66 d0 41                    | A      |		ADD.W	D1,D0
00020f68 42 81                    |B       |		CLR.L	D1
00020f6a 12 2e ff f5              | .      |		MOVE.B	(A6-0xb),D1
00020f6e c2 42                    | B      |		AND.W	D2,D1
00020f70 d2 40                    | @      |		ADD.W	D0,D1
00020f72 1d 41 ff ed              | A      |		MOVE.B	D1,(A6-0x13)
00020f76 3f 2e ff ec              |?.      |		MOVE.W	(A6-0x14),-(A7)
00020f7a 48 57                    |HW      |		PEA.L	(A7)
00020f7c 48 78 00 00              |Hx      |		PEA.L	0x0
00020f80 48 78 00 01              |Hx      |		PEA.L	0x1
00020f84 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00020f88 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
00020f8e de fc 00 12              |        |		ADDA.W	#0x12,A7
00020f92 2d 6e ff f6 00 28        |-n   (  |		MOVE.L	(A6-0xa),(A6+0x28)
00020f98 2d 6e ff fa 00 2c        |-n   ,  |		MOVE.L	(A6-0x6),(A6+0x2c)
00020f9e 4c df 00 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2
00020fa2 4e 5e                    |N^      |		UNLK	A6
00020fa4 4e 75                    |Nu      |		RTS
00020fa6 ; --------------------------------------------------------------------------------------
00020fa6 ; OMSI PASCAL Function
00020fa6 ;    <LVAR  0x02c 4(w)>
00020fa6 ;    <LVAR  0x028 4(w)>
00020fa6 ;    <LVAR  0x00c 4(r)>
00020fa6 ;    <LVAR  0x008 4(r)>
00020fa6 ;    <LVAR -0x006 4(r)>
00020fa6 ;    <LVAR -0x00a @ 4(r)>
00020fa6 ;    <LVAR -0x00c 2(r)>
00020fa6 ;    <LVAR -0x00e 2(r)>
00020fa6 ;    <LVAR -0x010 @ 2(r)>
00020fa6 ;    <LVAR -0x014 4(r)>
00020fa6 ;    <LVAR -0x018 @ 4(r)>
00020fa6 ; --------------------------------------------------------------------------------------
00020fa6 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
00020faa bf d5                    |        |		CMPA.L	(A5),A7
00020fac 62 06                    |b       |		BHI	0x20fb4
00020fae 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020fb2 4e 76                    |Nv      |		TRAPV
00020fb4 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00020fb8 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020fbc 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00020fc0 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
00020fc4 48 78 00 00              |Hx      |		PEA.L	0x0
00020fc8 48 78 00 07              |Hx      |		PEA.L	0x7
00020fcc 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
00020fd2 de fc 00 10              |        |		ADDA.W	#0x10,A7
00020fd6 2e ae ff ec              |.       |		MOVE.L	(A6-0x14),(A7)
00020fda 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
00020fde 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00020fe2 4e b9 00 02 30 50        |N   0P  |		JSR	exp_UNPERMUTE_UIR.TYP(Sw_8, &Sr_6)
00020fe8 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020fec 3e ae ff f4              |>       |		MOVE.W	(A6-0xc),(A7)
00020ff0 3f 2e ff f2              |?.      |		MOVE.W	(A6-0xe),-(A7)
00020ff4 3f 2e ff f0              |?.      |		MOVE.W	(A6-0x10),-(A7)
00020ff8 48 57                    |HW      |		PEA.L	(A7)
00020ffa 48 78 00 00              |Hx      |		PEA.L	0x0
00020ffe 48 78 00 05              |Hx      |		PEA.L	0x5
00021002 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00021006 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
0002100c de fc 00 16              |        |		ADDA.W	#0x16,A7
00021010 2d 6e ff f6 00 28        |-n   (  |		MOVE.L	(A6-0xa),(A6+0x28)
00021016 2d 6e ff fa 00 2c        |-n   ,  |		MOVE.L	(A6-0x6),(A6+0x2c)
0002101c 4e 5e                    |N^      |		UNLK	A6
0002101e 4e 75                    |Nu      |		RTS
00021020 ; --------------------------------------------------------------------------------------
00021020 ; OMSI PASCAL Function
00021020 ;    <LVAR  0x02c 4(w)>
00021020 ;    <LVAR  0x028 4(w)>
00021020 ;    <LVAR  0x014 4(r)>
00021020 ;    <LVAR  0x010 4(r)>
00021020 ;    <LVAR -0x006 4(r)>
00021020 ;    <LVAR -0x00a @ 4(r)>
00021020 ;    <LVAR -0x010 @>
00021020 ;    <LVAR -0x014 4(r)>
00021020 ;    <LVAR -0x018 @ 4(r)>
00021020 ; --------------------------------------------------------------------------------------
00021020 4e 56 ff c2              |NV      |		LINK.W	A6,#0xffc2
00021024 bf d5                    |        |		CMPA.L	(A5),A7
00021026 62 06                    |b       |		BHI	0x2102e
00021028 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002102c 4e 76                    |Nv      |		TRAPV
0002102e de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00021032 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00021036 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
0002103a 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
0002103e 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
00021042 48 78 00 00              |Hx      |		PEA.L	0x0
00021046 48 78 00 07              |Hx      |		PEA.L	0x7
0002104a 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
00021050 de fc 00 10              |        |		ADDA.W	#0x10,A7
00021054 2e ae ff ec              |.       |		MOVE.L	(A6-0x14),(A7)
00021058 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
0002105c 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00021060 4e b9 00 02 30 e8        |N   0   |		JSR	exp_UNPERMUTE_UIR.VAL(Sw_8, &Sr_5)
00021066 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021068 20 4f                    | O      |		MOVEA.L	A7,A0
0002106a 43 ee ff f0              |C       |		LEA.L	(A6-0x10),A1
0002106e 70 04                    |p       |		MOVEQ.L	#0x04,D0
00021070 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021072 51 c8 ff fc              |Q       |		DBF	D0,0x21070
00021076 48 57                    |HW      |		PEA.L	(A7)
00021078 48 78 00 00              |Hx      |		PEA.L	0x0
0002107c 48 78 00 04              |Hx      |		PEA.L	0x4
00021080 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00021084 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
0002108a de fc 00 16              |        |		ADDA.W	#0x16,A7
0002108e 2d 6e ff f6 00 28        |-n   (  |		MOVE.L	(A6-0xa),(A6+0x28)
00021094 2d 6e ff fa 00 2c        |-n   ,  |		MOVE.L	(A6-0x6),(A6+0x2c)
0002109a 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
0002109e 4e 5e                    |N^      |		UNLK	A6
000210a0 4e 75                    |Nu      |		RTS
000210a2 ; --------------------------------------------------------------------------------------
000210a2 ; OMSI PASCAL Function
000210a2 ;    <LVAR  0x02c 4(w)>
000210a2 ;    <LVAR  0x028 4(w)>
000210a2 ;    <LVAR  0x024 4(r)>
000210a2 ;    <LVAR  0x020 4(r)>
000210a2 ;    <LVAR -0x006 4(r)>
000210a2 ;    <LVAR -0x00a @ 4(r)>
000210a2 ;    <LVAR -0x00c 2(r)>
000210a2 ;    <LVAR -0x00e 2(r)>
000210a2 ;    <LVAR -0x010 @ 2(r)>
000210a2 ;    <LVAR -0x014 4(r)>
000210a2 ;    <LVAR -0x018 @ 4(r)>
000210a2 ; --------------------------------------------------------------------------------------
000210a2 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
000210a6 bf d5                    |        |		CMPA.L	(A5),A7
000210a8 62 06                    |b       |		BHI	0x210b0
000210aa 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000210ae 4e 76                    |Nv      |		TRAPV
000210b0 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
000210b4 2f 2e 00 24              |/. $    |		MOVE.L	(A6+0x24),-(A7)
000210b8 2f 2e 00 20              |/.      |		MOVE.L	(A6+0x20),-(A7)
000210bc 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
000210c0 48 78 00 00              |Hx      |		PEA.L	0x0
000210c4 48 78 00 07              |Hx      |		PEA.L	0x7
000210c8 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
000210ce de fc 00 10              |        |		ADDA.W	#0x10,A7
000210d2 2e ae ff ec              |.       |		MOVE.L	(A6-0x14),(A7)
000210d6 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
000210da 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
000210de 4e b9 00 02 2e 28        |N   .(  |		JSR	exp_UNPERMUTE_UIR.SEQ(Sw_8, &Sr_6)
000210e4 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000210e8 3e ae ff f4              |>       |		MOVE.W	(A6-0xc),(A7)
000210ec 3f 2e ff f2              |?.      |		MOVE.W	(A6-0xe),-(A7)
000210f0 3f 2e ff f0              |?.      |		MOVE.W	(A6-0x10),-(A7)
000210f4 48 57                    |HW      |		PEA.L	(A7)
000210f6 48 78 00 00              |Hx      |		PEA.L	0x0
000210fa 48 78 00 05              |Hx      |		PEA.L	0x5
000210fe 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00021102 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
00021108 de fc 00 16              |        |		ADDA.W	#0x16,A7
0002110c 2d 6e ff f6 00 28        |-n   (  |		MOVE.L	(A6-0xa),(A6+0x28)
00021112 2d 6e ff fa 00 2c        |-n   ,  |		MOVE.L	(A6-0x6),(A6+0x2c)
00021118 4e 5e                    |N^      |		UNLK	A6
0002111a 4e 75                    |Nu      |		RTS
0002111c ; --------------------------------------------------------------------------------------
0002111c ; OMSI PASCAL Function
0002111c ;    <LVAR  0x02c 4(w)>
0002111c ;    <LVAR  0x028 4(w)>
0002111c ;    <LVAR  0x01c 4(r)>
0002111c ;    <LVAR  0x018 4(r)>
0002111c ;    <LVAR -0x006 4(r)>
0002111c ;    <LVAR -0x00a @ 4(r)>
0002111c ;    <LVAR -0x00c 2(r)>
0002111c ;    <LVAR -0x00e 2(r)>
0002111c ;    <LVAR -0x010 @ 2(r)>
0002111c ;    <LVAR -0x014 4(r)>
0002111c ;    <LVAR -0x018 @ 4(r)>
0002111c ; --------------------------------------------------------------------------------------
0002111c 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
00021120 bf d5                    |        |		CMPA.L	(A5),A7
00021122 62 06                    |b       |		BHI	0x2112a
00021124 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021128 4e 76                    |Nv      |		TRAPV
0002112a de fc 00 1a              |        |		ADDA.W	#0x1a,A7
0002112e 2f 2e 00 1c              |/.      |		MOVE.L	(A6+0x1c),-(A7)
00021132 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
00021136 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
0002113a 48 78 00 00              |Hx      |		PEA.L	0x0
0002113e 48 78 00 07              |Hx      |		PEA.L	0x7
00021142 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
00021148 de fc 00 10              |        |		ADDA.W	#0x10,A7
0002114c 2e ae ff ec              |.       |		MOVE.L	(A6-0x14),(A7)
00021150 2f 2e ff e8              |/.      |		MOVE.L	(A6-0x18),-(A7)
00021154 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
00021158 4e b9 00 02 2d 7a        |N   -z  |		JSR	exp_UNPERMUTE_UIR.FIU(Sw_8, &Sr_6)
0002115e de fc 00 0a              |        |		ADDA.W	#0xa,A7
00021162 3e ae ff f4              |>       |		MOVE.W	(A6-0xc),(A7)
00021166 3f 2e ff f2              |?.      |		MOVE.W	(A6-0xe),-(A7)
0002116a 3f 2e ff f0              |?.      |		MOVE.W	(A6-0x10),-(A7)
0002116e 48 57                    |HW      |		PEA.L	(A7)
00021170 48 78 00 00              |Hx      |		PEA.L	0x0
00021174 48 78 00 05              |Hx      |		PEA.L	0x5
00021178 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
0002117c 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
00021182 de fc 00 16              |        |		ADDA.W	#0x16,A7
00021186 2d 6e ff f6 00 28        |-n   (  |		MOVE.L	(A6-0xa),(A6+0x28)
0002118c 2d 6e ff fa 00 2c        |-n   ,  |		MOVE.L	(A6-0x6),(A6+0x2c)
00021192 4e 5e                    |N^      |		UNLK	A6
00021194 4e 75                    |Nu      |		RTS
00021196 ; --------------------------------------------------------------------------------------
00021196 ; OMSI PASCAL Function
00021196 ;    <LVAR  0x008 4(r)>
00021196 ; --------------------------------------------------------------------------------------
00021196 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
0002119a bf d5                    |        |		CMPA.L	(A5),A7
0002119c 62 06                    |b       |		BHI	0x211a4
0002119e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000211a2 4e 76                    |Nv      |		TRAPV
000211a4 de fc 00 48              |   H    |		ADDA.W	#0x48,A7
000211a8 48 e7 c0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D1+D0,-(A7)
000211ac 47 ee 00 2c              |G  ,    |		LEA.L	(A6+0x2c),A3
000211b0 72 20                    |r       |		MOVEQ.L	#0x20,D1
000211b2 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000211b6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000211b8 22 4b                    |"K      |		MOVEA.L	A3,A1
000211ba 70 07                    |p       |		MOVEQ.L	#0x07,D0
000211bc 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
000211be 51 c8 ff fc              |Q       |		DBF	D0,0x211bc
000211c2 4e ba fd 1c              |N       |		JSR	0x20ee0
000211c6 de c1                    |        |		ADDA.W	D1,A7
000211c8 43 e8 00 20              |C       |		LEA.L	(A0+0x20),A1
000211cc 24 4f                    |$O      |		MOVEA.L	A7,A2
000211ce 70 07                    |p       |		MOVEQ.L	#0x07,D0
000211d0 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000211d2 51 c8 ff fc              |Q       |		DBF	D0,0x211d0
000211d6 22 4b                    |"K      |		MOVEA.L	A3,A1
000211d8 70 07                    |p       |		MOVEQ.L	#0x07,D0
000211da 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
000211dc 51 c8 ff fc              |Q       |		DBF	D0,0x211da
000211e0 4e ba fd c4              |N       |		JSR	0x20fa6
000211e4 de c1                    |        |		ADDA.W	D1,A7
000211e6 43 e8 00 08              |C       |		LEA.L	(A0+0x8),A1
000211ea 24 4f                    |$O      |		MOVEA.L	A7,A2
000211ec 70 07                    |p       |		MOVEQ.L	#0x07,D0
000211ee 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000211f0 51 c8 ff fc              |Q       |		DBF	D0,0x211ee
000211f4 22 4b                    |"K      |		MOVEA.L	A3,A1
000211f6 70 07                    |p       |		MOVEQ.L	#0x07,D0
000211f8 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
000211fa 51 c8 ff fc              |Q       |		DBF	D0,0x211f8
000211fe 4e ba fe 20              |N       |		JSR	0x21020
00021202 de c1                    |        |		ADDA.W	D1,A7
00021204 22 48                    |"H      |		MOVEA.L	A0,A1
00021206 24 4f                    |$O      |		MOVEA.L	A7,A2
00021208 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002120a 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002120c 51 c8 ff fc              |Q       |		DBF	D0,0x2120a
00021210 22 4b                    |"K      |		MOVEA.L	A3,A1
00021212 70 07                    |p       |		MOVEQ.L	#0x07,D0
00021214 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
00021216 51 c8 ff fc              |Q       |		DBF	D0,0x21214
0002121a 4e ba fe 86              |N       |		JSR	0x210a2
0002121e de c1                    |        |		ADDA.W	D1,A7
00021220 43 e8 00 10              |C       |		LEA.L	(A0+0x10),A1
00021224 24 4f                    |$O      |		MOVEA.L	A7,A2
00021226 70 07                    |p       |		MOVEQ.L	#0x07,D0
00021228 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002122a 51 c8 ff fc              |Q       |		DBF	D0,0x21228
0002122e 22 4b                    |"K      |		MOVEA.L	A3,A1
00021230 70 07                    |p       |		MOVEQ.L	#0x07,D0
00021232 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
00021234 51 c8 ff fc              |Q       |		DBF	D0,0x21232
00021238 4e ba fe e2              |N       |		JSR	0x2111c
0002123c de c1                    |        |		ADDA.W	D1,A7
0002123e 41 e8 00 18              |A       |		LEA.L	(A0+0x18),A0
00021242 22 4f                    |"O      |		MOVEA.L	A7,A1
00021244 70 07                    |p       |		MOVEQ.L	#0x07,D0
00021246 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021248 51 c8 ff fc              |Q       |		DBF	D0,0x21246
0002124c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002124e 4c df 0f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3
00021252 4e 5e                    |N^      |		UNLK	A6
00021254 4e 75                    |Nu      |		RTS
00021256 ; --------------------------------------------------------------------------------------
00021256 ; OMSI PASCAL Function
00021256 ;    <LVAR  0x00c 2(r)>
00021256 ;    <LVAR  0x008 4(r)>
00021256 ;    <LVAR -0x001 @ 1(r)>
00021256 ;    <LVAR -0x002 1(r)>
00021256 ;    <LVAR -0x003 @ 1(r)>
00021256 ;    <LVAR -0x009 @>
00021256 ;    <LVAR -0x00f @>
00021256 ;    <LVAR -0x014 @>
00021256 ;    <LVAR -0x016 2(r)>
00021256 ;    <LVAR -0x018 2(r)>
00021256 ;    <LVAR -0x01a @ 2(r)>
00021256 ;    <LVAR -0x01c @ 2(r)>
00021256 ;    <LVAR -0x020 4(rw)>
00021256 ;    <LVAR -0x022 @>
00021256 ;    <LVAR -0x028 2(w)>
00021256 ;    <LVAR -0x42a @>
00021256 ; --------------------------------------------------------------------------------------
00021256 4e 56 fb 76              |NV v    |		LINK.W	A6,#0xfb76
0002125a bf d5                    |        |		CMPA.L	(A5),A7
0002125c 62 06                    |b       |		BHI	0x21264
0002125e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021262 4e 76                    |Nv      |		TRAPV
00021264 de fc 00 60              |   `    |		ADDA.W	#0x60,A7
00021268 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002126c 47 ee ff ff              |G       |		LEA.L	(A6-0x1),A3
00021270 49 ee ff e4              |I       |		LEA.L	(A6-0x1c),A4
00021274 74 16                    |t       |		MOVEQ.L	#0x16,D2
00021276 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00021278 42 80                    |B       |		CLR.L	D0
0002127a 30 2e 00 0c              |0.      |		MOVE.W	(A6+0xc),D0
0002127e 42 81                    |B       |		CLR.L	D1
00021280 32 39 00 02 33 78        |29  3x  |		MOVE.W	0x23378,D1
00021286 44 81                    |D       |		NEG.L	D1
00021288 d2 80                    |        |		ADD.L	D0,D1
0002128a 28 01                    |(       |		MOVE.L	D1,D4
0002128c 76 20                    |v       |		MOVEQ.L	#0x20,D3
0002128e 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00021294 52 84                    |R       |		ADDQ.L	#0x1,D4
00021296 06 44 00 28              | D (    |		ADDI.W	#0x0028,D4
0002129a 0c 44 ff ff              | D      |		CMPI.W	#0xffff,D4
0002129e 63 02                    |c       |		BLS	0x212a2
000212a0 4e 4f                    |NO      |		TRAP	#15
000212a2 3d 44 ff d8              |=D      |		MOVE.W	D4,(A6-0x28)
000212a6 02 40 00 1f              | @      |		ANDI.W	#0x001f,D0
000212aa 3a 00                    |:       |		MOVE.W	D0,D5
000212ac 41 ee fb d6              |A       |		LEA.L	(A6-0x42a),A0
000212b0 2f 08                    |/       |		MOVE.L	A0,-(A7)
000212b2 2d 5f ff e0              |-_      |		MOVE.L	(A7)+,(A6-0x20)
000212b6 3c 04                    |<       |		MOVE.W	D4,D6
000212b8 2f 39 00 02 33 74        |/9  3t  |		MOVE.L	0x23374,-(A7)
000212be 4d bc 40 00              |M @     |		CHK.W	#0x4000,D6
000212c2 3f 06                    |?       |		MOVE.W	D6,-(A7)
000212c4 42 67                    |Bg      |		CLR.W	-(A7)
000212c6 3f 3c 02 00              |?<      |		MOVE.W	#0x200,-(A7)
000212ca 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000212ce 2f 2e ff e0              |/.      |		MOVE.L	(A6-0x20),-(A7)
000212d2 48 6e ff de              |Hn      |		PEA.L	(A6-0x22)
000212d6 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000212dc de fc 00 14              |        |		ADDA.W	#0x14,A7
000212e0 42 80                    |B       |		CLR.L	D0
000212e2 30 06                    |0       |		MOVE.W	D6,D0
000212e4 52 80                    |R       |		ADDQ.L	#0x1,D0
000212e6 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
000212ec 63 02                    |c       |		BLS	0x212f0
000212ee 4e 4f                    |NO      |		TRAP	#15
000212f0 3c 00                    |<       |		MOVE.W	D0,D6
000212f2 42 80                    |B       |		CLR.L	D0
000212f4 30 07                    |0       |		MOVE.W	D7,D0
000212f6 53 80                    |S       |		SUBQ.L	#0x1,D0
000212f8 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
000212fe 63 02                    |c       |		BLS	0x21302
00021300 4e 4f                    |NO      |		TRAP	#15
00021302 3e 00                    |>       |		MOVE.W	D0,D7
00021304 66 b2                    |f       |		BNE	0x212b8
00021306 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002130a 4b bc 00 1f              |K       |		CHK.W	#0x1f,D5
0002130e 42 80                    |B       |		CLR.L	D0
00021310 30 05                    |0       |		MOVE.W	D5,D0
00021312 eb 80                    |        |		ASL.L	#0x5,D0
00021314 43 ee fb d6              |C       |		LEA.L	(A6-0x42a),A1
00021318 43 f1 08 20              |C       |		LEA.L	(A1+D0.L+#0x20),A1
0002131c 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002131e 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
00021320 51 c8 ff fc              |Q       |		DBF	D0,0x2131e
00021324 48 50                    |HP      |		PEA.L	(A0)
00021326 4e ba fe 6e              |N  n    |		JSR	0x21196
0002132a de fc 00 1c              |        |		ADDA.W	#0x1c,A7
0002132e 42 80                    |B       |		CLR.L	D0
00021330 30 2e 00 0c              |0.      |		MOVE.W	(A6+0xc),D0
00021334 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021336 4e b9 00 01 03 54        |N    T  |		JSR	Long2Quad(a : Long) : Quad
0002133c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002133e 48 54                    |HT      |		PEA.L	(A4)
00021340 48 78 00 00              |Hx      |		PEA.L	0x0
00021344 48 78 00 01              |Hx      |		PEA.L	0x1
00021348 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
0002134e de fc 00 12              |        |		ADDA.W	#0x12,A7
00021352 3e 94                    |>       |		MOVE.W	(A4),(A7)
00021354 42 27                    |B'      |		CLR.B	-(A7)
00021356 48 6e ff e6              |Hn      |		PEA.L	(A6-0x1a)
0002135a 48 53                    |HS      |		PEA.L	(A3)
0002135c 4e b9 00 02 2d 9a        |N   -   |		JSR	exp_READ_WCS.FIU(Sw_2, Sw_1, &Sr_6, &Fr)
00021362 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00021366 3e ae ff ea              |>       |		MOVE.W	(A6-0x16),(A7)
0002136a 3f 2e ff e8              |?.      |		MOVE.W	(A6-0x18),-(A7)
0002136e 3f 2e ff e6              |?.      |		MOVE.W	(A6-0x1a),-(A7)
00021372 48 57                    |HW      |		PEA.L	(A7)
00021374 48 78 00 00              |Hx      |		PEA.L	0x0
00021378 48 78 00 05              |Hx      |		PEA.L	0x5
0002137c 48 68 00 40              |Hh @    |		PEA.L	(A0+0x40)
00021380 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
00021386 de c2                    |        |		ADDA.W	D2,A7
00021388 11 53 00 53              | S S    |		MOVE.B	(A3),(A0+0x53)
0002138c 44 28 00 53              |D( S    |		NEG.B	(A0+0x53)
00021390 52 28 00 53              |R( S    |		ADDQ.B	#0x1,(A0+0x53)
00021394 3f 14                    |?       |		MOVE.W	(A4),-(A7)
00021396 42 27                    |B'      |		CLR.B	-(A7)
00021398 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
0002139c 48 53                    |HS      |		PEA.L	(A3)
0002139e 4e b9 00 02 31 08        |N   1   |		JSR	exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr)
000213a4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000213a6 22 4f                    |"O      |		MOVEA.L	A7,A1
000213a8 45 ee ff ec              |E       |		LEA.L	(A6-0x14),A2
000213ac 70 04                    |p       |		MOVEQ.L	#0x04,D0
000213ae 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000213b0 51 c8 ff fc              |Q       |		DBF	D0,0x213ae
000213b4 48 57                    |HW      |		PEA.L	(A7)
000213b6 48 78 00 00              |Hx      |		PEA.L	0x0
000213ba 48 78 00 04              |Hx      |		PEA.L	0x4
000213be 48 68 00 28              |Hh (    |		PEA.L	(A0+0x28)
000213c2 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
000213c8 de c2                    |        |		ADDA.W	D2,A7
000213ca 11 53 00 50              | S P    |		MOVE.B	(A3),(A0+0x50)
000213ce 3f 14                    |?       |		MOVE.W	(A4),-(A7)
000213d0 42 27                    |B'      |		CLR.B	-(A7)
000213d2 48 6e ff f1              |Hn      |		PEA.L	(A6-0xf)
000213d6 48 53                    |HS      |		PEA.L	(A3)
000213d8 4e b9 00 02 30 70        |N   0p  |		JSR	exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr)
000213de 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000213e0 22 4f                    |"O      |		MOVEA.L	A7,A1
000213e2 45 ee ff f1              |E       |		LEA.L	(A6-0xf),A2
000213e6 70 05                    |p       |		MOVEQ.L	#0x05,D0
000213e8 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000213ea 51 c8 ff fc              |Q       |		DBF	D0,0x213e8
000213ee 48 57                    |HW      |		PEA.L	(A7)
000213f0 48 78 00 00              |Hx      |		PEA.L	0x0
000213f4 48 78 00 05              |Hx      |		PEA.L	0x5
000213f8 48 68 00 30              |Hh 0    |		PEA.L	(A0+0x30)
000213fc 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
00021402 de c2                    |        |		ADDA.W	D2,A7
00021404 11 53 00 51              | S Q    |		MOVE.B	(A3),(A0+0x51)
00021408 3f 14                    |?       |		MOVE.W	(A4),-(A7)
0002140a 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
0002140e 48 53                    |HS      |		PEA.L	(A3)
00021410 4e b9 00 02 2f 30        |N   /0  |		JSR	exp_READ_WCS_AND_PARITY.SEQ(Sw_2, &Sr_6, &Fr)
00021416 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021418 22 4f                    |"O      |		MOVEA.L	A7,A1
0002141a 45 ee ff f7              |E       |		LEA.L	(A6-0x9),A2
0002141e 70 05                    |p       |		MOVEQ.L	#0x05,D0
00021420 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00021422 51 c8 ff fc              |Q       |		DBF	D0,0x21420
00021426 48 57                    |HW      |		PEA.L	(A7)
00021428 48 78 00 00              |Hx      |		PEA.L	0x0
0002142c 48 78 00 05              |Hx      |		PEA.L	0x5
00021430 48 68 00 38              |Hh 8    |		PEA.L	(A0+0x38)
00021434 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
0002143a de c2                    |        |		ADDA.W	D2,A7
0002143c 11 53 00 52              | S R    |		MOVE.B	(A3),(A0+0x52)
00021440 44 28 00 52              |D( R    |		NEG.B	(A0+0x52)
00021444 52 28 00 52              |R( R    |		ADDQ.B	#0x1,(A0+0x52)
00021448 3f 14                    |?       |		MOVE.W	(A4),-(A7)
0002144a 42 27                    |B'      |		CLR.B	-(A7)
0002144c 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00021450 48 53                    |HS      |		PEA.L	(A3)
00021452 4e b9 00 02 31 26        |N   1&  |		JSR	exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr)
00021458 de fc 00 0a              |        |		ADDA.W	#0xa,A7
0002145c 1e ae ff fd              |        |		MOVE.B	(A6-0x3),(A7)
00021460 1f 6e ff fe 00 01        | n      |		MOVE.B	(A6-0x2),(A7+0x1)
00021466 48 57                    |HW      |		PEA.L	(A7)
00021468 48 78 00 00              |Hx      |		PEA.L	0x0
0002146c 48 78 00 01              |Hx      |		PEA.L	0x1
00021470 48 68 00 48              |Hh H    |		PEA.L	(A0+0x48)
00021474 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
0002147a de fc 00 12              |        |		ADDA.W	#0x12,A7
0002147e 11 53 00 54              | S T    |		MOVE.B	(A3),(A0+0x54)
00021482 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021486 4e 5e                    |N^      |		UNLK	A6
00021488 4e 75                    |Nu      |		RTS
0002148a ; --------------------------------------------------------------------------------------
0002148a ; OMSI PASCAL Function
0002148a ;    <LVAR  0x018 4(r)>
0002148a ;    <LVAR  0x014 4(r)>
0002148a ;    <LVAR  0x010 4(r)>
0002148a ;    <LVAR  0x00c 4(r)>
0002148a ;    <LVAR  0x008 4(r)>
0002148a ; --------------------------------------------------------------------------------------
0002148a 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2
0002148e bf d5                    |        |		CMPA.L	(A5),A7
00021490 62 06                    |b       |		BHI	0x21498
00021492 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021496 4e 76                    |Nv      |		TRAPV
00021498 de fc 00 0e              |        |		ADDA.W	#0xe,A7
0002149c 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
000214a0 20 6e 00 18              | n      |		MOVEA.L	(A6+0x18),A0
000214a4 48 50                    |HP      |		PEA.L	(A0)
000214a6 4e b9 00 02 2f 58        |N   /X  |		JSR	exp_READ_UIR.SEQ(&Sr_6)
000214ac 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000214ae 20 6e 00 14              | n      |		MOVEA.L	(A6+0x14),A0
000214b2 48 50                    |HP      |		PEA.L	(A0)
000214b4 4e b9 00 02 2f b0        |N   /   |		JSR	exp_READ_MISC.SEQ(&Sr_2_2_1_1_3)
000214ba 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000214bc 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
000214c0 48 50                    |HP      |		PEA.L	(A0)
000214c2 4e b9 00 02 2f ec        |N   /   |		JSR	exp_READ_DEC.SEQ(&Sr_2_1_1_1)
000214c8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000214ca 42 17                    |B       |		CLR.B	(A7)
000214cc 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
000214d0 48 50                    |HP      |		PEA.L	(A0)
000214d2 4e b9 00 02 30 8e        |N   0   |		JSR	exp_READ_UIR.TYP(Sw_1, &Sr_6)
000214d8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000214da 4e b9 00 02 30 c6        |N   0   |		JSR	exp_LOAD_BENIGN_UWORD.TYP()
000214e0 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000214e4 48 50                    |HP      |		PEA.L	(A0)
000214e6 4e b9 00 02 2f 72        |N   /r  |		JSR	exp_READ_SDR.SEQ(&Sr_8_8)
000214ec 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000214ee 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
000214f2 4e 5e                    |N^      |		UNLK	A6
000214f4 4e 75                    |Nu      |		RTS
000214f6 ; --------------------------------------------------------------------------------------
000214f6 ; OMSI PASCAL Function
000214f6 ;    <LVAR  0x018 4(r)>
000214f6 ;    <LVAR  0x014 4(r)>
000214f6 ;    <LVAR  0x010 4(r)>
000214f6 ;    <LVAR  0x00c 4(r)>
000214f6 ;    <LVAR  0x008 4(r)>
000214f6 ; --------------------------------------------------------------------------------------
000214f6 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
000214fa bf d5                    |        |		CMPA.L	(A5),A7
000214fc 62 06                    |b       |		BHI	0x21504
000214fe 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021502 4e 76                    |Nv      |		TRAPV
00021504 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00021508 48 e7 e0 c0              |H       |		MOVEM.L	A1+A0+D2+D1+D0,-(A7)
0002150c 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
0002150e 74 10                    |t       |		MOVEQ.L	#0x10,D2
00021510 20 6e 00 18              | n      |		MOVEA.L	(A6+0x18),A0
00021514 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021516 22 4f                    |"O      |		MOVEA.L	A7,A1
00021518 70 05                    |p       |		MOVEQ.L	#0x05,D0
0002151a 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002151c 51 c8 ff fc              |Q       |		DBF	D0,0x2151a
00021520 4e b9 00 02 2d b8        |N   -   |		JSR	exp_WRITE_UIR.SEQ(Sw_6)
00021526 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021528 20 6e 00 14              | n      |		MOVEA.L	(A6+0x14),A0
0002152c 9e c1                    |        |		SUBA.W	D1,A7
0002152e 22 4f                    |"O      |		MOVEA.L	A7,A1
00021530 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021532 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00021534 51 c8 ff fc              |Q       |		DBF	D0,0x21532
00021538 4e b9 00 02 2d f0        |N   -   |		JSR	exp_WRITE_MISC.SEQ(Sw_2_2_1_1_3)
0002153e de c1                    |        |		ADDA.W	D1,A7
00021540 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00021544 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021546 22 4f                    |"O      |		MOVEA.L	A7,A1
00021548 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002154a 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002154c 51 c8 ff fc              |Q       |		DBF	D0,0x2154a
00021550 4e b9 00 02 2e 0c        |N   .   |		JSR	exp_WRITE_DEC.SEQ(Sw_2_1_1_1)
00021556 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021558 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002155c 9e c2                    |        |		SUBA.W	D2,A7
0002155e 22 4f                    |"O      |		MOVEA.L	A7,A1
00021560 70 0f                    |p       |		MOVEQ.L	#0x0f,D0
00021562 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00021564 51 c8 ff fc              |Q       |		DBF	D0,0x21562
00021568 4e b9 00 02 2d d4        |N   -   |		JSR	exp_WRITE_SDR.SEQ(Sw_8_8)
0002156e de c2                    |        |		ADDA.W	D2,A7
00021570 4e b9 00 02 2f 8c        |N   /   |		JSR	exp_RESTORE_PREDECODES.SEQ()
00021576 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002157a 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002157c 22 4f                    |"O      |		MOVEA.L	A7,A1
0002157e 70 05                    |p       |		MOVEQ.L	#0x05,D0
00021580 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00021582 51 c8 ff fc              |Q       |		DBF	D0,0x21580
00021586 42 27                    |B'      |		CLR.B	-(A7)
00021588 4e b9 00 02 30 aa        |N   0   |		JSR	exp_LOAD_UIR.TYP(Sw_6, Sw_1)
0002158e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021590 3e bc ff ff              |>       |		MOVE.W	#0xffff,(A7)
00021594 4e b9 00 02 30 32        |N   02  |		JSR	exp_LOAD_COUNTER.SEQ(Sw_2)
0002159a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002159c 4c df 03 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1
000215a0 4e 5e                    |N^      |		UNLK	A6
000215a2 4e 75                    |Nu      |		RTS
000215a4 ; --------------------------------------------------------------------------------------
000215a4 ; OMSI PASCAL Function
000215a4 ;    <LVAR  0x010 4(r)>
000215a4 ;    <LVAR  0x00c 4(r)>
000215a4 ;    <LVAR  0x008 4(r)>
000215a4 ;    <LVAR -0x008 @>
000215a4 ;    <LVAR -0x00c 4(r)>
000215a4 ;    <LVAR -0x010 @ 4(r)>
000215a4 ; --------------------------------------------------------------------------------------
000215a4 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
000215a8 bf d5                    |        |		CMPA.L	(A5),A7
000215aa 62 06                    |b       |		BHI	0x215b2
000215ac 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000215b0 4e 76                    |Nv      |		TRAPV
000215b2 de fc 00 26              |   &    |		ADDA.W	#0x26,A7
000215b6 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000215ba 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
000215be 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000215c2 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
000215c6 48 78 00 00              |Hx      |		PEA.L	0x0
000215ca 48 78 00 07              |Hx      |		PEA.L	0x7
000215ce 4e b9 00 01 04 ae        |N       |		JSR	FSCALL_104ae
000215d4 de fc 00 10              |        |		ADDA.W	#0x10,A7
000215d8 2e ae ff f4              |.       |		MOVE.L	(A6-0xc),(A7)
000215dc 2f 2e ff f0              |/.      |		MOVE.L	(A6-0x10),-(A7)
000215e0 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
000215e4 4e b9 00 02 2e 48        |N   .H  |		JSR	exp_UNPERMUTE_DECODE.SEQ(Sw_8, &Sr_5)
000215ea 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000215ec 20 4f                    | O      |		MOVEA.L	A7,A0
000215ee 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
000215f2 70 04                    |p       |		MOVEQ.L	#0x04,D0
000215f4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000215f6 51 c8 ff fc              |Q       |		DBF	D0,0x215f4
000215fa 48 57                    |HW      |		PEA.L	(A7)
000215fc 48 78 00 00              |Hx      |		PEA.L	0x0
00021600 48 78 00 04              |Hx      |		PEA.L	0x4
00021604 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00021608 48 50                    |HP      |		PEA.L	(A0)
0002160a 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
00021610 de fc 00 16              |        |		ADDA.W	#0x16,A7
00021614 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00021618 4e 5e                    |N^      |		UNLK	A6
0002161a 4e 75                    |Nu      |		RTS
0002161c ; --------------------------------------------------------------------------------------
0002161c ; OMSI PASCAL Function
0002161c ;    <LVAR  0x00e 2(r)>
0002161c ;    <LVAR  0x00c 1(r)>
0002161c ;    <LVAR  0x008 4(r)>
0002161c ;    <LVAR -0x408 @>
0002161c ;    <LVAR -0x40a @>
0002161c ;    <LVAR -0x40c 2(rw)>
0002161c ;    <LVAR -0x40e 2(rw)>
0002161c ;    <LVAR -0x410 @>
0002161c ; --------------------------------------------------------------------------------------
0002161c 4e 56 fb ac              |NV      |		LINK.W	A6,#0xfbac
00021620 bf d5                    |        |		CMPA.L	(A5),A7
00021622 62 06                    |b       |		BHI	0x2162a
00021624 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021628 4e 76                    |Nv      |		TRAPV
0002162a de fc 00 44              |   D    |		ADDA.W	#0x44,A7
0002162e 48 e7 f7 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7)
00021632 43 ee fb f4              |C       |		LEA.L	(A6-0x40c),A1
00021636 74 01                    |t       |		MOVEQ.L	#0x01,D2
00021638 76 7f                    |v       |		MOVEQ.L	#0x7f,D3
0002163a 3d 42 fb f2              |=B      |		MOVE.W	D2,(A6-0x40e)
0002163e 3a 2e 00 0e              |:.      |		MOVE.W	(A6+0xe),D5
00021642 ee 4d                    | M      |		LSR.W	#0x7,D5
00021644 52 45                    |RE      |		ADDQ.W	#0x1,D5
00021646 06 45 00 18              | E      |		ADDI.W	#0x0018,D5
0002164a 10 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D0
0002164e b0 02                    |        |		CMP.B	D2,D0
00021650 66 12                    |f       |		BNE	0x21664
00021652 42 80                    |B       |		CLR.L	D0
00021654 30 05                    |0       |		MOVE.W	D5,D0
00021656 50 80                    |P       |		ADDQ.L	#0x8,D0
00021658 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
0002165e 63 02                    |c       |		BLS	0x21662
00021660 4e 4f                    |NO      |		TRAP	#15
00021662 3a 00                    |:       |		MOVE.W	D0,D5
00021664 32 ae 00 0e              |2       |		MOVE.W	(A6+0xe),(A1)
00021668 c7 51                    | Q      |		AND.W	D3,(A1)
0002166a 41 ee fb f8              |A       |		LEA.L	(A6-0x408),A0
0002166e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00021670 2e 1f                    |.       |		MOVE.L	(A7)+,D7
00021672 42 80                    |B       |		CLR.L	D0
00021674 30 05                    |0       |		MOVE.W	D5,D0
00021676 42 81                    |B       |		CLR.L	D1
00021678 32 2e fb f2              |2.      |		MOVE.W	(A6-0x40e),D1
0002167c d2 80                    |        |		ADD.L	D0,D1
0002167e 53 81                    |S       |		SUBQ.L	#0x1,D1
00021680 2f 01                    |/       |		MOVE.L	D1,-(A7)
00021682 42 80                    |B       |		CLR.L	D0
00021684 30 05                    |0       |		MOVE.W	D5,D0
00021686 2c 00                    |,       |		MOVE.L	D0,D6
00021688 bc 97                    |        |		CMP.L	(A7),D6
0002168a 62 08                    |b       |		BHI	0x21694
0002168c 20 17                    |        |		MOVE.L	(A7),D0
0002168e bc 80                    |        |		CMP.L	D0,D6
00021690 6d 02                    |m       |		BLT	0x21694
00021692 4e 4f                    |NO      |		TRAP	#15
00021694 bc 6f 00 02              | o      |		CMP.W	(A7+0x2),D6
00021698 62 30                    |b0      |		BHI	0x216ca
0002169a 2f 39 00 02 33 74        |/9  3t  |		MOVE.L	0x23374,-(A7)
000216a0 4d bc 40 00              |M @     |		CHK.W	#0x4000,D6
000216a4 3f 06                    |?       |		MOVE.W	D6,-(A7)
000216a6 42 67                    |Bg      |		CLR.W	-(A7)
000216a8 3f 3c 02 00              |?<      |		MOVE.W	#0x200,-(A7)
000216ac 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000216b0 2f 07                    |/       |		MOVE.L	D7,-(A7)
000216b2 48 6e fb f6              |Hn      |		PEA.L	(A6-0x40a)
000216b6 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000216bc de fc 00 14              |        |		ADDA.W	#0x14,A7
000216c0 06 87 00 00 04 00        |        |		ADDI.L	#0x00000400,D7
000216c6 52 46                    |RF      |		ADDQ.W	#0x1,D6
000216c8 64 ca                    |d       |		BCC	0x21694
000216ca 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000216cc 30 11                    |0       |		MOVE.W	(A1),D0
000216ce 41 83                    |A       |		CHK.W	D3,D0
000216d0 42 81                    |B       |		CLR.L	D1
000216d2 32 00                    |2       |		MOVE.W	D0,D1
000216d4 e7 81                    |        |		ASL.L	#0x3,D1
000216d6 41 ee fb f0              |A       |		LEA.L	(A6-0x410),A0
000216da 2f 30 18 0c              |/0      |		MOVE.L	(A0+D1.L+#0xc),-(A7)
000216de 2f 30 18 08              |/0      |		MOVE.L	(A0+D1.L+#0x8),-(A7)
000216e2 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000216e6 48 50                    |HP      |		PEA.L	(A0)
000216e8 4e ba fe ba              |N       |		JSR	0x215a4
000216ec de fc 00 0c              |        |		ADDA.W	#0xc,A7
000216f0 4c df 03 ef              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1
000216f4 4e 5e                    |N^      |		UNLK	A6
000216f6 4e 75                    |Nu      |		RTS
000216f8 ; --------------------------------------------------------------------------------------
000216f8 ; OMSI PASCAL Function
000216f8 ;    <LVAR  0x00c 2(r)>
000216f8 ;    <LVAR  0x008 4(r)>
000216f8 ;    <LVAR -0x003 1(w)>
000216f8 ;    <LVAR -0x004 1(rw)>
000216f8 ;    <LVAR -0x005 1(w)>
000216f8 ;    <LVAR -0x006 1(w)>
000216f8 ;    <LVAR -0x007 1(w)>
000216f8 ;    <LVAR -0x008 @ 1(r)>
000216f8 ;    <LVAR -0x00a @ 2(r)>
000216f8 ;    <LVAR -0x00b 1(r)>
000216f8 ;    <LVAR -0x00c 1(r)>
000216f8 ;    <LVAR -0x00d @ 1(r)>
000216f8 ;    <LVAR -0x00e 1(r)>
000216f8 ;    <LVAR -0x00f 1(r)>
000216f8 ;    <LVAR -0x010 1(r)>
000216f8 ;    <LVAR -0x011 1(r)>
000216f8 ;    <LVAR -0x012 @ 1(r)>
000216f8 ;    <LVAR -0x013 1(w)>
000216f8 ;    <LVAR -0x014 1(w) 2(r)>
000216f8 ;    <LVAR -0x024 @>
000216f8 ;    <LVAR -0x02a @>
000216f8 ;    <LVAR -0x02f @>
000216f8 ;    <LVAR -0x038 @>
000216f8 ;    <LVAR -0x03e @>
000216f8 ;    <LVAR -0x040 @>
000216f8 ;    <LVAR -0x042 @ 4(r)>
000216f8 ;    <LVAR -0x044 @>
000216f8 ;    <LVAR -0x046 @ 4(r)>
000216f8 ;    <LVAR -0x048 @>
000216f8 ;    <LVAR -0x04a @ 4(r)>
000216f8 ;    <LVAR -0x04c @>
000216f8 ;    <LVAR -0x04e @ 4(r)>
000216f8 ; --------------------------------------------------------------------------------------
000216f8 4e 56 ff 74              |NV t    |		LINK.W	A6,#0xff74
000216fc bf d5                    |        |		CMPA.L	(A5),A7
000216fe 62 06                    |b       |		BHI	0x21706
00021700 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021704 4e 76                    |Nv      |		TRAPV
00021706 de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
0002170a 48 e7 e0 e0              |H       |		MOVEM.L	A2+A1+A0+D2+D1+D0,-(A7)
0002170e 45 ee 00 0c              |E       |		LEA.L	(A6+0xc),A2
00021712 72 12                    |r       |		MOVEQ.L	#0x12,D1
00021714 74 14                    |t       |		MOVEQ.L	#0x14,D2
00021716 48 6e ff c2              |Hn      |		PEA.L	(A6-0x3e)
0002171a 48 6e ff c8              |Hn      |		PEA.L	(A6-0x38)
0002171e 48 6e ff d1              |Hn      |		PEA.L	(A6-0x2f)
00021722 48 6e ff d6              |Hn      |		PEA.L	(A6-0x2a)
00021726 48 6e ff dc              |Hn      |		PEA.L	(A6-0x24)
0002172a 4e ba fd 5e              |N  ^    |		JSR	0x2148a
0002172e de c1                    |        |		ADDA.W	D1,A7
00021730 42 17                    |B       |		CLR.B	(A7)
00021732 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00021736 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
0002173a 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
0002173e 4e b9 00 02 2e 6c        |N   .l  |		JSR	exp_TEST_READ_MACRO_PC.SEQ(Sw_1, &Sr_3, &Sr_2, &Sr_1)
00021744 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021748 42 17                    |B       |		CLR.B	(A7)
0002174a 48 6e ff b2              |Hn      |		PEA.L	(A6-0x4e)
0002174e 48 6e ff b4              |Hn      |		PEA.L	(A6-0x4c)
00021752 48 6e ff b6              |Hn      |		PEA.L	(A6-0x4a)
00021756 48 6e ff b8              |Hn      |		PEA.L	(A6-0x48)
0002175a 48 6e ff ba              |Hn      |		PEA.L	(A6-0x46)
0002175e 48 6e ff bc              |Hn      |		PEA.L	(A6-0x44)
00021762 48 6e ff be              |Hn      |		PEA.L	(A6-0x42)
00021766 48 6e ff c0              |Hn      |		PEA.L	(A6-0x40)
0002176a 4e b9 00 02 2e 94        |N   .   |		JSR	exp_TEST_READ_IBUFF.SEQ(Sw_1, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2)
00021770 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00021774 30 12                    |0       |		MOVE.W	(A2),D0
00021776 e0 48                    | H      |		LSR.W	#0x8,D0
00021778 1d 40 ff ec              | @      |		MOVE.B	D0,(A6-0x14)
0002177c 30 12                    |0       |		MOVE.W	(A2),D0
0002177e 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
00021782 1d 40 ff ed              | @      |		MOVE.B	D0,(A6-0x13)
00021786 42 27                    |B'      |		CLR.B	-(A7)
00021788 3f 2e ff ec              |?.      |		MOVE.W	(A6-0x14),-(A7)
0002178c 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00021790 4e b9 00 02 2f cc        |N   /   |		JSR	exp_READ_DECODE.SEQ(Sw_1, Sw_2, &Sr_2_1_1_1)
00021796 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021798 1d 6e ff ee ff f9        | n      |		MOVE.B	(A6-0x12),(A6-0x7)
0002179e 1d 6e ff ef ff fa        | n      |		MOVE.B	(A6-0x11),(A6-0x6)
000217a4 42 80                    |B       |		CLR.L	D0
000217a6 10 2e ff f0              | .      |		MOVE.B	(A6-0x10),D0
000217aa 02 40 00 03              | @      |		ANDI.W	#0x0003,D0
000217ae 1d 40 ff fb              | @      |		MOVE.B	D0,(A6-0x5)
000217b2 1d 6e ff f1 ff fc        | n      |		MOVE.B	(A6-0xf),(A6-0x4)
000217b8 1d 6e ff f2 ff fd        | n      |		MOVE.B	(A6-0xe),(A6-0x3)
000217be 30 12                    |0       |		MOVE.W	(A2),D0
000217c0 0c 40 03 ff              | @      |		CMPI.W	#0x03ff,D0
000217c4 63 0e                    |c       |		BLS	0x217d4
000217c6 42 80                    |B       |		CLR.L	D0
000217c8 10 2e ff fc              | .      |		MOVE.B	(A6-0x4),D0
000217cc 02 40 00 df              | @      |		ANDI.W	#0x00df,D0
000217d0 1d 40 ff fc              | @      |		MOVE.B	D0,(A6-0x4)
000217d4 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000217d6 20 4f                    | O      |		MOVEA.L	A7,A0
000217d8 43 ee ff f9              |C       |		LEA.L	(A6-0x7),A1
000217dc 70 04                    |p       |		MOVEQ.L	#0x04,D0
000217de 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000217e0 51 c8 ff fc              |Q       |		DBF	D0,0x217de
000217e4 48 57                    |HW      |		PEA.L	(A7)
000217e6 48 78 00 00              |Hx      |		PEA.L	0x0
000217ea 48 78 00 04              |Hx      |		PEA.L	0x4
000217ee 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000217f2 48 50                    |HP      |		PEA.L	(A0)
000217f4 4e b9 00 01 04 b4        |N       |		JSR	?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
000217fa de c2                    |        |		ADDA.W	D2,A7
000217fc 42 17                    |B       |		CLR.B	(A7)
000217fe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021800 1e ae ff f3              |        |		MOVE.B	(A6-0xd),(A7)
00021804 1f 6e ff f4 00 01        | n      |		MOVE.B	(A6-0xc),(A7+0x1)
0002180a 1f 6e ff f5 00 02        | n      |		MOVE.B	(A6-0xb),(A7+0x2)
00021810 3f 2e ff f6              |?.      |		MOVE.W	(A6-0xa),-(A7)
00021814 1f 2e ff f8              | .      |		MOVE.B	(A6-0x8),-(A7)
00021818 4e b9 00 02 2e e4        |N   .   |		JSR	exp_TEST_LOAD_MACRO_PC.SEQ(Sw_1, Sw_3, Sw_2, Sw_1)
0002181e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021820 42 17                    |B       |		CLR.B	(A7)
00021822 2f 2e ff b6              |/.      |		MOVE.L	(A6-0x4a),-(A7)
00021826 2f 2e ff b2              |/.      |		MOVE.L	(A6-0x4e),-(A7)
0002182a 2f 2e ff be              |/.      |		MOVE.L	(A6-0x42),-(A7)
0002182e 2f 2e ff ba              |/.      |		MOVE.L	(A6-0x46),-(A7)
00021832 4e b9 00 02 2f 0c        |N   /   |		JSR	exp_TEST_LOAD_IBUFF.SEQ(Sw_1, Sw_8, Sw_8)
00021838 de c1                    |        |		ADDA.W	D1,A7
0002183a 48 6e ff c2              |Hn      |		PEA.L	(A6-0x3e)
0002183e 48 6e ff c8              |Hn      |		PEA.L	(A6-0x38)
00021842 48 6e ff d1              |Hn      |		PEA.L	(A6-0x2f)
00021846 48 6e ff d6              |Hn      |		PEA.L	(A6-0x2a)
0002184a 48 6e ff dc              |Hn      |		PEA.L	(A6-0x24)
0002184e 4e ba fc a6              |N       |		JSR	0x214f6
00021852 de c2                    |        |		ADDA.W	D2,A7
00021854 4c df 07 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2
00021858 4e 5e                    |N^      |		UNLK	A6
0002185a 4e 75                    |Nu      |		RTS
0002185c ; --------------------------------------------------------------------------------------
0002185c ; OMSI PASCAL Function
0002185c ;    <LVAR  0x010 1(w)>
0002185c ;    <LVAR  0x00f 1(w)>
0002185c ;    <LVAR  0x00e 1(w)>
0002185c ;    <LVAR  0x00c 1(r)>
0002185c ;    <LVAR  0x008 4(r)>
0002185c ; --------------------------------------------------------------------------------------
0002185c 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
00021860 bf d5                    |        |		CMPA.L	(A5),A7
00021862 62 06                    |b       |		BHI	0x2186a
00021864 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021868 4e 76                    |Nv      |		TRAPV
0002186a de fc 00 1c              |        |		ADDA.W	#0x1c,A7
0002186e 48 e7 d8 80              |H       |		MOVEM.L	A0+D4+D3+D1+D0,-(A7)
00021872 72 27                    |r'      |		MOVEQ.L	#0x27,D1
00021874 4a 2e 00 0c              |J.      |		TST.B	(A6+0xc)
00021878 66 1a                    |f       |		BNE	0x21894
0002187a 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
0002187e b0 81                    |        |		CMP.L	D1,D0
00021880 63 02                    |c       |		BLS	0x21884
00021882 4e 4f                    |NO      |		TRAP	#15
00021884 28 00                    |(       |		MOVE.L	D0,D4
00021886 76 03                    |v       |		MOVEQ.L	#0x03,D3
00021888 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
0002188e 41 fa f0 1c              |A       |		LEA.L	0x208ac,A0
00021892 60 18                    |`       |		BRA	0x218ac
00021894 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00021898 b0 81                    |        |		CMP.L	D1,D0
0002189a 63 02                    |c       |		BLS	0x2189e
0002189c 4e 4f                    |NO      |		TRAP	#15
0002189e 28 00                    |(       |		MOVE.L	D0,D4
000218a0 76 03                    |v       |		MOVEQ.L	#0x03,D3
000218a2 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000218a8 41 fa ef 8a              |A       |		LEA.L	0x20834,A0
000218ac 1d 70 48 00 00 0e        | pH     |		MOVE.B	(A0+D4.L),(A6+0xe)
000218b2 1d 70 48 01 00 0f        | pH     |		MOVE.B	(A0+D4.L+#0x1),(A6+0xf)
000218b8 1d 70 48 02 00 10        | pH     |		MOVE.B	(A0+D4.L+#0x2),(A6+0x10)
000218be 4c df 01 1b              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+A0
000218c2 4e 5e                    |N^      |		UNLK	A6
000218c4 4e 75                    |Nu      |		RTS
000218c6 ; --------------------------------------------------------------------------------------
000218c6 ; OMSI PASCAL Function
000218c6 ;    <LVAR  0x00a 1(w)>
000218c6 ;    <LVAR  0x008 2(r)>
000218c6 ; --------------------------------------------------------------------------------------
000218c6 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0
000218ca bf d5                    |        |		CMPA.L	(A5),A7
000218cc 62 06                    |b       |		BHI	0x218d4
000218ce 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000218d2 4e 76                    |Nv      |		TRAPV
000218d4 de fc 00 0e              |        |		ADDA.W	#0xe,A7
000218d8 48 e7 81 00              |H       |		MOVEM.L	D7+D0,-(A7)
000218dc 3e 2e 00 08              |>.      |		MOVE.W	(A6+0x8),D7
000218e0 1f 07                    |        |		MOVE.B	D7,-(A7)
000218e2 42 80                    |B       |		CLR.L	D0
000218e4 10 1f                    |        |		MOVE.B	(A7)+,D0
000218e6 41 bc 00 0f              |A       |		CHK.W	#0xf,D0
000218ea 1d 40 00 0a              | @      |		MOVE.B	D0,(A6+0xa)
000218ee 4c df 00 81              |L       |		MOVEM.L	(A7)+,D0+D7
000218f2 4e 5e                    |N^      |		UNLK	A6
000218f4 4e 75                    |Nu      |		RTS
000218f6 ; --------------------------------------------------------------------------------------
000218f6 ; OMSI PASCAL Function
000218f6 ;    <LVAR  0x00c 4(w)>
000218f6 ;    <LVAR  0x008 4(r)>
000218f6 ; --------------------------------------------------------------------------------------
000218f6 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
000218fa bf d5                    |        |		CMPA.L	(A5),A7
000218fc 62 06                    |b       |		BHI	0x21904
000218fe 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021902 4e 76                    |Nv      |		TRAPV
00021904 de fc 00 18              |        |		ADDA.W	#0x18,A7
00021908 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002190c 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00021910 55 80                    |U       |		SUBQ.L	#0x2,D0
00021912 0c 80 00 00 00 05        |        |		CMPI.L	#0x00000005,D0
00021918 63 02                    |c       |		BLS	0x2191c
0002191a					switch@0x2191e[0x3]:
0002191a 4e 4e                    |NN      |		TRAP	#14
0002191c d0 40                    | @      |		ADD.W	D0,D0
0002191e 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00021926 00 0c                    |        |		.CONST	0xc			; [0x0] -> 0x21932
00021928 00 20                    |        |		.CONST	0x20			; [0x1] -> 0x21946
0002192a 00 34                    | 4      |		.CONST	0x34			; [0x2] -> 0x2195a
0002192c ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x2191a
0002192e 00 48                    | H      |		.CONST	0x48			; [0x4] -> 0x2196e
00021930 00 5c                    | \      |		.CONST	0x5c			; [0x5] -> 0x21982
00021932					switch@0x2191e[0x0]:
00021932 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021934 1e ba ec fe              |        |		MOVE.B	0x20634,(A7)
00021938 1f 7a ec fb 00 01        | z      |		MOVE.B	0x20635,(A7+0x1)
0002193e 1f 7a ec f6 00 02        | z      |		MOVE.B	0x20636,(A7+0x2)
00021944 60 4e                    |`N      |		BRA	0x21994
00021946					switch@0x2191e[0x1]:
00021946 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021948 1e ba ec ee              |        |		MOVE.B	0x20638,(A7)
0002194c 1f 7a ec eb 00 01        | z      |		MOVE.B	0x20639,(A7+0x1)
00021952 1f 7a ec e6 00 02        | z      |		MOVE.B	0x2063a,(A7+0x2)
00021958 60 3a                    |`:      |		BRA	0x21994
0002195a					switch@0x2191e[0x2]:
0002195a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002195c 1e ba ec de              |        |		MOVE.B	0x2063c,(A7)
00021960 1f 7a ec db 00 01        | z      |		MOVE.B	0x2063d,(A7+0x1)
00021966 1f 7a ec d6 00 02        | z      |		MOVE.B	0x2063e,(A7+0x2)
0002196c 60 26                    |`&      |		BRA	0x21994
0002196e					switch@0x2191e[0x4]:
0002196e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021970 1e ba ec ce              |        |		MOVE.B	0x20640,(A7)
00021974 1f 7a ec cb 00 01        | z      |		MOVE.B	0x20641,(A7+0x1)
0002197a 1f 7a ec c6 00 02        | z      |		MOVE.B	0x20642,(A7+0x2)
00021980 60 12                    |`       |		BRA	0x21994
00021982					switch@0x2191e[0x5]:
00021982 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021984 1e ba ec be              |        |		MOVE.B	0x20644,(A7)
00021988 1f 7a ec bb 00 01        | z      |		MOVE.B	0x20645,(A7+0x1)
0002198e 1f 7a ec b6 00 02        | z      |		MOVE.B	0x20646,(A7+0x2)
00021994 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021996 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002199a 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
0002199e 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
000219a2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000219a8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219aa 2d 5f 00 0c              |-_      |		MOVE.L	(A7)+,(A6+0xc)
000219ae 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000219b0 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
000219b4 4e 5e                    |N^      |		UNLK	A6
000219b6 4e 75                    |Nu      |		RTS
000219b8 ; --------------------------------------------------------------------------------------
000219b8 ; OMSI PASCAL Function
000219b8 ;    <LVAR  0x008 4(r)>
000219b8 ; --------------------------------------------------------------------------------------
000219b8 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
000219bc bf d5                    |        |		CMPA.L	(A5),A7
000219be 62 06                    |b       |		BHI	0x219c6
000219c0 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000219c4 4e 76                    |Nv      |		TRAPV
000219c6 de fc 00 14              |        |		ADDA.W	#0x14,A7
000219ca 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
000219ce 41 f9 00 02 33 7c        |A   3|  |		LEA.L	0x2337c,A0
000219d4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000219d6 2f 10                    |/       |		MOVE.L	(A0),-(A7)
000219d8 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
000219dc 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000219e2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219e4 20 9f                    |        |		MOVE.L	(A7)+,(A0)
000219e6 2f 10                    |/       |		MOVE.L	(A0),-(A7)
000219e8 1f 3c 00 5c              | < \    |		MOVE.B	#0x5c,-(A7)
000219ec 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
000219f2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000219f4 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
000219f8 4e 5e                    |N^      |		UNLK	A6
000219fa 4e 75                    |Nu      |		RTS
000219fc ; --------------------------------------------------------------------------------------
000219fc ; OMSI PASCAL Function
000219fc ; --------------------------------------------------------------------------------------
000219fc 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00021a00 bf d5                    |        |		CMPA.L	(A5),A7
00021a02 62 06                    |b       |		BHI	0x21a0a
00021a04 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021a08 4e 76                    |Nv      |		TRAPV
00021a0a de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00021a0e 48 e7 c1 00              |H       |		MOVEM.L	D7+D1+D0,-(A7)
00021a12 72 07                    |r       |		MOVEQ.L	#0x07,D1
00021a14 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021a16 be 81                    |        |		CMP.L	D1,D7
00021a18 63 02                    |c       |		BLS	0x21a1c
00021a1a 4e 4f                    |NO      |		TRAP	#15
00021a1c 4a 36 78 08              |J6x     |		TST.B	(A6+D7.L+#0x8)
00021a20 66 04                    |f       |		BNE	0x21a26
00021a22 60 1e                    |`       |		BRA	0x21a42
00021a24 60 16                    |`       |		.XXX[0x2]
00021a26 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a28 42 80                    |B       |		CLR.L	D0
00021a2a 10 36 78 08              | 6x     |		MOVE.B	(A6+D7.L+#0x8),D0
00021a2e 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021a30 4e ba fe c4              |N       |		JSR	0x218f6
00021a34 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a36 4e ba ff 80              |N       |		JSR	0x219b8
00021a3a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a3c 52 87                    |R       |		ADDQ.L	#0x1,D7
00021a3e be 81                    |        |		CMP.L	D1,D7
00021a40 6f d4                    |o       |		BLE	0x21a16
00021a42 4c df 00 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7
00021a46 4e 5e                    |N^      |		UNLK	A6
00021a48 4e 75                    |Nu      |		RTS
00021a4a ; --------------------------------------------------------------------------------------
00021a4a ; OMSI PASCAL Function
00021a4a ;    <LVAR  0x010 1(rw)>
00021a4a ;    <LVAR  0x00e 2(w)>
00021a4a ;    <LVAR  0x00c 4(r)>
00021a4a ;    <LVAR  0x008 4(r)>
00021a4a ; --------------------------------------------------------------------------------------
00021a4a 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
00021a4e bf d5                    |        |		CMPA.L	(A5),A7
00021a50 62 06                    |b       |		BHI	0x21a58
00021a52 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021a56 4e 76                    |Nv      |		TRAPV
00021a58 de fc 00 18              |        |		ADDA.W	#0x18,A7
00021a5c 48 e7 18 00              |H       |		MOVEM.L	D4+D3,-(A7)
00021a60 02 6e df f0 00 0e        | n      |		ANDI.W	#0xdff0,(A6+0xe)
00021a66 42 2e 00 10              |B.      |		CLR.B	(A6+0x10)
00021a6a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a6c 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00021a70 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00021a74 4e ba f3 64              |N  d    |		JSR	0x20dda
00021a78 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021a7a 28 1f                    |(       |		MOVE.L	(A7)+,D4
00021a7c 76 02                    |v       |		MOVEQ.L	#0x02,D3
00021a7e 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00021a84 4a 83                    |J       |		TST.L	D3
00021a86 66 04                    |f       |		BNE	0x21a8c
00021a88 52 2e 00 10              |R.      |		ADDQ.B	#0x1,(A6+0x10)
00021a8c 4c df 00 18              |L       |		MOVEM.L	(A7)+,D3+D4
00021a90 4e 5e                    |N^      |		UNLK	A6
00021a92 4e 75                    |Nu      |		RTS
00021a94 ; --------------------------------------------------------------------------------------
00021a94 ; OMSI PASCAL Function
00021a94 ;    <LVAR  0x070 1(r)>
00021a94 ;    <LVAR  0x06f 1(r)>
00021a94 ;    <LVAR  0x06e 1(r)>
00021a94 ;    <LVAR  0x06d 1(r)>
00021a94 ;    <LVAR  0x06c 1(r)>
00021a94 ;    <LVAR  0x018 4(r)>
00021a94 ;    <LVAR  0x00c 4(r)>
00021a94 ;    <LVAR  0x008 4(r)>
00021a94 ; --------------------------------------------------------------------------------------
00021a94 4e 56 ff cc              |NV      |		LINK.W	A6,#0xffcc
00021a98 bf d5                    |        |		CMPA.L	(A5),A7
00021a9a 62 06                    |b       |		BHI	0x21aa2
00021a9c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021aa0 4e 76                    |Nv      |		TRAPV
00021aa2 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00021aa6 48 e7 e7 80              |H       |		MOVEM.L	A0+D7+D6+D5+D2+D1+D0,-(A7)
00021aaa 74 0f                    |t       |		MOVEQ.L	#0x0f,D2
00021aac 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00021ab0 42 90                    |B       |		CLR.L	(A0)
00021ab2 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
00021ab6 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00021ab8 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00021aba bc 97                    |        |		CMP.L	(A7),D6
00021abc 6e 00 00 8a              |n       |		BGT	0x21b48
00021ac0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021ac2 0c 86 00 00 00 07        |        |		CMPI.L	#0x00000007,D6
00021ac8 63 02                    |c       |		BLS	0x21acc
00021aca 4e 4f                    |NO      |		TRAP	#15
00021acc 42 80                    |B       |		CLR.L	D0
00021ace 10 36 68 10              | 6h     |		MOVE.B	(A6+D6.L+#0x10),D0
00021ad2 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021ad4 4e ba fd f0              |N       |		JSR	0x218c6
00021ad8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021ada 10 1f                    |        |		MOVE.B	(A7)+,D0
00021adc 48 80                    |H       |		EXTB.W	D0
00021ade 41 82                    |A       |		CHK.W	D2,D0
00021ae0 1a 00                    |        |		MOVE.B	D0,D5
00021ae2 10 05                    |        |		MOVE.B	D5,D0
00021ae4 48 80                    |H       |		EXTB.W	D0
00021ae6 32 00                    |2       |		MOVE.W	D0,D1
00021ae8 55 41                    |UA      |		SUBQ.W	#0x2,D1
00021aea 0c 41 00 05              | A      |		CMPI.W	#0x0005,D1
00021aee 63 02                    |c       |		BLS	0x21af2
00021af0					switch@0x21af4[0x3]:
00021af0 4e 4e                    |NN      |		TRAP	#14
00021af2 d2 41                    | A      |		ADD.W	D1,D1
00021af4 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
00021afc 00 12                    |        |		.CONST	0x12			; [0x0] -> 0x21b0e
00021afe 00 0c                    |        |		.CONST	0xc			; [0x1] -> 0x21b08
00021b00 00 24                    | $      |		.CONST	0x24			; [0x2] -> 0x21b20
00021b02 ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x21af0
00021b04 00 1e                    |        |		.CONST	0x1e			; [0x4] -> 0x21b1a
00021b06 00 18                    |        |		.CONST	0x18			; [0x5] -> 0x21b14
00021b08					switch@0x21af4[0x1]:
00021b08 1e 2e 00 6f              | . o    |		MOVE.B	(A6+0x6f),D7
00021b0c 60 16                    |`       |		BRA	0x21b24
00021b0e					switch@0x21af4[0x0]:
00021b0e 1e 2e 00 6e              | . n    |		MOVE.B	(A6+0x6e),D7
00021b12 60 10                    |`       |		BRA	0x21b24
00021b14					switch@0x21af4[0x5]:
00021b14 1e 2e 00 6c              | . l    |		MOVE.B	(A6+0x6c),D7
00021b18 60 0a                    |`       |		BRA	0x21b24
00021b1a					switch@0x21af4[0x4]:
00021b1a 1e 2e 00 6d              | . m    |		MOVE.B	(A6+0x6d),D7
00021b1e 60 04                    |`       |		BRA	0x21b24
00021b20					switch@0x21af4[0x2]:
00021b20 1e 2e 00 70              | . p    |		MOVE.B	(A6+0x70),D7
00021b24 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00021b28 41 82                    |A       |		CHK.W	D2,D0
00021b2a e3 40                    | @      |		ASL.W	#0x1,D0
00021b2c 12 07                    |        |		MOVE.B	D7,D1
00021b2e 48 81                    |H       |		EXTB.W	D1
00021b30 43 bc 00 01              |C       |		CHK.W	#0x1,D1
00021b34 11 81 00 00              |        |		MOVE.B	D1,(A0+D0.W)
00021b38 4a 41                    |JA      |		TST.W	D1
00021b3a 67 06                    |g       |		BEQ	0x21b42
00021b3c 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00021b40 52 90                    |R       |		ADDQ.L	#0x1,(A0)
00021b42 52 86                    |R       |		ADDQ.L	#0x1,D6
00021b44 68 00 ff 74              |h  t    |		BVC	0x21aba
00021b48 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021b4a 4c df 01 e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0
00021b4e 4e 5e                    |N^      |		UNLK	A6
00021b50 4e 75                    |Nu      |		RTS
00021b52 ; --------------------------------------------------------------------------------------
00021b52 ; OMSI PASCAL Function
00021b52 ;    <LVAR  0x064 4(w)>
00021b52 ;    <LVAR  0x060 4(w)>
00021b52 ;    <LVAR  0x056 4(r)>
00021b52 ;    <LVAR  0x052 4(r)>
00021b52 ;    <LVAR  0x04e 4(r)>
00021b52 ;    <LVAR  0x04a 4(r)>
00021b52 ;    <LVAR  0x046 4(r)>
00021b52 ;    <LVAR  0x042 4(r)>
00021b52 ;    <LVAR  0x03e 4(r)>
00021b52 ;    <LVAR  0x03a 4(r)>
00021b52 ;    <LVAR  0x036 4(r)>
00021b52 ;    <LVAR  0x032 4(r)>
00021b52 ;    <LVAR  0x02e 4(r)>
00021b52 ;    <LVAR  0x02a 4(r)>
00021b52 ;    <LVAR  0x026 4(r)>
00021b52 ;    <LVAR  0x022 4(r)>
00021b52 ;    <LVAR  0x01e 4(r)>
00021b52 ;    <LVAR  0x01a 4(r)>
00021b52 ;    <LVAR  0x016 4(r)>
00021b52 ;    <LVAR  0x012 4(r)>
00021b52 ;    <LVAR  0x00e 4(r)>
00021b52 ;    <LVAR  0x00a 4(r)>
00021b52 ;    <LVAR  0x008 1(r)>
00021b52 ; --------------------------------------------------------------------------------------
00021b52 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
00021b56 bf d5                    |        |		CMPA.L	(A5),A7
00021b58 62 06                    |b       |		BHI	0x21b60
00021b5a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021b5e 4e 76                    |Nv      |		TRAPV
00021b60 de fc 00 20              |        |		ADDA.W	#0x20,A7
00021b64 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00021b68 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021b6c 48 80                    |H       |		EXTB.W	D0
00021b6e 55 40                    |U@      |		SUBQ.W	#0x2,D0
00021b70 0c 40 00 05              | @      |		CMPI.W	#0x0005,D0
00021b74 63 02                    |c       |		BLS	0x21b78
00021b76					switch@0x21b7a[0x3]:
00021b76 4e 4e                    |NN      |		TRAP	#14
00021b78 d0 40                    | @      |		ADD.W	D0,D0
00021b7a 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00021b82 00 48                    | H      |		.CONST	0x48			; [0x0] -> 0x21bca
00021b84 00 0c                    |        |		.CONST	0xc			; [0x1] -> 0x21b8e
00021b86 00 5c                    | \      |		.CONST	0x5c			; [0x2] -> 0x21bde
00021b88 ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x21b76
00021b8a 00 20                    |        |		.CONST	0x20			; [0x4] -> 0x21ba2
00021b8c 00 34                    | 4      |		.CONST	0x34			; [0x5] -> 0x21bb6
00021b8e					switch@0x21b7a[0x1]:
00021b8e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021b90 2f 2e 00 26              |/. &    |		MOVE.L	(A6+0x26),-(A7)
00021b94 2f 2e 00 22              |/. "    |		MOVE.L	(A6+0x22),-(A7)
00021b98 2f 2e 00 4e              |/. N    |		MOVE.L	(A6+0x4e),-(A7)
00021b9c 2f 2e 00 4a              |/. J    |		MOVE.L	(A6+0x4a),-(A7)
00021ba0 60 4e                    |`N      |		BRA	0x21bf0
00021ba2					switch@0x21b7a[0x4]:
00021ba2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021ba4 2f 2e 00 16              |/.      |		MOVE.L	(A6+0x16),-(A7)
00021ba8 2f 2e 00 12              |/.      |		MOVE.L	(A6+0x12),-(A7)
00021bac 2f 2e 00 3e              |/. >    |		MOVE.L	(A6+0x3e),-(A7)
00021bb0 2f 2e 00 3a              |/. :    |		MOVE.L	(A6+0x3a),-(A7)
00021bb4 60 3a                    |`:      |		BRA	0x21bf0
00021bb6					switch@0x21b7a[0x5]:
00021bb6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021bb8 2f 2e 00 0e              |/.      |		MOVE.L	(A6+0xe),-(A7)
00021bbc 2f 2e 00 0a              |/.      |		MOVE.L	(A6+0xa),-(A7)
00021bc0 2f 2e 00 36              |/. 6    |		MOVE.L	(A6+0x36),-(A7)
00021bc4 2f 2e 00 32              |/. 2    |		MOVE.L	(A6+0x32),-(A7)
00021bc8 60 26                    |`&      |		BRA	0x21bf0
00021bca					switch@0x21b7a[0x0]:
00021bca 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021bcc 2f 2e 00 1e              |/.      |		MOVE.L	(A6+0x1e),-(A7)
00021bd0 2f 2e 00 1a              |/.      |		MOVE.L	(A6+0x1a),-(A7)
00021bd4 2f 2e 00 46              |/. F    |		MOVE.L	(A6+0x46),-(A7)
00021bd8 2f 2e 00 42              |/. B    |		MOVE.L	(A6+0x42),-(A7)
00021bdc 60 12                    |`       |		BRA	0x21bf0
00021bde					switch@0x21b7a[0x2]:
00021bde 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021be0 2f 2e 00 2e              |/. .    |		MOVE.L	(A6+0x2e),-(A7)
00021be4 2f 2e 00 2a              |/. *    |		MOVE.L	(A6+0x2a),-(A7)
00021be8 2f 2e 00 56              |/. V    |		MOVE.L	(A6+0x56),-(A7)
00021bec 2f 2e 00 52              |/. R    |		MOVE.L	(A6+0x52),-(A7)
00021bf0 4e b9 00 01 03 40        |N    @  |		JSR	BitXor(a, b : Quad) : Quad
00021bf6 de fc 00 10              |        |		ADDA.W	#0x10,A7
00021bfa 2d 5f 00 60              |-_ `    |		MOVE.L	(A7)+,(A6+0x60)
00021bfe 2d 5f 00 64              |-_ d    |		MOVE.L	(A7)+,(A6+0x64)
00021c02 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
00021c06 4e 5e                    |N^      |		UNLK	A6
00021c08 4e 75                    |Nu      |		RTS
00021c0a ; --------------------------------------------------------------------------------------
00021c0a ; OMSI PASCAL Function
00021c0a ;    <LVAR  0x01c 4(r)>
00021c0a ;    <LVAR  0x010 4(r)>
00021c0a ;    <LVAR  0x00c 4(r)>
00021c0a ;    <LVAR  0x008 4(r)>
00021c0a ;    <LVAR -0x004 4(rw)>
00021c0a ;    <LVAR -0x008 4(rw)>
00021c0a ; --------------------------------------------------------------------------------------
00021c0a 4e 56 ff 62              |NV b    |		LINK.W	A6,#0xff62
00021c0e bf d5                    |        |		CMPA.L	(A5),A7
00021c10 62 06                    |b       |		BHI	0x21c18
00021c12 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021c16 4e 76                    |Nv      |		TRAPV
00021c18 de fc 00 90              |        |		ADDA.W	#0x90,A7
00021c1c 48 e7 e3 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D2+D1+D0,-(A7)
00021c20 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
00021c24 47 ee ff fc              |G       |		LEA.L	(A6-0x4),A3
00021c28 74 0f                    |t       |		MOVEQ.L	#0x0f,D2
00021c2a 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00021c2e 42 90                    |B       |		CLR.L	(A0)
00021c30 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00021c34 42 90                    |B       |		CLR.L	(A0)
00021c36 2f 2e 00 1c              |/.      |		MOVE.L	(A6+0x1c),-(A7)
00021c3a 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00021c3c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021c3e be 97                    |        |		CMP.L	(A7),D7
00021c40 6e 00 00 a2              |n       |		BGT	0x21ce4
00021c44 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021c46 0c 87 00 00 00 07        |        |		CMPI.L	#0x00000007,D7
00021c4c 63 02                    |c       |		BLS	0x21c50
00021c4e 4e 4f                    |NO      |		TRAP	#15
00021c50 42 80                    |B       |		CLR.L	D0
00021c52 10 36 78 14              | 6x     |		MOVE.B	(A6+D7.L+#0x14),D0
00021c56 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021c58 4e ba fc 6c              |N  l    |		JSR	0x218c6
00021c5c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021c5e 10 1f                    |        |		MOVE.B	(A7)+,D0
00021c60 48 80                    |H       |		EXTB.W	D0
00021c62 41 82                    |A       |		CHK.W	D2,D0
00021c64 1c 00                    |        |		MOVE.B	D0,D6
00021c66 9e fc 00 5e              |   ^    |		SUBA.W	#0x5e,A7
00021c6a 20 4f                    | O      |		MOVEA.L	A7,A0
00021c6c 43 ee 00 20              |C       |		LEA.L	(A6+0x20),A1
00021c70 70 54                    |pT      |		MOVEQ.L	#0x54,D0
00021c72 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021c74 51 c8 ff fc              |Q       |		DBF	D0,0x21c72
00021c78 10 06                    |        |		MOVE.B	D6,D0
00021c7a 48 80                    |H       |		EXTB.W	D0
00021c7c 41 82                    |A       |		CHK.W	D2,D0
00021c7e 1f 00                    |        |		MOVE.B	D0,-(A7)
00021c80 4e ba fe d0              |N       |		JSR	0x21b52
00021c84 de fc 00 58              |   X    |		ADDA.W	#0x58,A7
00021c88 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00021c8a 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00021c8c 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00021c90 10 06                    |        |		MOVE.B	D6,D0
00021c92 48 80                    |H       |		EXTB.W	D0
00021c94 41 82                    |A       |		CHK.W	D2,D0
00021c96 e3 40                    | @      |		ASL.W	#0x1,D0
00021c98 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021c9a 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021c9c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021c9e 2f 3a eb 00              |/:      |		MOVE.L	0x207a0,-(A7)
00021ca2 2f 3a ea f8              |/:      |		MOVE.L	0x2079c,-(A7)
00021ca6 4e b9 00 01 03 2c        |N    ,  |		JSR	IsEqual(a, b : Quad) : Bool
00021cac de fc 00 10              |        |		ADDA.W	#0x10,A7
00021cb0 12 1f                    |        |		MOVE.B	(A7)+,D1
00021cb2 48 81                    |H       |		EXTB.W	D1
00021cb4 43 bc 00 01              |C       |		CHK.W	#0x1,D1
00021cb8 11 81 00 01              |        |		MOVE.B	D1,(A0+D0.W+#0x1)
00021cbc 4a 01                    |J       |		TST.B	D1
00021cbe 67 08                    |g       |		BEQ	0x21cc8
00021cc0 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00021cc4 52 90                    |R       |		ADDQ.L	#0x1,(A0)
00021cc6 60 16                    |`       |		BRA	0x21cde
00021cc8 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00021ccc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021cce 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021cd0 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021cd2 4e ba f1 06              |N       |		JSR	0x20dda
00021cd6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021cd8 20 10                    |        |		MOVE.L	(A0),D0
00021cda d0 9f                    |        |		ADD.L	(A7)+,D0
00021cdc 20 80                    |        |		MOVE.L	D0,(A0)
00021cde 52 87                    |R       |		ADDQ.L	#0x1,D7
00021ce0 68 00 ff 5c              |h  \    |		BVC	0x21c3e
00021ce4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021ce6 4c df 0f c7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D6+D7+A0+A1+A2+A3
00021cea 4e 5e                    |N^      |		UNLK	A6
00021cec 4e 75                    |Nu      |		RTS
00021cee ; --------------------------------------------------------------------------------------
00021cee ; OMSI PASCAL Function
00021cee ;    <LVAR  0x008 1(rw)>
00021cee ;    <LVAR -0x002 @ 1(r)>
00021cee ;    <LVAR -0x004 @>
00021cee ; --------------------------------------------------------------------------------------
00021cee 4e 56 ff ec              |NV      |		LINK.W	A6,#0xffec
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 10              |        |		ADDA.W	#0x10,A7
00021d00 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
00021d04 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
00021d08 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00021d0c 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00021d10 4e b9 00 02 30 06        |N   0   |		JSR	exp_READ_CUR_UADR_AND_PARITY.SEQ(&Sr_2, &Fr)
00021d16 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021d18 10 ae ff fe              |        |		MOVE.B	(A6-0x2),(A0)
00021d1c 44 10                    |D       |		NEG.B	(A0)
00021d1e 52 10                    |R       |		ADDQ.B	#0x1,(A0)
00021d20 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
00021d24 4e 5e                    |N^      |		UNLK	A6
00021d26 4e 75                    |Nu      |		RTS
00021d28 ; --------------------------------------------------------------------------------------
00021d28 ; OMSI PASCAL Function
00021d28 ;    <LVAR  0x00a 1(r)>
00021d28 ;    <LVAR  0x009 1(r)>
00021d28 ;    <LVAR  0x008 1(r)>
00021d28 ; --------------------------------------------------------------------------------------
00021d28 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
00021d2c bf d5                    |        |		CMPA.L	(A5),A7
00021d2e 62 06                    |b       |		BHI	0x21d36
00021d30 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021d34 4e 76                    |Nv      |		TRAPV
00021d36 de fc 00 2a              |   *    |		ADDA.W	#0x2a,A7
00021d3a 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00021d3e 41 f9 00 02 33 7c        |A   3|  |		LEA.L	0x2337c,A0
00021d44 70 01                    |p       |		MOVEQ.L	#0x01,D0
00021d46 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021d48 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
00021d4c 1f 6e 00 09 00 01        | n      |		MOVE.B	(A6+0x9),(A7+0x1)
00021d52 1f 6e 00 0a 00 02        | n      |		MOVE.B	(A6+0xa),(A7+0x2)
00021d58 3f 3a e8 ee              |?:      |		MOVE.W	0x20648,-(A7)
00021d5c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021d5e 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00021d60 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021d62 48 6f 00 0e              |Ho      |		PEA.L	(A7+0xe)
00021d66 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021d68 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
00021d6c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021d72 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021d74 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00021d78 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021d7a 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00021d7e 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021d84 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021d86 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
00021d8c de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021d90 20 9f                    |        |		MOVE.L	(A7)+,(A0)
00021d92 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021d94 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00021d98 4e 5e                    |N^      |		UNLK	A6
00021d9a 4e 75                    |Nu      |		RTS
00021d9c ; --------------------------------------------------------------------------------------
00021d9c ; OMSI PASCAL Function
00021d9c ;    <LVAR  0x010 4(r)>
00021d9c ;    <LVAR  0x008 1(r)>
00021d9c ;    <LVAR -0x058 @>
00021d9c ;    <LVAR -0x05c 4(rw)>
00021d9c ;    <LVAR -0x060 4(rw)>
00021d9c ; --------------------------------------------------------------------------------------
00021d9c 4e 56 ff 00              |NV      |		LINK.W	A6,#0xff00
00021da0 bf d5                    |        |		CMPA.L	(A5),A7
00021da2 62 06                    |b       |		BHI	0x21daa
00021da4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021da8 4e 76                    |Nv      |		TRAPV
00021daa de fc 00 98              |        |		ADDA.W	#0x98,A7
00021dae 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021db2 45 ee ff a0              |E       |		LEA.L	(A6-0x60),A2
00021db6 47 ee ff a4              |G       |		LEA.L	(A6-0x5c),A3
00021dba 49 fa ef 72              |I  r    |		LEA.L	0x20d2e,A4
00021dbe 72 2f                    |r/      |		MOVEQ.L	#0x2f,D1
00021dc0 24 3c 00 00 ff ff        |$<      |		MOVE.L	#0xffff,D2
00021dc6 7a 0a                    |z       |		MOVEQ.L	#0x0a,D5
00021dc8 20 2e 00 10              | .      |		MOVE.L	(A6+0x10),D0
00021dcc b0 82                    |        |		CMP.L	D2,D0
00021dce 63 02                    |c       |		BLS	0x21dd2
00021dd0 4e 4f                    |NO      |		TRAP	#15
00021dd2 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021dd4 48 6e ff a8              |Hn      |		PEA.L	(A6-0x58)
00021dd8 4e ba f4 7c              |N  |    |		JSR	0x21256
00021ddc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021dde 42 80                    |B       |		CLR.L	D0
00021de0 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021de4 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021de6 4e ba fa de              |N       |		JSR	0x218c6
00021dea 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021dec 10 1f                    |        |		MOVE.B	(A7)+,D0
00021dee 48 80                    |H       |		EXTB.W	D0
00021df0 41 bc 00 0f              |A       |		CHK.W	#0xf,D0
00021df4 1c 00                    |        |		MOVE.B	D0,D6
00021df6 9e fc 00 5e              |   ^    |		SUBA.W	#0x5e,A7
00021dfa 20 4f                    | O      |		MOVEA.L	A7,A0
00021dfc 43 ee ff a8              |C       |		LEA.L	(A6-0x58),A1
00021e00 70 54                    |pT      |		MOVEQ.L	#0x54,D0
00021e02 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021e04 51 c8 ff fc              |Q       |		DBF	D0,0x21e02
00021e08 1f 06                    |        |		MOVE.B	D6,-(A7)
00021e0a 4e ba fd 46              |N  F    |		JSR	0x21b52
00021e0e de fc 00 58              |   X    |		ADDA.W	#0x58,A7
00021e12 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00021e14 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00021e16 10 06                    |        |		MOVE.B	D6,D0
00021e18 48 80                    |H       |		EXTB.W	D0
00021e1a 55 40                    |U@      |		SUBQ.W	#0x2,D0
00021e1c 0c 40 00 05              | @      |		CMPI.W	#0x0005,D0
00021e20 63 02                    |c       |		BLS	0x21e24
00021e22					switch@0x21e26[0x3]:
00021e22 4e 4e                    |NN      |		TRAP	#14
00021e24 d0 40                    | @      |		ADD.W	D0,D0
00021e26 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00021e2e 01 62                    | b      |		.CONST	0x162			; [0x0] -> 0x21f90
00021e30 00 0c                    |        |		.CONST	0xc			; [0x1] -> 0x21e3a
00021e32 01 0a                    |        |		.CONST	0x10a			; [0x2] -> 0x21f38
00021e34 ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x21e22
00021e36 00 b8                    |        |		.CONST	0xb8			; [0x4] -> 0x21ee6
00021e38 00 5e                    | ^      |		.CONST	0x5e			; [0x5] -> 0x21e8c
00021e3a					switch@0x21e26[0x1]:
00021e3a 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021e3c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021e3e 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021e40 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021e42 70 10                    |p       |		MOVEQ.L	#0x10,D0
00021e44 d0 87                    |        |		ADD.L	D7,D0
00021e46 b0 82                    |        |		CMP.L	D2,D0
00021e48 63 02                    |c       |		BLS	0x21e4c
00021e4a 4e 4f                    |NO      |		TRAP	#15
00021e4c 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021e4e 4e 94                    |N       |		JSR	(A4)
00021e50 de c5                    |        |		ADDA.W	D5,A7
00021e52 4a 1f                    |J       |		TST.B	(A7)+
00021e54 67 2c                    |g,      |		BEQ	0x21e82
00021e56 be 81                    |        |		CMP.L	D1,D7
00021e58 63 02                    |c       |		BLS	0x21e5c
00021e5a 4e 4f                    |NO      |		TRAP	#15
00021e5c 28 07                    |(       |		MOVE.L	D7,D4
00021e5e 76 03                    |v       |		MOVEQ.L	#0x03,D3
00021e60 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00021e66 41 fa ea ec              |A       |		LEA.L	0x20954,A0
00021e6a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021e6c 1e b0 48 00              |  H     |		MOVE.B	(A0+D4.L),(A7)
00021e70 1f 70 48 01 00 01        | pH     |		MOVE.B	(A0+D4.L+#0x1),(A7+0x1)
00021e76 1f 70 48 02 00 02        | pH     |		MOVE.B	(A0+D4.L+#0x2),(A7+0x2)
00021e7c 4e ba fe aa              |N       |		JSR	0x21d28
00021e80 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021e82 52 87                    |R       |		ADDQ.L	#0x1,D7
00021e84 be 81                    |        |		CMP.L	D1,D7
00021e86 6f b4                    |o       |		BLE	0x21e3c
00021e88 60 00 01 54              |`  T    |		BRA	0x21fde
00021e8c					switch@0x21e26[0x5]:
00021e8c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021e8e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021e90 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021e92 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021e94 70 18                    |p       |		MOVEQ.L	#0x18,D0
00021e96 d0 87                    |        |		ADD.L	D7,D0
00021e98 b0 82                    |        |		CMP.L	D2,D0
00021e9a 63 02                    |c       |		BLS	0x21e9e
00021e9c 4e 4f                    |NO      |		TRAP	#15
00021e9e 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021ea0 4e 94                    |N       |		JSR	(A4)
00021ea2 de c5                    |        |		ADDA.W	D5,A7
00021ea4 4a 1f                    |J       |		TST.B	(A7)+
00021ea6 67 30                    |g0      |		BEQ	0x21ed8
00021ea8 0c 87 00 00 00 27        |     '  |		CMPI.L	#0x00000027,D7
00021eae 63 02                    |c       |		BLS	0x21eb2
00021eb0 4e 4f                    |NO      |		TRAP	#15
00021eb2 28 07                    |(       |		MOVE.L	D7,D4
00021eb4 76 03                    |v       |		MOVEQ.L	#0x03,D3
00021eb6 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00021ebc 41 fa eb 26              |A  &    |		LEA.L	0x209e4,A0
00021ec0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021ec2 1e b0 48 00              |  H     |		MOVE.B	(A0+D4.L),(A7)
00021ec6 1f 70 48 01 00 01        | pH     |		MOVE.B	(A0+D4.L+#0x1),(A7+0x1)
00021ecc 1f 70 48 02 00 02        | pH     |		MOVE.B	(A0+D4.L+#0x2),(A7+0x2)
00021ed2 4e ba fe 54              |N  T    |		JSR	0x21d28
00021ed6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021ed8 52 87                    |R       |		ADDQ.L	#0x1,D7
00021eda 0c 87 00 00 00 27        |     '  |		CMPI.L	#0x00000027,D7
00021ee0 6f ac                    |o       |		BLE	0x21e8e
00021ee2 60 00 00 fa              |`       |		BRA	0x21fde
00021ee6					switch@0x21e26[0x4]:
00021ee6 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021ee8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021eea 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021eec 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021eee 70 10                    |p       |		MOVEQ.L	#0x10,D0
00021ef0 d0 87                    |        |		ADD.L	D7,D0
00021ef2 b0 82                    |        |		CMP.L	D2,D0
00021ef4 63 02                    |c       |		BLS	0x21ef8
00021ef6 4e 4f                    |NO      |		TRAP	#15
00021ef8 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021efa 4e 94                    |N       |		JSR	(A4)
00021efc de c5                    |        |		ADDA.W	D5,A7
00021efe 4a 1f                    |J       |		TST.B	(A7)+
00021f00 67 2c                    |g,      |		BEQ	0x21f2e
00021f02 be 81                    |        |		CMP.L	D1,D7
00021f04 63 02                    |c       |		BLS	0x21f08
00021f06 4e 4f                    |NO      |		TRAP	#15
00021f08 28 07                    |(       |		MOVE.L	D7,D4
00021f0a 76 03                    |v       |		MOVEQ.L	#0x03,D3
00021f0c 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00021f12 41 fa eb 48              |A  H    |		LEA.L	0x20a5c,A0
00021f16 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021f18 1e b0 48 00              |  H     |		MOVE.B	(A0+D4.L),(A7)
00021f1c 1f 70 48 01 00 01        | pH     |		MOVE.B	(A0+D4.L+#0x1),(A7+0x1)
00021f22 1f 70 48 02 00 02        | pH     |		MOVE.B	(A0+D4.L+#0x2),(A7+0x2)
00021f28 4e ba fd fe              |N       |		JSR	0x21d28
00021f2c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021f2e 52 87                    |R       |		ADDQ.L	#0x1,D7
00021f30 be 81                    |        |		CMP.L	D1,D7
00021f32 6f b4                    |o       |		BLE	0x21ee8
00021f34 60 00 00 a8              |`       |		BRA	0x21fde
00021f38					switch@0x21e26[0x2]:
00021f38 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021f3a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021f3c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021f3e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021f40 70 30                    |p0      |		MOVEQ.L	#0x30,D0
00021f42 d0 87                    |        |		ADD.L	D7,D0
00021f44 b0 82                    |        |		CMP.L	D2,D0
00021f46 63 02                    |c       |		BLS	0x21f4a
00021f48 4e 4f                    |NO      |		TRAP	#15
00021f4a 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021f4c 4e 94                    |N       |		JSR	(A4)
00021f4e de c5                    |        |		ADDA.W	D5,A7
00021f50 4a 1f                    |J       |		TST.B	(A7)+
00021f52 67 30                    |g0      |		BEQ	0x21f84
00021f54 0c 87 00 00 00 0f        |        |		CMPI.L	#0x0000000f,D7
00021f5a 63 02                    |c       |		BLS	0x21f5e
00021f5c 4e 4f                    |NO      |		TRAP	#15
00021f5e 28 07                    |(       |		MOVE.L	D7,D4
00021f60 76 03                    |v       |		MOVEQ.L	#0x03,D3
00021f62 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00021f68 41 fa e9 ba              |A       |		LEA.L	0x20924,A0
00021f6c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021f6e 1e b0 48 00              |  H     |		MOVE.B	(A0+D4.L),(A7)
00021f72 1f 70 48 01 00 01        | pH     |		MOVE.B	(A0+D4.L+#0x1),(A7+0x1)
00021f78 1f 70 48 02 00 02        | pH     |		MOVE.B	(A0+D4.L+#0x2),(A7+0x2)
00021f7e 4e ba fd a8              |N       |		JSR	0x21d28
00021f82 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021f84 52 87                    |R       |		ADDQ.L	#0x1,D7
00021f86 0c 87 00 00 00 0f        |        |		CMPI.L	#0x0000000f,D7
00021f8c 6f ac                    |o       |		BLE	0x21f3a
00021f8e 60 4e                    |`N      |		BRA	0x21fde
00021f90					switch@0x21e26[0x0]:
00021f90 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021f92 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021f94 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00021f96 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00021f98 70 10                    |p       |		MOVEQ.L	#0x10,D0
00021f9a d0 87                    |        |		ADD.L	D7,D0
00021f9c b0 82                    |        |		CMP.L	D2,D0
00021f9e 63 02                    |c       |		BLS	0x21fa2
00021fa0 4e 4f                    |NO      |		TRAP	#15
00021fa2 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021fa4 4e 94                    |N       |		JSR	(A4)
00021fa6 de c5                    |        |		ADDA.W	D5,A7
00021fa8 4a 1f                    |J       |		TST.B	(A7)+
00021faa 67 2c                    |g,      |		BEQ	0x21fd8
00021fac be 81                    |        |		CMP.L	D1,D7
00021fae 63 02                    |c       |		BLS	0x21fb2
00021fb0 4e 4f                    |NO      |		TRAP	#15
00021fb2 28 07                    |(       |		MOVE.L	D7,D4
00021fb4 76 03                    |v       |		MOVEQ.L	#0x03,D3
00021fb6 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00021fbc 41 fa e7 e6              |A       |		LEA.L	0x207a4,A0
00021fc0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021fc2 1e b0 48 00              |  H     |		MOVE.B	(A0+D4.L),(A7)
00021fc6 1f 70 48 01 00 01        | pH     |		MOVE.B	(A0+D4.L+#0x1),(A7+0x1)
00021fcc 1f 70 48 02 00 02        | pH     |		MOVE.B	(A0+D4.L+#0x2),(A7+0x2)
00021fd2 4e ba fd 54              |N  T    |		JSR	0x21d28
00021fd6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021fd8 52 87                    |R       |		ADDQ.L	#0x1,D7
00021fda be 81                    |        |		CMP.L	D1,D7
00021fdc 6f b4                    |o       |		BLE	0x21f92
00021fde 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021fe2 4e 5e                    |N^      |		UNLK	A6
00021fe4 4e 75                    |Nu      |		RTS
00021fe6 ; --------------------------------------------------------------------------------------
00021fe6 ; OMSI PASCAL Function
00021fe6 ;    <LVAR  0x010 4(r)>
00021fe6 ;    <LVAR  0x00c 4(r)>
00021fe6 ;    <LVAR  0x008 4(r)>
00021fe6 ; --------------------------------------------------------------------------------------
00021fe6 4e 56 ff c6              |NV      |		LINK.W	A6,#0xffc6
00021fea bf d5                    |        |		CMPA.L	(A5),A7
00021fec 62 06                    |b       |		BHI	0x21ff4
00021fee 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021ff2 4e 76                    |Nv      |		TRAPV
00021ff4 de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
00021ff8 48 e7 d8 e0              |H       |		MOVEM.L	A2+A1+A0+D4+D3+D1+D0,-(A7)
00021ffc 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00022000 42 90                    |B       |		CLR.L	(A0)
00022002 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00022006 42 10                    |B       |		CLR.B	(A0)
00022008 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002200c 22 6e 00 0c              |"n      |		MOVEA.L	(A6+0xc),A1
00022010 24 6c 00 2a              |$l *    |		MOVEA.L	(A4+0x2a),A2
00022014 20 10                    |        |		MOVE.L	(A0),D0
00022016 b0 92                    |        |		CMP.L	(A2),D0
00022018 6c 4a                    |lJ      |		BGE	0x22064
0002201a 4a 11                    |J       |		TST.B	(A1)
0002201c 66 46                    |fF      |		BNE	0x22064
0002201e 52 80                    |R       |		ADDQ.L	#0x1,D0
00022020 20 80                    |        |		MOVE.L	D0,(A0)
00022022 42 11                    |B       |		CLR.B	(A1)
00022024 53 80                    |S       |		SUBQ.L	#0x1,D0
00022026 0c 80 00 00 00 02        |        |		CMPI.L	#0x00000002,D0
0002202c 63 02                    |c       |		BLS	0x22030
0002202e 4e 4f                    |NO      |		TRAP	#15
00022030 28 00                    |(       |		MOVE.L	D0,D4
00022032 76 03                    |v       |		MOVEQ.L	#0x03,D3
00022034 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
0002203a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002203c 1f 2c 00 36              | , 6    |		MOVE.B	(A4+0x36),-(A7)
00022040 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
00022044 4e ba f8 16              |N       |		JSR	0x2185c
00022048 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002204a 20 4f                    | O      |		MOVEA.L	A7,A0
0002204c 45 f4 48 0a              |E H     |		LEA.L	(A4+D4.L+#0xa),A2
00022050 70 02                    |p       |		MOVEQ.L	#0x02,D0
00022052 b5 08                    |        |		CMPM.B	(A0)+,(A2)+
00022054 56 c8 ff fc              |V       |		DBNE	D0,0x22052
00022058 67 04                    |g       |		BEQ	0x2205e
0002205a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002205c 60 04                    |`       |		BRA	0x22062
0002205e 52 11                    |R       |		ADDQ.B	#0x1,(A1)
00022060 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022062 60 a4                    |`       |		BRA	0x22008
00022064 4c df 07 1b              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+A0+A1+A2
00022068 4e 5e                    |N^      |		UNLK	A6
0002206a 4e 75                    |Nu      |		RTS
0002206c ; --------------------------------------------------------------------------------------
0002206c ; OMSI PASCAL Function
0002206c ;    <LVAR  0x014 1(r)>
0002206c ;    <LVAR  0x010 4(r)>
0002206c ;    <LVAR  0x00c 4(r)>
0002206c ;    <LVAR  0x008 4(r)>
0002206c ;    <LVAR -0x01c @ 4(r)>
0002206c ;    <LVAR -0x022 @ 1(r)>
0002206c ; --------------------------------------------------------------------------------------
0002206c 4e 56 ff 96              |NV      |		LINK.W	A6,#0xff96
00022070 bf d5                    |        |		CMPA.L	(A5),A7
00022072 62 06                    |b       |		BHI	0x2207a
00022074 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022078 4e 76                    |Nv      |		TRAPV
0002207a de fc 00 48              |   H    |		ADDA.W	#0x48,A7
0002207e 48 e7 d9 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D4+D3+D1+D0,-(A7)
00022082 43 f9 00 02 33 7c        |C   3|  |		LEA.L	0x2337c,A1
00022088 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
0002208c 47 ee ff de              |G       |		LEA.L	(A6-0x22),A3
00022090 72 02                    |r       |		MOVEQ.L	#0x02,D1
00022092 20 52                    | R      |		MOVEA.L	(A2),A0
00022094 42 90                    |B       |		CLR.L	(A0)
00022096 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00022098 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002209a 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
0002209e 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000220a2 70 18                    |p       |		MOVEQ.L	#0x18,D0
000220a4 d0 87                    |        |		ADD.L	D7,D0
000220a6 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
000220ac 63 02                    |c       |		BLS	0x220b0
000220ae 4e 4f                    |NO      |		TRAP	#15
000220b0 3f 00                    |?       |		MOVE.W	D0,-(A7)
000220b2 4e ba ec 7a              |N  z    |		JSR	0x20d2e
000220b6 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000220ba 4a 1f                    |J       |		TST.B	(A7)+
000220bc 67 7c                    |g|      |		BEQ	0x2213a
000220be 2f 07                    |/       |		MOVE.L	D7,-(A7)
000220c0 48 53                    |HS      |		PEA.L	(A3)
000220c2 48 6e ff e4              |Hn      |		PEA.L	(A6-0x1c)
000220c6 28 4b                    |(K      |		MOVEA.L	A3,A4
000220c8 4e ba ff 1c              |N       |		JSR	0x21fe6
000220cc de fc 00 0c              |        |		ADDA.W	#0xc,A7
000220d0 4a 13                    |J       |		TST.B	(A3)
000220d2 67 14                    |g       |		BEQ	0x220e8
000220d4 20 2e ff e4              | .      |		MOVE.L	(A6-0x1c),D0
000220d8 53 80                    |S       |		SUBQ.L	#0x1,D0
000220da b0 81                    |        |		CMP.L	D1,D0
000220dc 63 02                    |c       |		BLS	0x220e0
000220de 4e 4f                    |NO      |		TRAP	#15
000220e0 e5 80                    |        |		ASL.L	#0x2,D0
000220e2 52 b6 08 f2              |R       |		ADDQ.L	#0x1,(A6+D0.L-#0xe)
000220e6 60 52                    |`R      |		BRA	0x2213a
000220e8 20 52                    | R      |		MOVEA.L	(A2),A0
000220ea 52 90                    |R       |		ADDQ.L	#0x1,(A0)
000220ec 20 10                    |        |		MOVE.L	(A0),D0
000220ee 0c 80 00 00 00 03        |        |		CMPI.L	#0x00000003,D0
000220f4 6f 04                    |o       |		BLE	0x220fa
000220f6 60 00 00 b2              |`       |		BRA	0x221aa
000220fa 20 52                    | R      |		MOVEA.L	(A2),A0
000220fc 20 10                    |        |		MOVE.L	(A0),D0
000220fe 53 80                    |S       |		SUBQ.L	#0x1,D0
00022100 b0 81                    |        |		CMP.L	D1,D0
00022102 63 02                    |c       |		BLS	0x22106
00022104 4e 4f                    |NO      |		TRAP	#15
00022106 28 00                    |(       |		MOVE.L	D0,D4
00022108 76 03                    |v       |		MOVEQ.L	#0x03,D3
0002210a 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00022110 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022112 1f 2e 00 14              | .      |		MOVE.B	(A6+0x14),-(A7)
00022116 2f 07                    |/       |		MOVE.L	D7,-(A7)
00022118 4e ba f7 42              |N  B    |		JSR	0x2185c
0002211c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002211e 1d 97 48 e8              |  H     |		MOVE.B	(A7),(A6+D4.L-#0x18)
00022122 1d af 00 01 48 e9        |    H   |		MOVE.B	(A7+0x1),(A6+D4.L-#0x17)
00022128 1d af 00 02 48 ea        |    H   |		MOVE.B	(A7+0x2),(A6+D4.L-#0x16)
0002212e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022130 e5 80                    |        |		ASL.L	#0x2,D0
00022132 2d bc 00 00 00 01 08 f2  |-       |		MOVE.L	#0x1,(A6+D0.L-#0xe)
0002213a 52 87                    |R       |		ADDQ.L	#0x1,D7
0002213c 0c 87 00 00 00 27        |     '  |		CMPI.L	#0x00000027,D7
00022142 6f 00 ff 54              |o  T    |		BLE	0x22098
00022146 20 52                    | R      |		MOVEA.L	(A2),A0
00022148 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002214a 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002214c be 97                    |        |		CMP.L	(A7),D7
0002214e 6e 58                    |nX      |		BGT	0x221a8
00022150 20 07                    |        |		MOVE.L	D7,D0
00022152 53 80                    |S       |		SUBQ.L	#0x1,D0
00022154 b0 81                    |        |		CMP.L	D1,D0
00022156 63 02                    |c       |		BLS	0x2215a
00022158 4e 4f                    |NO      |		TRAP	#15
0002215a 28 00                    |(       |		MOVE.L	D0,D4
0002215c 76 03                    |v       |		MOVEQ.L	#0x03,D3
0002215e 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00022164 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022166 1e b6 48 e8              |  H     |		MOVE.B	(A6+D4.L-#0x18),(A7)
0002216a 1f 76 48 e9 00 01        | vH     |		MOVE.B	(A6+D4.L-#0x17),(A7+0x1)
00022170 1f 76 48 ea 00 02        | vH     |		MOVE.B	(A6+D4.L-#0x16),(A7+0x2)
00022176 4e ba fb b0              |N       |		JSR	0x21d28
0002217a 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002217c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002217e e5 80                    |        |		ASL.L	#0x2,D0
00022180 2f 36 08 f2              |/6      |		MOVE.L	(A6+D0.L-#0xe),-(A7)
00022184 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
0002218a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002218c 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00022192 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022194 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
00022196 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00022198 1f 3c 00 5c              | < \    |		MOVE.B	#0x5c,-(A7)
0002219c 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
000221a2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000221a4 52 87                    |R       |		ADDQ.L	#0x1,D7
000221a6 68 a4                    |h       |		BVC	0x2214c
000221a8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000221aa 4c df 1f 9b              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D7+A0+A1+A2+A3+A4
000221ae 4e 5e                    |N^      |		UNLK	A6
000221b0 4e 75                    |Nu      |		RTS
000221b2 ; --------------------------------------------------------------------------------------
000221b2 ; OMSI PASCAL Function
000221b2 ;    <LVAR  0x010 4(w)>
000221b2 ; --------------------------------------------------------------------------------------
000221b2 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
000221b6 bf d5                    |        |		CMPA.L	(A5),A7
000221b8 62 06                    |b       |		BHI	0x221c0
000221ba 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000221be 4e 76                    |Nv      |		TRAPV
000221c0 de fc 00 14              |        |		ADDA.W	#0x14,A7
000221c4 48 e7 83 00              |H       |		MOVEM.L	D7+D6+D0,-(A7)
000221c8 70 07                    |p       |		MOVEQ.L	#0x07,D0
000221ca 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000221cc 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000221ce bc 80                    |        |		CMP.L	D0,D6
000221d0 63 02                    |c       |		BLS	0x221d4
000221d2 4e 4f                    |NO      |		TRAP	#15
000221d4 4a 36 68 08              |J6h     |		TST.B	(A6+D6.L+#0x8)
000221d8 66 02                    |f       |		BNE	0x221dc
000221da 60 08                    |`       |		BRA	0x221e4
000221dc 52 87                    |R       |		ADDQ.L	#0x1,D7
000221de 52 86                    |R       |		ADDQ.L	#0x1,D6
000221e0 bc 80                    |        |		CMP.L	D0,D6
000221e2 6f ea                    |o       |		BLE	0x221ce
000221e4 2d 47 00 10              |-G      |		MOVE.L	D7,(A6+0x10)
000221e8 4c df 00 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7
000221ec 4e 5e                    |N^      |		UNLK	A6
000221ee 4e 75                    |Nu      |		RTS
000221f0 ; --------------------------------------------------------------------------------------
000221f0 ; OMSI PASCAL Function
000221f0 ;    <LVAR  0x034 1(rw)>
000221f0 ;    <LVAR  0x028 4(r)>
000221f0 ; --------------------------------------------------------------------------------------
000221f0 4e 56 ff cc              |NV      |		LINK.W	A6,#0xffcc
000221f4 bf d5                    |        |		CMPA.L	(A5),A7
000221f6 62 06                    |b       |		BHI	0x221fe
000221f8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000221fc 4e 76                    |Nv      |		TRAPV
000221fe de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00022202 48 e7 e7 80              |H       |		MOVEM.L	A0+D7+D6+D5+D2+D1+D0,-(A7)
00022206 41 ee 00 34              |A  4    |		LEA.L	(A6+0x34),A0
0002220a 74 0f                    |t       |		MOVEQ.L	#0x0f,D2
0002220c 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002220e 2f 2e 00 28              |/. (    |		MOVE.L	(A6+0x28),-(A7)
00022212 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00022214 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00022216 bc 97                    |        |		CMP.L	(A7),D6
00022218 6e 3c                    |n<      |		BGT	0x22256
0002221a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002221c 0c 86 00 00 00 07        |        |		CMPI.L	#0x00000007,D6
00022222 63 02                    |c       |		BLS	0x22226
00022224 4e 4f                    |NO      |		TRAP	#15
00022226 42 80                    |B       |		CLR.L	D0
00022228 10 36 68 2c              | 6h,    |		MOVE.B	(A6+D6.L+#0x2c),D0
0002222c 3f 00                    |?       |		MOVE.W	D0,-(A7)
0002222e 4e ba f6 96              |N       |		JSR	0x218c6
00022232 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00022234 10 1f                    |        |		MOVE.B	(A7)+,D0
00022236 48 80                    |H       |		EXTB.W	D0
00022238 41 82                    |A       |		CHK.W	D2,D0
0002223a 1a 00                    |        |		MOVE.B	D0,D5
0002223c 10 05                    |        |		MOVE.B	D5,D0
0002223e 48 80                    |H       |		EXTB.W	D0
00022240 41 82                    |A       |		CHK.W	D2,D0
00022242 e3 40                    | @      |		ASL.W	#0x1,D0
00022244 12 36 00 08              | 6      |		MOVE.B	(A6+D0.W+#0x8),D1
00022248 c2 36 00 09              | 6      |		AND.B	(A6+D0.W+#0x9),D1
0002224c 44 01                    |D       |		NEG.B	D1
0002224e 52 01                    |R       |		ADDQ.B	#0x1,D1
00022250 ce 01                    |        |		AND.B	D1,D7
00022252 52 86                    |R       |		ADDQ.L	#0x1,D6
00022254 68 c0                    |h       |		BVC	0x22216
00022256 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022258 10 87                    |        |		MOVE.B	D7,(A0)
0002225a 44 10                    |D       |		NEG.B	(A0)
0002225c 52 10                    |R       |		ADDQ.B	#0x1,(A0)
0002225e 4c df 01 e7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D5+D6+D7+A0
00022262 4e 5e                    |N^      |		UNLK	A6
00022264 4e 75                    |Nu      |		RTS
00022266 ; --------------------------------------------------------------------------------------
00022266 ; OMSI PASCAL Function
00022266 ;    <LVAR -0x004 @>
00022266 ; --------------------------------------------------------------------------------------
00022266 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
0002226a bf d5                    |        |		CMPA.L	(A5),A7
0002226c 62 06                    |b       |		BHI	0x22274
0002226e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022272 4e 76                    |Nv      |		TRAPV
00022274 de fc 00 18              |        |		ADDA.W	#0x18,A7
00022278 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
0002227c 70 01                    |p       |		MOVEQ.L	#0x01,D0
0002227e 42 27                    |B'      |		CLR.B	-(A7)
00022280 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022282 2f 39 00 02 33 70        |/9  3p  |		MOVE.L	0x23370,-(A7)
00022288 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
0002228e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00022290 1e 80                    |        |		MOVE.B	D0,(A7)
00022292 1f 00                    |        |		MOVE.B	D0,-(A7)
00022294 1f 00                    |        |		MOVE.B	D0,-(A7)
00022296 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
0002229a 4e ba e8 50              |N  P    |		JSR	0x20aec
0002229e de fc 00 10              |        |		ADDA.W	#0x10,A7
000222a2 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
000222a6 4e 5e                    |N^      |		UNLK	A6
000222a8 4e 75                    |Nu      |		RTS
000222aa ; --------------------------------------------------------------------------------------
000222aa ; OMSI PASCAL Function
000222aa ;    <LVAR  0x00c 1(w)>
000222aa ;    <LVAR  0x008 4(r)>
000222aa ; --------------------------------------------------------------------------------------
000222aa 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0		; Spelunked
000222ae bf d5                    |        |		CMPA.L	(A5),A7
000222b0 62 06                    |b       |		BHI	0x222b8
000222b2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000222b6 4e 76                    |Nv      |		TRAPV
000222b8 de fc 00 10              |        |		ADDA.W	#0x10,A7
000222bc 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000222c0 41 ee 00 0c              |A       |		LEA.L	(A6+0xc),A0
000222c4 72 05                    |r       |		MOVEQ.L	#0x05,D1
000222c6 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
000222ca 55 80                    |U       |		SUBQ.L	#0x2,D0
000222cc b0 81                    |        |		CMP.L	D1,D0
000222ce 62 32                    |b2      |		BHI	switch@0x222d2[0x3]
000222d0 d0 40                    | @      |		ADD.W	D0,D0
000222d2 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
000222da 00 0c                    |        |		.CONST	0xc			; [0x0] -> 0x222e6
000222dc 00 10                    |        |		.CONST	0x10			; [0x1] -> 0x222ea
000222de 00 16                    |        |		.CONST	0x16			; [0x2] -> 0x222f0
000222e0 00 28                    | (      |		.CONST	0x28			; [0x3] -> 0x22302
000222e2 00 1c                    |        |		.CONST	0x1c			; [0x4] -> 0x222f6
000222e4 00 22                    | "      |		.CONST	0x22			; [0x5] -> 0x222fc
000222e6					switch@0x222d2[0x0]:
000222e6 10 81                    |        |		MOVE.B	D1,(A0)
000222e8 60 1c                    |`       |		BRA	0x22306
000222ea					switch@0x222d2[0x1]:
000222ea 10 bc 00 06              |        |		MOVE.B	#0x06,(A0)
000222ee 60 16                    |`       |		BRA	0x22306
000222f0					switch@0x222d2[0x2]:
000222f0 10 bc 00 2b              |   +    |		MOVE.B	#0x2b,(A0)
000222f4 60 10                    |`       |		BRA	0x22306
000222f6					switch@0x222d2[0x4]:
000222f6 10 bc 00 03              |        |		MOVE.B	#0x03,(A0)
000222fa 60 0a                    |`       |		BRA	0x22306
000222fc					switch@0x222d2[0x5]:
000222fc 10 bc 00 04              |        |		MOVE.B	#0x04,(A0)
00022300 60 04                    |`       |		BRA	0x22306
00022302					switch@0x222d2[0x3]:
00022302 10 bc 00 27              |   '    |		MOVE.B	#0x27,(A0)
00022306 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
0002230a 4e 5e                    |N^      |		UNLK	A6
0002230c 4e 75                    |Nu      |		RTS
0002230e ; --------------------------------------------------------------------------------------
0002230e ; OMSI PASCAL Function
0002230e ;    <LVAR  0x008 4(r)>
0002230e ; --------------------------------------------------------------------------------------
0002230e 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4
00022312 bf d5                    |        |		CMPA.L	(A5),A7
00022314 62 06                    |b       |		BHI	0x2231c
00022316 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002231a 4e 76                    |Nv      |		TRAPV
0002231c de fc 00 0c              |        |		ADDA.W	#0xc,A7
00022320 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
00022324 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00022328 10 bc 00 25              |   %    |		MOVE.B	#0x25,(A0)
0002232c 11 7c 00 29 00 01        | | )    |		MOVE.B	#0x29,(A0+0x1)
00022332 11 7c 00 28 00 02        | | (    |		MOVE.B	#0x28,(A0+0x2)
00022338 11 7c 00 01 00 03        | |      |		MOVE.B	#0x01,(A0+0x3)
0002233e 11 7c 00 2a 00 04        | | *    |		MOVE.B	#0x2a,(A0+0x4)
00022344 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
00022348 4e 5e                    |N^      |		UNLK	A6
0002234a 4e 75                    |Nu      |		RTS
0002234c ; --------------------------------------------------------------------------------------
0002234c ; OMSI PASCAL Function
0002234c ;    <LVAR  0x01a 4(r)>
0002234c ;    <LVAR  0x016 4(r)>
0002234c ;    <LVAR  0x012 4(r)>
0002234c ;    <LVAR  0x010 1(r)>
0002234c ;    <LVAR  0x00c 4(r)>
0002234c ;    <LVAR  0x008 1(r) 4(r)>
0002234c ; --------------------------------------------------------------------------------------
0002234c 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
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 4a              |   J    |		ADDA.W	#0x4a,A7
0002235e 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00022362 45 ee 00 16              |E       |		LEA.L	(A6+0x16),A2
00022366 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
0002236a 49 fa ff 3e              |I  >    |		LEA.L	0x222aa,A4
0002236e 74 2a                    |t*      |		MOVEQ.L	#0x2a,D2
00022370 76 01                    |v       |		MOVEQ.L	#0x01,D3
00022372 78 07                    |x       |		MOVEQ.L	#0x07,D4
00022374 7a 05                    |z       |		MOVEQ.L	#0x05,D5
00022376 20 6e 00 12              | n      |		MOVEA.L	(A6+0x12),A0
0002237a 42 80                    |B       |		CLR.L	D0
0002237c 10 10                    |        |		MOVE.B	(A0),D0
0002237e 2e 00                    |.       |		MOVE.L	D0,D7
00022380 1f 07                    |        |		MOVE.B	D7,-(A7)
00022382 10 1f                    |        |		MOVE.B	(A7)+,D0
00022384 48 80                    |H       |		EXTB.W	D0
00022386 41 bc 00 12              |A       |		CHK.W	#0x12,D0
0002238a 1c 00                    |        |		MOVE.B	D0,D6
0002238c 20 6e 00 1a              | n      |		MOVEA.L	(A6+0x1a),A0
00022390 42 10                    |B       |		CLR.B	(A0)
00022392 10 06                    |        |		MOVE.B	D6,D0
00022394 48 80                    |H       |		EXTB.W	D0
00022396 0c 40 00 12              | @      |		CMPI.W	#0x0012,D0
0002239a 63 02                    |c       |		BLS	0x2239e
0002239c 4e 4e                    |NN      |		TRAP	#14
0002239e d0 40                    | @      |		ADD.W	D0,D0
000223a0 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
000223a8 00 26                    | &      |		.CONST	0x26			; [0x0] -> 0x223ce
000223aa 00 26                    | &      |		.CONST	0x26			; [0x1] -> 0x223ce
000223ac 00 32                    | 2      |		.CONST	0x32			; [0x2] -> 0x223da
000223ae 00 40                    | @      |		.CONST	0x40			; [0x3] -> 0x223e8
000223b0 00 44                    | D      |		.CONST	0x44			; [0x4] -> 0x223ec
000223b2 00 4c                    | L      |		.CONST	0x4c			; [0x5] -> 0x223f4
000223b4 00 4c                    | L      |		.CONST	0x4c			; [0x6] -> 0x223f4
000223b6 00 4c                    | L      |		.CONST	0x4c			; [0x7] -> 0x223f4
000223b8 00 4c                    | L      |		.CONST	0x4c			; [0x8] -> 0x223f4
000223ba 00 68                    | h      |		.CONST	0x68			; [0x9] -> 0x22410
000223bc 00 68                    | h      |		.CONST	0x68			; [0xa] -> 0x22410
000223be 00 68                    | h      |		.CONST	0x68			; [0xb] -> 0x22410
000223c0 00 68                    | h      |		.CONST	0x68			; [0xc] -> 0x22410
000223c2 00 a0                    |        |		.CONST	0xa0			; [0xd] -> 0x22448
000223c4 00 c4                    |        |		.CONST	0xc4			; [0xe] -> 0x2246c
000223c6 00 c6                    |        |		.CONST	0xc6			; [0xf] -> 0x2246e
000223c8 01 1a                    |        |		.CONST	0x11a			; [0x10] -> 0x224c2
000223ca 00 c4                    |        |		.CONST	0xc4			; [0x11] -> 0x2246c
000223cc 01 80                    |        |		.CONST	0x180			; [0x12] -> 0x22528
000223ce					switch@0x223a0[0x0]:
000223ce					switch@0x223a0[0x1]:
000223ce 20 52                    | R      |		MOVEA.L	(A2),A0
000223d0 10 82                    |        |		MOVE.B	D2,(A0)
000223d2 11 45 00 01              | E      |		MOVE.B	D5,(A0+0x1)
000223d6 60 00 01 56              |`  V    |		BRA	0x2252e
000223da					switch@0x223a0[0x2]:
000223da 20 52                    | R      |		MOVEA.L	(A2),A0
000223dc 10 82                    |        |		MOVE.B	D2,(A0)
000223de 11 7c 00 29 00 01        | | )    |		MOVE.B	#0x29,(A0+0x1)
000223e4 60 00 01 48              |`  H    |		BRA	0x2252e
000223e8					switch@0x223a0[0x3]:
000223e8 60 00 01 3e              |`  >    |		BRA	switch@0x223a0[0x12]
000223ec					switch@0x223a0[0x4]:
000223ec 20 52                    | R      |		MOVEA.L	(A2),A0
000223ee 10 85                    |        |		MOVE.B	D5,(A0)
000223f0 60 00 01 3c              |`  <    |		BRA	0x2252e
000223f4					switch@0x223a0[0x5]:
000223f4					switch@0x223a0[0x6]:
000223f4					switch@0x223a0[0x7]:
000223f4					switch@0x223a0[0x8]:
000223f4 4a 2e 00 10              |J.      |		TST.B	(A6+0x10)
000223f8 67 06                    |g       |		BEQ	0x22400
000223fa 20 52                    | R      |		MOVEA.L	(A2),A0
000223fc 10 85                    |        |		MOVE.B	D5,(A0)
000223fe 60 0c                    |`       |		BRA	0x2240c
00022400 22 52                    |"R      |		MOVEA.L	(A2),A1
00022402 48 51                    |HQ      |		PEA.L	(A1)
00022404 4e ba ff 08              |N       |		JSR	0x2230e
00022408 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002240a 10 83                    |        |		MOVE.B	D3,(A0)
0002240c 60 00 01 20              |`       |		BRA	0x2252e
00022410					switch@0x223a0[0x9]:
00022410					switch@0x223a0[0xa]:
00022410					switch@0x223a0[0xb]:
00022410					switch@0x223a0[0xc]:
00022410 4a 2e 00 10              |J.      |		TST.B	(A6+0x10)
00022414 67 22                    |g"      |		BEQ	0x22438
00022416 20 52                    | R      |		MOVEA.L	(A2),A0
00022418 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002241a 42 80                    |B       |		CLR.L	D0
0002241c 10 13                    |        |		MOVE.B	(A3),D0
0002241e 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022420 4e 94                    |N       |		JSR	(A4)
00022422 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022424 10 1f                    |        |		MOVE.B	(A7)+,D0
00022426 48 80                    |H       |		EXTB.W	D0
00022428 48 c0                    |H       |		EXTW.L	D0
0002242a 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00022430 63 02                    |c       |		BLS	0x22434
00022432 4e 4f                    |NO      |		TRAP	#15
00022434 10 80                    |        |		MOVE.B	D0,(A0)
00022436 60 0c                    |`       |		BRA	0x22444
00022438 10 83                    |        |		MOVE.B	D3,(A0)
0002243a 20 52                    | R      |		MOVEA.L	(A2),A0
0002243c 48 50                    |HP      |		PEA.L	(A0)
0002243e 4e ba fe ce              |N       |		JSR	0x2230e
00022442 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022444 60 00 00 e8              |`       |		BRA	0x2252e
00022448					switch@0x223a0[0xd]:
00022448 20 52                    | R      |		MOVEA.L	(A2),A0
0002244a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002244c 42 80                    |B       |		CLR.L	D0
0002244e 10 13                    |        |		MOVE.B	(A3),D0
00022450 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022452 4e 94                    |N       |		JSR	(A4)
00022454 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022456 10 1f                    |        |		MOVE.B	(A7)+,D0
00022458 48 80                    |H       |		EXTB.W	D0
0002245a 48 c0                    |H       |		EXTW.L	D0
0002245c 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00022462 63 02                    |c       |		BLS	0x22466
00022464 4e 4f                    |NO      |		TRAP	#15
00022466 10 80                    |        |		MOVE.B	D0,(A0)
00022468 60 00 00 c4              |`       |		BRA	0x2252e
0002246c					switch@0x223a0[0x11]:
0002246c					switch@0x223a0[0xe]:
0002246c 60 ca                    |`       |		BRA	0x22438
0002246e					switch@0x223a0[0xf]:
0002246e 10 83                    |        |		MOVE.B	D3,(A0)
00022470 20 52                    | R      |		MOVEA.L	(A2),A0
00022472 10 82                    |        |		MOVE.B	D2,(A0)
00022474 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022476 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
0002247a 2f 13                    |/       |		MOVE.L	(A3),-(A7)
0002247c 4e ba fd 34              |N  4    |		JSR	0x221b2
00022480 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022482 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00022484 be 97                    |        |		CMP.L	(A7),D7
00022486 6e 38                    |n8      |		BGT	0x224c0
00022488 20 52                    | R      |		MOVEA.L	(A2),A0
0002248a be 84                    |        |		CMP.L	D4,D7
0002248c 63 02                    |c       |		BLS	0x22490
0002248e 4e 4f                    |NO      |		TRAP	#15
00022490 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00022492 20 07                    |        |		MOVE.L	D7,D0
00022494 53 80                    |S       |		SUBQ.L	#0x1,D0
00022496 b0 84                    |        |		CMP.L	D4,D0
00022498 63 02                    |c       |		BLS	0x2249c
0002249a 4e 4f                    |NO      |		TRAP	#15
0002249c 42 81                    |B       |		CLR.L	D1
0002249e 12 36 08 08              | 6      |		MOVE.B	(A6+D0.L+#0x8),D1
000224a2 2f 01                    |/       |		MOVE.L	D1,-(A7)
000224a4 4e 94                    |N       |		JSR	(A4)
000224a6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000224a8 10 1f                    |        |		MOVE.B	(A7)+,D0
000224aa 48 80                    |H       |		EXTB.W	D0
000224ac 48 c0                    |H       |		EXTW.L	D0
000224ae 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
000224b4 63 02                    |c       |		BLS	0x224b8
000224b6 4e 4f                    |NO      |		TRAP	#15
000224b8 11 80 78 00              |  x     |		MOVE.B	D0,(A0+D7.L)
000224bc 52 87                    |R       |		ADDQ.L	#0x1,D7
000224be 68 c4                    |h       |		BVC	0x22484
000224c0 60 80                    |`       |		BRA	0x22442
000224c2					switch@0x223a0[0x10]:
000224c2 4a 2e 00 10              |J.      |		TST.B	(A6+0x10)
000224c6 67 52                    |gR      |		BEQ	0x2251a
000224c8 20 52                    | R      |		MOVEA.L	(A2),A0
000224ca 10 82                    |        |		MOVE.B	D2,(A0)
000224cc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000224ce 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000224d2 2f 13                    |/       |		MOVE.L	(A3),-(A7)
000224d4 4e ba fc dc              |N       |		JSR	0x221b2
000224d8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000224da 7e 01                    |~       |		MOVEQ.L	#0x01,D7
000224dc be 97                    |        |		CMP.L	(A7),D7
000224de 6e 38                    |n8      |		BGT	0x22518
000224e0 20 52                    | R      |		MOVEA.L	(A2),A0
000224e2 be 84                    |        |		CMP.L	D4,D7
000224e4 63 02                    |c       |		BLS	0x224e8
000224e6 4e 4f                    |NO      |		TRAP	#15
000224e8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000224ea 20 07                    |        |		MOVE.L	D7,D0
000224ec 53 80                    |S       |		SUBQ.L	#0x1,D0
000224ee b0 84                    |        |		CMP.L	D4,D0
000224f0 63 02                    |c       |		BLS	0x224f4
000224f2 4e 4f                    |NO      |		TRAP	#15
000224f4 42 81                    |B       |		CLR.L	D1
000224f6 12 36 08 08              | 6      |		MOVE.B	(A6+D0.L+#0x8),D1
000224fa 2f 01                    |/       |		MOVE.L	D1,-(A7)
000224fc 4e 94                    |N       |		JSR	(A4)
000224fe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022500 10 1f                    |        |		MOVE.B	(A7)+,D0
00022502 48 80                    |H       |		EXTB.W	D0
00022504 48 c0                    |H       |		EXTW.L	D0
00022506 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
0002250c 63 02                    |c       |		BLS	0x22510
0002250e 4e 4f                    |NO      |		TRAP	#15
00022510 11 80 78 00              |  x     |		MOVE.B	D0,(A0+D7.L)
00022514 52 87                    |R       |		ADDQ.L	#0x1,D7
00022516 68 c4                    |h       |		BVC	0x224dc
00022518 60 0a                    |`       |		BRA	0x22524
0002251a 10 83                    |        |		MOVE.B	D3,(A0)
0002251c 20 52                    | R      |		MOVEA.L	(A2),A0
0002251e 48 50                    |HP      |		PEA.L	(A0)
00022520 4e ba fd ec              |N       |		JSR	0x2230e
00022524 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022526 60 06                    |`       |		BRA	0x2252e
00022528					switch@0x223a0[0x12]:
00022528 20 52                    | R      |		MOVEA.L	(A2),A0
0002252a 10 bc 00 27              |   '    |		MOVE.B	#0x27,(A0)
0002252e 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00022532 4e 5e                    |N^      |		UNLK	A6
00022534 4e 75                    |Nu      |		RTS
00022536 ; --------------------------------------------------------------------------------------
00022536 ; OMSI PASCAL Function
00022536 ;    <LVAR  0x00c 4(r)>
00022536 ;    <LVAR  0x008 4(r)>
00022536 ;    <LVAR -0x001 1(r)>
00022536 ;    <LVAR -0x004 @>
00022536 ; --------------------------------------------------------------------------------------
00022536 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
0002253a bf d5                    |        |		CMPA.L	(A5),A7
0002253c 62 06                    |b       |		BHI	0x22544
0002253e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022542 4e 76                    |Nv      |		TRAPV
00022544 de fc 00 18              |        |		ADDA.W	#0x18,A7
00022548 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002254c 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00022552 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00022556 4e b9 00 01 05 32        |N    2  |		JSR	IPC_GetLong() : Long
0002255c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002255e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00022562 48 50                    |HP      |		PEA.L	(A0)
00022564 48 78 00 00              |Hx      |		PEA.L	0x0
00022568 48 78 00 07              |Hx      |		PEA.L	0x7
0002256c 4e b9 00 01 05 20        |N       |		JSR	IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
00022572 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00022576 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
0002257c 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00022580 10 2e ff ff              | .      |		MOVE.B	(A6-0x1),D0
00022584 48 80                    |H       |		EXTB.W	D0
00022586 41 bc 00 0b              |A       |		CHK.W	#0xb,D0
0002258a 10 80                    |        |		MOVE.B	D0,(A0)
0002258c 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00022590 4e 5e                    |N^      |		UNLK	A6
00022592 4e 75                    |Nu      |		RTS
00022594 ; --------------------------------------------------------------------------------------
00022594 ; OMSI PASCAL Function
00022594 ;    <LVAR  0x010 4(r)>
00022594 ;    <LVAR  0x00c 4(r)>
00022594 ;    <LVAR  0x008 4(r)>
00022594 ;    <LVAR -0x001 1(r)>
00022594 ;    <LVAR -0x002 @ 1(r)>
00022594 ;    <LVAR -0x012 @>
00022594 ;    <LVAR -0x018 @>
00022594 ;    <LVAR -0x01d @>
00022594 ;    <LVAR -0x026 @>
00022594 ;    <LVAR -0x02c @>
00022594 ; --------------------------------------------------------------------------------------
00022594 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
00022598 bf d5                    |        |		CMPA.L	(A5),A7
0002259a 62 06                    |b       |		BHI	0x225a2
0002259c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000225a0 4e 76                    |Nv      |		TRAPV
000225a2 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000225a6 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000225aa 48 6e ff d4              |Hn      |		PEA.L	(A6-0x2c)
000225ae 48 6e ff da              |Hn      |		PEA.L	(A6-0x26)
000225b2 48 6e ff e3              |Hn      |		PEA.L	(A6-0x1d)
000225b6 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
000225ba 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
000225be 4e ba ee ca              |N       |		JSR	0x2148a
000225c2 de fc 00 12              |        |		ADDA.W	#0x12,A7
000225c6 42 17                    |B       |		CLR.B	(A7)
000225c8 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
000225cc 4e b9 00 02 2e be        |N   .   |		JSR	exp_TEST_READ_DISPATCH.SEQ(Sw_1, &Sr_2)
000225d2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000225d4 48 6e ff d4              |Hn      |		PEA.L	(A6-0x2c)
000225d8 48 6e ff da              |Hn      |		PEA.L	(A6-0x26)
000225dc 48 6e ff e3              |Hn      |		PEA.L	(A6-0x1d)
000225e0 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
000225e4 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
000225e8 4e ba ef 0c              |N       |		JSR	0x214f6
000225ec de fc 00 14              |        |		ADDA.W	#0x14,A7
000225f0 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
000225f4 42 80                    |B       |		CLR.L	D0
000225f6 10 2e ff fe              | .      |		MOVE.B	(A6-0x2),D0
000225fa c0 fc 01 00              |        |		MULU.W	#0x100,D0
000225fe 42 81                    |B       |		CLR.L	D1
00022600 12 2e ff ff              | .      |		MOVE.B	(A6-0x1),D1
00022604 d2 40                    | @      |		ADD.W	D0,D1
00022606 30 81                    |0       |		MOVE.W	D1,(A0)
00022608 30 01                    |0       |		MOVE.W	D1,D0
0002260a 02 40 fc 00              | @      |		ANDI.W	#0xfc00,D0
0002260e 67 10                    |g       |		BEQ	0x22620
00022610 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00022614 10 bc 00 01              |        |		MOVE.B	#0x01,(A0)
00022618 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002261c ec 49                    | I      |		LSR.W	#0x6,D1
0002261e 60 0a                    |`       |		BRA	0x2262a
00022620 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
00022624 42 10                    |B       |		CLR.B	(A0)
00022626 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002262a 30 81                    |0       |		MOVE.W	D1,(A0)
0002262c 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00022630 4e 5e                    |N^      |		UNLK	A6
00022632 4e 75                    |Nu      |		RTS
00022634 ; --------------------------------------------------------------------------------------
00022634 ; OMSI PASCAL Function
00022634 ;    <LVAR  0x00c 4(r)>
00022634 ;    <LVAR  0x008 4(r)>
00022634 ;    <LVAR -0x004 @ 1(r)>
00022634 ;    <LVAR -0x006 @ 2(r)>
00022634 ;    <LVAR -0x00a @ 4(r)>
00022634 ;    <LVAR -0x00e 4(rw)>
00022634 ;    <LVAR -0x012 4(rw)>
00022634 ;    <LVAR -0x016 4(r)>
00022634 ;    <LVAR -0x01a @ 4(r)>
00022634 ;    <LVAR -0x01e 4(r)>
00022634 ;    <LVAR -0x022 @ 4(r)>
00022634 ;    <LVAR -0x024 @ 2(r)>
00022634 ; --------------------------------------------------------------------------------------
00022634 4e 56 ff 86              |NV      |		LINK.W	A6,#0xff86
00022638 bf d5                    |        |		CMPA.L	(A5),A7
0002263a 62 06                    |b       |		BHI	0x22642
0002263c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022640 4e 76                    |Nv      |		TRAPV
00022642 de fc 00 56              |   V    |		ADDA.W	#0x56,A7
00022646 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
0002264a 43 ee 00 08              |C       |		LEA.L	(A6+0x8),A1
0002264e 45 ee ff de              |E       |		LEA.L	(A6-0x22),A2
00022652 47 ee ff e6              |G       |		LEA.L	(A6-0x1a),A3
00022656 49 ee ff dc              |I       |		LEA.L	(A6-0x24),A4
0002265a 72 10                    |r       |		MOVEQ.L	#0x10,D1
0002265c 74 03                    |t       |		MOVEQ.L	#0x03,D2
0002265e 76 0e                    |v       |		MOVEQ.L	#0x0e,D3
00022660 78 01                    |x       |		MOVEQ.L	#0x01,D4
00022662 48 54                    |HT      |		PEA.L	(A4)
00022664 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00022668 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
0002266c 4e ba ff 26              |N  &    |		JSR	0x22594
00022670 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00022674 3e ae ff fa              |>       |		MOVE.W	(A6-0x6),(A7)
00022678 1f 2e ff fc              | .      |		MOVE.B	(A6-0x4),-(A7)
0002267c 48 52                    |HR      |		PEA.L	(A2)
0002267e 4e ba ef 9c              |N       |		JSR	0x2161c
00022682 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00022684 2e ae ff e2              |.       |		MOVE.L	(A6-0x1e),(A7)
00022688 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002268a 4e ba f3 be              |N       |		JSR	0x21a4a
0002268e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022690 4a 1f                    |J       |		TST.B	(A7)+
00022692 67 08                    |g       |		BEQ	0x2269c
00022694 20 51                    | Q      |		MOVEA.L	(A1),A0
00022696 10 82                    |        |		MOVE.B	D2,(A0)
00022698 60 00 01 10              |`       |		BRA	0x227aa
0002269c 3f 14                    |?       |		MOVE.W	(A4),-(A7)
0002269e 48 53                    |HS      |		PEA.L	(A3)
000226a0 4e ba f0 56              |N  V    |		JSR	0x216f8
000226a4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000226a6 42 80                    |B       |		CLR.L	D0
000226a8 30 14                    |0       |		MOVE.W	(A4),D0
000226aa 2f 00                    |/       |		MOVE.L	D0,-(A7)
000226ac 48 78 00 04              |Hx      |		PEA.L	0x4
000226b0 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
000226b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000226b8 4e ba f2 fe              |N       |		JSR	0x219b8
000226bc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000226be 2f 2e ff ea              |/.      |		MOVE.L	(A6-0x16),-(A7)
000226c2 2f 13                    |/       |		MOVE.L	(A3),-(A7)
000226c4 2f 2e ff e2              |/.      |		MOVE.L	(A6-0x1e),-(A7)
000226c8 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000226ca 4e b9 00 01 03 2c        |N    ,  |		JSR	IsEqual(a, b : Quad) : Bool
000226d0 de c1                    |        |		ADDA.W	D1,A7
000226d2 4a 1f                    |J       |		TST.B	(A7)+
000226d4 67 0a                    |g       |		BEQ	0x226e0
000226d6 20 51                    | Q      |		MOVEA.L	(A1),A0
000226d8 10 bc 00 04              |        |		MOVE.B	#0x04,(A0)
000226dc 60 00 00 9c              |`       |		BRA	0x2277a
000226e0 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000226e2 2f 2e ff ea              |/.      |		MOVE.L	(A6-0x16),-(A7)
000226e6 2f 13                    |/       |		MOVE.L	(A3),-(A7)
000226e8 2f 2e ff e2              |/.      |		MOVE.L	(A6-0x1e),-(A7)
000226ec 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000226ee 4e b9 00 01 03 40        |N    @  |		JSR	BitXor(a, b : Quad) : Quad
000226f4 de c1                    |        |		ADDA.W	D1,A7
000226f6 2d 5f ff ee              |-_      |		MOVE.L	(A7)+,(A6-0x12)
000226fa 2d 5f ff f2              |-_      |		MOVE.L	(A7)+,(A6-0xe)
000226fe 1f 2e ff fc              | .      |		MOVE.B	(A6-0x4),-(A7)
00022702 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
00022706 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
0002270a 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
0002270e 4e ba f9 5c              |N  \    |		JSR	0x2206c
00022712 de c3                    |        |		ADDA.W	D3,A7
00022714 20 2e ff f6              | .      |		MOVE.L	(A6-0xa),D0
00022718 b0 82                    |        |		CMP.L	D2,D0
0002271a 62 58                    |bX      |		BHI	0x22774
0002271c d0 40                    | @      |		ADD.W	D0,D0
0002271e 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00022726 00 08                    |        |		.CONST	0x8			; [0x0] -> 0x2272e
00022728 00 36                    | 6      |		.CONST	0x36			; [0x1] -> 0x2275c
0002272a 00 3e                    | >      |		.CONST	0x3e			; [0x2] -> 0x22764
0002272c 00 46                    | F      |		.CONST	0x46			; [0x3] -> 0x2276c
0002272e					switch@0x2271e[0x0]:
0002272e 41 fa df 36              |A  6    |		LEA.L	0x20666,A0
00022732 70 06                    |p       |		MOVEQ.L	#0x06,D0
00022734 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00022736 51 c8 ff fc              |Q       |		DBF	D0,0x22734
0002273a 1f 03                    |        |		MOVE.B	D3,-(A7)
0002273c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002273e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00022742 3f 04                    |?       |		MOVE.W	D4,-(A7)
00022744 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00022748 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002274e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022750 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00022756 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
0002275a 60 1e                    |`       |		BRA	0x2277a
0002275c					switch@0x2271e[0x1]:
0002275c 20 51                    | Q      |		MOVEA.L	(A1),A0
0002275e 10 bc 00 05              |        |		MOVE.B	#0x05,(A0)
00022762 60 16                    |`       |		BRA	0x2277a
00022764					switch@0x2271e[0x2]:
00022764 20 51                    | Q      |		MOVEA.L	(A1),A0
00022766 10 bc 00 06              |        |		MOVE.B	#0x06,(A0)
0002276a 60 0e                    |`       |		BRA	0x2277a
0002276c					switch@0x2271e[0x3]:
0002276c 20 51                    | Q      |		MOVEA.L	(A1),A0
0002276e 10 bc 00 07              |        |		MOVE.B	#0x07,(A0)
00022772 60 06                    |`       |		BRA	0x2277a
00022774 20 51                    | Q      |		MOVEA.L	(A1),A0
00022776 10 bc 00 08              |        |		MOVE.B	#0x08,(A0)
0002277a 4e ba fa ea              |N       |		JSR	0x22266
0002277e 3f 14                    |?       |		MOVE.W	(A4),-(A7)
00022780 48 53                    |HS      |		PEA.L	(A3)
00022782 4e ba ef 74              |N  t    |		JSR	0x216f8
00022786 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00022788 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002278c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002278e 2f 2e ff ea              |/.      |		MOVE.L	(A6-0x16),-(A7)
00022792 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00022794 2f 2e ff e2              |/.      |		MOVE.L	(A6-0x1e),-(A7)
00022798 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002279a 4e b9 00 01 03 2c        |N    ,  |		JSR	IsEqual(a, b : Quad) : Bool
000227a0 de c1                    |        |		ADDA.W	D1,A7
000227a2 10 1f                    |        |		MOVE.B	(A7)+,D0
000227a4 48 80                    |H       |		EXTB.W	D0
000227a6 41 84                    |A       |		CHK.W	D4,D0
000227a8 10 80                    |        |		MOVE.B	D0,(A0)
000227aa 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
000227ae 4e 5e                    |N^      |		UNLK	A6
000227b0 4e 75                    |Nu      |		RTS
000227b2 ; --------------------------------------------------------------------------------------
000227b2 ; OMSI PASCAL Function
000227b2 ;    <LVAR  0x010 4(r)>
000227b2 ;    <LVAR  0x00c 4(r)>
000227b2 ;    <LVAR  0x008 4(r)>
000227b2 ; --------------------------------------------------------------------------------------
000227b2 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
000227b6 bf d5                    |        |		CMPA.L	(A5),A7
000227b8 62 06                    |b       |		BHI	0x227c0
000227ba 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000227be 4e 76                    |Nv      |		TRAPV
000227c0 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
000227c4 48 e7 c0 e0              |H       |		MOVEM.L	A2+A1+A0+D1+D0,-(A7)
000227c8 45 ee 00 0c              |E       |		LEA.L	(A6+0xc),A2
000227cc 72 01                    |r       |		MOVEQ.L	#0x01,D1
000227ce 4a ae 00 10              |J       |		TST.L	(A6+0x10)
000227d2 66 38                    |f8      |		BNE	0x2280c
000227d4 9e fc 00 28              |   (    |		SUBA.W	#0x28,A7
000227d8 20 4f                    | O      |		MOVEA.L	A7,A0
000227da 43 fa de 8a              |C       |		LEA.L	0x20666,A1
000227de 70 26                    |p&      |		MOVEQ.L	#0x26,D0
000227e0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000227e2 51 c8 ff fc              |Q       |		DBF	D0,0x227e0
000227e6 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
000227ea 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000227ec 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000227f0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000227f2 3f 3c 00 27              |?< '    |		MOVE.W	#0x27,-(A7)
000227f6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000227fc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000227fe 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00022804 de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00022808 60 00 00 8c              |`       |		BRA	0x22896
0002280c 20 2e 00 10              | .      |		MOVE.L	(A6+0x10),D0
00022810 0c 80 00 00 00 04        |        |		CMPI.L	#0x00000004,D0
00022816 66 2e                    |f.      |		BNE	0x22846
00022818 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002281a 4e ba f4 d2              |N       |		JSR	0x21cee
0002281e 4a 1f                    |J       |		TST.B	(A7)+
00022820 67 08                    |g       |		BEQ	0x2282a
00022822 20 52                    | R      |		MOVEA.L	(A2),A0
00022824 10 bc 00 02              |        |		MOVE.B	#0x02,(A0)
00022828 60 1a                    |`       |		BRA	0x22844
0002282a 20 52                    | R      |		MOVEA.L	(A2),A0
0002282c 10 81                    |        |		MOVE.B	D1,(A0)
0002282e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00022832 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022834 22 4f                    |"O      |		MOVEA.L	A7,A1
00022836 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022838 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002283a 51 c8 ff fc              |Q       |		DBF	D0,0x22838
0002283e 4e ba f1 bc              |N       |		JSR	0x219fc
00022842 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022844 60 50                    |`P      |		BRA	0x22896
00022846 20 52                    | R      |		MOVEA.L	(A2),A0
00022848 42 10                    |B       |		CLR.B	(A0)
0002284a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002284c 4e ba f4 a0              |N       |		JSR	0x21cee
00022850 4a 1f                    |J       |		TST.B	(A7)+
00022852 67 2c                    |g,      |		BEQ	0x22880
00022854 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022856 1e ba de 36              |   6    |		MOVE.B	0x2068e,(A7)
0002285a 1f 7a de 33 00 01        | z 3    |		MOVE.B	0x2068f,(A7+0x1)
00022860 1f 7a de 2e 00 02        | z .    |		MOVE.B	0x20690,(A7+0x2)
00022866 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022868 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002286c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002286e 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
00022872 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022878 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002287a 4e ba f1 3c              |N  <    |		JSR	0x219b8
0002287e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022880 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00022884 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022886 22 4f                    |"O      |		MOVEA.L	A7,A1
00022888 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002288a 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002288c 51 c8 ff fc              |Q       |		DBF	D0,0x2288a
00022890 4e ba f1 6a              |N  j    |		JSR	0x219fc
00022894 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022896 4c df 07 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2
0002289a 4e 5e                    |N^      |		UNLK	A6
0002289c 4e 75                    |Nu      |		RTS
0002289e ; --------------------------------------------------------------------------------------
0002289e ; OMSI PASCAL Function
0002289e ;    <LVAR  0x008 4(r)>
0002289e ;    <LVAR -0x003 1(r)>
0002289e ;    <LVAR -0x004 @ 1(r)>
0002289e ; --------------------------------------------------------------------------------------
0002289e 4e 56 ff 78              |NV x    |		LINK.W	A6,#0xff78
000228a2 bf d5                    |        |		CMPA.L	(A5),A7
000228a4 62 06                    |b       |		BHI	0x228ac
000228a6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000228aa 4e 76                    |Nv      |		TRAPV
000228ac de fc 00 84              |        |		ADDA.W	#0x84,A7
000228b0 48 e7 e0 e0              |H       |		MOVEM.L	A2+A1+A0+D2+D1+D0,-(A7)
000228b4 74 01                    |t       |		MOVEQ.L	#0x01,D2
000228b6 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000228ba 4e b9 00 02 31 44        |N   1D  |		JSR	exp_READ_LAST_PC.IOC(&Sr_2)
000228c0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000228c2 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000228c6 42 80                    |B       |		CLR.L	D0
000228c8 10 2e ff fc              | .      |		MOVE.B	(A6-0x4),D0
000228cc e1 40                    | @      |		ASL.W	#0x8,D0
000228ce 42 81                    |B       |		CLR.L	D1
000228d0 12 2e ff fd              | .      |		MOVE.B	(A6-0x3),D1
000228d4 d2 40                    | @      |		ADD.W	D0,D1
000228d6 30 81                    |0       |		MOVE.W	D1,(A0)
000228d8 0c 41 01 45              | A E    |		CMPI.W	#0x0145,D1
000228dc 64 6e                    |dn      |		BCC	0x2294c
000228de 43 fa dd cc              |C       |		LEA.L	0x206ac,A1
000228e2 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000228e4 3f 21                    |?!      |		MOVE.W	-(A1),-(A7)
000228e6 51 c8 ff fc              |Q       |		DBF	D0,0x228e4
000228ea 9e fc 00 30              |   0    |		SUBA.W	#0x30,A7
000228ee 22 4f                    |"O      |		MOVEA.L	A7,A1
000228f0 45 fa dd ba              |E       |		LEA.L	0x206ac,A2
000228f4 70 2e                    |p.      |		MOVEQ.L	#0x2e,D0
000228f6 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000228f8 51 c8 ff fc              |Q       |		DBF	D0,0x228f6
000228fc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000228fe 48 6f 00 38              |Ho 8    |		PEA.L	(A7+0x38)
00022902 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022904 3f 3c 00 1a              |?<      |		MOVE.W	#0x1a,-(A7)
00022908 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002290e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022910 42 80                    |B       |		CLR.L	D0
00022912 30 01                    |0       |		MOVE.W	D1,D0
00022914 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022916 48 78 00 04              |Hx      |		PEA.L	0x4
0002291a 4e b9 00 01 02 e8        |N       |		JSR	Long2HexString(val : Long; ndig : Long) : String
00022920 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022922 48 6f 00 10              |Ho      |		PEA.L	(A7+0x10)
00022926 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022928 3f 3c 00 2f              |?< /    |		MOVE.W	#0x2f,-(A7)
0002292c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022932 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022934 4e b9 00 01 02 d4        |N       |		JSR	StringCat3(a, b, c : String) : String
0002293a de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002293e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00022944 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
00022948 30 bc 01 45              |0  E    |		MOVE.W	#0x145,(A0)
0002294c 4c df 07 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2
00022950 4e 5e                    |N^      |		UNLK	A6
00022952 4e 75                    |Nu      |		RTS
00022954 ; --------------------------------------------------------------------------------------
00022954 ; OMSI PASCAL Function
00022954 ;    <LVAR  0x014 4(r)>
00022954 ;    <LVAR  0x010 4(r)>
00022954 ;    <LVAR  0x00c 4(r)>
00022954 ;    <LVAR  0x008 4(r)>
00022954 ;    <LVAR -0x058 @>
00022954 ;    <LVAR -0x05a @ 2(r)>
00022954 ;    <LVAR -0x07a @>
00022954 ;    <LVAR -0x07e @ 4(r)>
00022954 ;    <LVAR -0x082 @ 4(r)>
00022954 ;    <LVAR -0x086 @ 4(r)>
00022954 ;    <LVAR -0x088 @>
00022954 ; --------------------------------------------------------------------------------------
00022954 4e 56 fe d0              |NV      |		LINK.W	A6,#0xfed0
00022958 bf d5                    |        |		CMPA.L	(A5),A7
0002295a 62 06                    |b       |		BHI	0x22962
0002295c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022960 4e 76                    |Nv      |		TRAPV
00022962 de fc 00 a8              |        |		ADDA.W	#0xa8,A7
00022966 48 e7 f9 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7)
0002296a 47 ee 00 0c              |G       |		LEA.L	(A6+0xc),A3
0002296e 49 ee ff a6              |I       |		LEA.L	(A6-0x5a),A4
00022972 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
00022974 74 01                    |t       |		MOVEQ.L	#0x01,D2
00022976 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
00022978 78 0d                    |x       |		MOVEQ.L	#0x0d,D4
0002297a 48 54                    |HT      |		PEA.L	(A4)
0002297c 4e ba ff 20              |N       |		JSR	0x2289e
00022980 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022982 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00022984 10 07                    |        |		MOVE.B	D7,D0
00022986 48 80                    |H       |		EXTB.W	D0
00022988 e3 40                    | @      |		ASL.W	#0x1,D0
0002298a 41 ee ff 78              |A  x    |		LEA.L	(A6-0x88),A0
0002298e 31 82 00 0e              |1       |		MOVE.W	D2,(A0+D0.W+#0xe)
00022992 52 07                    |R       |		ADDQ.B	#0x1,D7
00022994 be 03                    |        |		CMP.B	D3,D7
00022996 6f ec                    |o       |		BLE	0x22984
00022998 9e c1                    |        |		SUBA.W	D1,A7
0002299a 42 80                    |B       |		CLR.L	D0
0002299c 30 14                    |0       |		MOVE.W	(A4),D0
0002299e 2f 00                    |/       |		MOVE.L	D0,-(A7)
000229a0 4e b9 00 01 03 54        |N    T  |		JSR	Long2Quad(a : Long) : Quad
000229a6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000229a8 48 78 00 10              |Hx      |		PEA.L	0x10
000229ac 4e b9 00 01 03 5c        |N    \  |		JSR	Quad2String(a : Quad; radix : Long ) : String
000229b2 de c1                    |        |		ADDA.W	D1,A7
000229b4 4e ba f0 02              |N       |		JSR	0x219b8
000229b8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000229ba 3e 94                    |>       |		MOVE.W	(A4),(A7)
000229bc 48 6e ff a8              |Hn      |		PEA.L	(A6-0x58)
000229c0 4e ba e8 94              |N       |		JSR	0x21256
000229c4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000229c6 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000229ca 2f 08                    |/       |		MOVE.L	A0,-(A7)
000229cc 9e fc 00 56              |   V    |		SUBA.W	#0x56,A7
000229d0 22 4f                    |"O      |		MOVEA.L	A7,A1
000229d2 45 ee ff a8              |E       |		LEA.L	(A6-0x58),A2
000229d6 70 54                    |pT      |		MOVEQ.L	#0x54,D0
000229d8 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000229da 51 c8 ff fc              |Q       |		DBF	D0,0x229d8
000229de 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
000229e2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000229e4 22 4f                    |"O      |		MOVEA.L	A7,A1
000229e6 24 48                    |$H      |		MOVEA.L	A0,A2
000229e8 70 07                    |p       |		MOVEQ.L	#0x07,D0
000229ea 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000229ec 51 c8 ff fc              |Q       |		DBF	D0,0x229ea
000229f0 48 6e ff 7a              |Hn z    |		PEA.L	(A6-0x86)
000229f4 48 6e ff 86              |Hn      |		PEA.L	(A6-0x7a)
000229f8 4e ba f0 9a              |N       |		JSR	0x21a94
000229fc de fc 00 14              |        |		ADDA.W	#0x14,A7
00022a00 22 4f                    |"O      |		MOVEA.L	A7,A1
00022a02 45 ee ff a8              |E       |		LEA.L	(A6-0x58),A2
00022a06 70 54                    |pT      |		MOVEQ.L	#0x54,D0
00022a08 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00022a0a 51 c8 ff fc              |Q       |		DBF	D0,0x22a08
00022a0e 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
00022a12 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022a14 22 4f                    |"O      |		MOVEA.L	A7,A1
00022a16 24 48                    |$H      |		MOVEA.L	A0,A2
00022a18 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022a1a 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00022a1c 51 c8 ff fc              |Q       |		DBF	D0,0x22a1a
00022a20 48 6e ff 7e              |Hn ~    |		PEA.L	(A6-0x82)
00022a24 48 6e ff 86              |Hn      |		PEA.L	(A6-0x7a)
00022a28 48 6e ff 82              |Hn      |		PEA.L	(A6-0x7e)
00022a2c 4e ba f1 dc              |N       |		JSR	0x21c0a
00022a30 de fc 00 64              |   d    |		ADDA.W	#0x64,A7
00022a34 22 4f                    |"O      |		MOVEA.L	A7,A1
00022a36 24 48                    |$H      |		MOVEA.L	A0,A2
00022a38 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022a3a 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00022a3c 51 c8 ff fc              |Q       |		DBF	D0,0x22a3a
00022a40 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
00022a44 22 4c                    |"L      |		MOVEA.L	A4,A1
00022a46 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022a48 2f 21                    |/!      |		MOVE.L	-(A1),-(A7)
00022a4a 51 c8 ff fc              |Q       |		DBF	D0,0x22a48
00022a4e 4e ba f7 a0              |N       |		JSR	0x221f0
00022a52 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00022a56 4a 1f                    |J       |		TST.B	(A7)+
00022a58 67 0a                    |g       |		BEQ	0x22a64
00022a5a 20 53                    | S      |		MOVEA.L	(A3),A0
00022a5c 10 bc 00 12              |        |		MOVE.B	#0x12,(A0)
00022a60 60 00 00 bc              |`       |		BRA	0x22b1e
00022a64 20 2e 00 14              | .      |		MOVE.L	(A6+0x14),D0
00022a68 b0 82                    |        |		CMP.L	D2,D0
00022a6a 66 00 00 84              |f       |		BNE	0x22af0
00022a6e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022a70 22 4f                    |"O      |		MOVEA.L	A7,A1
00022a72 24 48                    |$H      |		MOVEA.L	A0,A2
00022a74 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022a76 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00022a78 51 c8 ff fc              |Q       |		DBF	D0,0x22a76
00022a7c 4e ba ef 7e              |N  ~    |		JSR	0x219fc
00022a80 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022a82 20 2e ff 82              | .      |		MOVE.L	(A6-0x7e),D0
00022a86 0c 80 00 00 00 03        |        |		CMPI.L	#0x00000003,D0
00022a8c 62 30                    |b0      |		BHI	0x22abe
00022a8e d0 40                    | @      |		ADD.W	D0,D0
00022a90 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00022a98 00 08                    |        |		.CONST	0x8			; [0x0] -> 0x22aa0
00022a9a 00 0e                    |        |		.CONST	0xe			; [0x1] -> 0x22aa6
00022a9c 00 16                    |        |		.CONST	0x16			; [0x2] -> 0x22aae
00022a9e 00 1e                    |        |		.CONST	0x1e			; [0x3] -> 0x22ab6
00022aa0					switch@0x22a90[0x0]:
00022aa0 20 53                    | S      |		MOVEA.L	(A3),A0
00022aa2 10 84                    |        |		MOVE.B	D4,(A0)
00022aa4 60 1c                    |`       |		BRA	0x22ac2
00022aa6					switch@0x22a90[0x1]:
00022aa6 20 53                    | S      |		MOVEA.L	(A3),A0
00022aa8 10 bc 00 09              |        |		MOVE.B	#0x09,(A0)
00022aac 60 14                    |`       |		BRA	0x22ac2
00022aae					switch@0x22a90[0x2]:
00022aae 20 53                    | S      |		MOVEA.L	(A3),A0
00022ab0 10 bc 00 0a              |        |		MOVE.B	#0x0a,(A0)
00022ab4 60 0c                    |`       |		BRA	0x22ac2
00022ab6					switch@0x22a90[0x3]:
00022ab6 20 53                    | S      |		MOVEA.L	(A3),A0
00022ab8 10 bc 00 0b              |        |		MOVE.B	#0x0b,(A0)
00022abc 60 04                    |`       |		BRA	0x22ac2
00022abe 20 53                    | S      |		MOVEA.L	(A3),A0
00022ac0 10 81                    |        |		MOVE.B	D1,(A0)
00022ac2 20 2e ff 82              | .      |		MOVE.L	(A6-0x7e),D0
00022ac6 b0 82                    |        |		CMP.L	D2,D0
00022ac8 6d 24                    |m$      |		BLT	0x22aee
00022aca 0c 80 00 00 00 02        |        |		CMPI.L	#0x00000002,D0
00022ad0 6e 1c                    |n       |		BGT	0x22aee
00022ad2 42 80                    |B       |		CLR.L	D0
00022ad4 30 14                    |0       |		MOVE.W	(A4),D0
00022ad6 2f 00                    |/       |		MOVE.L	D0,-(A7)
00022ad8 20 6f 00 04              | o      |		MOVEA.L	(A7+0x4),A0
00022adc 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022ade 22 4f                    |"O      |		MOVEA.L	A7,A1
00022ae0 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022ae2 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00022ae4 51 c8 ff fc              |Q       |		DBF	D0,0x22ae2
00022ae8 4e ba f2 b2              |N       |		JSR	0x21d9c
00022aec de c1                    |        |		ADDA.W	D1,A7
00022aee 60 2e                    |`.      |		BRA	0x22b1e
00022af0 b0 ae ff 7a              |   z    |		CMP.L	(A6-0x86),D0
00022af4 66 08                    |f       |		BNE	0x22afe
00022af6 20 53                    | S      |		MOVEA.L	(A3),A0
00022af8 10 bc 00 0e              |        |		MOVE.B	#0x0e,(A0)
00022afc 60 20                    |`       |		BRA	0x22b1e
00022afe 4a ae ff 7a              |J  z    |		TST.L	(A6-0x86)
00022b02 67 08                    |g       |		BEQ	0x22b0c
00022b04 20 53                    | S      |		MOVEA.L	(A3),A0
00022b06 10 bc 00 11              |        |		MOVE.B	#0x11,(A0)
00022b0a 60 12                    |`       |		BRA	0x22b1e
00022b0c b0 ae ff 7e              |   ~    |		CMP.L	(A6-0x82),D0
00022b10 66 06                    |f       |		BNE	0x22b18
00022b12 20 53                    | S      |		MOVEA.L	(A3),A0
00022b14 10 83                    |        |		MOVE.B	D3,(A0)
00022b16 60 06                    |`       |		BRA	0x22b1e
00022b18 20 53                    | S      |		MOVEA.L	(A3),A0
00022b1a 10 bc 00 10              |        |		MOVE.B	#0x10,(A0)
00022b1e 20 53                    | S      |		MOVEA.L	(A3),A0
00022b20 42 80                    |B       |		CLR.L	D0
00022b22 10 10                    |        |		MOVE.B	(A0),D0
00022b24 b0 43                    | C      |		CMP.W	D3,D0
00022b26 67 5a                    |gZ      |		BEQ	0x22b82
00022b28 b0 44                    | D      |		CMP.W	D4,D0
00022b2a 67 56                    |gV      |		BEQ	0x22b82
00022b2c 4e ba f7 38              |N  8    |		JSR	0x22266
00022b30 3f 14                    |?       |		MOVE.W	(A4),-(A7)
00022b32 48 6e ff a8              |Hn      |		PEA.L	(A6-0x58)
00022b36 4e ba e7 1e              |N       |		JSR	0x21256
00022b3a 9e fc 00 50              |   P    |		SUBA.W	#0x50,A7
00022b3e 20 4f                    | O      |		MOVEA.L	A7,A0
00022b40 43 ee ff a8              |C       |		LEA.L	(A6-0x58),A1
00022b44 70 54                    |pT      |		MOVEQ.L	#0x54,D0
00022b46 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022b48 51 c8 ff fc              |Q       |		DBF	D0,0x22b46
00022b4c 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
00022b50 20 6f 00 5a              | o Z    |		MOVEA.L	(A7+0x5a),A0
00022b54 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022b56 22 4f                    |"O      |		MOVEA.L	A7,A1
00022b58 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022b5a 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00022b5c 51 c8 ff fc              |Q       |		DBF	D0,0x22b5a
00022b60 48 6e ff 7e              |Hn ~    |		PEA.L	(A6-0x82)
00022b64 48 6e ff 86              |Hn      |		PEA.L	(A6-0x7a)
00022b68 48 6e ff 82              |Hn      |		PEA.L	(A6-0x7e)
00022b6c 4e ba f0 9c              |N       |		JSR	0x21c0a
00022b70 de fc 00 6e              |   n    |		ADDA.W	#0x6e,A7
00022b74 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00022b78 42 10                    |B       |		CLR.B	(A0)
00022b7a 4a ae ff 82              |J       |		TST.L	(A6-0x7e)
00022b7e 66 02                    |f       |		BNE	0x22b82
00022b80 52 10                    |R       |		ADDQ.B	#0x1,(A0)
00022b82 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022b84 4c df 1f 9f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4
00022b88 4e 5e                    |N^      |		UNLK	A6
00022b8a 4e 75                    |Nu      |		RTS
00022b8c ; --------------------------------------------------------------------------------------
00022b8c ; OMSI PASCAL Function
00022b8c ; --------------------------------------------------------------------------------------
00022b8c					START:
00022b8c 4f fa 00 08              |O       |		LEA.L	MAIN,A7
00022b90 4e f9 00 01 02 80        |N       |		JMP	?start_program
00022b96					MAIN:
00022b96 45 f9 00 02 33 95        |E   3   |		LEA.L	0x23395,A2
00022b9c 47 f9 00 02 33 94        |G   3   |		LEA.L	0x23394,A3
00022ba2 49 f9 00 02 33 80        |I   3   |		LEA.L	0x23380,A4
00022ba8 72 01                    |r       |		MOVEQ.L	#0x01,D1
00022baa 74 07                    |t       |		MOVEQ.L	#0x07,D2
00022bac 76 0c                    |v       |		MOVEQ.L	#0x0c,D3
00022bae 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
00022bb4 48 78 00 00              |Hx      |		PEA.L	0x0
00022bb8 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00022bbe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022bc0 48 79 00 02 33 8a        |Hy  3   |		PEA.L	0x2338a
00022bc6 48 52                    |HR      |		PEA.L	(A2)
00022bc8 4e ba f9 6c              |N  l    |		JSR	0x22536
00022bcc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022bce 48 79 00 02 33 7c        |Hy  3|  |		PEA.L	0x2337c
00022bd4 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00022bda 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022bdc 42 13                    |B       |		CLR.B	(A3)
00022bde 70 00                    |p       |		MOVEQ.L	#0x00,D0
00022be0 23 c0 00 02 33 90        |#   3   |		MOVE.L	D0,0x23390
00022be6 b0 82                    |        |		CMP.L	D2,D0
00022be8 63 02                    |c       |		BLS	0x22bec
00022bea 4e 4f                    |NO      |		TRAP	#15
00022bec 41 f9 00 02 33 68        |A   3h  |		LEA.L	0x23368,A0
00022bf2 42 30 08 19              |B0      |		CLR.B	(A0+D0.L+#0x19)
00022bf6 52 80                    |R       |		ADDQ.L	#0x1,D0
00022bf8 b0 82                    |        |		CMP.L	D2,D0
00022bfa 6f e4                    |o       |		BLE	0x22be0
00022bfc 4e ba df b6              |N       |		JSR	0x20bb4
00022c00 9e c3                    |        |		SUBA.W	D3,A7
00022c02 20 4f                    | O      |		MOVEA.L	A7,A0
00022c04 22 4a                    |"J      |		MOVEA.L	A2,A1
00022c06 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022c08 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022c0a 51 c8 ff fc              |Q       |		DBF	D0,0x22c08
00022c0e 4e ba f5 a2              |N       |		JSR	0x221b2
00022c12 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c14 23 df 00 02 33 8c        |#   3   |		MOVE.L	(A7)+,0x2338c
00022c1a 10 39 00 02 33 8a        | 9  3   |		MOVE.B	0x2338a,D0
00022c20 48 80                    |H       |		EXTB.W	D0
00022c22 57 40                    |W@      |		SUBQ.W	#0x3,D0
00022c24 0c 40 00 02              | @      |		CMPI.W	#0x0002,D0
00022c28 62 44                    |bD      |		BHI	0x22c6e
00022c2a d0 40                    | @      |		ADD.W	D0,D0
00022c2c 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00022c34 00 12                    |        |		.CONST	0x12			; [0x0] -> 0x22c46
00022c36 00 24                    | $      |		.CONST	0x24			; [0x1] -> 0x22c58
00022c38 00 06                    |        |		.CONST	0x6			; [0x2] -> 0x22c3a
00022c3a					switch@0x22c2c[0x2]:
00022c3a 48 53                    |HS      |		PEA.L	(A3)
00022c3c 48 54                    |HT      |		PEA.L	(A4)
00022c3e 4e ba f9 f4              |N       |		JSR	0x22634
00022c42 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c44 60 5c                    |`\      |		BRA	0x22ca2
00022c46					switch@0x22c2c[0x0]:
00022c46 2f 39 00 02 33 8c        |/9  3   |		MOVE.L	0x2338c,-(A7)
00022c4c 48 54                    |HT      |		PEA.L	(A4)
00022c4e 48 52                    |HR      |		PEA.L	(A2)
00022c50 4e ba fb 60              |N  `    |		JSR	0x227b2
00022c54 de c3                    |        |		ADDA.W	D3,A7
00022c56 60 4a                    |`J      |		BRA	0x22ca2
00022c58					switch@0x22c2c[0x1]:
00022c58 2f 39 00 02 33 8c        |/9  3   |		MOVE.L	0x2338c,-(A7)
00022c5e 48 53                    |HS      |		PEA.L	(A3)
00022c60 48 54                    |HT      |		PEA.L	(A4)
00022c62 48 52                    |HR      |		PEA.L	(A2)
00022c64 4e ba fc ee              |N       |		JSR	0x22954
00022c68 de fc 00 10              |        |		ADDA.W	#0x10,A7
00022c6c 60 34                    |`4      |		BRA	0x22ca2
00022c6e 9e fc 00 28              |   (    |		SUBA.W	#0x28,A7
00022c72 20 4f                    | O      |		MOVEA.L	A7,A0
00022c74 43 fa da 66              |C  f    |		LEA.L	0x206dc,A1
00022c78 70 26                    |p&      |		MOVEQ.L	#0x26,D0
00022c7a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022c7c 51 c8 ff fc              |Q       |		DBF	D0,0x22c7a
00022c80 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
00022c84 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022c86 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00022c8a 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022c8c 3f 3c 00 27              |?< '    |		MOVE.W	#0x27,-(A7)
00022c90 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022c96 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022c98 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00022c9e de fc 00 2e              |   .    |		ADDA.W	#0x2e,A7
00022ca2 4a 13                    |J       |		TST.B	(A3)
00022ca4 67 30                    |g0      |		BEQ	0x22cd6
00022ca6 9e fc 00 36              |   6    |		SUBA.W	#0x36,A7
00022caa 20 4f                    | O      |		MOVEA.L	A7,A0
00022cac 43 fa da 56              |C  V    |		LEA.L	0x20704,A1
00022cb0 70 34                    |p4      |		MOVEQ.L	#0x34,D0
00022cb2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022cb4 51 c8 ff fc              |Q       |		DBF	D0,0x22cb2
00022cb8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022cba 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022cbe 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022cc0 3f 3c 00 35              |?< 5    |		MOVE.W	#0x35,-(A7)
00022cc4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022cca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022ccc 4e ba ec ea              |N       |		JSR	0x219b8
00022cd0 de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
00022cd4 60 2e                    |`.      |		BRA	0x22d04
00022cd6 9e fc 00 3c              |   <    |		SUBA.W	#0x3c,A7
00022cda 20 4f                    | O      |		MOVEA.L	A7,A0
00022cdc 43 fa da 5c              |C  \    |		LEA.L	0x2073a,A1
00022ce0 70 3a                    |p:      |		MOVEQ.L	#0x3a,D0
00022ce2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022ce4 51 c8 ff fc              |Q       |		DBF	D0,0x22ce2
00022ce8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022cea 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022cee 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022cf0 3f 3c 00 3b              |?< ;    |		MOVE.W	#0x3b,-(A7)
00022cf4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022cfa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022cfc 4e ba ec ba              |N       |		JSR	0x219b8
00022d00 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00022d04 48 79 00 02 33 89        |Hy  3   |		PEA.L	0x23389
00022d0a 48 79 00 02 33 81        |Hy  3   |		PEA.L	0x23381
00022d10 48 54                    |HT      |		PEA.L	(A4)
00022d12 1f 13                    |        |		MOVE.B	(A3),-(A7)
00022d14 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022d16 20 4f                    | O      |		MOVEA.L	A7,A0
00022d18 22 4a                    |"J      |		MOVEA.L	A2,A1
00022d1a 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022d1c 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022d1e 51 c8 ff fc              |Q       |		DBF	D0,0x22d1c
00022d22 4e ba f6 28              |N  (    |		JSR	0x2234c
00022d26 de fc 00 14              |        |		ADDA.W	#0x14,A7
00022d2a 3e ba da 4e              |>  N    |		MOVE.W	0x2077a,(A7)
00022d2e 3f 3a da 48              |?: H    |		MOVE.W	0x20778,-(A7)
00022d32 3f 3a da 42              |?: B    |		MOVE.W	0x20776,-(A7)
00022d36 1f 39 00 02 33 89        | 9  3   |		MOVE.B	0x23389,-(A7)
00022d3c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022d3e 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00022d42 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022d44 3f 3c 00 06              |?<      |		MOVE.W	#0x6,-(A7)
00022d48 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022d4e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022d50 2e b9 00 02 33 7c        |.   3|  |		MOVE.L	0x2337c,(A7)
00022d56 1f 14                    |        |		MOVE.B	(A4),-(A7)
00022d58 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022d5a 20 4f                    | O      |		MOVEA.L	A7,A0
00022d5c 43 f9 00 02 33 81        |C   3   |		LEA.L	0x23381,A1
00022d62 70 07                    |p       |		MOVEQ.L	#0x07,D0
00022d64 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022d66 51 c8 ff fc              |Q       |		DBF	D0,0x22d64
00022d6a 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00022d70 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00022d74 4e b9 00 01 02 84        |N       |		JSR	?exit
00022d7a					exp_UNPERMUTE_UIR.FIU(Sw_8, &Sr_6):
00022d7a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022d80 00 14                    |        |		.CONST	0x0014			; Stack-delta
00022d82 11 55 4e 50 45 52 4d 55  | UNPERMU|		.TXT	17,'UNPERMUTE_UIR.FIU'
00022d94 00                       |        |		.CONST	0x0
00022d95 03                       |        |		.CONST	0x3			; DIPROC address
00022d96 01                       |        |		.CONST	0x1			; Output Parameters
00022d97 01                       |        |		.CONST	0x1			; Input Parameters
00022d98 07                       |        |		.CONST	0x7			; In arg [8]
00022d99 05                       |        |		.CONST	0x5			; Out arg [6]
00022d9a					exp_READ_WCS.FIU(Sw_2, Sw_1, &Sr_6, &Fr):
00022d9a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022da0 00 14                    |        |		.CONST	0x0014			; Stack-delta
00022da2 0c 52 45 41 44 5f 57 43  | READ_WC|		.TXT	12,'READ_WCS.FIU'
00022daf 00                       |        |		.CONST	0x0
00022db0 03                       |        |		.CONST	0x3			; DIPROC address
00022db1 02                       |        |		.CONST	0x2			; Output Parameters
00022db2 02                       |        |		.CONST	0x2			; Input Parameters
00022db3 01                       |        |		.CONST	0x1			; In arg [2]
00022db4 00                       |        |		.CONST	0x0			; In arg [1]
00022db5 05                       |        |		.CONST	0x5			; Out arg [6]
00022db6 08                       |        |		.CONST	0x8			; Out arg flag
00022db7 00                       |        |		.PAD	0x0
00022db8					exp_WRITE_UIR.SEQ(Sw_6):
00022db8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022dbe 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00022dc0 0d 57 52 49 54 45 5f 55  | WRITE_U|		.TXT	13,'WRITE_UIR.SEQ'
00022dce 00                       |        |		.CONST	0x0
00022dcf 02                       |        |		.CONST	0x2			; DIPROC address
00022dd0 00                       |        |		.CONST	0x0			; Output Parameters
00022dd1 01                       |        |		.CONST	0x1			; Input Parameters
00022dd2 05                       |        |		.CONST	0x5			; In arg [6]
00022dd3 00                       |        |		.PAD	0x0
00022dd4					exp_WRITE_SDR.SEQ(Sw_8_8):
00022dd4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022dda 00 18                    |        |		.CONST	0x0018			; Stack-delta
00022ddc 0d 57 52 49 54 45 5f 53  | WRITE_S|		.TXT	13,'WRITE_SDR.SEQ'
00022dea 00                       |        |		.CONST	0x0
00022deb 02                       |        |		.CONST	0x2			; DIPROC address
00022dec 00                       |        |		.CONST	0x0			; Output Parameters
00022ded 01                       |        |		.CONST	0x1			; Input Parameters
00022dee 09                       |        |		.CONST	0x9			; In arg [8, 8]
00022def 00                       |        |		.PAD	0x0
00022df0					exp_WRITE_MISC.SEQ(Sw_2_2_1_1_3):
00022df0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022df6 00 12                    |        |		.CONST	0x0012			; Stack-delta
00022df8 0e 57 52 49 54 45 5f 4d  | WRITE_M|		.TXT	14,'WRITE_MISC.SEQ'
00022e07 00                       |        |		.CONST	0x0
00022e08 02                       |        |		.CONST	0x2			; DIPROC address
00022e09 00                       |        |		.CONST	0x0			; Output Parameters
00022e0a 01                       |        |		.CONST	0x1			; Input Parameters
00022e0b 0e                       |        |		.CONST	0xe			; In arg [2, 2, 1, 1, 3]
00022e0c					exp_WRITE_DEC.SEQ(Sw_2_1_1_1):
00022e0c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022e12 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00022e14 0d 57 52 49 54 45 5f 44  | WRITE_D|		.TXT	13,'WRITE_DEC.SEQ'
00022e22 00                       |        |		.CONST	0x0
00022e23 02                       |        |		.CONST	0x2			; DIPROC address
00022e24 00                       |        |		.CONST	0x0			; Output Parameters
00022e25 01                       |        |		.CONST	0x1			; Input Parameters
00022e26 0f                       |        |		.CONST	0xf			; In arg [2, 1, 1, 1]
00022e27 00                       |        |		.PAD	0x0
00022e28					exp_UNPERMUTE_UIR.SEQ(Sw_8, &Sr_6):
00022e28 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022e2e 00 14                    |        |		.CONST	0x0014			; Stack-delta
00022e30 11 55 4e 50 45 52 4d 55  | UNPERMU|		.TXT	17,'UNPERMUTE_UIR.SEQ'
00022e42 00                       |        |		.CONST	0x0
00022e43 02                       |        |		.CONST	0x2			; DIPROC address
00022e44 01                       |        |		.CONST	0x1			; Output Parameters
00022e45 01                       |        |		.CONST	0x1			; Input Parameters
00022e46 07                       |        |		.CONST	0x7			; In arg [8]
00022e47 05                       |        |		.CONST	0x5			; Out arg [6]
00022e48					exp_UNPERMUTE_DECODE.SEQ(Sw_8, &Sr_5):
00022e48 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022e4e 00 14                    |        |		.CONST	0x0014			; Stack-delta
00022e50 14 55 4e 50 45 52 4d 55  | UNPERMU|		.TXT	20,'UNPERMUTE_DECODE.SEQ'
00022e65 00                       |        |		.CONST	0x0
00022e66 02                       |        |		.CONST	0x2			; DIPROC address
00022e67 01                       |        |		.CONST	0x1			; Output Parameters
00022e68 01                       |        |		.CONST	0x1			; Input Parameters
00022e69 07                       |        |		.CONST	0x7			; In arg [8]
00022e6a 04                       |        |		.CONST	0x4			; Out arg [5]
00022e6b 00                       |        |		.PAD	0x0
00022e6c					exp_TEST_READ_MACRO_PC.SEQ(Sw_1, &Sr_3, &Sr_2, &Sr_1):
00022e6c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022e72 00 16                    |        |		.CONST	0x0016			; Stack-delta
00022e74 16 54 45 53 54 5f 52 45  | TEST_RE|		.TXT	22,'TEST_READ_MACRO_PC.SEQ'
00022e8b 00                       |        |		.CONST	0x0
00022e8c 02                       |        |		.CONST	0x2			; DIPROC address
00022e8d 03                       |        |		.CONST	0x3			; Output Parameters
00022e8e 01                       |        |		.CONST	0x1			; Input Parameters
00022e8f 00                       |        |		.CONST	0x0			; In arg [1]
00022e90 02                       |        |		.CONST	0x2			; Out arg [3]
00022e91 01                       |        |		.CONST	0x1			; Out arg [2]
00022e92 00                       |        |		.CONST	0x0			; Out arg [1]
00022e93 00                       |        |		.PAD	0x0
00022e94					exp_TEST_READ_IBUFF.SEQ(Sw_1, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2, &Sr_2):
00022e94 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022e9a 00 2a                    | *      |		.CONST	0x002a			; Stack-delta
00022e9c 13 54 45 53 54 5f 52 45  | TEST_RE|		.TXT	19,'TEST_READ_IBUFF.SEQ'
00022eb0 00                       |        |		.CONST	0x0
00022eb1 02                       |        |		.CONST	0x2			; DIPROC address
00022eb2 08                       |        |		.CONST	0x8			; Output Parameters
00022eb3 01                       |        |		.CONST	0x1			; Input Parameters
00022eb4 00                       |        |		.CONST	0x0			; In arg [1]
00022eb5 01                       |        |		.CONST	0x1			; Out arg [2]
00022eb6 01                       |        |		.CONST	0x1			; Out arg [2]
00022eb7 01                       |        |		.CONST	0x1			; Out arg [2]
00022eb8 01                       |        |		.CONST	0x1			; Out arg [2]
00022eb9 01                       |        |		.CONST	0x1			; Out arg [2]
00022eba 01                       |        |		.CONST	0x1			; Out arg [2]
00022ebb 01                       |        |		.CONST	0x1			; Out arg [2]
00022ebc 01                       |        |		.CONST	0x1			; Out arg [2]
00022ebd 00                       |        |		.PAD	0x0
00022ebe					exp_TEST_READ_DISPATCH.SEQ(Sw_1, &Sr_2):
00022ebe 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022ec4 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00022ec6 16 54 45 53 54 5f 52 45  | TEST_RE|		.TXT	22,'TEST_READ_DISPATCH.SEQ'
00022edd 00                       |        |		.CONST	0x0
00022ede 02                       |        |		.CONST	0x2			; DIPROC address
00022edf 01                       |        |		.CONST	0x1			; Output Parameters
00022ee0 01                       |        |		.CONST	0x1			; Input Parameters
00022ee1 00                       |        |		.CONST	0x0			; In arg [1]
00022ee2 01                       |        |		.CONST	0x1			; Out arg [2]
00022ee3 00                       |        |		.PAD	0x0
00022ee4					exp_TEST_LOAD_MACRO_PC.SEQ(Sw_1, Sw_3, Sw_2, Sw_1):
00022ee4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022eea 00 12                    |        |		.CONST	0x0012			; Stack-delta
00022eec 16 54 45 53 54 5f 4c 4f  | TEST_LO|		.TXT	22,'TEST_LOAD_MACRO_PC.SEQ'
00022f03 00                       |        |		.CONST	0x0
00022f04 02                       |        |		.CONST	0x2			; DIPROC address
00022f05 00                       |        |		.CONST	0x0			; Output Parameters
00022f06 04                       |        |		.CONST	0x4			; Input Parameters
00022f07 00                       |        |		.CONST	0x0			; In arg [1]
00022f08 02                       |        |		.CONST	0x2			; In arg [3]
00022f09 01                       |        |		.CONST	0x1			; In arg [2]
00022f0a 00                       |        |		.CONST	0x0			; In arg [1]
00022f0b 00                       |        |		.PAD	0x0
00022f0c					exp_TEST_LOAD_IBUFF.SEQ(Sw_1, Sw_8, Sw_8):
00022f0c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022f12 00 1a                    |        |		.CONST	0x001a			; Stack-delta
00022f14 13 54 45 53 54 5f 4c 4f  | TEST_LO|		.TXT	19,'TEST_LOAD_IBUFF.SEQ'
00022f28 00                       |        |		.CONST	0x0
00022f29 02                       |        |		.CONST	0x2			; DIPROC address
00022f2a 00                       |        |		.CONST	0x0			; Output Parameters
00022f2b 03                       |        |		.CONST	0x3			; Input Parameters
00022f2c 00                       |        |		.CONST	0x0			; In arg [1]
00022f2d 07                       |        |		.CONST	0x7			; In arg [8]
00022f2e 07                       |        |		.CONST	0x7			; In arg [8]
00022f2f 00                       |        |		.PAD	0x0
00022f30					exp_READ_WCS_AND_PARITY.SEQ(Sw_2, &Sr_6, &Fr):
00022f30 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022f36 00 12                    |        |		.CONST	0x0012			; Stack-delta
00022f38 17 52 45 41 44 5f 57 43  | READ_WC|		.TXT	23,'READ_WCS_AND_PARITY.SEQ'
00022f50 00                       |        |		.CONST	0x0
00022f51 02                       |        |		.CONST	0x2			; DIPROC address
00022f52 02                       |        |		.CONST	0x2			; Output Parameters
00022f53 01                       |        |		.CONST	0x1			; Input Parameters
00022f54 01                       |        |		.CONST	0x1			; In arg [2]
00022f55 05                       |        |		.CONST	0x5			; Out arg [6]
00022f56 08                       |        |		.CONST	0x8			; Out arg flag
00022f57 00                       |        |		.PAD	0x0
00022f58					exp_READ_UIR.SEQ(&Sr_6):
00022f58 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022f5e 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00022f60 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.SEQ'
00022f6d 00                       |        |		.CONST	0x0
00022f6e 02                       |        |		.CONST	0x2			; DIPROC address
00022f6f 01                       |        |		.CONST	0x1			; Output Parameters
00022f70 00                       |        |		.CONST	0x0			; Input Parameters
00022f71 05                       |        |		.CONST	0x5			; Out arg [6]
00022f72					exp_READ_SDR.SEQ(&Sr_8_8):
00022f72 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022f78 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00022f7a 0c 52 45 41 44 5f 53 44  | READ_SD|		.TXT	12,'READ_SDR.SEQ'
00022f87 00                       |        |		.CONST	0x0
00022f88 02                       |        |		.CONST	0x2			; DIPROC address
00022f89 01                       |        |		.CONST	0x1			; Output Parameters
00022f8a 00                       |        |		.CONST	0x0			; Input Parameters
00022f8b 09                       |        |		.CONST	0x9			; Out arg [8, 8]
00022f8c					exp_RESTORE_PREDECODES.SEQ():
00022f8c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022f92 00 08                    |        |		.CONST	0x0008			; Stack-delta
00022f94 16 52 45 53 54 4f 52 45  | RESTORE|		.TXT	22,'RESTORE_PREDECODES.SEQ'
00022fab 00                       |        |		.CONST	0x0
00022fac 02                       |        |		.CONST	0x2			; DIPROC address
00022fad 00                       |        |		.CONST	0x0			; Output Parameters
00022fae 00                       |        |		.CONST	0x0			; Input Parameters
00022faf 00                       |        |		.PAD	0x0
00022fb0					exp_READ_MISC.SEQ(&Sr_2_2_1_1_3):
00022fb0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022fb6 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00022fb8 0d 52 45 41 44 5f 4d 49  | READ_MI|		.TXT	13,'READ_MISC.SEQ'
00022fc6 00                       |        |		.CONST	0x0
00022fc7 02                       |        |		.CONST	0x2			; DIPROC address
00022fc8 01                       |        |		.CONST	0x1			; Output Parameters
00022fc9 00                       |        |		.CONST	0x0			; Input Parameters
00022fca 0e                       |        |		.CONST	0xe			; Out arg [2, 2, 1, 1, 3]
00022fcb 00                       |        |		.PAD	0x0
00022fcc					exp_READ_DECODE.SEQ(Sw_1, Sw_2, &Sr_2_1_1_1):
00022fcc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022fd2 00 10                    |        |		.CONST	0x0010			; Stack-delta
00022fd4 0f 52 45 41 44 5f 44 45  | READ_DE|		.TXT	15,'READ_DECODE.SEQ'
00022fe4 00                       |        |		.CONST	0x0
00022fe5 02                       |        |		.CONST	0x2			; DIPROC address
00022fe6 01                       |        |		.CONST	0x1			; Output Parameters
00022fe7 02                       |        |		.CONST	0x2			; Input Parameters
00022fe8 00                       |        |		.CONST	0x0			; In arg [1]
00022fe9 01                       |        |		.CONST	0x1			; In arg [2]
00022fea 0f                       |        |		.CONST	0xf			; Out arg [2, 1, 1, 1]
00022feb 00                       |        |		.PAD	0x0
00022fec					exp_READ_DEC.SEQ(&Sr_2_1_1_1):
00022fec 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022ff2 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00022ff4 0c 52 45 41 44 5f 44 45  | READ_DE|		.TXT	12,'READ_DEC.SEQ'
00023001 00                       |        |		.CONST	0x0
00023002 02                       |        |		.CONST	0x2			; DIPROC address
00023003 01                       |        |		.CONST	0x1			; Output Parameters
00023004 00                       |        |		.CONST	0x0			; Input Parameters
00023005 0f                       |        |		.CONST	0xf			; Out arg [2, 1, 1, 1]
00023006					exp_READ_CUR_UADR_AND_PARITY.SEQ(&Sr_2, &Fr):
00023006 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002300c 00 10                    |        |		.CONST	0x0010			; Stack-delta
0002300e 1c 52 45 41 44 5f 43 55  | READ_CU|		.TXT	28,'READ_CUR_UADR_AND_PARITY.SEQ'
0002302b 00                       |        |		.CONST	0x0
0002302c 02                       |        |		.CONST	0x2			; DIPROC address
0002302d 02                       |        |		.CONST	0x2			; Output Parameters
0002302e 00                       |        |		.CONST	0x0			; Input Parameters
0002302f 01                       |        |		.CONST	0x1			; Out arg [2]
00023030 08                       |        |		.CONST	0x8			; Out arg flag
00023031 00                       |        |		.PAD	0x0
00023032					exp_LOAD_COUNTER.SEQ(Sw_2):
00023032 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00023038 00 0a                    |        |		.CONST	0x000a			; Stack-delta
0002303a 10 4c 4f 41 44 5f 43 4f  | LOAD_CO|		.TXT	16,'LOAD_COUNTER.SEQ'
0002304b 00                       |        |		.CONST	0x0
0002304c 02                       |        |		.CONST	0x2			; DIPROC address
0002304d 00                       |        |		.CONST	0x0			; Output Parameters
0002304e 01                       |        |		.CONST	0x1			; Input Parameters
0002304f 01                       |        |		.CONST	0x1			; In arg [2]
00023050					exp_UNPERMUTE_UIR.TYP(Sw_8, &Sr_6):
00023050 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00023056 00 14                    |        |		.CONST	0x0014			; Stack-delta
00023058 11 55 4e 50 45 52 4d 55  | UNPERMU|		.TXT	17,'UNPERMUTE_UIR.TYP'
0002306a 00                       |        |		.CONST	0x0
0002306b 06                       |        |		.CONST	0x6			; DIPROC address
0002306c 01                       |        |		.CONST	0x1			; Output Parameters
0002306d 01                       |        |		.CONST	0x1			; Input Parameters
0002306e 07                       |        |		.CONST	0x7			; In arg [8]
0002306f 05                       |        |		.CONST	0x5			; Out arg [6]
00023070					exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr):
00023070 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00023076 00 14                    |        |		.CONST	0x0014			; Stack-delta
00023078 0c 52 45 41 44 5f 57 43  | READ_WC|		.TXT	12,'READ_WCS.TYP'
00023085 00                       |        |		.CONST	0x0
00023086 06                       |        |		.CONST	0x6			; DIPROC address
00023087 02                       |        |		.CONST	0x2			; Output Parameters
00023088 02                       |        |		.CONST	0x2			; Input Parameters
00023089 01                       |        |		.CONST	0x1			; In arg [2]
0002308a 00                       |        |		.CONST	0x0			; In arg [1]
0002308b 05                       |        |		.CONST	0x5			; Out arg [6]
0002308c 08                       |        |		.CONST	0x8			; Out arg flag
0002308d 00                       |        |		.PAD	0x0
0002308e					exp_READ_UIR.TYP(Sw_1, &Sr_6):
0002308e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00023094 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00023096 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.TYP'
000230a3 00                       |        |		.CONST	0x0
000230a4 06                       |        |		.CONST	0x6			; DIPROC address
000230a5 01                       |        |		.CONST	0x1			; Output Parameters
000230a6 01                       |        |		.CONST	0x1			; Input Parameters
000230a7 00                       |        |		.CONST	0x0			; In arg [1]
000230a8 05                       |        |		.CONST	0x5			; Out arg [6]
000230a9 00                       |        |		.PAD	0x0
000230aa					exp_LOAD_UIR.TYP(Sw_6, Sw_1):
000230aa 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000230b0 00 10                    |        |		.CONST	0x0010			; Stack-delta
000230b2 0c 4c 4f 41 44 5f 55 49  | LOAD_UI|		.TXT	12,'LOAD_UIR.TYP'
000230bf 00                       |        |		.CONST	0x0
000230c0 06                       |        |		.CONST	0x6			; DIPROC address
000230c1 00                       |        |		.CONST	0x0			; Output Parameters
000230c2 02                       |        |		.CONST	0x2			; Input Parameters
000230c3 05                       |        |		.CONST	0x5			; In arg [6]
000230c4 00                       |        |		.CONST	0x0			; In arg [1]
000230c5 00                       |        |		.PAD	0x0
000230c6					exp_LOAD_BENIGN_UWORD.TYP():
000230c6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000230cc 00 08                    |        |		.CONST	0x0008			; Stack-delta
000230ce 15 4c 4f 41 44 5f 42 45  | LOAD_BE|		.TXT	21,'LOAD_BENIGN_UWORD.TYP'
000230e4 00                       |        |		.CONST	0x0
000230e5 06                       |        |		.CONST	0x6			; DIPROC address
000230e6 00                       |        |		.CONST	0x0			; Output Parameters
000230e7 00                       |        |		.CONST	0x0			; Input Parameters
000230e8					exp_UNPERMUTE_UIR.VAL(Sw_8, &Sr_5):
000230e8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000230ee 00 14                    |        |		.CONST	0x0014			; Stack-delta
000230f0 11 55 4e 50 45 52 4d 55  | UNPERMU|		.TXT	17,'UNPERMUTE_UIR.VAL'
00023102 00                       |        |		.CONST	0x0
00023103 07                       |        |		.CONST	0x7			; DIPROC address
00023104 01                       |        |		.CONST	0x1			; Output Parameters
00023105 01                       |        |		.CONST	0x1			; Input Parameters
00023106 07                       |        |		.CONST	0x7			; In arg [8]
00023107 04                       |        |		.CONST	0x4			; Out arg [5]
00023108					exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr):
00023108 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002310e 00 14                    |        |		.CONST	0x0014			; Stack-delta
00023110 0c 52 45 41 44 5f 57 43  | READ_WC|		.TXT	12,'READ_WCS.VAL'
0002311d 00                       |        |		.CONST	0x0
0002311e 07                       |        |		.CONST	0x7			; DIPROC address
0002311f 02                       |        |		.CONST	0x2			; Output Parameters
00023120 02                       |        |		.CONST	0x2			; Input Parameters
00023121 01                       |        |		.CONST	0x1			; In arg [2]
00023122 00                       |        |		.CONST	0x0			; In arg [1]
00023123 04                       |        |		.CONST	0x4			; Out arg [5]
00023124 08                       |        |		.CONST	0x8			; Out arg flag
00023125 00                       |        |		.PAD	0x0
00023126					exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr):
00023126 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002312c 00 14                    |        |		.CONST	0x0014			; Stack-delta
0002312e 0c 52 45 41 44 5f 57 43  | READ_WC|		.TXT	12,'READ_WCS.IOC'
0002313b 00                       |        |		.CONST	0x0
0002313c 04                       |        |		.CONST	0x4			; DIPROC address
0002313d 02                       |        |		.CONST	0x2			; Output Parameters
0002313e 02                       |        |		.CONST	0x2			; Input Parameters
0002313f 01                       |        |		.CONST	0x1			; In arg [2]
00023140 00                       |        |		.CONST	0x0			; In arg [1]
00023141 01                       |        |		.CONST	0x1			; Out arg [2]
00023142 08                       |        |		.CONST	0x8			; Out arg flag
00023143 00                       |        |		.PAD	0x0
00023144					exp_READ_LAST_PC.IOC(&Sr_2):
00023144 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002314a 00 0c                    |        |		.CONST	0x000c			; Stack-delta
0002314c 10 52 45 41 44 5f 4c 41  | READ_LA|		.TXT	16,'READ_LAST_PC.IOC'
0002315d 00                       |        |		.CONST	0x0
0002315e 04                       |        |		.CONST	0x4			; DIPROC address
0002315f 01                       |        |		.CONST	0x1			; Output Parameters
00023160 00                       |        |		.CONST	0x0			; Input Parameters
00023161 01                       |        |		.CONST	0x1			; Out arg [2]
00023162 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
00023170 ; --------------------------------------------------------------------------------------
00023170 ; OMSI PASCAL Function
00023170 ;    <LVAR  0x008 1(r)>
00023170 ; --------------------------------------------------------------------------------------
00023170					PROG_FAIL:
00023170 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00023174 bf d5                    |        |		CMPA.L	(A5),A7
00023176 62 06                    |b       |		BHI	0x2317e
00023178 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002317c 4e 76                    |Nv      |		TRAPV
0002317e de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00023182 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00023186 41 fa ff e8              |A       |		LEA.L	PROG_FAIL,A0
0002318a 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002318c 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002318e 51 c8 ff fc              |Q       |		DBF	D0,0x2318c
00023192 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00023196 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023198 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
0002319c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000231a0 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
000231a4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000231aa 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000231ac 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000231b0 48 80                    |H       |		EXTB.W	D0
000231b2 48 c0                    |H       |		EXTW.L	D0
000231b4 2f 00                    |/       |		MOVE.L	D0,-(A7)
000231b6 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
000231bc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000231be 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000231c4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000231c6 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000231cc de fc 00 14              |        |		ADDA.W	#0x14,A7
000231d0 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000231d4 4e 5e                    |N^      |		UNLK	A6
000231d6 4e 75                    |Nu      |		RTS
000231d8 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_ '
000231e6 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_ '
000231f4 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_ '
00023202 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
00023214 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error. '
0002322c ; --------------------------------------------------------------------------------------
0002322c ; OMSI PASCAL Function
0002322c ;    <LVAR  0x00e 1(r)>
0002322c ;    <LVAR  0x00a 4(r)>
0002322c ;    <LVAR  0x008 1(r)>
0002322c ; --------------------------------------------------------------------------------------
0002322c					EXP_FAIL:
0002322c 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
00023230 bf d5                    |        |		CMPA.L	(A5),A7
00023232 62 06                    |b       |		BHI	0x2323a
00023234 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00023238 4e 76                    |Nv      |		TRAPV
0002323a de fc 00 74              |   t    |		ADDA.W	#0x74,A7
0002323e 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00023242 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00023248 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
0002324e 72 01                    |r       |		MOVEQ.L	#0x01,D1
00023250 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
00023252 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
00023254 78 12                    |x       |		MOVEQ.L	#0x12,D4
00023256 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
00023258 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
0002325e 41 fa ff b4              |A       |		LEA.L	0x23214,A0
00023262 70 08                    |p       |		MOVEQ.L	#0x08,D0
00023264 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00023266 51 c8 ff fc              |Q       |		DBF	D0,0x23264
0002326a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002326c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00023270 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023272 3f 04                    |?       |		MOVE.W	D4,-(A7)
00023274 4e 93                    |N       |		JSR	(A3)
00023276 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023278 4e 94                    |N       |		JSR	(A4)
0002327a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002327c 20 4f                    | O      |		MOVEA.L	A7,A0
0002327e 43 fa ff 58              |C  X    |		LEA.L	0x231d8,A1
00023282 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00023284 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023286 51 c8 ff fc              |Q       |		DBF	D0,0x23284
0002328a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002328c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023290 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023292 3f 02                    |?       |		MOVE.W	D2,-(A7)
00023294 4e 93                    |N       |		JSR	(A3)
00023296 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00023298 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
0002329c 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
000232a2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000232a4 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000232aa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000232ac 4e 94                    |N       |		JSR	(A4)
000232ae de c4                    |        |		ADDA.W	D4,A7
000232b0 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
000232b4 b0 c1                    |        |		CMPA.W	D1,A0
000232b6 67 48                    |gH      |		BEQ	0x23300
000232b8 9e c5                    |        |		SUBA.W	D5,A7
000232ba 22 4f                    |"O      |		MOVEA.L	A7,A1
000232bc 45 fa ff 28              |E  (    |		LEA.L	0x231e6,A2
000232c0 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000232c2 12 da                    |        |		MOVE.B	(A2)+,(A1)+
000232c4 51 c8 ff fc              |Q       |		DBF	D0,0x232c2
000232c8 9e c3                    |        |		SUBA.W	D3,A7
000232ca 22 4f                    |"O      |		MOVEA.L	A7,A1
000232cc 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
000232d0 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
000232d2 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000232d4 51 c8 ff fc              |Q       |		DBF	D0,0x232d2
000232d8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000232da 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
000232de 3f 01                    |?       |		MOVE.W	D1,-(A7)
000232e0 3f 02                    |?       |		MOVE.W	D2,-(A7)
000232e2 4e 93                    |N       |		JSR	(A3)
000232e4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000232e6 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000232ea 3f 01                    |?       |		MOVE.W	D1,-(A7)
000232ec 3f 03                    |?       |		MOVE.W	D3,-(A7)
000232ee 4e 93                    |N       |		JSR	(A3)
000232f0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000232f2 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000232f8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000232fa 4e 94                    |N       |		JSR	(A4)
000232fc de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00023300 9e c5                    |        |		SUBA.W	D5,A7
00023302 20 4f                    | O      |		MOVEA.L	A7,A0
00023304 43 fa fe ee              |C       |		LEA.L	0x231f4,A1
00023308 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002330a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002330c 51 c8 ff fc              |Q       |		DBF	D0,0x2330a
00023310 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00023312 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00023316 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023318 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002331a 4e 93                    |N       |		JSR	(A3)
0002331c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002331e 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
00023322 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
00023328 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002332a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00023330 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023332 4e 94                    |N       |		JSR	(A4)
00023334 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00023336 20 4f                    | O      |		MOVEA.L	A7,A0
00023338 43 fa fe da              |C       |		LEA.L	0x23214,A1
0002333c 70 16                    |p       |		MOVEQ.L	#0x16,D0
0002333e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00023340 51 c8 ff fc              |Q       |		DBF	D0,0x2333e
00023344 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00023348 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002334a 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002334e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00023350 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
00023354 4e 93                    |N       |		JSR	(A3)
00023356 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00023358 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002335e de c3                    |        |		ADDA.W	D3,A7
00023360 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00023364 4e 5e                    |N^      |		UNLK	A6
00023366 4e 75                    |Nu      |		RTS