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

⟦c66ce7992⟧ M200

    Length: 11264 (0x2c00)
    Types: M200
    Notes: @(#)NOVRAM,1.1,92/07/09,12:00:00, M200_PROGRAM
    Names: »NOVRAM.M200«

Derivation

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

Disassembly

0x20656


@ 20656
        <LVAR  0x00d 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
    <POP 20656-206be Body>                                              
        <POP 20656-2066c Prologue>                           Σ0         ↓
        <POP 2066c-2066e RegCacheLoad>                       Σ0         ↓
        <POP 2066e-206b6 Naked>                              Σ0         ↓
            <MI 2066e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20672  CLR.W   (A0)>                                            {}
            <MI 20674  CLR.L   D0>                                              {}
            <MI 20676  MOVE.B  (A6+0xc),D0>                                     {}
            <MI 2067a  MOVE.W  D0,D1>                                           {}
            <MI 2067c  ASR.W   #0x1,D1>                                         {}
            <MI 2067e  AND.B   #0x01,(A0+0x2)>                                  {}
            <MI 20682  LSL.B   #0x1,D1>                                         {}
            <MI 20684  OR.B    D1,(A0+0x2)>                                     {}
            <MI 20688  AND.W   #0x01,D0>                                        {}
            <MI 2068a  ASL.W   #0x3,D0>                                         {}
            <MI 2068c  CLR.L   D1>                                              {}
            <MI 2068e  MOVE.B  (A6+0xd),D1>                                     {}
            <MI 20692  MOVE.W  D1,D2>                                           {}
            <MI 20694  ASR.W   #0x5,D2>                                         {}
            <MI 20696  ANDI.W  #0x0007,D2>                                      {}
            <MI 2069a  ADD.W   D0,D2>                                           {}
            <MI 2069c  ANDI.W  #0xfe1f,(A0+0x2)>                                {}
            <MI 206a2  LSL.W   #0x5,D2>                                         {}
            <MI 206a4  OR.W    D2,(A0+0x2)>                                     {}
            <MI 206a8  ANDI.W  #0x001f,D1>                                      {}
            <MI 206ac  ANDI.B  #0xe0,(A0+0x3)>                                  {}
            <MI 206b2  OR.B    D1,(A0+0x3)>                                     {}
        <POP 206b6-206be Epilogue>                           Σ0         

0x206be


@ 206be
GetBoardName(&String, Byte)
        <LVAR  0x00a 4(w)>
        <LVAR  0x008 1(r)>
    <POP 206be-207fc Body>                                   Δ+48       
        <POP 206be-206d4 Prologue>                           Σ0         ↓
        <POP 206d4-206d6 RegCacheLoad>                       Σ0         ↓
        <POP 206d6-206e4 Naked>                              Σ0         ↓ →0x207c8
            <MI 206d6  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 206da  EXTB.W  D0>                                              {}
            <MI 206dc  CMPI.W  #0x000f,D0>                                      {}
            <MI 206e0  BHI     0x207c8>                                         {}
        <POP 206e4-206ee Naked>                              Σ0         →0x2079c →0x207c8 →0x20764 →0x20750 →0x2070e →0x207c8 →0x20724 →0x2073a →0x207c8 →0x207c8 →0x207c8 →0x207c8 →0x20778 →0x2078a →0x20790 →0x20796
            <MI 206e4  ADD.W   D0,D0>                                           {}
            <MI 206e6  SWITCH  D0.W>                                            {}
        <POP 2070e-20724 Naked>                              Σ0 Δ-4     →0x207da ←0x206e4
            <POP 2070e-20710 StackAdj>                       Δ-4                {[-4-]}
            <POP 20710-20711 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20711 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20714  MOVE.B  0x2012d,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2071a  MOVE.B  0x2012e,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20720  BRA     0x207da>                                         {[-2-]|[«2""»]}
        <POP 20724-2073a Naked>                              Σ0 Δ-4     →0x207da ←0x206e4
            <POP 20724-20726 StackAdj>                       Δ-4                {[-4-]}
            <POP 20726-20727 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20727 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 2072a  MOVE.B  0x20131,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20730  MOVE.B  0x20132,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20736  BRA     0x207da>                                         {[-2-]|[«2""»]}
        <POP 2073a-20750 Naked>                              Σ0 Δ-4     →0x207da ←0x206e4
            <POP 2073a-2073c StackAdj>                       Δ-4                {[-4-]}
            <POP 2073c-2073d StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x2073d [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20740  MOVE.B  0x20135,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20746  MOVE.B  0x20136,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 2074c  BRA     0x207da>                                         {[-2-]|[«2""»]}
        <POP 20750-20764 Naked>                              Σ0 Δ-4     →0x207da ←0x206e4
            <POP 20750-20752 StackAdj>                       Δ-4                {[-4-]}
            <POP 20752-20753 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20753 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20756  MOVE.B  0x20139,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 2075c  MOVE.B  0x2013a,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20762  BRA     0x207da>                                         {[-2-]|[«2""»]}
        <POP 20764-20778 Naked>                              Σ0 Δ-4     →0x207da ←0x206e4
            <POP 20764-20766 StackAdj>                       Δ-4                {[-4-]}
            <POP 20766-20767 StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20767 [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 2076a  MOVE.B  0x2013d,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20770  MOVE.B  0x2013e,(A7+0x2)>                                {[-2-]|[«2""»]}
            <MI 20776  BRA     0x207da>                                         {[-2-]|[«2""»]}
        <POP 20778-2077c Naked>                              Σ0 Δ-4     ↓ ←0x206e4
            <Blob 0x20778 [4] @>                             Δ-4                {[«4""»]}
        <POP 2077c-2078a Naked>                              Σ-4 Δ-12   →0x207e6 ←0x2078a ←0x20790 ←0x20796
            <POP 2077c-2077e StackAdj>                       Δ-4                {[-8-]}
            <Pointer.sp 0x2077e 4>                           Δ-4                {[-8-]|[^^4]}
            <Const 0x20782 0x1.2>                            Δ-2                {[-8-]|[^^4]|[#1]}
            <Const 0x20784 0x4.2>                            Δ-2                {[-8-]|[^^4]|[#1]|[#4]}
            <MI 20788  BRA     0x207e6>                                         {[-8-]|[^^4]|[#1]|[#4]}
        <POP 2078a-20790 Naked>                              Σ0 Δ-4     →0x2077c ←0x206e4
            <Blob 0x2078a [4] @>                             Δ-4                {[«4""»]}
            <MI 2078e  BRA     0x2077c>                                         {[«4""»]}
        <POP 20790-20796 Naked>                              Σ0 Δ-4     →0x2077c ←0x206e4
            <Blob 0x20790 [4] @>                             Δ-4                {[«4""»]}
            <MI 20794  BRA     0x2077c>                                         {[«4""»]}
        <POP 20796-2079c Naked>                              Σ0 Δ-4     →0x2077c ←0x206e4
            <Blob 0x20796 [4] @>                             Δ-4                {[«4""»]}
            <MI 2079a  BRA     0x2077c>                                         {[«4""»]}
        <POP 2079c-207c8 Naked>                              Σ0         →0x207f4 ←0x206e4
            <Blob 0x2079c [6] @>                             Δ-6                {[«6""»]}
            <POP 207ac-207ae StackAdj>                       Δ-4                {[«6""»]|[-4-]}
            <Lit 0x207ae 5>                                                     {[«6""»]|[$$RESHA]}
            <MI 207c0  MOVE.L  (A7)+,(A6+0xa)>               Δ+4                {[«6""»]}
            <POP 207c4-207c6 StackAdj>                       Δ+6                {}
            <MI 207c6  BRA     0x207f4>                                         {}
        <POP 207c8-207da Naked>                              Σ0 Δ-4     ↓ ←0x206d6 ←0x206e4 ←0x206e4 ←0x206e4 ←0x206e4 ←0x206e4 ←0x206e4
            <POP 207c8-207ca StackAdj>                       Δ-4                {[-4-]}
            <POP 207ca-207cb StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x207cb [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 207ce  MOVE.B  0x20157,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 207d4  MOVE.B  0x20158,(A7+0x2)>                                {[-2-]|[«2""»]}
        <POP 207da-207e6 Naked>                              Σ-4 Δ-12   ↓ ←0x2070e ←0x20724 ←0x2073a ←0x20750 ←0x20764
            <POP 207da-207dc StackAdj>                       Δ-4                {[-8-]}
            <Pointer.sp 0x207dc 4>                           Δ-4                {[-8-]|[^^4]}
            <Const 0x207e0 0x1.2>                            Δ-2                {[-8-]|[^^4]|[#1]}
            <Const 0x207e2 0x3.2>                            Δ-2                {[-8-]|[^^4]|[#1]|[#3]}
        <POP 207e6-207f4 Naked>                              Σ-16 Δ+16  ↓ ←0x2077c
            <Call 0x207e6 0x102c4>                                              {[-16-]}
                StringLit(Src : Pointer; Offset: W; Len : W) : String
            <POP 207ec-207ee StackAdj>                       Δ+8                {[-8-]}
            <MI 207ee  MOVE.L  (A7)+,(A6+0xa)>               Δ+4                {[-4-]}
            <POP 207f2-207f4 StackAdj>                       Δ+4                {}
        <POP 207f4-207fc Epilogue>                           Σ0         ←0x2079c

0x207fc


@ 207fc
        <LVAR  0x00c 2(w)>
        <LVAR  0x008 4(r)>
    <POP 207fc-2083c Body>                                              
        <POP 207fc-20812 Prologue>                           Σ0         ↓
        <POP 20812-20834 Naked>                              Σ0         ↓
            <POP 20812-20814 StackAdj>                       Δ-2                {[-2-]}
            <MI 20814  MOVE.L  (A6+0x8),-(A7)>               Δ-4                {[-2-]|[4, '(A6+0x8)']}
            <Call 0x20818 0x10592>                                              {[-2-]|[4, '(A6+0x8)']}
                ReadConfig(where : Long) : Word
            <POP 2081e-20820 StackAdj>                       Δ+4                {[-2-]}
            <MI 20820  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20822 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20826  MOVE.W  D0,D7>                                           {}
            <MI 20828  MOVE.W  D7,D0>                                           {}
            <MI 2082a  EXTW.L  D0>                                              {}
            <MI 2082c  ADD.L   D0,(A4+0x2)>                                     {}
            <MI 20830  MOVE.W  D0,(A6+0xc)>                                     {}
        <POP 20834-2083c Epilogue>                           Σ0         

0x2083c


@ 2083c
        <LVAR -0x006 4(rw)>
        <LVAR -0x007 1(w)>
        <LVAR -0x008 @ 1(w) 2(r)>
    <POP 2083c-20928 Body>                                              
        <POP 2083c-20852 Prologue>                           Σ0         ↓
        <POP 20852-20860 RegCacheLoad>                       Σ0         ↓
        <POP 20860-2091c Naked>                              Σ0         ↓ →0x20920
            <MI 20860  MOVE.L  #0x56,(A6-0x6)>                                  {}
            <POP 20868-2086a StackAdj>                       Δ-2                {[-2-]}
            <Const 0x2086a 0x101.4>                          Δ-4                {[-2-]|[##257]}
            <MI 2086e  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##257]}
            <Call 0x20870 0x207fc>                                              {[-2-]|[##257]}
            <POP 20872-20874 StackAdj>                       Δ+4                {[-2-]}
            <MI 20874  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20876 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20878  MOVE.W  D0,(A5+0x50)>                                    {}
            <POP 2087c-2087e StackAdj>                       Δ-2                {[-2-]}
            <Const 0x2087e 0x102.4>                          Δ-4                {[-2-]|[##258]}
            <MI 20882  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##258]}
            <Call 0x20884 0x207fc>                                              {[-2-]|[##258]}
            <POP 20886-20888 StackAdj>                       Δ+4                {[-2-]}
            <MI 20888  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <MI 2088a  ASL.W   #0x8,D0>                                         {}
            <POP 2088c-2088e StackAdj>                       Δ-2                {[-2-]}
            <Const 0x2088e 0x103.4>                          Δ-4                {[-2-]|[##259]}
            <MI 20892  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##259]}
            <Call 0x20894 0x207fc>                                              {[-2-]|[##259]}
            <POP 20896-20898 StackAdj>                       Δ+4                {[-2-]}
            <MI 20898  ADD.W   (A7)+,D0>                     Δ+2                {}
            <POP 0x2089a LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 208a2  MOVE.W  D0,(A5+0x52)>                                    {}
            <POP 208a6-208a8 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x208a8 0x104.4>                          Δ-4                {[-2-]|[##260]}
            <MI 208ac  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##260]}
            <Call 0x208ae 0x207fc>                                              {[-2-]|[##260]}
            <POP 208b0-208b2 StackAdj>                       Δ+4                {[-2-]}
            <MI 208b2  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x208b4 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 208b6  MOVE.W  D0,(A5+0x54)>                                    {}
            <POP 208ba-208bc StackAdj>                       Δ-2                {[-2-]}
            <Const 0x208bc 0x105.4>                          Δ-4                {[-2-]|[##261]}
            <MI 208c0  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##261]}
            <Call 0x208c2 0x207fc>                                              {[-2-]|[##261]}
            <POP 208c4-208c6 StackAdj>                       Δ+4                {[-2-]}
            <MI 208c6  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x208c8 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 208ca  MOVE.W  D0,(A5+0x56)>                                    {}
            <POP 208ce-208d0 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x208d0 0x106.4>                          Δ-4                {[-2-]|[##262]}
            <MI 208d4  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##262]}
            <Call 0x208d6 0x207fc>                                              {[-2-]|[##262]}
            <POP 208d8-208da StackAdj>                       Δ+4                {[-2-]}
            <MI 208da  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x208dc LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 208de  MOVE.B  D0,(A6-0x8)>                                     {}
            <POP 208e0-208e2 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x208e2 0x107.4>                          Δ-4                {[-2-]|[##263]}
            <MI 208e6  LEA.L   (A6-0x8),A4>                                     {[-2-]|[##263]}
            <Call 0x208e8 0x207fc>                                              {[-2-]|[##263]}
            <POP 208ea-208ec StackAdj>                       Δ+4                {[-2-]}
            <MI 208ec  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x208ee LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 208f0  MOVE.B  D0,(A6-0x7)>                                     {}
            <MI 208f4  MOVE.W  (A6-0x8),-(A7)>               Δ-2                {[2, '(A6-0x8)']}
            <MI 208f6  PEA.L   (A5+0x58)>                    Δ-4                {[2, '(A6-0x8)']|[4, '^(A5+0x58)']}
            <Call 0x208fa 0x20656>                                              {[2, '(A6-0x8)']|[4, '^(A5+0x58)']}
            <POP 208fe-20900 StackAdj>                       Δ+4                {[2, '(A6-0x8)']}
            <Const 0x20900 0x108.4>                          Δ-4                {[2, '(A6-0x8)']|[##264]}
            <MI 20904  LEA.L   (A6-0x8),A4>                                     {[2, '(A6-0x8)']|[##264]}
            <Call 0x20906 0x207fc>                                              {[2, '(A6-0x8)']|[##264]}
            <POP 20908-2090a StackAdj>                       Δ+4                {[2, '(A6-0x8)']}
            <MI 2090a  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x2090c LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2090e  MOVE.B  D0,(A6-0x8)>                                     {}
            <MI 20910  CLR.B   (A5+0x5c)>                                       {}
            <MI 20914  MOVE.L  (A6-0x6),D0>                                     {}
            <MI 20918  AND.L   #0xff,D0>                                        {}
            <MI 2091a  BNE     0x20920>                                         {}
        <POP 2091c-20920 Naked>                              Σ0         ↓
            <MI 2091c  ADDQ.B  #0x1,(A5+0x5c)>                                  {}
        <POP 20920-20928 Epilogue>                           Σ0         ←0x20860

0x20928


@ 20928
        <LVAR  0x00c 2(w)>
        <LVAR  0x008 4(r)>
        <LVAR -0x004 @ 2(r)>
    <POP 20928-20974 Body>                                              
        <POP 20928-2093e Prologue>                           Σ0         ↓
        <POP 2093e-20942 RegCacheLoad>                       Σ0         ↓
        <POP 20942-2096c Naked>                              Σ0         ↓
            <MI 20942  CLR.W   (A6-0x4)>                                        {}
            <MI 20944  MOVE.L  (A4),D0>                                         {}
            <MI 20946  ADD.L   (A6+0x8),D0>                                     {}
            <MI 2094a  MOVE.L  D0,-(A7)>                     Δ-4                {[4, 'D0']}
            <MI 2094c  LEA.L   (A6-0x4),A0>                                     {[4, 'D0']}
            <MI 2094e  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'D0']|[4, 'A0']}
            <MI 20950  ADDQ.L  #0x1,(A7)>                                       {[4, 'D0']|[-4-]}
            <Const 0x20952 0x1.2>                            Δ-2                {[4, 'D0']|[-4-]|[#1]}
            <Call 0x20956 0x10238>                                              {[4, 'D0']|[-4-]|[#1]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 2095c-20960 StackAdj>                       Δ+10               {}
            <MI 20960  MOVE.W  (A6-0x4),D0>                                     {}
            <MI 20962  EXTW.L  D0>                                              {}
            <MI 20964  ADD.L   D0,(A4+0x6)>                                     {}
            <MI 20968  MOVE.W  D0,(A6+0xc)>                                     {}
        <POP 2096c-20974 Epilogue>                           Σ0         

0x20974


@ 20974
        <LVAR -0x006 4(r)>
        <LVAR -0x007 1(w)>
        <LVAR -0x008 1(w) 2(r)>
        <LVAR -0x00c @ 4(w)>
    <POP 20974-20aa6 Body>                                              
        <POP 20974-2098a Prologue>                           Σ0         ↓
        <POP 2098a-2099c RegCacheLoad>                       Σ0         ↓
        <POP 2099c-209a8 Naked>                              Σ0         ↓ →0x209da
            <POP 2099c-2099e StackAdj>                       Δ-4                {[-4-]}
            <Call 0x2099e 0x22046>                                              {[-4-]}
            <MI 209a4  MOVE.L  (A7)+,(A6-0xc)>               Δ+4                {}
            <MI 209a6  BNE     0x209da>                                         {}
        <POP 209a8-209da Naked>                              Σ0         →0x20a9e
            <Blob 0x209a8 [32] @>                            Δ-32               {[«32""»]}
            <POP 209b4-209b6 StackAdj>                       Δ-4                {[«32""»]|[-4-]}
            <Lit 0x209b6 32>                                                    {[«32""»]|[$$*** invalid RESHA board info ptr]}
            <Call 0x209ca 0x103e0>                                              {[«32""»]|[$$*** invalid RESHA board info ptr]}
                WriteConsoleStringCrLf(str : String)
            <POP 209d0-209d4 StackAdj>                       Δ+36               {}
            <MI 209d4  CLR.B   (A5+0x24)>                                       {}
            <MI 209d6  BRA     0x20a9e>                                         {}
        <POP 209da-20a9c Naked>                              Σ0         ↓ →0x20a9e ←0x2099c
            <MI 209da  CLR.L   (A6-0x6)>                                        {}
            <POP 209de-209e0 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x209e0 0x0.4>                            Δ-4                {[-2-]|[##0]}
            <MI 209e4  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##0]}
            <Call 0x209e6 0x20928>                                              {[-2-]|[##0]}
            <POP 209e8-209ea StackAdj>                       Δ+4                {[-2-]}
            <MI 209ea  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x209ec LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 209ee  MOVE.W  D0,(A5+0x18)>                                    {}
            <POP 209f2-209f4 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x209f4 0x1.4>                            Δ-4                {[-2-]|[##1]}
            <MI 209f8  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##1]}
            <Call 0x209fa 0x20928>                                              {[-2-]|[##1]}
            <POP 209fc-209fe StackAdj>                       Δ+4                {[-2-]}
            <MI 209fe  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <MI 20a00  ASL.W   #0x8,D0>                                         {}
            <POP 20a02-20a04 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x20a04 0x2.4>                            Δ-4                {[-2-]|[##2]}
            <MI 20a08  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##2]}
            <Call 0x20a0a 0x20928>                                              {[-2-]|[##2]}
            <POP 20a0c-20a0e StackAdj>                       Δ+4                {[-2-]}
            <MI 20a0e  ADD.W   (A7)+,D0>                     Δ+2                {}
            <POP 0x20a10 LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 20a18  MOVE.W  D0,(A5+0x1a)>                                    {}
            <POP 20a1c-20a1e StackAdj>                       Δ-2                {[-2-]}
            <Const 0x20a1e 0x3.4>                            Δ-4                {[-2-]|[##3]}
            <MI 20a22  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##3]}
            <Call 0x20a24 0x20928>                                              {[-2-]|[##3]}
            <POP 20a26-20a28 StackAdj>                       Δ+4                {[-2-]}
            <MI 20a28  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20a2a LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20a2c  MOVE.W  D0,(A5+0x1c)>                                    {}
            <POP 20a30-20a32 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x20a32 0x4.4>                            Δ-4                {[-2-]|[##4]}
            <MI 20a36  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##4]}
            <Call 0x20a38 0x20928>                                              {[-2-]|[##4]}
            <POP 20a3a-20a3c StackAdj>                       Δ+4                {[-2-]}
            <MI 20a3c  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20a3e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20a40  MOVE.W  D0,(A5+0x1e)>                                    {}
            <POP 20a44-20a46 StackAdj>                       Δ-2                {[-2-]}
            <Const 0x20a46 0x5.4>                            Δ-4                {[-2-]|[##5]}
            <MI 20a4a  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##5]}
            <Call 0x20a4c 0x20928>                                              {[-2-]|[##5]}
            <POP 20a4e-20a50 StackAdj>                       Δ+4                {[-2-]}
            <MI 20a50  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20a52 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20a54  MOVE.B  D0,(A6-0x8)>                                     {}
            <POP 20a58-20a5a StackAdj>                       Δ-2                {[-2-]}
            <Const 0x20a5a 0x6.4>                            Δ-4                {[-2-]|[##6]}
            <MI 20a5e  LEA.L   (A6-0xc),A4>                                     {[-2-]|[##6]}
            <Call 0x20a60 0x20928>                                              {[-2-]|[##6]}
            <POP 20a62-20a64 StackAdj>                       Δ+4                {[-2-]}
            <MI 20a64  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20a66 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20a68  MOVE.B  D0,(A6-0x7)>                                     {}
            <MI 20a6c  MOVE.W  (A6-0x8),-(A7)>               Δ-2                {[2, '(A6-0x8)']}
            <MI 20a70  PEA.L   (A5+0x20)>                    Δ-4                {[2, '(A6-0x8)']|[4, '^(A5+0x20)']}
            <Call 0x20a74 0x20656>                                              {[2, '(A6-0x8)']|[4, '^(A5+0x20)']}
            <POP 20a78-20a7a StackAdj>                       Δ+4                {[2, '(A6-0x8)']}
            <Const 0x20a7a 0x7.4>                            Δ-4                {[2, '(A6-0x8)']|[##7]}
            <MI 20a7e  LEA.L   (A6-0xc),A4>                                     {[2, '(A6-0x8)']|[##7]}
            <Call 0x20a80 0x20928>                                              {[2, '(A6-0x8)']|[##7]}
            <POP 20a82-20a84 StackAdj>                       Δ+4                {[2, '(A6-0x8)']}
            <MI 20a84  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <POP 0x20a86 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 20a88  MOVE.B  D0,(A6-0x8)>                                     {}
            <MI 20a8c  CLR.B   (A5+0x24)>                                       {}
            <MI 20a8e  MOVE.L  (A6-0x6),D0>                                     {}
            <MI 20a92  AND.L   #0xff,D0>                                        {}
            <MI 20a94  CMPI.L  #0x000000aa,D0>                                  {}
            <MI 20a9a  BNE     0x20a9e>                                         {}
        <POP 20a9c-20a9e Naked>                              Σ0         ↓
            <MI 20a9c  ADDQ.B  #0x1,(A5+0x24)>                                  {}
        <POP 20a9e-20aa6 Epilogue>                           Σ0         ←0x209a8 ←0x209da

0x20aa6


@ 20aa6
        <LVAR  0x008 1(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x004 1(r)>
        <LVAR -0x005 @ 1(r)>
        <LVAR -0x006 @ 1(r)>
        <LVAR -0x007 @ 1(r)>
        <LVAR -0x008 1(r)>
        <LVAR -0x009 @ 1(r)>
        <LVAR -0x00a @ 1(r)>
    <POP 20aa6-20bd6 Body>                                   Δ+72       
        <POP 20aa6-20abc Prologue>                           Σ0         ↓
        <POP 20abc-20ad0 RegCacheLoad>                       Σ0         ↓
        <POP 20ad0-20aec Naked>                              Σ0         →0x20b38 →0x20b4e →0x20b08 →0x20b22 →0x20b64 →0x20b64 →0x20b64 →0x20b64
            <MI 20ad0  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 20ad4  EXTB.W  D0>                                              {}
            <MI 20ad6  MOVE.W  D0,D1>                                           {}
            <MI 20ad8  SUBQ.W  #0x2,D1>                                         {}
            <POP 0x20ada LimitCheck 0x0 ≤ D1 ≤ 0xd>                             {}
            <MI 20ae2  ADD.W   D1,D1>                                           {}
            <MI 20ae4  SWITCH  D1.W>                                            {}
        <POP 20b08-20b1c Naked>                              Σ0 Δ-24    ↓ ←0x20ad0
            <Pointer.fp 0x20b08 <LVAR -0x00a @ 1(r)>>        Δ-4                {[@@-10]}
            <Pointer.fp 0x20b0a <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20b0c <LVAR -0x007 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b0e <LVAR -0x006 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b10 <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b12 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b16 0x2223e>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
        <POP 20b1c-20b22 Naked>                              Σ-24 Δ+24  →0x20b7e ←0x20b22 ←0x20b38 ←0x20b4e
            <POP 20b1c-20b20 StackAdj>                       Δ+24               {}
            <MI 20b20  BRA     0x20b7e>                                         {}
        <POP 20b22-20b38 Naked>                              Σ0 Δ-24    →0x20b1c ←0x20ad0
            <Pointer.fp 0x20b22 <LVAR -0x00a @ 1(r)>>        Δ-4                {[@@-10]}
            <Pointer.fp 0x20b24 <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20b26 <LVAR -0x007 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b28 <LVAR -0x006 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b2a <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b2c <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b30 0x222c0>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <MI 20b36  BRA     0x20b1c>                                         {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
        <POP 20b38-20b4e Naked>                              Σ0 Δ-24    →0x20b1c ←0x20ad0
            <Pointer.fp 0x20b38 <LVAR -0x00a @ 1(r)>>        Δ-4                {[@@-10]}
            <Pointer.fp 0x20b3a <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20b3c <LVAR -0x007 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b3e <LVAR -0x006 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b40 <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b42 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b46 0x221ee>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <MI 20b4c  BRA     0x20b1c>                                         {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
        <POP 20b4e-20b64 Naked>                              Σ0 Δ-24    →0x20b1c ←0x20ad0
            <Pointer.fp 0x20b4e <LVAR -0x00a @ 1(r)>>        Δ-4                {[@@-10]}
            <Pointer.fp 0x20b50 <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20b52 <LVAR -0x007 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b54 <LVAR -0x006 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b56 <LVAR -0x005 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b58 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b5c 0x2216c>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <MI 20b62  BRA     0x20b1c>                                         {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
        <POP 20b64-20b7e Naked>                              Σ0         ↓ ←0x20ad0 ←0x20ad0 ←0x20ad0 ←0x20ad0
            <MI 20b64  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Pointer.fp 0x20b66 <LVAR -0x00a @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-10]}
            <Pointer.fp 0x20b68 <LVAR -0x009 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-10]|[@@-9]}
            <Pointer.fp 0x20b6a <LVAR -0x007 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b6c <LVAR -0x006 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b6e <LVAR -0x005 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b70 <LVAR -0x003 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b74 0x22466>                                              {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <POP 20b7a-20b7e StackAdj>                       Δ+26               {}
        <POP 20b7e-20bce Naked>                              Σ0         ↓ ←0x20b1c
            <MI 20b7e  MULS.W  #0xe,D0>                                         {}
            <MI 20b82  CLR.L   D1>                                              {}
            <MI 20b84  MOVE.B  (A6-0xa),D1>                                     {}
            <MI 20b86  MOVE.W  D1,(A5+D0.W+#0x18)>                              {}
            <MI 20b8a  CLR.L   D1>                                              {}
            <MI 20b8c  MOVE.B  (A6-0x9),D1>                                     {}
            <MI 20b8e  ASL.W   #0x8,D1>                                         {}
            <MI 20b90  CLR.L   D2>                                              {}
            <MI 20b92  MOVE.B  (A6-0x8),D2>                                     {}
            <MI 20b96  ADD.W   D1,D2>                                           {}
            <MI 20b98  MOVE.W  D2,(A5+D0.W+#0x1a)>                              {}
            <MI 20b9c  CLR.L   D1>                                              {}
            <MI 20b9e  MOVE.B  (A6-0x7),D1>                                     {}
            <MI 20ba0  MOVE.W  D1,(A5+D0.W+#0x1c)>                              {}
            <MI 20ba4  CLR.L   D1>                                              {}
            <MI 20ba6  MOVE.B  (A6-0x6),D1>                                     {}
            <MI 20ba8  MOVE.W  D1,(A5+D0.W+#0x1e)>                              {}
            <POP 20bac-20bae StackAdj>                       Δ-2                {[-2-]}
            <MI 20bae  MOVE.B  (A6-0x5),(A7)>                                   {[-2-]}
            <MI 20bb0  MOVE.B  (A6-0x4),(A7+0x1)>                               {[-2-]}
            <MI 20bb6  PEA.L   (A5+D0.W+#0x20)>              Δ-4                {[-2-]|[4, '^(A5+D0.W+#0x20)']}
            <Call 0x20bba 0x20656>                                              {[-2-]|[4, '^(A5+D0.W+#0x20)']}
            <POP 20bbe-20bc0 StackAdj>                       Δ+6                {}
            <MI 20bc0  MOVE.B  (A6-0x3),D1>                                     {}
            <MI 20bc4  EXTB.W  D1>                                              {}
            <POP 0x20bc6 LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {}
            <MI 20bca  MOVE.B  D1,(A5+D0.W+#0x24)>                              {}
        <POP 20bce-20bd6 Epilogue>                           Σ0         

0x20bd6


@ 20bd6
        <LVAR -0x006 @>
    <POP 20bd6-20cb6 Body>                                              
        <POP 20bd6-20bec Prologue>                           Σ0         ↓
        <POP 20bec-20bf0 RegCacheLoad>                       Σ0         ↓
        <POP 20bf0-20c10 Naked>                              Σ0         ↓
            <Call 0x20bf0 0x2083c>                                              {}
            <Const 0x20bf4 0x6.2>                            Δ-2                {[#6]}
            <Call 0x20bf8 0x20aa6>                                              {[#6]}
            <POP 20bfa-20bfb StackAdj>                       Δ+2                {}
            <Const 0x20bfb 0x7.2>                            Δ-2                {[#7]}
            <Call 0x20bfe 0x20aa6>                                              {[#7]}
            <POP 20c00-20c01 StackAdj>                       Δ+2                {}
            <Const 0x20c01 0x3.2>                            Δ-2                {[#3]}
            <Call 0x20c04 0x20aa6>                                              {[#3]}
            <POP 20c06-20c07 StackAdj>                       Δ+2                {}
            <Const 0x20c07 0x2.2>                            Δ-2                {[#2]}
            <Call 0x20c0a 0x20aa6>                                              {[#2]}
            <POP 20c0c-20c0e StackAdj>                       Δ+2                {}
            <MI 20c0e  MOVEQ.L #0x0c,D7>                                        {}
        <POP 20c10-20c20 Naked>                              Σ0         ↓ →0x20c26 ←0x20c26
            <POP 20c10-20c12 StackAdj>                       Δ-2                {[-2-]}
            <MI 20c12  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[2, 'D7']}
            <Call 0x20c14 0x104c0>                                              {[-2-]|[2, 'D7']}
                HasBoard(diproc_addr: Byte) : Byte
            <POP 20c1a-20c1c StackAdj>                       Δ+2                {[-2-]}
            <MI 20c1c  TST.B   (A7)+>                        Δ+2                {}
            <MI 20c1e  BEQ     0x20c26>                                         {}
        <POP 20c20-20c26 Naked>                              Σ0         ↓
            <MI 20c20  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x20c22 0x20aa6>                                              {[2, 'D7']}
            <POP 20c24-20c26 StackAdj>                       Δ+2                {}
        <POP 20c26-20c2e Naked>                              Σ0         ↓ →0x20c10 ←0x20c10
            <MI 20c26  ADDQ.B  #0x1,D7>                                         {}
            <MI 20c28  CMPI.B  #0x0f,D7>                                        {}
            <MI 20c2c  BLE     0x20c10>                                         {}
        <POP 20c2e-20c3a Naked>                              Σ0         ↓ →0x20c46
            <POP 20c2e-20c30 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x20c30 0x1060a>                                              {[-2-]}
                Is_fc07_four() : Bool
            <MI 20c36  TST.B   (A7)+>                        Δ+2                {}
            <MI 20c38  BNE     0x20c46>                                         {}
        <POP 20c3a-20c46 Naked>                              Σ0         ↓ →0x20cae
            <POP 20c3a-20c3c StackAdj>                       Δ-2                {[-2-]}
            <Call 0x20c3c 0x10604>                                              {[-2-]}
                Is_fc07_three() : Bool
            <MI 20c42  TST.B   (A7)+>                        Δ+2                {}
            <MI 20c44  BEQ     0x20cae>                                         {}
        <POP 20c46-20c66 Naked>                              Σ0         ↓ →0x20c98 ←0x20c2e
            <Const 0x20c46 0x0.4>                            Δ-4                {[##0]}
            <Pointer.fp 0x20c4a <LVAR -0x006 @>>             Δ-4                {[##0]|[@@-6]}
            <Call 0x20c4e 0x2209a>                                              {[##0]|[@@-6]}
            <POP 20c54-20c56 StackAdj>                       Δ+8                {}
            <Call 0x20c56 0x20974>                                              {}
            <POP 20c5a-20c5c StackAdj>                       Δ-4                {[-4-]}
            <Call 0x20c5c 0x22070>                                              {[-4-]}
            <MI 20c62  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 20c64  BNE     0x20c98>                                         {}
        <POP 20c66-20c98 Naked>                              Σ0         →0x20cae
            <Blob 0x20c66 [30] @>                            Δ-30               {[«30""»]}
            <POP 20c72-20c74 StackAdj>                       Δ-4                {[«30""»]|[-4-]}
            <Lit 0x20c74 30>                                                    {[«30""»]|[$$*** invalid TCP board info ptr]}
            <Call 0x20c88 0x103e0>                                              {[«30""»]|[$$*** invalid TCP board info ptr]}
                WriteConsoleStringCrLf(str : String)
            <POP 20c8e-20c92 StackAdj>                       Δ+34               {}
            <MI 20c92  CLR.L   (A5+0xf8)>                                       {}
            <MI 20c96  BRA     0x20cae>                                         {}
        <POP 20c98-20cae Naked>                              Σ0         ↓ ←0x20c46
            <MI 20c98  MOVE.L  D6,-(A7)>                     Δ-4                {[4, 'D6']}
            <MI 20c9a  LEA.L   (A5+0xf8),A0>                                    {[4, 'D6']}
            <MI 20c9e  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'D6']|[4, 'A0']}
            <Const 0x20ca0 0x4.2>                            Δ-2                {[4, 'D6']|[4, 'A0']|[#4]}
            <Call 0x20ca4 0x10238>                                              {[4, 'D6']|[4, 'A0']|[#4]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 20caa-20cae StackAdj>                       Δ+10               {}
        <POP 20cae-20cb6 Epilogue>                           Σ0         ←0x20c3a ←0x20c66

0x20cb6


@ 20cb6
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 2(r)>
    <POP 20cb6-20cec Body>                                              
        <POP 20cb6-20ccc Prologue>                           Σ0         ↓
        <POP 20ccc-20ce4 Naked>                              Σ0         ↓
            <MI 20ccc  MOVE.L  (A6+0xa),-(A7)>               Δ-4                {[4, '(A6+0xa)']}
            <MI 20cd0  MOVE.W  (A6+0x8),-(A7)>               Δ-2                {[4, '(A6+0xa)']|[2, '(A6+0x8)']}
            <Call 0x20cd4 0x10598>                                              {[4, '(A6+0xa)']|[2, '(A6+0x8)']}
                WriteConfig(what: Word; where : Long)
            <POP 20cda-20cdc StackAdj>                       Δ+6                {}
            <MI 20cdc  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 20ce0  EXTW.L  D0>                                              {}
            <MI 20ce2  ADD.L   D0,(A4)>                                         {}
        <POP 20ce4-20cec Epilogue>                           Σ0         

0x20cec


@ 20cec
        <LVAR  0x010 1(r)>
        <LVAR  0x00f 1(r)>
        <LVAR  0x00e 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x00a 1(r)>
        <LVAR  0x009 1(r)>
        <LVAR  0x008 1(r)>
        <LVAR -0x006 @ 4(rw)>
    <POP 20cec-20dae Body>                                              
        <POP 20cec-20d02 Prologue>                           Σ0         ↓
        <POP 20d02-20d0a RegCacheLoad>                       Σ0         ↓
        <POP 20d0a-20da6 Naked>                              Σ0         ↓
            <MI 20d0a  MOVE.L  #0x56,(A6-0x6)>                                  {}
            <Const 0x20d10 0x101.4>                          Δ-4                {[##257]}
            <MI 20d14  CLR.L   D0>                                              {[##257]}
            <MI 20d16  MOVE.B  (A6+0x10),D0>                                    {[##257]}
            <MI 20d1a  MOVE.W  D0,-(A7)>                     Δ-2                {[##257]|[2, 'D0']}
            <MI 20d1c  LEA.L   (A6-0x6),A4>                                     {[##257]|[2, 'D0']}
            <Call 0x20d1e 0x20cb6>                                              {[##257]|[2, 'D0']}
            <POP 20d20-20d22 StackAdj>                       Δ+6                {}
            <Const 0x20d22 0x102.4>                          Δ-4                {[##258]}
            <MI 20d26  CLR.L   D0>                                              {[##258]}
            <MI 20d28  MOVE.B  (A6+0xe),D0>                                     {[##258]}
            <MI 20d2c  MOVE.W  D0,-(A7)>                     Δ-2                {[##258]|[2, 'D0']}
            <MI 20d2e  LEA.L   (A6-0x6),A4>                                     {[##258]|[2, 'D0']}
            <Call 0x20d30 0x20cb6>                                              {[##258]|[2, 'D0']}
            <POP 20d32-20d34 StackAdj>                       Δ+6                {}
            <Const 0x20d34 0x103.4>                          Δ-4                {[##259]}
            <MI 20d38  CLR.L   D0>                                              {[##259]}
            <MI 20d3a  MOVE.B  (A6+0xf),D0>                                     {[##259]}
            <MI 20d3e  MOVE.W  D0,-(A7)>                     Δ-2                {[##259]|[2, 'D0']}
            <MI 20d40  LEA.L   (A6-0x6),A4>                                     {[##259]|[2, 'D0']}
            <Call 0x20d42 0x20cb6>                                              {[##259]|[2, 'D0']}
            <POP 20d44-20d46 StackAdj>                       Δ+6                {}
            <Const 0x20d46 0x104.4>                          Δ-4                {[##260]}
            <MI 20d4a  CLR.L   D0>                                              {[##260]}
            <MI 20d4c  MOVE.B  (A6+0xc),D0>                                     {[##260]}
            <MI 20d50  MOVE.W  D0,-(A7)>                     Δ-2                {[##260]|[2, 'D0']}
            <MI 20d52  LEA.L   (A6-0x6),A4>                                     {[##260]|[2, 'D0']}
            <Call 0x20d54 0x20cb6>                                              {[##260]|[2, 'D0']}
            <POP 20d56-20d58 StackAdj>                       Δ+6                {}
            <Const 0x20d58 0x105.4>                          Δ-4                {[##261]}
            <MI 20d5c  CLR.L   D0>                                              {[##261]}
            <MI 20d5e  MOVE.B  (A6+0xa),D0>                                     {[##261]}
            <MI 20d62  MOVE.W  D0,-(A7)>                     Δ-2                {[##261]|[2, 'D0']}
            <MI 20d64  LEA.L   (A6-0x6),A4>                                     {[##261]|[2, 'D0']}
            <Call 0x20d66 0x20cb6>                                              {[##261]|[2, 'D0']}
            <POP 20d68-20d6a StackAdj>                       Δ+6                {}
            <Const 0x20d6a 0x106.4>                          Δ-4                {[##262]}
            <MI 20d6e  CLR.L   D0>                                              {[##262]}
            <MI 20d70  MOVE.B  (A6+0x8),D0>                                     {[##262]}
            <MI 20d74  MOVE.W  D0,-(A7)>                     Δ-2                {[##262]|[2, 'D0']}
            <MI 20d76  LEA.L   (A6-0x6),A4>                                     {[##262]|[2, 'D0']}
            <Call 0x20d78 0x20cb6>                                              {[##262]|[2, 'D0']}
            <POP 20d7a-20d7c StackAdj>                       Δ+6                {}
            <Const 0x20d7c 0x107.4>                          Δ-4                {[##263]}
            <MI 20d80  CLR.L   D0>                                              {[##263]}
            <MI 20d82  MOVE.B  (A6+0x9),D0>                                     {[##263]}
            <MI 20d86  MOVE.W  D0,-(A7)>                     Δ-2                {[##263]|[2, 'D0']}
            <MI 20d88  LEA.L   (A6-0x6),A4>                                     {[##263]|[2, 'D0']}
            <Call 0x20d8a 0x20cb6>                                              {[##263]|[2, 'D0']}
            <POP 20d8c-20d8e StackAdj>                       Δ+6                {}
            <MI 20d8e  MOVE.L  (A6-0x6),D0>                                     {}
            <MI 20d90  NEG.L   D0>                                              {}
            <MI 20d92  ANDI.L  #0x000000ff,D0>                                  {}
            <MI 20d98  MOVE.W  D0,D7>                                           {}
            <Const 0x20d9a 0x108.4>                          Δ-4                {[##264]}
            <MI 20d9e  MOVE.W  D7,-(A7)>                     Δ-2                {[##264]|[2, 'D7']}
            <MI 20da0  LEA.L   (A6-0x6),A4>                                     {[##264]|[2, 'D7']}
            <Call 0x20da2 0x20cb6>                                              {[##264]|[2, 'D7']}
            <POP 20da4-20da6 StackAdj>                       Δ+6                {}
        <POP 20da6-20dae Epilogue>                           Σ0         

0x20dae


@ 20dae
        <LVAR -0x008 @ 4(r)>
    <POP 20dae-20f26 Body>                                              
        <POP 20dae-20dc4 Prologue>                           Σ0         ↓
        <POP 20dc4-20dd8 RegCacheLoad>                       Σ0         ↓
        <POP 20dd8-20e04 Naked>                              Σ0         ↓
            <Blob 0x20dd8 [54] @>                            Δ-54               {[«54""»]}
            <POP 20dea-20dec StackAdj>                       Δ-4                {[«54""»]|[-4-]}
            <Lit 0x20dec 53>                                                    {[«54""»]|[$$turn WRITE PROTECT switch OFF (on front of RESHA) ...]}
            <Call 0x20dfa 0x103d8>                                              {[«54""»]|[$$turn WRITE PROTECT switch OFF (on front of RESHA) ...]}
                WriteConsoleString(str : String)
            <POP 20e00-20e04 StackAdj>                       Δ+58               {}
        <POP 20e04-20e12 Naked>                              Σ0         ↓ →0x20e14 ←0x20e12
            <POP 20e04-20e06 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x20e06 0x21ff2>                                              {[-2-]}
            <MI 20e0c  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20e0e  CMP.B   #0x01,D0>                                        {}
            <MI 20e10  BNE     0x20e14>                                         {}
        <POP 20e12-20e14 Naked>                              Σ0         →0x20e04
            <MI 20e12  BRA     0x20e04>                                         {}
        <POP 20e14-20e40 Naked>                              Σ0         ↓ ←0x20e04
            <Const 0x20e14 0x4c4b.4>                         Δ-4                {[##19531]}
            <Call 0x20e18 0x10224>                                              {[##19531]}
                KC12_Sleep(dur: Long)
            <POP 20e1e-20e1f StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20e1f [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20e22  MOVE.B  0x201cf,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20e28  MOVE.B  0x201d0,(A7+0x2)>                                {[-2-]|[«2""»]}
            <POP 20e2e-20e30 StackAdj>                       Δ-4                {[-2-]|[«2""»]|[-4-]}
            <Lit 0x20e30>                                                       {[-2-]|[«2""»]|[$$…]}
                <Pointer.sp 0x20e30 4>                       Δ-4        
                <Const 0x20e34 0x1.2>                        Δ-2        
                <Const 0x20e36 0x3.2>                        Δ-2        
                <Call 0x20e38 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20e3a-20e3c StackAdj>                   Δ+8        
            <Call 0x20e3c 0x103e0>                                              {[-2-]|[«2""»]|[$$…]}
                WriteConsoleStringCrLf(str : String)
            <POP 20e3e-20e40 StackAdj>                       Δ+8                {}
        <POP 20e40-20e54 Naked>                              Σ0         ↓ →0x20ec0 ←0x20ec0
            <Const 0x20e40 0x0.4>                            Δ-4                {[##0]}
            <Pointer.fp 0x20e44 <LVAR -0x008 @ 4(r)>>        Δ-4                {[##0]|[@@-8]}
            <Call 0x20e46 0x220c2>                                              {[##0]|[@@-8]}
            <POP 20e4c-20e4e StackAdj>                       Δ+8                {}
            <MI 20e4e  MOVEQ.L #0x00,D7>                                        {}
            <MI 20e50  TST.L   (A6-0x8)>                                        {}
            <MI 20e52  BEQ     0x20ec0>                                         {}
        <POP 20e54-20e5e Naked>                              Σ0         ↓ →0x20ec0
            <MI 20e54  MOVE.L  (A6-0x8),D0>                                     {}
            <MI 20e56  CMPI.L  #0x00000002,D0>                                  {}
            <MI 20e5c  BEQ     0x20ec0>                                         {}
        <POP 20e5e-20ec0 Naked>                              Σ0         ↓
            <Blob 0x20e5e [32] @>                            Δ-32               {[«32""»]}
            <POP 20e6a-20e6c StackAdj>                       Δ-8                {[«32""»]|[-8-]}
            <Lit 0x20e6c 32>                                                    {[«32""»]|[-4-]|[$$*** ERROR code from REE_UPLOAD:_]}
            <MI 20e78  MOVE.L  (A6-0x8),(A7)>                                   {[«32""»]|[-4-]|[4, '(A6-0x8)']}
            <POP 20e76-20e78 StackAdj>                       Δ-8                {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-8-]}
            <Call 0x20e7a 0x102e4>                                              {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-8-]}
                Long2String(a : Long) : String
            <POP 20e80-20e82 StackAdj>                       Δ+4                {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-4-]}
            <Call 0x20e82 0x102d0>                                              {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20e88-20e8a StackAdj>                       Δ+8                {[«32""»]|[-4-]}
            <Call 0x20e8a 0x103e0>                                              {[«32""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <MI 20e8c  MOVEA.L A7,A0>                                           {[«32""»]|[-4-]}
            <MI 20e8e  LEA.L   0x201f2,A1>                                      {[«32""»]|[-4-]}
            <BlockMove 35,A1,A0>                                                {[«32""»]|[-4-]}
            <POP 20e9a-20e9c StackAdj>                       Δ-6                {[«32""»]|[-10-]}
            <Lit 0x20e9c>                                                       {[«32""»]|[-6-]|[$$…]}
                <Pointer.sp 0x20e9c 6>                       Δ-4        
                <Const 0x20ea0 0x1.2>                        Δ-2        
                <Const 0x20ea2 0x23.2>                       Δ-2        
                <Call 0x20ea6 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20ea8-20eaa StackAdj>                   Δ+8        
            <POP 20ea8-20eaa StackAdj>                       Δ-2                {[«32""»]|[-6-]|[$$…]|[-2-]}
            <POP 20eaa-20eab StackAdj>                       Δ+2                {[«32""»]|[-6-]|[$$…]}
            <Const 0x20eab 0x1.2>                            Δ-2                {[«32""»]|[-6-]|[$$…]|[#1]}
            <Call 0x20eac 0x103f0>                                              {[«32""»]|[-6-]|[$$…]|[#1]}
                AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
            <POP 20eb2-20eb4 StackAdj>                       Δ+6                {[«32""»]|[-6-]}
            <MI 20eb4  MOVE.B  (A7)+,D0>                     Δ+2                {[«32""»]|[-4-]}
            <MI 20eb6  EXTB.W  D0>                                              {[«32""»]|[-4-]}
            <POP 0x20eb8 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[«32""»]|[-4-]}
            <POP 20eba-20ebe StackAdj>                       Δ+36               {}
            <MI 20ebe  MOVE.B  D0,D7>                                           {}
        <POP 20ec0-20ec6 Naked>                              Σ0         ↓ →0x20e40 ←0x20e40 ←0x20e54
            <MI 20ec0  TST.B   D7>                                              {}
            <MI 20ec2  BNE     0x20e40>                                         {}
        <POP 20ec6-20eec Naked>                              Σ0         ↓
            <Blob 0x20ec6 [52] @>                            Δ-52               {[«52""»]}
            <POP 20ed2-20ed4 StackAdj>                       Δ-4                {[«52""»]|[-4-]}
            <Lit 0x20ed4 52>                                                    {[«52""»]|[$$turn WRITE PROTECT switch ON (on front of RESHA) ...]}
            <Call 0x20ee2 0x103d8>                                              {[«52""»]|[$$turn WRITE PROTECT switch ON (on front of RESHA) ...]}
                WriteConsoleString(str : String)
            <POP 20ee8-20eec StackAdj>                       Δ+56               {}
        <POP 20eec-20ef8 Naked>                              Σ0         ↓ →0x20efa ←0x20ef8
            <POP 20eec-20eee StackAdj>                       Δ-2                {[-2-]}
            <Call 0x20eee 0x21ff2>                                              {[-2-]}
            <MI 20ef4  TST.B   (A7)+>                        Δ+2                {}
            <MI 20ef6  BNE     0x20efa>                                         {}
        <POP 20ef8-20efa Naked>                              Σ0         →0x20eec
            <MI 20ef8  BRA     0x20eec>                                         {}
        <POP 20efa-20f1e Naked>                              Σ0         ↓ ←0x20eec
            <POP 20efa-20efc StackAdj>                       Δ-4                {[-4-]}
            <POP 20efc-20efd StackAdj>                       Δ+2                {[-2-]}
            <Blob 0x20efd [2] @>                             Δ-2                {[-2-]|[«2""»]}
            <MI 20f00  MOVE.B  0x2024b,(A7+0x1)>                                {[-2-]|[«2""»]}
            <MI 20f06  MOVE.B  0x2024c,(A7+0x2)>                                {[-2-]|[«2""»]}
            <POP 20f0c-20f0e StackAdj>                       Δ-4                {[-2-]|[«2""»]|[-4-]}
            <Lit 0x20f0e>                                                       {[-2-]|[«2""»]|[$$…]}
                <Pointer.sp 0x20f0e 4>                       Δ-4        
                <Const 0x20f12 0x1.2>                        Δ-2        
                <Const 0x20f14 0x3.2>                        Δ-2        
                <Call 0x20f16 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20f18-20f1a StackAdj>                   Δ+8        
            <Call 0x20f1a 0x103e0>                                              {[-2-]|[«2""»]|[$$…]}
                WriteConsoleStringCrLf(str : String)
            <POP 20f1c-20f1e StackAdj>                       Δ+8                {}
        <POP 20f1e-20f26 Epilogue>                           Σ0         

0x20f26


@ 20f26
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 2(r)>
    <POP 20f26-20f6c Body>                                              
        <POP 20f26-20f3c Prologue>                           Σ0         ↓
        <POP 20f3c-20f40 RegCacheLoad>                       Σ0         ↓
        <POP 20f40-20f64 Naked>                              Σ0         ↓
            <MI 20f40  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 20f42  ADDQ.L  #0x1,(A7)>                                       {[-4-]}
            <MI 20f44  MOVE.L  (A4),D0>                                         {[-4-]}
            <MI 20f46  ADD.L   (A6+0xa),D0>                                     {[-4-]}
            <MI 20f4a  MOVE.L  D0,-(A7)>                     Δ-4                {[-4-]|[4, 'D0']}
            <Const 0x20f4c 0x1.2>                            Δ-2                {[-4-]|[4, 'D0']|[#1]}
            <Call 0x20f50 0x10238>                                              {[-4-]|[4, 'D0']|[#1]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 20f56-20f5a StackAdj>                       Δ+10               {}
            <MI 20f5a  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 20f5e  EXTW.L  D0>                                              {}
            <MI 20f60  ADD.L   D0,(A4+0x4)>                                     {}
        <POP 20f64-20f6c Epilogue>                           Σ0         

0x20f6c


@ 20f6c
        <LVAR  0x010 1(r)>
        <LVAR  0x00f 1(r)>
        <LVAR  0x00e 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x00a 1(r)>
        <LVAR  0x009 1(r)>
        <LVAR  0x008 1(r)>
        <LVAR -0x006 4(rw)>
        <LVAR -0x00a @ 4(w)>
    <POP 20f6c-21072 Body>                                              
        <POP 20f6c-20f82 Prologue>                           Σ0         ↓
        <POP 20f82-20f8a RegCacheLoad>                       Σ0         ↓
        <POP 20f8a-20f96 Naked>                              Σ0         ↓ →0x20fc6
            <POP 20f8a-20f8c StackAdj>                       Δ-4                {[-4-]}
            <Call 0x20f8c 0x22046>                                              {[-4-]}
            <MI 20f92  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {}
            <MI 20f94  BNE     0x20fc6>                                         {}
        <POP 20f96-20fc6 Naked>                              Σ0         ↓
            <Blob 0x20f96 [28] @>                            Δ-28               {[«28""»]}
            <Const 0x20fa2 0xe.2>                            Δ-2                {[«28""»]|[#14]}
            <POP 20fa6-20fa8 StackAdj>                       Δ-4                {[«28""»]|[#14]|[-4-]}
            <Lit 0x20fa8 28>                                                    {[«28""»]|[#14]|[$$invalid RESHA board info ptr]}
            <Call 0x20fbc 0x103b8>                                              {[«28""»]|[#14]|[$$invalid RESHA board info ptr]}
                PopProgram(status : Byte; msg : String)
            <POP 20fc2-20fc6 StackAdj>                       Δ+34               {}
        <POP 20fc6-2106a Naked>                              Σ0         ↓ ←0x20f8a
            <MI 20fc6  MOVE.L  #0x56,(A6-0x6)>                                  {}
            <Const 0x20fce 0x0.4>                            Δ-4                {[##0]}
            <MI 20fd2  CLR.L   D0>                                              {[##0]}
            <MI 20fd4  MOVE.B  (A6+0x10),D0>                                    {[##0]}
            <MI 20fd8  MOVE.W  D0,-(A7)>                     Δ-2                {[##0]|[2, 'D0']}
            <MI 20fda  LEA.L   (A6-0xa),A4>                                     {[##0]|[2, 'D0']}
            <Call 0x20fdc 0x20f26>                                              {[##0]|[2, 'D0']}
            <POP 20fde-20fe0 StackAdj>                       Δ+6                {}
            <Const 0x20fe0 0x1.4>                            Δ-4                {[##1]}
            <MI 20fe4  CLR.L   D0>                                              {[##1]}
            <MI 20fe6  MOVE.B  (A6+0xe),D0>                                     {[##1]}
            <MI 20fea  MOVE.W  D0,-(A7)>                     Δ-2                {[##1]|[2, 'D0']}
            <MI 20fec  LEA.L   (A6-0xa),A4>                                     {[##1]|[2, 'D0']}
            <Call 0x20fee 0x20f26>                                              {[##1]|[2, 'D0']}
            <POP 20ff0-20ff2 StackAdj>                       Δ+6                {}
            <Const 0x20ff2 0x2.4>                            Δ-4                {[##2]}
            <MI 20ff6  CLR.L   D0>                                              {[##2]}
            <MI 20ff8  MOVE.B  (A6+0xf),D0>                                     {[##2]}
            <MI 20ffc  MOVE.W  D0,-(A7)>                     Δ-2                {[##2]|[2, 'D0']}
            <MI 20ffe  LEA.L   (A6-0xa),A4>                                     {[##2]|[2, 'D0']}
            <Call 0x21000 0x20f26>                                              {[##2]|[2, 'D0']}
            <POP 21002-21004 StackAdj>                       Δ+6                {}
            <Const 0x21004 0x3.4>                            Δ-4                {[##3]}
            <MI 21008  CLR.L   D0>                                              {[##3]}
            <MI 2100a  MOVE.B  (A6+0xc),D0>                                     {[##3]}
            <MI 2100e  MOVE.W  D0,-(A7)>                     Δ-2                {[##3]|[2, 'D0']}
            <MI 21010  LEA.L   (A6-0xa),A4>                                     {[##3]|[2, 'D0']}
            <Call 0x21012 0x20f26>                                              {[##3]|[2, 'D0']}
            <POP 21014-21016 StackAdj>                       Δ+6                {}
            <Const 0x21016 0x4.4>                            Δ-4                {[##4]}
            <MI 2101a  CLR.L   D0>                                              {[##4]}
            <MI 2101c  MOVE.B  (A6+0xa),D0>                                     {[##4]}
            <MI 21020  MOVE.W  D0,-(A7)>                     Δ-2                {[##4]|[2, 'D0']}
            <MI 21022  LEA.L   (A6-0xa),A4>                                     {[##4]|[2, 'D0']}
            <Call 0x21024 0x20f26>                                              {[##4]|[2, 'D0']}
            <POP 21026-21028 StackAdj>                       Δ+6                {}
            <Const 0x21028 0x5.4>                            Δ-4                {[##5]}
            <MI 2102c  CLR.L   D0>                                              {[##5]}
            <MI 2102e  MOVE.B  (A6+0x8),D0>                                     {[##5]}
            <MI 21032  MOVE.W  D0,-(A7)>                     Δ-2                {[##5]|[2, 'D0']}
            <MI 21034  LEA.L   (A6-0xa),A4>                                     {[##5]|[2, 'D0']}
            <Call 0x21036 0x20f26>                                              {[##5]|[2, 'D0']}
            <POP 21038-2103a StackAdj>                       Δ+6                {}
            <Const 0x2103a 0x6.4>                            Δ-4                {[##6]}
            <MI 2103e  CLR.L   D0>                                              {[##6]}
            <MI 21040  MOVE.B  (A6+0x9),D0>                                     {[##6]}
            <MI 21044  MOVE.W  D0,-(A7)>                     Δ-2                {[##6]|[2, 'D0']}
            <MI 21046  LEA.L   (A6-0xa),A4>                                     {[##6]|[2, 'D0']}
            <Call 0x21048 0x20f26>                                              {[##6]|[2, 'D0']}
            <POP 2104a-2104c StackAdj>                       Δ+6                {}
            <MI 2104c  MOVE.L  (A6-0x6),D0>                                     {}
            <MI 21050  NEG.L   D0>                                              {}
            <MI 21052  ANDI.L  #0x000000ff,D0>                                  {}
            <MI 21058  MOVE.W  D0,D7>                                           {}
            <Const 0x2105a 0x7.4>                            Δ-4                {[##7]}
            <MI 2105e  MOVE.W  D7,-(A7)>                     Δ-2                {[##7]|[2, 'D7']}
            <MI 21060  LEA.L   (A6-0xa),A4>                                     {[##7]|[2, 'D7']}
            <Call 0x21062 0x20f26>                                              {[##7]|[2, 'D7']}
            <POP 21064-21066 StackAdj>                       Δ+6                {}
            <Call 0x21066 0x20dae>                                              {}
        <POP 2106a-21072 Epilogue>                           Σ0         

0x21072


@ 21072
        <LVAR  0x008 1(r)>
        <LVAR -0x004 1(rw)>
        <LVAR -0x005 1(rw)>
        <LVAR -0x006 1(rw)>
        <LVAR -0x007 1(rw)>
        <LVAR -0x008 1(rw)>
        <LVAR -0x009 1(rw)>
        <LVAR -0x00a 1(rw)>
    <POP 21072-2123e Body>                                   Δ+50       
        <POP 21072-21088 Prologue>                           Σ0         ↓
        <POP 21088-210a0 RegCacheLoad>                       Σ0         ↓
        <POP 210a0-2111e Naked>                              Σ0         →0x2113e →0x211ec →0x211c8 →0x21164 →0x21184 →0x211a6 →0x21210 →0x21210 →0x21210 →0x21210
            <MI 210a0  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 210a4  EXTB.W  D0>                                              {}
            <MI 210a6  MOVEQ.L #0x0e,D1>                                        {}
            <MI 210a8  MULS.W  D0,D1>                                           {}
            <MI 210aa  MOVE.W  (A5+D1.W+#0x18),D2>                              {}
            <POP 0x210ae LimitCheck 0x0 ≤ D2 ≤ 0xff>                            {}
            <MI 210b0  MOVE.B  D2,(A6-0xa)>                                     {}
            <MI 210b2  MOVE.W  (A5+D1.W+#0x1a),D2>                              {}
            <MI 210b6  LSR.W   #0x8,D2>                                         {}
            <MI 210b8  MOVE.B  D2,(A6-0x9)>                                     {}
            <MI 210ba  MOVE.W  (A5+D1.W+#0x1a),D2>                              {}
            <MI 210be  AND.W   #0xff,D2>                                        {}
            <MI 210c0  MOVE.B  D2,(A6-0x8)>                                     {}
            <MI 210c2  MOVE.W  (A5+D1.W+#0x1c),D2>                              {}
            <POP 0x210c6 LimitCheck 0x0 ≤ D2 ≤ 0xff>                            {}
            <MI 210c8  MOVE.B  D2,(A6-0x7)>                                     {}
            <MI 210ca  MOVE.W  (A5+D1.W+#0x1e),D2>                              {}
            <POP 0x210ce LimitCheck 0x0 ≤ D2 ≤ 0xff>                            {}
            <MI 210d0  MOVE.B  D2,(A6-0x6)>                                     {}
            <MI 210d2  CLR.L   D2>                                              {}
            <MI 210d4  MOVE.B  (A5+D1.W+#0x22),D2>                              {}
            <MI 210d8  LSR.B   #0x1,D2>                                         {}
            <MI 210da  ASL.W   #0x1,D2>                                         {}
            <MI 210dc  MOVE.W  (A5+D1.W+#0x22),D3>                              {}
            <MI 210e0  LSL.W   #0x7,D3>                                         {}
            <MI 210e2  LSR.W   #0x8,D3>                                         {}
            <MI 210e4  LSR.W   #0x4,D3>                                         {}
            <MI 210e6  MOVE.W  D3,D4>                                           {}
            <MI 210e8  ASR.W   #0x3,D4>                                         {}
            <MI 210ea  ANDI.W  #0x0001,D4>                                      {}
            <MI 210ee  ADD.W   D2,D4>                                           {}
            <MI 210f0  MOVE.B  D4,(A6-0x5)>                                     {}
            <MI 210f4  ANDI.W  #0x0007,D3>                                      {}
            <MI 210f8  ASL.W   #0x5,D3>                                         {}
            <MI 210fa  CLR.L   D2>                                              {}
            <MI 210fc  MOVE.B  (A5+D1.W+#0x23),D2>                              {}
            <MI 21100  LSL.B   #0x3,D2>                                         {}
            <MI 21102  LSR.B   #0x3,D2>                                         {}
            <MI 21104  ADD.W   D3,D2>                                           {}
            <MI 21106  MOVE.B  D2,(A6-0x4)>                                     {}
            <MI 2110a  MOVE.W  D0,D1>                                           {}
            <POP 0x2110c LimitCheck 0x0 ≤ D1 ≤ 0xf>                             {}
            <MI 21114  ADD.W   D1,D1>                                           {}
            <MI 21116  SWITCH  D1.W>                                            {}
        <POP 2113e-2115c Naked>                              Σ0 Δ-10    ↓ ←0x210a0
            <MI 2113e  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, '(A6-0xa)']}
            <POP 21140-21142 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]}
            <MI 21142  MOVE.B  (A6-0x9),(A7)>                                   {[2, '(A6-0xa)']|[-2-]}
            <MI 21144  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]}
            <MI 21148  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 2114a  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 2114c-2114e StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 2114e  MOVE.B  (A6-0x5),(A7)>                                   {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21152  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x21158 0x20f6c>                                              {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
        <POP 2115c-21164 Naked>                              Σ-10 Δ+10  →0x21236 ←0x21164 ←0x21184 ←0x211a6 ←0x211c8 ←0x211ec
            <POP 2115c-21160 StackAdj>                       Δ+10               {}
            <MI 21160  BRA     0x21236>                                         {}
        <POP 21164-21184 Naked>                              Σ0 Δ-10    →0x2115c ←0x210a0
            <MI 21164  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, '(A6-0xa)']}
            <POP 21166-21168 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]}
            <MI 21168  MOVE.B  (A6-0x9),(A7)>                                   {[2, '(A6-0xa)']|[-2-]}
            <MI 2116a  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]}
            <MI 2116e  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 21170  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 21172-21174 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21174  MOVE.B  (A6-0x5),(A7)>                                   {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21178  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x2117e 0x20cec>                                              {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21182  BRA     0x2115c>                                         {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
        <POP 21184-211a6 Naked>                              Σ0 Δ-10    →0x2115c ←0x210a0
            <MI 21184  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, '(A6-0xa)']}
            <POP 21186-21188 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]}
            <MI 21188  MOVE.B  (A6-0x9),(A7)>                                   {[2, '(A6-0xa)']|[-2-]}
            <MI 2118a  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]}
            <MI 2118e  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 21190  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 21192-21194 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21194  MOVE.B  (A6-0x5),(A7)>                                   {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21198  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x2119e 0x22216>                                              {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
                exp_WRITE_NOVRAM_DATA.TYP(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
            <MI 211a4  BRA     0x2115c>                                         {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
        <POP 211a6-211c8 Naked>                              Σ0 Δ-10    →0x2115c ←0x210a0
            <MI 211a6  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, '(A6-0xa)']}
            <POP 211a8-211aa StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]}
            <MI 211aa  MOVE.B  (A6-0x9),(A7)>                                   {[2, '(A6-0xa)']|[-2-]}
            <MI 211ac  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]}
            <MI 211b0  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 211b2  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 211b4-211b6 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 211b6  MOVE.B  (A6-0x5),(A7)>                                   {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 211ba  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x211c0 0x22298>                                              {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
                exp_WRITE_NOVRAM_DATA.VAL(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
            <MI 211c6  BRA     0x2115c>                                         {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
        <POP 211c8-211ec Naked>                              Σ0 Δ-10    →0x2115c ←0x210a0
            <MI 211c8  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, '(A6-0xa)']}
            <POP 211ca-211cc StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]}
            <MI 211cc  MOVE.B  (A6-0x9),(A7)>                                   {[2, '(A6-0xa)']|[-2-]}
            <MI 211ce  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]}
            <MI 211d2  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 211d4  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 211d6-211d8 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 211d8  MOVE.B  (A6-0x5),(A7)>                                   {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 211dc  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x211e2 0x22112>                                              {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
                exp_WRITE_NOVRAM_DATA.FIU(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
            <MI 211e8  BRA     0x2115c>                                         {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
        <POP 211ec-21210 Naked>                              Σ0 Δ-10    →0x2115c ←0x210a0
            <MI 211ec  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, '(A6-0xa)']}
            <POP 211ee-211f0 StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]}
            <MI 211f0  MOVE.B  (A6-0x9),(A7)>                                   {[2, '(A6-0xa)']|[-2-]}
            <MI 211f2  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]}
            <MI 211f6  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 211f8  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 211fa-211fc StackAdj>                       Δ-2                {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 211fc  MOVE.B  (A6-0x5),(A7)>                                   {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21200  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x21206 0x22194>                                              {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
                exp_WRITE_NOVRAM_DATA.SEQ(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
            <MI 2120c  BRA     0x2115c>                                         {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
        <POP 21210-21236 Naked>                              Σ0         ↓ ←0x210a0 ←0x210a0 ←0x210a0 ←0x210a0
            <MI 21210  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <MI 21212  MOVE.B  (A6-0xa),-(A7)>               Δ-2                {[2, 'D0']|[2, '(A6-0xa)']}
            <POP 21214-21216 StackAdj>                       Δ-2                {[2, 'D0']|[2, '(A6-0xa)']|[-2-]}
            <MI 21216  MOVE.B  (A6-0x9),(A7)>                                   {[2, 'D0']|[2, '(A6-0xa)']|[-2-]}
            <MI 21218  MOVE.B  (A6-0x8),(A7+0x1)>                               {[2, 'D0']|[2, '(A6-0xa)']|[-2-]}
            <MI 2121c  MOVE.B  (A6-0x7),-(A7)>               Δ-2                {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']}
            <MI 2121e  MOVE.B  (A6-0x6),-(A7)>               Δ-2                {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']}
            <POP 21220-21222 StackAdj>                       Δ-2                {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21222  MOVE.B  (A6-0x5),(A7)>                                   {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <MI 21226  MOVE.B  (A6-0x4),(A7+0x1)>                               {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <Call 0x2122c 0x22346>                                              {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]}
            <POP 21232-21236 StackAdj>                       Δ+12               {}
        <POP 21236-2123e Epilogue>                           Σ0         ←0x2115c

0x2123e


@ 2123e
        <LVAR  0x018 2(w)>
        <LVAR  0x014 @ 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @ 4(rw)>
        <LVAR -0x00a @ 4(rw)>
        <LVAR -0x00c @ 1(rw)>
    <POP 2123e-21382 Body>                                              
        <POP 2123e-21254 Prologue>                           Σ0         ↓
        <POP 21254-2126e RegCacheLoad>                       Σ0         ↓
        <POP 2126e-212be Naked>                              Σ0         ↓ →0x212d0 ←0x21358
            <Blob 0x2126e [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x21272 [4] @>                             Δ-4                {[«2""»]|[«4""»]}
            <POP 21276-21278 StackAdj>                       Δ-12               {[«2""»]|[«4""»]|[-12-]}
            <MI 21278  MOVE.L  (A6+0x14),-(A7)>              Δ-4                {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x14)']}
            <Call 0x2127c 0x102cc>                                              {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x14)']}
                StringDup(a : String) : String
            <Lit 0x21282 2>                                                     {[«2""»]|[«4""»]|[-12-]|[$$ []}
            <MI 2128c  MOVE.L  (A6+0x10),(A7)>                                  {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']}
            <POP 2128a-2128c StackAdj>                       Δ-8                {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-8-]}
            <Call 0x21290 0x102e4>                                              {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-8-]}
                Long2String(a : Long) : String
            <Lit 0x21296 4>                                                     {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-4-]|[$$] :_]}
            <Call 0x212a2 0x102d8>                                              {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-4-]|[$$] :_]}
                StringCat4(a, b, c, d : String) : String
            <POP 212a8-212ac StackAdj>                       Δ+16               {[«2""»]|[«4""»]|[-8-]}
            <Call 0x212ac 0x103e4>                                              {[«2""»]|[«4""»]|[-8-]}
                AskConsoleString(prompt : String) : String
            <POP 212b2-212b4 StackAdj>                       Δ+4                {[«2""»]|[«4""»]|[-4-]}
            <MI 212b4  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {[«2""»]|[«4""»]}
            <POP 212b6-212b8 StackAdj>                       Δ+6                {}
            <MI 212b8  MOVEA.L (A6-0xa),A0>                                     {}
            <MI 212ba  TST.W   (A0)>                                            {}
            <MI 212bc  BNE     0x212d0>                                         {}
        <POP 212be-212d0 Naked>                              Σ0         →0x212f4
            <MI 212be  MOVE.B  #0x01,(A6-0xc)>                                  {}
            <MI 212c0  MOVE.L  (A6+0x10),(A6-0x6)>                              {}
            <Pointer.fp 0x212c4 <LVAR -0x00a @ 4(rw)>>       Δ-4                {[@@-10]}
            <Call 0x212c6 0x102bc>                                              {[@@-10]}
                FreeString(VAR a : String)
            <POP 212cc-212ce StackAdj>                       Δ+4                {}
            <MI 212ce  BRA     0x212f4>                                         {}
        <POP 212d0-212e2 Naked>                              Σ0         ↓ →0x212f4 ←0x2126e
            <MI 212d0  MOVE.L  (A6-0xa),-(A7)>               Δ-4                {[4, '(A6-0xa)']}
            <Pointer.fp 0x212d2 <LVAR -0x00c @ 1(rw)>>       Δ-4                {[4, '(A6-0xa)']|[@@-12]}
            <Pointer.fp 0x212d4 <LVAR -0x006 @ 4(rw)>>       Δ-4                {[4, '(A6-0xa)']|[@@-12]|[@@-6]}
            <Call 0x212d6 0x102ec>                                              {[4, '(A6-0xa)']|[@@-12]|[@@-6]}
                String2Long(src : String; VAR status : Bool; VAR retval : Long)
            <POP 212dc-212de StackAdj>                       Δ+12               {}
            <MI 212de  TST.B   (A6-0xc)>                                        {}
            <MI 212e0  BEQ     0x212f4>                                         {}
        <POP 212e2-212ec Naked>                              Σ0         ↓ →0x212f4
            <MI 212e2  CLR.B   (A6-0xc)>                                        {}
            <MI 212e4  MOVE.L  (A6-0x6),D0>                                     {}
            <MI 212e6  CMP.L   (A6+0xc),D0>                                     {}
            <MI 212ea  BLT     0x212f4>                                         {}
        <POP 212ec-212f2 Naked>                              Σ0         ↓ →0x212f4
            <MI 212ec  CMP.L   (A6+0x8),D0>                                     {}
            <MI 212f0  BGT     0x212f4>                                         {}
        <POP 212f2-212f4 Naked>                              Σ0         ↓
            <MI 212f2  ADDQ.B  #0x1,(A6-0xc)>                                   {}
        <POP 212f4-212f8 Naked>                              Σ0         ↓ →0x21358 ←0x212be ←0x212d0 ←0x212e2 ←0x212ec
            <MI 212f4  TST.B   (A6-0xc)>                                        {}
            <MI 212f6  BNE     0x21358>                                         {}
        <POP 212f8-21358 Naked>                              Σ0         ↓
            <Blob 0x212f8 [38] @>                            Δ-38               {[«38""»]}
            <Blob 0x21304 [4] @>                             Δ-4                {[«38""»]|[«4""»]}
            <Blob 0x21308 [2] @>                             Δ-2                {[«38""»]|[«4""»]|[«2""»]}
            <POP 2130c-2130e StackAdj>                       Δ-8                {[«38""»]|[«4""»]|[«2""»]|[-8-]}
            <Lit 0x2130e 38>                                                    {[«38""»]|[«4""»]|[«2""»]|[-4-]|[$$Please enter an integer in the range []}
            <MI 2131a  MOVE.L  (A6+0xc),(A7)>                                   {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']}
            <POP 21318-2131a StackAdj>                       Δ-8                {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
            <Call 0x2131e 0x102e4>                                              {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
                Long2String(a : Long) : String
            <Lit 0x21324 4>                                                     {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[$$ .._]}
            <MI 2132e  MOVE.L  (A6+0x8),(A7)>                                   {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']}
            <POP 2132c-2132e StackAdj>                       Δ-8                {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
            <Call 0x21332 0x102e4>                                              {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
                Long2String(a : Long) : String
            <Lit 0x21338 2>                                                     {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$] ]}
            <Call 0x21344 0x102dc>                                              {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$] ]}
                StringCat5(a, b, c, d, e : String) : String
            <POP 2134a-2134e StackAdj>                       Δ+20               {[«38""»]|[«4""»]|[«2""»]|[-4-]}
            <Call 0x2134e 0x103e0>                                              {[«38""»]|[«4""»]|[«2""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21354-21358 StackAdj>                       Δ+48               {}
        <POP 21358-2135e Naked>                              Σ0         ↓ →0x2126e ←0x212f4
            <MI 21358  TST.B   (A6-0xc)>                                        {}
            <MI 2135a  BEQ     0x2126e>                                         {}
        <POP 2135e-2137a Naked>                              Σ0         ↓
            <Pointer.fp 0x2135e <LVAR  0x014 @ 4(r)>>        Δ-4                {[@@20]}
            <Call 0x21362 0x102bc>                                              {[@@20]}
                FreeString(VAR a : String)
            <POP 21368-2136a StackAdj>                       Δ+4                {}
            <MI 2136a  MOVE.L  (A6-0x6),D0>                                     {}
            <POP 0x2136c LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {}
            <MI 21376  MOVE.W  D0,(A6+0x18)>                                    {}
        <POP 2137a-21382 Epilogue>                           Σ0         

0x21382


@ 21382
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x007 1(rw)>
        <LVAR -0x008 1(rw)>
        <LVAR -0x009 1(rw)>
        <LVAR -0x00a @ 1(rw)>
        <LVAR -0x00e @ 4(rw)>
        <LVAR -0x010 @ 1(rw)>
    <POP 21382-214e6 Body>                                              
        <POP 21382-21398 Prologue>                           Σ0         ↓
        <POP 21398-213ae RegCacheLoad>                       Σ0         ↓
        <POP 213ae-213d8 Naked>                              Σ0 Δ-4     ↓ ←0x214be
            <POP 213ae-213b0 StackAdj>                       Δ-4                {[-4-]}
            <MI 213b0  MOVEA.L (A6+0x8),A0>                                     {[-4-]}
            <POP 213b2-213b4 StackAdj>                       Δ-4                {[-8-]}
            <MI 213b4  MOVE.B  (A0),(A7)>                                       {[-8-]}
            <MI 213b6  MOVE.B  (A0+0x1),(A7+0x1)>                               {[-8-]}
            <MI 213bc  MOVE.B  (A0+0x2),(A7+0x2)>                               {[-8-]}
            <MI 213c2  MOVE.B  (A0+0x3),(A7+0x3)>                               {[-8-]}
            <Call 0x213c8 0x10308>                                              {[-8-]}
                TimeToText()
            <POP 213ce-213d0 StackAdj>                       Δ+4                {[-4-]}
            <MI 213d0  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {}
            <MI 213d2  MOVEA.L (A6-0xe),A0>                                     {}
            <MI 213d4  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 213d6  MOVEQ.L #0x0a,D7>                                        {[4, 'A0']}
        <POP 213d8-21400 Naked>                              Σ-4        ↓ →0x213d8 ←0x213d8
            <MI 213d8  MOVE.L  D7,D0>                                           {[-4-]}
            <MI 213da  SUB.L   #0x09,D0>                                        {[-4-]}
            <MI 213dc  SUBQ.L  #0x1,D0>                                         {[-4-]}
            <POP 0x213de LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[-4-]}
            <MI 213e4  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 213e6  MOVE.L  D7,D1>                                           {[-4-]}
            <MI 213e8  SUBQ.L  #0x1,D1>                                         {[-4-]}
            <POP 0x213ea LimitCheck 0x0 ≤ D1 ≤ 0x7d>                            {[-4-]}
            <MI 213f0  MOVE.B  (A0+D1.L+#0x2),(A0+D0.L+#0x2)>                   {[-4-]}
            <MI 213f6  ADDQ.L  #0x1,D7>                                         {[-4-]}
            <MI 213f8  CMPI.L  #0x00000012,D7>                                  {[-4-]}
            <MI 213fe  BLE     0x213d8>                                         {[-4-]}
        <POP 21400-21456 Naked>                              Σ-4 Δ+4    ↓ →0x2147e
            <MI 21400  MOVEA.L (A7),A0>                                         {[-4-]}
            <MI 21402  MOVE.W  #0x09,(A0)>                                      {[-4-]}
            <POP 21404-21406 StackAdj>                       Δ+2                {[-2-]}
            <POP 21406-21407 StackAdj>                       Δ+2                {}
            <Blob 0x21407 [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x2140a [4] @>                             Δ-4                {[«2""»]|[«4""»]}
            <POP 2140e-21410 StackAdj>                       Δ-12               {[«2""»]|[«4""»]|[-12-]}
            <MI 21410  MOVE.L  (A6+0xc),-(A7)>               Δ-4                {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0xc)']}
            <Call 0x21414 0x102cc>                                              {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0xc)']}
                StringDup(a : String) : String
            <Lit 0x2141a 2>                                                     {[«2""»]|[«4""»]|[-12-]|[$$ []}
            <POP 21426-21428 StackAdj>                       Δ-4                {[«2""»]|[«4""»]|[-12-]|[$$ []|[-4-]}
            <MI 21428  MOVE.L  (A6-0xe),(A7)>                                   {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']}
            <POP 2142a-2142c StackAdj>                       Δ-4                {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']|[-4-]}
            <Lit 0x2142c 4>                                                     {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']|[$$] :_]}
            <Call 0x2143a 0x102d8>                                              {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']|[$$] :_]}
                StringCat4(a, b, c, d : String) : String
            <POP 21440-21444 StackAdj>                       Δ+16               {[«2""»]|[«4""»]|[-8-]}
            <Call 0x21444 0x103e4>                                              {[«2""»]|[«4""»]|[-8-]}
                AskConsoleString(prompt : String) : String
            <POP 2144a-2144c StackAdj>                       Δ+4                {[«2""»]|[«4""»]|[-4-]}
            <MI 2144c  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {[«2""»]|[«4""»]}
            <POP 2144e-21450 StackAdj>                       Δ+6                {}
            <MI 21450  MOVEA.L (A6-0xe),A0>                                     {}
            <MI 21452  TST.W   (A0)>                                            {}
            <MI 21454  BNE     0x2147e>                                         {}
        <POP 21456-2147e Naked>                              Σ0         →0x214be
            <Pointer.fp 0x21456 <LVAR -0x00e @ 4(rw)>>       Δ-4                {[@@-14]}
            <Call 0x21458 0x102bc>                                              {[@@-14]}
                FreeString(VAR a : String)
            <POP 2145e-21460 StackAdj>                       Δ+4                {}
            <MI 21460  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 21462  MOVE.B  (A0),(A6-0xa)>                                   {}
            <MI 21466  MOVE.B  (A0+0x1),(A6-0x9)>                               {}
            <MI 2146c  MOVE.B  (A0+0x2),(A6-0x8)>                               {}
            <MI 21472  MOVE.B  (A0+0x3),(A6-0x7)>                               {}
            <MI 21478  MOVE.B  #0x01,(A6-0x10)>                                 {}
            <MI 2147c  BRA     0x214be>                                         {}
        <POP 2147e-214be Naked>                              Σ0         ↓ ←0x21400
            <Blob 0x2147e [10] @>                            Δ-10               {[«10""»]}
            <POP 21490-21492 StackAdj>                       Δ-8                {[«10""»]|[-8-]}
            <Lit 0x21492 9>                                                     {[«10""»]|[-4-]|[$$00:00:00_]}
            <POP 2149c-2149e StackAdj>                       Δ-4                {[«10""»]|[-4-]|[$$00:00:00_]|[-4-]}
            <MI 2149e  MOVE.L  (A6-0xe),(A7)>                                   {[«10""»]|[-4-]|[$$00:00:00_]|[4, '(A6-0xe)']}
            <Call 0x214a0 0x102d0>                                              {[«10""»]|[-4-]|[$$00:00:00_]|[4, '(A6-0xe)']}
                StringCat2(a, b : String) : String
            <POP 214a6-214a8 StackAdj>                       Δ+8                {[«10""»]|[-4-]}
            <MI 214a8  MOVE.L  (A7)+,(A6-0xe)>               Δ+4                {[«10""»]}
            <POP 214aa-214ac StackAdj>                       Δ+6                {[-4-]}
            <MI 214ac  MOVE.L  (A6-0xe),(A7)>                                   {[4, '(A6-0xe)']}
            <Pointer.fp 0x214ae <LVAR -0x00a @ 1(rw)>>       Δ-4                {[4, '(A6-0xe)']|[@@-10]}
            <Pointer.fp 0x214b2 <LVAR -0x010 @ 1(rw)>>       Δ-4                {[4, '(A6-0xe)']|[@@-10]|[@@-16]}
            <Call 0x214b6 0x10310>                                              {[4, '(A6-0xe)']|[@@-10]|[@@-16]}
                ConvertTimestamp(MOD input : String; b : L; VAR status : Bool)
            <POP 214bc-214be StackAdj>                       Δ+12               {}
        <POP 214be-214c6 Naked>                              Σ0         ↓ →0x213ae ←0x21456
            <MI 214be  TST.B   (A6-0x10)>                                       {}
            <MI 214c2  BEQ     0x213ae>                                         {}
        <POP 214c6-214de Naked>                              Σ0         ↓
            <MI 214c6  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 214c8  MOVE.B  (A6-0xa),(A0)>                                   {}
            <MI 214cc  MOVE.B  (A6-0x9),(A0+0x1)>                               {}
            <MI 214d2  MOVE.B  (A6-0x8),(A0+0x2)>                               {}
            <MI 214d8  MOVE.B  (A6-0x7),(A0+0x3)>                               {}
        <POP 214de-214e6 Epilogue>                           Σ0         

0x214e6


@ 214e6
ReEnterBoard(?)
        <LVAR  0x008 1(r)>
    <POP 214e6-2170e Body>                                              
        <POP 214e6-214fc Prologue>                           Σ0         ↓
        <POP 214fc-21516 RegCacheLoad>                       Σ0         ↓
        <POP 21516-21528 Naked>                              Σ0         ↓ →0x215ea
            <MI 21516  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 2151a  EXTB.W  D0>                                              {}
            <MI 2151c  MOVEQ.L #0x0e,D1>                                        {}
            <MI 2151e  MULS.W  D0,D1>                                           {}
            <MI 21520  TST.B   (A5+D1.W+#0x24)>                                 {}
            <MI 21524  BNE     0x215ea>                                         {}
        <POP 21528-2156e Naked>                              Σ0         ↓ →0x2157a
            <Blob 0x21528 [64] @>                            Δ-64               {[«64""»]}
            <POP 2153a-2153c StackAdj>                       Δ-8                {[«64""»]|[-8-]}
            <MI 2153c  MOVE.B  D0,-(A7)>                     Δ-2                {[«64""»]|[-8-]|[2, 'D0']}
            <Call 0x2153e 0x206be>                                              {[«64""»]|[-8-]|[2, 'D0']}
                GetBoardName(&String, Byte)
            <POP 21542-21544 StackAdj>                       Δ-2                {[«64""»]|[-8-]|[2, 'D0']|[-2-]}
            <Lit 0x21544 63>                                                    {[«64""»]|[-8-]|[$$ NOVRAM checksum error, enter new data, defaults are best guess]}
            <Call 0x21552 0x102d0>                                              {[«64""»]|[-8-]|[$$ NOVRAM checksum error, enter new data, defaults are best guess]}
                StringCat2(a, b : String) : String
            <POP 21558-2155a StackAdj>                       Δ+8                {[«64""»]|[-4-]}
            <Call 0x2155a 0x103e0>                                              {[«64""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21560-21564 StackAdj>                       Δ+66               {[-2-]}
            <Call 0x21564 0x1060a>                                              {[-2-]}
                Is_fc07_four() : Bool
            <MI 2156a  TST.B   (A7)+>                        Δ+2                {}
            <MI 2156c  BNE     0x2157a>                                         {}
        <POP 2156e-2157a Naked>                              Σ0         ↓ →0x21596
            <POP 2156e-21570 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x21570 0x10604>                                              {[-2-]}
                Is_fc07_three() : Bool
            <MI 21576  TST.B   (A7)+>                        Δ+2                {}
            <MI 21578  BEQ     0x21596>                                         {}
        <POP 2157a-21596 Naked>                              Σ0         →0x215d4 ←0x21528
            <MI 2157a  ASL.W   #0x1,D0>                                         {}
            <MI 2157c  LEA.L   0x205ec,A0>                                      {}
            <MI 21580  MOVE.W  (A0+D0.W),(A5+D1.W+#0x18)>                       {}
            <MI 21586  LEA.L   0x2060c,A0>                                      {}
            <MI 2158a  MOVE.W  (A0+D0.W),(A5+D1.W+#0x1c)>                       {}
            <MI 21590  LEA.L   0x2062c,A0>                                      {}
            <MI 21594  BRA     0x215d4>                                         {}
        <POP 21596-2159c Naked>                              Σ0         ↓ →0x215ba ←0x2156e
            <MI 21596  CMPI.B  #0x0c,D0>                                        {}
            <MI 2159a  BLT     0x215ba>                                         {}
        <POP 2159c-215a8 Naked>                              Σ0         ↓ →0x215ba
            <POP 2159c-2159e StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2159e 0x104cc>                                              {[-2-]}
                MemOnly2MB() : Bool
            <MI 215a4  TST.B   (A7)+>                        Δ+2                {}
            <MI 215a6  BNE     0x215ba>                                         {}
        <POP 215a8-215ba Naked>                              Σ0         →0x215da
            <MI 215a8  MOVE.W  #0x7,(A5+D1.W+#0x18)>                            {}
            <MI 215ae  MOVE.W  #0x2,(A5+D1.W+#0x1c)>                            {}
            <MI 215b4  CLR.W   (A5+D1.W+#0x1e)>                                 {}
            <MI 215b8  BRA     0x215da>                                         {}
        <POP 215ba-215d4 Naked>                              Σ0         ↓ ←0x21596 ←0x2159c
            <MI 215ba  ASL.W   #0x1,D0>                                         {}
            <MI 215bc  LEA.L   0x2058c,A0>                                      {}
            <MI 215c0  MOVE.W  (A0+D0.W),(A5+D1.W+#0x18)>                       {}
            <MI 215c6  LEA.L   0x205ac,A0>                                      {}
            <MI 215ca  MOVE.W  (A0+D0.W),(A5+D1.W+#0x1c)>                       {}
            <MI 215d0  LEA.L   0x205cc,A0>                                      {}
        <POP 215d4-215da Naked>                              Σ0         ↓ ←0x2157a
            <MI 215d4  MOVE.W  (A0+D0.W),(A5+D1.W+#0x1e)>                       {}
        <POP 215da-215ea Naked>                              Σ0         ↓ ←0x215a8
            <MI 215da  CLR.W   (A5+D1.W+#0x1a)>                                 {}
            <MI 215de  PEA.L   (A5+D1.W+#0x20)>              Δ-4                {[4, '^(A5+D1.W+#0x20)']}
            <Call 0x215e2 0x10304>                                              {[4, '^(A5+D1.W+#0x20)']}
                GetRtc() : TimeStamp
            <POP 215e8-215ea StackAdj>                       Δ+4                {}
        <POP 215ea-21706 Naked>                              Σ0         ↓ ←0x21516
            <Blob 0x215ea [18] @>                            Δ-18               {[«18""»]}
            <POP 215fa-215fc StackAdj>                       Δ-6                {[«18""»]|[-6-]}
            <Lit 0x215fc 17>                                                    {[«18""»]|[-2-]|[$$Enter part number]}
            <MI 2160a  MOVE.W  (A5+D1.W+#0x18),D0>                              {[«18""»]|[-2-]|[$$Enter part number]}
            <MI 2160e  EXTW.L  D0>                                              {[«18""»]|[-2-]|[$$Enter part number]}
            <MI 21610  MOVE.L  D0,-(A7)>                     Δ-4                {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']}
            <Const 0x21612 0x0.4>                            Δ-4                {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']|[##0]}
            <Const 0x21614 0xff.4>                           Δ-4                {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']|[##0]|[##255]}
            <Call 0x21618 0x2123e>                                              {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']|[##0]|[##255]}
            <POP 2161a-2161c StackAdj>                       Δ+16               {[«18""»]|[-2-]}
            <MI 2161c  MOVE.W  (A7)+,D0>                     Δ+2                {[«18""»]}
            <POP 0x2161e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {[«18""»]}
            <POP 21620-21622 StackAdj>                       Δ+18               {}
            <MI 21622  MOVE.W  D0,(A5+D1.W+#0x18)>                              {}
            <Blob 0x21626 [20] @>                            Δ-20               {[«20""»]}
            <POP 21636-21638 StackAdj>                       Δ-6                {[«20""»]|[-6-]}
            <Lit 0x21638 19>                                                    {[«20""»]|[-2-]|[$$Enter serial number]}
            <MI 21646  CLR.L   D0>                                              {[«20""»]|[-2-]|[$$Enter serial number]}
            <MI 21648  MOVE.W  (A5+D1.W+#0x1a),D0>                              {[«20""»]|[-2-]|[$$Enter serial number]}
            <MI 2164c  MOVE.L  D0,-(A7)>                     Δ-4                {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']}
            <Const 0x2164e 0x0.4>                            Δ-4                {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']|[##0]}
            <Const 0x21650 0x7fff.4>                         Δ-4                {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']|[##0]|[##32767]}
            <Call 0x21654 0x2123e>                                              {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']|[##0]|[##32767]}
            <POP 21656-21658 StackAdj>                       Δ+16               {[«20""»]|[-2-]}
            <MI 21658  MOVE.W  (A7)+,(A5+D1.W+#0x1a)>        Δ+2                {[«20""»]}
            <POP 2165c-2165e StackAdj>                       Δ+20               {}
            <Blob 0x2165e [22] @>                            Δ-22               {[«22""»]}
            <POP 2166a-2166c StackAdj>                       Δ-6                {[«22""»]|[-6-]}
            <Lit 0x2166c 22>                                                    {[«22""»]|[-2-]|[$$Enter artwork revision]}
            <MI 2167a  MOVE.W  (A5+D1.W+#0x1c),D0>                              {[«22""»]|[-2-]|[$$Enter artwork revision]}
            <MI 2167e  EXTW.L  D0>                                              {[«22""»]|[-2-]|[$$Enter artwork revision]}
            <MI 21680  MOVE.L  D0,-(A7)>                     Δ-4                {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']}
            <Const 0x21682 0x0.4>                            Δ-4                {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']|[##0]}
            <Const 0x21684 0xff.4>                           Δ-4                {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']|[##0]|[##255]}
            <Call 0x21688 0x2123e>                                              {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']|[##0]|[##255]}
            <POP 2168a-2168c StackAdj>                       Δ+16               {[«22""»]|[-2-]}
            <MI 2168c  MOVE.W  (A7)+,D0>                     Δ+2                {[«22""»]}
            <POP 0x2168e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {[«22""»]}
            <POP 21690-21694 StackAdj>                       Δ+22               {}
            <MI 21694  MOVE.W  D0,(A5+D1.W+#0x1c)>                              {}
            <Blob 0x21698 [16] @>                            Δ-16               {[«16""»]}
            <POP 216a8-216aa StackAdj>                       Δ-6                {[«16""»]|[-6-]}
            <Lit 0x216aa 15>                                                    {[«16""»]|[-2-]|[$$Enter ECO level]}
            <MI 216b8  MOVE.W  (A5+D1.W+#0x1e),D0>                              {[«16""»]|[-2-]|[$$Enter ECO level]}
            <MI 216bc  EXTW.L  D0>                                              {[«16""»]|[-2-]|[$$Enter ECO level]}
            <MI 216be  MOVE.L  D0,-(A7)>                     Δ-4                {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']}
            <Const 0x216c0 0x0.4>                            Δ-4                {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']|[##0]}
            <Const 0x216c2 0xff.4>                           Δ-4                {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']|[##0]|[##255]}
            <Call 0x216c6 0x2123e>                                              {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']|[##0]|[##255]}
            <POP 216c8-216ca StackAdj>                       Δ+16               {[«16""»]|[-2-]}
            <MI 216ca  MOVE.W  (A7)+,D0>                     Δ+2                {[«16""»]}
            <POP 0x216cc LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {[«16""»]}
            <POP 216ce-216d0 StackAdj>                       Δ+16               {}
            <MI 216d0  MOVE.W  D0,(A5+D1.W+#0x1e)>                              {}
            <Blob 0x216d4 [30] @>                            Δ-30               {[«30""»]}
            <POP 216e6-216e8 StackAdj>                       Δ-4                {[«30""»]|[-4-]}
            <Lit 0x216e8 29>                                                    {[«30""»]|[$$Enter build date as DD-MMM-YY]}
            <MI 216f6  PEA.L   (A5+D1.W+#0x20)>              Δ-4                {[«30""»]|[$$Enter build date as DD-MMM-YY]|[4, '^(A5+D1.W+#0x20)']}
            <Call 0x216fa 0x21382>                                              {[«30""»]|[$$Enter build date as DD-MMM-YY]|[4, '^(A5+D1.W+#0x20)']}
            <POP 216fe-21702 StackAdj>                       Δ+38               {}
            <MI 21702  MOVE.B  #0x01,(A5+D1.W+#0x24)>                           {}
        <POP 21706-2170e Epilogue>                           Σ0         

0x2170e


@ 2170e
    <POP 2170e-21894 Body>                                              
        <POP 2170e-21724 Prologue>                           Σ0         ↓
        <POP 21724-21738 RegCacheLoad>                       Σ0         ↓
        <POP 21738-217ea Naked>                              Σ0         ↓ →0x217f6
            <Blob 0x21738 [12] @>                            Δ-12               {[«12""»]}
            <POP 21748-2174a StackAdj>                       Δ-4                {[«12""»]|[-4-]}
            <Lit 0x2174a 11>                                                    {[«12""»]|[$$Boards are:]}
            <Call 0x21758 0x103e0>                                              {[«12""»]|[$$Boards are:]}
                WriteConsoleStringCrLf(str : String)
            <POP 2175a-2175c StackAdj>                       Δ+16               {}
            <Blob 0x2175c [26] @>                            Δ-26               {[«26""»]}
            <POP 21768-2176a StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2176a 26>                                                    {[«26""»]|[$$    0 => TYP      1 => VAL]}
            <Call 0x21776 0x103e0>                                              {[«26""»]|[$$    0 => TYP      1 => VAL]}
                WriteConsoleStringCrLf(str : String)
            <POP 21778-2177c StackAdj>                       Δ+30               {}
            <Blob 0x2177c [26] @>                            Δ-26               {[«26""»]}
            <POP 21788-2178a StackAdj>                       Δ-4                {[«26""»]|[-4-]}
            <Lit 0x2178a 26>                                                    {[«26""»]|[$$    2 => SEQ      3 => FIU]}
            <Call 0x21796 0x103e0>                                              {[«26""»]|[$$    2 => SEQ      3 => FIU]}
                WriteConsoleStringCrLf(str : String)
            <POP 21798-21799 StackAdj>                       Δ+30       ↓       {}
            <Blob 0x21799 [28] @>                            Δ-28               {[«28""»]}
            <POP 217a8-217aa StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x217aa 27>                                                    {[«28""»]|[$$    4 => MEM0     5 => MEM1]}
            <Call 0x217b8 0x103e0>                                              {[«28""»]|[$$    4 => MEM0     5 => MEM1]}
                WriteConsoleStringCrLf(str : String)
            <POP 217ba-217bb StackAdj>                       Δ+32       ↓       {}
            <Blob 0x217bb [28] @>                            Δ-28               {[«28""»]}
            <POP 217ca-217cc StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x217cc 27>                                                    {[«28""»]|[$$    6 => MEM2     7 => MEM3]}
            <Call 0x217da 0x103e0>                                              {[«28""»]|[$$    6 => MEM2     7 => MEM3]}
                WriteConsoleStringCrLf(str : String)
            <POP 217dc-217e0 StackAdj>                       Δ+30               {[-2-]}
            <Call 0x217e0 0x1060a>                                              {[-2-]}
                Is_fc07_four() : Bool
            <MI 217e6  TST.B   (A7)+>                        Δ+2                {}
            <MI 217e8  BNE     0x217f6>                                         {}
        <POP 217ea-217f6 Naked>                              Σ0         ↓ →0x2181c
            <POP 217ea-217ec StackAdj>                       Δ-2                {[-2-]}
            <Call 0x217ec 0x10604>                                              {[-2-]}
                Is_fc07_three() : Bool
            <MI 217f2  TST.B   (A7)+>                        Δ+2                {}
            <MI 217f4  BEQ     0x2181c>                                         {}
        <POP 217f6-2181c Naked>                              Σ0         →0x2183c ←0x21738
            <Blob 0x217f6 [28] @>                            Δ-28               {[«28""»]}
            <POP 21802-21804 StackAdj>                       Δ-4                {[«28""»]|[-4-]}
            <Lit 0x21804 28>                                                    {[«28""»]|[$$    8 => IOC      9 => RESHA]}
            <Call 0x21812 0x103e0>                                              {[«28""»]|[$$    8 => IOC      9 => RESHA]}
                WriteConsoleStringCrLf(str : String)
            <POP 21814-21818 StackAdj>                       Δ+32               {}
            <MI 21818  MOVEQ.L #0x09,D7>                                        {}
            <MI 2181a  BRA     0x2183c>                                         {}
        <POP 2181c-2183c Naked>                              Σ0         ↓ ←0x217ea
            <Blob 0x2181c [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21820 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x21824 [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 21828-2182a StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x2182a 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[$$    8 => IOC]}
            <Call 0x21836 0x103e0>                                              {[«4""»]|[«4""»]|[«4""»]|[$$    8 => IOC]}
                WriteConsoleStringCrLf(str : String)
            <POP 21838-2183a StackAdj>                       Δ+16               {}
            <MI 2183a  MOVEQ.L #0x08,D7>                                        {}
        <POP 2183c-2188c Naked>                              Σ0         ↓ ←0x217f6
            <Blob 0x2183c [14] @>                            Δ-14               {[«14""»]}
            <POP 21848-2184a StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x2184a 14>                                                    {[«14""»]|[-4-]|[$$Enter board :_]}
            <Const 0x21858 0x0.4>                            Δ-4                {[«14""»]|[-4-]|[$$Enter board :_]|[##0]}
            <MI 2185c  MOVE.L  D7,-(A7)>                     Δ-4                {[«14""»]|[-4-]|[$$Enter board :_]|[##0]|[4, 'D7']}
            <Call 0x2185e 0x103ec>                                              {[«14""»]|[-4-]|[$$Enter board :_]|[##0]|[4, 'D7']}
                AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
            <POP 21864-21866 StackAdj>                       Δ+12               {[«14""»]|[-4-]}
            <MI 21866  MOVE.L  (A7)+,D6>                     Δ+4                {[«14""»]}
            <POP 21868-2186c StackAdj>                       Δ+14               {}
            <POP 0x2186c LimitCheck 0x0 ≤ D6 ≤ 0x9>                             {}
            <MI 21876  LEA.L   0x2064c,A0>                                      {}
            <MI 2187a  MOVE.B  (A0+D6.L),D5>                                    {}
            <MI 2187e  MOVE.B  D5,-(A7)>                     Δ-2                {[2, 'D5']}
            <Call 0x21880 0x214e6>                                              {[2, 'D5']}
                ReEnterBoard(?)
            <MI 21884  MOVE.B  D5,(A7)>                                         {[-2-]}
            <Call 0x21886 0x21072>                                              {[-2-]}
            <POP 2188a-2188c StackAdj>                       Δ+2                {}
        <POP 2188c-21894 Epilogue>                           Σ0         

0x21894


@ 21894
    <POP 21894-21944 Body>                                              
        <POP 21894-218aa Prologue>                           Σ0         ↓
        <POP 218aa-218b2 RegCacheLoad>                       Σ0         ↓
        <POP 218b2-218f8 Naked>                              Σ0         ↓ →0x21924
            <Blob 0x218b2 [32] @>                            Δ-32               {[«32""»]}
            <POP 218be-218c0 StackAdj>                       Δ-6                {[«32""»]|[-6-]}
            <Lit 0x218c0 32>                                                    {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]}
            <POP 218ce-218d0 StackAdj>                       Δ-4                {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[-4-]}
            <MI 218d0  MOVE.L  (A5+0xf8),(A7)>                                  {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']}
            <Const 0x218d2 0x0.4>                            Δ-4                {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']|[##0]}
            <Const 0x218d6 0xf423f.4>                        Δ-4                {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']|[##0]|[##999999]}
            <Call 0x218dc 0x2123e>                                              {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']|[##0]|[##999999]}
            <POP 218e0-218e4 StackAdj>                       Δ+16               {[«32""»]|[-2-]}
            <MI 218e4  CLR.L   D0>                                              {[«32""»]|[-2-]}
            <MI 218e6  MOVE.W  (A7)+,D0>                     Δ+2                {[«32""»]}
            <MI 218e8  MOVE.L  D0,(A5+0xf8)>                                    {[«32""»]}
            <POP 218ea-218ee StackAdj>                       Δ+28               {[-4-]}
            <Call 0x218ee 0x22070>                                              {[-4-]}
            <MI 218f4  MOVE.L  (A7)+,D7>                     Δ+4                {}
            <MI 218f6  BNE     0x21924>                                         {}
        <POP 218f8-21924 Naked>                              Σ0         ↓
            <Blob 0x218f8 [26] @>                            Δ-26               {[«26""»]}
            <Const 0x21904 0xe.2>                            Δ-2                {[«26""»]|[#14]}
            <POP 21908-2190a StackAdj>                       Δ-4                {[«26""»]|[#14]|[-4-]}
            <Lit 0x2190a 26>                                                    {[«26""»]|[#14]|[$$invalid TCP board info ptr]}
            <Call 0x2191c 0x103b8>                                              {[«26""»]|[#14]|[$$invalid TCP board info ptr]}
                PopProgram(status : Byte; msg : String)
            <POP 21922-21924 StackAdj>                       Δ+32               {}
        <POP 21924-2193c Naked>                              Σ0         ↓ ←0x218b2
            <MI 21924  LEA.L   (A5+0xf8),A0>                                    {}
            <MI 21926  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 21928  MOVE.L  D7,-(A7)>                     Δ-4                {[4, 'A0']|[4, 'D7']}
            <Const 0x2192a 0x4.2>                            Δ-2                {[4, 'A0']|[4, 'D7']|[#4]}
            <Call 0x2192e 0x10238>                                              {[4, 'A0']|[4, 'D7']|[#4]}
                KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
            <POP 21934-21938 StackAdj>                       Δ+10               {}
            <Call 0x21938 0x20dae>                                              {}
        <POP 2193c-21944 Epilogue>                           Σ0         

0x21944


@ 21944
        <LVAR  0x008 1(r)>
        <LVAR -0x00a @ 4(rw)>
    <POP 21944-21a76 Body>                                              
        <POP 21944-2195a Prologue>                           Σ0         ↓
        <POP 2195a-2196c RegCacheLoad>                       Σ0         ↓
        <POP 2196c-21990 Naked>                              Σ0         ↓ →0x219c4
            <POP 2196c-2196e StackAdj>                       Δ-8                {[-8-]}
            <MI 2196e  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[-8-]|[2, '(A6+0x8)']}
            <Call 0x21972 0x206be>                                              {[-8-]|[2, '(A6+0x8)']}
                GetBoardName(&String, Byte)
            <POP 21976-21978 StackAdj>                       Δ+2                {[-8-]}
            <Const 0x21978 0x8.4>                            Δ-4                {[-8-]|[##8]}
            <Call 0x2197c 0x102f8>                                              {[-8-]|[##8]}
                LeftPad(a : String; b : Long) : String
            <POP 2197e-21980 StackAdj>                       Δ+8                {[-4-]}
            <MI 21980  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <MI 21982  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 21986  EXTB.W  D0>                                              {}
            <MI 21988  MULS.W  #0x0e,D0>                                        {}
            <MI 2198a  TST.B   (A5+D0.W+#0x24)>                                 {}
            <MI 2198e  BNE     0x219c4>                                         {}
        <POP 21990-219c4 Naked>                              Σ0         →0x21a64
            <Blob 0x21990 [14] @>                            Δ-14               {[«14""»]}
            <POP 2199c-2199e StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <MI 2199e  MOVE.L  A4,-(A7)>                     Δ-4                {[«14""»]|[-4-]|[4, 'A4']}
            <POP 219a0-219a2 StackAdj>                       Δ-4                {[«14""»]|[-4-]|[4, 'A4']|[-4-]}
            <Lit 0x219a2 14>                                                    {[«14""»]|[-4-]|[4, 'A4']|[$$Checksum error]}
            <Call 0x219b4 0x102d0>                                              {[«14""»]|[-4-]|[4, 'A4']|[$$Checksum error]}
                StringCat2(a, b : String) : String
            <POP 219ba-219bc StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <MI 219bc  MOVEA.L (A7)+,A4>                     Δ+4                {[«14""»]}
            <POP 219be-219c0 StackAdj>                       Δ+14               {}
            <MI 219c0  BRA     0x21a64>                                         {}
        <POP 219c4-21a32 Naked>                              Σ0         ↓ ←0x2196c
            <POP 219c4-219c6 StackAdj>                       Δ-4                {[-4-]}
            <MI 219c6  MOVE.L  A4,-(A7)>                     Δ-4                {[-4-]|[4, 'A4']}
            <POP 219c8-219ca StackAdj>                       Δ-8                {[-4-]|[4, 'A4']|[-8-]}
            <MI 219ca  MOVE.W  (A5+D0.W+#0x18),D1>                              {[-4-]|[4, 'A4']|[-8-]}
            <MI 219ce  EXTW.L  D1>                                              {[-4-]|[4, 'A4']|[-8-]}
            <MI 219d0  MOVE.L  D1,-(A7)>                     Δ-4                {[-4-]|[4, 'A4']|[-8-]|[4, 'D1']}
            <Call 0x219d2 0x102e4>                                              {[-4-]|[4, 'A4']|[-8-]|[4, 'D1']}
                Long2String(a : Long) : String
            <POP 219d4-219d6 StackAdj>                       Δ+4                {[-4-]|[4, 'A4']|[-8-]}
            <Const 0x219d6 0x8.4>                            Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]}
            <Call 0x219da 0x102f8>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]}
                LeftPad(a : String; b : Long) : String
            <MI 219dc  CLR.L   D1>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]}
            <MI 219de  MOVE.W  (A5+D0.W+#0x1a),D1>                              {[-4-]|[4, 'A4']|[-8-]|[##8]}
            <MI 219e2  MOVE.L  D1,-(A7)>                     Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[4, 'D1']}
            <Call 0x219e4 0x102e4>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[4, 'D1']}
                Long2String(a : Long) : String
            <POP 219e6-219e8 StackAdj>                       Δ+4                {[-4-]|[4, 'A4']|[-8-]|[##8]}
            <Const 0x219e8 0x9.4>                            Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
            <Call 0x219ec 0x102f8>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
                LeftPad(a : String; b : Long) : String
            <MI 219ee  MOVE.W  (A5+D0.W+#0x1c),D1>                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
            <MI 219f2  EXTW.L  D1>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
            <MI 219f4  MOVE.L  D1,-(A7)>                     Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[4, 'D1']}
            <Call 0x219f6 0x102e4>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[4, 'D1']}
                Long2String(a : Long) : String
            <POP 219f8-219fa StackAdj>                       Δ+4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
            <Const 0x219fa 0x9.4>                            Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]}
            <Call 0x219fe 0x102f8>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]}
                LeftPad(a : String; b : Long) : String
            <MI 21a00  MOVE.W  (A5+D0.W+#0x1e),D1>                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]}
            <MI 21a04  EXTW.L  D1>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]}
            <MI 21a06  MOVE.L  D1,-(A7)>                     Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[4, 'D1']}
            <Call 0x21a08 0x102e4>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[4, 'D1']}
                Long2String(a : Long) : String
            <POP 21a0a-21a0c StackAdj>                       Δ+4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]}
            <Const 0x21a0c 0x7.4>                            Δ-4                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[##7]}
            <Call 0x21a10 0x102f8>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[##7]}
                LeftPad(a : String; b : Long) : String
            <POP 21a12-21a14 StackAdj>                       Δ+8                {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
            <Call 0x21a14 0x102dc>                                              {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]}
                StringCat5(a, b, c, d, e : String) : String
            <POP 21a1a-21a1e StackAdj>                       Δ+20               {[-4-]}
            <MI 21a1e  MOVEA.L (A7)+,A4>                     Δ+4                {}
            <POP 21a20-21a22 StackAdj>                       Δ-4                {[-4-]}
            <MI 21a22  MOVE.L  (A5+D0.W+#0x20),-(A7)>        Δ-4                {[-4-]|[4, '(A5+D0.W+#0x20)']}
            <Call 0x21a26 0x10308>                                              {[-4-]|[4, '(A5+D0.W+#0x20)']}
                TimeToText()
            <POP 21a2c-21a2e StackAdj>                       Δ+4                {[-4-]}
            <MI 21a2e  MOVE.L  (A7)+,(A6-0xa)>               Δ+4                {}
            <MI 21a30  MOVEQ.L #0x0a,D7>                                        {}
        <POP 21a32-21a5a Naked>                              Σ0         ↓ →0x21a32 ←0x21a32
            <MI 21a32  MOVE.L  A4,-(A7)>                     Δ-4                {[4, 'A4']}
            <MI 21a34  MOVEA.L (A6-0xa),A0>                                     {[4, 'A4']}
            <MI 21a36  MOVE.L  D7,D0>                                           {[4, 'A4']}
            <MI 21a38  SUBQ.L  #0x1,D0>                                         {[4, 'A4']}
            <POP 0x21a3a LimitCheck 0x0 ≤ D0 ≤ 0x7d>                            {[4, 'A4']}
            <MI 21a44  MOVE.B  (A0+D0.L+#0x2),-(A7)>         Δ-2                {[4, 'A4']|[2, '(A0+D0.L+#0x2)']}
            <Call 0x21a48 0x102c0>                                              {[4, 'A4']|[2, '(A0+D0.L+#0x2)']}
                AppendChar(MOD b : String; a : char)
            <POP 21a4e-21a50 StackAdj>                       Δ+6                {}
            <MI 21a50  ADDQ.L  #0x1,D7>                                         {}
            <MI 21a52  CMPI.L  #0x00000012,D7>                                  {}
            <MI 21a58  BLE     0x21a32>                                         {}
        <POP 21a5a-21a64 Naked>                              Σ0         ↓
            <Pointer.fp 0x21a5a <LVAR -0x00a @ 4(rw)>>       Δ-4                {[@@-10]}
            <Call 0x21a5c 0x102bc>                                              {[@@-10]}
                FreeString(VAR a : String)
            <POP 21a62-21a64 StackAdj>                       Δ+4                {}
        <POP 21a64-21a6e Naked>                              Σ0         ↓ ←0x21990
            <MI 21a64  MOVE.L  A4,-(A7)>                     Δ-4                {[4, 'A4']}
            <Call 0x21a66 0x103e0>                                              {[4, 'A4']}
                WriteConsoleStringCrLf(str : String)
            <POP 21a6c-21a6e StackAdj>                       Δ+4                {}
        <POP 21a6e-21a76 Epilogue>                           Σ0         

0x21a76


@ 21a76
    <POP 21a76-21b82 Body>                                              
        <POP 21a76-21a8c Prologue>                           Σ0         ↓
        <POP 21a8c-21a9e RegCacheLoad>                       Σ0         ↓
        <POP 21a9e-21b0a Naked>                              Σ0         ↓
            <Blob 0x21a9e [50] @>                            Δ-50               {[«50""»]}
            <POP 21ab0-21ab2 StackAdj>                       Δ-4                {[«50""»]|[-4-]}
            <Lit 0x21ab2 49>                                                    {[«50""»]|[$$        Part   Serial  Artwork    ECO     Date of]}
            <Call 0x21ac0 0x103e0>                                              {[«50""»]|[$$        Part   Serial  Artwork    ECO     Date of]}
                WriteConsoleStringCrLf(str : String)
            <POP 21ac2-21ac3 StackAdj>                       Δ+54       ↓       {}
            <Blob 0x21ac3 [52] @>                            Δ-52               {[«52""»]}
            <POP 21ad2-21ad4 StackAdj>                       Δ-4                {[«52""»]|[-4-]}
            <Lit 0x21ad4 51>                                                    {[«52""»]|[$$Board  Number  Number  Revision  Level  Manufacture]}
            <Call 0x21ae2 0x103e0>                                              {[«52""»]|[$$Board  Number  Number  Revision  Level  Manufacture]}
                WriteConsoleStringCrLf(str : String)
            <POP 21ae4-21ae8 StackAdj>                       Δ+54               {[-2-]}
            <POP 21ae8-21ae9 StackAdj>                       Δ+2                {}
            <Const 0x21ae9 0x4.2>                            Δ-2                {[#4]}
            <Call 0x21aec 0x21944>                                              {[#4]}
            <POP 21aee-21aef StackAdj>                       Δ+2                {}
            <Const 0x21aef 0x7.2>                            Δ-2                {[#7]}
            <Call 0x21af2 0x21944>                                              {[#7]}
            <POP 21af4-21af5 StackAdj>                       Δ+2                {}
            <Const 0x21af5 0x6.2>                            Δ-2                {[#6]}
            <Call 0x21af8 0x21944>                                              {[#6]}
            <POP 21afa-21afb StackAdj>                       Δ+2                {}
            <Const 0x21afb 0x2.2>                            Δ-2                {[#2]}
            <Call 0x21afe 0x21944>                                              {[#2]}
            <POP 21b00-21b01 StackAdj>                       Δ+2                {}
            <Const 0x21b01 0x3.2>                            Δ-2                {[#3]}
            <Call 0x21b04 0x21944>                                              {[#3]}
            <POP 21b06-21b08 StackAdj>                       Δ+2                {}
            <MI 21b08  MOVEQ.L #0x0c,D7>                                        {}
        <POP 21b0a-21b1a Naked>                              Σ0         ↓ →0x21b20 ←0x21b20
            <POP 21b0a-21b0c StackAdj>                       Δ-2                {[-2-]}
            <MI 21b0c  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[2, 'D7']}
            <Call 0x21b0e 0x104c0>                                              {[-2-]|[2, 'D7']}
                HasBoard(diproc_addr: Byte) : Byte
            <POP 21b14-21b16 StackAdj>                       Δ+2                {[-2-]}
            <MI 21b16  TST.B   (A7)+>                        Δ+2                {}
            <MI 21b18  BEQ     0x21b20>                                         {}
        <POP 21b1a-21b20 Naked>                              Σ0         ↓
            <MI 21b1a  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x21b1c 0x21944>                                              {[2, 'D7']}
            <POP 21b1e-21b20 StackAdj>                       Δ+2                {}
        <POP 21b20-21b28 Naked>                              Σ0         ↓ →0x21b0a ←0x21b0a
            <MI 21b20  ADDQ.B  #0x1,D7>                                         {}
            <MI 21b22  CMPI.B  #0x0f,D7>                                        {}
            <MI 21b26  BLE     0x21b0a>                                         {}
        <POP 21b28-21b34 Naked>                              Σ0         ↓ →0x21b40
            <POP 21b28-21b2a StackAdj>                       Δ-2                {[-2-]}
            <Call 0x21b2a 0x1060a>                                              {[-2-]}
                Is_fc07_four() : Bool
            <MI 21b30  TST.B   (A7)+>                        Δ+2                {}
            <MI 21b32  BNE     0x21b40>                                         {}
        <POP 21b34-21b40 Naked>                              Σ0         ↓ →0x21b7a
            <POP 21b34-21b36 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x21b36 0x10604>                                              {[-2-]}
                Is_fc07_three() : Bool
            <MI 21b3c  TST.B   (A7)+>                        Δ+2                {}
            <MI 21b3e  BEQ     0x21b7a>                                         {}
        <POP 21b40-21b7a Naked>                              Σ0         ↓ ←0x21b28
            <MI 21b40  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Call 0x21b42 0x21944>                                              {[#0]}
            <POP 21b44-21b46 StackAdj>                       Δ+2                {}
            <Blob 0x21b46 [36] @>                            Δ-36               {[«36""»]}
            <POP 21b52-21b54 StackAdj>                       Δ-8                {[«36""»]|[-8-]}
            <Lit 0x21b54 36>                                                    {[«36""»]|[-4-]|[$$TCP/IP (CMC) board serial number is_]}
            <MI 21b60  MOVE.L  (A5+0xf8),(A7)>                                  {[«36""»]|[-4-]|[4, '(A5+0xf8)']}
            <POP 21b5e-21b60 StackAdj>                       Δ-8                {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-8-]}
            <Call 0x21b64 0x102e4>                                              {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-8-]}
                Long2String(a : Long) : String
            <POP 21b6a-21b6c StackAdj>                       Δ+4                {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-4-]}
            <Call 0x21b6c 0x102d0>                                              {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 21b72-21b74 StackAdj>                       Δ+8                {[«36""»]|[-4-]}
            <Call 0x21b74 0x103e0>                                              {[«36""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 21b76-21b7a StackAdj>                       Δ+40               {}
        <POP 21b7a-21b82 Epilogue>                           Σ0         ←0x21b34

0x21b82


@ 21b82
    <POP 21b82-21cda Body>                                              
        <POP 21b82-21b98 Prologue>                           Σ0         ↓
        <POP 21b98-21bac RegCacheLoad>                       Σ0         ↓
        <POP 21bac-21c3c Naked>                              Σ0         ↓ →0x21c48 ←0x21ccc
            <Call 0x21bac 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x21bb2 [4] @>                             Δ-4                {[«4""»]}
            <Blob 0x21bb6 [4] @>                             Δ-4                {[«4""»]|[«4""»]}
            <Blob 0x21bba [4] @>                             Δ-4                {[«4""»]|[«4""»]|[«4""»]}
            <POP 21bbe-21bc0 StackAdj>                       Δ-4                {[«4""»]|[«4""»]|[«4""»]|[-4-]}
            <Lit 0x21bc0 12>                                                    {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
            <Call 0x21bcc 0x103e0>                                              {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
                WriteConsoleStringCrLf(str : String)
            <POP 21bce-21bd0 StackAdj>                       Δ+16               {}
            <Blob 0x21bd0 [14] @>                            Δ-14               {[«14""»]}
            <POP 21bdc-21bde StackAdj>                       Δ-4                {[«14""»]|[-4-]}
            <Lit 0x21bde 14>                                                    {[«14""»]|[$$    0 => Exit.]}
            <Call 0x21bec 0x103e0>                                              {[«14""»]|[$$    0 => Exit.]}
                WriteConsoleStringCrLf(str : String)
            <POP 21bee-21bef StackAdj>                       Δ+18       ↓       {}
            <Blob 0x21bef [34] @>                            Δ-34               {[«34""»]}
            <POP 21bfe-21c00 StackAdj>                       Δ-4                {[«34""»]|[-4-]}
            <Lit 0x21c00 33>                                                    {[«34""»]|[$$    1 => Display novram contents.]}
            <Call 0x21c0c 0x103e0>                                              {[«34""»]|[$$    1 => Display novram contents.]}
                WriteConsoleStringCrLf(str : String)
            <POP 21c0e-21c0f StackAdj>                       Δ+38       ↓       {}
            <Blob 0x21c0f [34] @>                            Δ-34               {[«34""»]}
            <POP 21c1e-21c20 StackAdj>                       Δ-4                {[«34""»]|[-4-]}
            <Lit 0x21c20 33>                                                    {[«34""»]|[$$    2 => Modify  novram contents.]}
            <Call 0x21c2c 0x103e0>                                              {[«34""»]|[$$    2 => Modify  novram contents.]}
                WriteConsoleStringCrLf(str : String)
            <POP 21c2e-21c32 StackAdj>                       Δ+36               {[-2-]}
            <Call 0x21c32 0x1060a>                                              {[-2-]}
                Is_fc07_four() : Bool
            <MI 21c38  TST.B   (A7)+>                        Δ+2                {}
            <MI 21c3a  BNE     0x21c48>                                         {}
        <POP 21c3c-21c48 Naked>                              Σ0         ↓ →0x21c74
            <POP 21c3c-21c3e StackAdj>                       Δ-2                {[-2-]}
            <Call 0x21c3e 0x10604>                                              {[-2-]}
                Is_fc07_three() : Bool
            <MI 21c44  TST.B   (A7)+>                        Δ+2                {}
            <MI 21c46  BEQ     0x21c74>                                         {}
        <POP 21c48-21c74 Naked>                              Σ0         →0x21c76 ←0x21bac
            <Blob 0x21c48 [44] @>                            Δ-44               {[«44""»]}
            <POP 21c5a-21c5c StackAdj>                       Δ-4                {[«44""»]|[-4-]}
            <Lit 0x21c5c 43>                                                    {[«44""»]|[$$    3 => Change TCP/IP board serial number.]}
            <Call 0x21c6a 0x103e0>                                              {[«44""»]|[$$    3 => Change TCP/IP board serial number.]}
                WriteConsoleStringCrLf(str : String)
            <POP 21c6c-21c70 StackAdj>                       Δ+48               {}
            <MI 21c70  MOVEQ.L #0x03,D7>                                        {}
            <MI 21c72  BRA     0x21c76>                                         {}
        <POP 21c74-21c76 Naked>                              Σ0         ↓ ←0x21c3c
            <MI 21c74  MOVEQ.L #0x02,D7>                                        {}
        <POP 21c76-21cac Naked>                              Σ0         ↓ →0x21cb2 ←0x21c48
            <Blob 0x21c76 [16] @>                            Δ-16               {[«16""»]}
            <POP 21c86-21c88 StackAdj>                       Δ-8                {[«16""»]|[-8-]}
            <Lit 0x21c88 15>                                                    {[«16""»]|[-4-]|[$$Enter option :_]}
            <Const 0x21c96 0x0.4>                            Δ-4                {[«16""»]|[-4-]|[$$Enter option :_]|[##0]}
            <MI 21c9a  MOVE.L  D7,-(A7)>                     Δ-4                {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[4, 'D7']}
            <Call 0x21c9c 0x103ec>                                              {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[4, 'D7']}
                AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
            <POP 21ca2-21ca4 StackAdj>                       Δ+12               {[«16""»]|[-4-]}
            <MI 21ca4  MOVE.L  (A7)+,D6>                     Δ+4                {[«16""»]}
            <POP 21ca6-21ca8 StackAdj>                       Δ+16               {}
            <MI 21ca8  CMP.L   #0x01,D6>                                        {}
            <MI 21caa  BNE     0x21cb2>                                         {}
        <POP 21cac-21cb2 Naked>                              Σ0         →0x21ccc
            <Call 0x21cac 0x21a76>                                              {}
            <MI 21cb0  BRA     0x21ccc>                                         {}
        <POP 21cb2-21cba Naked>                              Σ0         ↓ →0x21cc0 ←0x21c76
            <MI 21cb2  CMPI.L  #0x00000002,D6>                                  {}
            <MI 21cb8  BNE     0x21cc0>                                         {}
        <POP 21cba-21cc0 Naked>                              Σ0         →0x21ccc
            <Call 0x21cba 0x2170e>                                              {}
            <MI 21cbe  BRA     0x21ccc>                                         {}
        <POP 21cc0-21cc8 Naked>                              Σ0         ↓ →0x21ccc ←0x21cb2
            <MI 21cc0  CMPI.L  #0x00000003,D6>                                  {}
            <MI 21cc6  BNE     0x21ccc>                                         {}
        <POP 21cc8-21ccc Naked>                              Σ0         ↓
            <Call 0x21cc8 0x21894>                                              {}
        <POP 21ccc-21cd2 Naked>                              Σ0         ↓ →0x21bac ←0x21cac ←0x21cba ←0x21cc0
            <MI 21ccc  TST.L   D6>                                              {}
            <MI 21cce  BNE     0x21bac>                                         {}
        <POP 21cd2-21cda Epilogue>                           Σ0         

0x21cda


@ 21cda
        <LVAR  0x008 1(r)>
        <LVAR -0x005 @>
        <LVAR -0x009 @>
        <LVAR -0x00a @>
        <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)>
    <POP 21cda-21eae Body>                                   Δ+192      
        <POP 21cda-21cf0 Prologue>                           Σ0         ↓
        <POP 21cf0-21d04 RegCacheLoad>                       Σ0         ↓
        <POP 21d04-21d16 Naked>                              Σ0         ↓ →0x21ea6
            <MI 21d04  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 21d08  EXTB.W  D0>                                              {}
            <MI 21d0a  MOVEQ.L #0x0e,D1>                                        {}
            <MI 21d0c  MULS.W  D0,D1>                                           {}
            <MI 21d0e  TST.B   (A5+D1.W+#0x24)>                                 {}
            <MI 21d12  BNE     0x21ea6>                                         {}
        <POP 21d16-21d22 Naked>                              Σ0         ↓ →0x21e46
            <MI 21d16  MOVE.W  D0,D2>                                           {}
            <MI 21d18  SUBQ.W  #0x2,D2>                                         {}
            <MI 21d1a  CMPI.W  #0x000d,D2>                                      {}
            <MI 21d1e  BHI     0x21e46>                                         {}
        <POP 21d22-21d2c Naked>                              Σ0         →0x21dde →0x21dae →0x21e46 →0x21e46 →0x21d48 →0x21d7e →0x21e46 →0x21e46 →0x21e46 →0x21e46 →0x21e10 →0x21e10 →0x21e10 →0x21e10
            <MI 21d22  ADD.W   D2,D2>                                           {}
            <MI 21d24  SWITCH  D2.W>                                            {}
        <POP 21d48-21d76 Naked>                              Σ0 Δ-64    ↓ ←0x21d22
            <Pointer.fp 0x21d48 <LVAR -0x012 @ 1(r)>>        Δ-4                {[@@-18]}
            <Pointer.fp 0x21d4a <LVAR -0x011 @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]}
            <Pointer.fp 0x21d4c <LVAR -0x00f @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]}
            <Pointer.fp 0x21d4e <LVAR -0x00e @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
            <Pointer.fp 0x21d52 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]}
            <Pointer.fp 0x21d54 <LVAR -0x009 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]}
            <Pointer.fp 0x21d58 <LVAR -0x00d @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]}
            <Pointer.fp 0x21d5c <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]}
            <Pointer.fp 0x21d5e <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d60 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d62 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d64 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d66 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d68 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d6a <LVAR -0x005 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]}
            <Pointer.fp 0x21d6e <LVAR -0x00b @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
            <Call 0x21d70 0x22266>                                              {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
                exp_READ_NOVRAM_INFO.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
        <POP 21d76-21d7e Naked>                              Σ-64 Δ+64  →0x21e48 ←0x21d7e ←0x21dae ←0x21dde
            <POP 21d76-21d7a StackAdj>                       Δ+64               {}
            <MI 21d7a  BRA     0x21e48>                                         {}
        <POP 21d7e-21dae Naked>                              Σ0 Δ-64    →0x21d76 ←0x21d22
            <Pointer.fp 0x21d7e <LVAR -0x012 @ 1(r)>>        Δ-4                {[@@-18]}
            <Pointer.fp 0x21d80 <LVAR -0x011 @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]}
            <Pointer.fp 0x21d82 <LVAR -0x00f @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]}
            <Pointer.fp 0x21d84 <LVAR -0x00e @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
            <Pointer.fp 0x21d88 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]}
            <Pointer.fp 0x21d8a <LVAR -0x009 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]}
            <Pointer.fp 0x21d8e <LVAR -0x00d @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]}
            <Pointer.fp 0x21d92 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]}
            <Pointer.fp 0x21d94 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d96 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d98 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d9a <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d9c <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21d9e <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21da0 <LVAR -0x005 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]}
            <Pointer.fp 0x21da4 <LVAR -0x00b @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
            <Call 0x21da6 0x222e8>                                              {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
                exp_READ_NOVRAM_INFO.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <MI 21dac  BRA     0x21d76>                                         {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
        <POP 21dae-21dde Naked>                              Σ0 Δ-64    →0x21d76 ←0x21d22
            <Pointer.fp 0x21dae <LVAR -0x012 @ 1(r)>>        Δ-4                {[@@-18]}
            <Pointer.fp 0x21db0 <LVAR -0x011 @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]}
            <Pointer.fp 0x21db2 <LVAR -0x00f @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]}
            <Pointer.fp 0x21db4 <LVAR -0x00e @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
            <Pointer.fp 0x21db8 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]}
            <Pointer.fp 0x21dba <LVAR -0x009 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]}
            <Pointer.fp 0x21dbe <LVAR -0x00d @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]}
            <Pointer.fp 0x21dc2 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]}
            <Pointer.fp 0x21dc4 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dc6 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dc8 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dca <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dcc <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dce <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dd0 <LVAR -0x005 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]}
            <Pointer.fp 0x21dd4 <LVAR -0x00b @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
            <Call 0x21dd6 0x2213a>                                              {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
                exp_READ_NOVRAM_INFO.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <MI 21ddc  BRA     0x21d76>                                         {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
        <POP 21dde-21e10 Naked>                              Σ0 Δ-64    →0x21d76 ←0x21d22
            <Pointer.fp 0x21dde <LVAR -0x012 @ 1(r)>>        Δ-4                {[@@-18]}
            <Pointer.fp 0x21de0 <LVAR -0x011 @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]}
            <Pointer.fp 0x21de2 <LVAR -0x00f @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]}
            <Pointer.fp 0x21de4 <LVAR -0x00e @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
            <Pointer.fp 0x21de8 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]}
            <Pointer.fp 0x21dea <LVAR -0x009 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]}
            <Pointer.fp 0x21dee <LVAR -0x00d @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]}
            <Pointer.fp 0x21df2 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]}
            <Pointer.fp 0x21df4 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21df6 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21df8 <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dfa <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dfc <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21dfe <LVAR -0x00a @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e00 <LVAR -0x005 @>>             Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]}
            <Pointer.fp 0x21e04 <LVAR -0x00b @ 1(r)>>        Δ-4                {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
            <Call 0x21e06 0x221bc>                                              {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
                exp_READ_NOVRAM_INFO.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <MI 21e0c  BRA     0x21d76>                                         {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
        <POP 21e10-21e46 Naked>                              Σ0         →0x21e48 ←0x21d22 ←0x21d22 ←0x21d22 ←0x21d22
            <MI 21e10  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Pointer.fp 0x21e12 <LVAR -0x012 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-18]}
            <Pointer.fp 0x21e14 <LVAR -0x011 @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-18]|[@@-17]}
            <Pointer.fp 0x21e16 <LVAR -0x00f @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]}
            <Pointer.fp 0x21e18 <LVAR -0x00e @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]}
            <Pointer.fp 0x21e1c <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]}
            <Pointer.fp 0x21e1e <LVAR -0x009 @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]}
            <Pointer.fp 0x21e22 <LVAR -0x00d @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]}
            <Pointer.fp 0x21e26 <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]}
            <Pointer.fp 0x21e28 <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e2a <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e2c <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e2e <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e30 <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e32 <LVAR -0x00a @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]}
            <Pointer.fp 0x21e34 <LVAR -0x005 @>>             Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]}
            <Pointer.fp 0x21e38 <LVAR -0x00b @ 1(r)>>        Δ-4                {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
            <Call 0x21e3a 0x22582>                                              {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]}
                TestRamBoard(?)
            <POP 21e40-21e44 StackAdj>                       Δ+66               {}
            <MI 21e44  BRA     0x21e48>                                         {}
        <POP 21e46-21e48 Naked>                              Σ0         ↓ ←0x21d16 ←0x21d22 ←0x21d22 ←0x21d22 ←0x21d22 ←0x21d22 ←0x21d22
            <MI 21e46  CLR.B   (A6-0xb)>                                        {}
        <POP 21e48-21e4c Naked>                              Σ0         ↓ →0x21e56 ←0x21d76 ←0x21e10
            <MI 21e48  TST.B   (A6-0xb)>                                        {}
            <MI 21e4a  BNE     0x21e56>                                         {}
        <POP 21e4c-21e56 Naked>                              Σ0         →0x21e9e
            <MI 21e4c  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x21e4e 0x214e6>                                              {[2, 'D0']}
                ReEnterBoard(?)
            <POP 21e52-21e54 StackAdj>                       Δ+2                {}
            <MI 21e54  BRA     0x21e9e>                                         {}
        <POP 21e56-21e9e Naked>                              Σ0         ↓ ←0x21e48
            <MI 21e56  CLR.L   D2>                                              {}
            <MI 21e58  MOVE.B  (A6-0x12),D2>                                    {}
            <MI 21e5a  MOVE.W  D2,(A5+D1.W+#0x18)>                              {}
            <MI 21e5e  CLR.L   D2>                                              {}
            <MI 21e60  MOVE.B  (A6-0x11),D2>                                    {}
            <MI 21e62  ASL.W   #0x8,D2>                                         {}
            <MI 21e64  CLR.L   D3>                                              {}
            <MI 21e66  MOVE.B  (A6-0x10),D3>                                    {}
            <MI 21e6a  ADD.W   D2,D3>                                           {}
            <MI 21e6c  MOVE.W  D3,(A5+D1.W+#0x1a)>                              {}
            <MI 21e70  CLR.L   D2>                                              {}
            <MI 21e72  MOVE.B  (A6-0xf),D2>                                     {}
            <MI 21e74  MOVE.W  D2,(A5+D1.W+#0x1c)>                              {}
            <MI 21e78  CLR.L   D2>                                              {}
            <MI 21e7a  MOVE.B  (A6-0xe),D2>                                     {}
            <MI 21e7e  MOVE.W  D2,(A5+D1.W+#0x1e)>                              {}
            <POP 21e82-21e84 StackAdj>                       Δ-2                {[-2-]}
            <MI 21e84  MOVE.B  (A6-0xd),(A7)>                                   {[-2-]}
            <MI 21e88  MOVE.B  (A6-0xc),(A7+0x1)>                               {[-2-]}
            <MI 21e8e  PEA.L   (A5+D1.W+#0x20)>              Δ-4                {[-2-]|[4, '^(A5+D1.W+#0x20)']}
            <Call 0x21e92 0x20656>                                              {[-2-]|[4, '^(A5+D1.W+#0x20)']}
            <POP 21e96-21e98 StackAdj>                       Δ+6                {}
            <MI 21e98  MOVE.B  #0x01,(A5+D1.W+#0x24)>                           {}
        <POP 21e9e-21ea6 Naked>                              Σ0         ↓ ←0x21e4c
            <MI 21e9e  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x21ea0 0x21072>                                              {[2, 'D0']}
            <POP 21ea4-21ea6 StackAdj>                       Δ+2                {}
        <POP 21ea6-21eae Epilogue>                           Σ0         ←0x21d04

0x21eae


@ 21eae
    <POP 21eae-21f10 Body>                                              
        <POP 21eae-21ec4 Prologue>                           Σ0         ↓
        <POP 21ec4-21ec8 RegCacheLoad>                       Σ0         ↓
        <POP 21ec8-21eea Naked>                              Σ0         ↓
            <Const 0x21ec8 0x4.2>                            Δ-2                {[#4]}
            <Call 0x21ecc 0x21cda>                                              {[#4]}
            <POP 21ece-21ecf StackAdj>                       Δ+2                {}
            <Const 0x21ecf 0x7.2>                            Δ-2                {[#7]}
            <Call 0x21ed2 0x21cda>                                              {[#7]}
            <POP 21ed4-21ed5 StackAdj>                       Δ+2                {}
            <Const 0x21ed5 0x6.2>                            Δ-2                {[#6]}
            <Call 0x21ed8 0x21cda>                                              {[#6]}
            <POP 21eda-21edb StackAdj>                       Δ+2                {}
            <Const 0x21edb 0x2.2>                            Δ-2                {[#2]}
            <Call 0x21ede 0x21cda>                                              {[#2]}
            <POP 21ee0-21ee1 StackAdj>                       Δ+2                {}
            <Const 0x21ee1 0x3.2>                            Δ-2                {[#3]}
            <Call 0x21ee4 0x21cda>                                              {[#3]}
            <POP 21ee6-21ee8 StackAdj>                       Δ+2                {}
            <MI 21ee8  MOVEQ.L #0x0c,D7>                                        {}
        <POP 21eea-21efa Naked>                              Σ0         ↓ →0x21f00 ←0x21f00
            <POP 21eea-21eec StackAdj>                       Δ-2                {[-2-]}
            <MI 21eec  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[2, 'D7']}
            <Call 0x21eee 0x104c0>                                              {[-2-]|[2, 'D7']}
                HasBoard(diproc_addr: Byte) : Byte
            <POP 21ef4-21ef6 StackAdj>                       Δ+2                {[-2-]}
            <MI 21ef6  TST.B   (A7)+>                        Δ+2                {}
            <MI 21ef8  BEQ     0x21f00>                                         {}
        <POP 21efa-21f00 Naked>                              Σ0         ↓
            <MI 21efa  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Call 0x21efc 0x21cda>                                              {[2, 'D7']}
            <POP 21efe-21f00 StackAdj>                       Δ+2                {}
        <POP 21f00-21f08 Naked>                              Σ0         ↓ →0x21eea ←0x21eea
            <MI 21f00  ADDQ.B  #0x1,D7>                                         {}
            <MI 21f02  CMPI.B  #0x0f,D7>                                        {}
            <MI 21f06  BLE     0x21eea>                                         {}
        <POP 21f08-21f10 Epilogue>                           Σ0         

0x21f10


@ 21f10
START
    <POP 21f10--0001 Body>                                              
        <POP 21f10-21f1a Prologue>                           Σ0         
        <POP 21f1a-21f26 RegCacheLoad>                       Σ0         ↓
        <POP 21f26-21f60 Naked>                              Σ0 Δ-8     ↓ →0x21f76
            <Call 0x21f26 0x10398>                                              {}
                FSCALL_10398
            <Blob 0x21f2c [8] @>                             Δ-8                {[«8""»]}
            <POP 21f3c-21f3e StackAdj>                       Δ-6                {[«8""»]|[-6-]}
            <Call 0x21f3e 0x103c4>                                              {[«8""»]|[-6-]}
                GetArgv() : String
            <POP 21f44-21f46 StackAdj>                       Δ-4                {[«8""»]|[-10-]}
            <Lit 0x21f46 7>                                                     {[«8""»]|[-6-]|[$$CONVERT]}
            <Call 0x21f54 0x102c8>                                              {[«8""»]|[-6-]|[$$CONVERT]}
                StringEqual(a, b : String) : Byte
            <POP 21f5a-21f5c StackAdj>                       Δ+8                {[«8""»]|[-2-]}
            <MI 21f5c  TST.B   (A7)+>                        Δ+2                {[«8""»]}
            <MI 21f5e  BEQ     0x21f76>                                         {[«8""»]}
        <POP 21f60-21f76 Naked>                              Σ-8        →0x21fdc
            <Const 0x21f60 0x0.4>                            Δ-4                {[-8-]|[##0]}
            <Call 0x21f64 0x104d8>                                              {[-8-]|[##0]}
                ExpInit(a : Long)
            <POP 21f6a-21f6c StackAdj>                       Δ+4                {[-8-]}
            <Call 0x21f6c 0x20bd6>                                              {[-8-]}
            <Call 0x21f70 0x21eae>                                              {[-8-]}
            <MI 21f74  BRA     0x21fdc>                                         {[-8-]}
        <POP 21f76-21fdc Naked>                              Σ-8        ↓ ←0x21f26
            <Call 0x21f76 0x105b6>                                              {[-8-]}
                R1000_Reset_L(void)
            <Blob 0x21f7c [10] @>                            Δ-10               {[-8-]|[«10""»]}
            <Blob 0x21f8c [10] @>                            Δ-10               {[-8-]|[«10""»]|[«10""»]}
            <POP 21f9c-21f9e StackAdj>                       Δ-4                {[-8-]|[«10""»]|[«10""»]|[-4-]}
            <Lit 0x21f9e 9>                                                     {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]}
            <POP 21fa8-21faa StackAdj>                       Δ-4                {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[-4-]}
            <Lit 0x21faa 9>                                                     {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]}
            <POP 21fb4-21fb6 StackAdj>                       Δ-2                {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[-2-]}
            <POP 21fb6-21fb7 StackAdj>                       Δ+2                {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]}
            <Const 0x21fb7 0x2.2>                            Δ-2                {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[#2]}
            <MI 21fba  PEA.L   (A5+0xfd)>                    Δ-4                {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[#2]|[4, '^(A5+0xfd)']}
            <Call 0x21fbe 0x103b0>                                              {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[#2]|[4, '^(A5+0xfd)']}
                PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
            <POP 21fc4-21fc8 StackAdj>                       Δ+34               {[-8-]}
            <Const 0x21fc8 0x0.4>                            Δ-4                {[-8-]|[##0]}
            <Call 0x21fcc 0x104d8>                                              {[-8-]|[##0]}
                ExpInit(a : Long)
            <POP 21fd2-21fd4 StackAdj>                       Δ+4                {[-8-]}
            <Call 0x21fd4 0x20bd6>                                              {[-8-]}
            <Call 0x21fd8 0x21b82>                                              {[-8-]}
        <POP 21fdc-21fec Naked>                              Σ-8 Δ+8    ↓ ←0x21f60
            <POP 21fdc-21fde StackAdj>                       Δ+6                {[-2-]}
            <MI 21fde  CLR.B   (A7)>                                            {[-2-]}
            <Const 0x21fe0 0x1.4>                            Δ-4                {[-2-]|[##1]}
            <Call 0x21fe4 0x103b8>                                              {[-2-]|[##1]}
                PopProgram(status : Byte; msg : String)
            <POP 21fea-21fec StackAdj>                       Δ+6                {}
        <POP 21fec-21ff2 Naked>                              Σ0         
            <Call 0x21fec 0x10284>                                              {}
                ?exit

0x22346


@ 22346
        <LVAR  0x012 1(r)>
        <LVAR  0x010 1(r)>
        <LVAR  0x00e 2(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x00a 1(r)>
        <LVAR  0x008 2(r)>
        <LVAR -0x004 @ 4(r)>
    <POP 22346-2243e Body>                                   Δ+22       
        <POP 22346-2235c Prologue>                           Σ0         ↓
        <POP 2235c-2236e RegCacheLoad>                       Σ0         ↓
        <POP 2236e-2237a Naked>                              Σ0         ↓ →0x2238c
            <POP 2236e-22370 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x22370 0x104cc>                                              {[-2-]}
                MemOnly2MB() : Bool
            <MI 22376  TST.B   (A7)+>                        Δ+2                {}
            <MI 22378  BEQ     0x2238c>                                         {}
        <POP 2237a-2238c Naked>                              Σ0 Δ-22    →0x2239c
            <Blob 0x2237a [22] @>                            Δ-22               {[«22""»]}
            <MI 2238a  BRA     0x2239c>                                         {[«22""»]}
        <POP 2238c-2239c Naked>                              Σ0 Δ-22    ↓ ←0x2236e
            <Blob 0x2238c [22] @>                            Δ-22               {[«22""»]}
        <POP 2239c-22436 Naked>                              Σ-22 Δ+22  ↓ ←0x2237a
            <POP 2239c-2239e StackAdj>                       Δ-4                {[-26-]}
            <Lit 0x2239e>                                                       {[-22-]|[$$…]}
                <Pointer.sp 0x2239e 4>                       Δ-4        
                <Const 0x223a2 0x1.2>                        Δ-2        
                <Const 0x223a6 0x15.2>                       Δ-2        
                <Call 0x223aa 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 223b0-223b2 StackAdj>                   Δ+8        
            <Pointer.fp 0x223b2 <LVAR -0x004 @ 4(r)>>        Δ-4                {[-22-]|[$$…]|[@@-4]}
            <Call 0x223b4 0x10460>                                              {[-22-]|[$$…]|[@@-4]}
                ExpLoad(a : String; b: Pointer)
            <POP 223ba-223be StackAdj>                       Δ+30               {}
            <MI 223be  MOVE.B  (A6+0x10),-(A7)>              Δ-2                {[2, '(A6+0x10)']}
            <MI 223c2  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[2, '(A6+0x10)']|[4, '(A6-0x4)']}
            <Pointer.sp 0x223c4 4>                           Δ-4                {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]}
            <Const 0x223c8 0x0.4>                            Δ-4                {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]|[##0]}
            <Const 0x223ca 0x0.4>                            Δ-4                {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
            <Call 0x223cc 0x10466>                                              {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 223ce-223d0 StackAdj>                       Δ+16               {[2, '(A6+0x10)']}
            <MI 223d0  MOVE.W  (A6+0xe),(A7)>                                   {[2, '(A6+0xe)']}
            <MI 223d4  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[2, '(A6+0xe)']|[4, '(A6-0x4)']}
            <Pointer.sp 0x223d6 4>                           Δ-4                {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]}
            <Const 0x223da 0x0.4>                            Δ-4                {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]|[##0]}
            <Const 0x223dc 0x1.4>                            Δ-4                {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]}
            <Call 0x223e0 0x10466>                                              {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 223e2-223e4 StackAdj>                       Δ+16               {[2, '(A6+0xe)']}
            <MI 223e4  MOVE.B  (A6+0xc),(A7)>                                   {[-2-]}
            <MI 223e8  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x4)']}
            <Pointer.sp 0x223ea 4>                           Δ-4                {[-2-]|[4, '(A6-0x4)']|[^^4]}
            <Const 0x223ee 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
            <Const 0x223f0 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
            <Call 0x223f2 0x10466>                                              {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 223f4-223f6 StackAdj>                       Δ+16               {[-2-]}
            <MI 223f6  MOVE.B  (A6+0xa),(A7)>                                   {[-2-]}
            <MI 223fa  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[-2-]|[4, '(A6-0x4)']}
            <Pointer.sp 0x223fc 4>                           Δ-4                {[-2-]|[4, '(A6-0x4)']|[^^4]}
            <Const 0x22400 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
            <Const 0x22402 0x0.4>                            Δ-4                {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
            <Call 0x22404 0x10466>                                              {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 22406-22408 StackAdj>                       Δ+16               {[-2-]}
            <MI 22408  MOVE.W  (A6+0x8),(A7)>                                   {[2, '(A6+0x8)']}
            <MI 2240c  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
            <Pointer.sp 0x2240e 4>                           Δ-4                {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
            <Const 0x22412 0x0.4>                            Δ-4                {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
            <Const 0x22414 0x1.4>                            Δ-4                {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]}
            <Call 0x22418 0x10466>                                              {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]}
                ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
            <POP 2241a-2241c StackAdj>                       Δ+16               {[2, '(A6+0x8)']}
            <MI 2241c  CLR.B   (A7)>                                            {[2, '(A6+0x8)']}
            <MI 2241e  MOVE.B  (A6+0x12),-(A7)>              Δ-2                {[2, '(A6+0x8)']|[2, '(A6+0x12)']}
            <MI 22422  MOVE.L  (A6-0x4),-(A7)>               Δ-4                {[2, '(A6+0x8)']|[2, '(A6+0x12)']|[4, '(A6-0x4)']}
            <Call 0x22424 0x104ba>                                              {[2, '(A6+0x8)']|[2, '(A6+0x12)']|[4, '(A6-0x4)']}
                ExpRun(a: Bool; adr: Byte; b: Pointer)
            <POP 2242a-2242c StackAdj>                       Δ+8                {}
            <Pointer.fp 0x2242c <LVAR -0x004 @ 4(r)>>        Δ-4                {[@@-4]}
            <Call 0x2242e 0x10496>                                              {[@@-4]}
                ExpClose(exp : Pointer)
            <POP 22434-22436 StackAdj>                       Δ+4                {}
        <POP 22436-2243e Epilogue>                           Σ0         

0x22466


@ 22466
        <LVAR  0x020 1(r)>
        <LVAR  0x01c 4(r)>
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @ 4(r)>
    <POP 22466-2255a Body>                                   Δ+20       
        <POP 22466-2247c Prologue>                           Σ0         ↓
        <POP 2247c-2248c RegCacheLoad>                       Σ0         ↓
        <POP 2248c-22498 Naked>                              Σ0         ↓ →0x224a6
            <POP 2248c-2248e StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2248e 0x104cc>                                              {[-2-]}
                MemOnly2MB() : Bool
            <MI 22494  TST.B   (A7)+>                        Δ+2                {}
            <MI 22496  BEQ     0x224a6>                                         {}
        <POP 22498-224a6 Naked>                              Σ0 Δ-20    →0x224b2
            <Blob 0x22498 [20] @>                            Δ-20               {[«20""»]}
            <MI 224a4  BRA     0x224b2>                                         {[«20""»]}
        <POP 224a6-224b2 Naked>                              Σ0 Δ-20    ↓ ←0x2248c
            <Blob 0x224a6 [20] @>                            Δ-20               {[«20""»]}
        <POP 224b2-22552 Naked>                              Σ-20 Δ+20  ↓ ←0x22498
            <POP 224b2-224b4 StackAdj>                       Δ-4                {[-24-]}
            <Lit 0x224b4>                                                       {[-20-]|[$$…]}
                <Pointer.sp 0x224b4 4>                       Δ-4        
                <Const 0x224b8 0x1.2>                        Δ-2        
                <Const 0x224bc 0x14.2>                       Δ-2        
                <Call 0x224c0 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 224c6-224c8 StackAdj>                   Δ+8        
            <Pointer.fp 0x224c8 <LVAR -0x006 @ 4(r)>>        Δ-4                {[-20-]|[$$…]|[@@-6]}
            <Call 0x224ca 0x10460>                                              {[-20-]|[$$…]|[@@-6]}
                ExpLoad(a : String; b: Pointer)
            <POP 224d0-224d4 StackAdj>                       Δ+28               {}
            <MI 224d4  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 224d6  MOVE.B  (A6+0x20),-(A7)>              Δ-2                {[#0]|[2, '(A6+0x20)']}
            <MI 224da  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']}
            <Call 0x224dc 0x104ba>                                              {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']}
                ExpRun(a: Bool; adr: Byte; b: Pointer)
            <POP 224e2-224e4 StackAdj>                       Δ+4                {[#0]|[2, '(A6+0x20)']}
            <MI 224e4  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 224e6  MOVEA.L (A6+0x1c),A0>                                    {[4, '(A6-0x6)']}
            <MI 224ea  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x224ec 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x224ee 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x224f0 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 224f2-224f4 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 224f4  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 224f6  MOVEA.L (A6+0x18),A0>                                    {[4, '(A6-0x6)']}
            <MI 224fa  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x224fc 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x224fe 0x1.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
            <Call 0x22502 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22504-22506 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22506  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22508  MOVEA.L (A6+0x14),A0>                                    {[4, '(A6-0x6)']}
            <MI 2250c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2250e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x22510 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22512 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22514-22516 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22516  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22518  MOVEA.L (A6+0x10),A0>                                    {[4, '(A6-0x6)']}
            <MI 2251c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2251e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x22520 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22522 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22524-22526 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22526  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22528  MOVEA.L (A6+0xc),A0>                                     {[4, '(A6-0x6)']}
            <MI 2252c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2252e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x22530 0x1.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
            <Call 0x22534 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22536-22538 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22538  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 2253a  MOVEA.L (A6+0x8),A0>                                     {[4, '(A6-0x6)']}
            <MI 2253e  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Call 0x22540 0x10478>                                              {[4, '(A6-0x6)']|[4, '^(A0)']}
                ExpOutputFlag(exp : Pointer; VAR status : Bool)
            <POP 22546-22548 StackAdj>                       Δ+8                {}
            <Pointer.fp 0x22548 <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x2254a 0x10496>                                              {[@@-6]}
                ExpClose(exp : Pointer)
            <POP 22550-22552 StackAdj>                       Δ+4                {}
        <POP 22552-2255a Epilogue>                           Σ0         

0x22582


@ 22582
TestRamBoard(?)
        <LVAR  0x048 1(r)>
        <LVAR  0x044 4(r)>
        <LVAR  0x040 4(r)>
        <LVAR  0x03c 4(r)>
        <LVAR  0x038 4(r)>
        <LVAR  0x034 4(r)>
        <LVAR  0x030 4(r)>
        <LVAR  0x02c 4(r)>
        <LVAR  0x028 4(r)>
        <LVAR  0x024 4(r)>
        <LVAR  0x020 4(r)>
        <LVAR  0x01c 4(r)>
        <LVAR  0x018 4(r)>
        <LVAR  0x014 4(r)>
        <LVAR  0x010 4(r)>
        <LVAR  0x00c 4(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 @ 4(r)>
    <POP 22582-22718 Body>                                   Δ+20       
        <POP 22582-22598 Prologue>                           Σ0         ↓
        <POP 22598-225ac RegCacheLoad>                       Σ0         ↓
        <POP 225ac-225b8 Naked>                              Σ0         ↓ →0x225c6
            <POP 225ac-225ae StackAdj>                       Δ-2                {[-2-]}
            <Call 0x225ae 0x104cc>                                              {[-2-]}
                MemOnly2MB() : Bool
            <MI 225b4  TST.B   (A7)+>                        Δ+2                {}
            <MI 225b6  BEQ     0x225c6>                                         {}
        <POP 225b8-225c6 Naked>                              Σ0 Δ-20    →0x225d2
            <Blob 0x225b8 [20] @>                            Δ-20               {[«20""»]}
            <MI 225c4  BRA     0x225d2>                                         {[«20""»]}
        <POP 225c6-225d2 Naked>                              Σ0 Δ-20    ↓ ←0x225ac
            <Blob 0x225c6 [20] @>                            Δ-20               {[«20""»]}
        <POP 225d2-22710 Naked>                              Σ-20 Δ+20  ↓ ←0x225b8
            <POP 225d2-225d4 StackAdj>                       Δ-4                {[-24-]}
            <Lit 0x225d4>                                                       {[-20-]|[$$…]}
                <Pointer.sp 0x225d4 4>                       Δ-4        
                <Const 0x225d8 0x1.2>                        Δ-2        
                <Const 0x225dc 0x14.2>                       Δ-2        
                <Call 0x225e0 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 225e6-225e8 StackAdj>                   Δ+8        
            <Pointer.fp 0x225e8 <LVAR -0x006 @ 4(r)>>        Δ-4                {[-20-]|[$$…]|[@@-6]}
            <Call 0x225ea 0x10460>                                              {[-20-]|[$$…]|[@@-6]}
                ExpLoad(a : String; b: Pointer)
            <POP 225f0-225f4 StackAdj>                       Δ+28               {}
            <MI 225f4  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 225f6  MOVE.B  (A6+0x48),-(A7)>              Δ-2                {[#0]|[2, '(A6+0x48)']}
            <MI 225fa  MOVE.L  (A6-0x6),-(A7)>               Δ-4                {[#0]|[2, '(A6+0x48)']|[4, '(A6-0x6)']}
            <Call 0x225fc 0x104ba>                                              {[#0]|[2, '(A6+0x48)']|[4, '(A6-0x6)']}
                ExpRun(a: Bool; adr: Byte; b: Pointer)
            <POP 22602-22604 StackAdj>                       Δ+4                {[#0]|[2, '(A6+0x48)']}
            <MI 22604  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22606  MOVEA.L (A6+0x44),A0>                                    {[4, '(A6-0x6)']}
            <MI 2260a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2260c 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x2260e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22610 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22612-22614 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22614  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22616  MOVEA.L (A6+0x40),A0>                                    {[4, '(A6-0x6)']}
            <MI 2261a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2261c 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x2261e 0x1.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
            <Call 0x22620 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22622-22624 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22624  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22626  MOVEA.L (A6+0x3c),A0>                                    {[4, '(A6-0x6)']}
            <MI 2262a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2262c 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x2262e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22630 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22632-22634 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22634  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22636  MOVEA.L (A6+0x38),A0>                                    {[4, '(A6-0x6)']}
            <MI 2263a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2263c 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x2263e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22640 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22642-22644 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22644  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22646  MOVEA.L (A6+0x34),A0>                                    {[4, '(A6-0x6)']}
            <MI 2264a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2264c 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x2264e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22650 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22652-22654 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22654  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22656  MOVEA.L (A6+0x30),A0>                                    {[4, '(A6-0x6)']}
            <MI 2265a  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2265c 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x2265e 0x3.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##3]}
            <Call 0x22662 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##3]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22664-22666 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22666  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22668  MOVEA.L (A6+0x2c),A0>                                    {[4, '(A6-0x6)']}
            <MI 2266c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2266e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x22670 0x1.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
            <Call 0x22672 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22674-22676 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22676  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22678  MOVEA.L (A6+0x28),A0>                                    {[4, '(A6-0x6)']}
            <MI 2267c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2267e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x22680 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22682 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22684-22686 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22686  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22688  MOVEA.L (A6+0x24),A0>                                    {[4, '(A6-0x6)']}
            <MI 2268c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2268e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x22690 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x22692 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 22694-22696 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 22696  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 22698  MOVEA.L (A6+0x20),A0>                                    {[4, '(A6-0x6)']}
            <MI 2269c  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x2269e 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x226a0 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x226a2 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 226a4-226a6 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 226a6  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 226a8  MOVEA.L (A6+0x1c),A0>                                    {[4, '(A6-0x6)']}
            <MI 226ac  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x226ae 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x226b0 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x226b2 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 226b4-226b6 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 226b6  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 226b8  MOVEA.L (A6+0x18),A0>                                    {[4, '(A6-0x6)']}
            <MI 226bc  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x226be 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x226c0 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x226c2 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 226c4-226c6 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 226c6  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 226c8  MOVEA.L (A6+0x14),A0>                                    {[4, '(A6-0x6)']}
            <MI 226cc  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x226ce 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x226d0 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x226d2 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 226d4-226d6 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 226d6  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 226d8  MOVEA.L (A6+0x10),A0>                                    {[4, '(A6-0x6)']}
            <MI 226dc  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x226de 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x226e0 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
            <Call 0x226e2 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 226e4-226e6 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 226e6  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 226e8  MOVEA.L (A6+0xc),A0>                                     {[4, '(A6-0x6)']}
            <MI 226ec  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Const 0x226ee 0x0.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
            <Const 0x226f0 0x1.4>                            Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
            <Call 0x226f2 0x10472>                                              {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
                ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
            <POP 226f4-226f6 StackAdj>                       Δ+12               {[4, '(A6-0x6)']}
            <MI 226f6  MOVE.L  (A6-0x6),(A7)>                                   {[4, '(A6-0x6)']}
            <MI 226f8  MOVEA.L (A6+0x8),A0>                                     {[4, '(A6-0x6)']}
            <MI 226fc  PEA.L   (A0)>                         Δ-4                {[4, '(A6-0x6)']|[4, '^(A0)']}
            <Call 0x226fe 0x10478>                                              {[4, '(A6-0x6)']|[4, '^(A0)']}
                ExpOutputFlag(exp : Pointer; VAR status : Bool)
            <POP 22704-22706 StackAdj>                       Δ+8                {}
            <Pointer.fp 0x22706 <LVAR -0x006 @ 4(r)>>        Δ-4                {[@@-6]}
            <Call 0x22708 0x10496>                                              {[@@-6]}
                ExpClose(exp : Pointer)
            <POP 2270e-22710 StackAdj>                       Δ+4                {}
        <POP 22710-22718 Epilogue>                           Σ0         

0x22726


@ 22726
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 22726-2278e Body>                                              
        <POP 22726-2273c Prologue>                           Σ0         ↓
        <POP 2273c-22786 Naked>                              Σ0         ↓
            <Blob 0x2273c [14] @>                            Δ-14               {[«14""»]}
            <Const 0x22748 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 2274c-2274e StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x2274e 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 22760-22762 StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 22762  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 22766  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 22768  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2276a  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x2276c 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 22772-22774 StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x22774 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2277a-2277c StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x2277c 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 22782-22786 StackAdj>                       Δ+20               {}
        <POP 22786-2278e Epilogue>                           Σ0         

0x227e2


@ 227e2
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 227e2-2291e Body>                                              
        <POP 227e2-227f8 Prologue>                           Σ0         ↓
        <POP 227f8-2280e RegCacheLoad>                       Σ0         ↓
        <POP 2280e-2286e Naked>                              Σ0         ↓ →0x228b6
            <Call 0x2280e 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x22814 [18] @>                            Δ-18               {[«18""»]}
            <POP 22820-22822 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x22822 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x2282e 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 22830-22831 StackAdj>                       Δ+22       ↓       {}
            <Blob 0x22831 [14] @>                            Δ-14               {[«14""»]}
            <POP 22840-22842 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x22842 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 2284c-2284e StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 2284e  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x22852 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 22858-2285a StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x2285a 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 22860-22862 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x22862 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 22864-22866 StackAdj>                       Δ+18               {}
            <MI 22866  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 2286a  CMPA.W  #0x01,A0>                                        {}
            <MI 2286c  BEQ     0x228b6>                                         {}
        <POP 2286e-228b6 Naked>                              Σ0         ↓
            <Blob 0x2286e [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x2287e [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 2288e-22890 StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x22890 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 2289a-2289c StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x2289c>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x2289c 12>                      Δ-4        
                <Const 0x228a0 0x1.2>                        Δ-2        
                <Const 0x228a2 0x1e.2>                       Δ-2        
                <Call 0x228a4 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 228a6-228a8 StackAdj>                   Δ+8        
            <Call 0x228a8 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 228ae-228b0 StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x228b0 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 228b2-228b6 StackAdj>                       Δ+48               {}
        <POP 228b6-22916 Naked>                              Σ0         ↓ ←0x2280e
            <Blob 0x228b6 [14] @>                            Δ-14               {[«14""»]}
            <POP 228c6-228c8 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x228c8 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 228d2-228d4 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 228d4  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x228d8 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 228de-228e0 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x228e0 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 228e6-228e8 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x228e8 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 228ea-228eb StackAdj>                       Δ+18       ↓       {}
            <Blob 0x228eb [24] @>                            Δ-24               {[«24""»]}
            <Const 0x228fa 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 228fe-22900 StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x22900 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x2290e 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 22914-22916 StackAdj>                       Δ+30               {}
        <POP 22916-2291e Epilogue>                           Σ0         

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   import ident.9c2f134a267756f2
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 1f 10              |        |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 29 46              |  )F    |		.PTR	0x22946
00020010					code.end:
00020010 00 02 29 1e              |  )     |		.PTR	0x2291e
00020014 00 00 00 f0              |        |		.CONST	0x000000f0
00020018					programfailurehandler:
00020018 00 02 27 26              |  '&    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 27 e2              |  '     |		.CODE	EXP_FAIL
00020020 00 00 00 00              |        |		.CONST	0x00000000
00020024					exp_init_done:
00020024 00                       |        |		.CONST	0x00
00020025 00                       |        |		.CONST	0x00
00020026 00 00                    |        |		.CONST	0x0000
00020028 00 00                    |        |		.CONST	0x0000
0002002a 00 00                    |        |		.XXX[0x2]
0002002c 00 00                    |        |		.CONST	0x0000
0002002e 00 00                    |        |		.CONST	0x0000
00020030 00 00                    |        |		.CONST	0x0000
00020032 00 00 00 00 00 00        |        |		.XXX[0x6]
00020038 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0xb0]
000200e8 00 00 00 00              |        |		.XXX[0x4]
000200ec 00 00 00 00              |        |		.PTR	0x0
000200f0					is_open_ERROR_LOG:
000200f0 00                       |        |		.CONST	0x0
000200f1					write_error_ERROR_LOG:
000200f1 00                       |        |		.CONST	0x0
000200f2 00 00 00 00              |        |		.CONST	0x00000000
000200f6 00 00 00 00              |        |		.CONST	0x00000000
000200fa 00                       |        |		.CONST	0x00
000200fb 00                       |        |		.CONST	0x00
000200fc					file_ERROR_LOG:
000200fc 00 00 00 00              |        |		.CONST	0x00000000
00020100 00 00 00 00              |        |		.CONST	0x00000000
00020104 00 00                    |        |		.CONST	0x0000
00020106 00 00                    |        |		.CONST	0x0000
00020108					somekindoffsflag:
00020108 00                       |        |		.CONST	0x00
00020109 00                       |        |		.CONST	0x00
0002010a 40 28 23 29 4e 4f        |@(#)NO  |		.XXX[0x6]
00020110 56 52 41 4d 2c 31 2e 31  |VRAM,1.1|		.XXX[0x18]
00020118 2c 39 32 2f 30 37 2f 30  |,92/07/0|
00020120 39 2c 31 32 3a 30 30 3a  |9,12:00:|
00020128 30 30 5c 20              |00\     |		.XXX[0x4]
0002012c					t_IOC_:
0002012c 49 4f                    |IO      |		.TXT	'IO'
0002012e 43 20                    |C       |		.XXX[0x2]
00020130					t_TYP_:
00020130 54 59                    |TY      |		.TXT	'TY'
00020132 50 20                    |P       |		.XXX[0x2]
00020134					t_VAL_:
00020134 56 41                    |VA      |		.TXT	'VA'
00020136 4c 20                    |L       |		.XXX[0x2]
00020138					t_FIU_:
00020138 46 49                    |FI      |		.TXT	'FI'
0002013a 55 20                    |U       |		.XXX[0x2]
0002013c					t_SEQ_:
0002013c 53 45                    |SE      |		.TXT	'SE'
0002013e 51 20                    |Q       |		.XXX[0x2]
00020140					t_MEM0:
00020140 4d 45 4d 30              |MEM0    |		.TXT	'MEM0'
00020144					t_MEM1:
00020144 4d 45 4d 31              |MEM1    |		.TXT	'MEM1'
00020148					t_MEM2:
00020148 4d 45 4d 32              |MEM2    |		.TXT	'MEM2'
0002014c					t_MEM3:
0002014c 4d 45 4d 33              |MEM3    |		.TXT	'MEM3'
00020150 52 45 53 48 41 20        |RESHA   |		.TXT	'RESHA '
00020156					t_???_:
00020156 3f 3f                    |??      |		.TXT	'??'
00020158 3f 20                    |?       |		.XXX[0x2]
0002015a 2a 2a 2a 20 69 6e 76 61  |*** inva|		.TXT	'*** invalid RESHA board info ptr'
0002017a 2a 2a 2a 20 69 6e 76 61  |*** inva|		.TXT	'*** invalid TCP board info ptr'
00020198 74 75 72 6e 20 57 52 49  |turn WRI|		.TXT	'turn WRITE PROTECT switch OFF (on front of RESHA) ... '
000201ce 20 4f                    | O      |		.TXT	' O'
000201d0 4b 20                    |K       |		.XXX[0x2]
000201d2 2a 2a 2a 20 45 52 52 4f  |*** ERRO|		.TXT	'*** ERROR code from REE_UPLOAD:_'
000201f2 52 45 53 48 41 20        |RESHA   |		.XXX[0x6]
000201f8 50 52 4f 4d 20 77 72 69  |PROM wri|		.XXX[0x18]
00020200 74 65 20 66 61 69 6c 65  |te faile|
00020208 64 2c 20 74 72 79 20 61  |d, try a|
00020210 67 61 69 6e 5f 20        |gain_   |		.XXX[0x6]
00020216 74 75 72 6e 20 57 52 49  |turn WRI|		.TXT	'turn WRITE PROTECT switch ON (on front of RESHA) ...'
0002024a 20 4f                    | O      |		.TXT	' O'
0002024c 4b 20                    |K       |		.XXX[0x2]
0002024e 69 6e 76 61 6c 69 64 20  |invalid |		.TXT	'invalid RESHA board info ptr'
0002026a 50 6c 65 61 73 65 20 65  |Please e|		.TXT	'Please enter an integer in the range ['
00020290 20 5b                    | [      |		.TXT	' ['
00020292 5d 20 3a 5f              |] :_    |		.TXT	'] :_'
00020296 20 2e 2e 5f              | .._    |		.TXT	' .._'
0002029a 5d 20                    |]       |		.TXT	'] '
0002029c 20 5b                    | [      |		.TXT	' ['
0002029e 5d 20 3a 5f              |] :_    |		.TXT	'] :_'
000202a2 30 30 3a 30 30 3a 30 30  |00:00:00|		.TXT	'00:00:00_ '
000202ac 45 6e 74 65 72 20 70 61  |Enter pa|		.TXT	'Enter part number '
000202be 45 6e 74 65 72 20 73 65  |Enter se|		.TXT	'Enter serial number '
000202d2 45 6e 74 65 72 20 61 72  |Enter ar|		.TXT	'Enter artwork revision'
000202e8 45 6e 74 65 72 20 45 43  |Enter EC|		.TXT	'Enter ECO level '
000202f8 45 6e 74 65 72 20 62 75  |Enter bu|		.TXT	'Enter build date as DD-MMM-YY '
00020316 20 4e 4f 56 52 41 4d 20  | NOVRAM |		.TXT	' NOVRAM checksum error, enter new data, defaults are best guess '
00020356 42 6f 61 72 64 73 20 61  |Boards a|		.TXT	'Boards are: '
00020362 20 20 20 20 30 20 3d 3e  |    0 =>|		.TXT	'    0 => TYP      1 => VAL'
0002037c 20 20 20 20 32 20 3d 3e  |    2 =>|		.TXT	'    2 => SEQ      3 => FIU'
00020396 20 20 20 20 34 20 3d 3e  |    4 =>|		.TXT	'    4 => MEM0     5 => MEM1 '
000203b2 20 20 20 20 36 20 3d 3e  |    6 =>|		.TXT	'    6 => MEM2     7 => MEM3 '
000203ce 20 20 20 20              |        |		.TXT	'    '
000203d2 38 20 3d 3e              |8 =>    |		.TXT	'8 =>'
000203d6 20 49 4f 43              | IOC    |		.TXT	' IOC'
000203da 20 20 20 20 38 20 3d 3e  |    8 =>|		.TXT	'    8 => IOC      9 => RESHA'
000203f6 45 6e 74 65 72 20 62 6f  |Enter bo|		.TXT	'Enter board :_'
00020404 45 6e 74 65 72 20 54 43  |Enter TC|		.TXT	'Enter TCP/IP board serial number'
00020424 69 6e 76 61 6c 69 64 20  |invalid |		.TXT	'invalid TCP board info ptr'
0002043e 43 68 65 63 6b 73 75 6d  |Checksum|		.TXT	'Checksum error'
0002044c 20 20 20 20 20 20 20 20  |        |		.TXT	'        Part   Serial  Artwork    ECO     Date of '
0002047e 42 6f 61 72 64 20 20 4e  |Board  N|		.TXT	'Board  Number  Number  Revision  Level  Manufacture '
000204b2 54 43 50 2f 49 50 20 28  |TCP/IP (|		.TXT	'TCP/IP (CMC) board serial number is_'
000204d6 4f 70 74 69              |Opti    |		.TXT	'Opti'
000204da 6f 6e 73 20              |ons     |		.TXT	'ons '
000204de 61 72 65 3a              |are:    |		.TXT	'are:'
000204e2 20 20 20 20 30 20 3d 3e  |    0 =>|		.TXT	'    0 => Exit.'
000204f0 20 20 20 20 31 20 3d 3e  |    1 =>|		.TXT	'    1 => Display novram contents. '
00020512 20 20 20 20 32 20 3d 3e  |    2 =>|		.TXT	'    2 => Modify  novram contents. '
00020534 20 20 20 20 33 20 3d 3e  |    3 =>|		.TXT	'    3 => Change TCP/IP board serial number. '
00020560 45 6e 74 65 72 20 6f 70  |Enter op|		.TXT	'Enter option :_ '
00020570 43 4f 4e 56 45 52 54 20  |CONVERT |		.TXT	'CONVERT '
00020578 43 4f 4e 46 49 47 55 52  |CONFIGUR|		.TXT	'CONFIGURE '
00020582 4e 4f 5f 4e 4f 56 52 41  |NO_NOVRA|		.TXT	'NO_NOVRAM '
0002058c 00 00 00 00              |        |		.XXX[0x4]
00020590 00 05 00 04 00 09 00 00  |        |		.XXX[0xa8]
00020598 00 03 00 02 00 00 00 00  |        |
000205a0 00 00 00 00 00 08 00 08  |        |
000205a8 00 08 00 08 00 00 00 00  |        |
000205b0 00 02 00 02 00 01 00 00  |        |
000205b8 00 02 00 03 00 00 00 00  |        |
000205c0 00 00 00 00 00 01 00 01  |        |
000205c8 00 01 00 01 00 00 00 00  |        |
000205d0 00 05 00 05 00 01 00 00  |        |
000205d8 00 01 00 00 00 00 00 00  |        |
000205e0 00 00 00 00 00 03 00 03  |        |
000205e8 00 03 00 03 00 29 00 00  |     )  |
000205f0 00 2d 00 2c 00 31 00 00  | - , 1  |
000205f8 00 2b 00 2a 00 00 00 00  | + *    |
00020600 00 00 00 00 00 2f 00 2f  |     / /|
00020608 00 2f 00 2f 00 02 00 00  | / /    |
00020610 00 01 00 01 00 02 00 00  |        |
00020618 00 02 00 01 00 00 00 00  |        |
00020620 00 00 00 00 00 02 00 02  |        |
00020628 00 02 00 02 00 01 00 00  |        |
00020630 00 00 00 01 00 02 00 00  |        |
00020638 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x10]
00020648 00 00 00 00 06 07 02 03  |        |		.XXX[0x8]
00020650 0c 0d 0e 0f 04 00        |        |		.XXX[0x6]
00020656 ; --------------------------------------------------------------------------------------
00020656 ; OMSI PASCAL Function
00020656 ;    <LVAR  0x00d 1(r)>
00020656 ;    <LVAR  0x00c 1(r)>
00020656 ;    <LVAR  0x008 4(r)>
00020656 ; --------------------------------------------------------------------------------------
00020656 4e 56 ff e0              |NV      |		LINK.W	A6,#0xffe0
0002065a bf d5                    |        |		CMPA.L	(A5),A7
0002065c 62 06                    |b       |		BHI	0x20664
0002065e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020662 4e 76                    |Nv      |		TRAPV
00020664 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00020668 48 e7 f0 80              |H       |		MOVEM.L	A0+D3+D2+D1+D0,-(A7)
0002066c 76 01                    |v       |		MOVEQ.L	#0x01,D3
0002066e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00020672 42 50                    |BP      |		CLR.W	(A0)
00020674 42 80                    |B       |		CLR.L	D0
00020676 10 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D0
0002067a 32 00                    |2       |		MOVE.W	D0,D1
0002067c e2 41                    | A      |		ASR.W	#0x1,D1
0002067e c7 28 00 02              | (      |		AND.B	D3,(A0+0x2)
00020682 e3 09                    |        |		LSL.B	#0x1,D1
00020684 83 28 00 02              | (      |		OR.B	D1,(A0+0x2)
00020688 c0 43                    | C      |		AND.W	D3,D0
0002068a e7 40                    | @      |		ASL.W	#0x3,D0
0002068c 42 81                    |B       |		CLR.L	D1
0002068e 12 2e 00 0d              | .      |		MOVE.B	(A6+0xd),D1
00020692 34 01                    |4       |		MOVE.W	D1,D2
00020694 ea 42                    | B      |		ASR.W	#0x5,D2
00020696 02 42 00 07              | B      |		ANDI.W	#0x0007,D2
0002069a d4 40                    | @      |		ADD.W	D0,D2
0002069c 02 68 fe 1f 00 02        | h      |		ANDI.W	#0xfe1f,(A0+0x2)
000206a2 eb 4a                    | J      |		LSL.W	#0x5,D2
000206a4 85 68 00 02              | h      |		OR.W	D2,(A0+0x2)
000206a8 02 41 00 1f              | A      |		ANDI.W	#0x001f,D1
000206ac 02 28 00 e0 00 03        | (      |		ANDI.B	#0xe0,(A0+0x3)
000206b2 83 28 00 03              | (      |		OR.B	D1,(A0+0x3)
000206b6 4c df 01 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0
000206ba 4e 5e                    |N^      |		UNLK	A6
000206bc 4e 75                    |Nu      |		RTS
000206be ; --------------------------------------------------------------------------------------
000206be ; OMSI PASCAL Function
000206be ;    <LVAR  0x00a 4(w)>
000206be ;    <LVAR  0x008 1(r)>
000206be ; --------------------------------------------------------------------------------------
000206be					GetBoardName(&String, Byte):
000206be 4e 56 ff d8              |NV      |		LINK.W	A6,#0xffd8
000206c2 bf d5                    |        |		CMPA.L	(A5),A7
000206c4 62 06                    |b       |		BHI	0x206cc
000206c6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000206ca 4e 76                    |Nv      |		TRAPV
000206cc de fc 00 26              |   &    |		ADDA.W	#0x26,A7
000206d0 48 e7 c0 c0              |H       |		MOVEM.L	A1+A0+D1+D0,-(A7)
000206d4 72 01                    |r       |		MOVEQ.L	#0x01,D1
000206d6 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000206da 48 80                    |H       |		EXTB.W	D0
000206dc 0c 40 00 0f              | @      |		CMPI.W	#0x000f,D0
000206e0 62 00 00 e6              |b       |		BHI	switch@0x206e6[0x1]
000206e4 d0 40                    | @      |		ADD.W	D0,D0
000206e6 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
000206ee 00 ae                    |        |		.CONST	0xae			; [0x0] -> 0x2079c
000206f0 00 da                    |        |		.CONST	0xda			; [0x1] -> 0x207c8
000206f2 00 76                    | v      |		.CONST	0x76			; [0x2] -> 0x20764
000206f4 00 62                    | b      |		.CONST	0x62			; [0x3] -> 0x20750
000206f6 00 20                    |        |		.CONST	0x20			; [0x4] -> 0x2070e
000206f8 00 da                    |        |		.CONST	0xda			; [0x5] -> 0x207c8
000206fa 00 36                    | 6      |		.CONST	0x36			; [0x6] -> 0x20724
000206fc 00 4c                    | L      |		.CONST	0x4c			; [0x7] -> 0x2073a
000206fe 00 da                    |        |		.CONST	0xda			; [0x8] -> 0x207c8
00020700 00 da                    |        |		.CONST	0xda			; [0x9] -> 0x207c8
00020702 00 da                    |        |		.CONST	0xda			; [0xa] -> 0x207c8
00020704 00 da                    |        |		.CONST	0xda			; [0xb] -> 0x207c8
00020706 00 8a                    |        |		.CONST	0x8a			; [0xc] -> 0x20778
00020708 00 9c                    |        |		.CONST	0x9c			; [0xd] -> 0x2078a
0002070a 00 a2                    |        |		.CONST	0xa2			; [0xe] -> 0x20790
0002070c 00 a8                    |        |		.CONST	0xa8			; [0xf] -> 0x20796
0002070e					switch@0x206e6[0x4]:
0002070e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020710 1e ba fa 1a              |        |		MOVE.B	t_IOC_,(A7)
00020714 1f 7a fa 17 00 01        | z      |		MOVE.B	0x2012d,(A7+0x1)
0002071a 1f 7a fa 12 00 02        | z      |		MOVE.B	0x2012e,(A7+0x2)
00020720 60 00 00 b8              |`       |		BRA	0x207da
00020724					switch@0x206e6[0x6]:
00020724 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020726 1e ba fa 08              |        |		MOVE.B	t_TYP_,(A7)
0002072a 1f 7a fa 05 00 01        | z      |		MOVE.B	0x20131,(A7+0x1)
00020730 1f 7a fa 00 00 02        | z      |		MOVE.B	0x20132,(A7+0x2)
00020736 60 00 00 a2              |`       |		BRA	0x207da
0002073a					switch@0x206e6[0x7]:
0002073a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002073c 1e ba f9 f6              |        |		MOVE.B	t_VAL_,(A7)
00020740 1f 7a f9 f3 00 01        | z      |		MOVE.B	0x20135,(A7+0x1)
00020746 1f 7a f9 ee 00 02        | z      |		MOVE.B	0x20136,(A7+0x2)
0002074c 60 00 00 8c              |`       |		BRA	0x207da
00020750					switch@0x206e6[0x3]:
00020750 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020752 1e ba f9 e4              |        |		MOVE.B	t_FIU_,(A7)
00020756 1f 7a f9 e1 00 01        | z      |		MOVE.B	0x20139,(A7+0x1)
0002075c 1f 7a f9 dc 00 02        | z      |		MOVE.B	0x2013a,(A7+0x2)
00020762 60 76                    |`v      |		BRA	0x207da
00020764					switch@0x206e6[0x2]:
00020764 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020766 1e ba f9 d4              |        |		MOVE.B	t_SEQ_,(A7)
0002076a 1f 7a f9 d1 00 01        | z      |		MOVE.B	0x2013d,(A7+0x1)
00020770 1f 7a f9 cc 00 02        | z      |		MOVE.B	0x2013e,(A7+0x2)
00020776 60 62                    |`b      |		BRA	0x207da
00020778					switch@0x206e6[0xc]:
00020778 2f 3a f9 c6              |/:      |		MOVE.L	t_MEM0,-(A7)
0002077c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002077e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020782 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020784 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020788 60 5c                    |`\      |		BRA	0x207e6
0002078a					switch@0x206e6[0xd]:
0002078a 2f 3a f9 b8              |/:      |		MOVE.L	t_MEM1,-(A7)
0002078e 60 ec                    |`       |		BRA	0x2077c
00020790					switch@0x206e6[0xe]:
00020790 2f 3a f9 b6              |/:      |		MOVE.L	t_MEM2,-(A7)
00020794 60 e6                    |`       |		BRA	0x2077c
00020796					switch@0x206e6[0xf]:
00020796 2f 3a f9 b4              |/:      |		MOVE.L	t_MEM3,-(A7)
0002079a 60 e0                    |`       |		BRA	0x2077c
0002079c					switch@0x206e6[0x0]:
0002079c 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002079e 20 4f                    | O      |		MOVEA.L	A7,A0
000207a0 43 fa f9 ae              |C       |		LEA.L	0x20150,A1
000207a4 70 04                    |p       |		MOVEQ.L	#0x04,D0
000207a6 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000207a8 51 c8 ff fc              |Q       |		DBF	D0,0x207a6
000207ac 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000207ae 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000207b2 3f 01                    |?       |		MOVE.W	D1,-(A7)
000207b4 3f 3c 00 05              |?<      |		MOVE.W	#0x5,-(A7)
000207b8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000207be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207c0 2d 5f 00 0a              |-_      |		MOVE.L	(A7)+,(A6+0xa)
000207c4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000207c6 60 2c                    |`,      |		BRA	0x207f4
000207c8					switch@0x206e6[0x1]:
000207c8					switch@0x206e6[0x5]:
000207c8					switch@0x206e6[0x8]:
000207c8					switch@0x206e6[0x9]:
000207c8					switch@0x206e6[0xa]:
000207c8					switch@0x206e6[0xb]:
000207c8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000207ca 1e ba f9 8a              |        |		MOVE.B	t_???_,(A7)
000207ce 1f 7a f9 87 00 01        | z      |		MOVE.B	0x20157,(A7+0x1)
000207d4 1f 7a f9 82 00 02        | z      |		MOVE.B	0x20158,(A7+0x2)
000207da 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000207dc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000207e0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000207e2 3f 3c 00 03              |?<      |		MOVE.W	#0x3,-(A7)
000207e6 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000207ec 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207ee 2d 5f 00 0a              |-_      |		MOVE.L	(A7)+,(A6+0xa)
000207f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000207f4 4c df 03 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1
000207f8 4e 5e                    |N^      |		UNLK	A6
000207fa 4e 75                    |Nu      |		RTS
000207fc ; --------------------------------------------------------------------------------------
000207fc ; OMSI PASCAL Function
000207fc ;    <LVAR  0x00c 2(w)>
000207fc ;    <LVAR  0x008 4(r)>
000207fc ; --------------------------------------------------------------------------------------
000207fc 4e 56 ff ea              |NV      |		LINK.W	A6,#0xffea		; Spelunked
00020800 bf d5                    |        |		CMPA.L	(A5),A7
00020802 62 06                    |b       |		BHI	0x2080a
00020804 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020808 4e 76                    |Nv      |		TRAPV
0002080a de fc 00 12              |        |		ADDA.W	#0x12,A7
0002080e 48 e7 81 00              |H       |		MOVEM.L	D7+D0,-(A7)
00020812 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020814 2f 2e 00 08              |/.      |		MOVE.L	(A6+0x8),-(A7)
00020818 4e b9 00 01 05 92        |N       |		JSR	ReadConfig(where : Long) : Word
0002081e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020820 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020822 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
00020826 3e 00                    |>       |		MOVE.W	D0,D7
00020828 30 07                    |0       |		MOVE.W	D7,D0
0002082a 48 c0                    |H       |		EXTW.L	D0
0002082c d1 ac 00 02              |        |		ADD.L	D0,(A4+0x2)
00020830 3d 40 00 0c              |=@      |		MOVE.W	D0,(A6+0xc)
00020834 4c df 00 81              |L       |		MOVEM.L	(A7)+,D0+D7
00020838 4e 5e                    |N^      |		UNLK	A6
0002083a 4e 75                    |Nu      |		RTS
0002083c ; --------------------------------------------------------------------------------------
0002083c ; OMSI PASCAL Function
0002083c ;    <LVAR -0x006 4(rw)>
0002083c ;    <LVAR -0x007 1(w)>
0002083c ;    <LVAR -0x008 @ 1(w) 2(r)>
0002083c ; --------------------------------------------------------------------------------------
0002083c 4e 56 ff da              |NV      |		LINK.W	A6,#0xffda
00020840 bf d5                    |        |		CMPA.L	(A5),A7
00020842 62 06                    |b       |		BHI	0x2084a
00020844 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020848 4e 76                    |Nv      |		TRAPV
0002084a de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002084e 48 e7 c0 c8              |H       |		MOVEM.L	A4+A1+A0+D1+D0,-(A7)
00020852 41 ee ff f8              |A       |		LEA.L	(A6-0x8),A0
00020856 43 fa ff a4              |C       |		LEA.L	0x207fc,A1
0002085a 22 3c 00 00 00 ff        |"<      |		MOVE.L	#0xff,D1
00020860 2d 7c 00 00 00 56 ff fa  |-|   V  |		MOVE.L	#0x56,(A6-0x6)
00020868 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002086a 48 78 01 01              |Hx      |		PEA.L	0x101
0002086e 28 48                    |(H      |		MOVEA.L	A0,A4
00020870 4e 91                    |N       |		JSR	(A1)
00020872 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020874 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020876 41 81                    |A       |		CHK.W	D1,D0
00020878 3b 40 00 50              |;@ P    |		MOVE.W	D0,(A5+0x50)
0002087c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002087e 48 78 01 02              |Hx      |		PEA.L	0x102
00020882 28 48                    |(H      |		MOVEA.L	A0,A4
00020884 4e 91                    |N       |		JSR	(A1)
00020886 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020888 30 1f                    |0       |		MOVE.W	(A7)+,D0
0002088a e1 40                    | @      |		ASL.W	#0x8,D0
0002088c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002088e 48 78 01 03              |Hx      |		PEA.L	0x103
00020892 28 48                    |(H      |		MOVEA.L	A0,A4
00020894 4e 91                    |N       |		JSR	(A1)
00020896 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020898 d0 5f                    | _      |		ADD.W	(A7)+,D0
0002089a 0c 40 ff ff              | @      |		CMPI.W	#0xffff,D0
0002089e 63 02                    |c       |		BLS	0x208a2
000208a0 4e 4f                    |NO      |		TRAP	#15
000208a2 3b 40 00 52              |;@ R    |		MOVE.W	D0,(A5+0x52)
000208a6 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000208a8 48 78 01 04              |Hx      |		PEA.L	0x104
000208ac 28 48                    |(H      |		MOVEA.L	A0,A4
000208ae 4e 91                    |N       |		JSR	(A1)
000208b0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208b2 30 1f                    |0       |		MOVE.W	(A7)+,D0
000208b4 41 81                    |A       |		CHK.W	D1,D0
000208b6 3b 40 00 54              |;@ T    |		MOVE.W	D0,(A5+0x54)
000208ba 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000208bc 48 78 01 05              |Hx      |		PEA.L	0x105
000208c0 28 48                    |(H      |		MOVEA.L	A0,A4
000208c2 4e 91                    |N       |		JSR	(A1)
000208c4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208c6 30 1f                    |0       |		MOVE.W	(A7)+,D0
000208c8 41 81                    |A       |		CHK.W	D1,D0
000208ca 3b 40 00 56              |;@ V    |		MOVE.W	D0,(A5+0x56)
000208ce 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000208d0 48 78 01 06              |Hx      |		PEA.L	0x106
000208d4 28 48                    |(H      |		MOVEA.L	A0,A4
000208d6 4e 91                    |N       |		JSR	(A1)
000208d8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208da 30 1f                    |0       |		MOVE.W	(A7)+,D0
000208dc 41 81                    |A       |		CHK.W	D1,D0
000208de 10 80                    |        |		MOVE.B	D0,(A0)
000208e0 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000208e2 48 78 01 07              |Hx      |		PEA.L	0x107
000208e6 28 48                    |(H      |		MOVEA.L	A0,A4
000208e8 4e 91                    |N       |		JSR	(A1)
000208ea 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208ec 30 1f                    |0       |		MOVE.W	(A7)+,D0
000208ee 41 81                    |A       |		CHK.W	D1,D0
000208f0 1d 40 ff f9              | @      |		MOVE.B	D0,(A6-0x7)
000208f4 3f 10                    |?       |		MOVE.W	(A0),-(A7)
000208f6 48 6d 00 58              |Hm X    |		PEA.L	(A5+0x58)
000208fa 4e ba fd 5a              |N  Z    |		JSR	0x20656
000208fe 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020900 48 78 01 08              |Hx      |		PEA.L	0x108
00020904 28 48                    |(H      |		MOVEA.L	A0,A4
00020906 4e 91                    |N       |		JSR	(A1)
00020908 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002090a 30 1f                    |0       |		MOVE.W	(A7)+,D0
0002090c 41 81                    |A       |		CHK.W	D1,D0
0002090e 10 80                    |        |		MOVE.B	D0,(A0)
00020910 42 2d 00 5c              |B- \    |		CLR.B	(A5+0x5c)
00020914 20 2e ff fa              | .      |		MOVE.L	(A6-0x6),D0
00020918 c0 81                    |        |		AND.L	D1,D0
0002091a 66 04                    |f       |		BNE	0x20920
0002091c 52 2d 00 5c              |R- \    |		ADDQ.B	#0x1,(A5+0x5c)
00020920 4c df 13 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A4
00020924 4e 5e                    |N^      |		UNLK	A6
00020926 4e 75                    |Nu      |		RTS
00020928 ; --------------------------------------------------------------------------------------
00020928 ; OMSI PASCAL Function
00020928 ;    <LVAR  0x00c 2(w)>
00020928 ;    <LVAR  0x008 4(r)>
00020928 ;    <LVAR -0x004 @ 2(r)>
00020928 ; --------------------------------------------------------------------------------------
00020928 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2		; Spelunked
0002092c bf d5                    |        |		CMPA.L	(A5),A7
0002092e 62 06                    |b       |		BHI	0x20936
00020930 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020934 4e 76                    |Nv      |		TRAPV
00020936 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
0002093a 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
0002093e 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
00020942 42 51                    |BQ      |		CLR.W	(A1)
00020944 20 14                    |        |		MOVE.L	(A4),D0
00020946 d0 ae 00 08              |        |		ADD.L	(A6+0x8),D0
0002094a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002094c 20 49                    | I      |		MOVEA.L	A1,A0
0002094e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020950 52 97                    |R       |		ADDQ.L	#0x1,(A7)
00020952 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020956 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002095c de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020960 30 11                    |0       |		MOVE.W	(A1),D0
00020962 48 c0                    |H       |		EXTW.L	D0
00020964 d1 ac 00 06              |        |		ADD.L	D0,(A4+0x6)
00020968 3d 40 00 0c              |=@      |		MOVE.W	D0,(A6+0xc)
0002096c 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00020970 4e 5e                    |N^      |		UNLK	A6
00020972 4e 75                    |Nu      |		RTS
00020974 ; --------------------------------------------------------------------------------------
00020974 ; OMSI PASCAL Function
00020974 ;    <LVAR -0x006 4(r)>
00020974 ;    <LVAR -0x007 1(w)>
00020974 ;    <LVAR -0x008 1(w) 2(r)>
00020974 ;    <LVAR -0x00c @ 4(w)>
00020974 ; --------------------------------------------------------------------------------------
00020974 4e 56 ff a8              |NV      |		LINK.W	A6,#0xffa8
00020978 bf d5                    |        |		CMPA.L	(A5),A7
0002097a 62 06                    |b       |		BHI	0x20982
0002097c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020980 4e 76                    |Nv      |		TRAPV
00020982 de fc 00 4c              |   L    |		ADDA.W	#0x4c,A7
00020986 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
0002098a 43 ee ff f4              |C       |		LEA.L	(A6-0xc),A1
0002098e 45 fa ff 98              |E       |		LEA.L	0x20928,A2
00020992 47 ed 00 24              |G  $    |		LEA.L	(A5+0x24),A3
00020996 22 3c 00 00 00 ff        |"<      |		MOVE.L	#0xff,D1
0002099c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002099e 4e b9 00 02 20 46        |N    F  |		JSR	0x22046
000209a4 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
000209a6 66 32                    |f2      |		BNE	0x209da
000209a8 41 fa f7 d0              |A       |		LEA.L	0x2017a,A0
000209ac 70 07                    |p       |		MOVEQ.L	#0x07,D0
000209ae 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000209b0 51 c8 ff fc              |Q       |		DBF	D0,0x209ae
000209b4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000209b6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000209ba 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000209be 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
000209c2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000209c8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000209ca 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000209d0 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000209d4 42 13                    |B       |		CLR.B	(A3)
000209d6 60 00 00 c6              |`       |		BRA	0x20a9e
000209da 42 ae ff fa              |B       |		CLR.L	(A6-0x6)
000209de 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000209e0 48 78 00 00              |Hx      |		PEA.L	0x0
000209e4 28 49                    |(I      |		MOVEA.L	A1,A4
000209e6 4e 92                    |N       |		JSR	(A2)
000209e8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000209ea 30 1f                    |0       |		MOVE.W	(A7)+,D0
000209ec 41 81                    |A       |		CHK.W	D1,D0
000209ee 3b 40 00 18              |;@      |		MOVE.W	D0,(A5+0x18)
000209f2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000209f4 48 78 00 01              |Hx      |		PEA.L	0x1
000209f8 28 49                    |(I      |		MOVEA.L	A1,A4
000209fa 4e 92                    |N       |		JSR	(A2)
000209fc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000209fe 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a00 e1 40                    | @      |		ASL.W	#0x8,D0
00020a02 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a04 48 78 00 02              |Hx      |		PEA.L	0x2
00020a08 28 49                    |(I      |		MOVEA.L	A1,A4
00020a0a 4e 92                    |N       |		JSR	(A2)
00020a0c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a0e d0 5f                    | _      |		ADD.W	(A7)+,D0
00020a10 0c 40 ff ff              | @      |		CMPI.W	#0xffff,D0
00020a14 63 02                    |c       |		BLS	0x20a18
00020a16 4e 4f                    |NO      |		TRAP	#15
00020a18 3b 40 00 1a              |;@      |		MOVE.W	D0,(A5+0x1a)
00020a1c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a1e 48 78 00 03              |Hx      |		PEA.L	0x3
00020a22 28 49                    |(I      |		MOVEA.L	A1,A4
00020a24 4e 92                    |N       |		JSR	(A2)
00020a26 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a28 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a2a 41 81                    |A       |		CHK.W	D1,D0
00020a2c 3b 40 00 1c              |;@      |		MOVE.W	D0,(A5+0x1c)
00020a30 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a32 48 78 00 04              |Hx      |		PEA.L	0x4
00020a36 28 49                    |(I      |		MOVEA.L	A1,A4
00020a38 4e 92                    |N       |		JSR	(A2)
00020a3a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a3c 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a3e 41 81                    |A       |		CHK.W	D1,D0
00020a40 3b 40 00 1e              |;@      |		MOVE.W	D0,(A5+0x1e)
00020a44 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a46 48 78 00 05              |Hx      |		PEA.L	0x5
00020a4a 28 49                    |(I      |		MOVEA.L	A1,A4
00020a4c 4e 92                    |N       |		JSR	(A2)
00020a4e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a50 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a52 41 81                    |A       |		CHK.W	D1,D0
00020a54 1d 40 ff f8              | @      |		MOVE.B	D0,(A6-0x8)
00020a58 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a5a 48 78 00 06              |Hx      |		PEA.L	0x6
00020a5e 28 49                    |(I      |		MOVEA.L	A1,A4
00020a60 4e 92                    |N       |		JSR	(A2)
00020a62 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a64 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a66 41 81                    |A       |		CHK.W	D1,D0
00020a68 1d 40 ff f9              | @      |		MOVE.B	D0,(A6-0x7)
00020a6c 3f 2e ff f8              |?.      |		MOVE.W	(A6-0x8),-(A7)
00020a70 48 6d 00 20              |Hm      |		PEA.L	(A5+0x20)
00020a74 4e ba fb e0              |N       |		JSR	0x20656
00020a78 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a7a 48 78 00 07              |Hx      |		PEA.L	0x7
00020a7e 28 49                    |(I      |		MOVEA.L	A1,A4
00020a80 4e 92                    |N       |		JSR	(A2)
00020a82 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a84 30 1f                    |0       |		MOVE.W	(A7)+,D0
00020a86 41 81                    |A       |		CHK.W	D1,D0
00020a88 1d 40 ff f8              | @      |		MOVE.B	D0,(A6-0x8)
00020a8c 42 13                    |B       |		CLR.B	(A3)
00020a8e 20 2e ff fa              | .      |		MOVE.L	(A6-0x6),D0
00020a92 c0 81                    |        |		AND.L	D1,D0
00020a94 0c 80 00 00 00 aa        |        |		CMPI.L	#0x000000aa,D0
00020a9a 66 02                    |f       |		BNE	0x20a9e
00020a9c 52 13                    |R       |		ADDQ.B	#0x1,(A3)
00020a9e 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
00020aa2 4e 5e                    |N^      |		UNLK	A6
00020aa4 4e 75                    |Nu      |		RTS
00020aa6 ; --------------------------------------------------------------------------------------
00020aa6 ;  does READ_NOVRAM_DATA.*
00020aa6 ; OMSI PASCAL Function
00020aa6 ;    <LVAR  0x008 1(r)>
00020aa6 ;    <LVAR -0x003 @ 1(r)>
00020aa6 ;    <LVAR -0x004 1(r)>
00020aa6 ;    <LVAR -0x005 @ 1(r)>
00020aa6 ;    <LVAR -0x006 @ 1(r)>
00020aa6 ;    <LVAR -0x007 @ 1(r)>
00020aa6 ;    <LVAR -0x008 1(r)>
00020aa6 ;    <LVAR -0x009 @ 1(r)>
00020aa6 ;    <LVAR -0x00a @ 1(r)>
00020aa6 ; --------------------------------------------------------------------------------------
00020aa6 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6		; Spelunked
00020aaa bf d5                    |        |		CMPA.L	(A5),A7
00020aac 62 06                    |b       |		BHI	0x20ab4
00020aae 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020ab2 4e 76                    |Nv      |		TRAPV
00020ab4 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00020ab8 48 e7 e0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D2+D1+D0,-(A7)
00020abc 41 ee ff f6              |A       |		LEA.L	(A6-0xa),A0
00020ac0 43 ee ff f7              |C       |		LEA.L	(A6-0x9),A1
00020ac4 45 ee ff f9              |E       |		LEA.L	(A6-0x7),A2
00020ac8 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
00020acc 49 ee ff fb              |I       |		LEA.L	(A6-0x5),A4
00020ad0 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020ad4 48 80                    |H       |		EXTB.W	D0
00020ad6 32 00                    |2       |		MOVE.W	D0,D1
00020ad8 55 41                    |UA      |		SUBQ.W	#0x2,D1
00020ada 0c 41 00 0d              | A      |		CMPI.W	#0x000d,D1
00020ade 63 02                    |c       |		BLS	0x20ae2
00020ae0					switch@0x20ae4[0x2]:
00020ae0					switch@0x20ae4[0x3]:
00020ae0					switch@0x20ae4[0x6]:
00020ae0					switch@0x20ae4[0x7]:
00020ae0					switch@0x20ae4[0x8]:
00020ae0					switch@0x20ae4[0x9]:
00020ae0 4e 4e                    |NN      |		TRAP	#14
00020ae2 d2 41                    | A      |		ADD.W	D1,D1
00020ae4 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
00020aec 00 4c                    | L      |		.CONST	0x4c			; [0x0] -> 0x20b38
00020aee 00 62                    | b      |		.CONST	0x62			; [0x1] -> 0x20b4e
00020af0 ff f4                    |        |		.CONST	0xfff4			; [0x2] -> 0x20ae0
00020af2 ff f4                    |        |		.CONST	0xfff4			; [0x3] -> 0x20ae0
00020af4 00 1c                    |        |		.CONST	0x1c			; [0x4] -> 0x20b08
00020af6 00 36                    | 6      |		.CONST	0x36			; [0x5] -> 0x20b22
00020af8 ff f4                    |        |		.CONST	0xfff4			; [0x6] -> 0x20ae0
00020afa ff f4                    |        |		.CONST	0xfff4			; [0x7] -> 0x20ae0
00020afc ff f4                    |        |		.CONST	0xfff4			; [0x8] -> 0x20ae0
00020afe ff f4                    |        |		.CONST	0xfff4			; [0x9] -> 0x20ae0
00020b00 00 78                    | x      |		.CONST	0x78			; [0xa] -> 0x20b64
00020b02 00 78                    | x      |		.CONST	0x78			; [0xb] -> 0x20b64
00020b04 00 78                    | x      |		.CONST	0x78			; [0xc] -> 0x20b64
00020b06 00 78                    | x      |		.CONST	0x78			; [0xd] -> 0x20b64
00020b08					switch@0x20ae4[0x4]:
00020b08 48 50                    |HP      |		PEA.L	(A0)
00020b0a 48 51                    |HQ      |		PEA.L	(A1)
00020b0c 48 52                    |HR      |		PEA.L	(A2)
00020b0e 48 53                    |HS      |		PEA.L	(A3)
00020b10 48 54                    |HT      |		PEA.L	(A4)
00020b12 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020b16 4e b9 00 02 22 3e        |N   ">  |		JSR	exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020b1c de fc 00 18              |        |		ADDA.W	#0x18,A7
00020b20 60 5c                    |`\      |		BRA	0x20b7e
00020b22					switch@0x20ae4[0x5]:
00020b22 48 50                    |HP      |		PEA.L	(A0)
00020b24 48 51                    |HQ      |		PEA.L	(A1)
00020b26 48 52                    |HR      |		PEA.L	(A2)
00020b28 48 53                    |HS      |		PEA.L	(A3)
00020b2a 48 54                    |HT      |		PEA.L	(A4)
00020b2c 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020b30 4e b9 00 02 22 c0        |N   "   |		JSR	exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020b36 60 e4                    |`       |		BRA	0x20b1c
00020b38					switch@0x20ae4[0x0]:
00020b38 48 50                    |HP      |		PEA.L	(A0)
00020b3a 48 51                    |HQ      |		PEA.L	(A1)
00020b3c 48 52                    |HR      |		PEA.L	(A2)
00020b3e 48 53                    |HS      |		PEA.L	(A3)
00020b40 48 54                    |HT      |		PEA.L	(A4)
00020b42 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020b46 4e b9 00 02 21 ee        |N   !   |		JSR	exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020b4c 60 ce                    |`       |		BRA	0x20b1c
00020b4e					switch@0x20ae4[0x1]:
00020b4e 48 50                    |HP      |		PEA.L	(A0)
00020b50 48 51                    |HQ      |		PEA.L	(A1)
00020b52 48 52                    |HR      |		PEA.L	(A2)
00020b54 48 53                    |HS      |		PEA.L	(A3)
00020b56 48 54                    |HT      |		PEA.L	(A4)
00020b58 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020b5c 4e b9 00 02 21 6c        |N   !l  |		JSR	exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020b62 60 b8                    |`       |		BRA	0x20b1c
00020b64					switch@0x20ae4[0xa]:
00020b64					switch@0x20ae4[0xb]:
00020b64					switch@0x20ae4[0xc]:
00020b64					switch@0x20ae4[0xd]:
00020b64 1f 00                    |        |		MOVE.B	D0,-(A7)
00020b66 48 50                    |HP      |		PEA.L	(A0)
00020b68 48 51                    |HQ      |		PEA.L	(A1)
00020b6a 48 52                    |HR      |		PEA.L	(A2)
00020b6c 48 53                    |HS      |		PEA.L	(A3)
00020b6e 48 54                    |HT      |		PEA.L	(A4)
00020b70 48 6e ff fd              |Hn      |		PEA.L	(A6-0x3)
00020b74 4e b9 00 02 24 66        |N   $f  |		JSR	0x22466
00020b7a de fc 00 1a              |        |		ADDA.W	#0x1a,A7
00020b7e c1 fc 00 0e              |        |		MULS.W	#0xe,D0
00020b82 42 81                    |B       |		CLR.L	D1
00020b84 12 10                    |        |		MOVE.B	(A0),D1
00020b86 3b 81 00 18              |;       |		MOVE.W	D1,(A5+D0.W+#0x18)
00020b8a 42 81                    |B       |		CLR.L	D1
00020b8c 12 11                    |        |		MOVE.B	(A1),D1
00020b8e e1 41                    | A      |		ASL.W	#0x8,D1
00020b90 42 82                    |B       |		CLR.L	D2
00020b92 14 2e ff f8              | .      |		MOVE.B	(A6-0x8),D2
00020b96 d4 41                    | A      |		ADD.W	D1,D2
00020b98 3b 82 00 1a              |;       |		MOVE.W	D2,(A5+D0.W+#0x1a)
00020b9c 42 81                    |B       |		CLR.L	D1
00020b9e 12 12                    |        |		MOVE.B	(A2),D1
00020ba0 3b 81 00 1c              |;       |		MOVE.W	D1,(A5+D0.W+#0x1c)
00020ba4 42 81                    |B       |		CLR.L	D1
00020ba6 12 13                    |        |		MOVE.B	(A3),D1
00020ba8 3b 81 00 1e              |;       |		MOVE.W	D1,(A5+D0.W+#0x1e)
00020bac 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020bae 1e 94                    |        |		MOVE.B	(A4),(A7)
00020bb0 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
00020bb6 48 75 00 20              |Hu      |		PEA.L	(A5+D0.W+#0x20)
00020bba 4e ba fa 9a              |N       |		JSR	0x20656
00020bbe 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020bc0 12 2e ff fd              | .      |		MOVE.B	(A6-0x3),D1
00020bc4 48 81                    |H       |		EXTB.W	D1
00020bc6 43 bc 00 01              |C       |		CHK.W	#0x1,D1
00020bca 1b 81 00 24              |   $    |		MOVE.B	D1,(A5+D0.W+#0x24)
00020bce 4c df 1f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3+A4
00020bd2 4e 5e                    |N^      |		UNLK	A6
00020bd4 4e 75                    |Nu      |		RTS
00020bd6 ; --------------------------------------------------------------------------------------
00020bd6 ; OMSI PASCAL Function
00020bd6 ;    <LVAR -0x006 @>
00020bd6 ; --------------------------------------------------------------------------------------
00020bd6 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
00020bda bf d5                    |        |		CMPA.L	(A5),A7
00020bdc 62 06                    |b       |		BHI	0x20be4
00020bde 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020be2 4e 76                    |Nv      |		TRAPV
00020be4 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00020be8 48 e7 83 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D0,-(A7)
00020bec 43 fa fe b8              |C       |		LEA.L	0x20aa6,A1
00020bf0 4e ba fc 4a              |N  J    |		JSR	0x2083c
00020bf4 1f 3c 00 06              | <      |		MOVE.B	#0x06,-(A7)
00020bf8 4e 91                    |N       |		JSR	(A1)
00020bfa 1e bc 00 07              |        |		MOVE.B	#0x07,(A7)
00020bfe 4e 91                    |N       |		JSR	(A1)
00020c00 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00020c04 4e 91                    |N       |		JSR	(A1)
00020c06 1e bc 00 02              |        |		MOVE.B	#0x02,(A7)
00020c0a 4e 91                    |N       |		JSR	(A1)
00020c0c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020c0e 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
00020c10 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020c12 1f 07                    |        |		MOVE.B	D7,-(A7)
00020c14 4e b9 00 01 04 c0        |N       |		JSR	HasBoard(diproc_addr: Byte) : Byte
00020c1a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020c1c 4a 1f                    |J       |		TST.B	(A7)+
00020c1e 67 06                    |g       |		BEQ	0x20c26
00020c20 1f 07                    |        |		MOVE.B	D7,-(A7)
00020c22 4e 91                    |N       |		JSR	(A1)
00020c24 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020c26 52 07                    |R       |		ADDQ.B	#0x1,D7
00020c28 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00020c2c 6f e2                    |o       |		BLE	0x20c10
00020c2e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020c30 4e b9 00 01 06 0a        |N       |		JSR	Is_fc07_four() : Bool
00020c36 4a 1f                    |J       |		TST.B	(A7)+
00020c38 66 0c                    |f       |		BNE	0x20c46
00020c3a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020c3c 4e b9 00 01 06 04        |N       |		JSR	Is_fc07_three() : Bool
00020c42 4a 1f                    |J       |		TST.B	(A7)+
00020c44 67 68                    |gh      |		BEQ	0x20cae
00020c46 48 78 00 00              |Hx      |		PEA.L	0x0
00020c4a 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020c4e 4e b9 00 02 20 9a        |N       |		JSR	0x2209a
00020c54 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020c56 4e ba fd 1c              |N       |		JSR	0x20974
00020c5a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020c5c 4e b9 00 02 20 70        |N    p  |		JSR	0x22070
00020c62 2c 1f                    |,       |		MOVE.L	(A7)+,D6
00020c64 66 32                    |f2      |		BNE	0x20c98
00020c66 41 fa f5 30              |A  0    |		LEA.L	0x20198,A0
00020c6a 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00020c6c 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020c6e 51 c8 ff fc              |Q       |		DBF	D0,0x20c6c
00020c72 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020c74 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020c78 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020c7c 3f 3c 00 1e              |?<      |		MOVE.W	#0x1e,-(A7)
00020c80 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020c86 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020c88 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00020c8e de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00020c92 42 ad 00 f8              |B       |		CLR.L	(A5+0xf8)
00020c96 60 16                    |`       |		BRA	0x20cae
00020c98 2f 06                    |/       |		MOVE.L	D6,-(A7)
00020c9a 41 ed 00 f8              |A       |		LEA.L	(A5+0xf8),A0
00020c9e 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020ca0 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00020ca4 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00020caa de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020cae 4c df 03 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7+A0+A1
00020cb2 4e 5e                    |N^      |		UNLK	A6
00020cb4 4e 75                    |Nu      |		RTS
00020cb6 ; --------------------------------------------------------------------------------------
00020cb6 ; OMSI PASCAL Function
00020cb6 ;    <LVAR  0x00a 4(r)>
00020cb6 ;    <LVAR  0x008 2(r)>
00020cb6 ; --------------------------------------------------------------------------------------
00020cb6 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0		; Spelunked
00020cba bf d5                    |        |		CMPA.L	(A5),A7
00020cbc 62 06                    |b       |		BHI	0x20cc4
00020cbe 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020cc2 4e 76                    |Nv      |		TRAPV
00020cc4 de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020cc8 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00020ccc 2f 2e 00 0a              |/.      |		MOVE.L	(A6+0xa),-(A7)
00020cd0 3f 2e 00 08              |?.      |		MOVE.W	(A6+0x8),-(A7)
00020cd4 4e b9 00 01 05 98        |N       |		JSR	WriteConfig(what: Word; where : Long)
00020cda 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020cdc 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020ce0 48 c0                    |H       |		EXTW.L	D0
00020ce2 d1 94                    |        |		ADD.L	D0,(A4)
00020ce4 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
00020ce8 4e 5e                    |N^      |		UNLK	A6
00020cea 4e 75                    |Nu      |		RTS
00020cec ; --------------------------------------------------------------------------------------
00020cec ; OMSI PASCAL Function
00020cec ;    <LVAR  0x010 1(r)>
00020cec ;    <LVAR  0x00f 1(r)>
00020cec ;    <LVAR  0x00e 1(r)>
00020cec ;    <LVAR  0x00c 1(r)>
00020cec ;    <LVAR  0x00a 1(r)>
00020cec ;    <LVAR  0x009 1(r)>
00020cec ;    <LVAR  0x008 1(r)>
00020cec ;    <LVAR -0x006 @ 4(rw)>
00020cec ; --------------------------------------------------------------------------------------
00020cec 4e 56 ff dc              |NV      |		LINK.W	A6,#0xffdc
00020cf0 bf d5                    |        |		CMPA.L	(A5),A7
00020cf2 62 06                    |b       |		BHI	0x20cfa
00020cf4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020cf8 4e 76                    |Nv      |		TRAPV
00020cfa de fc 00 1e              |        |		ADDA.W	#0x1e,A7
00020cfe 48 e7 81 c8              |H       |		MOVEM.L	A4+A1+A0+D7+D0,-(A7)
00020d02 41 ee ff fa              |A       |		LEA.L	(A6-0x6),A0
00020d06 43 fa ff ae              |C       |		LEA.L	0x20cb6,A1
00020d0a 20 bc 00 00 00 56        |     V  |		MOVE.L	#0x56,(A0)
00020d10 48 78 01 01              |Hx      |		PEA.L	0x101
00020d14 42 80                    |B       |		CLR.L	D0
00020d16 10 2e 00 10              | .      |		MOVE.B	(A6+0x10),D0
00020d1a 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d1c 28 48                    |(H      |		MOVEA.L	A0,A4
00020d1e 4e 91                    |N       |		JSR	(A1)
00020d20 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d22 48 78 01 02              |Hx      |		PEA.L	0x102
00020d26 42 80                    |B       |		CLR.L	D0
00020d28 10 2e 00 0e              | .      |		MOVE.B	(A6+0xe),D0
00020d2c 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d2e 28 48                    |(H      |		MOVEA.L	A0,A4
00020d30 4e 91                    |N       |		JSR	(A1)
00020d32 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d34 48 78 01 03              |Hx      |		PEA.L	0x103
00020d38 42 80                    |B       |		CLR.L	D0
00020d3a 10 2e 00 0f              | .      |		MOVE.B	(A6+0xf),D0
00020d3e 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d40 28 48                    |(H      |		MOVEA.L	A0,A4
00020d42 4e 91                    |N       |		JSR	(A1)
00020d44 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d46 48 78 01 04              |Hx      |		PEA.L	0x104
00020d4a 42 80                    |B       |		CLR.L	D0
00020d4c 10 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D0
00020d50 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d52 28 48                    |(H      |		MOVEA.L	A0,A4
00020d54 4e 91                    |N       |		JSR	(A1)
00020d56 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d58 48 78 01 05              |Hx      |		PEA.L	0x105
00020d5c 42 80                    |B       |		CLR.L	D0
00020d5e 10 2e 00 0a              | .      |		MOVE.B	(A6+0xa),D0
00020d62 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d64 28 48                    |(H      |		MOVEA.L	A0,A4
00020d66 4e 91                    |N       |		JSR	(A1)
00020d68 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d6a 48 78 01 06              |Hx      |		PEA.L	0x106
00020d6e 42 80                    |B       |		CLR.L	D0
00020d70 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020d74 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d76 28 48                    |(H      |		MOVEA.L	A0,A4
00020d78 4e 91                    |N       |		JSR	(A1)
00020d7a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d7c 48 78 01 07              |Hx      |		PEA.L	0x107
00020d80 42 80                    |B       |		CLR.L	D0
00020d82 10 2e 00 09              | .      |		MOVE.B	(A6+0x9),D0
00020d86 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d88 28 48                    |(H      |		MOVEA.L	A0,A4
00020d8a 4e 91                    |N       |		JSR	(A1)
00020d8c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020d8e 20 10                    |        |		MOVE.L	(A0),D0
00020d90 44 80                    |D       |		NEG.L	D0
00020d92 02 80 00 00 00 ff        |        |		ANDI.L	#0x000000ff,D0
00020d98 3e 00                    |>       |		MOVE.W	D0,D7
00020d9a 48 78 01 08              |Hx      |		PEA.L	0x108
00020d9e 3f 07                    |?       |		MOVE.W	D7,-(A7)
00020da0 28 48                    |(H      |		MOVEA.L	A0,A4
00020da2 4e 91                    |N       |		JSR	(A1)
00020da4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020da6 4c df 13 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1+A4
00020daa 4e 5e                    |N^      |		UNLK	A6
00020dac 4e 75                    |Nu      |		RTS
00020dae ; --------------------------------------------------------------------------------------
00020dae ; OMSI PASCAL Function
00020dae ;    <LVAR -0x008 @ 4(r)>
00020dae ; --------------------------------------------------------------------------------------
00020dae 4e 56 ff 8e              |NV      |		LINK.W	A6,#0xff8e
00020db2 bf d5                    |        |		CMPA.L	(A5),A7
00020db4 62 06                    |b       |		BHI	0x20dbc
00020db6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020dba 4e 76                    |Nv      |		TRAPV
00020dbc de fc 00 6a              |   j    |		ADDA.W	#0x6a,A7
00020dc0 48 e7 e1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
00020dc4 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00020dca 47 ee ff f8              |G       |		LEA.L	(A6-0x8),A3
00020dce 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
00020dd4 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020dd6 74 03                    |t       |		MOVEQ.L	#0x03,D2
00020dd8 9e fc 00 36              |   6    |		SUBA.W	#0x36,A7
00020ddc 20 4f                    | O      |		MOVEA.L	A7,A0
00020dde 43 fa f3 b8              |C       |		LEA.L	0x20198,A1
00020de2 70 34                    |p4      |		MOVEQ.L	#0x34,D0
00020de4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020de6 51 c8 ff fc              |Q       |		DBF	D0,0x20de4
00020dea 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020dec 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020df0 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020df2 3f 3c 00 35              |?< 5    |		MOVE.W	#0x35,-(A7)
00020df6 4e 92                    |N       |		JSR	(A2)
00020df8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020dfa 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00020e00 de fc 00 3a              |   :    |		ADDA.W	#0x3a,A7
00020e04 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020e06 4e b9 00 02 1f f2        |N       |		JSR	0x21ff2
00020e0c 10 1f                    |        |		MOVE.B	(A7)+,D0
00020e0e b0 01                    |        |		CMP.B	D1,D0
00020e10 66 02                    |f       |		BNE	0x20e14
00020e12 60 f0                    |`       |		BRA	0x20e04
00020e14 48 78 4c 4b              |HxLK    |		PEA.L	0x4c4b
00020e18 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur: Long)
00020e1e 1e ba f3 ae              |        |		MOVE.B	0x201ce,(A7)
00020e22 1f 7a f3 ab 00 01        | z      |		MOVE.B	0x201cf,(A7+0x1)
00020e28 1f 7a f3 a6 00 02        | z      |		MOVE.B	0x201d0,(A7+0x2)
00020e2e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020e30 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020e34 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020e36 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020e38 4e 92                    |N       |		JSR	(A2)
00020e3a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020e3c 4e 94                    |N       |		JSR	(A4)
00020e3e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020e40 48 78 00 00              |Hx      |		PEA.L	0x0
00020e44 48 53                    |HS      |		PEA.L	(A3)
00020e46 4e b9 00 02 20 c2        |N       |		JSR	0x220c2
00020e4c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020e4e 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020e50 4a 93                    |J       |		TST.L	(A3)
00020e52 67 6c                    |gl      |		BEQ	0x20ec0
00020e54 20 13                    |        |		MOVE.L	(A3),D0
00020e56 0c 80 00 00 00 02        |        |		CMPI.L	#0x00000002,D0
00020e5c 67 62                    |gb      |		BEQ	0x20ec0
00020e5e 41 fa f3 92              |A       |		LEA.L	0x201f2,A0
00020e62 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020e64 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00020e66 51 c8 ff fc              |Q       |		DBF	D0,0x20e64
00020e6a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020e6c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020e70 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020e72 3f 3c 00 20              |?<      |		MOVE.W	#0x20,-(A7)
00020e76 4e 92                    |N       |		JSR	(A2)
00020e78 2e 93                    |.       |		MOVE.L	(A3),(A7)
00020e7a 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00020e80 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020e82 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020e88 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020e8a 4e 94                    |N       |		JSR	(A4)
00020e8c 20 4f                    | O      |		MOVEA.L	A7,A0
00020e8e 43 fa f3 62              |C  b    |		LEA.L	0x201f2,A1
00020e92 70 22                    |p"      |		MOVEQ.L	#0x22,D0
00020e94 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020e96 51 c8 ff fc              |Q       |		DBF	D0,0x20e94
00020e9a 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00020e9c 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020ea0 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020ea2 3f 3c 00 23              |?< #    |		MOVE.W	#0x23,-(A7)
00020ea6 4e 92                    |N       |		JSR	(A2)
00020ea8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020eaa 1e 81                    |        |		MOVE.B	D1,(A7)
00020eac 4e b9 00 01 03 f0        |N       |		JSR	AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00020eb2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020eb4 10 1f                    |        |		MOVE.B	(A7)+,D0
00020eb6 48 80                    |H       |		EXTB.W	D0
00020eb8 41 81                    |A       |		CHK.W	D1,D0
00020eba de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00020ebe 1e 00                    |        |		MOVE.B	D0,D7
00020ec0 4a 07                    |J       |		TST.B	D7
00020ec2 66 00 ff 7c              |f  |    |		BNE	0x20e40
00020ec6 41 fa f3 82              |A       |		LEA.L	0x2024a,A0
00020eca 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020ecc 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00020ece 51 c8 ff fc              |Q       |		DBF	D0,0x20ecc
00020ed2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020ed4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020ed8 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020eda 3f 3c 00 34              |?< 4    |		MOVE.W	#0x34,-(A7)
00020ede 4e 92                    |N       |		JSR	(A2)
00020ee0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020ee2 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00020ee8 de fc 00 38              |   8    |		ADDA.W	#0x38,A7
00020eec 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020eee 4e b9 00 02 1f f2        |N       |		JSR	0x21ff2
00020ef4 4a 1f                    |J       |		TST.B	(A7)+
00020ef6 66 02                    |f       |		BNE	0x20efa
00020ef8 60 f2                    |`       |		BRA	0x20eec
00020efa 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020efc 1e ba f3 4c              |   L    |		MOVE.B	0x2024a,(A7)
00020f00 1f 7a f3 49 00 01        | z I    |		MOVE.B	0x2024b,(A7+0x1)
00020f06 1f 7a f3 44 00 02        | z D    |		MOVE.B	0x2024c,(A7+0x2)
00020f0c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020f0e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020f12 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020f14 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020f16 4e 92                    |N       |		JSR	(A2)
00020f18 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f1a 4e 94                    |N       |		JSR	(A4)
00020f1c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f1e 4c df 1f 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4
00020f22 4e 5e                    |N^      |		UNLK	A6
00020f24 4e 75                    |Nu      |		RTS
00020f26 ; --------------------------------------------------------------------------------------
00020f26 ; OMSI PASCAL Function
00020f26 ;    <LVAR  0x00a 4(r)>
00020f26 ;    <LVAR  0x008 2(r)>
00020f26 ; --------------------------------------------------------------------------------------
00020f26 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8		; Spelunked
00020f2a bf d5                    |        |		CMPA.L	(A5),A7
00020f2c 62 06                    |b       |		BHI	0x20f34
00020f2e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020f32 4e 76                    |Nv      |		TRAPV
00020f34 de fc 00 16              |        |		ADDA.W	#0x16,A7
00020f38 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00020f3c 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
00020f40 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020f42 52 97                    |R       |		ADDQ.L	#0x1,(A7)
00020f44 20 14                    |        |		MOVE.L	(A4),D0
00020f46 d0 ae 00 0a              |        |		ADD.L	(A6+0xa),D0
00020f4a 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020f4c 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020f50 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00020f56 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020f5a 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020f5e 48 c0                    |H       |		EXTW.L	D0
00020f60 d1 ac 00 04              |        |		ADD.L	D0,(A4+0x4)
00020f64 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
00020f68 4e 5e                    |N^      |		UNLK	A6
00020f6a 4e 75                    |Nu      |		RTS
00020f6c ; --------------------------------------------------------------------------------------
00020f6c ; OMSI PASCAL Function
00020f6c ;    <LVAR  0x010 1(r)>
00020f6c ;    <LVAR  0x00f 1(r)>
00020f6c ;    <LVAR  0x00e 1(r)>
00020f6c ;    <LVAR  0x00c 1(r)>
00020f6c ;    <LVAR  0x00a 1(r)>
00020f6c ;    <LVAR  0x009 1(r)>
00020f6c ;    <LVAR  0x008 1(r)>
00020f6c ;    <LVAR -0x006 4(rw)>
00020f6c ;    <LVAR -0x00a @ 4(w)>
00020f6c ; --------------------------------------------------------------------------------------
00020f6c 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
00020f70 bf d5                    |        |		CMPA.L	(A5),A7
00020f72 62 06                    |b       |		BHI	0x20f7a
00020f74 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020f78 4e 76                    |Nv      |		TRAPV
00020f7a de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00020f7e 48 e7 81 e8              |H       |		MOVEM.L	A4+A2+A1+A0+D7+D0,-(A7)
00020f82 43 ee ff f6              |C       |		LEA.L	(A6-0xa),A1
00020f86 45 fa ff 9e              |E       |		LEA.L	0x20f26,A2
00020f8a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020f8c 4e b9 00 02 20 46        |N    F  |		JSR	0x22046
00020f92 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
00020f94 66 30                    |f0      |		BNE	0x20fc6
00020f96 41 fa f2 d2              |A       |		LEA.L	0x2026a,A0
00020f9a 70 06                    |p       |		MOVEQ.L	#0x06,D0
00020f9c 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00020f9e 51 c8 ff fc              |Q       |		DBF	D0,0x20f9c
00020fa2 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
00020fa6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020fa8 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020fac 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020fb0 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
00020fb4 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020fba 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020fbc 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020fc2 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00020fc6 2d 7c 00 00 00 56 ff fa  |-|   V  |		MOVE.L	#0x56,(A6-0x6)
00020fce 48 78 00 00              |Hx      |		PEA.L	0x0
00020fd2 42 80                    |B       |		CLR.L	D0
00020fd4 10 2e 00 10              | .      |		MOVE.B	(A6+0x10),D0
00020fd8 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020fda 28 49                    |(I      |		MOVEA.L	A1,A4
00020fdc 4e 92                    |N       |		JSR	(A2)
00020fde 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020fe0 48 78 00 01              |Hx      |		PEA.L	0x1
00020fe4 42 80                    |B       |		CLR.L	D0
00020fe6 10 2e 00 0e              | .      |		MOVE.B	(A6+0xe),D0
00020fea 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020fec 28 49                    |(I      |		MOVEA.L	A1,A4
00020fee 4e 92                    |N       |		JSR	(A2)
00020ff0 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020ff2 48 78 00 02              |Hx      |		PEA.L	0x2
00020ff6 42 80                    |B       |		CLR.L	D0
00020ff8 10 2e 00 0f              | .      |		MOVE.B	(A6+0xf),D0
00020ffc 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020ffe 28 49                    |(I      |		MOVEA.L	A1,A4
00021000 4e 92                    |N       |		JSR	(A2)
00021002 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021004 48 78 00 03              |Hx      |		PEA.L	0x3
00021008 42 80                    |B       |		CLR.L	D0
0002100a 10 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D0
0002100e 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021010 28 49                    |(I      |		MOVEA.L	A1,A4
00021012 4e 92                    |N       |		JSR	(A2)
00021014 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021016 48 78 00 04              |Hx      |		PEA.L	0x4
0002101a 42 80                    |B       |		CLR.L	D0
0002101c 10 2e 00 0a              | .      |		MOVE.B	(A6+0xa),D0
00021020 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021022 28 49                    |(I      |		MOVEA.L	A1,A4
00021024 4e 92                    |N       |		JSR	(A2)
00021026 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021028 48 78 00 05              |Hx      |		PEA.L	0x5
0002102c 42 80                    |B       |		CLR.L	D0
0002102e 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021032 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021034 28 49                    |(I      |		MOVEA.L	A1,A4
00021036 4e 92                    |N       |		JSR	(A2)
00021038 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002103a 48 78 00 06              |Hx      |		PEA.L	0x6
0002103e 42 80                    |B       |		CLR.L	D0
00021040 10 2e 00 09              | .      |		MOVE.B	(A6+0x9),D0
00021044 3f 00                    |?       |		MOVE.W	D0,-(A7)
00021046 28 49                    |(I      |		MOVEA.L	A1,A4
00021048 4e 92                    |N       |		JSR	(A2)
0002104a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002104c 20 2e ff fa              | .      |		MOVE.L	(A6-0x6),D0
00021050 44 80                    |D       |		NEG.L	D0
00021052 02 80 00 00 00 ff        |        |		ANDI.L	#0x000000ff,D0
00021058 3e 00                    |>       |		MOVE.W	D0,D7
0002105a 48 78 00 07              |Hx      |		PEA.L	0x7
0002105e 3f 07                    |?       |		MOVE.W	D7,-(A7)
00021060 28 49                    |(I      |		MOVEA.L	A1,A4
00021062 4e 92                    |N       |		JSR	(A2)
00021064 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021066 4e ba fd 46              |N  F    |		JSR	0x20dae
0002106a 4c df 17 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0+A1+A2+A4
0002106e 4e 5e                    |N^      |		UNLK	A6
00021070 4e 75                    |Nu      |		RTS
00021072 ; --------------------------------------------------------------------------------------
00021072 ; OMSI PASCAL Function
00021072 ;    <LVAR  0x008 1(r)>
00021072 ;    <LVAR -0x004 1(rw)>
00021072 ;    <LVAR -0x005 1(rw)>
00021072 ;    <LVAR -0x006 1(rw)>
00021072 ;    <LVAR -0x007 1(rw)>
00021072 ;    <LVAR -0x008 1(rw)>
00021072 ;    <LVAR -0x009 1(rw)>
00021072 ;    <LVAR -0x00a 1(rw)>
00021072 ; --------------------------------------------------------------------------------------
00021072 4e 56 ff b8              |NV      |		LINK.W	A6,#0xffb8
00021076 bf d5                    |        |		CMPA.L	(A5),A7
00021078 62 06                    |b       |		BHI	0x21080
0002107a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002107e 4e 76                    |Nv      |		TRAPV
00021080 de fc 00 3e              |   >    |		ADDA.W	#0x3e,A7
00021084 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00021088 41 ee ff f6              |A       |		LEA.L	(A6-0xa),A0
0002108c 43 ee ff f7              |C       |		LEA.L	(A6-0x9),A1
00021090 45 ee ff f8              |E       |		LEA.L	(A6-0x8),A2
00021094 47 ee ff f9              |G       |		LEA.L	(A6-0x7),A3
00021098 49 ee ff fa              |I       |		LEA.L	(A6-0x6),A4
0002109c 3a 3c 00 ff              |:<      |		MOVE.W	#0xff,D5
000210a0 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000210a4 48 80                    |H       |		EXTB.W	D0
000210a6 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
000210a8 c3 c0                    |        |		MULS.W	D0,D1
000210aa 34 35 10 18              |45      |		MOVE.W	(A5+D1.W+#0x18),D2
000210ae 45 85                    |E       |		CHK.W	D5,D2
000210b0 10 82                    |        |		MOVE.B	D2,(A0)
000210b2 34 35 10 1a              |45      |		MOVE.W	(A5+D1.W+#0x1a),D2
000210b6 e0 4a                    | J      |		LSR.W	#0x8,D2
000210b8 12 82                    |        |		MOVE.B	D2,(A1)
000210ba 34 35 10 1a              |45      |		MOVE.W	(A5+D1.W+#0x1a),D2
000210be c4 45                    | E      |		AND.W	D5,D2
000210c0 14 82                    |        |		MOVE.B	D2,(A2)
000210c2 34 35 10 1c              |45      |		MOVE.W	(A5+D1.W+#0x1c),D2
000210c6 45 85                    |E       |		CHK.W	D5,D2
000210c8 16 82                    |        |		MOVE.B	D2,(A3)
000210ca 34 35 10 1e              |45      |		MOVE.W	(A5+D1.W+#0x1e),D2
000210ce 45 85                    |E       |		CHK.W	D5,D2
000210d0 18 82                    |        |		MOVE.B	D2,(A4)
000210d2 42 82                    |B       |		CLR.L	D2
000210d4 14 35 10 22              | 5 "    |		MOVE.B	(A5+D1.W+#0x22),D2
000210d8 e2 0a                    |        |		LSR.B	#0x1,D2
000210da e3 42                    | B      |		ASL.W	#0x1,D2
000210dc 36 35 10 22              |65 "    |		MOVE.W	(A5+D1.W+#0x22),D3
000210e0 ef 4b                    | K      |		LSL.W	#0x7,D3
000210e2 e0 4b                    | K      |		LSR.W	#0x8,D3
000210e4 e8 4b                    | K      |		LSR.W	#0x4,D3
000210e6 38 03                    |8       |		MOVE.W	D3,D4
000210e8 e6 44                    | D      |		ASR.W	#0x3,D4
000210ea 02 44 00 01              | D      |		ANDI.W	#0x0001,D4
000210ee d8 42                    | B      |		ADD.W	D2,D4
000210f0 1d 44 ff fb              | D      |		MOVE.B	D4,(A6-0x5)
000210f4 02 43 00 07              | C      |		ANDI.W	#0x0007,D3
000210f8 eb 43                    | C      |		ASL.W	#0x5,D3
000210fa 42 82                    |B       |		CLR.L	D2
000210fc 14 35 10 23              | 5 #    |		MOVE.B	(A5+D1.W+#0x23),D2
00021100 e7 0a                    |        |		LSL.B	#0x3,D2
00021102 e6 0a                    |        |		LSR.B	#0x3,D2
00021104 d4 43                    | C      |		ADD.W	D3,D2
00021106 1d 42 ff fc              | B      |		MOVE.B	D2,(A6-0x4)
0002110a 32 00                    |2       |		MOVE.W	D0,D1
0002110c 0c 41 00 0f              | A      |		CMPI.W	#0x000f,D1
00021110 63 02                    |c       |		BLS	0x21114
00021112					switch@0x21116[0x1]:
00021112					switch@0x21116[0x5]:
00021112					switch@0x21116[0x8]:
00021112					switch@0x21116[0x9]:
00021112					switch@0x21116[0xa]:
00021112					switch@0x21116[0xb]:
00021112 4e 4e                    |NN      |		TRAP	#14
00021114 d2 41                    | A      |		ADD.W	D1,D1
00021116 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
0002111e 00 20                    |        |		.CONST	0x20			; [0x0] -> 0x2113e
00021120 ff f4                    |        |		.CONST	0xfff4			; [0x1] -> 0x21112
00021122 00 ce                    |        |		.CONST	0xce			; [0x2] -> 0x211ec
00021124 00 aa                    |        |		.CONST	0xaa			; [0x3] -> 0x211c8
00021126 00 46                    | F      |		.CONST	0x46			; [0x4] -> 0x21164
00021128 ff f4                    |        |		.CONST	0xfff4			; [0x5] -> 0x21112
0002112a 00 66                    | f      |		.CONST	0x66			; [0x6] -> 0x21184
0002112c 00 88                    |        |		.CONST	0x88			; [0x7] -> 0x211a6
0002112e ff f4                    |        |		.CONST	0xfff4			; [0x8] -> 0x21112
00021130 ff f4                    |        |		.CONST	0xfff4			; [0x9] -> 0x21112
00021132 ff f4                    |        |		.CONST	0xfff4			; [0xa] -> 0x21112
00021134 ff f4                    |        |		.CONST	0xfff4			; [0xb] -> 0x21112
00021136 00 f2                    |        |		.CONST	0xf2			; [0xc] -> 0x21210
00021138 00 f2                    |        |		.CONST	0xf2			; [0xd] -> 0x21210
0002113a 00 f2                    |        |		.CONST	0xf2			; [0xe] -> 0x21210
0002113c 00 f2                    |        |		.CONST	0xf2			; [0xf] -> 0x21210
0002113e					switch@0x21116[0x0]:
0002113e 1f 10                    |        |		MOVE.B	(A0),-(A7)
00021140 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021142 1e 91                    |        |		MOVE.B	(A1),(A7)
00021144 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
00021148 1f 13                    |        |		MOVE.B	(A3),-(A7)
0002114a 1f 14                    |        |		MOVE.B	(A4),-(A7)
0002114c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002114e 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
00021152 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
00021158 4e ba fe 12              |N       |		JSR	0x20f6c
0002115c de fc 00 0a              |        |		ADDA.W	#0xa,A7
00021160 60 00 00 d4              |`       |		BRA	0x21236
00021164					switch@0x21116[0x4]:
00021164 1f 10                    |        |		MOVE.B	(A0),-(A7)
00021166 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021168 1e 91                    |        |		MOVE.B	(A1),(A7)
0002116a 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
0002116e 1f 13                    |        |		MOVE.B	(A3),-(A7)
00021170 1f 14                    |        |		MOVE.B	(A4),-(A7)
00021172 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021174 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
00021178 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
0002117e 4e ba fb 6c              |N  l    |		JSR	0x20cec
00021182 60 d8                    |`       |		BRA	0x2115c
00021184					switch@0x21116[0x6]:
00021184 1f 10                    |        |		MOVE.B	(A0),-(A7)
00021186 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021188 1e 91                    |        |		MOVE.B	(A1),(A7)
0002118a 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
0002118e 1f 13                    |        |		MOVE.B	(A3),-(A7)
00021190 1f 14                    |        |		MOVE.B	(A4),-(A7)
00021192 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021194 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
00021198 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
0002119e 4e b9 00 02 22 16        |N   "   |		JSR	exp_WRITE_NOVRAM_DATA.TYP(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
000211a4 60 b6                    |`       |		BRA	0x2115c
000211a6					switch@0x21116[0x7]:
000211a6 1f 10                    |        |		MOVE.B	(A0),-(A7)
000211a8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211aa 1e 91                    |        |		MOVE.B	(A1),(A7)
000211ac 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
000211b0 1f 13                    |        |		MOVE.B	(A3),-(A7)
000211b2 1f 14                    |        |		MOVE.B	(A4),-(A7)
000211b4 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211b6 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
000211ba 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
000211c0 4e b9 00 02 22 98        |N   "   |		JSR	exp_WRITE_NOVRAM_DATA.VAL(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
000211c6 60 94                    |`       |		BRA	0x2115c
000211c8					switch@0x21116[0x3]:
000211c8 1f 10                    |        |		MOVE.B	(A0),-(A7)
000211ca 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211cc 1e 91                    |        |		MOVE.B	(A1),(A7)
000211ce 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
000211d2 1f 13                    |        |		MOVE.B	(A3),-(A7)
000211d4 1f 14                    |        |		MOVE.B	(A4),-(A7)
000211d6 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211d8 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
000211dc 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
000211e2 4e b9 00 02 21 12        |N   !   |		JSR	exp_WRITE_NOVRAM_DATA.FIU(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
000211e8 60 00 ff 72              |`  r    |		BRA	0x2115c
000211ec					switch@0x21116[0x2]:
000211ec 1f 10                    |        |		MOVE.B	(A0),-(A7)
000211ee 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211f0 1e 91                    |        |		MOVE.B	(A1),(A7)
000211f2 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
000211f6 1f 13                    |        |		MOVE.B	(A3),-(A7)
000211f8 1f 14                    |        |		MOVE.B	(A4),-(A7)
000211fa 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211fc 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
00021200 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
00021206 4e b9 00 02 21 94        |N   !   |		JSR	exp_WRITE_NOVRAM_DATA.SEQ(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2)
0002120c 60 00 ff 4e              |`  N    |		BRA	0x2115c
00021210					switch@0x21116[0xc]:
00021210					switch@0x21116[0xd]:
00021210					switch@0x21116[0xe]:
00021210					switch@0x21116[0xf]:
00021210 1f 00                    |        |		MOVE.B	D0,-(A7)
00021212 1f 10                    |        |		MOVE.B	(A0),-(A7)
00021214 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021216 1e 91                    |        |		MOVE.B	(A1),(A7)
00021218 1f 52 00 01              | R      |		MOVE.B	(A2),(A7+0x1)
0002121c 1f 13                    |        |		MOVE.B	(A3),-(A7)
0002121e 1f 14                    |        |		MOVE.B	(A4),-(A7)
00021220 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021222 1e ae ff fb              |        |		MOVE.B	(A6-0x5),(A7)
00021226 1f 6e ff fc 00 01        | n      |		MOVE.B	(A6-0x4),(A7+0x1)
0002122c 4e b9 00 02 23 46        |N   #F  |		JSR	0x22346
00021232 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00021236 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002123a 4e 5e                    |N^      |		UNLK	A6
0002123c 4e 75                    |Nu      |		RTS
0002123e ; --------------------------------------------------------------------------------------
0002123e ; OMSI PASCAL Function
0002123e ;    <LVAR  0x018 2(w)>
0002123e ;    <LVAR  0x014 @ 4(r)>
0002123e ;    <LVAR  0x010 4(r)>
0002123e ;    <LVAR  0x00c 4(r)>
0002123e ;    <LVAR  0x008 4(r)>
0002123e ;    <LVAR -0x006 @ 4(rw)>
0002123e ;    <LVAR -0x00a @ 4(rw)>
0002123e ;    <LVAR -0x00c @ 1(rw)>
0002123e ; --------------------------------------------------------------------------------------
0002123e 4e 56 ff 7c              |NV |    |		LINK.W	A6,#0xff7c
00021242 bf d5                    |        |		CMPA.L	(A5),A7
00021244 62 06                    |b       |		BHI	0x2124c
00021246 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002124a 4e 76                    |Nv      |		TRAPV
0002124c de fc 00 78              |   x    |		ADDA.W	#0x78,A7
00021250 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
00021254 43 ee ff f4              |C       |		LEA.L	(A6-0xc),A1
00021258 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
0002125e 47 ee ff f6              |G       |		LEA.L	(A6-0xa),A3
00021262 49 ee ff fa              |I       |		LEA.L	(A6-0x6),A4
00021266 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021268 74 0c                    |t       |		MOVEQ.L	#0x0c,D2
0002126a 76 02                    |v       |		MOVEQ.L	#0x02,D3
0002126c 78 04                    |x       |		MOVEQ.L	#0x04,D4
0002126e 3f 3a f0 20              |?:      |		MOVE.W	0x20290,-(A7)
00021272 2f 3a f0 1e              |/:      |		MOVE.L	0x20292,-(A7)
00021276 9e c2                    |        |		SUBA.W	D2,A7
00021278 2f 2e 00 14              |/.      |		MOVE.L	(A6+0x14),-(A7)
0002127c 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00021282 48 6f 00 14              |Ho      |		PEA.L	(A7+0x14)
00021286 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021288 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002128a 4e 92                    |N       |		JSR	(A2)
0002128c 2e ae 00 10              |.       |		MOVE.L	(A6+0x10),(A7)
00021290 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021296 48 6f 00 18              |Ho      |		PEA.L	(A7+0x18)
0002129a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002129c 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002129e 4e 92                    |N       |		JSR	(A2)
000212a0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000212a2 4e b9 00 01 02 d8        |N       |		JSR	StringCat4(a, b, c, d : String) : String
000212a8 de fc 00 10              |        |		ADDA.W	#0x10,A7
000212ac 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
000212b2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000212b4 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
000212b6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000212b8 20 53                    | S      |		MOVEA.L	(A3),A0
000212ba 4a 50                    |JP      |		TST.W	(A0)
000212bc 66 12                    |f       |		BNE	0x212d0
000212be 12 81                    |        |		MOVE.B	D1,(A1)
000212c0 28 ae 00 10              |(       |		MOVE.L	(A6+0x10),(A4)
000212c4 48 53                    |HS      |		PEA.L	(A3)
000212c6 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
000212cc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000212ce 60 24                    |`$      |		BRA	0x212f4
000212d0 2f 13                    |/       |		MOVE.L	(A3),-(A7)
000212d2 48 51                    |HQ      |		PEA.L	(A1)
000212d4 48 54                    |HT      |		PEA.L	(A4)
000212d6 4e b9 00 01 02 ec        |N       |		JSR	String2Long(src : String; VAR status : Bool; VAR retval : Long)
000212dc de c2                    |        |		ADDA.W	D2,A7
000212de 4a 11                    |J       |		TST.B	(A1)
000212e0 67 12                    |g       |		BEQ	0x212f4
000212e2 42 11                    |B       |		CLR.B	(A1)
000212e4 20 14                    |        |		MOVE.L	(A4),D0
000212e6 b0 ae 00 0c              |        |		CMP.L	(A6+0xc),D0
000212ea 6d 08                    |m       |		BLT	0x212f4
000212ec b0 ae 00 08              |        |		CMP.L	(A6+0x8),D0
000212f0 6e 02                    |n       |		BGT	0x212f4
000212f2 52 11                    |R       |		ADDQ.B	#0x1,(A1)
000212f4 4a 11                    |J       |		TST.B	(A1)
000212f6 66 60                    |f`      |		BNE	0x21358
000212f8 41 fa ef 96              |A       |		LEA.L	0x20290,A0
000212fc 70 12                    |p       |		MOVEQ.L	#0x12,D0
000212fe 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021300 51 c8 ff fc              |Q       |		DBF	D0,0x212fe
00021304 2f 3a ef 90              |/:      |		MOVE.L	0x20296,-(A7)
00021308 3f 3a ef 90              |?:      |		MOVE.W	0x2029a,-(A7)
0002130c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002130e 48 6f 00 0e              |Ho      |		PEA.L	(A7+0xe)
00021312 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021314 3f 3c 00 26              |?< &    |		MOVE.W	#0x26,-(A7)
00021318 4e 92                    |N       |		JSR	(A2)
0002131a 2e ae 00 0c              |.       |		MOVE.L	(A6+0xc),(A7)
0002131e 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021324 48 6f 00 12              |Ho      |		PEA.L	(A7+0x12)
00021328 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002132a 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002132c 4e 92                    |N       |		JSR	(A2)
0002132e 2e ae 00 08              |.       |		MOVE.L	(A6+0x8),(A7)
00021332 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021338 48 6f 00 18              |Ho      |		PEA.L	(A7+0x18)
0002133c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002133e 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021340 4e 92                    |N       |		JSR	(A2)
00021342 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021344 4e b9 00 01 02 dc        |N       |		JSR	StringCat5(a, b, c, d, e : String) : String
0002134a de fc 00 14              |        |		ADDA.W	#0x14,A7
0002134e 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021354 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00021358 4a 11                    |J       |		TST.B	(A1)
0002135a 67 00 ff 12              |g       |		BEQ	0x2126e
0002135e 48 6e 00 14              |Hn      |		PEA.L	(A6+0x14)
00021362 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00021368 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002136a 20 14                    |        |		MOVE.L	(A4),D0
0002136c 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00021372 63 02                    |c       |		BLS	0x21376
00021374 4e 4f                    |NO      |		TRAP	#15
00021376 3d 40 00 18              |=@      |		MOVE.W	D0,(A6+0x18)
0002137a 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
0002137e 4e 5e                    |N^      |		UNLK	A6
00021380 4e 75                    |Nu      |		RTS
00021382 ; --------------------------------------------------------------------------------------
00021382 ; OMSI PASCAL Function
00021382 ;    <LVAR  0x00c 4(r)>
00021382 ;    <LVAR  0x008 4(r)>
00021382 ;    <LVAR -0x007 1(rw)>
00021382 ;    <LVAR -0x008 1(rw)>
00021382 ;    <LVAR -0x009 1(rw)>
00021382 ;    <LVAR -0x00a @ 1(rw)>
00021382 ;    <LVAR -0x00e @ 4(rw)>
00021382 ;    <LVAR -0x010 @ 1(rw)>
00021382 ; --------------------------------------------------------------------------------------
00021382 4e 56 ff 96              |NV      |		LINK.W	A6,#0xff96
00021386 bf d5                    |        |		CMPA.L	(A5),A7
00021388 62 06                    |b       |		BHI	0x21390
0002138a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002138e 4e 76                    |Nv      |		TRAPV
00021390 de fc 00 5a              |   Z    |		ADDA.W	#0x5a,A7
00021394 48 e7 fd f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00021398 45 ee ff f2              |E       |		LEA.L	(A6-0xe),A2
0002139c 47 ee 00 08              |G       |		LEA.L	(A6+0x8),A3
000213a0 49 f9 00 01 02 c4        |I       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A4
000213a6 74 01                    |t       |		MOVEQ.L	#0x01,D2
000213a8 76 09                    |v       |		MOVEQ.L	#0x09,D3
000213aa 78 7d                    |x}      |		MOVEQ.L	#0x7d,D4
000213ac 7a 0c                    |z       |		MOVEQ.L	#0x0c,D5
000213ae 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000213b0 20 53                    | S      |		MOVEA.L	(A3),A0
000213b2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000213b4 1e 90                    |        |		MOVE.B	(A0),(A7)
000213b6 1f 68 00 01 00 01        | h      |		MOVE.B	(A0+0x1),(A7+0x1)
000213bc 1f 68 00 02 00 02        | h      |		MOVE.B	(A0+0x2),(A7+0x2)
000213c2 1f 68 00 03 00 03        | h      |		MOVE.B	(A0+0x3),(A7+0x3)
000213c8 4e b9 00 01 03 08        |N       |		JSR	TimeToText()
000213ce 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213d0 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
000213d2 20 52                    | R      |		MOVEA.L	(A2),A0
000213d4 2f 08                    |/       |		MOVE.L	A0,-(A7)
000213d6 7e 0a                    |~       |		MOVEQ.L	#0x0a,D7
000213d8 20 07                    |        |		MOVE.L	D7,D0
000213da 90 83                    |        |		SUB.L	D3,D0
000213dc 53 80                    |S       |		SUBQ.L	#0x1,D0
000213de b0 84                    |        |		CMP.L	D4,D0
000213e0 63 02                    |c       |		BLS	0x213e4
000213e2 4e 4f                    |NO      |		TRAP	#15
000213e4 20 57                    | W      |		MOVEA.L	(A7),A0
000213e6 22 07                    |"       |		MOVE.L	D7,D1
000213e8 53 81                    |S       |		SUBQ.L	#0x1,D1
000213ea b2 84                    |        |		CMP.L	D4,D1
000213ec 63 02                    |c       |		BLS	0x213f0
000213ee 4e 4f                    |NO      |		TRAP	#15
000213f0 11 b0 18 02 08 02        |        |		MOVE.B	(A0+D1.L+#0x2),(A0+D0.L+#0x2)
000213f6 52 87                    |R       |		ADDQ.L	#0x1,D7
000213f8 0c 87 00 00 00 12        |        |		CMPI.L	#0x00000012,D7
000213fe 6f d8                    |o       |		BLE	0x213d8
00021400 20 57                    | W      |		MOVEA.L	(A7),A0
00021402 30 83                    |0       |		MOVE.W	D3,(A0)
00021404 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021406 3e ba ee 94              |>       |		MOVE.W	0x2029c,(A7)
0002140a 2f 3a ee 92              |/:      |		MOVE.L	0x2029e,-(A7)
0002140e 9e c5                    |        |		SUBA.W	D5,A7
00021410 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00021414 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
0002141a 48 6f 00 14              |Ho      |		PEA.L	(A7+0x14)
0002141e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021420 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00021424 4e 94                    |N       |		JSR	(A4)
00021426 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021428 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002142a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002142c 48 6f 00 18              |Ho      |		PEA.L	(A7+0x18)
00021430 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021432 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00021436 4e 94                    |N       |		JSR	(A4)
00021438 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002143a 4e b9 00 01 02 d8        |N       |		JSR	StringCat4(a, b, c, d : String) : String
00021440 de fc 00 10              |        |		ADDA.W	#0x10,A7
00021444 4e b9 00 01 03 e4        |N       |		JSR	AskConsoleString(prompt : String) : String
0002144a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002144c 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
0002144e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021450 20 52                    | R      |		MOVEA.L	(A2),A0
00021452 4a 50                    |JP      |		TST.W	(A0)
00021454 66 28                    |f(      |		BNE	0x2147e
00021456 48 52                    |HR      |		PEA.L	(A2)
00021458 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
0002145e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021460 20 53                    | S      |		MOVEA.L	(A3),A0
00021462 1d 50 ff f6              | P      |		MOVE.B	(A0),(A6-0xa)
00021466 1d 68 00 01 ff f7        | h      |		MOVE.B	(A0+0x1),(A6-0x9)
0002146c 1d 68 00 02 ff f8        | h      |		MOVE.B	(A0+0x2),(A6-0x8)
00021472 1d 68 00 03 ff f9        | h      |		MOVE.B	(A0+0x3),(A6-0x7)
00021478 1d 42 ff f0              | B      |		MOVE.B	D2,(A6-0x10)
0002147c 60 40                    |`@      |		BRA	0x214be
0002147e 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
00021482 20 4f                    | O      |		MOVEA.L	A7,A0
00021484 43 fa ee 1c              |C       |		LEA.L	0x202a2,A1
00021488 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002148a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002148c 51 c8 ff fc              |Q       |		DBF	D0,0x2148a
00021490 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021492 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021496 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021498 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002149a 4e 94                    |N       |		JSR	(A4)
0002149c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002149e 2e 92                    |.       |		MOVE.L	(A2),(A7)
000214a0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000214a6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000214a8 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
000214aa 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000214ac 2e 92                    |.       |		MOVE.L	(A2),(A7)
000214ae 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
000214b2 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
000214b6 4e b9 00 01 03 10        |N       |		JSR	ConvertTimestamp(MOD input : String; b : L; VAR status : Bool)
000214bc de c5                    |        |		ADDA.W	D5,A7
000214be 4a 2e ff f0              |J.      |		TST.B	(A6-0x10)
000214c2 67 00 fe ea              |g       |		BEQ	0x213ae
000214c6 20 53                    | S      |		MOVEA.L	(A3),A0
000214c8 10 ae ff f6              |        |		MOVE.B	(A6-0xa),(A0)
000214cc 11 6e ff f7 00 01        | n      |		MOVE.B	(A6-0x9),(A0+0x1)
000214d2 11 6e ff f8 00 02        | n      |		MOVE.B	(A6-0x8),(A0+0x2)
000214d8 11 6e ff f9 00 03        | n      |		MOVE.B	(A6-0x7),(A0+0x3)
000214de 4c df 1f bf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
000214e2 4e 5e                    |N^      |		UNLK	A6
000214e4 4e 75                    |Nu      |		RTS
000214e6 ; --------------------------------------------------------------------------------------
000214e6 ; OMSI PASCAL Function
000214e6 ;    <LVAR  0x008 1(r)>
000214e6 ; --------------------------------------------------------------------------------------
000214e6					ReEnterBoard(?):
000214e6 4e 56 ff 6e              |NV n    |		LINK.W	A6,#0xff6e
000214ea bf d5                    |        |		CMPA.L	(A5),A7
000214ec 62 06                    |b       |		BHI	0x214f4
000214ee 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000214f2 4e 76                    |Nv      |		TRAPV
000214f4 de fc 00 90              |        |		ADDA.W	#0x90,A7
000214f8 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000214fc 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021502 47 f8 00 00              |G       |		LEA.L	0x0,A3
00021506 49 fa fd 36              |I  6    |		LEA.L	0x2123e,A4
0002150a 76 01                    |v       |		MOVEQ.L	#0x01,D3
0002150c 78 10                    |x       |		MOVEQ.L	#0x10,D4
0002150e 7a 12                    |z       |		MOVEQ.L	#0x12,D5
00021510 3c 3c 00 ff              |<<      |		MOVE.W	#0xff,D6
00021514 7e 14                    |~       |		MOVEQ.L	#0x14,D7
00021516 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
0002151a 48 80                    |H       |		EXTB.W	D0
0002151c 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
0002151e c3 c0                    |        |		MULS.W	D0,D1
00021520 4a 35 10 24              |J5 $    |		TST.B	(A5+D1.W+#0x24)
00021524 66 00 00 c4              |f       |		BNE	0x215ea
00021528 9e fc 00 40              |   @    |		SUBA.W	#0x40,A7
0002152c 20 4f                    | O      |		MOVEA.L	A7,A0
0002152e 43 fa ed e6              |C       |		LEA.L	0x20316,A1
00021532 74 3e                    |t>      |		MOVEQ.L	#0x3e,D2
00021534 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021536 51 ca ff fc              |Q       |		DBF	D2,0x21534
0002153a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002153c 1f 00                    |        |		MOVE.B	D0,-(A7)
0002153e 4e ba f1 7e              |N  ~    |		JSR	GetBoardName(&String, Byte)
00021542 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021544 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00021548 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002154a 3f 3c 00 3f              |?< ?    |		MOVE.W	#0x3f,-(A7)
0002154e 4e 92                    |N       |		JSR	(A2)
00021550 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021552 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021558 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002155a 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021560 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00021564 4e b9 00 01 06 0a        |N       |		JSR	Is_fc07_four() : Bool
0002156a 4a 1f                    |J       |		TST.B	(A7)+
0002156c 66 0c                    |f       |		BNE	0x2157a
0002156e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021570 4e b9 00 01 06 04        |N       |		JSR	Is_fc07_three() : Bool
00021576 4a 1f                    |J       |		TST.B	(A7)+
00021578 67 1c                    |g       |		BEQ	0x21596
0002157a e3 40                    | @      |		ASL.W	#0x1,D0
0002157c 41 fa f0 6e              |A  n    |		LEA.L	0x205ec,A0
00021580 3b b0 00 00 10 18        |;       |		MOVE.W	(A0+D0.W),(A5+D1.W+#0x18)
00021586 41 fa f0 84              |A       |		LEA.L	0x2060c,A0
0002158a 3b b0 00 00 10 1c        |;       |		MOVE.W	(A0+D0.W),(A5+D1.W+#0x1c)
00021590 41 fa f0 9a              |A       |		LEA.L	0x2062c,A0
00021594 60 3e                    |`>      |		BRA	0x215d4
00021596 0c 00 00 0c              |        |		CMPI.B	#0x0c,D0
0002159a 6d 1e                    |m       |		BLT	0x215ba
0002159c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002159e 4e b9 00 01 04 cc        |N       |		JSR	MemOnly2MB() : Bool
000215a4 4a 1f                    |J       |		TST.B	(A7)+
000215a6 66 12                    |f       |		BNE	0x215ba
000215a8 3b bc 00 07 10 18        |;       |		MOVE.W	#0x7,(A5+D1.W+#0x18)
000215ae 3b bc 00 02 10 1c        |;       |		MOVE.W	#0x2,(A5+D1.W+#0x1c)
000215b4 42 75 10 1e              |Bu      |		CLR.W	(A5+D1.W+#0x1e)
000215b8 60 20                    |`       |		BRA	0x215da
000215ba e3 40                    | @      |		ASL.W	#0x1,D0
000215bc 41 fa ef ce              |A       |		LEA.L	0x2058c,A0
000215c0 3b b0 00 00 10 18        |;       |		MOVE.W	(A0+D0.W),(A5+D1.W+#0x18)
000215c6 41 fa ef e4              |A       |		LEA.L	0x205ac,A0
000215ca 3b b0 00 00 10 1c        |;       |		MOVE.W	(A0+D0.W),(A5+D1.W+#0x1c)
000215d0 41 fa ef fa              |A       |		LEA.L	0x205cc,A0
000215d4 3b b0 00 00 10 1e        |;       |		MOVE.W	(A0+D0.W),(A5+D1.W+#0x1e)
000215da 42 75 10 1a              |Bu      |		CLR.W	(A5+D1.W+#0x1a)
000215de 48 75 10 20              |Hu      |		PEA.L	(A5+D1.W+#0x20)
000215e2 4e b9 00 01 03 04        |N       |		JSR	GetRtc() : TimeStamp
000215e8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000215ea 9e c5                    |        |		SUBA.W	D5,A7
000215ec 20 4f                    | O      |		MOVEA.L	A7,A0
000215ee 43 fa ec bc              |C       |		LEA.L	0x202ac,A1
000215f2 70 10                    |p       |		MOVEQ.L	#0x10,D0
000215f4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000215f6 51 c8 ff fc              |Q       |		DBF	D0,0x215f4
000215fa 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000215fc 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00021600 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021602 3f 3c 00 11              |?<      |		MOVE.W	#0x11,-(A7)
00021606 4e 92                    |N       |		JSR	(A2)
00021608 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002160a 30 35 10 18              |05      |		MOVE.W	(A5+D1.W+#0x18),D0
0002160e 48 c0                    |H       |		EXTW.L	D0
00021610 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021612 48 53                    |HS      |		PEA.L	(A3)
00021614 48 78 00 ff              |Hx      |		PEA.L	0xff
00021618 4e 94                    |N       |		JSR	(A4)
0002161a de c4                    |        |		ADDA.W	D4,A7
0002161c 30 1f                    |0       |		MOVE.W	(A7)+,D0
0002161e 41 86                    |A       |		CHK.W	D6,D0
00021620 de c5                    |        |		ADDA.W	D5,A7
00021622 3b 80 10 18              |;       |		MOVE.W	D0,(A5+D1.W+#0x18)
00021626 9e c7                    |        |		SUBA.W	D7,A7
00021628 20 4f                    | O      |		MOVEA.L	A7,A0
0002162a 43 fa ec 92              |C       |		LEA.L	0x202be,A1
0002162e 70 12                    |p       |		MOVEQ.L	#0x12,D0
00021630 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021632 51 c8 ff fc              |Q       |		DBF	D0,0x21630
00021636 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021638 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002163c 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002163e 3f 3c 00 13              |?<      |		MOVE.W	#0x13,-(A7)
00021642 4e 92                    |N       |		JSR	(A2)
00021644 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021646 42 80                    |B       |		CLR.L	D0
00021648 30 35 10 1a              |05      |		MOVE.W	(A5+D1.W+#0x1a),D0
0002164c 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002164e 48 53                    |HS      |		PEA.L	(A3)
00021650 48 78 7f ff              |Hx      |		PEA.L	0x7fff
00021654 4e 94                    |N       |		JSR	(A4)
00021656 de c4                    |        |		ADDA.W	D4,A7
00021658 3b 9f 10 1a              |;       |		MOVE.W	(A7)+,(A5+D1.W+#0x1a)
0002165c de c7                    |        |		ADDA.W	D7,A7
0002165e 41 fa ec 88              |A       |		LEA.L	0x202e8,A0
00021662 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00021664 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021666 51 c8 ff fc              |Q       |		DBF	D0,0x21664
0002166a 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
0002166c 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00021670 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021672 3f 3c 00 16              |?<      |		MOVE.W	#0x16,-(A7)
00021676 4e 92                    |N       |		JSR	(A2)
00021678 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002167a 30 35 10 1c              |05      |		MOVE.W	(A5+D1.W+#0x1c),D0
0002167e 48 c0                    |H       |		EXTW.L	D0
00021680 2f 00                    |/       |		MOVE.L	D0,-(A7)
00021682 48 53                    |HS      |		PEA.L	(A3)
00021684 48 78 00 ff              |Hx      |		PEA.L	0xff
00021688 4e 94                    |N       |		JSR	(A4)
0002168a de c4                    |        |		ADDA.W	D4,A7
0002168c 30 1f                    |0       |		MOVE.W	(A7)+,D0
0002168e 41 86                    |A       |		CHK.W	D6,D0
00021690 de fc 00 16              |        |		ADDA.W	#0x16,A7
00021694 3b 80 10 1c              |;       |		MOVE.W	D0,(A5+D1.W+#0x1c)
00021698 9e c4                    |        |		SUBA.W	D4,A7
0002169a 20 4f                    | O      |		MOVEA.L	A7,A0
0002169c 43 fa ec 4a              |C  J    |		LEA.L	0x202e8,A1
000216a0 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
000216a2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000216a4 51 c8 ff fc              |Q       |		DBF	D0,0x216a2
000216a8 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000216aa 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000216ae 3f 03                    |?       |		MOVE.W	D3,-(A7)
000216b0 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
000216b4 4e 92                    |N       |		JSR	(A2)
000216b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000216b8 30 35 10 1e              |05      |		MOVE.W	(A5+D1.W+#0x1e),D0
000216bc 48 c0                    |H       |		EXTW.L	D0
000216be 2f 00                    |/       |		MOVE.L	D0,-(A7)
000216c0 48 53                    |HS      |		PEA.L	(A3)
000216c2 48 78 00 ff              |Hx      |		PEA.L	0xff
000216c6 4e 94                    |N       |		JSR	(A4)
000216c8 de c4                    |        |		ADDA.W	D4,A7
000216ca 30 1f                    |0       |		MOVE.W	(A7)+,D0
000216cc 41 86                    |A       |		CHK.W	D6,D0
000216ce de c4                    |        |		ADDA.W	D4,A7
000216d0 3b 80 10 1e              |;       |		MOVE.W	D0,(A5+D1.W+#0x1e)
000216d4 9e fc 00 1e              |        |		SUBA.W	#0x1e,A7
000216d8 20 4f                    | O      |		MOVEA.L	A7,A0
000216da 43 fa ec 1c              |C       |		LEA.L	0x202f8,A1
000216de 70 1c                    |p       |		MOVEQ.L	#0x1c,D0
000216e0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000216e2 51 c8 ff fc              |Q       |		DBF	D0,0x216e0
000216e6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000216e8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000216ec 3f 03                    |?       |		MOVE.W	D3,-(A7)
000216ee 3f 3c 00 1d              |?<      |		MOVE.W	#0x1d,-(A7)
000216f2 4e 92                    |N       |		JSR	(A2)
000216f4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000216f6 48 75 10 20              |Hu      |		PEA.L	(A5+D1.W+#0x20)
000216fa 4e ba fc 86              |N       |		JSR	0x21382
000216fe de fc 00 26              |   &    |		ADDA.W	#0x26,A7
00021702 1b 83 10 24              |   $    |		MOVE.B	D3,(A5+D1.W+#0x24)
00021706 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002170a 4e 5e                    |N^      |		UNLK	A6
0002170c 4e 75                    |Nu      |		RTS
0002170e ; --------------------------------------------------------------------------------------
0002170e ; OMSI PASCAL Function
0002170e ; --------------------------------------------------------------------------------------
0002170e 4e 56 ff 98              |NV      |		LINK.W	A6,#0xff98
00021712 bf d5                    |        |		CMPA.L	(A5),A7
00021714 62 06                    |b       |		BHI	0x2171c
00021716 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002171a 4e 76                    |Nv      |		TRAPV
0002171c de fc 00 5c              |   \    |		ADDA.W	#0x5c,A7
00021720 48 e7 ff f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021724 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
0002172a 47 f9 00 01 03 e0        |G       |		LEA.L	WriteConsoleStringCrLf(str : String),A3
00021730 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021732 74 0c                    |t       |		MOVEQ.L	#0x0c,D2
00021734 76 10                    |v       |		MOVEQ.L	#0x10,D3
00021736 78 1a                    |x       |		MOVEQ.L	#0x1a,D4
00021738 9e c2                    |        |		SUBA.W	D2,A7
0002173a 20 4f                    | O      |		MOVEA.L	A7,A0
0002173c 43 fa ec 18              |C       |		LEA.L	0x20356,A1
00021740 70 0a                    |p       |		MOVEQ.L	#0x0a,D0
00021742 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021744 51 c8 ff fc              |Q       |		DBF	D0,0x21742
00021748 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002174a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002174e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021750 3f 3c 00 0b              |?<      |		MOVE.W	#0xb,-(A7)
00021754 4e 92                    |N       |		JSR	(A2)
00021756 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021758 4e 93                    |N       |		JSR	(A3)
0002175a de c3                    |        |		ADDA.W	D3,A7
0002175c 41 fa ec 1e              |A       |		LEA.L	0x2037c,A0
00021760 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00021762 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021764 51 c8 ff fc              |Q       |		DBF	D0,0x21762
00021768 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002176a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002176e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021770 3f 04                    |?       |		MOVE.W	D4,-(A7)
00021772 4e 92                    |N       |		JSR	(A2)
00021774 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021776 4e 93                    |N       |		JSR	(A3)
00021778 de fc 00 1e              |        |		ADDA.W	#0x1e,A7
0002177c 41 fa ec 18              |A       |		LEA.L	0x20396,A0
00021780 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00021782 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021784 51 c8 ff fc              |Q       |		DBF	D0,0x21782
00021788 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002178a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002178e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021790 3f 04                    |?       |		MOVE.W	D4,-(A7)
00021792 4e 92                    |N       |		JSR	(A2)
00021794 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021796 4e 93                    |N       |		JSR	(A3)
00021798 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002179a 20 4f                    | O      |		MOVEA.L	A7,A0
0002179c 43 fa eb f8              |C       |		LEA.L	0x20396,A1
000217a0 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
000217a2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000217a4 51 c8 ff fc              |Q       |		DBF	D0,0x217a2
000217a8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000217aa 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000217ae 3f 01                    |?       |		MOVE.W	D1,-(A7)
000217b0 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
000217b4 4e 92                    |N       |		JSR	(A2)
000217b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217b8 4e 93                    |N       |		JSR	(A3)
000217ba 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000217bc 20 4f                    | O      |		MOVEA.L	A7,A0
000217be 43 fa eb f2              |C       |		LEA.L	0x203b2,A1
000217c2 70 1a                    |p       |		MOVEQ.L	#0x1a,D0
000217c4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000217c6 51 c8 ff fc              |Q       |		DBF	D0,0x217c4
000217ca 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000217cc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000217d0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000217d2 3f 3c 00 1b              |?<      |		MOVE.W	#0x1b,-(A7)
000217d6 4e 92                    |N       |		JSR	(A2)
000217d8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217da 4e 93                    |N       |		JSR	(A3)
000217dc de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000217e0 4e b9 00 01 06 0a        |N       |		JSR	Is_fc07_four() : Bool
000217e6 4a 1f                    |J       |		TST.B	(A7)+
000217e8 66 0c                    |f       |		BNE	0x217f6
000217ea 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000217ec 4e b9 00 01 06 04        |N       |		JSR	Is_fc07_three() : Bool
000217f2 4a 1f                    |J       |		TST.B	(A7)+
000217f4 67 26                    |g&      |		BEQ	0x2181c
000217f6 41 fa eb fe              |A       |		LEA.L	0x203f6,A0
000217fa 70 06                    |p       |		MOVEQ.L	#0x06,D0
000217fc 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000217fe 51 c8 ff fc              |Q       |		DBF	D0,0x217fc
00021802 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021804 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021808 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002180a 3f 3c 00 1c              |?<      |		MOVE.W	#0x1c,-(A7)
0002180e 4e 92                    |N       |		JSR	(A2)
00021810 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021812 4e 93                    |N       |		JSR	(A3)
00021814 de fc 00 20              |        |		ADDA.W	#0x20,A7
00021818 7e 09                    |~       |		MOVEQ.L	#0x09,D7
0002181a 60 20                    |`       |		BRA	0x2183c
0002181c 2f 3a eb b8              |/:      |		MOVE.L	0x203d6,-(A7)
00021820 2f 3a eb b0              |/:      |		MOVE.L	0x203d2,-(A7)
00021824 2f 3a eb a8              |/:      |		MOVE.L	0x203ce,-(A7)
00021828 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002182a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002182e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021830 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021832 4e 92                    |N       |		JSR	(A2)
00021834 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021836 4e 93                    |N       |		JSR	(A3)
00021838 de c3                    |        |		ADDA.W	D3,A7
0002183a 7e 08                    |~       |		MOVEQ.L	#0x08,D7
0002183c 41 fa eb c6              |A       |		LEA.L	0x20404,A0
00021840 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021842 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021844 51 c8 ff fc              |Q       |		DBF	D0,0x21842
00021848 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002184a 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002184e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021850 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00021854 4e 92                    |N       |		JSR	(A2)
00021856 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021858 48 78 00 00              |Hx      |		PEA.L	0x0
0002185c 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002185e 4e b9 00 01 03 ec        |N       |		JSR	AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
00021864 de c2                    |        |		ADDA.W	D2,A7
00021866 2c 1f                    |,       |		MOVE.L	(A7)+,D6
00021868 de fc 00 0e              |        |		ADDA.W	#0xe,A7
0002186c 0c 86 00 00 00 09        |        |		CMPI.L	#0x00000009,D6
00021872 63 02                    |c       |		BLS	0x21876
00021874 4e 4f                    |NO      |		TRAP	#15
00021876 41 fa ed d4              |A       |		LEA.L	0x2064c,A0
0002187a 1a 30 68 00              | 0h     |		MOVE.B	(A0+D6.L),D5
0002187e 1f 05                    |        |		MOVE.B	D5,-(A7)
00021880 4e ba fc 64              |N  d    |		JSR	ReEnterBoard(?)
00021884 1e 85                    |        |		MOVE.B	D5,(A7)
00021886 4e ba f7 ea              |N       |		JSR	0x21072
0002188a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002188c 4c df 0f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3
00021890 4e 5e                    |N^      |		UNLK	A6
00021892 4e 75                    |Nu      |		RTS
00021894 ; --------------------------------------------------------------------------------------
00021894 ; OMSI PASCAL Function
00021894 ; --------------------------------------------------------------------------------------
00021894 4e 56 ff ae              |NV      |		LINK.W	A6,#0xffae
00021898 bf d5                    |        |		CMPA.L	(A5),A7
0002189a 62 06                    |b       |		BHI	0x218a2
0002189c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000218a0 4e 76                    |Nv      |		TRAPV
000218a2 de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
000218a6 48 e7 e1 c0              |H       |		MOVEM.L	A1+A0+D7+D2+D1+D0,-(A7)
000218aa 43 ed 00 f8              |C       |		LEA.L	(A5+0xf8),A1
000218ae 72 01                    |r       |		MOVEQ.L	#0x01,D1
000218b0 74 20                    |t       |		MOVEQ.L	#0x20,D2
000218b2 41 fa eb 70              |A  p    |		LEA.L	0x20424,A0
000218b6 70 07                    |p       |		MOVEQ.L	#0x07,D0
000218b8 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000218ba 51 c8 ff fc              |Q       |		DBF	D0,0x218b8
000218be 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000218c0 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000218c4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000218c6 3f 02                    |?       |		MOVE.W	D2,-(A7)
000218c8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000218ce 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000218d0 2e 91                    |.       |		MOVE.L	(A1),(A7)
000218d2 48 78 00 00              |Hx      |		PEA.L	0x0
000218d6 2f 3c 00 0f 42 3f        |/<  B?  |		MOVE.L	#0xf423f,-(A7)
000218dc 4e ba f9 60              |N  `    |		JSR	0x2123e
000218e0 de fc 00 10              |        |		ADDA.W	#0x10,A7
000218e4 42 80                    |B       |		CLR.L	D0
000218e6 30 1f                    |0       |		MOVE.W	(A7)+,D0
000218e8 22 80                    |"       |		MOVE.L	D0,(A1)
000218ea de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000218ee 4e b9 00 02 20 70        |N    p  |		JSR	0x22070
000218f4 2e 1f                    |.       |		MOVE.L	(A7)+,D7
000218f6 66 2c                    |f,      |		BNE	0x21924
000218f8 41 fa eb 44              |A  D    |		LEA.L	0x2043e,A0
000218fc 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000218fe 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021900 51 c8 ff fc              |Q       |		DBF	D0,0x218fe
00021904 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
00021908 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002190a 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002190e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021910 3f 3c 00 1a              |?<      |		MOVE.W	#0x1a,-(A7)
00021914 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002191a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002191c 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00021922 de c2                    |        |		ADDA.W	D2,A7
00021924 20 49                    | I      |		MOVEA.L	A1,A0
00021926 2f 08                    |/       |		MOVE.L	A0,-(A7)
00021928 2f 07                    |/       |		MOVE.L	D7,-(A7)
0002192a 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
0002192e 4e b9 00 01 02 38        |N    8  |		JSR	KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00021934 de fc 00 0a              |        |		ADDA.W	#0xa,A7
00021938 4e ba f4 74              |N  t    |		JSR	0x20dae
0002193c 4c df 03 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1
00021940 4e 5e                    |N^      |		UNLK	A6
00021942 4e 75                    |Nu      |		RTS
00021944 ; --------------------------------------------------------------------------------------
00021944 ; OMSI PASCAL Function
00021944 ;    <LVAR  0x008 1(r)>
00021944 ;    <LVAR -0x00a @ 4(rw)>
00021944 ; --------------------------------------------------------------------------------------
00021944 4e 56 ff a2              |NV      |		LINK.W	A6,#0xffa2		; Spelunked
00021948 bf d5                    |        |		CMPA.L	(A5),A7
0002194a 62 06                    |b       |		BHI	0x21952
0002194c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021950 4e 76                    |Nv      |		TRAPV
00021952 de fc 00 4c              |   L    |		ADDA.W	#0x4c,A7
00021956 48 e7 e1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
0002195a 43 f9 00 01 02 f8        |C       |		LEA.L	LeftPad(a : String; b : Long) : String,A1
00021960 45 f9 00 01 02 e4        |E       |		LEA.L	Long2String(a : Long) : String,A2
00021966 47 ee ff f6              |G       |		LEA.L	(A6-0xa),A3
0002196a 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
0002196c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002196e 1f 2e 00 08              | .      |		MOVE.B	(A6+0x8),-(A7)
00021972 4e ba ed 4a              |N  J    |		JSR	GetBoardName(&String, Byte)
00021976 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021978 48 78 00 08              |Hx      |		PEA.L	0x8
0002197c 4e 91                    |N       |		JSR	(A1)
0002197e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021980 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00021982 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021986 48 80                    |H       |		EXTB.W	D0
00021988 c1 c2                    |        |		MULS.W	D2,D0
0002198a 4a 35 00 24              |J5 $    |		TST.B	(A5+D0.W+#0x24)
0002198e 66 34                    |f4      |		BNE	0x219c4
00021990 41 fa ea ba              |A       |		LEA.L	0x2044c,A0
00021994 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021996 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021998 51 c8 ff fc              |Q       |		DBF	D0,0x21996
0002199c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002199e 2f 0c                    |/       |		MOVE.L	A4,-(A7)
000219a0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000219a2 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000219a6 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000219aa 3f 02                    |?       |		MOVE.W	D2,-(A7)
000219ac 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000219b2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219b4 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000219ba 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000219bc 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
000219be de c2                    |        |		ADDA.W	D2,A7
000219c0 60 00 00 a2              |`       |		BRA	0x21a64
000219c4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000219c6 2f 0c                    |/       |		MOVE.L	A4,-(A7)
000219c8 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000219ca 32 35 00 18              |25      |		MOVE.W	(A5+D0.W+#0x18),D1
000219ce 48 c1                    |H       |		EXTW.L	D1
000219d0 2f 01                    |/       |		MOVE.L	D1,-(A7)
000219d2 4e 92                    |N       |		JSR	(A2)
000219d4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000219d6 48 78 00 08              |Hx      |		PEA.L	0x8
000219da 4e 91                    |N       |		JSR	(A1)
000219dc 42 81                    |B       |		CLR.L	D1
000219de 32 35 00 1a              |25      |		MOVE.W	(A5+D0.W+#0x1a),D1
000219e2 2f 01                    |/       |		MOVE.L	D1,-(A7)
000219e4 4e 92                    |N       |		JSR	(A2)
000219e6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000219e8 48 78 00 09              |Hx      |		PEA.L	0x9
000219ec 4e 91                    |N       |		JSR	(A1)
000219ee 32 35 00 1c              |25      |		MOVE.W	(A5+D0.W+#0x1c),D1
000219f2 48 c1                    |H       |		EXTW.L	D1
000219f4 2f 01                    |/       |		MOVE.L	D1,-(A7)
000219f6 4e 92                    |N       |		JSR	(A2)
000219f8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000219fa 48 78 00 09              |Hx      |		PEA.L	0x9
000219fe 4e 91                    |N       |		JSR	(A1)
00021a00 32 35 00 1e              |25      |		MOVE.W	(A5+D0.W+#0x1e),D1
00021a04 48 c1                    |H       |		EXTW.L	D1
00021a06 2f 01                    |/       |		MOVE.L	D1,-(A7)
00021a08 4e 92                    |N       |		JSR	(A2)
00021a0a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a0c 48 78 00 07              |Hx      |		PEA.L	0x7
00021a10 4e 91                    |N       |		JSR	(A1)
00021a12 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021a14 4e b9 00 01 02 dc        |N       |		JSR	StringCat5(a, b, c, d, e : String) : String
00021a1a de fc 00 14              |        |		ADDA.W	#0x14,A7
00021a1e 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
00021a20 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021a22 2f 35 00 20              |/5      |		MOVE.L	(A5+D0.W+#0x20),-(A7)
00021a26 4e b9 00 01 03 08        |N       |		JSR	TimeToText()
00021a2c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a2e 26 9f                    |&       |		MOVE.L	(A7)+,(A3)
00021a30 7e 0a                    |~       |		MOVEQ.L	#0x0a,D7
00021a32 2f 0c                    |/       |		MOVE.L	A4,-(A7)
00021a34 20 53                    | S      |		MOVEA.L	(A3),A0
00021a36 20 07                    |        |		MOVE.L	D7,D0
00021a38 53 80                    |S       |		SUBQ.L	#0x1,D0
00021a3a 0c 80 00 00 00 7d        |     }  |		CMPI.L	#0x0000007d,D0
00021a40 63 02                    |c       |		BLS	0x21a44
00021a42 4e 4f                    |NO      |		TRAP	#15
00021a44 1f 30 08 02              | 0      |		MOVE.B	(A0+D0.L+#0x2),-(A7)
00021a48 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00021a4e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021a50 52 87                    |R       |		ADDQ.L	#0x1,D7
00021a52 0c 87 00 00 00 12        |        |		CMPI.L	#0x00000012,D7
00021a58 6f d8                    |o       |		BLE	0x21a32
00021a5a 48 53                    |HS      |		PEA.L	(A3)
00021a5c 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00021a62 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a64 2f 0c                    |/       |		MOVE.L	A4,-(A7)
00021a66 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021a6c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021a6e 4c df 1f 87              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4
00021a72 4e 5e                    |N^      |		UNLK	A6
00021a74 4e 75                    |Nu      |		RTS
00021a76 ; --------------------------------------------------------------------------------------
00021a76 ; OMSI PASCAL Function
00021a76 ; --------------------------------------------------------------------------------------
00021a76 4e 56 ff 98              |NV      |		LINK.W	A6,#0xff98
00021a7a bf d5                    |        |		CMPA.L	(A5),A7
00021a7c 62 06                    |b       |		BHI	0x21a84
00021a7e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021a82 4e 76                    |Nv      |		TRAPV
00021a84 de fc 00 64              |   d    |		ADDA.W	#0x64,A7
00021a88 48 e7 c1 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D1+D0,-(A7)
00021a8c 45 fa fe b6              |E       |		LEA.L	0x21944,A2
00021a90 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00021a96 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
00021a9c 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021a9e 9e fc 00 32              |   2    |		SUBA.W	#0x32,A7
00021aa2 20 4f                    | O      |		MOVEA.L	A7,A0
00021aa4 43 fa e9 a6              |C       |		LEA.L	0x2044c,A1
00021aa8 70 30                    |p0      |		MOVEQ.L	#0x30,D0
00021aaa 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021aac 51 c8 ff fc              |Q       |		DBF	D0,0x21aaa
00021ab0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021ab2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021ab6 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021ab8 3f 3c 00 31              |?< 1    |		MOVE.W	#0x31,-(A7)
00021abc 4e 93                    |N       |		JSR	(A3)
00021abe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021ac0 4e 94                    |N       |		JSR	(A4)
00021ac2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021ac4 20 4f                    | O      |		MOVEA.L	A7,A0
00021ac6 43 fa e9 b6              |C       |		LEA.L	0x2047e,A1
00021aca 70 32                    |p2      |		MOVEQ.L	#0x32,D0
00021acc 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021ace 51 c8 ff fc              |Q       |		DBF	D0,0x21acc
00021ad2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021ad4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021ad8 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021ada 3f 3c 00 33              |?< 3    |		MOVE.W	#0x33,-(A7)
00021ade 4e 93                    |N       |		JSR	(A3)
00021ae0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021ae2 4e 94                    |N       |		JSR	(A4)
00021ae4 de fc 00 36              |   6    |		ADDA.W	#0x36,A7
00021ae8 1e bc 00 04              |        |		MOVE.B	#0x04,(A7)
00021aec 4e 92                    |N       |		JSR	(A2)
00021aee 1e bc 00 07              |        |		MOVE.B	#0x07,(A7)
00021af2 4e 92                    |N       |		JSR	(A2)
00021af4 1e bc 00 06              |        |		MOVE.B	#0x06,(A7)
00021af8 4e 92                    |N       |		JSR	(A2)
00021afa 1e bc 00 02              |        |		MOVE.B	#0x02,(A7)
00021afe 4e 92                    |N       |		JSR	(A2)
00021b00 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00021b04 4e 92                    |N       |		JSR	(A2)
00021b06 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021b08 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
00021b0a 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021b0c 1f 07                    |        |		MOVE.B	D7,-(A7)
00021b0e 4e b9 00 01 04 c0        |N       |		JSR	HasBoard(diproc_addr: Byte) : Byte
00021b14 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021b16 4a 1f                    |J       |		TST.B	(A7)+
00021b18 67 06                    |g       |		BEQ	0x21b20
00021b1a 1f 07                    |        |		MOVE.B	D7,-(A7)
00021b1c 4e 92                    |N       |		JSR	(A2)
00021b1e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021b20 52 07                    |R       |		ADDQ.B	#0x1,D7
00021b22 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00021b26 6f e2                    |o       |		BLE	0x21b0a
00021b28 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021b2a 4e b9 00 01 06 0a        |N       |		JSR	Is_fc07_four() : Bool
00021b30 4a 1f                    |J       |		TST.B	(A7)+
00021b32 66 0c                    |f       |		BNE	0x21b40
00021b34 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021b36 4e b9 00 01 06 04        |N       |		JSR	Is_fc07_three() : Bool
00021b3c 4a 1f                    |J       |		TST.B	(A7)+
00021b3e 67 3a                    |g:      |		BEQ	0x21b7a
00021b40 42 27                    |B'      |		CLR.B	-(A7)
00021b42 4e 92                    |N       |		JSR	(A2)
00021b44 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021b46 41 fa e9 8e              |A       |		LEA.L	0x204d6,A0
00021b4a 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021b4c 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
00021b4e 51 c8 ff fc              |Q       |		DBF	D0,0x21b4c
00021b52 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021b54 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021b58 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021b5a 3f 3c 00 24              |?< $    |		MOVE.W	#0x24,-(A7)
00021b5e 4e 93                    |N       |		JSR	(A3)
00021b60 2e ad 00 f8              |.       |		MOVE.L	(A5+0xf8),(A7)
00021b64 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00021b6a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021b6c 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021b72 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021b74 4e 94                    |N       |		JSR	(A4)
00021b76 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
00021b7a 4c df 1f 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A2+A3+A4
00021b7e 4e 5e                    |N^      |		UNLK	A6
00021b80 4e 75                    |Nu      |		RTS
00021b82 ; --------------------------------------------------------------------------------------
00021b82 ; OMSI PASCAL Function
00021b82 ; --------------------------------------------------------------------------------------
00021b82 4e 56 ff 90              |NV      |		LINK.W	A6,#0xff90
00021b86 bf d5                    |        |		CMPA.L	(A5),A7
00021b88 62 06                    |b       |		BHI	0x21b90
00021b8a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021b8e 4e 76                    |Nv      |		TRAPV
00021b90 de fc 00 68              |   h    |		ADDA.W	#0x68,A7
00021b94 48 e7 fb f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7)
00021b98 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021b9e 47 f9 00 01 03 e0        |G       |		LEA.L	WriteConsoleStringCrLf(str : String),A3
00021ba4 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021ba6 74 10                    |t       |		MOVEQ.L	#0x10,D2
00021ba8 76 0c                    |v       |		MOVEQ.L	#0x0c,D3
00021baa 78 21                    |x!      |		MOVEQ.L	#0x21,D4
00021bac 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00021bb2 2f 3a e9 2a              |/: *    |		MOVE.L	0x204de,-(A7)
00021bb6 2f 3a e9 22              |/: "    |		MOVE.L	0x204da,-(A7)
00021bba 2f 3a e9 1a              |/:      |		MOVE.L	0x204d6,-(A7)
00021bbe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021bc0 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021bc4 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021bc6 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021bc8 4e 92                    |N       |		JSR	(A2)
00021bca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021bcc 4e 93                    |N       |		JSR	(A3)
00021bce de c2                    |        |		ADDA.W	D2,A7
00021bd0 41 fa e9 1e              |A       |		LEA.L	0x204f0,A0
00021bd4 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021bd6 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00021bd8 51 c8 ff fc              |Q       |		DBF	D0,0x21bd6
00021bdc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021bde 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021be2 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021be4 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00021be8 4e 92                    |N       |		JSR	(A2)
00021bea 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021bec 4e 93                    |N       |		JSR	(A3)
00021bee 9e c2                    |        |		SUBA.W	D2,A7
00021bf0 20 4f                    | O      |		MOVEA.L	A7,A0
00021bf2 43 fa e8 fc              |C       |		LEA.L	0x204f0,A1
00021bf6 70 20                    |p       |		MOVEQ.L	#0x20,D0
00021bf8 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021bfa 51 c8 ff fc              |Q       |		DBF	D0,0x21bf8
00021bfe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021c00 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021c04 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021c06 3f 04                    |?       |		MOVE.W	D4,-(A7)
00021c08 4e 92                    |N       |		JSR	(A2)
00021c0a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021c0c 4e 93                    |N       |		JSR	(A3)
00021c0e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021c10 20 4f                    | O      |		MOVEA.L	A7,A0
00021c12 43 fa e8 fe              |C       |		LEA.L	0x20512,A1
00021c16 70 20                    |p       |		MOVEQ.L	#0x20,D0
00021c18 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021c1a 51 c8 ff fc              |Q       |		DBF	D0,0x21c18
00021c1e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021c20 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021c24 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021c26 3f 04                    |?       |		MOVE.W	D4,-(A7)
00021c28 4e 92                    |N       |		JSR	(A2)
00021c2a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021c2c 4e 93                    |N       |		JSR	(A3)
00021c2e de fc 00 24              |   $    |		ADDA.W	#0x24,A7
00021c32 4e b9 00 01 06 0a        |N       |		JSR	Is_fc07_four() : Bool
00021c38 4a 1f                    |J       |		TST.B	(A7)+
00021c3a 66 0c                    |f       |		BNE	0x21c48
00021c3c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021c3e 4e b9 00 01 06 04        |N       |		JSR	Is_fc07_three() : Bool
00021c44 4a 1f                    |J       |		TST.B	(A7)+
00021c46 67 2c                    |g,      |		BEQ	0x21c74
00021c48 9e fc 00 2c              |   ,    |		SUBA.W	#0x2c,A7
00021c4c 20 4f                    | O      |		MOVEA.L	A7,A0
00021c4e 43 fa e8 e4              |C       |		LEA.L	0x20534,A1
00021c52 70 2a                    |p*      |		MOVEQ.L	#0x2a,D0
00021c54 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021c56 51 c8 ff fc              |Q       |		DBF	D0,0x21c54
00021c5a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021c5c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021c60 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021c62 3f 3c 00 2b              |?< +    |		MOVE.W	#0x2b,-(A7)
00021c66 4e 92                    |N       |		JSR	(A2)
00021c68 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021c6a 4e 93                    |N       |		JSR	(A3)
00021c6c de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00021c70 7e 03                    |~       |		MOVEQ.L	#0x03,D7
00021c72 60 02                    |`       |		BRA	0x21c76
00021c74 7e 02                    |~       |		MOVEQ.L	#0x02,D7
00021c76 9e c2                    |        |		SUBA.W	D2,A7
00021c78 20 4f                    | O      |		MOVEA.L	A7,A0
00021c7a 43 fa e8 e4              |C       |		LEA.L	0x20560,A1
00021c7e 70 0e                    |p       |		MOVEQ.L	#0x0e,D0
00021c80 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021c82 51 c8 ff fc              |Q       |		DBF	D0,0x21c80
00021c86 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021c88 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021c8c 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021c8e 3f 3c 00 0f              |?<      |		MOVE.W	#0xf,-(A7)
00021c92 4e 92                    |N       |		JSR	(A2)
00021c94 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021c96 48 78 00 00              |Hx      |		PEA.L	0x0
00021c9a 2f 07                    |/       |		MOVE.L	D7,-(A7)
00021c9c 4e b9 00 01 03 ec        |N       |		JSR	AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
00021ca2 de c3                    |        |		ADDA.W	D3,A7
00021ca4 2c 1f                    |,       |		MOVE.L	(A7)+,D6
00021ca6 de c2                    |        |		ADDA.W	D2,A7
00021ca8 bc 81                    |        |		CMP.L	D1,D6
00021caa 66 06                    |f       |		BNE	0x21cb2
00021cac 4e ba fd c8              |N       |		JSR	0x21a76
00021cb0 60 1a                    |`       |		BRA	0x21ccc
00021cb2 0c 86 00 00 00 02        |        |		CMPI.L	#0x00000002,D6
00021cb8 66 06                    |f       |		BNE	0x21cc0
00021cba 4e ba fa 52              |N  R    |		JSR	0x2170e
00021cbe 60 0c                    |`       |		BRA	0x21ccc
00021cc0 0c 86 00 00 00 03        |        |		CMPI.L	#0x00000003,D6
00021cc6 66 04                    |f       |		BNE	0x21ccc
00021cc8 4e ba fb ca              |N       |		JSR	0x21894
00021ccc 4a 86                    |J       |		TST.L	D6
00021cce 66 00 fe dc              |f       |		BNE	0x21bac
00021cd2 4c df 0f df              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3
00021cd6 4e 5e                    |N^      |		UNLK	A6
00021cd8 4e 75                    |Nu      |		RTS
00021cda ; --------------------------------------------------------------------------------------
00021cda ; OMSI PASCAL Function
00021cda ;    <LVAR  0x008 1(r)>
00021cda ;    <LVAR -0x005 @>
00021cda ;    <LVAR -0x009 @>
00021cda ;    <LVAR -0x00a @>
00021cda ;    <LVAR -0x00b @ 1(r)>
00021cda ;    <LVAR -0x00c 1(r)>
00021cda ;    <LVAR -0x00d @ 1(r)>
00021cda ;    <LVAR -0x00e @ 1(r)>
00021cda ;    <LVAR -0x00f @ 1(r)>
00021cda ;    <LVAR -0x010 1(r)>
00021cda ;    <LVAR -0x011 @ 1(r)>
00021cda ;    <LVAR -0x012 @ 1(r)>
00021cda ; --------------------------------------------------------------------------------------
00021cda 4e 56 ff 80              |NV      |		LINK.W	A6,#0xff80		; Spelunked
00021cde bf d5                    |        |		CMPA.L	(A5),A7
00021ce0 62 06                    |b       |		BHI	0x21ce8
00021ce2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021ce6 4e 76                    |Nv      |		TRAPV
00021ce8 de fc 00 6e              |   n    |		ADDA.W	#0x6e,A7
00021cec 48 e7 f0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
00021cf0 41 ee ff f6              |A       |		LEA.L	(A6-0xa),A0
00021cf4 43 ee ff f5              |C       |		LEA.L	(A6-0xb),A1
00021cf8 45 ee ff ee              |E       |		LEA.L	(A6-0x12),A2
00021cfc 47 ee ff ef              |G       |		LEA.L	(A6-0x11),A3
00021d00 49 ee ff f1              |I       |		LEA.L	(A6-0xf),A4
00021d04 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00021d08 48 80                    |H       |		EXTB.W	D0
00021d0a 72 0e                    |r       |		MOVEQ.L	#0x0e,D1
00021d0c c3 c0                    |        |		MULS.W	D0,D1
00021d0e 4a 35 10 24              |J5 $    |		TST.B	(A5+D1.W+#0x24)
00021d12 66 00 01 92              |f       |		BNE	0x21ea6
00021d16 34 00                    |4       |		MOVE.W	D0,D2
00021d18 55 42                    |UB      |		SUBQ.W	#0x2,D2
00021d1a 0c 42 00 0d              | B      |		CMPI.W	#0x000d,D2
00021d1e 62 00 01 26              |b  &    |		BHI	switch@0x21d24[0x2]
00021d22 d4 42                    | B      |		ADD.W	D2,D2
00021d24 34 3b 20 06 4e fb 20 02  |4;  N   |		SWITCH	D2.W
00021d2c 00 b2                    |        |		.CONST	0xb2			; [0x0] -> 0x21dde
00021d2e 00 82                    |        |		.CONST	0x82			; [0x1] -> 0x21dae
00021d30 01 1a                    |        |		.CONST	0x11a			; [0x2] -> 0x21e46
00021d32 01 1a                    |        |		.CONST	0x11a			; [0x3] -> 0x21e46
00021d34 00 1c                    |        |		.CONST	0x1c			; [0x4] -> 0x21d48
00021d36 00 52                    | R      |		.CONST	0x52			; [0x5] -> 0x21d7e
00021d38 01 1a                    |        |		.CONST	0x11a			; [0x6] -> 0x21e46
00021d3a 01 1a                    |        |		.CONST	0x11a			; [0x7] -> 0x21e46
00021d3c 01 1a                    |        |		.CONST	0x11a			; [0x8] -> 0x21e46
00021d3e 01 1a                    |        |		.CONST	0x11a			; [0x9] -> 0x21e46
00021d40 00 e4                    |        |		.CONST	0xe4			; [0xa] -> 0x21e10
00021d42 00 e4                    |        |		.CONST	0xe4			; [0xb] -> 0x21e10
00021d44 00 e4                    |        |		.CONST	0xe4			; [0xc] -> 0x21e10
00021d46 00 e4                    |        |		.CONST	0xe4			; [0xd] -> 0x21e10
00021d48					switch@0x21d24[0x4]:
00021d48 48 52                    |HR      |		PEA.L	(A2)
00021d4a 48 53                    |HS      |		PEA.L	(A3)
00021d4c 48 54                    |HT      |		PEA.L	(A4)
00021d4e 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00021d52 48 50                    |HP      |		PEA.L	(A0)
00021d54 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00021d58 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00021d5c 48 50                    |HP      |		PEA.L	(A0)
00021d5e 48 50                    |HP      |		PEA.L	(A0)
00021d60 48 50                    |HP      |		PEA.L	(A0)
00021d62 48 50                    |HP      |		PEA.L	(A0)
00021d64 48 50                    |HP      |		PEA.L	(A0)
00021d66 48 50                    |HP      |		PEA.L	(A0)
00021d68 48 50                    |HP      |		PEA.L	(A0)
00021d6a 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00021d6e 48 51                    |HQ      |		PEA.L	(A1)
00021d70 4e b9 00 02 22 66        |N   "f  |		JSR	exp_READ_NOVRAM_INFO.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
00021d76 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00021d7a 60 00 00 cc              |`       |		BRA	0x21e48
00021d7e					switch@0x21d24[0x5]:
00021d7e 48 52                    |HR      |		PEA.L	(A2)
00021d80 48 53                    |HS      |		PEA.L	(A3)
00021d82 48 54                    |HT      |		PEA.L	(A4)
00021d84 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00021d88 48 50                    |HP      |		PEA.L	(A0)
00021d8a 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00021d8e 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00021d92 48 50                    |HP      |		PEA.L	(A0)
00021d94 48 50                    |HP      |		PEA.L	(A0)
00021d96 48 50                    |HP      |		PEA.L	(A0)
00021d98 48 50                    |HP      |		PEA.L	(A0)
00021d9a 48 50                    |HP      |		PEA.L	(A0)
00021d9c 48 50                    |HP      |		PEA.L	(A0)
00021d9e 48 50                    |HP      |		PEA.L	(A0)
00021da0 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00021da4 48 51                    |HQ      |		PEA.L	(A1)
00021da6 4e b9 00 02 22 e8        |N   "   |		JSR	exp_READ_NOVRAM_INFO.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
00021dac 60 c8                    |`       |		BRA	0x21d76
00021dae					switch@0x21d24[0x1]:
00021dae 48 52                    |HR      |		PEA.L	(A2)
00021db0 48 53                    |HS      |		PEA.L	(A3)
00021db2 48 54                    |HT      |		PEA.L	(A4)
00021db4 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00021db8 48 50                    |HP      |		PEA.L	(A0)
00021dba 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00021dbe 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00021dc2 48 50                    |HP      |		PEA.L	(A0)
00021dc4 48 50                    |HP      |		PEA.L	(A0)
00021dc6 48 50                    |HP      |		PEA.L	(A0)
00021dc8 48 50                    |HP      |		PEA.L	(A0)
00021dca 48 50                    |HP      |		PEA.L	(A0)
00021dcc 48 50                    |HP      |		PEA.L	(A0)
00021dce 48 50                    |HP      |		PEA.L	(A0)
00021dd0 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00021dd4 48 51                    |HQ      |		PEA.L	(A1)
00021dd6 4e b9 00 02 21 3a        |N   !:  |		JSR	exp_READ_NOVRAM_INFO.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
00021ddc 60 98                    |`       |		BRA	0x21d76
00021dde					switch@0x21d24[0x0]:
00021dde 48 52                    |HR      |		PEA.L	(A2)
00021de0 48 53                    |HS      |		PEA.L	(A3)
00021de2 48 54                    |HT      |		PEA.L	(A4)
00021de4 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00021de8 48 50                    |HP      |		PEA.L	(A0)
00021dea 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00021dee 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00021df2 48 50                    |HP      |		PEA.L	(A0)
00021df4 48 50                    |HP      |		PEA.L	(A0)
00021df6 48 50                    |HP      |		PEA.L	(A0)
00021df8 48 50                    |HP      |		PEA.L	(A0)
00021dfa 48 50                    |HP      |		PEA.L	(A0)
00021dfc 48 50                    |HP      |		PEA.L	(A0)
00021dfe 48 50                    |HP      |		PEA.L	(A0)
00021e00 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00021e04 48 51                    |HQ      |		PEA.L	(A1)
00021e06 4e b9 00 02 21 bc        |N   !   |		JSR	exp_READ_NOVRAM_INFO.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr)
00021e0c 60 00 ff 68              |`  h    |		BRA	0x21d76
00021e10					switch@0x21d24[0xa]:
00021e10					switch@0x21d24[0xb]:
00021e10					switch@0x21d24[0xc]:
00021e10					switch@0x21d24[0xd]:
00021e10 1f 00                    |        |		MOVE.B	D0,-(A7)
00021e12 48 52                    |HR      |		PEA.L	(A2)
00021e14 48 53                    |HS      |		PEA.L	(A3)
00021e16 48 54                    |HT      |		PEA.L	(A4)
00021e18 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00021e1c 48 50                    |HP      |		PEA.L	(A0)
00021e1e 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00021e22 48 6e ff f3              |Hn      |		PEA.L	(A6-0xd)
00021e26 48 50                    |HP      |		PEA.L	(A0)
00021e28 48 50                    |HP      |		PEA.L	(A0)
00021e2a 48 50                    |HP      |		PEA.L	(A0)
00021e2c 48 50                    |HP      |		PEA.L	(A0)
00021e2e 48 50                    |HP      |		PEA.L	(A0)
00021e30 48 50                    |HP      |		PEA.L	(A0)
00021e32 48 50                    |HP      |		PEA.L	(A0)
00021e34 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00021e38 48 51                    |HQ      |		PEA.L	(A1)
00021e3a 4e b9 00 02 25 82        |N   %   |		JSR	TestRamBoard(?)
00021e40 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00021e44 60 02                    |`       |		BRA	0x21e48
00021e46					switch@0x21d24[0x2]:
00021e46					switch@0x21d24[0x3]:
00021e46					switch@0x21d24[0x6]:
00021e46					switch@0x21d24[0x7]:
00021e46					switch@0x21d24[0x8]:
00021e46					switch@0x21d24[0x9]:
00021e46 42 11                    |B       |		CLR.B	(A1)
00021e48 4a 11                    |J       |		TST.B	(A1)
00021e4a 66 0a                    |f       |		BNE	0x21e56
00021e4c 1f 00                    |        |		MOVE.B	D0,-(A7)
00021e4e 4e ba f6 96              |N       |		JSR	ReEnterBoard(?)
00021e52 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021e54 60 48                    |`H      |		BRA	0x21e9e
00021e56 42 82                    |B       |		CLR.L	D2
00021e58 14 12                    |        |		MOVE.B	(A2),D2
00021e5a 3b 82 10 18              |;       |		MOVE.W	D2,(A5+D1.W+#0x18)
00021e5e 42 82                    |B       |		CLR.L	D2
00021e60 14 13                    |        |		MOVE.B	(A3),D2
00021e62 e1 42                    | B      |		ASL.W	#0x8,D2
00021e64 42 83                    |B       |		CLR.L	D3
00021e66 16 2e ff f0              | .      |		MOVE.B	(A6-0x10),D3
00021e6a d6 42                    | B      |		ADD.W	D2,D3
00021e6c 3b 83 10 1a              |;       |		MOVE.W	D3,(A5+D1.W+#0x1a)
00021e70 42 82                    |B       |		CLR.L	D2
00021e72 14 14                    |        |		MOVE.B	(A4),D2
00021e74 3b 82 10 1c              |;       |		MOVE.W	D2,(A5+D1.W+#0x1c)
00021e78 42 82                    |B       |		CLR.L	D2
00021e7a 14 2e ff f2              | .      |		MOVE.B	(A6-0xe),D2
00021e7e 3b 82 10 1e              |;       |		MOVE.W	D2,(A5+D1.W+#0x1e)
00021e82 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021e84 1e ae ff f3              |        |		MOVE.B	(A6-0xd),(A7)
00021e88 1f 6e ff f4 00 01        | n      |		MOVE.B	(A6-0xc),(A7+0x1)
00021e8e 48 75 10 20              |Hu      |		PEA.L	(A5+D1.W+#0x20)
00021e92 4e ba e7 c2              |N       |		JSR	0x20656
00021e96 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021e98 1b bc 00 01 10 24        |     $  |		MOVE.B	#0x01,(A5+D1.W+#0x24)
00021e9e 1f 00                    |        |		MOVE.B	D0,-(A7)
00021ea0 4e ba f1 d0              |N       |		JSR	0x21072
00021ea4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021ea6 4c df 1f 0f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4
00021eaa 4e 5e                    |N^      |		UNLK	A6
00021eac 4e 75                    |Nu      |		RTS
00021eae ; --------------------------------------------------------------------------------------
00021eae ; OMSI PASCAL Function
00021eae ; --------------------------------------------------------------------------------------
00021eae 4e 56 ff e8              |NV      |		LINK.W	A6,#0xffe8
00021eb2 bf d5                    |        |		CMPA.L	(A5),A7
00021eb4 62 06                    |b       |		BHI	0x21ebc
00021eb6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021eba 4e 76                    |Nv      |		TRAPV
00021ebc de fc 00 14              |        |		ADDA.W	#0x14,A7
00021ec0 48 e7 01 80              |H       |		MOVEM.L	A0+D7,-(A7)
00021ec4 41 fa fe 14              |A       |		LEA.L	0x21cda,A0
00021ec8 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00021ecc 4e 90                    |N       |		JSR	(A0)
00021ece 1e bc 00 07              |        |		MOVE.B	#0x07,(A7)
00021ed2 4e 90                    |N       |		JSR	(A0)
00021ed4 1e bc 00 06              |        |		MOVE.B	#0x06,(A7)
00021ed8 4e 90                    |N       |		JSR	(A0)
00021eda 1e bc 00 02              |        |		MOVE.B	#0x02,(A7)
00021ede 4e 90                    |N       |		JSR	(A0)
00021ee0 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00021ee4 4e 90                    |N       |		JSR	(A0)
00021ee6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021ee8 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
00021eea 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00021eec 1f 07                    |        |		MOVE.B	D7,-(A7)
00021eee 4e b9 00 01 04 c0        |N       |		JSR	HasBoard(diproc_addr: Byte) : Byte
00021ef4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021ef6 4a 1f                    |J       |		TST.B	(A7)+
00021ef8 67 06                    |g       |		BEQ	0x21f00
00021efa 1f 07                    |        |		MOVE.B	D7,-(A7)
00021efc 4e 90                    |N       |		JSR	(A0)
00021efe 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021f00 52 07                    |R       |		ADDQ.B	#0x1,D7
00021f02 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
00021f06 6f e2                    |o       |		BLE	0x21eea
00021f08 4c df 01 80              |L       |		MOVEM.L	(A7)+,D7+A0
00021f0c 4e 5e                    |N^      |		UNLK	A6
00021f0e 4e 75                    |Nu      |		RTS
00021f10 ; --------------------------------------------------------------------------------------
00021f10 ; OMSI PASCAL Function
00021f10 ; --------------------------------------------------------------------------------------
00021f10					START:
00021f10 4f fa 00 08              |O       |		LEA.L	MAIN,A7
00021f14 4e f9 00 01 02 80        |N       |		JMP	?start_program
00021f1a					MAIN:
00021f1a 45 f9 00 01 02 c4        |E       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021f20 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021f22 74 0a                    |t       |		MOVEQ.L	#0x0a,D2
00021f24 76 09                    |v       |		MOVEQ.L	#0x09,D3
00021f26 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
00021f2c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00021f2e 20 4f                    | O      |		MOVEA.L	A7,A0
00021f30 43 fa e6 3e              |C  >    |		LEA.L	0x20570,A1
00021f34 70 06                    |p       |		MOVEQ.L	#0x06,D0
00021f36 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021f38 51 c8 ff fc              |Q       |		DBF	D0,0x21f36
00021f3c 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021f3e 4e b9 00 01 03 c4        |N       |		JSR	GetArgv() : String
00021f44 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021f46 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00021f4a 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021f4c 3f 3c 00 07              |?<      |		MOVE.W	#0x7,-(A7)
00021f50 4e 92                    |N       |		JSR	(A2)
00021f52 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021f54 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
00021f5a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021f5c 4a 1f                    |J       |		TST.B	(A7)+
00021f5e 67 16                    |g       |		BEQ	0x21f76
00021f60 48 78 00 00              |Hx      |		PEA.L	0x0
00021f64 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00021f6a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021f6c 4e ba ec 68              |N  h    |		JSR	0x20bd6
00021f70 4e ba ff 3c              |N  <    |		JSR	0x21eae
00021f74 60 66                    |`f      |		BRA	0x21fdc
00021f76 4e b9 00 01 05 b6        |N       |		JSR	R1000_Reset_L(void)
00021f7c 9e c2                    |        |		SUBA.W	D2,A7
00021f7e 20 4f                    | O      |		MOVEA.L	A7,A0
00021f80 43 fa e5 f6              |C       |		LEA.L	0x20578,A1
00021f84 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021f86 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021f88 51 c8 ff fc              |Q       |		DBF	D0,0x21f86
00021f8c 9e c2                    |        |		SUBA.W	D2,A7
00021f8e 20 4f                    | O      |		MOVEA.L	A7,A0
00021f90 43 fa e5 f0              |C       |		LEA.L	0x20582,A1
00021f94 70 08                    |p       |		MOVEQ.L	#0x08,D0
00021f96 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00021f98 51 c8 ff fc              |Q       |		DBF	D0,0x21f96
00021f9c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021f9e 48 6f 00 0e              |Ho      |		PEA.L	(A7+0xe)
00021fa2 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021fa4 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021fa6 4e 92                    |N       |		JSR	(A2)
00021fa8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021faa 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021fae 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021fb0 3f 03                    |?       |		MOVE.W	D3,-(A7)
00021fb2 4e 92                    |N       |		JSR	(A2)
00021fb4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021fb6 1e bc 00 02              |        |		MOVE.B	#0x02,(A7)
00021fba 48 6d 00 fd              |Hm      |		PEA.L	(A5+0xfd)
00021fbe 4e b9 00 01 03 b0        |N       |		JSR	PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
00021fc4 de fc 00 22              |   "    |		ADDA.W	#0x22,A7
00021fc8 48 78 00 00              |Hx      |		PEA.L	0x0
00021fcc 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00021fd2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021fd4 4e ba ec 00              |N       |		JSR	0x20bd6
00021fd8 4e ba fb a8              |N       |		JSR	0x21b82
00021fdc 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021fde 42 17                    |B       |		CLR.B	(A7)
00021fe0 48 78 00 01              |Hx      |		PEA.L	0x1
00021fe4 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00021fea 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021fec 4e b9 00 01 02 84        |N       |		JSR	?exit
00021ff2 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000
00021ff6 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00021ffa bf d5                    |        |		CMPA.L	(A5),A7
00021ffc 4e 76                    |Nv      |		TRAPV
00021ffe 42 2e 00 08              |B.      |		CLR.B	(A6+0x8)
00022002 30 39 93 03 e0 00        |09      |		MOVE.W	0x9303e000,D0
00022008 02 40 00 08              | @      |		ANDI.W	#0x0008,D0
0002200c 67 00 00 06              |g       |		BEQ	0x22014
00022010 52 2e 00 08              |R.      |		ADDQ.B	#0x1,(A6+0x8)
00022014 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00022018 4e 5e                    |N^      |		UNLK	A6
0002201a 4e 75                    |Nu      |		RTS
0002201c 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000		; Spelunked
00022020 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00022024 bf d5                    |        |		CMPA.L	(A5),A7
00022026 4e 76                    |Nv      |		TRAPV
00022028 30 3c 02 01              |0<      |		MOVE.W	#0x201,D0
0002202c 4e b9 80 00 20 64        |N    d  |		JSR	0x80002064
00022032 67 00 00 06              |g       |		BEQ	0x2203a
00022036 30 7c 00 00              |0|      |		MOVEA.W	#0x0,A0
0002203a 2d 48 00 08              |-H      |		MOVE.L	A0,(A6+0x8)
0002203e 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00022042 4e 5e                    |N^      |		UNLK	A6
00022044 4e 75                    |Nu      |		RTS
00022046 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000
0002204a 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
0002204e bf d5                    |        |		CMPA.L	(A5),A7
00022050 4e 76                    |Nv      |		TRAPV
00022052 30 3c 07 00              |0<      |		MOVE.W	#0x700,D0
00022056 4e b9 80 00 20 64        |N    d  |		JSR	0x80002064
0002205c 67 00 00 06              |g       |		BEQ	0x22064
00022060 30 7c 00 00              |0|      |		MOVEA.W	#0x0,A0
00022064 2d 48 00 08              |-H      |		MOVE.L	A0,(A6+0x8)
00022068 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
0002206c 4e 5e                    |N^      |		UNLK	A6
0002206e 4e 75                    |Nu      |		RTS
00022070 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000
00022074 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00022078 bf d5                    |        |		CMPA.L	(A5),A7
0002207a 4e 76                    |Nv      |		TRAPV
0002207c 30 3c 08 00              |0<      |		MOVE.W	#0x800,D0
00022080 4e b9 80 00 20 64        |N    d  |		JSR	0x80002064
00022086 67 00 00 06              |g       |		BEQ	0x2208e
0002208a 30 7c 00 00              |0|      |		MOVEA.W	#0x0,A0
0002208e 2d 48 00 08              |-H      |		MOVE.L	A0,(A6+0x8)
00022092 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00022096 4e 5e                    |N^      |		UNLK	A6
00022098 4e 75                    |Nu      |		RTS
0002209a 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000
0002209e 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000220a2 bf d5                    |        |		CMPA.L	(A5),A7
000220a4 4e 76                    |Nv      |		TRAPV
000220a6 20 2e 00 0c              | .      |		MOVE.L	(A6+0xc),D0
000220aa 4e b9 80 00 20 5c        |N    \  |		JSR	0x8000205c
000220b0 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000220b4 42 90                    |B       |		CLR.L	(A0)
000220b6 11 41 00 03              | A      |		MOVE.B	D1,(A0+0x3)
000220ba 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
000220be 4e 5e                    |N^      |		UNLK	A6
000220c0 4e 75                    |Nu      |		RTS
000220c2 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000
000220c6 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000220ca bf d5                    |        |		CMPA.L	(A5),A7
000220cc 4e 76                    |Nv      |		TRAPV
000220ce 20 2e 00 0c              | .      |		MOVE.L	(A6+0xc),D0
000220d2 4e b9 80 00 20 60        |N    `  |		JSR	0x80002060
000220d8 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000220dc 42 90                    |B       |		CLR.L	(A0)
000220de 11 41 00 03              | A      |		MOVE.B	D1,(A0+0x3)
000220e2 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
000220e6 4e 5e                    |N^      |		UNLK	A6
000220e8 4e 75                    |Nu      |		RTS
000220ea 4e 56 00 00              |NV      |		LINK.W	A6,#0x0000		; Spelunked
000220ee 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
000220f2 bf d5                    |        |		CMPA.L	(A5),A7
000220f4 4e 76                    |Nv      |		TRAPV
000220f6 20 2e 00 0c              | .      |		MOVE.L	(A6+0xc),D0
000220fa 4e b9 80 00 20 6c        |N    l  |		JSR	0x8000206c
00022100 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00022104 42 90                    |B       |		CLR.L	(A0)
00022106 11 41 00 03              | A      |		MOVE.B	D1,(A0+0x3)
0002210a 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
0002210e 4e 5e                    |N^      |		UNLK	A6
00022110 4e 75                    |Nu      |		RTS
00022112					exp_WRITE_NOVRAM_DATA.FIU(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2):
00022112 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022118 00 12                    |        |		.CONST	0x0012			; Stack-delta
0002211a 15 57 52 49 54 45 5f 4e  | WRITE_N|		.TXT	21,'WRITE_NOVRAM_DATA.FIU'
00022130 00                       |        |		.CONST	0x0
00022131 03                       |        |		.CONST	0x3			; DIPROC address
00022132 00                       |        |		.CONST	0x0			; Output Parameters
00022133 05                       |        |		.CONST	0x5			; Input Parameters
00022134 00                       |        |		.CONST	0x0			; In arg [1]
00022135 01                       |        |		.CONST	0x1			; In arg [2]
00022136 00                       |        |		.CONST	0x0			; In arg [1]
00022137 00                       |        |		.CONST	0x0			; In arg [1]
00022138 01                       |        |		.CONST	0x1			; In arg [2]
00022139 00                       |        |		.PAD	0x0
0002213a					exp_READ_NOVRAM_INFO.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr):
0002213a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022140 00 48                    | H      |		.CONST	0x0048			; Stack-delta
00022142 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_INFO.FIU'
00022157 00                       |        |		.CONST	0x0
00022158 03                       |        |		.CONST	0x3			; DIPROC address
00022159 10                       |        |		.CONST	0x10			; Output Parameters
0002215a 00                       |        |		.CONST	0x0			; Input Parameters
0002215b 00                       |        |		.CONST	0x0			; Out arg [1]
0002215c 01                       |        |		.CONST	0x1			; Out arg [2]
0002215d 00                       |        |		.CONST	0x0			; Out arg [1]
0002215e 00                       |        |		.CONST	0x0			; Out arg [1]
0002215f 00                       |        |		.CONST	0x0			; Out arg [1]
00022160 03                       |        |		.CONST	0x3			; Out arg [4]
00022161 01                       |        |		.CONST	0x1			; Out arg [2]
00022162 00                       |        |		.CONST	0x0			; Out arg [1]
00022163 00                       |        |		.CONST	0x0			; Out arg [1]
00022164 00                       |        |		.CONST	0x0			; Out arg [1]
00022165 00                       |        |		.CONST	0x0			; Out arg [1]
00022166 00                       |        |		.CONST	0x0			; Out arg [1]
00022167 00                       |        |		.CONST	0x0			; Out arg [1]
00022168 00                       |        |		.CONST	0x0			; Out arg [1]
00022169 01                       |        |		.CONST	0x1			; Out arg [2]
0002216a 08                       |        |		.CONST	0x8			; Out arg flag
0002216b 00                       |        |		.PAD	0x0
0002216c					exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
0002216c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022172 00 20                    |        |		.CONST	0x0020			; Stack-delta
00022174 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.FIU'
00022189 00                       |        |		.CONST	0x0
0002218a 03                       |        |		.CONST	0x3			; DIPROC address
0002218b 06                       |        |		.CONST	0x6			; Output Parameters
0002218c 00                       |        |		.CONST	0x0			; Input Parameters
0002218d 00                       |        |		.CONST	0x0			; Out arg [1]
0002218e 01                       |        |		.CONST	0x1			; Out arg [2]
0002218f 00                       |        |		.CONST	0x0			; Out arg [1]
00022190 00                       |        |		.CONST	0x0			; Out arg [1]
00022191 01                       |        |		.CONST	0x1			; Out arg [2]
00022192 08                       |        |		.CONST	0x8			; Out arg flag
00022193 00                       |        |		.PAD	0x0
00022194					exp_WRITE_NOVRAM_DATA.SEQ(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2):
00022194 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002219a 00 12                    |        |		.CONST	0x0012			; Stack-delta
0002219c 15 57 52 49 54 45 5f 4e  | WRITE_N|		.TXT	21,'WRITE_NOVRAM_DATA.SEQ'
000221b2 00                       |        |		.CONST	0x0
000221b3 02                       |        |		.CONST	0x2			; DIPROC address
000221b4 00                       |        |		.CONST	0x0			; Output Parameters
000221b5 05                       |        |		.CONST	0x5			; Input Parameters
000221b6 00                       |        |		.CONST	0x0			; In arg [1]
000221b7 01                       |        |		.CONST	0x1			; In arg [2]
000221b8 00                       |        |		.CONST	0x0			; In arg [1]
000221b9 00                       |        |		.CONST	0x0			; In arg [1]
000221ba 01                       |        |		.CONST	0x1			; In arg [2]
000221bb 00                       |        |		.PAD	0x0
000221bc					exp_READ_NOVRAM_INFO.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr):
000221bc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000221c2 00 48                    | H      |		.CONST	0x0048			; Stack-delta
000221c4 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_INFO.SEQ'
000221d9 00                       |        |		.CONST	0x0
000221da 02                       |        |		.CONST	0x2			; DIPROC address
000221db 10                       |        |		.CONST	0x10			; Output Parameters
000221dc 00                       |        |		.CONST	0x0			; Input Parameters
000221dd 00                       |        |		.CONST	0x0			; Out arg [1]
000221de 01                       |        |		.CONST	0x1			; Out arg [2]
000221df 00                       |        |		.CONST	0x0			; Out arg [1]
000221e0 00                       |        |		.CONST	0x0			; Out arg [1]
000221e1 00                       |        |		.CONST	0x0			; Out arg [1]
000221e2 03                       |        |		.CONST	0x3			; Out arg [4]
000221e3 01                       |        |		.CONST	0x1			; Out arg [2]
000221e4 00                       |        |		.CONST	0x0			; Out arg [1]
000221e5 00                       |        |		.CONST	0x0			; Out arg [1]
000221e6 00                       |        |		.CONST	0x0			; Out arg [1]
000221e7 00                       |        |		.CONST	0x0			; Out arg [1]
000221e8 00                       |        |		.CONST	0x0			; Out arg [1]
000221e9 00                       |        |		.CONST	0x0			; Out arg [1]
000221ea 00                       |        |		.CONST	0x0			; Out arg [1]
000221eb 01                       |        |		.CONST	0x1			; Out arg [2]
000221ec 08                       |        |		.CONST	0x8			; Out arg flag
000221ed 00                       |        |		.PAD	0x0
000221ee					exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
000221ee 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000221f4 00 20                    |        |		.CONST	0x0020			; Stack-delta
000221f6 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.SEQ'
0002220b 00                       |        |		.CONST	0x0
0002220c 02                       |        |		.CONST	0x2			; DIPROC address
0002220d 06                       |        |		.CONST	0x6			; Output Parameters
0002220e 00                       |        |		.CONST	0x0			; Input Parameters
0002220f 00                       |        |		.CONST	0x0			; Out arg [1]
00022210 01                       |        |		.CONST	0x1			; Out arg [2]
00022211 00                       |        |		.CONST	0x0			; Out arg [1]
00022212 00                       |        |		.CONST	0x0			; Out arg [1]
00022213 01                       |        |		.CONST	0x1			; Out arg [2]
00022214 08                       |        |		.CONST	0x8			; Out arg flag
00022215 00                       |        |		.PAD	0x0
00022216					exp_WRITE_NOVRAM_DATA.TYP(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2):
00022216 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002221c 00 12                    |        |		.CONST	0x0012			; Stack-delta
0002221e 15 57 52 49 54 45 5f 4e  | WRITE_N|		.TXT	21,'WRITE_NOVRAM_DATA.TYP'
00022234 00                       |        |		.CONST	0x0
00022235 06                       |        |		.CONST	0x6			; DIPROC address
00022236 00                       |        |		.CONST	0x0			; Output Parameters
00022237 05                       |        |		.CONST	0x5			; Input Parameters
00022238 00                       |        |		.CONST	0x0			; In arg [1]
00022239 01                       |        |		.CONST	0x1			; In arg [2]
0002223a 00                       |        |		.CONST	0x0			; In arg [1]
0002223b 00                       |        |		.CONST	0x0			; In arg [1]
0002223c 01                       |        |		.CONST	0x1			; In arg [2]
0002223d 00                       |        |		.PAD	0x0
0002223e					exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
0002223e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00022244 00 20                    |        |		.CONST	0x0020			; Stack-delta
00022246 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.TYP'
0002225b 00                       |        |		.CONST	0x0
0002225c 06                       |        |		.CONST	0x6			; DIPROC address
0002225d 06                       |        |		.CONST	0x6			; Output Parameters
0002225e 00                       |        |		.CONST	0x0			; Input Parameters
0002225f 00                       |        |		.CONST	0x0			; Out arg [1]
00022260 01                       |        |		.CONST	0x1			; Out arg [2]
00022261 00                       |        |		.CONST	0x0			; Out arg [1]
00022262 00                       |        |		.CONST	0x0			; Out arg [1]
00022263 01                       |        |		.CONST	0x1			; Out arg [2]
00022264 08                       |        |		.CONST	0x8			; Out arg flag
00022265 00                       |        |		.PAD	0x0
00022266					exp_READ_NOVRAM_INFO.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr):
00022266 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002226c 00 48                    | H      |		.CONST	0x0048			; Stack-delta
0002226e 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_INFO.TYP'
00022283 00                       |        |		.CONST	0x0
00022284 06                       |        |		.CONST	0x6			; DIPROC address
00022285 10                       |        |		.CONST	0x10			; Output Parameters
00022286 00                       |        |		.CONST	0x0			; Input Parameters
00022287 00                       |        |		.CONST	0x0			; Out arg [1]
00022288 01                       |        |		.CONST	0x1			; Out arg [2]
00022289 00                       |        |		.CONST	0x0			; Out arg [1]
0002228a 00                       |        |		.CONST	0x0			; Out arg [1]
0002228b 00                       |        |		.CONST	0x0			; Out arg [1]
0002228c 03                       |        |		.CONST	0x3			; Out arg [4]
0002228d 01                       |        |		.CONST	0x1			; Out arg [2]
0002228e 00                       |        |		.CONST	0x0			; Out arg [1]
0002228f 00                       |        |		.CONST	0x0			; Out arg [1]
00022290 00                       |        |		.CONST	0x0			; Out arg [1]
00022291 00                       |        |		.CONST	0x0			; Out arg [1]
00022292 00                       |        |		.CONST	0x0			; Out arg [1]
00022293 00                       |        |		.CONST	0x0			; Out arg [1]
00022294 00                       |        |		.CONST	0x0			; Out arg [1]
00022295 01                       |        |		.CONST	0x1			; Out arg [2]
00022296 08                       |        |		.CONST	0x8			; Out arg flag
00022297 00                       |        |		.PAD	0x0
00022298					exp_WRITE_NOVRAM_DATA.VAL(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2):
00022298 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002229e 00 12                    |        |		.CONST	0x0012			; Stack-delta
000222a0 15 57 52 49 54 45 5f 4e  | WRITE_N|		.TXT	21,'WRITE_NOVRAM_DATA.VAL'
000222b6 00                       |        |		.CONST	0x0
000222b7 07                       |        |		.CONST	0x7			; DIPROC address
000222b8 00                       |        |		.CONST	0x0			; Output Parameters
000222b9 05                       |        |		.CONST	0x5			; Input Parameters
000222ba 00                       |        |		.CONST	0x0			; In arg [1]
000222bb 01                       |        |		.CONST	0x1			; In arg [2]
000222bc 00                       |        |		.CONST	0x0			; In arg [1]
000222bd 00                       |        |		.CONST	0x0			; In arg [1]
000222be 01                       |        |		.CONST	0x1			; In arg [2]
000222bf 00                       |        |		.PAD	0x0
000222c0					exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
000222c0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000222c6 00 20                    |        |		.CONST	0x0020			; Stack-delta
000222c8 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.VAL'
000222dd 00                       |        |		.CONST	0x0
000222de 07                       |        |		.CONST	0x7			; DIPROC address
000222df 06                       |        |		.CONST	0x6			; Output Parameters
000222e0 00                       |        |		.CONST	0x0			; Input Parameters
000222e1 00                       |        |		.CONST	0x0			; Out arg [1]
000222e2 01                       |        |		.CONST	0x1			; Out arg [2]
000222e3 00                       |        |		.CONST	0x0			; Out arg [1]
000222e4 00                       |        |		.CONST	0x0			; Out arg [1]
000222e5 01                       |        |		.CONST	0x1			; Out arg [2]
000222e6 08                       |        |		.CONST	0x8			; Out arg flag
000222e7 00                       |        |		.PAD	0x0
000222e8					exp_READ_NOVRAM_INFO.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr):
000222e8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000222ee 00 48                    | H      |		.CONST	0x0048			; Stack-delta
000222f0 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_INFO.VAL'
00022305 00                       |        |		.CONST	0x0
00022306 07                       |        |		.CONST	0x7			; DIPROC address
00022307 10                       |        |		.CONST	0x10			; Output Parameters
00022308 00                       |        |		.CONST	0x0			; Input Parameters
00022309 00                       |        |		.CONST	0x0			; Out arg [1]
0002230a 01                       |        |		.CONST	0x1			; Out arg [2]
0002230b 00                       |        |		.CONST	0x0			; Out arg [1]
0002230c 00                       |        |		.CONST	0x0			; Out arg [1]
0002230d 00                       |        |		.CONST	0x0			; Out arg [1]
0002230e 03                       |        |		.CONST	0x3			; Out arg [4]
0002230f 01                       |        |		.CONST	0x1			; Out arg [2]
00022310 00                       |        |		.CONST	0x0			; Out arg [1]
00022311 00                       |        |		.CONST	0x0			; Out arg [1]
00022312 00                       |        |		.CONST	0x0			; Out arg [1]
00022313 00                       |        |		.CONST	0x0			; Out arg [1]
00022314 00                       |        |		.CONST	0x0			; Out arg [1]
00022315 00                       |        |		.CONST	0x0			; Out arg [1]
00022316 00                       |        |		.CONST	0x0			; Out arg [1]
00022317 01                       |        |		.CONST	0x1			; Out arg [2]
00022318 08                       |        |		.CONST	0x8			; Out arg flag
00022319 00                       |        |		.PAD	0x0
0002231a 57 52 49 54 45 5f 4e 4f  |WRITE_NO|		.TXT	'WRITE_NOVRAM_DATA.MEM '
00022330 57 52 49 54 45 5f 4e 4f  |WRITE_NO|		.TXT	'WRITE_NOVRAM_DATA.M32 '
00022346 ; --------------------------------------------------------------------------------------
00022346 ; OMSI PASCAL Function
00022346 ;    <LVAR  0x012 1(r)>
00022346 ;    <LVAR  0x010 1(r)>
00022346 ;    <LVAR  0x00e 2(r)>
00022346 ;    <LVAR  0x00c 1(r)>
00022346 ;    <LVAR  0x00a 1(r)>
00022346 ;    <LVAR  0x008 2(r)>
00022346 ;    <LVAR -0x004 @ 4(r)>
00022346 ; --------------------------------------------------------------------------------------
00022346 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
0002234a bf d5                    |        |		CMPA.L	(A5),A7
0002234c 62 06                    |b       |		BHI	0x22354
0002234e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022352 4e 76                    |Nv      |		TRAPV
00022354 de fc 00 46              |   F    |		ADDA.W	#0x46,A7
00022358 48 e7 e0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D2+D1+D0,-(A7)
0002235c 45 ee ff fc              |E       |		LEA.L	(A6-0x4),A2
00022360 47 f8 00 00              |G       |		LEA.L	0x0,A3
00022364 49 f9 00 01 04 66        |I    f  |		LEA.L	ExpInputParam(exp : Pointer; ptr : Pointer; len : L),A4
0002236a 72 10                    |r       |		MOVEQ.L	#0x10,D1
0002236c 74 16                    |t       |		MOVEQ.L	#0x16,D2
0002236e 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00022370 4e b9 00 01 04 cc        |N       |		JSR	MemOnly2MB() : Bool
00022376 4a 1f                    |J       |		TST.B	(A7)+
00022378 67 12                    |g       |		BEQ	0x2238c
0002237a 9e c2                    |        |		SUBA.W	D2,A7
0002237c 20 4f                    | O      |		MOVEA.L	A7,A0
0002237e 43 fa ff 9a              |C       |		LEA.L	0x2231a,A1
00022382 70 14                    |p       |		MOVEQ.L	#0x14,D0
00022384 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022386 51 c8 ff fc              |Q       |		DBF	D0,0x22384
0002238a 60 10                    |`       |		BRA	0x2239c
0002238c 9e c2                    |        |		SUBA.W	D2,A7
0002238e 20 4f                    | O      |		MOVEA.L	A7,A0
00022390 43 fa ff 9e              |C       |		LEA.L	0x22330,A1
00022394 70 14                    |p       |		MOVEQ.L	#0x14,D0
00022396 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00022398 51 c8 ff fc              |Q       |		DBF	D0,0x22396
0002239c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002239e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000223a2 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000223a6 3f 3c 00 15              |?<      |		MOVE.W	#0x15,-(A7)
000223aa 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000223b0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000223b2 48 52                    |HR      |		PEA.L	(A2)
000223b4 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000223ba de fc 00 1e              |        |		ADDA.W	#0x1e,A7
000223be 1f 2e 00 10              | .      |		MOVE.B	(A6+0x10),-(A7)
000223c2 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000223c4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000223c8 48 53                    |HS      |		PEA.L	(A3)
000223ca 48 53                    |HS      |		PEA.L	(A3)
000223cc 4e 94                    |N       |		JSR	(A4)
000223ce de c1                    |        |		ADDA.W	D1,A7
000223d0 3e ae 00 0e              |>       |		MOVE.W	(A6+0xe),(A7)
000223d4 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000223d6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000223da 48 53                    |HS      |		PEA.L	(A3)
000223dc 48 78 00 01              |Hx      |		PEA.L	0x1
000223e0 4e 94                    |N       |		JSR	(A4)
000223e2 de c1                    |        |		ADDA.W	D1,A7
000223e4 1e ae 00 0c              |        |		MOVE.B	(A6+0xc),(A7)
000223e8 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000223ea 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000223ee 48 53                    |HS      |		PEA.L	(A3)
000223f0 48 53                    |HS      |		PEA.L	(A3)
000223f2 4e 94                    |N       |		JSR	(A4)
000223f4 de c1                    |        |		ADDA.W	D1,A7
000223f6 1e ae 00 0a              |        |		MOVE.B	(A6+0xa),(A7)
000223fa 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000223fc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022400 48 53                    |HS      |		PEA.L	(A3)
00022402 48 53                    |HS      |		PEA.L	(A3)
00022404 4e 94                    |N       |		JSR	(A4)
00022406 de c1                    |        |		ADDA.W	D1,A7
00022408 3e ae 00 08              |>       |		MOVE.W	(A6+0x8),(A7)
0002240c 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002240e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022412 48 53                    |HS      |		PEA.L	(A3)
00022414 48 78 00 01              |Hx      |		PEA.L	0x1
00022418 4e 94                    |N       |		JSR	(A4)
0002241a de c1                    |        |		ADDA.W	D1,A7
0002241c 42 17                    |B       |		CLR.B	(A7)
0002241e 1f 2e 00 12              | .      |		MOVE.B	(A6+0x12),-(A7)
00022422 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00022424 4e b9 00 01 04 ba        |N       |		JSR	ExpRun(a: Bool; adr: Byte; b: Pointer)
0002242a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002242c 48 52                    |HR      |		PEA.L	(A2)
0002242e 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
00022434 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022436 4c df 1f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3+A4
0002243a 4e 5e                    |N^      |		UNLK	A6
0002243c 4e 75                    |Nu      |		RTS
0002243e 52 45 41 44 5f 4e 4f 56  |READ_NOV|		.TXT	'READ_NOVRAM_DATA.MEM'
00022452 52 45 41 44 5f 4e 4f 56  |READ_NOV|		.TXT	'READ_NOVRAM_DATA.M32'
00022466 ; --------------------------------------------------------------------------------------
00022466 ; OMSI PASCAL Function
00022466 ;    <LVAR  0x020 1(r)>
00022466 ;    <LVAR  0x01c 4(r)>
00022466 ;    <LVAR  0x018 4(r)>
00022466 ;    <LVAR  0x014 4(r)>
00022466 ;    <LVAR  0x010 4(r)>
00022466 ;    <LVAR  0x00c 4(r)>
00022466 ;    <LVAR  0x008 4(r)>
00022466 ;    <LVAR -0x006 @ 4(r)>
00022466 ; --------------------------------------------------------------------------------------
00022466 4e 56 ff be              |NV      |		LINK.W	A6,#0xffbe
0002246a bf d5                    |        |		CMPA.L	(A5),A7
0002246c 62 06                    |b       |		BHI	0x22474
0002246e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022472 4e 76                    |Nv      |		TRAPV
00022474 de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
00022478 48 e7 c0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D1+D0,-(A7)
0002247c 43 ee ff fa              |C       |		LEA.L	(A6-0x6),A1
00022480 45 f8 00 00              |E       |		LEA.L	0x0,A2
00022484 47 f9 00 01 04 72        |G    r  |		LEA.L	ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A3
0002248a 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
0002248c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002248e 4e b9 00 01 04 cc        |N       |		JSR	MemOnly2MB() : Bool
00022494 4a 1f                    |J       |		TST.B	(A7)+
00022496 67 0e                    |g       |		BEQ	0x224a6
00022498 41 fa ff b8              |A       |		LEA.L	0x22452,A0
0002249c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002249e 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000224a0 51 c8 ff fc              |Q       |		DBF	D0,0x2249e
000224a4 60 0c                    |`       |		BRA	0x224b2
000224a6 41 fa ff be              |A       |		LEA.L	0x22466,A0
000224aa 70 04                    |p       |		MOVEQ.L	#0x04,D0
000224ac 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000224ae 51 c8 ff fc              |Q       |		DBF	D0,0x224ac
000224b2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000224b4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000224b8 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000224bc 3f 3c 00 14              |?<      |		MOVE.W	#0x14,-(A7)
000224c0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000224c6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000224c8 48 51                    |HQ      |		PEA.L	(A1)
000224ca 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000224d0 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000224d4 42 27                    |B'      |		CLR.B	-(A7)
000224d6 1f 2e 00 20              | .      |		MOVE.B	(A6+0x20),-(A7)
000224da 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000224dc 4e b9 00 01 04 ba        |N       |		JSR	ExpRun(a: Bool; adr: Byte; b: Pointer)
000224e2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000224e4 2e 91                    |.       |		MOVE.L	(A1),(A7)
000224e6 20 6e 00 1c              | n      |		MOVEA.L	(A6+0x1c),A0
000224ea 48 50                    |HP      |		PEA.L	(A0)
000224ec 48 52                    |HR      |		PEA.L	(A2)
000224ee 48 52                    |HR      |		PEA.L	(A2)
000224f0 4e 93                    |N       |		JSR	(A3)
000224f2 de c1                    |        |		ADDA.W	D1,A7
000224f4 2e 91                    |.       |		MOVE.L	(A1),(A7)
000224f6 20 6e 00 18              | n      |		MOVEA.L	(A6+0x18),A0
000224fa 48 50                    |HP      |		PEA.L	(A0)
000224fc 48 52                    |HR      |		PEA.L	(A2)
000224fe 48 78 00 01              |Hx      |		PEA.L	0x1
00022502 4e 93                    |N       |		JSR	(A3)
00022504 de c1                    |        |		ADDA.W	D1,A7
00022506 2e 91                    |.       |		MOVE.L	(A1),(A7)
00022508 20 6e 00 14              | n      |		MOVEA.L	(A6+0x14),A0
0002250c 48 50                    |HP      |		PEA.L	(A0)
0002250e 48 52                    |HR      |		PEA.L	(A2)
00022510 48 52                    |HR      |		PEA.L	(A2)
00022512 4e 93                    |N       |		JSR	(A3)
00022514 de c1                    |        |		ADDA.W	D1,A7
00022516 2e 91                    |.       |		MOVE.L	(A1),(A7)
00022518 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
0002251c 48 50                    |HP      |		PEA.L	(A0)
0002251e 48 52                    |HR      |		PEA.L	(A2)
00022520 48 52                    |HR      |		PEA.L	(A2)
00022522 4e 93                    |N       |		JSR	(A3)
00022524 de c1                    |        |		ADDA.W	D1,A7
00022526 2e 91                    |.       |		MOVE.L	(A1),(A7)
00022528 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
0002252c 48 50                    |HP      |		PEA.L	(A0)
0002252e 48 52                    |HR      |		PEA.L	(A2)
00022530 48 78 00 01              |Hx      |		PEA.L	0x1
00022534 4e 93                    |N       |		JSR	(A3)
00022536 de c1                    |        |		ADDA.W	D1,A7
00022538 2e 91                    |.       |		MOVE.L	(A1),(A7)
0002253a 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002253e 48 50                    |HP      |		PEA.L	(A0)
00022540 4e b9 00 01 04 78        |N    x  |		JSR	ExpOutputFlag(exp : Pointer; VAR status : Bool)
00022546 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022548 48 51                    |HQ      |		PEA.L	(A1)
0002254a 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
00022550 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022552 4c df 0f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3
00022556 4e 5e                    |N^      |		UNLK	A6
00022558 4e 75                    |Nu      |		RTS
0002255a 52 45 41 44 5f 4e 4f 56  |READ_NOV|		.TXT	'READ_NOVRAM_INFO.MEM'
0002256e 52 45 41 44 5f 4e 4f 56  |READ_NOV|		.TXT	'READ_NOVRAM_INFO.M32'
00022582 ; --------------------------------------------------------------------------------------
00022582 ; OMSI PASCAL Function
00022582 ;    <LVAR  0x048 1(r)>
00022582 ;    <LVAR  0x044 4(r)>
00022582 ;    <LVAR  0x040 4(r)>
00022582 ;    <LVAR  0x03c 4(r)>
00022582 ;    <LVAR  0x038 4(r)>
00022582 ;    <LVAR  0x034 4(r)>
00022582 ;    <LVAR  0x030 4(r)>
00022582 ;    <LVAR  0x02c 4(r)>
00022582 ;    <LVAR  0x028 4(r)>
00022582 ;    <LVAR  0x024 4(r)>
00022582 ;    <LVAR  0x020 4(r)>
00022582 ;    <LVAR  0x01c 4(r)>
00022582 ;    <LVAR  0x018 4(r)>
00022582 ;    <LVAR  0x014 4(r)>
00022582 ;    <LVAR  0x010 4(r)>
00022582 ;    <LVAR  0x00c 4(r)>
00022582 ;    <LVAR  0x008 4(r)>
00022582 ;    <LVAR -0x006 @ 4(r)>
00022582 ; --------------------------------------------------------------------------------------
00022582					TestRamBoard(?):
00022582 4e 56 ff ba              |NV      |		LINK.W	A6,#0xffba
00022586 bf d5                    |        |		CMPA.L	(A5),A7
00022588 62 06                    |b       |		BHI	0x22590
0002258a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002258e 4e 76                    |Nv      |		TRAPV
00022590 de fc 00 40              |   @    |		ADDA.W	#0x40,A7
00022594 48 e7 c0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D1+D0,-(A7)
00022598 43 f8 00 00              |C       |		LEA.L	0x0,A1
0002259c 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
000225a0 47 f9 00 01 04 72        |G    r  |		LEA.L	ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A3
000225a6 49 f8 00 01              |I       |		LEA.L	0x1,A4
000225aa 72 0c                    |r       |		MOVEQ.L	#0x0c,D1
000225ac 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000225ae 4e b9 00 01 04 cc        |N       |		JSR	MemOnly2MB() : Bool
000225b4 4a 1f                    |J       |		TST.B	(A7)+
000225b6 67 0e                    |g       |		BEQ	0x225c6
000225b8 41 fa ff b4              |A       |		LEA.L	0x2256e,A0
000225bc 70 04                    |p       |		MOVEQ.L	#0x04,D0
000225be 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000225c0 51 c8 ff fc              |Q       |		DBF	D0,0x225be
000225c4 60 0c                    |`       |		BRA	0x225d2
000225c6 41 fa ff ba              |A       |		LEA.L	TestRamBoard(?),A0
000225ca 70 04                    |p       |		MOVEQ.L	#0x04,D0
000225cc 2f 20                    |/       |		MOVE.L	-(A0),-(A7)
000225ce 51 c8 ff fc              |Q       |		DBF	D0,0x225cc
000225d2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000225d4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000225d8 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000225dc 3f 3c 00 14              |?<      |		MOVE.W	#0x14,-(A7)
000225e0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000225e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000225e8 48 52                    |HR      |		PEA.L	(A2)
000225ea 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000225f0 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000225f4 42 27                    |B'      |		CLR.B	-(A7)
000225f6 1f 2e 00 48              | . H    |		MOVE.B	(A6+0x48),-(A7)
000225fa 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000225fc 4e b9 00 01 04 ba        |N       |		JSR	ExpRun(a: Bool; adr: Byte; b: Pointer)
00022602 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022604 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022606 20 6e 00 44              | n D    |		MOVEA.L	(A6+0x44),A0
0002260a 48 50                    |HP      |		PEA.L	(A0)
0002260c 48 51                    |HQ      |		PEA.L	(A1)
0002260e 48 51                    |HQ      |		PEA.L	(A1)
00022610 4e 93                    |N       |		JSR	(A3)
00022612 de c1                    |        |		ADDA.W	D1,A7
00022614 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022616 20 6e 00 40              | n @    |		MOVEA.L	(A6+0x40),A0
0002261a 48 50                    |HP      |		PEA.L	(A0)
0002261c 48 51                    |HQ      |		PEA.L	(A1)
0002261e 48 54                    |HT      |		PEA.L	(A4)
00022620 4e 93                    |N       |		JSR	(A3)
00022622 de c1                    |        |		ADDA.W	D1,A7
00022624 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022626 20 6e 00 3c              | n <    |		MOVEA.L	(A6+0x3c),A0
0002262a 48 50                    |HP      |		PEA.L	(A0)
0002262c 48 51                    |HQ      |		PEA.L	(A1)
0002262e 48 51                    |HQ      |		PEA.L	(A1)
00022630 4e 93                    |N       |		JSR	(A3)
00022632 de c1                    |        |		ADDA.W	D1,A7
00022634 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022636 20 6e 00 38              | n 8    |		MOVEA.L	(A6+0x38),A0
0002263a 48 50                    |HP      |		PEA.L	(A0)
0002263c 48 51                    |HQ      |		PEA.L	(A1)
0002263e 48 51                    |HQ      |		PEA.L	(A1)
00022640 4e 93                    |N       |		JSR	(A3)
00022642 de c1                    |        |		ADDA.W	D1,A7
00022644 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022646 20 6e 00 34              | n 4    |		MOVEA.L	(A6+0x34),A0
0002264a 48 50                    |HP      |		PEA.L	(A0)
0002264c 48 51                    |HQ      |		PEA.L	(A1)
0002264e 48 51                    |HQ      |		PEA.L	(A1)
00022650 4e 93                    |N       |		JSR	(A3)
00022652 de c1                    |        |		ADDA.W	D1,A7
00022654 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022656 20 6e 00 30              | n 0    |		MOVEA.L	(A6+0x30),A0
0002265a 48 50                    |HP      |		PEA.L	(A0)
0002265c 48 51                    |HQ      |		PEA.L	(A1)
0002265e 48 78 00 03              |Hx      |		PEA.L	0x3
00022662 4e 93                    |N       |		JSR	(A3)
00022664 de c1                    |        |		ADDA.W	D1,A7
00022666 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022668 20 6e 00 2c              | n ,    |		MOVEA.L	(A6+0x2c),A0
0002266c 48 50                    |HP      |		PEA.L	(A0)
0002266e 48 51                    |HQ      |		PEA.L	(A1)
00022670 48 54                    |HT      |		PEA.L	(A4)
00022672 4e 93                    |N       |		JSR	(A3)
00022674 de c1                    |        |		ADDA.W	D1,A7
00022676 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022678 20 6e 00 28              | n (    |		MOVEA.L	(A6+0x28),A0
0002267c 48 50                    |HP      |		PEA.L	(A0)
0002267e 48 51                    |HQ      |		PEA.L	(A1)
00022680 48 51                    |HQ      |		PEA.L	(A1)
00022682 4e 93                    |N       |		JSR	(A3)
00022684 de c1                    |        |		ADDA.W	D1,A7
00022686 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022688 20 6e 00 24              | n $    |		MOVEA.L	(A6+0x24),A0
0002268c 48 50                    |HP      |		PEA.L	(A0)
0002268e 48 51                    |HQ      |		PEA.L	(A1)
00022690 48 51                    |HQ      |		PEA.L	(A1)
00022692 4e 93                    |N       |		JSR	(A3)
00022694 de c1                    |        |		ADDA.W	D1,A7
00022696 2e 92                    |.       |		MOVE.L	(A2),(A7)
00022698 20 6e 00 20              | n      |		MOVEA.L	(A6+0x20),A0
0002269c 48 50                    |HP      |		PEA.L	(A0)
0002269e 48 51                    |HQ      |		PEA.L	(A1)
000226a0 48 51                    |HQ      |		PEA.L	(A1)
000226a2 4e 93                    |N       |		JSR	(A3)
000226a4 de c1                    |        |		ADDA.W	D1,A7
000226a6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000226a8 20 6e 00 1c              | n      |		MOVEA.L	(A6+0x1c),A0
000226ac 48 50                    |HP      |		PEA.L	(A0)
000226ae 48 51                    |HQ      |		PEA.L	(A1)
000226b0 48 51                    |HQ      |		PEA.L	(A1)
000226b2 4e 93                    |N       |		JSR	(A3)
000226b4 de c1                    |        |		ADDA.W	D1,A7
000226b6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000226b8 20 6e 00 18              | n      |		MOVEA.L	(A6+0x18),A0
000226bc 48 50                    |HP      |		PEA.L	(A0)
000226be 48 51                    |HQ      |		PEA.L	(A1)
000226c0 48 51                    |HQ      |		PEA.L	(A1)
000226c2 4e 93                    |N       |		JSR	(A3)
000226c4 de c1                    |        |		ADDA.W	D1,A7
000226c6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000226c8 20 6e 00 14              | n      |		MOVEA.L	(A6+0x14),A0
000226cc 48 50                    |HP      |		PEA.L	(A0)
000226ce 48 51                    |HQ      |		PEA.L	(A1)
000226d0 48 51                    |HQ      |		PEA.L	(A1)
000226d2 4e 93                    |N       |		JSR	(A3)
000226d4 de c1                    |        |		ADDA.W	D1,A7
000226d6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000226d8 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
000226dc 48 50                    |HP      |		PEA.L	(A0)
000226de 48 51                    |HQ      |		PEA.L	(A1)
000226e0 48 51                    |HQ      |		PEA.L	(A1)
000226e2 4e 93                    |N       |		JSR	(A3)
000226e4 de c1                    |        |		ADDA.W	D1,A7
000226e6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000226e8 20 6e 00 0c              | n      |		MOVEA.L	(A6+0xc),A0
000226ec 48 50                    |HP      |		PEA.L	(A0)
000226ee 48 51                    |HQ      |		PEA.L	(A1)
000226f0 48 54                    |HT      |		PEA.L	(A4)
000226f2 4e 93                    |N       |		JSR	(A3)
000226f4 de c1                    |        |		ADDA.W	D1,A7
000226f6 2e 92                    |.       |		MOVE.L	(A2),(A7)
000226f8 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000226fc 48 50                    |HP      |		PEA.L	(A0)
000226fe 4e b9 00 01 04 78        |N    x  |		JSR	ExpOutputFlag(exp : Pointer; VAR status : Bool)
00022704 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022706 48 52                    |HR      |		PEA.L	(A2)
00022708 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
0002270e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022710 4c df 1f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3+A4
00022714 4e 5e                    |N^      |		UNLK	A6
00022716 4e 75                    |Nu      |		RTS
00022718 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
00022726 ; --------------------------------------------------------------------------------------
00022726 ; OMSI PASCAL Function
00022726 ;    <LVAR  0x008 1(r)>
00022726 ; --------------------------------------------------------------------------------------
00022726					PROG_FAIL:
00022726 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
0002272a bf d5                    |        |		CMPA.L	(A5),A7
0002272c 62 06                    |b       |		BHI	0x22734
0002272e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00022732 4e 76                    |Nv      |		TRAPV
00022734 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00022738 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002273c 41 fa ff e8              |A       |		LEA.L	PROG_FAIL,A0
00022740 70 06                    |p       |		MOVEQ.L	#0x06,D0
00022742 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00022744 51 c8 ff fc              |Q       |		DBF	D0,0x22742
00022748 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
0002274c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002274e 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00022752 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00022756 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
0002275a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00022760 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022762 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00022766 48 80                    |H       |		EXTB.W	D0
00022768 48 c0                    |H       |		EXTW.L	D0
0002276a 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002276c 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00022772 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00022774 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002277a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002277c 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00022782 de fc 00 14              |        |		ADDA.W	#0x14,A7
00022786 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
0002278a 4e 5e                    |N^      |		UNLK	A6
0002278c 4e 75                    |Nu      |		RTS
0002278e 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_ '
0002279c 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_ '
000227aa 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_ '
000227b8 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
000227ca 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error. '
000227e2 ; --------------------------------------------------------------------------------------
000227e2 ; OMSI PASCAL Function
000227e2 ;    <LVAR  0x00e 1(r)>
000227e2 ;    <LVAR  0x00a 4(r)>
000227e2 ;    <LVAR  0x008 1(r)>
000227e2 ; --------------------------------------------------------------------------------------
000227e2					EXP_FAIL:
000227e2 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
000227e6 bf d5                    |        |		CMPA.L	(A5),A7
000227e8 62 06                    |b       |		BHI	0x227f0
000227ea 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000227ee 4e 76                    |Nv      |		TRAPV
000227f0 de fc 00 74              |   t    |		ADDA.W	#0x74,A7
000227f4 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
000227f8 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
000227fe 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
00022804 72 01                    |r       |		MOVEQ.L	#0x01,D1
00022806 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
00022808 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
0002280a 78 12                    |x       |		MOVEQ.L	#0x12,D4
0002280c 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
0002280e 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00022814 41 fa ff b4              |A       |		LEA.L	0x227ca,A0
00022818 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002281a 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
0002281c 51 c8 ff fc              |Q       |		DBF	D0,0x2281a
00022820 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022822 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00022826 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022828 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002282a 4e 93                    |N       |		JSR	(A3)
0002282c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002282e 4e 94                    |N       |		JSR	(A4)
00022830 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022832 20 4f                    | O      |		MOVEA.L	A7,A0
00022834 43 fa ff 58              |C  X    |		LEA.L	0x2278e,A1
00022838 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002283a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002283c 51 c8 ff fc              |Q       |		DBF	D0,0x2283a
00022840 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022842 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00022846 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022848 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002284a 4e 93                    |N       |		JSR	(A3)
0002284c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002284e 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
00022852 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
00022858 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002285a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00022860 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00022862 4e 94                    |N       |		JSR	(A4)
00022864 de c4                    |        |		ADDA.W	D4,A7
00022866 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
0002286a b0 c1                    |        |		CMPA.W	D1,A0
0002286c 67 48                    |gH      |		BEQ	0x228b6
0002286e 9e c5                    |        |		SUBA.W	D5,A7
00022870 22 4f                    |"O      |		MOVEA.L	A7,A1
00022872 45 fa ff 28              |E  (    |		LEA.L	0x2279c,A2
00022876 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00022878 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002287a 51 c8 ff fc              |Q       |		DBF	D0,0x22878
0002287e 9e c3                    |        |		SUBA.W	D3,A7
00022880 22 4f                    |"O      |		MOVEA.L	A7,A1
00022882 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
00022886 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
00022888 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
0002288a 51 c8 ff fc              |Q       |		DBF	D0,0x22888
0002288e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00022890 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
00022894 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022896 3f 02                    |?       |		MOVE.W	D2,-(A7)
00022898 4e 93                    |N       |		JSR	(A3)
0002289a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002289c 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000228a0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000228a2 3f 03                    |?       |		MOVE.W	D3,-(A7)
000228a4 4e 93                    |N       |		JSR	(A3)
000228a6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000228a8 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000228ae 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000228b0 4e 94                    |N       |		JSR	(A4)
000228b2 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
000228b6 9e c5                    |        |		SUBA.W	D5,A7
000228b8 20 4f                    | O      |		MOVEA.L	A7,A0
000228ba 43 fa fe ee              |C       |		LEA.L	0x227aa,A1
000228be 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000228c0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000228c2 51 c8 ff fc              |Q       |		DBF	D0,0x228c0
000228c6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000228c8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000228cc 3f 01                    |?       |		MOVE.W	D1,-(A7)
000228ce 3f 02                    |?       |		MOVE.W	D2,-(A7)
000228d0 4e 93                    |N       |		JSR	(A3)
000228d2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000228d4 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000228d8 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
000228de 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000228e0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000228e6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000228e8 4e 94                    |N       |		JSR	(A4)
000228ea 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000228ec 20 4f                    | O      |		MOVEA.L	A7,A0
000228ee 43 fa fe da              |C       |		LEA.L	0x227ca,A1
000228f2 70 16                    |p       |		MOVEQ.L	#0x16,D0
000228f4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000228f6 51 c8 ff fc              |Q       |		DBF	D0,0x228f4
000228fa 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000228fe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00022900 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00022904 3f 01                    |?       |		MOVE.W	D1,-(A7)
00022906 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
0002290a 4e 93                    |N       |		JSR	(A3)
0002290c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002290e 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00022914 de c3                    |        |		ADDA.W	D3,A7
00022916 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002291a 4e 5e                    |N^      |		UNLK	A6
0002291c 4e 75                    |Nu      |		RTS