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

⟦4828db69c⟧ M200

    Length: 7680 (0x1e00)
    Types: M200
    Notes: M200_PROGRAM
    Names: »P2UADR.M200«

Derivation

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

Disassembly

0x20248


@ 20248
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 20248-202b0 Body>                                              
        <POP 20248-2025e Prologue>                           Σ0         ↓
        <POP 2025e-202a8 Naked>                              Σ0         ↓
            <Blob 0x2025e [14] @>                            Δ-14               {[«14""»]}
            <Const 0x2026a 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 2026e-20270 StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x20270 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 20282-20284 StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20284  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20288  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2028a  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2028c  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x2028e 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 20294-20296 StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x20296 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2029c-2029e StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x2029e 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 202a4-202a8 StackAdj>                       Δ+20               {}
        <POP 202a8-202b0 Epilogue>                           Σ0         

0x202b0


@ 202b0
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 202b0-203ec Body>                                              
        <POP 202b0-202c6 Prologue>                           Σ0         ↓
        <POP 202c6-202dc RegCacheLoad>                       Σ0         ↓
        <POP 202dc-2033c Naked>                              Σ0         ↓ →0x20384
            <Call 0x202dc 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x202e2 [18] @>                            Δ-18               {[«18""»]}
            <POP 202ee-202f0 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x202f0 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x202fc 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 202fe-202ff StackAdj>                       Δ+22       ↓       {}
            <Blob 0x202ff [14] @>                            Δ-14               {[«14""»]}
            <POP 2030e-20310 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x20310 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 2031a-2031c StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 2031c  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x20320 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 20326-20328 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x20328 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2032e-20330 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20330 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20332-20334 StackAdj>                       Δ+18               {}
            <MI 20334  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 20338  CMPA.W  #0x01,A0>                                        {}
            <MI 2033a  BEQ     0x20384>                                         {}
        <POP 2033c-20384 Naked>                              Σ0         ↓
            <Blob 0x2033c [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x2034c [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 2035c-2035e StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x2035e 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 20368-2036a StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x2036a>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x2036a 12>                      Δ-4        
                <Const 0x2036e 0x1.2>                        Δ-2        
                <Const 0x20370 0x1e.2>                       Δ-2        
                <Call 0x20372 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20374-20376 StackAdj>                   Δ+8        
            <Call 0x20376 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 2037c-2037e StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x2037e 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20380-20384 StackAdj>                       Δ+48               {}
        <POP 20384-203e4 Naked>                              Σ0         ↓ ←0x202dc
            <Blob 0x20384 [14] @>                            Δ-14               {[«14""»]}
            <POP 20394-20396 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x20396 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 203a0-203a2 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 203a2  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x203a6 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 203ac-203ae StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x203ae 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 203b4-203b6 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x203b6 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 203b8-203b9 StackAdj>                       Δ+18       ↓       {}
            <Blob 0x203b9 [24] @>                            Δ-24               {[«24""»]}
            <Const 0x203c8 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 203cc-203ce StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x203ce 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x203dc 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 203e2-203e4 StackAdj>                       Δ+30               {}
        <POP 203e4-203ec Epilogue>                           Σ0         

0x203ec


@ 203ec
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @>
    <POP 203ec-2047a Body>                                              
        <POP 203ec-20402 Prologue>                           Σ0         ↓
        <POP 20402-20472 Naked>                              Σ0         ↓
            <Call 0x20402 0x10538>                                              {}
                IPC_Init(void)
            <MI 20408  MOVE.B  (A6+0xc),-(A7)>               Δ-2                {[2, '(A6+0xc)']}
            <Call 0x2040c 0x10502>                                              {[2, '(A6+0xc)']}
                IPC_PutBool(a : Bool)
            <POP 20412-20414 StackAdj>                       Δ+2                {}
            <Call 0x20414 0x10514>                                              {}
                IPC_PutEnd(void)
            <Blob 0x2041a [10] @>                            Δ-10               {[«10""»]}
            <POP 2042c-2042e StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x2042e 9>                                                     {[«10""»]|[$$INITSTATE]}
            <Const 0x20442 0x1.4>                            Δ-4                {[«10""»]|[$$INITSTATE]|[##1]}
            <Const 0x20446 0x2.2>                            Δ-2                {[«10""»]|[$$INITSTATE]|[##1]|[#2]}
            <Pointer.fp 0x2044a <LVAR -0x002 @>>             Δ-4                {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
            <Call 0x2044e 0x103b0>                                              {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
                PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
            <POP 20454-20458 StackAdj>                       Δ+24               {}
            <Call 0x20458 0x10538>                                              {}
                IPC_Init(void)
            <MI 2045e  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20462  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20464 0x10526>                                              {[4, '^(A0)']}
                IPC_GetBool() : Bool
            <POP 2046a-2046c StackAdj>                       Δ+4                {}
            <Call 0x2046c 0x1051a>                                              {}
                IPC_GetEnd(void)
        <POP 20472-2047a Epilogue>                           Σ0         

0x2047a


@ 2047a
        <LVAR  0x008 4(r)>
    <POP 2047a-204b2 Body>                                              
        <POP 2047a-20490 Prologue>                           Σ0         ↓
        <POP 20490-204aa Naked>                              Σ0         ↓
            <Call 0x20490 0x10538>                                              {}
                IPC_Init(void)
            <MI 20496  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 2049a  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x2049c 0x10526>                                              {[4, '^(A0)']}
                IPC_GetBool() : Bool
            <POP 204a2-204a4 StackAdj>                       Δ+4                {}
            <Call 0x204a4 0x1051a>                                              {}
                IPC_GetEnd(void)
        <POP 204aa-204b2 Epilogue>                           Σ0         

0x204b2


@ 204b2
        <LVAR  0x008 1(r)>
    <POP 204b2-204ee Body>                                              
        <POP 204b2-204c4 Prologue>                           Σ0         ↓
        <POP 204c4-204ea Naked>                              Σ0         ↓
            <Call 0x204c4 0x10538>                                              {}
                IPC_Init(void)
            <MI 204ca  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[2, '(A6+0x8)']}
            <Call 0x204ce 0x10502>                                              {[2, '(A6+0x8)']}
                IPC_PutBool(a : Bool)
            <POP 204d4-204d6 StackAdj>                       Δ+2                {}
            <Call 0x204d6 0x10514>                                              {}
                IPC_PutEnd(void)
            <MI 204dc  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x204de 0x1.4>                            Δ-4                {[#0]|[##1]}
            <Call 0x204e2 0x103b8>                                              {[#0]|[##1]}
                PopProgram(status : Byte; msg : String)
            <POP 204e8-204ea StackAdj>                       Δ+6                {}
        <POP 204ea-204ee Epilogue>                           Σ0         

0x204ee


@ 204ee
    <POP 204ee-20526 Body>                                              
        <POP 204ee-20504 Prologue>                           Σ0         ↓
        <POP 20504-2051e Naked>                              Σ0         ↓
            <MI 20504  MOVE.B  0x21c21,D0>                                      {}
            <MI 2050a  EXTB.W  D0>                                              {}
            <POP 0x2050c LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20510  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Const 0x20512 0x21c22.4>                        Δ-4                {[2, 'D0']|[##138274]}
            <Call 0x20518 0x203ec>                                              {[2, 'D0']|[##138274]}
            <POP 2051c-2051e StackAdj>                       Δ+6                {}
        <POP 2051e-20526 Epilogue>                           Σ0         

0x20526


@ 20526
        <LVAR  0x008 1(r)>
    <POP 20526-20578 Body>                                              
        <POP 20526-2053c Prologue>                           Σ0         ↓
        <POP 2053c-20542 RegCacheLoad>                       Σ0         ↓
        <POP 20542-20570 Naked>                              Σ0         ↓
            <Call 0x20542 0x204ee>                                              {}
            <MI 20546  MOVE.B  (A6+0x8),0x21c16>                                {}
            <MI 2054a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x2054c [4] @>                             Δ-4                {[#0]|[«4""»]}
            <Blob 0x20552 [4] @>                             Δ-4                {[#0]|[«4""»]|[«4""»]}
            <Blob 0x20558 [2] @>                             Δ-2                {[#0]|[«4""»]|[«4""»]|[«2""»]}
            <Blob 0x2055a [4] 0x21edc>                       Δ-4                {[#0]|[«4""»]|[«4""»]|[«2""»]|[«4»]}
            <Blob 0x20560 [4] 0x21ed8>                       Δ-4                {[#0]|[«4""»]|[«4""»]|[«2""»]|[«4»]|[«4»]}
            <Call 0x20566 0x1054a>                                              {[#0]|[«4""»]|[«4""»]|[«2""»]|[«4»]|[«4»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 2056c-20570 StackAdj>                       Δ+20               {}
        <POP 20570-20578 Epilogue>                           Σ0         

0x20578


@ 20578
    <POP 20578-205f0 Body>                                              
        <POP 20578-2058e Prologue>                           Σ0         ↓
        <POP 2058e-20596 RegCacheLoad>                       Σ0         ↓
        <POP 20596-205c8 Naked>                              Σ0         ↓
            <Const 0x20596 0x4.2>                            Δ-2                {[#4]}
            <Const 0x2059a 0x2.2>                            Δ-2                {[#4]|[#2]}
            <Call 0x2059c 0x1048a>                                              {[#4]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 2059e-205a0 StackAdj>                       Δ+2                {[#4]}
            <POP 205a0-205a1 StackAdj>                       Δ+2                {}
            <Const 0x205a1 0x7.2>                            Δ-2                {[#7]}
            <Const 0x205a4 0x2.2>                            Δ-2                {[#7]|[#2]}
            <Call 0x205a6 0x1048a>                                              {[#7]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 205a8-205aa StackAdj>                       Δ+2                {[#7]}
            <POP 205aa-205ab StackAdj>                       Δ+2                {}
            <Const 0x205ab 0x6.2>                            Δ-2                {[#6]}
            <Const 0x205ae 0x2.2>                            Δ-2                {[#6]|[#2]}
            <Call 0x205b0 0x1048a>                                              {[#6]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 205b2-205b4 StackAdj>                       Δ+2                {[#6]}
            <POP 205b4-205b5 StackAdj>                       Δ+2                {}
            <Const 0x205b5 0x2.2>                            Δ-2                {[#2]}
            <Const 0x205b6 0x2.2>                            Δ-2                {[#2]|[#2]}
            <Call 0x205b8 0x1048a>                                              {[#2]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 205ba-205bc StackAdj>                       Δ+2                {[#2]}
            <POP 205bc-205bd StackAdj>                       Δ+2                {}
            <Const 0x205bd 0x3.2>                            Δ-2                {[#3]}
            <Const 0x205c0 0x2.2>                            Δ-2                {[#3]|[#2]}
            <Call 0x205c2 0x1048a>                                              {[#3]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 205c4-205c6 StackAdj>                       Δ+4                {}
            <MI 205c6  MOVEQ.L #0x0c,D7>                                        {}
        <POP 205c8-205d8 Naked>                              Σ0         ↓ →0x205e0 ←0x205e0
            <POP 205c8-205ca StackAdj>                       Δ-2                {[-2-]}
            <MI 205ca  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[2, 'D7']}
            <Call 0x205cc 0x104c0>                                              {[-2-]|[2, 'D7']}
                HasBoard(diproc_addr: Byte) : Byte
            <POP 205d2-205d4 StackAdj>                       Δ+2                {[-2-]}
            <MI 205d4  TST.B   (A7)+>                        Δ+2                {}
            <MI 205d6  BEQ     0x205e0>                                         {}
        <POP 205d8-205e0 Naked>                              Σ0         ↓
            <MI 205d8  MOVE.B  D7,-(A7)>                     Δ-2                {[2, 'D7']}
            <Const 0x205da 0x2.2>                            Δ-2                {[2, 'D7']|[#2]}
            <Call 0x205dc 0x1048a>                                              {[2, 'D7']|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 205de-205e0 StackAdj>                       Δ+4                {}
        <POP 205e0-205e8 Naked>                              Σ0         ↓ →0x205c8 ←0x205c8
            <MI 205e0  ADDQ.B  #0x1,D7>                                         {}
            <MI 205e2  CMPI.B  #0x0f,D7>                                        {}
            <MI 205e6  BLE     0x205c8>                                         {}
        <POP 205e8-205f0 Epilogue>                           Σ0         

0x205f0


@ 205f0
        <LVAR  0x00a 2(w)>
        <LVAR  0x008 2(r)>
        <LVAR -0x001 1(w)>
        <LVAR -0x002 1(w) 2(r)>
    <POP 205f0-2062a Body>                                              
        <POP 205f0-20606 Prologue>                           Σ0         ↓
        <POP 20606-20622 Naked>                              Σ0         ↓
            <MI 20606  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 2060a  ANDI.W  #0x00ff,D0>                                      {}
            <MI 2060e  MOVE.B  D0,(A6-0x1)>                                     {}
            <MI 20612  MOVE.W  (A6+0x8),D0>                                     {}
            <MI 20616  LSR.W   #0x8,D0>                                         {}
            <MI 20618  MOVE.B  D0,(A6-0x2)>                                     {}
            <MI 2061c  MOVE.W  (A6-0x2),(A6+0xa)>                               {}
        <POP 20622-2062a Epilogue>                           Σ0         

0x2062a


@ 2062a
    <POP 2062a-206d6 Body>                                              
        <POP 2062a-20640 Prologue>                           Σ0         ↓
        <POP 20640-20644 RegCacheLoad>                       Σ0         ↓
        <POP 20644-206ce Naked>                              Σ0         ↓
            <Blob 0x20644 [6] @>                             Δ-6                {[«6""»]}
            <Call 0x20654 0x21ad6>                                              {[«6""»]}
                exp_INIT_WCS.VAL(Sw_5)
            <MI 2065a  MOVEA.L A7,A0>                                           {[«6""»]}
            <MI 2065c  LEA.L   0x201a5,A1>                                      {[«6""»]}
            <BlockMove 6,A1,A0>                                                 {[«6""»]}
            <Call 0x20668 0x219a8>                                              {[«6""»]}
                exp_INIT_WCS.TYP(Sw_6)
            <POP 2066e-20670 StackAdj>                       Δ+4                {[-2-]}
            <MI 20670  CLR.B   (A7)>                                            {[-2-]}
            <Call 0x20672 0x2164c>                                              {[-2-]}
                exp_ZERO_WCS.FIU(Sw_1)
            <POP 20678-2067a StackAdj>                       Δ+2                {}
            <MI 2067a  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <MI 2067c  CLR.B   -(A7)>                        Δ-2                {[#0]|[#0]}
            <Call 0x2067e 0x21bf2>                                              {[#0]|[#0]}
                exp_FILL_WCS.IOC(Sw_2, Sw_1)
            <POP 20684-20686 StackAdj>                       Δ+4                {}
            <Call 0x20686 0x21794>                                              {}
                exp_ZERO_WCS.SEQ()
            <Call 0x2068c 0x21ab0>                                              {}
                exp_INIT_WCS_INC_PATTERN.VAL()
            <Call 0x20692 0x21982>                                              {}
                exp_INIT_WCS_INC_PATTERN.TYP()
            <Call 0x20698 0x21714>                                              {}
                exp_LOAD_WCS_TEST_PATTERN.FIU()
            <Call 0x2069e 0x21bcc>                                              {}
                exp_INIT_WCS_TEST_PATTERN.IOC()
            <Call 0x206a4 0x2186e>                                              {}
                exp_INIT_WCS_TEST_PATTERN.SEQ()
            <Const 0x206aa 0xbad.2>                          Δ-2                {[#2989]}
            <Call 0x206ac 0x21a66>                                              {[#2989]}
                exp_PREP_RUN.VAL(Sw_2)
            <POP 206b2-206b3 StackAdj>                       Δ+2                {}
            <Const 0x206b3 0xbad.2>                          Δ-2                {[#2989]}
            <Call 0x206b4 0x21938>                                              {[#2989]}
                exp_PREP_RUN.TYP(Sw_2)
            <POP 206ba-206bb StackAdj>                       Δ+2                {}
            <Const 0x206bb 0xbad.2>                          Δ-2                {[#2989]}
            <Call 0x206bc 0x216e6>                                              {[#2989]}
                exp_PREP_RUN.FIU(Sw_2)
            <POP 206c2-206c4 StackAdj>                       Δ+2                {}
            <Const 0x206c4 0xbad.2>                          Δ-2                {[#2989]}
            <Call 0x206c6 0x21b64>                                              {[#2989]}
                exp_PREP_RUN.IOC(Sw_2)
            <POP 206cc-206ce StackAdj>                       Δ+2                {}
        <POP 206ce-206d6 Epilogue>                           Σ0         

0x206d6


@ 206d6
        <LVAR  0x008 1(r)>
        <LVAR -0x00b 1(r)>
        <LVAR -0x00c 1(r) 2(r)>
        <LVAR -0x00d 1(r)>
        <LVAR -0x00e 1(w) 2(r)>
        <LVAR -0x00f 1(w)>
        <LVAR -0x010 1(w) 2(r)>
        <LVAR -0x011 1(r)>
        <LVAR -0x012 1(r) 2(rw)>
    <POP 206d6-207ae Body>                                              
        <POP 206d6-206ec Prologue>                           Σ0         ↓
        <POP 206ec-206f0 RegCacheLoad>                       Σ0         ↓
        <POP 206f0-207a6 Naked>                              Σ0         ↓
            <Blob 0x206f0 [6] @>                             Δ-6                {[«6""»]}
            <MI 20700  CLR.B   -(A7)>                        Δ-2                {[«6""»]|[#0]}
            <Call 0x20702 0x21a94>                                              {[«6""»]|[#0]}
                exp_LOAD_UIR.VAL(Sw_5, Sw_1)
            <POP 20708-20709 StackAdj>                       Δ+8        ↓       {}
            <Blob 0x20709 [6] @>                             Δ-6                {[«6""»]}
            <MI 20718  CLR.B   -(A7)>                        Δ-2                {[«6""»]|[#0]}
            <Call 0x2071a 0x21966>                                              {[«6""»]|[#0]}
                exp_LOAD_UIR.TYP(Sw_6, Sw_1)
            <POP 20720-20721 StackAdj>                       Δ+8        ↓       {}
            <Blob 0x20721 [6] @>                             Δ-6                {[«6""»]}
            <MI 20730  CLR.B   -(A7)>                        Δ-2                {[«6""»]|[#0]}
            <Call 0x20732 0x2173a>                                              {[«6""»]|[#0]}
                exp_LOAD_UIR.FIU(Sw_6, Sw_1)
            <POP 20738-2073a StackAdj>                       Δ+8                {}
            <Const 0x2073a 0xa000.2>                         Δ-2                {[#40960]}
            <MI 2073e  CLR.B   -(A7)>                        Δ-2                {[#40960]|[#0]}
            <Call 0x20740 0x21b92>                                              {[#40960]|[#0]}
                exp_LOAD_UIR.IOC(Sw_2, Sw_1)
            <POP 20746-20748 StackAdj>                       Δ+4                {}
            <POP 20748-2074a StackAdj>                       Δ-2                {[-2-]}
            <MI 2074a  MOVE.B  (A6+0x8),D0>                                     {[-2-]}
            <MI 2074e  EXTB.W  D0>                                              {[-2-]}
            <MI 20750  ASL.W   #0x2,D0>                                         {[-2-]}
            <MI 20752  LEA.L   0x201ee,A0>                                      {[-2-]}
            <MI 20756  MOVE.L  (A0+D0.W),D0>                                    {[-2-]}
            <POP 0x2075a LimitCheck 0x0 ≤ D0 ≤ 0xffff>                          {[-2-]}
            <MI 20764  MOVE.W  D0,-(A7)>                     Δ-2                {[-2-]|[2, 'D0']}
            <Call 0x20766 0x205f0>                                              {[-2-]|[2, 'D0']}
            <POP 2076a-2076c StackAdj>                       Δ+2                {[-2-]}
            <MI 2076c  MOVE.W  (A7)+,(A6-0x12)>              Δ+2                {}
            <MI 2076e  MOVE.B  (A6-0x12),(A6-0x10)>                             {}
            <MI 20772  MOVE.B  (A6-0x11),(A6-0xf)>                              {}
            <MI 20778  MOVE.B  #0x0e,(A6-0xe)>                                  {}
            <MI 2077e  CLR.B   (A6-0xd)>                                        {}
            <MI 20782  CLR.B   (A6-0xc)>                                        {}
            <MI 20786  CLR.B   (A6-0xb)>                                        {}
            <MI 2078a  MOVE.W  (A6-0x12),-(A7)>              Δ-2                {[2, '(A6-0x12)']}
            <Call 0x2078c 0x2183a>                                              {[2, '(A6-0x12)']}
                exp_PREP_RUN.SEQ(Sw_2)
            <MI 20792  MOVE.W  (A6-0xc),(A7)>                                   {[2, '(A6-0xc)']}
            <MI 20796  MOVE.W  (A6-0xe),-(A7)>               Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']}
            <MI 2079a  MOVE.W  (A6-0x10),-(A7)>              Δ-2                {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']}
            <Call 0x2079e 0x21854>                                              {[2, '(A6-0xc)']|[2, '(A6-0xe)']|[2, '(A6-0x10)']}
                exp_LOAD_UIR.SEQ(Sw_6)
            <POP 207a4-207a6 StackAdj>                       Δ+6                {}
        <POP 207a6-207ae Epilogue>                           Σ0         

0x207ae


@ 207ae
        <LVAR  0x008 1(r)>
    <POP 207ae-20840 Body>                                              
        <POP 207ae-207c0 Prologue>                           Σ0         ↓
        <POP 207c0-2080a Naked>                              Σ0         ↓ →0x20812
            <Call 0x207c0 0x21af0>                                              {}
                exp_CLEAR_PARITY.VAL()
            <Call 0x207c6 0x219c2>                                              {}
                exp_CLEAR_PARITY.TYP()
            <Call 0x207cc 0x21776>                                              {}
                exp_CLEAR_PARITY.FIU()
            <Const 0x207d2 0xff.2>                           Δ-2                {[#255]}
            <MI 207d6  CLR.B   -(A7)>                        Δ-2                {[#255]|[#0]}
            <Call 0x207d8 0x21bae>                                              {[#255]|[#0]}
                exp_LOAD_PAREG.IOC(Sw_1, Sw_1)
            <POP 207de-207e0 StackAdj>                       Δ+4                {}
            <Call 0x207e0 0x21894>                                              {}
                exp_CLEAR_PARITY.SEQ()
            <Const 0x207e6 0x1.2>                            Δ-2                {[#1]}
            <Call 0x207ea 0x21756>                                              {[#1]}
                exp_FREEZE_BOARDS.FIU(Sw_2)
            <POP 207f0-207f2 StackAdj>                       Δ+2                {}
            <Call 0x207f2 0x21a4a>                                              {}
                exp_RUN_NOCHECK.VAL()
            <Call 0x207f8 0x2191c>                                              {}
                exp_RUN_NOCHECK.TYP()
            <Call 0x207fe 0x21b48>                                              {}
                exp_RUN_NOCHECK.IOC()
            <MI 20804  TST.B   (A6+0x8)>                                        {}
            <MI 20808  BEQ     0x20812>                                         {}
        <POP 2080a-20812 Naked>                              Σ0         →0x20818
            <Call 0x2080a 0x217c8>                                              {}
                exp_RUN_NOCHECK.SEQ()
            <MI 20810  BRA     0x20818>                                         {}
        <POP 20812-20818 Naked>                              Σ0         ↓ ←0x207c0
            <Call 0x20812 0x21816>                                              {}
                exp_RUN_BAD_UADR_PARITY.SEQ()
        <POP 20818-2083c Naked>                              Σ0         ↓ ←0x2080a
            <Call 0x20818 0x21666>                                              {}
                exp_STEP_MACHINE.FIU()
            <Call 0x2081e 0x21a80>                                              {}
                exp_MF.VAL()
            <Call 0x20824 0x21952>                                              {}
                exp_MF.TYP()
            <Call 0x2082a 0x21b7e>                                              {}
                exp_MF.IOC()
            <Call 0x20830 0x21800>                                              {}
                exp_RESET.SEQ()
            <Call 0x20836 0x21700>                                              {}
                exp_MF.FIU()
        <POP 2083c-20840 Epilogue>                           Σ0         

0x20840


@ 20840
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x008 1(r)>
        <LVAR -0x009 @ 1(r)>
        <LVAR -0x00a 1(r)>
        <LVAR -0x00b @>
        <LVAR -0x010 1(r)>
        <LVAR -0x011 @>
        <LVAR -0x018 1(r)>
        <LVAR -0x01b @>
        <LVAR -0x01d 1(r)>
        <LVAR -0x021 @>
        <LVAR -0x022 1(r)>
        <LVAR -0x026 @>
    <POP 20840-20908 Body>                                              
        <POP 20840-20856 Prologue>                           Σ0         ↓
        <POP 20856-20900 Naked>                              Σ0         ↓
            <MI 20856  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Pointer.fp 0x20858 <LVAR -0x026 @>>             Δ-4                {[#0]|[@@-38]}
            <Call 0x2085c 0x21a08>                                              {[#0]|[@@-38]}
                exp_READ_UIR.VAL(Sw_1, &Sr_5)
            <POP 20862-20864 StackAdj>                       Δ+4                {[#0]}
            <MI 20864  CLR.B   (A7)>                                            {[#0]}
            <Pointer.fp 0x20866 <LVAR -0x021 @>>             Δ-4                {[#0]|[@@-33]}
            <Call 0x2086a 0x218da>                                              {[#0]|[@@-33]}
                exp_READ_UIR.TYP(Sw_1, &Sr_6)
            <POP 20870-20872 StackAdj>                       Δ+4                {[#0]}
            <MI 20872  CLR.B   (A7)>                                            {[#0]}
            <Pointer.fp 0x20874 <LVAR -0x01b @>>             Δ-4                {[#0]|[@@-27]}
            <Call 0x20878 0x21684>                                              {[#0]|[@@-27]}
                exp_READ_UIR.FIU(Sw_1, &Sr_6)
            <POP 2087e-20880 StackAdj>                       Δ+6                {}
            <MI 20880  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Pointer.fp 0x20882 <LVAR -0x00b @>>             Δ-4                {[#0]|[@@-11]}
            <Call 0x20886 0x21b0e>                                              {[#0]|[@@-11]}
                exp_READ_UIR.IOC(Sw_1, &Sr_2)
            <POP 2088c-2088e StackAdj>                       Δ+6                {}
            <Pointer.fp 0x2088e <LVAR -0x011 @>>             Δ-4                {[@@-17]}
            <Call 0x20892 0x217ae>                                              {[@@-17]}
                exp_READ_UIR.SEQ(&Sr_6)
            <POP 20898-2089a StackAdj>                       Δ+4                {}
            <Pointer.fp 0x2089a <LVAR -0x009 @ 1(r)>>        Δ-4                {[@@-9]}
            <Call 0x2089e 0x217e4>                                              {[@@-9]}
                exp_READ_MISC.SEQ(&Sr_2_2_1_1_3)
            <POP 208a4-208a6 StackAdj>                       Δ+4                {}
            <MI 208a6  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 208aa  MOVE.B  (A6+0xc),D0>                                     {}
            <MI 208ae  EXTB.W  D0>                                              {}
            <MI 208b0  MOVE.W  D0,D1>                                           {}
            <MI 208b2  ASL.W   #0x2,D1>                                         {}
            <MI 208b4  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 208b8  CLR.L   D1>                                              {}
            <MI 208ba  MOVE.B  (A6-0x22),D1>                                    {}
            <MI 208be  MOVE.L  D1,(A0+0xb4)>                                    {}
            <MI 208c2  CLR.L   D1>                                              {}
            <MI 208c4  MOVE.B  (A6-0x1d),D1>                                    {}
            <MI 208c8  MOVE.L  D1,(A0+0x78)>                                    {}
            <MI 208cc  CLR.L   D1>                                              {}
            <MI 208ce  MOVE.B  (A6-0x18),D1>                                    {}
            <MI 208d2  MOVE.L  D1,(A0+0xf0)>                                    {}
            <MI 208d6  CLR.L   D1>                                              {}
            <MI 208d8  MOVE.B  (A6-0xa),D1>                                     {}
            <MI 208dc  MOVE.L  D1,(A0+0x3c)>                                    {}
            <MI 208e0  CLR.L   D1>                                              {}
            <MI 208e2  MOVE.B  (A6-0x10),D1>                                    {}
            <MI 208e6  MOVE.L  D1,(A0)>                                         {}
            <MI 208e8  ASL.W   #0x1,D0>                                         {}
            <MI 208ea  LEA.L   0x21c0e,A0>                                      {}
            <MI 208f0  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 208f4  MOVE.B  (A6-0x9),(A0+0x198)>                             {}
            <MI 208fa  MOVE.B  (A6-0x8),(A0+0x199)>                             {}
        <POP 20900-20908 Epilogue>                           Σ0         

0x20908


@ 20908
        <LVAR  0x00e 1(r)>
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x006 1(rw)>
        <LVAR -0x00c @>
        <LVAR -0x00d @ 1(rw)>
        <LVAR -0x00e @ 1(rw)>
        <LVAR -0x00f @>
        <LVAR -0x010 @>
        <LVAR -0x011 @>
        <LVAR -0x012 @>
        <LVAR -0x013 @ 1(r)>
        <LVAR -0x014 @>
        <LVAR -0x015 @>
        <LVAR -0x016 @>
        <LVAR -0x017 @>
        <LVAR -0x018 @ 1(r)>
    <POP 20908-20a36 Body>                                              
        <POP 20908-2091e Prologue>                           Σ0         ↓
        <POP 2091e-2092c RegCacheLoad>                       Σ0         ↓
        <POP 2092c-209c4 Naked>                              Σ0         ↓ →0x209c8
            <Pointer.fp 0x2092c <LVAR -0x018 @ 1(r)>>        Δ-4                {[@@-24]}
            <Pointer.fp 0x20930 <LVAR -0x017 @>>             Δ-4                {[@@-24]|[@@-23]}
            <Pointer.fp 0x20934 <LVAR -0x016 @>>             Δ-4                {[@@-24]|[@@-23]|[@@-22]}
            <Pointer.fp 0x20938 <LVAR -0x015 @>>             Δ-4                {[@@-24]|[@@-23]|[@@-22]|[@@-21]}
            <Pointer.fp 0x2093c <LVAR -0x014 @>>             Δ-4                {[@@-24]|[@@-23]|[@@-22]|[@@-21]|[@@-20]}
            <Call 0x20940 0x21a24>                                              {[@@-24]|[@@-23]|[@@-22]|[@@-21]|[@@-20]}
                exp_READ_PARITY_REG.VAL(&Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1)
            <POP 20946-2094a StackAdj>                       Δ+20               {}
            <Pointer.fp 0x2094a <LVAR -0x013 @ 1(r)>>        Δ-4                {[@@-19]}
            <Pointer.fp 0x2094e <LVAR -0x012 @>>             Δ-4                {[@@-19]|[@@-18]}
            <Pointer.fp 0x20952 <LVAR -0x011 @>>             Δ-4                {[@@-19]|[@@-18]|[@@-17]}
            <Pointer.fp 0x20956 <LVAR -0x010 @>>             Δ-4                {[@@-19]|[@@-18]|[@@-17]|[@@-16]}
            <Pointer.fp 0x2095a <LVAR -0x00f @>>             Δ-4                {[@@-19]|[@@-18]|[@@-17]|[@@-16]|[@@-15]}
            <Call 0x2095e 0x218f6>                                              {[@@-19]|[@@-18]|[@@-17]|[@@-16]|[@@-15]}
                exp_READ_PARITY_REG.TYP(&Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1)
            <POP 20964-20968 StackAdj>                       Δ+18               {[-2-]}
            <MI 20968  CLR.B   (A7)>                                            {[-2-]}
            <Pointer.fp 0x2096a <LVAR -0x00e @ 1(rw)>>       Δ-4                {[-2-]|[@@-14]}
            <Call 0x2096c 0x216a0>                                              {[-2-]|[@@-14]}
                exp_READ_PAREG.FIU(Sw_1, &Sr_1)
            <POP 20972-20974 StackAdj>                       Δ+6                {}
            <MI 20974  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Pointer.fp 0x20976 <LVAR -0x00d @ 1(rw)>>       Δ-4                {[#0]|[@@-13]}
            <Call 0x20978 0x21b2a>                                              {[#0]|[@@-13]}
                exp_READ_PAREG.IOC(Sw_1, &Sr_1)
            <POP 2097e-20980 StackAdj>                       Δ+6                {}
            <Pointer.fp 0x20980 <LVAR -0x00c @>>             Δ-4                {[@@-12]}
            <Call 0x20984 0x217e4>                                              {[@@-12]}
                exp_READ_MISC.SEQ(&Sr_2_2_1_1_3)
            <POP 2098a-2098c StackAdj>                       Δ+4                {}
            <MI 2098c  CLR.L   D0>                                              {}
            <MI 2098e  MOVE.B  (A6-0xe),D0>                                     {}
            <MI 20990  ANDI.W  #0x0002,D0>                                      {}
            <MI 20994  MOVE.B  D0,(A6-0xe)>                                     {}
            <MI 20996  CLR.L   D1>                                              {}
            <MI 20998  MOVE.B  (A6-0xd),D1>                                     {}
            <MI 2099a  NOT.W   D1>                                              {}
            <MI 2099c  ANDI.W  #0x0001,D1>                                      {}
            <MI 209a0  MOVE.B  D1,(A6-0xd)>                                     {}
            <MI 209a2  CLR.L   D1>                                              {}
            <MI 209a4  MOVE.B  (A6-0x6),D1>                                     {}
            <MI 209a8  ANDI.W  #0x0060,D1>                                      {}
            <MI 209ac  MOVE.B  D1,(A6-0x6)>                                     {}
            <MI 209b0  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 209b4  MOVE.B  (A6+0xc),D2>                                     {}
            <MI 209b8  EXTB.W  D2>                                              {}
            <MI 209ba  CLR.B   (A0+D2.W+#0x2d)>                                 {}
            <MI 209be  TST.B   (A6-0x18)>                                       {}
            <MI 209c2  BEQ     0x209c8>                                         {}
        <POP 209c4-209c8 Naked>                              Σ0         ↓
            <MI 209c4  ADDQ.B  #0x1,(A0+D2.W+#0x2d)>                            {}
        <POP 209c8-209d2 Naked>                              Σ0         ↓ →0x209d6 ←0x2092c
            <MI 209c8  CLR.B   (A0+D2.W+#0x1e)>                                 {}
            <MI 209cc  TST.B   (A6-0x13)>                                       {}
            <MI 209d0  BEQ     0x209d6>                                         {}
        <POP 209d2-209d6 Naked>                              Σ0         ↓
            <MI 209d2  ADDQ.B  #0x1,(A0+D2.W+#0x1e)>                            {}
        <POP 209d6-209de Naked>                              Σ0         ↓ →0x209e2 ←0x209c8
            <MI 209d6  CLR.B   (A0+D2.W+#0x3c)>                                 {}
            <MI 209da  TST.B   D0>                                              {}
            <MI 209dc  BEQ     0x209e2>                                         {}
        <POP 209de-209e2 Naked>                              Σ0         ↓
            <MI 209de  ADDQ.B  #0x1,(A0+D2.W+#0x3c)>                            {}
        <POP 209e2-209ea Naked>                              Σ0         ↓ →0x209ee ←0x209d6
            <MI 209e2  CLR.B   (A0+D2.W+#0xf)>                                  {}
            <MI 209e6  TST.B   (A6-0xd)>                                        {}
            <MI 209e8  BNE     0x209ee>                                         {}
        <POP 209ea-209ee Naked>                              Σ0         ↓
            <MI 209ea  ADDQ.B  #0x1,(A0+D2.W+#0xf)>                             {}
        <POP 209ee-209f4 Naked>                              Σ0         ↓ →0x20a12 ←0x209e2
            <MI 209ee  TST.B   (A6+0xe)>                                        {}
            <MI 209f2  BEQ     0x20a12>                                         {}
        <POP 209f4-20a0c Naked>                              Σ0         ↓ →0x20a10
            <MI 209f4  LEA.L   0x21c0e,A1>                                      {}
            <MI 209f6  LEA.L   (A1+D2.W),A1>                                    {}
            <MI 209fa  MOVE.B  D1,(A1+0x1d2)>                                   {}
            <MI 209fe  CLR.B   (A0+D2.W)>                                       {}
            <MI 20a02  LEA.L   0x2022a,A1>                                      {}
            <MI 20a06  CMP.B   (A1+D2.W),D1>                                    {}
            <MI 20a0a  BNE     0x20a10>                                         {}
        <POP 20a0c-20a10 Naked>                              Σ0         ↓
            <MI 20a0c  ADDQ.B  #0x1,(A0+D2.W)>                                  {}
        <POP 20a10-20a12 Naked>                              Σ0         →0x20a2e ←0x209f4
            <MI 20a10  BRA     0x20a2e>                                         {}
        <POP 20a12-20a2a Naked>                              Σ0         ↓ →0x20a2e ←0x209ee
            <MI 20a12  LEA.L   0x21c0e,A1>                                      {}
            <MI 20a14  LEA.L   (A1+D2.W),A1>                                    {}
            <MI 20a18  MOVE.B  D1,(A1+0x1e1)>                                   {}
            <MI 20a1c  CLR.B   (A0+D2.W)>                                       {}
            <MI 20a20  LEA.L   0x20239,A1>                                      {}
            <MI 20a24  CMP.B   (A1+D2.W),D1>                                    {}
            <MI 20a28  BEQ     0x20a2e>                                         {}
        <POP 20a2a-20a2e Naked>                              Σ0         ↓
            <MI 20a2a  ADDQ.B  #0x1,(A0+D2.W)>                                  {}
        <POP 20a2e-20a36 Epilogue>                           Σ0         ←0x20a10 ←0x20a12

0x20a36


@ 20a36
        <LVAR  0x00e 4(w)>
    <POP 20a36-20a70 Body>                                              
        <POP 20a36-20a4c Prologue>                           Σ0         ↓
        <POP 20a4c-20a50 Naked>                              Σ0         ↓
            <MI 20a4c  MOVEQ.L #0x00,D7>                                        {}
            <MI 20a4e  MOVEQ.L #0x00,D6>                                        {}
        <POP 20a50-20a5a Naked>                              Σ0         ↓ →0x20a5c ←0x20a5c
            <MI 20a50  MOVE.B  D6,D0>                                           {}
            <MI 20a52  EXTB.W  D0>                                              {}
            <MI 20a54  TST.B   (A6+D0.W+#0x8)>                                  {}
            <MI 20a58  BNE     0x20a5c>                                         {}
        <POP 20a5a-20a5c Naked>                              Σ0         ↓
            <MI 20a5a  ADDQ.L  #0x1,D7>                                         {}
        <POP 20a5c-20a68 Naked>                              Σ0         ↓ →0x20a50 ←0x20a50
            <MI 20a5c  MOVE.L  D7,(A6+0xe)>                                     {}
            <MI 20a60  ADDQ.B  #0x1,D6>                                         {}
            <MI 20a62  CMPI.B  #0x04,D6>                                        {}
            <MI 20a66  BLE     0x20a50>                                         {}
        <POP 20a68-20a70 Epilogue>                           Σ0         

0x20a70


@ 20a70
        <LVAR  0x00a 1(rw)>
        <LVAR  0x008 1(r)>
        <LVAR -0x003 @ 1(r)>
        <LVAR -0x005 @>
        <LVAR -0x006 @>
        <LVAR -0x007 @ 1(rw)>
        <LVAR -0x009 @>
        <LVAR -0x00a @>
    <POP 20a70-20bb4 Body>                                              
        <POP 20a70-20a86 Prologue>                           Σ0         ↓
        <POP 20a86-20aa6 RegCacheLoad>                       Σ0         ↓
        <POP 20aa6-20abc Naked>                              Σ0         →0x20ac6 →0x20ace →0x20ad0 →0x20b16 →0x20b5a
            <MI 20aa6  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 20aaa  EXTB.W  D0>                                              {}
            <POP 0x20aac LimitCheck 0x0 ≤ D0 ≤ 0x4>                             {}
            <MI 20ab2  ADD.W   D0,D0>                                           {}
            <MI 20ab4  SWITCH  D0.W>                                            {}
        <POP 20ac6-20ace Naked>                              Σ0         →0x20b9c ←0x20aa6 ←0x20ace
            <MI 20ac6  MOVE.B  #0x02,(A6-0x7)>                                  {}
            <MI 20aca  BRA     0x20b9c>                                         {}
        <POP 20ace-20ad0 Naked>                              Σ0         →0x20ac6 ←0x20aa6
            <MI 20ace  BRA     0x20ac6>                                         {}
        <POP 20ad0-20aee Naked>                              Σ0         ↓ →0x20b12 ←0x20aa6
            <Pointer.fp 0x20ad0 <LVAR -0x00a @>>             Δ-4                {[@@-10]}
            <Pointer.fp 0x20ad2 <LVAR -0x009 @>>             Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20ad6 <LVAR -0x007 @ 1(rw)>>       Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20ad8 <LVAR -0x006 @>>             Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20adc <LVAR -0x005 @>>             Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20ae0 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20ae2 0x218b2>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <POP 20ae8-20aea StackAdj>                       Δ+24               {}
            <MI 20aea  TST.B   (A6-0x3)>                                        {}
            <MI 20aec  BNE     0x20b12>                                         {}
        <POP 20aee-20b12 Naked>                              Σ0         ↓
            <Blob 0x20aee [4] @>                             Δ-4                {[«4""»]}
            <POP 20af2-20af4 StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x20af4 4>                                                     {[«4""»]|[$$TYP\]}
            <MI 20b04  MOVE.L  (A7)+,0x21c1c>                Δ+4                {[«4""»]}
            <POP 20b06-20b08 StackAdj>                       Δ+4                {}
            <MI 20b08  MOVE.B  #0x03,0x21ed8>                                   {}
            <Const 0x20b0a 0x1.2>                            Δ-2                {[#1]}
            <Call 0x20b0c 0x20526>                                              {[#1]}
            <POP 20b10-20b12 StackAdj>                       Δ+2                {}
        <POP 20b12-20b16 Naked>                              Σ0         →0x20b9c ←0x20ad0
            <MI 20b12  BRA     0x20b9c>                                         {}
        <POP 20b16-20b34 Naked>                              Σ0         ↓ →0x20b58 ←0x20aa6
            <Pointer.fp 0x20b16 <LVAR -0x00a @>>             Δ-4                {[@@-10]}
            <Pointer.fp 0x20b18 <LVAR -0x009 @>>             Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20b1c <LVAR -0x007 @ 1(rw)>>       Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b1e <LVAR -0x006 @>>             Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b22 <LVAR -0x005 @>>             Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b26 <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b28 0x219e0>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <POP 20b2e-20b30 StackAdj>                       Δ+24               {}
            <MI 20b30  TST.B   (A6-0x3)>                                        {}
            <MI 20b32  BNE     0x20b58>                                         {}
        <POP 20b34-20b58 Naked>                              Σ0         ↓
            <Blob 0x20b34 [4] @>                             Δ-4                {[«4""»]}
            <POP 20b38-20b3a StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x20b3a 4>                                                     {[«4""»]|[$$VAL\]}
            <MI 20b4a  MOVE.L  (A7)+,0x21c1c>                Δ+4                {[«4""»]}
            <POP 20b4c-20b4e StackAdj>                       Δ+4                {}
            <MI 20b4e  MOVE.B  #0x03,0x21ed8>                                   {}
            <Const 0x20b50 0x1.2>                            Δ-2                {[#1]}
            <Call 0x20b52 0x20526>                                              {[#1]}
            <POP 20b56-20b58 StackAdj>                       Δ+2                {}
        <POP 20b58-20b5a Naked>                              Σ0         →0x20b9c ←0x20b16
            <MI 20b58  BRA     0x20b9c>                                         {}
        <POP 20b5a-20b78 Naked>                              Σ0         ↓ →0x20b9c ←0x20aa6
            <Pointer.fp 0x20b5a <LVAR -0x00a @>>             Δ-4                {[@@-10]}
            <Pointer.fp 0x20b5c <LVAR -0x009 @>>             Δ-4                {[@@-10]|[@@-9]}
            <Pointer.fp 0x20b60 <LVAR -0x007 @ 1(rw)>>       Δ-4                {[@@-10]|[@@-9]|[@@-7]}
            <Pointer.fp 0x20b62 <LVAR -0x006 @>>             Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]}
            <Pointer.fp 0x20b66 <LVAR -0x005 @>>             Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]}
            <Pointer.fp 0x20b6a <LVAR -0x003 @ 1(r)>>        Δ-4                {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
            <Call 0x20b6c 0x216be>                                              {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]}
                exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
            <POP 20b72-20b74 StackAdj>                       Δ+24               {}
            <MI 20b74  TST.B   (A6-0x3)>                                        {}
            <MI 20b76  BNE     0x20b9c>                                         {}
        <POP 20b78-20b9c Naked>                              Σ0         ↓
            <Blob 0x20b78 [4] @>                             Δ-4                {[«4""»]}
            <POP 20b7c-20b7e StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x20b7e 4>                                                     {[«4""»]|[$$FIU\]}
            <MI 20b8e  MOVE.L  (A7)+,0x21c1c>                Δ+4                {[«4""»]}
            <POP 20b90-20b92 StackAdj>                       Δ+4                {}
            <MI 20b92  MOVE.B  #0x03,0x21ed8>                                   {}
            <Const 0x20b94 0x1.2>                            Δ-2                {[#1]}
            <Call 0x20b96 0x20526>                                              {[#1]}
            <POP 20b9a-20b9c StackAdj>                       Δ+2                {}
        <POP 20b9c-20ba8 Naked>                              Σ0         ↓ →0x20bac ←0x20ac6 ←0x20b12 ←0x20b58 ←0x20b5a
            <MI 20b9c  CLR.B   (A6+0xa)>                                        {}
            <MI 20ba0  CLR.L   D0>                                              {}
            <MI 20ba2  MOVE.B  (A6-0x7),D0>                                     {}
            <MI 20ba4  CMP.W   #0x01,D0>                                        {}
            <MI 20ba6  BNE     0x20bac>                                         {}
        <POP 20ba8-20bac Naked>                              Σ0         ↓
            <MI 20ba8  ADDQ.B  #0x1,(A6+0xa)>                                   {}
        <POP 20bac-20bb4 Epilogue>                           Σ0         ←0x20b9c

0x20bb4


@ 20bb4
        <LVAR  0x008 4(r)>
    <POP 20bb4-20d5c Body>                                              
        <POP 20bb4-20bca Prologue>                           Σ0         ↓
        <POP 20bca-20bda RegCacheLoad>                       Σ0         ↓
        <POP 20bda-20bdc Naked>                              Σ0         ↓
            <MI 20bda  MOVEQ.L #0x00,D7>                                        {}
        <POP 20bdc-20bf0 Naked>                              Σ0         ↓ ←0x20cf4
            <POP 20bdc-20bde StackAdj>                       Δ-2                {[-2-]}
            <MI 20bde  MOVE.B  D7,-(A7)>                     Δ-2                {[-2-]|[2, 'D7']}
            <Call 0x20be0 0x20a70>                                              {[-2-]|[2, 'D7']}
            <POP 20be4-20be6 StackAdj>                       Δ+2                {[-2-]}
            <MI 20be6  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20be8  EXTB.W  D0>                                              {}
            <POP 0x20bea LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20bec  MOVE.B  D0,D5>                                           {}
            <MI 20bee  MOVEQ.L #0x00,D6>                                        {}
        <POP 20bf0-20c30 Naked>                              Σ0 Δ-4     ↓ →0x20c34 ←0x20ce8
            <MI 20bf0  MOVE.B  D7,D0>                                           {}
            <MI 20bf2  EXTB.W  D0>                                              {}
            <MI 20bf4  MULS.W  #0xf,D0>                                         {}
            <MI 20bf8  LEA.L   0x21c0e,A0>                                      {}
            <MI 20bfa  MOVE.B  D6,D1>                                           {}
            <MI 20bfc  EXTB.W  D1>                                              {}
            <MI 20bfe  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 20c02  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 20c06  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 20c08  CLR.B   (A0+0x148)>                                      {[4, 'A0']}
            <MI 20c0c  MOVE.B  D7,D0>                                           {[4, 'A0']}
            <MI 20c0e  EXTB.W  D0>                                              {[4, 'A0']}
            <MI 20c10  MULS.W  #0x3c,D0>                                        {[4, 'A0']}
            <MI 20c14  MOVE.B  D6,D1>                                           {[4, 'A0']}
            <MI 20c16  EXTB.W  D1>                                              {[4, 'A0']}
            <MI 20c18  ASL.W   #0x2,D1>                                         {[4, 'A0']}
            <MI 20c1a  MOVEA.L (A6+0x8),A1>                                     {[4, 'A0']}
            <MI 20c1e  LEA.L   (A1+D0.W),A1>                                    {[4, 'A0']}
            <MI 20c22  LEA.L   0x201b2,A2>                                      {[4, 'A0']}
            <MI 20c26  MOVE.L  (A1+D1.W),D0>                                    {[4, 'A0']}
            <MI 20c2a  CMP.L   (A2+D1.W),D0>                                    {[4, 'A0']}
            <MI 20c2e  BEQ     0x20c34>                                         {[4, 'A0']}
        <POP 20c30-20c34 Naked>                              Σ-4        ↓
            <MI 20c30  ADDQ.B  #0x1,(A0+0x148)>                                 {[-4-]}
        <POP 20c34-20c6a Naked>                              Σ-4 Δ-4    ↓ →0x20c7a ←0x20bf0
            <MI 20c34  MOVE.B  D7,D0>                                           {[-4-]}
            <MI 20c36  EXTB.W  D0>                                              {[-4-]}
            <MI 20c38  LEA.L   0x21c0e,A1>                                      {[-4-]}
            <MI 20c3a  MOVE.B  (A0+0x148),D1>                                   {[-4-]}
            <MI 20c3e  NEG.B   D1>                                              {[-4-]}
            <MI 20c40  ADDQ.B  #0x1,D1>                                         {[-4-]}
            <MI 20c42  AND.B   (A1+D0.W+#0x16),D1>                              {[-4-]}
            <MI 20c46  EXTB.W  D1>                                              {[-4-]}
            <POP 0x20c48 LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {[-4-]}
            <MI 20c4a  MOVE.B  D1,(A1+D0.W+#0x16)>                              {[-4-]}
            <MI 20c4e  LEA.L   (A1+D0.W),A1>                                    {[-4-]}
            <MI 20c52  MOVE.L  A1,-(A7)>                     Δ-4                {[-4-]|[4, 'A1']}
            <MI 20c54  MOVE.B  (A1+0x193),D0>                                   {[-4-]|[4, 'A1']}
            <MI 20c58  AND.B   (A0+0x148),D0>                                   {[-4-]|[4, 'A1']}
            <MI 20c5c  EXTB.W  D0>                                              {[-4-]|[4, 'A1']}
            <POP 0x20c5e LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[-4-]|[4, 'A1']}
            <MI 20c60  MOVE.B  D0,(A1+0x193)>                                   {[-4-]|[4, 'A1']}
            <MI 20c64  TST.B   (A0+0x148)>                                      {[-4-]|[4, 'A1']}
            <MI 20c68  BEQ     0x20c7a>                                         {[-4-]|[4, 'A1']}
        <POP 20c6a-20c7a Naked>                              Σ-8        ↓
            <MI 20c6a  MOVE.B  D7,D0>                                           {[-8-]}
            <MI 20c6c  EXTB.W  D0>                                              {[-8-]}
            <MI 20c6e  ASL.W   #0x2,D0>                                         {[-8-]}
            <MI 20c70  LEA.L   0x21c0e,A2>                                      {[-8-]}
            <MI 20c72  LEA.L   (A2+D0.W),A2>                                    {[-8-]}
            <MI 20c76  ADDQ.L  #0x1,(A2+0x1b6)>                                 {[-8-]}
        <POP 20c7a-20cb8 Naked>                              Σ-8        ↓ →0x20cc4 ←0x20c34
            <MI 20c7a  MOVEA.L (A7),A0>                                         {[-8-]}
            <MI 20c7c  MOVEA.L (A7+0x4),A1>                                     {[-8-]}
            <MI 20c80  MOVE.B  (A0+0x286),D0>                                   {[-8-]}
            <MI 20c84  AND.B   (A1+0x1f0),D0>                                   {[-8-]}
            <MI 20c88  MOVE.B  D5,D1>                                           {[-8-]}
            <MI 20c8a  NEG.B   D1>                                              {[-8-]}
            <MI 20c8c  ADDQ.B  #0x1,D1>                                         {[-8-]}
            <MI 20c8e  AND.B   (A1+0x23b),D1>                                   {[-8-]}
            <MI 20c92  NEG.B   D1>                                              {[-8-]}
            <MI 20c94  ADDQ.B  #0x1,D1>                                         {[-8-]}
            <MI 20c96  AND.B   D0,D1>                                           {[-8-]}
            <MI 20c98  EXTB.W  D1>                                              {[-8-]}
            <POP 0x20c9a LimitCheck 0x0 ≤ D1 ≤ 0x1>                             {[-8-]}
            <MI 20c9c  MOVE.B  D1,(A0+0x286)>                                   {[-8-]}
            <MI 20ca0  MOVE.B  (A1+0x1f0),D0>                                   {[-8-]}
            <MI 20ca4  NEG.B   D0>                                              {[-8-]}
            <MI 20ca6  ADDQ.B  #0x1,D0>                                         {[-8-]}
            <MI 20ca8  AND.B   (A0+0x2a0),D0>                                   {[-8-]}
            <MI 20cac  EXTB.W  D0>                                              {[-8-]}
            <POP 0x20cae LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[-8-]}
            <MI 20cb0  MOVE.B  D0,(A0+0x2a0)>                                   {[-8-]}
            <MI 20cb4  TST.B   D5>                                              {[-8-]}
            <MI 20cb6  BNE     0x20cc4>                                         {[-8-]}
        <POP 20cb8-20cc4 Naked>                              Σ-8        ↓
            <MI 20cb8  AND.B   (A1+0x23b),D0>                                   {[-8-]}
            <MI 20cbc  EXTB.W  D0>                                              {[-8-]}
            <POP 0x20cbe LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {[-8-]}
            <MI 20cc0  MOVE.B  D0,(A0+0x2a0)>                                   {[-8-]}
        <POP 20cc4-20ccc Naked>                              Σ-8 Δ+4    ↓ →0x20cce ←0x20c7a
            <POP 20cc4-20cc6 StackAdj>                       Δ+4                {[-4-]}
            <MI 20cc6  TST.B   (A1+0x1f0)>                                      {[-4-]}
            <MI 20cca  BNE     0x20cce>                                         {[-4-]}
        <POP 20ccc-20cce Naked>                              Σ-4        →0x20cd8
            <MI 20ccc  BRA     0x20cd8>                                         {[-4-]}
        <POP 20cce-20cd4 Naked>                              Σ-4        ↓ →0x20ce8 ←0x20cc4
            <MI 20cce  TST.B   (A1+0x23b)>                                      {[-4-]}
            <MI 20cd2  BEQ     0x20ce8>                                         {[-4-]}
        <POP 20cd4-20cd8 Naked>                              Σ-4        ↓ →0x20ce8
            <MI 20cd4  TST.B   D5>                                              {[-4-]}
            <MI 20cd6  BNE     0x20ce8>                                         {[-4-]}
        <POP 20cd8-20ce8 Naked>                              Σ-4        ↓ ←0x20ccc
            <MI 20cd8  MOVE.B  D7,D0>                                           {[-4-]}
            <MI 20cda  EXTB.W  D0>                                              {[-4-]}
            <MI 20cdc  ASL.W   #0x2,D0>                                         {[-4-]}
            <MI 20cde  LEA.L   0x21c0e,A0>                                      {[-4-]}
            <MI 20ce0  LEA.L   (A0+D0.W),A0>                                    {[-4-]}
            <MI 20ce4  ADDQ.L  #0x1,(A0+0x28c)>                                 {[-4-]}
        <POP 20ce8-20cf4 Naked>                              Σ-4 Δ+4    ↓ →0x20bf0 ←0x20cce ←0x20cd4
            <POP 20ce8-20cea StackAdj>                       Δ+4                {}
            <MI 20cea  ADDQ.B  #0x1,D6>                                         {}
            <MI 20cec  CMPI.B  #0x0e,D6>                                        {}
            <MI 20cf0  BLE     0x20bf0>                                         {}
        <POP 20cf4-20cfc Naked>                              Σ0         ↓ →0x20bdc
            <MI 20cf4  ADDQ.B  #0x1,D7>                                         {}
            <MI 20cf6  CMP.B   #0x04,D7>                                        {}
            <MI 20cf8  BLE     0x20bdc>                                         {}
        <POP 20cfc-20cfe Naked>                              Σ0         ↓
            <MI 20cfc  MOVEQ.L #0x00,D7>                                        {}
        <POP 20cfe-20d0a Naked>                              Σ0         ↓ →0x20d10 ←0x20d3a
            <MI 20cfe  MOVE.B  D7,D0>                                           {}
            <MI 20d00  EXTB.W  D0>                                              {}
            <MI 20d02  LEA.L   0x21c0e,A0>                                      {}
            <MI 20d04  TST.B   (A0+D0.W+#0x16)>                                 {}
            <MI 20d08  BNE     0x20d10>                                         {}
        <POP 20d0a-20d10 Naked>                              Σ0         ↓
            <MI 20d0a  ADDQ.L  #0x1,0x21ddc>                                    {}
        <POP 20d10-20d34 Naked>                              Σ0 Δ-6     ↓ →0x20d3a ←0x20cfe
            <MI 20d10  MOVE.B  D7,D1>                                           {}
            <MI 20d12  EXTB.W  D1>                                              {}
            <MI 20d14  MOVE.W  D1,-(A7)>                     Δ-2                {[2, 'D1']}
            <MI 20d16  MOVE.W  D1,D2>                                           {[2, 'D1']}
            <MI 20d18  ASL.W   #0x2,D2>                                         {[2, 'D1']}
            <MI 20d1a  LEA.L   0x21c0e,A1>                                      {[2, 'D1']}
            <MI 20d1c  LEA.L   (A1+D2.W),A1>                                    {[2, 'D1']}
            <MI 20d20  MOVE.L  A1,-(A7)>                     Δ-4                {[2, 'D1']|[4, 'A1']}
            <MI 20d22  MOVE.L  0x21dd8,D2>                                      {[2, 'D1']|[4, 'A1']}
            <MI 20d24  ADD.L   (A1+0x1b6),D2>                                   {[2, 'D1']|[4, 'A1']}
            <MI 20d28  MOVE.L  D2,0x21dd8>                                      {[2, 'D1']|[4, 'A1']}
            <MI 20d2a  LEA.L   (A0+D0.W),A0>                                    {[2, 'D1']|[4, 'A1']}
            <MI 20d2e  TST.B   (A0+0x286)>                                      {[2, 'D1']|[4, 'A1']}
            <MI 20d32  BNE     0x20d3a>                                         {[2, 'D1']|[4, 'A1']}
        <POP 20d34-20d3a Naked>                              Σ-6        ↓
            <MI 20d34  ADDQ.L  #0x1,0x21eb4>                                    {[-6-]}
        <POP 20d3a-20d54 Naked>                              Σ-6 Δ+6    ↓ →0x20cfe ←0x20d10
            <MI 20d3a  MOVEA.L (A7)+,A0>                     Δ+4                {[-2-]}
            <MI 20d3c  MOVE.L  0x21eb8,D0>                                      {[-2-]}
            <MI 20d42  ADD.L   (A0+0x28c),D0>                                   {[-2-]}
            <MI 20d46  MOVE.L  D0,0x21eb8>                                      {[-2-]}
            <MI 20d4c  MOVE.W  (A7)+,D7>                     Δ+2                {}
            <MI 20d4e  ADDQ.W  #0x1,D7>                                         {}
            <MI 20d50  CMP.W   #0x04,D7>                                        {}
            <MI 20d52  BLE     0x20cfe>                                         {}
        <POP 20d54-20d5c Epilogue>                           Σ0         

0x20d5c


@ 20d5c
        <LVAR  0x008 4(r)>
    <POP 20d5c-20e70 Body>                                   Δ+2        
        <POP 20d5c-20d72 Prologue>                           Σ0         ↓
        <POP 20d72-20d80 RegCacheLoad>                       Σ0         ↓
        <POP 20d80-20d98 Naked>                              Σ0         ↓
            <MI 20d80  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20d82  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20d84 0x102bc>                                              {[4, '^(A0)']}
                FreeString(VAR a : String)
            <POP 20d8a-20d8c StackAdj>                       Δ+4                {}
            <MI 20d8c  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20d8e 0x102b8>                                              {[4, '^(A0)']}
                NewString(VAR a : String)
            <POP 20d94-20d96 StackAdj>                       Δ+4                {}
            <MI 20d96  MOVEQ.L #0x00,D6>                                        {}
        <POP 20d98-20da4 Naked>                              Σ0         ↓ →0x20dfe ←0x20dfe
            <MI 20d98  MOVE.B  D6,D0>                                           {}
            <MI 20d9a  EXTB.W  D0>                                              {}
            <MI 20d9c  LEA.L   0x21c0e,A0>                                      {}
            <MI 20d9e  TST.B   (A0+D0.W+#0x16)>                                 {}
            <MI 20da2  BNE     0x20dfe>                                         {}
        <POP 20da4-20da6 Naked>                              Σ0         ↓
            <MI 20da4  MOVEQ.L #0x00,D7>                                        {}
        <POP 20da6-20dc2 Naked>                              Σ0         ↓ →0x20dca ←0x20dd0
            <MI 20da6  MOVE.B  D6,D0>                                           {}
            <MI 20da8  EXTB.W  D0>                                              {}
            <MI 20daa  MULS.W  #0xf,D0>                                         {}
            <MI 20dae  LEA.L   0x21c0e,A0>                                      {}
            <MI 20db0  MOVE.B  D7,D1>                                           {}
            <MI 20db2  EXTB.W  D1>                                              {}
            <MI 20db4  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 20db8  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 20dbc  TST.B   (A0+0x148)>                                      {}
            <MI 20dc0  BEQ     0x20dca>                                         {}
        <POP 20dc2-20dca Naked>                              Σ0 Δ-2     →0x20dd0
            <MI 20dc2  MOVEA.L (A6+0x8),A0>                                     {}
            <Blob 0x20dc4 [2] @>                             Δ-2                {[«2""»]}
            <MI 20dc8  BRA     0x20dd0>                                         {[«2""»]}
        <POP 20dca-20dd0 Naked>                              Σ0 Δ-2     ↓ ←0x20da6
            <MI 20dca  MOVEA.L (A6+0x8),A0>                                     {}
            <Blob 0x20dcc [2] @>                             Δ-2                {[«2""»]}
        <POP 20dd0-20dfc Naked>                              Σ-2 Δ+2    ↓ →0x20da6 ←0x20dc2
            <POP 20dd0-20dd2 StackAdj>                       Δ-4                {[-6-]}
            <MI 20dd2  MOVE.L  (A0),-(A7)>                   Δ-4                {[-6-]|[4, '(A0)']}
            <POP 20dd4-20dd6 StackAdj>                       Δ-4                {[-6-]|[4, '(A0)']|[-4-]}
            <Lit 0x20dd6>                                                       {[-6-]|[4, '(A0)']|[$$…]}
                <Pointer.sp 0x20dd6 12>                      Δ-4        
                <Const 0x20dda 0x1.2>                        Δ-2        
                <Const 0x20dde 0x2.2>                        Δ-2        
                <Call 0x20de2 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20de8-20dea StackAdj>                   Δ+8        
            <Call 0x20dea 0x102d0>                                              {[-6-]|[4, '(A0)']|[$$…]}
                StringCat2(a, b : String) : String
            <POP 20df0-20df2 StackAdj>                       Δ+8                {[-6-]}
            <MI 20df2  MOVE.L  (A7)+,(A0)>                   Δ+4                {[-2-]}
            <POP 20df4-20df6 StackAdj>                       Δ+2                {}
            <MI 20df6  ADDQ.B  #0x1,D7>                                         {}
            <MI 20df8  CMP.B   #0x0e,D7>                                        {}
            <MI 20dfa  BLE     0x20da6>                                         {}
        <POP 20dfc-20dfe Naked>                              Σ0         →0x20e06
            <MI 20dfc  BRA     0x20e06>                                         {}
        <POP 20dfe-20e06 Naked>                              Σ0         ↓ →0x20d98 ←0x20d98
            <MI 20dfe  ADDQ.B  #0x1,D6>                                         {}
            <MI 20e00  CMPI.B  #0x04,D6>                                        {}
            <MI 20e04  BLE     0x20d98>                                         {}
        <POP 20e06-20e08 Naked>                              Σ0         ↓ ←0x20dfc
            <MI 20e06  MOVEQ.L #0x00,D7>                                        {}
        <POP 20e08-20e68 Naked>                              Σ0         ↓ →0x20e08 ←0x20e08
            <MI 20e08  MOVE.B  D7,D0>                                           {}
            <MI 20e0a  EXTB.W  D0>                                              {}
            <MI 20e0c  ASL.W   #0x1,D0>                                         {}
            <MI 20e0e  LEA.L   0x21c0e,A0>                                      {}
            <MI 20e10  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 20e14  CLR.L   D0>                                              {}
            <MI 20e16  MOVE.B  (A0+0x198),D0>                                   {}
            <MI 20e1a  MULU.W  #0x100,D0>                                       {}
            <MI 20e1e  CLR.L   D1>                                              {}
            <MI 20e20  MOVE.B  (A0+0x199),D1>                                   {}
            <MI 20e24  ADD.W   D0,D1>                                           {}
            <MI 20e26  CLR.L   D0>                                              {}
            <MI 20e28  MOVE.W  D1,D0>                                           {}
            <MI 20e2a  MOVE.L  D0,D5>                                           {}
            <MI 20e2c  MOVEA.L (A6+0x8),A0>                                     {}
            <POP 20e2e-20e30 StackAdj>                       Δ-4                {[-4-]}
            <MI 20e30  MOVE.L  (A0),-(A7)>                   Δ-4                {[-4-]|[4, '(A0)']}
            <POP 20e32-20e34 StackAdj>                       Δ-12               {[-4-]|[4, '(A0)']|[-12-]}
            <MI 20e34  MOVE.L  D5,-(A7)>                     Δ-4                {[-4-]|[4, '(A0)']|[-12-]|[4, 'D5']}
            <Call 0x20e36 0x10354>                                              {[-4-]|[4, '(A0)']|[-12-]|[4, 'D5']}
                Long2Quad(a : Long) : Quad
            <POP 20e3c-20e3e StackAdj>                       Δ+4                {[-4-]|[4, '(A0)']|[-12-]}
            <Const 0x20e3e 0x10.4>                           Δ-4                {[-4-]|[4, '(A0)']|[-12-]|[##16]}
            <Call 0x20e42 0x1035c>                                              {[-4-]|[4, '(A0)']|[-12-]|[##16]}
                Quad2String(a : Quad; radix : Long ) : String
            <POP 20e48-20e4a StackAdj>                       Δ+12               {[-4-]|[4, '(A0)']|[-4-]}
            <Call 0x20e4a 0x102d0>                                              {[-4-]|[4, '(A0)']|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20e50-20e52 StackAdj>                       Δ+8                {[-4-]}
            <MI 20e52  MOVE.L  (A7)+,(A0)>                   Δ+4                {}
            <MI 20e54  MOVE.L  (A0),-(A7)>                   Δ-4                {[4, '(A0)']}
            <Const 0x20e56 0x5c.2>                           Δ-2                {[4, '(A0)']|[#92]}
            <Call 0x20e5a 0x102c0>                                              {[4, '(A0)']|[#92]}
                AppendChar(MOD b : String; a : char)
            <POP 20e60-20e62 StackAdj>                       Δ+6                {}
            <MI 20e62  ADDQ.B  #0x1,D7>                                         {}
            <MI 20e64  CMP.B   #0x0e,D7>                                        {}
            <MI 20e66  BLE     0x20e08>                                         {}
        <POP 20e68-20e70 Epilogue>                           Σ0         

0x20e70


@ 20e70
        <LVAR  0x008 4(r)>
    <POP 20e70-20f64 Body>                                   Δ+4        
        <POP 20e70-20e86 Prologue>                           Σ0         ↓
        <POP 20e86-20e94 RegCacheLoad>                       Σ0         ↓
        <POP 20e94-20eac Naked>                              Σ0         ↓
            <MI 20e94  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20e96  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20e98 0x102bc>                                              {[4, '^(A0)']}
                FreeString(VAR a : String)
            <POP 20e9e-20ea0 StackAdj>                       Δ+4                {}
            <MI 20ea0  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20ea2 0x102b8>                                              {[4, '^(A0)']}
                NewString(VAR a : String)
            <POP 20ea8-20eaa StackAdj>                       Δ+4                {}
            <MI 20eaa  MOVEQ.L #0x00,D6>                                        {}
        <POP 20eac-20ebe Naked>                              Σ0         ↓ →0x20f52 ←0x20f52
            <MI 20eac  MOVE.B  D6,D0>                                           {}
            <MI 20eae  EXTB.W  D0>                                              {}
            <MI 20eb0  LEA.L   0x21c0e,A0>                                      {}
            <MI 20eb2  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 20eb6  TST.B   (A0+0x286)>                                      {}
            <MI 20eba  BNE     0x20f52>                                         {}
        <POP 20ebe-20ec0 Naked>                              Σ0         ↓
            <MI 20ebe  MOVEQ.L #0x00,D7>                                        {}
        <POP 20ec0-20ede Naked>                              Σ0 Δ-4     ↓ →0x20ee6 ←0x20f24
            <MI 20ec0  MOVE.B  D6,D0>                                           {}
            <MI 20ec2  EXTB.W  D0>                                              {}
            <MI 20ec4  MULS.W  #0xf,D0>                                         {}
            <MI 20ec8  LEA.L   0x21c0e,A0>                                      {}
            <MI 20eca  MOVE.B  D7,D1>                                           {}
            <MI 20ecc  EXTB.W  D1>                                              {}
            <MI 20ece  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 20ed2  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 20ed6  MOVE.L  A0,-(A7)>                     Δ-4                {[4, 'A0']}
            <MI 20ed8  TST.B   (A0+0x1f0)>                                      {[4, 'A0']}
            <MI 20edc  BEQ     0x20ee6>                                         {[4, 'A0']}
        <POP 20ede-20ee6 Naked>                              Σ-4 Δ-2    →0x20eec
            <MI 20ede  MOVEA.L (A6+0x8),A1>                                     {[-4-]}
            <Blob 0x20ee0 [2] @>                             Δ-2                {[-4-]|[«2""»]}
            <MI 20ee4  BRA     0x20eec>                                         {[-4-]|[«2""»]}
        <POP 20ee6-20eec Naked>                              Σ-4 Δ-2    ↓ ←0x20ec0
            <MI 20ee6  MOVEA.L (A6+0x8),A1>                                     {[-4-]}
            <Blob 0x20ee8 [2] @>                             Δ-2                {[-4-]|[«2""»]}
        <POP 20eec-20f16 Naked>                              Σ-6 Δ+6    ↓ →0x20f1e ←0x20ede
            <POP 20eec-20eee StackAdj>                       Δ-4                {[-10-]}
            <MI 20eee  MOVE.L  (A1),-(A7)>                   Δ-4                {[-10-]|[4, '(A1)']}
            <POP 20ef0-20ef2 StackAdj>                       Δ-4                {[-10-]|[4, '(A1)']|[-4-]}
            <Lit 0x20ef2>                                                       {[-10-]|[4, '(A1)']|[$$…]}
                <Pointer.sp 0x20ef2 12>                      Δ-4        
                <Const 0x20ef6 0x1.2>                        Δ-2        
                <Const 0x20ef8 0x2.2>                        Δ-2        
                <Call 0x20efa 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20f00-20f02 StackAdj>                   Δ+8        
            <Call 0x20f02 0x102d0>                                              {[-10-]|[4, '(A1)']|[$$…]}
                StringCat2(a, b : String) : String
            <POP 20f08-20f0a StackAdj>                       Δ+8                {[-10-]}
            <MI 20f0a  MOVE.L  (A7)+,(A1)>                   Δ+4                {[-6-]}
            <POP 20f0c-20f0e StackAdj>                       Δ+2                {[-4-]}
            <MI 20f0e  MOVEA.L (A7)+,A0>                     Δ+4                {}
            <MI 20f10  TST.B   (A0+0x23b)>                                      {}
            <MI 20f14  BNE     0x20f1e>                                         {}
        <POP 20f16-20f1e Naked>                              Σ0 Δ-2     →0x20f24
            <MI 20f16  MOVEA.L (A6+0x8),A0>                                     {}
            <Blob 0x20f18 [2] @>                             Δ-2                {[«2""»]}
            <MI 20f1c  BRA     0x20f24>                                         {[«2""»]}
        <POP 20f1e-20f24 Naked>                              Σ0 Δ-2     ↓ ←0x20eec
            <MI 20f1e  MOVEA.L (A6+0x8),A0>                                     {}
            <Blob 0x20f20 [2] @>                             Δ-2                {[«2""»]}
        <POP 20f24-20f50 Naked>                              Σ-2 Δ+2    ↓ →0x20ec0 ←0x20f16
            <POP 20f24-20f26 StackAdj>                       Δ-4                {[-6-]}
            <MI 20f26  MOVE.L  (A0),-(A7)>                   Δ-4                {[-6-]|[4, '(A0)']}
            <POP 20f28-20f2a StackAdj>                       Δ-4                {[-6-]|[4, '(A0)']|[-4-]}
            <Lit 0x20f2a>                                                       {[-6-]|[4, '(A0)']|[$$…]}
                <Pointer.sp 0x20f2a 12>                      Δ-4        
                <Const 0x20f2e 0x1.2>                        Δ-2        
                <Const 0x20f30 0x2.2>                        Δ-2        
                <Call 0x20f32 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20f38-20f3a StackAdj>                   Δ+8        
            <Call 0x20f3a 0x102d0>                                              {[-6-]|[4, '(A0)']|[$$…]}
                StringCat2(a, b : String) : String
            <POP 20f40-20f42 StackAdj>                       Δ+8                {[-6-]}
            <MI 20f42  MOVE.L  (A7)+,(A0)>                   Δ+4                {[-2-]}
            <POP 20f44-20f46 StackAdj>                       Δ+2                {}
            <MI 20f46  ADDQ.B  #0x1,D7>                                         {}
            <MI 20f48  CMPI.B  #0x0e,D7>                                        {}
            <MI 20f4c  BLE     0x20ec0>                                         {}
        <POP 20f50-20f52 Naked>                              Σ0         →0x20f5c
            <MI 20f50  BRA     0x20f5c>                                         {}
        <POP 20f52-20f5c Naked>                              Σ0         ↓ →0x20eac ←0x20eac
            <MI 20f52  ADDQ.B  #0x1,D6>                                         {}
            <MI 20f54  CMPI.B  #0x04,D6>                                        {}
            <MI 20f58  BLE     0x20eac>                                         {}
        <POP 20f5c-20f64 Epilogue>                           Σ0         ←0x20f50

0x20f64


@ 20f64
        <LVAR  0x008 1(w)>
        <LVAR -0x004 1(rw)>
    <POP 20f64-2100a Body>                                              
        <POP 20f64-20f7a Prologue>                           Σ0         ↓
        <POP 20f7a-20f88 RegCacheLoad>                       Σ0         ↓
        <POP 20f88-20f8e Naked>                              Σ0         ↓
            <MI 20f88  CLR.B   (A6-0x4)>                                        {}
            <MI 20f8a  MOVEQ.L #0x04,D5>                                        {}
            <MI 20f8c  MOVEQ.L #0x00,D7>                                        {}
        <POP 20f8e-20f9a Naked>                              Σ0         ↓ →0x20f9e ←0x20f9e
            <MI 20f8e  MOVE.B  D7,D0>                                           {}
            <MI 20f90  EXTB.W  D0>                                              {}
            <MI 20f92  LEA.L   0x21c0e,A0>                                      {}
            <MI 20f94  TST.B   (A0+D0.W+#0x16)>                                 {}
            <MI 20f98  BNE     0x20f9e>                                         {}
        <POP 20f9a-20f9e Naked>                              Σ0         →0x20fa6
            <MI 20f9a  MOVE.B  D7,D5>                                           {}
            <MI 20f9c  BRA     0x20fa6>                                         {}
        <POP 20f9e-20fa4 Naked>                              Σ0         ↓ →0x20f8e ←0x20f8e
            <MI 20f9e  ADDQ.B  #0x1,D7>                                         {}
            <MI 20fa0  CMP.B   #0x04,D7>                                        {}
            <MI 20fa2  BLE     0x20f8e>                                         {}
        <POP 20fa4-20fa6 Naked>                              Σ0         →0x20ffe
            <MI 20fa4  BRA     0x20ffe>                                         {}
        <POP 20fa6-20fa8 Naked>                              Σ0         ↓ ←0x20f9a
            <MI 20fa6  MOVE.B  D5,D7>                                           {}
        <POP 20fa8-20fac Naked>                              Σ0         ↓ →0x20ffa ←0x20ff6
            <MI 20fa8  CMP.B   #0x04,D7>                                        {}
            <MI 20faa  BGT     0x20ffa>                                         {}
        <POP 20fac-20fb8 Naked>                              Σ0         ↓ →0x20ff6
            <MI 20fac  MOVE.B  D7,D0>                                           {}
            <MI 20fae  EXTB.W  D0>                                              {}
            <MI 20fb0  LEA.L   0x21c0e,A0>                                      {}
            <MI 20fb2  TST.B   (A0+D0.W+#0x16)>                                 {}
            <MI 20fb6  BNE     0x20ff6>                                         {}
        <POP 20fb8-20fba Naked>                              Σ0         ↓
            <MI 20fb8  MOVEQ.L #0x00,D6>                                        {}
        <POP 20fba-20fec Naked>                              Σ0         ↓ →0x20fee ←0x20fee
            <MI 20fba  MOVE.B  D7,D0>                                           {}
            <MI 20fbc  EXTB.W  D0>                                              {}
            <MI 20fbe  MULS.W  #0x0f,D0>                                        {}
            <MI 20fc0  MOVE.B  D5,D1>                                           {}
            <MI 20fc2  EXTB.W  D1>                                              {}
            <MI 20fc4  MULS.W  #0x0f,D1>                                        {}
            <MI 20fc6  LEA.L   0x21c0e,A0>                                      {}
            <MI 20fc8  MOVE.B  D6,D2>                                           {}
            <MI 20fca  EXTB.W  D2>                                              {}
            <MI 20fcc  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 20fd0  LEA.L   (A0+D2.W),A0>                                    {}
            <MI 20fd4  LEA.L   0x21c0e,A1>                                      {}
            <MI 20fd6  MOVE.B  D6,D0>                                           {}
            <MI 20fd8  EXTB.W  D0>                                              {}
            <MI 20fda  LEA.L   (A1+D1.W),A1>                                    {}
            <MI 20fde  LEA.L   (A1+D0.W),A1>                                    {}
            <MI 20fe2  MOVE.B  (A0+0x148),D0>                                   {}
            <MI 20fe6  CMP.B   (A1+0x148),D0>                                   {}
            <MI 20fea  BEQ     0x20fee>                                         {}
        <POP 20fec-20fee Naked>                              Σ0         →0x20ffe
            <MI 20fec  BRA     0x20ffe>                                         {}
        <POP 20fee-20ff6 Naked>                              Σ0         ↓ →0x20fba ←0x20fba
            <MI 20fee  ADDQ.B  #0x1,D6>                                         {}
            <MI 20ff0  CMPI.B  #0x0e,D6>                                        {}
            <MI 20ff4  BLE     0x20fba>                                         {}
        <POP 20ff6-20ffa Naked>                              Σ0         ↓ →0x20fa8 ←0x20fac
            <MI 20ff6  ADDQ.B  #0x1,D7>                                         {}
            <MI 20ff8  BVC     0x20fa8>                                         {}
        <POP 20ffa-20ffe Naked>                              Σ0         ↓ ←0x20fa8
            <MI 20ffa  MOVE.B  #0x01,(A6-0x4)>                                  {}
        <POP 20ffe-21002 Naked>                              Σ0         ↓ ←0x20fa4 ←0x20fec
            <MI 20ffe  MOVE.B  (A6-0x4),(A6+0x8)>                               {}
        <POP 21002-2100a Epilogue>                           Σ0         

0x2100a


@ 2100a
        <LVAR  0x008 1(w)>
        <LVAR -0x004 1(rw)>
    <POP 2100a-210c2 Body>                                              
        <POP 2100a-21020 Prologue>                           Σ0         ↓
        <POP 21020-2102e RegCacheLoad>                       Σ0         ↓
        <POP 2102e-21034 Naked>                              Σ0         ↓
            <MI 2102e  CLR.B   (A6-0x4)>                                        {}
            <MI 21030  MOVEQ.L #0x04,D5>                                        {}
            <MI 21032  MOVEQ.L #0x00,D7>                                        {}
        <POP 21034-21044 Naked>                              Σ0         ↓ →0x21048 ←0x21048
            <MI 21034  MOVE.B  D7,D0>                                           {}
            <MI 21036  EXTB.W  D0>                                              {}
            <MI 21038  LEA.L   0x21c0e,A0>                                      {}
            <MI 2103a  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 2103e  TST.B   (A0+0x286)>                                      {}
            <MI 21042  BNE     0x21048>                                         {}
        <POP 21044-21048 Naked>                              Σ0         →0x21050
            <MI 21044  MOVE.B  D7,D5>                                           {}
            <MI 21046  BRA     0x21050>                                         {}
        <POP 21048-2104e Naked>                              Σ0         ↓ →0x21034 ←0x21034
            <MI 21048  ADDQ.B  #0x1,D7>                                         {}
            <MI 2104a  CMP.B   #0x04,D7>                                        {}
            <MI 2104c  BLE     0x21034>                                         {}
        <POP 2104e-21050 Naked>                              Σ0         →0x210b6
            <MI 2104e  BRA     0x210b6>                                         {}
        <POP 21050-21052 Naked>                              Σ0         ↓ ←0x21044
            <MI 21050  MOVE.B  D5,D7>                                           {}
        <POP 21052-21056 Naked>                              Σ0         ↓ →0x210b2 ←0x210ae
            <MI 21052  CMP.B   #0x04,D7>                                        {}
            <MI 21054  BGT     0x210b2>                                         {}
        <POP 21056-21066 Naked>                              Σ0         ↓ →0x210ae
            <MI 21056  MOVE.B  D7,D0>                                           {}
            <MI 21058  EXTB.W  D0>                                              {}
            <MI 2105a  LEA.L   0x21c0e,A0>                                      {}
            <MI 2105c  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 21060  TST.B   (A0+0x286)>                                      {}
            <MI 21064  BNE     0x210ae>                                         {}
        <POP 21066-21068 Naked>                              Σ0         ↓
            <MI 21066  MOVEQ.L #0x00,D6>                                        {}
        <POP 21068-2109a Naked>                              Σ0         ↓ →0x210a4 ←0x210a6
            <MI 21068  MOVE.B  D7,D0>                                           {}
            <MI 2106a  EXTB.W  D0>                                              {}
            <MI 2106c  MULS.W  #0x0f,D0>                                        {}
            <MI 2106e  LEA.L   0x21c0e,A0>                                      {}
            <MI 21070  MOVE.B  D6,D1>                                           {}
            <MI 21072  EXTB.W  D1>                                              {}
            <MI 21074  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 21078  MOVE.B  D5,D0>                                           {}
            <MI 2107a  EXTB.W  D0>                                              {}
            <MI 2107c  MULS.W  #0x0f,D0>                                        {}
            <MI 2107e  LEA.L   0x21c0e,A1>                                      {}
            <MI 21080  MOVE.B  D6,D2>                                           {}
            <MI 21082  EXTB.W  D2>                                              {}
            <MI 21084  LEA.L   (A1+D0.W),A1>                                    {}
            <MI 21088  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 2108c  LEA.L   (A1+D2.W),A1>                                    {}
            <MI 21090  MOVE.B  (A0+0x1f0),D0>                                   {}
            <MI 21094  CMP.B   (A1+0x1f0),D0>                                   {}
            <MI 21098  BNE     0x210a4>                                         {}
        <POP 2109a-210a4 Naked>                              Σ0         ↓ →0x210a6
            <MI 2109a  MOVE.B  (A0+0x23b),D0>                                   {}
            <MI 2109e  CMP.B   (A1+0x23b),D0>                                   {}
            <MI 210a2  BEQ     0x210a6>                                         {}
        <POP 210a4-210a6 Naked>                              Σ0         →0x210b6 ←0x21068
            <MI 210a4  BRA     0x210b6>                                         {}
        <POP 210a6-210ae Naked>                              Σ0         ↓ →0x21068 ←0x2109a
            <MI 210a6  ADDQ.B  #0x1,D6>                                         {}
            <MI 210a8  CMPI.B  #0x0e,D6>                                        {}
            <MI 210ac  BLE     0x21068>                                         {}
        <POP 210ae-210b2 Naked>                              Σ0         ↓ →0x21052 ←0x21056
            <MI 210ae  ADDQ.B  #0x1,D7>                                         {}
            <MI 210b0  BVC     0x21052>                                         {}
        <POP 210b2-210b6 Naked>                              Σ0         ↓ ←0x21052
            <MI 210b2  MOVE.B  #0x01,(A6-0x4)>                                  {}
        <POP 210b6-210ba Naked>                              Σ0         ↓ ←0x2104e ←0x210a4
            <MI 210b6  MOVE.B  (A6-0x4),(A6+0x8)>                               {}
        <POP 210ba-210c2 Epilogue>                           Σ0         

0x210c2


@ 210c2
    <POP 210c2-2114c Body>                                   Δ+4        
        <POP 210c2-210d8 Prologue>                           Σ0         ↓
        <POP 210d8-210e4 RegCacheLoad>                       Σ0         ↓
        <POP 210e4-210fa Naked>                              Σ0         ↓ →0x21118
            <MI 210e4  MOVE.L  0x21ddc,D4>                                      {}
            <MI 210ea  MOVEQ.L #0x0f,D3>                                        {}
            <Call 0x210ec 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 210f2  CMP.L   0x21dd8,D4>                                      {}
            <MI 210f8  BNE     0x21118>                                         {}
        <POP 210fa-21118 Naked>                              Σ0 Δ-4     →0x21142
            <Blob 0x210fa [4] @>                             Δ-4                {[«4""»]}
            <POP 210fe-21100 StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x21100 4>                                                     {[«4""»]|[$$NULL]}
            <MI 21114  MOVE.L  (A7)+,0x21c1c>                Δ+4                {[«4""»]}
            <MI 21116  BRA     0x21142>                                         {[«4""»]}
        <POP 21118-21122 Naked>                              Σ0         ↓ →0x21130 ←0x210e4
            <POP 21118-2111a StackAdj>                       Δ-2                {[-2-]}
            <Call 0x2111a 0x20f64>                                              {[-2-]}
            <MI 2111e  TST.B   (A7)+>                        Δ+2                {}
            <MI 21120  BNE     0x21130>                                         {}
        <POP 21122-21130 Naked>                              Σ0         →0x21144
            <MI 21122  CLR.L   D0>                                              {}
            <MI 21124  MOVE.B  0x21c16,D0>                                      {}
            <MI 21126  ADDQ.W  #0x2,D0>                                         {}
            <POP 0x21128 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2112c  MOVE.B  D0,0x21c16>                                      {}
            <MI 2112e  BRA     0x21144>                                         {}
        <POP 21130-21142 Naked>                              Σ0 Δ-4     ↓ ←0x21118
            <MI 21130  CLR.L   D0>                                              {}
            <MI 21132  MOVE.B  0x21c16,D0>                                      {}
            <MI 21134  ADDQ.W  #0x1,D0>                                         {}
            <POP 0x21136 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2113a  MOVE.B  D0,0x21c16>                                      {}
            <Const 0x2113c 0x21c1c.4>                        Δ-4                {[##138268]}
            <Call 0x2113e 0x20d5c>                                              {[##138268]}
        <POP 21142-21144 Naked>                              Σ-4 Δ+4    ↓ ←0x210fa
            <POP 21142-21144 StackAdj>                       Δ+4                {}
        <POP 21144-2114c Epilogue>                           Σ0         ←0x21122

0x2114c


@ 2114c
    <POP 2114c-211d6 Body>                                   Δ+4        
        <POP 2114c-21162 Prologue>                           Σ0         ↓
        <POP 21162-2116e RegCacheLoad>                       Σ0         ↓
        <POP 2116e-21184 Naked>                              Σ0         ↓ →0x211a2
            <MI 2116e  MOVE.L  0x21eb4,D4>                                      {}
            <MI 21174  MOVEQ.L #0x1e,D3>                                        {}
            <Call 0x21176 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 2117c  CMP.L   0x21eb8,D4>                                      {}
            <MI 21182  BNE     0x211a2>                                         {}
        <POP 21184-211a2 Naked>                              Σ0 Δ-4     →0x211cc
            <Blob 0x21184 [4] @>                             Δ-4                {[«4""»]}
            <POP 21188-2118a StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x2118a 4>                                                     {[«4""»]|[$$NULL]}
            <MI 2119e  MOVE.L  (A7)+,0x21c1c>                Δ+4                {[«4""»]}
            <MI 211a0  BRA     0x211cc>                                         {[«4""»]}
        <POP 211a2-211ac Naked>                              Σ0         ↓ →0x211ba ←0x2116e
            <POP 211a2-211a4 StackAdj>                       Δ-2                {[-2-]}
            <Call 0x211a4 0x2100a>                                              {[-2-]}
            <MI 211a8  TST.B   (A7)+>                        Δ+2                {}
            <MI 211aa  BNE     0x211ba>                                         {}
        <POP 211ac-211ba Naked>                              Σ0         →0x211ce
            <MI 211ac  CLR.L   D0>                                              {}
            <MI 211ae  MOVE.B  0x21c16,D0>                                      {}
            <MI 211b0  ADDQ.W  #0x2,D0>                                         {}
            <POP 0x211b2 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 211b6  MOVE.B  D0,0x21c16>                                      {}
            <MI 211b8  BRA     0x211ce>                                         {}
        <POP 211ba-211cc Naked>                              Σ0 Δ-4     ↓ ←0x211a2
            <MI 211ba  CLR.L   D0>                                              {}
            <MI 211bc  MOVE.B  0x21c16,D0>                                      {}
            <MI 211be  ADDQ.W  #0x1,D0>                                         {}
            <POP 0x211c0 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 211c4  MOVE.B  D0,0x21c16>                                      {}
            <Const 0x211c6 0x21c1c.4>                        Δ-4                {[##138268]}
            <Call 0x211c8 0x20e70>                                              {[##138268]}
        <POP 211cc-211ce Naked>                              Σ-4 Δ+4    ↓ ←0x21184
            <POP 211cc-211ce StackAdj>                       Δ+4                {}
        <POP 211ce-211d6 Epilogue>                           Σ0         ←0x211ac

0x211d6


@ 211d6
    <POP 211d6-2142a Body>                                              
        <POP 211d6-211ec Prologue>                           Σ0         ↓
        <POP 211ec-2120c RegCacheLoad>                       Σ0         ↓
        <POP 2120c-21218 Naked>                              Σ0         ↓ →0x213bc
            <MI 2120c  MOVE.L  0x21ddc,D0>                                      {}
            <MI 21212  CMP.L   #0x05,D0>                                        {}
            <MI 21214  BHI     0x213bc>                                         {}
        <POP 21218-21222 Naked>                              Σ0         →0x212ac →0x21238 →0x213bc →0x213bc →0x213bc →0x2122e
            <MI 21218  ADD.W   D0,D0>                                           {}
            <MI 2121a  SWITCH  D0.W>                                            {}
        <POP 2122e-21238 Naked>                              Σ0         →0x2141e ←0x21218
            <MI 2122e  MOVE.B  #0x02,0x21c16>                                   {}
            <MI 21232  MOVE.B  #0x05,0x21ed8>                                   {}
            <MI 21234  BRA     0x2141e>                                         {}
        <POP 21238-2123e Naked>                              Σ0         ↓ ←0x21218
            <MI 21238  MOVE.B  #0x08,0x21c16>                                   {}
            <MI 2123c  MOVEQ.L #0x00,D7>                                        {}
        <POP 2123e-2124a Naked>                              Σ0         ↓ →0x21270 ←0x21270
            <MI 2123e  MOVE.B  D7,D0>                                           {}
            <MI 21240  EXTB.W  D0>                                              {}
            <MI 21242  LEA.L   0x21c0e,A0>                                      {}
            <MI 21244  TST.B   (A0+D0.W+#0x16)>                                 {}
            <MI 21248  BNE     0x21270>                                         {}
        <POP 2124a-21268 Naked>                              Σ0         ↓ →0x2126e
            <MI 2124a  MOVE.B  D7,D0>                                           {}
            <MI 2124c  EXTB.W  D0>                                              {}
            <MI 2124e  MOVE.W  D0,D1>                                           {}
            <MI 21250  ASL.W   #0x2,D1>                                         {}
            <MI 21252  LEA.L   0x21c0e,A0>                                      {}
            <MI 21254  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 21258  MOVE.L  (A0+0x2ae),D1>                                   {}
            <POP 0x2125c LimitCheck 0x0 ≤ D1 ≤ 0xff>                            {}
            <MI 21262  MOVE.B  D1,0x21ed8>                                      {}
            <MI 21264  TST.W   D0>                                              {}
            <MI 21266  BEQ     0x2126e>                                         {}
        <POP 21268-2126e Naked>                              Σ0         ↓
            <MI 21268  MOVE.B  #0x2a,0x21ed9>                                   {}
        <POP 2126e-21270 Naked>                              Σ0         →0x21276 ←0x2124a
            <MI 2126e  BRA     0x21276>                                         {}
        <POP 21270-21276 Naked>                              Σ0         ↓ →0x2123e ←0x2123e
            <MI 21270  ADDQ.B  #0x1,D7>                                         {}
            <MI 21272  CMP.B   #0x04,D7>                                        {}
            <MI 21274  BLE     0x2123e>                                         {}
        <POP 21276-21280 Naked>                              Σ0         ↓ →0x2128a ←0x2126e
            <MI 21276  MOVE.L  0x21dd8,D0>                                      {}
            <MI 2127c  CMP.L   #0x01,D0>                                        {}
            <MI 2127e  BNE     0x2128a>                                         {}
        <POP 21280-2128a Naked>                              Σ0         →0x2129a
            <MI 21280  CLR.L   D0>                                              {}
            <MI 21282  MOVE.B  0x21c16,D0>                                      {}
            <MI 21284  ADDQ.W  #0x2,D0>                                         {}
            <POP 0x21286 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 21288  BRA     0x2129a>                                         {}
        <POP 2128a-21292 Naked>                              Σ0         ↓ →0x212a8 ←0x21276
            <MI 2128a  CMPI.L  #0x0000000f,D0>                                  {}
            <MI 21290  BEQ     0x212a8>                                         {}
        <POP 21292-2129a Naked>                              Σ0         ↓
            <MI 21292  CLR.L   D0>                                              {}
            <MI 21294  MOVE.B  0x21c16,D0>                                      {}
            <MI 21296  ADDQ.W  #0x1,D0>                                         {}
            <POP 0x21298 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
        <POP 2129a-212a8 Naked>                              Σ0         ↓ ←0x21280
            <MI 2129a  MOVE.B  D0,0x21c16>                                      {}
            <Const 0x2129c 0x21c1c.4>                        Δ-4                {[##138268]}
            <Call 0x212a2 0x20d5c>                                              {[##138268]}
            <POP 212a6-212a8 StackAdj>                       Δ+4                {}
        <POP 212a8-212ac Naked>                              Σ0         →0x21422 ←0x2128a
            <MI 212a8  BRA     0x21422>                                         {}
        <POP 212ac-212b8 Naked>                              Σ0         ↓ →0x21352 ←0x21218
            <MI 212ac  MOVE.L  0x21eb4,D0>                                      {}
            <MI 212b2  CMP.L   #0x05,D0>                                        {}
            <MI 212b4  BHI     0x21352>                                         {}
        <POP 212b8-212c2 Naked>                              Σ0         →0x212ce →0x212dc →0x21352 →0x21352 →0x21352 →0x212d4
            <MI 212b8  ADD.W   D0,D0>                                           {}
            <MI 212ba  SWITCH  D0.W>                                            {}
        <POP 212ce-212d4 Naked>                              Σ0         →0x213ba ←0x212b8
            <MI 212ce  CLR.B   0x21c16>                                         {}
            <MI 212d0  BRA     0x213ba>                                         {}
        <POP 212d4-212dc Naked>                              Σ0         →0x213ac ←0x212b8
            <MI 212d4  MOVE.B  #0x0e,0x21c16>                                   {}
            <MI 212d8  BRA     0x213ac>                                         {}
        <POP 212dc-212e2 Naked>                              Σ0         ↓ ←0x212b8
            <MI 212dc  MOVE.B  #0x14,0x21c16>                                   {}
            <MI 212e0  MOVEQ.L #0x00,D7>                                        {}
        <POP 212e2-212f2 Naked>                              Σ0         ↓ →0x21318 ←0x21318
            <MI 212e2  MOVE.B  D7,D0>                                           {}
            <MI 212e4  EXTB.W  D0>                                              {}
            <MI 212e6  LEA.L   0x21c0e,A0>                                      {}
            <MI 212e8  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 212ec  TST.B   (A0+0x286)>                                      {}
            <MI 212f0  BNE     0x21318>                                         {}
        <POP 212f2-21310 Naked>                              Σ0         ↓ →0x21316
            <MI 212f2  MOVE.B  D7,D0>                                           {}
            <MI 212f4  EXTB.W  D0>                                              {}
            <MI 212f6  MOVE.W  D0,D1>                                           {}
            <MI 212f8  ASL.W   #0x2,D1>                                         {}
            <MI 212fa  LEA.L   0x21c0e,A0>                                      {}
            <MI 212fc  LEA.L   (A0+D1.W),A0>                                    {}
            <MI 21300  MOVE.L  (A0+0x2ae),D1>                                   {}
            <POP 0x21304 LimitCheck 0x0 ≤ D1 ≤ 0xff>                            {}
            <MI 2130a  MOVE.B  D1,0x21ed8>                                      {}
            <MI 2130c  TST.W   D0>                                              {}
            <MI 2130e  BEQ     0x21316>                                         {}
        <POP 21310-21316 Naked>                              Σ0         ↓
            <MI 21310  MOVE.B  #0x2a,0x21ed9>                                   {}
        <POP 21316-21318 Naked>                              Σ0         →0x2131e ←0x212f2
            <MI 21316  BRA     0x2131e>                                         {}
        <POP 21318-2131e Naked>                              Σ0         ↓ →0x212e2 ←0x212e2
            <MI 21318  ADDQ.B  #0x1,D7>                                         {}
            <MI 2131a  CMP.B   #0x04,D7>                                        {}
            <MI 2131c  BLE     0x212e2>                                         {}
        <POP 2131e-21328 Naked>                              Σ0         ↓ →0x21332 ←0x21316
            <MI 2131e  MOVE.L  0x21eb8,D0>                                      {}
            <MI 21324  CMP.L   #0x01,D0>                                        {}
            <MI 21326  BNE     0x21332>                                         {}
        <POP 21328-21332 Naked>                              Σ0         →0x21342
            <MI 21328  CLR.L   D0>                                              {}
            <MI 2132a  MOVE.B  0x21c16,D0>                                      {}
            <MI 2132c  ADDQ.W  #0x2,D0>                                         {}
            <POP 0x2132e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 21330  BRA     0x21342>                                         {}
        <POP 21332-2133a Naked>                              Σ0         ↓ →0x21350 ←0x2131e
            <MI 21332  CMPI.L  #0x0000001e,D0>                                  {}
            <MI 21338  BEQ     0x21350>                                         {}
        <POP 2133a-21342 Naked>                              Σ0         ↓
            <MI 2133a  CLR.L   D0>                                              {}
            <MI 2133c  MOVE.B  0x21c16,D0>                                      {}
            <MI 2133e  ADDQ.W  #0x1,D0>                                         {}
            <POP 0x21340 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
        <POP 21342-21350 Naked>                              Σ0         ↓ ←0x21328
            <MI 21342  MOVE.B  D0,0x21c16>                                      {}
            <Const 0x21344 0x21c1c.4>                        Δ-4                {[##138268]}
            <Call 0x2134a 0x20e70>                                              {[##138268]}
            <POP 2134e-21350 StackAdj>                       Δ+4                {}
        <POP 21350-21352 Naked>                              Σ0         →0x213ba ←0x21332
            <MI 21350  BRA     0x213ba>                                         {}
        <POP 21352-21360 Naked>                              Σ0         ↓ →0x21368 ←0x212ac ←0x212b8 ←0x212b8 ←0x212b8
            <MI 21352  MOVE.B  #0x11,0x21c16>                                   {}
            <MI 21356  MOVE.L  0x21eb4,D0>                                      {}
            <MI 2135c  CMP.L   #0x04,D0>                                        {}
            <MI 2135e  BNE     0x21368>                                         {}
        <POP 21360-21368 Naked>                              Σ0         ↓ →0x213ac
            <MI 21360  TST.B   0x21e94>                                         {}
            <MI 21366  BNE     0x213ac>                                         {}
        <POP 21368-21374 Naked>                              Σ0         ↓ ←0x21352
            <MI 21368  CLR.L   D0>                                              {}
            <MI 2136a  MOVE.B  0x21c16,D0>                                      {}
            <MI 2136c  ADDQ.W  #0x6,D0>                                         {}
            <POP 0x2136e LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 21370  MOVE.B  D0,0x21c16>                                      {}
            <MI 21372  MOVEQ.L #0x00,D7>                                        {}
        <POP 21374-21384 Naked>                              Σ0         ↓ →0x2139e ←0x2139e
            <MI 21374  MOVE.B  D7,D0>                                           {}
            <MI 21376  EXTB.W  D0>                                              {}
            <MI 21378  LEA.L   0x21c0e,A0>                                      {}
            <MI 2137a  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 2137e  TST.B   (A0+0x286)>                                      {}
            <MI 21382  BNE     0x2139e>                                         {}
        <POP 21384-2139e Naked>                              Σ0         ↓
            <MI 21384  MOVE.B  D7,D0>                                           {}
            <MI 21386  EXTB.W  D0>                                              {}
            <MI 21388  ASL.W   #0x2,D0>                                         {}
            <MI 2138a  LEA.L   0x21c0e,A1>                                      {}
            <MI 2138c  LEA.L   (A1+D0.W),A1>                                    {}
            <MI 21390  MOVE.L  (A1+0x2ae),D0>                                   {}
            <POP 0x21394 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 2139a  MOVE.B  D0,(A0+0x2ca)>                                   {}
        <POP 2139e-213a4 Naked>                              Σ0         ↓ →0x21374 ←0x21374
            <MI 2139e  ADDQ.B  #0x1,D7>                                         {}
            <MI 213a0  CMP.B   #0x04,D7>                                        {}
            <MI 213a2  BLE     0x21374>                                         {}
        <POP 213a4-213ac Naked>                              Σ0         →0x213b6
            <MI 213a4  MOVE.B  #0x2a,0x21ede>                                   {}
            <MI 213aa  BRA     0x213b6>                                         {}
        <POP 213ac-213b6 Naked>                              Σ0         ↓ ←0x212d4 ←0x21360
            <MI 213ac  MOVE.B  #0x29,0x21ed8>                                   {}
            <MI 213b0  MOVE.B  #0x2a,0x21ed9>                                   {}
        <POP 213b6-213ba Naked>                              Σ0         ↓ ←0x213a4
            <Call 0x213b6 0x2114c>                                              {}
        <POP 213ba-213bc Naked>                              Σ0         →0x21422 ←0x212ce ←0x21350
            <MI 213ba  BRA     0x21422>                                         {}
        <POP 213bc-213c8 Naked>                              Σ0         ↓ →0x213d0 ←0x2120c ←0x21218 ←0x21218 ←0x21218
            <MI 213bc  MOVE.B  #0x05,0x21c16>                                   {}
            <MI 213be  MOVE.L  0x21ddc,D0>                                      {}
            <MI 213c4  CMP.L   #0x04,D0>                                        {}
            <MI 213c6  BNE     0x213d0>                                         {}
        <POP 213c8-213d0 Naked>                              Σ0         ↓ →0x21414
            <MI 213c8  TST.B   0x21c24>                                         {}
            <MI 213ce  BNE     0x21414>                                         {}
        <POP 213d0-213dc Naked>                              Σ0         ↓ ←0x213bc
            <MI 213d0  CLR.L   D0>                                              {}
            <MI 213d2  MOVE.B  0x21c16,D0>                                      {}
            <MI 213d4  ADDQ.W  #0x6,D0>                                         {}
            <POP 0x213d6 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 213d8  MOVE.B  D0,0x21c16>                                      {}
            <MI 213da  MOVEQ.L #0x00,D7>                                        {}
        <POP 213dc-213e8 Naked>                              Σ0         ↓ →0x21406 ←0x21406
            <MI 213dc  MOVE.B  D7,D0>                                           {}
            <MI 213de  EXTB.W  D0>                                              {}
            <MI 213e0  LEA.L   0x21c0e,A0>                                      {}
            <MI 213e2  TST.B   (A0+D0.W+#0x16)>                                 {}
            <MI 213e6  BNE     0x21406>                                         {}
        <POP 213e8-21406 Naked>                              Σ0         ↓
            <MI 213e8  LEA.L   (A0+D0.W),A0>                                    {}
            <MI 213ec  MOVE.B  D7,D0>                                           {}
            <MI 213ee  EXTB.W  D0>                                              {}
            <MI 213f0  ASL.W   #0x2,D0>                                         {}
            <MI 213f2  LEA.L   0x21c0e,A1>                                      {}
            <MI 213f4  LEA.L   (A1+D0.W),A1>                                    {}
            <MI 213f8  MOVE.L  (A1+0x2ae),D0>                                   {}
            <POP 0x213fc LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 21402  MOVE.B  D0,(A0+0x2ca)>                                   {}
        <POP 21406-2140c Naked>                              Σ0         ↓ →0x213dc ←0x213dc
            <MI 21406  ADDQ.B  #0x1,D7>                                         {}
            <MI 21408  CMP.B   #0x04,D7>                                        {}
            <MI 2140a  BLE     0x213dc>                                         {}
        <POP 2140c-21414 Naked>                              Σ0         →0x2141e
            <MI 2140c  MOVE.B  #0x2a,0x21ede>                                   {}
            <MI 21412  BRA     0x2141e>                                         {}
        <POP 21414-2141e Naked>                              Σ0         ↓ ←0x213c8
            <MI 21414  MOVE.B  #0x29,0x21ed8>                                   {}
            <MI 21418  MOVE.B  #0x2a,0x21ed9>                                   {}
        <POP 2141e-21422 Naked>                              Σ0         ↓ ←0x2122e ←0x2140c
            <Call 0x2141e 0x210c2>                                              {}
        <POP 21422-2142a Epilogue>                           Σ0         ←0x212a8 ←0x213ba

0x2142a


@ 2142a
START
    <POP 2142a--0001 Body>                                              
        <POP 2142a-21434 Prologue>                           Σ0         
        <POP 21434-21450 RegCacheLoad>                       Σ0         ↓
        <POP 21450-21480 Naked>                              Σ0         ↓
            <Call 0x21450 0x10398>                                              {}
                FSCALL_10398
            <Const 0x21456 0x21c20.4>                        Δ-4                {[##138272]}
            <Const 0x2145c 0x21c21.4>                        Δ-4                {[##138272]|[##138273]}
            <Call 0x2145e 0x10544>                                              {[##138272]|[##138273]}
                IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
            <POP 21464-21466 StackAdj>                       Δ+8                {}
            <Const 0x21466 0xf.4>                            Δ-4                {[##15]}
            <Call 0x2146a 0x104d8>                                              {[##15]}
                ExpInit(a : Long)
            <POP 21470-21472 StackAdj>                       Δ+2                {[-2-]}
            <POP 21472-21473 StackAdj>                       Δ+2                {}
            <Blob 0x21473 [2] @>                             Δ-2                {[«2""»]}
            <Call 0x21474 0x104d2>                                              {[«2""»]}
                SetExpInitDone(a : Byte)
            <POP 2147a-2147c StackAdj>                       Δ+2                {}
            <MI 2147c  CLR.B   0x21c16>                                         {}
            <MI 2147e  MOVEQ.L #0x00,D0>                                        {}
        <POP 21480-2149c Naked>                              Σ0         ↓ →0x21480 ←0x21480
            <MI 21480  MOVE.L  D0,0x21ee0>                                      {}
            <POP 0x21486 LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 2148c  LEA.L   0x21c0e,A0>                                      {}
            <MI 2148e  LEA.L   (A0+D0.L),A0>                                    {}
            <MI 21492  CLR.B   (A0+0x2ca)>                                      {}
            <MI 21496  ADDQ.L  #0x1,D0>                                         {}
            <MI 21498  CMP.L   #0x07,D0>                                        {}
            <MI 2149a  BLE     0x21480>                                         {}
        <POP 2149c-21524 Naked>                              Σ0         ↓
            <Blob 0x2149c [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x214a0 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x214a4 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <POP 214a8-214aa StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[-4-]}
            <Lit 0x214aa 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[$$P2UADR]}
            <MI 214ba  MOVE.L  (A7)+,0x21c18>                Δ+4                {[«2""»]|[«2""»]|[«2""»]}
            <POP 214c0-214c2 StackAdj>                       Δ+2                {[«2""»]|[«2""»]}
            <POP 214c2-214c3 StackAdj>                       Δ+4                {}
            <Blob 0x214c3 [4] @>                             Δ-4                {[«4""»]}
            <POP 214c6-214c8 StackAdj>                       Δ-4                {[«4""»]|[-4-]}
            <Lit 0x214c8 4>                                                     {[«4""»]|[$$NULL]}
            <MI 214d8  MOVE.L  (A7)+,0x21c1c>                Δ+4                {[«4""»]}
            <POP 214de-214e0 StackAdj>                       Δ+4                {}
            <MI 214e0  MOVE.L  #0x5,0x21ebc>                                    {}
            <MI 214ea  MOVE.L  #0x2,0x21ec0>                                    {}
            <MI 214f4  MOVE.L  #0x3,0x21ec4>                                    {}
            <MI 214fe  MOVE.L  #0x04,0x21ec8>                                   {}
            <MI 21504  MOVE.L  #0x06,0x21ecc>                                   {}
            <MI 2150a  CLR.L   0x21dd8>                                         {}
            <MI 21510  CLR.L   0x21ddc>                                         {}
            <MI 21516  CLR.L   0x21eb8>                                         {}
            <MI 2151c  CLR.L   0x21eb4>                                         {}
            <MI 21522  MOVEQ.L #0x00,D0>                                        {}
        <POP 21524-21556 Naked>                              Σ0 Δ-2     ↓ ←0x21594
            <MI 21524  MOVE.B  D0,0x21c23>                                      {}
            <MI 2152a  MOVE.B  D0,D1>                                           {}
            <MI 2152c  EXTB.W  D1>                                              {}
            <MI 2152e  MOVE.W  D1,-(A7)>                     Δ-2                {[2, 'D1']}
            <MI 21530  LEA.L   0x21c0e,A0>                                      {[2, 'D1']}
            <MI 21532  MOVE.B  #0x01,(A0+D1.W+#0x16)>                           {[2, 'D1']}
            <MI 21536  LEA.L   (A0+D1.W),A0>                                    {[2, 'D1']}
            <MI 2153a  MOVE.B  #0x01,(A0+0x286)>                                {[2, 'D1']}
            <MI 2153e  MOVE.W  D1,D0>                                           {[2, 'D1']}
            <MI 21540  ASL.W   #0x2,D0>                                         {[2, 'D1']}
            <MI 21542  LEA.L   0x21c0e,A1>                                      {[2, 'D1']}
            <MI 21544  LEA.L   (A1+D0.W),A1>                                    {[2, 'D1']}
            <MI 21548  CLR.L   (A1+0x1b6)>                                      {[2, 'D1']}
            <MI 2154c  CLR.L   (A1+0x28c)>                                      {[2, 'D1']}
            <MI 21550  CLR.B   (A0+0x193)>                                      {[2, 'D1']}
            <MI 21554  MOVEQ.L #0x00,D0>                                        {[2, 'D1']}
        <POP 21556-21594 Naked>                              Σ-2        ↓ →0x21556 ←0x21556
            <MI 21556  MOVE.B  D0,0x21ed2>                                      {[-2-]}
            <MI 2155c  MOVE.W  (A7),D1>                                         {[-2-]}
            <MI 2155e  MULS.W  #0x3c,D1>                                        {[-2-]}
            <MI 21562  LEA.L   0x21c0e,A0>                                      {[-2-]}
            <MI 21564  MOVE.B  D0,D2>                                           {[-2-]}
            <MI 21566  EXTB.W  D2>                                              {[-2-]}
            <MI 21568  MOVE.W  D2,-(A7)>                     Δ-2                {[-2-]|[2, 'D2']}
            <MI 2156a  MOVE.W  D2,D0>                                           {[-2-]|[2, 'D2']}
            <MI 2156c  ASL.W   #0x2,D0>                                         {[-2-]|[2, 'D2']}
            <MI 2156e  LEA.L   (A0+D1.W),A0>                                    {[-2-]|[2, 'D2']}
            <MI 21572  CLR.L   (A0+D0.W+#0x1c)>                                 {[-2-]|[2, 'D2']}
            <MI 21576  MOVE.W  (A7+0x2),D0>                                     {[-2-]|[2, 'D2']}
            <MI 2157a  MULS.W  #0xf,D0>                                         {[-2-]|[2, 'D2']}
            <MI 2157e  LEA.L   0x21c0e,A0>                                      {[-2-]|[2, 'D2']}
            <MI 21580  LEA.L   (A0+D0.W),A0>                                    {[-2-]|[2, 'D2']}
            <MI 21584  LEA.L   (A0+D2.W),A0>                                    {[-2-]|[2, 'D2']}
            <MI 21588  MOVE.B  #0x01,(A0+0x148)>                                {[-2-]|[2, 'D2']}
            <MI 2158c  MOVE.W  (A7)+,D0>                     Δ+2                {[-2-]}
            <MI 2158e  ADDQ.W  #0x1,D0>                                         {[-2-]}
            <MI 21590  CMP.W   #0x0e,D0>                                        {[-2-]}
            <MI 21592  BLE     0x21556>                                         {[-2-]}
        <POP 21594-2159c Naked>                              Σ-2 Δ+2    ↓ →0x21524
            <MI 21594  MOVE.W  (A7)+,D0>                     Δ+2                {}
            <MI 21596  ADDQ.W  #0x1,D0>                                         {}
            <MI 21598  CMP.W   #0x04,D0>                                        {}
            <MI 2159a  BLE     0x21524>                                         {}
        <POP 2159c-215a6 Naked>                              Σ0         ↓
            <Call 0x2159c 0x20578>                                              {}
            <Call 0x215a0 0x2062a>                                              {}
            <MI 215a4  MOVEQ.L #0x00,D0>                                        {}
        <POP 215a6-215dc Naked>                              Σ0         ↓ →0x215a6 ←0x215a6
            <MI 215a6  MOVE.B  D0,0x21ed2>                                      {}
            <MI 215ac  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x215ae 0x206d6>                                              {[2, 'D0']}
            <POP 215b2-215b3 StackAdj>                       Δ+2                {}
            <Const 0x215b3 0x1.2>                            Δ-2                {[#1]}
            <Call 0x215b4 0x207ae>                                              {[#1]}
            <MI 215b8  MOVE.B  D0,(A7)>                                         {[-2-]}
            <Const 0x215ba 0x21c2a.4>                        Δ-4                {[-2-]|[##138282]}
            <Call 0x215c0 0x20840>                                              {[-2-]|[##138282]}
            <POP 215c4-215c6 StackAdj>                       Δ+4                {[-2-]}
            <POP 215c6-215c7 StackAdj>                       Δ+2                {}
            <Const 0x215c7 0x1.2>                            Δ-2                {[#1]}
            <MI 215c8  MOVE.B  D0,-(A7)>                     Δ-2                {[#1]|[2, 'D0']}
            <Const 0x215ca 0x21dfe.4>                        Δ-4                {[#1]|[2, 'D0']|[##138750]}
            <Call 0x215d0 0x20908>                                              {[#1]|[2, 'D0']|[##138750]}
            <POP 215d4-215d6 StackAdj>                       Δ+8                {}
            <MI 215d6  ADDQ.B  #0x1,D0>                                         {}
            <MI 215d8  CMP.B   #0x0e,D0>                                        {}
            <MI 215da  BLE     0x215a6>                                         {}
        <POP 215dc-215de Naked>                              Σ0         ↓
            <MI 215dc  MOVEQ.L #0x00,D0>                                        {}
        <POP 215de-21606 Naked>                              Σ0         ↓ →0x215de ←0x215de
            <MI 215de  MOVE.B  D0,0x21ed2>                                      {}
            <MI 215e4  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']}
            <Call 0x215e6 0x206d6>                                              {[2, 'D0']}
            <MI 215ea  CLR.B   (A7)>                                            {[2, 'D0']}
            <Call 0x215ec 0x207ae>                                              {[2, 'D0']}
            <MI 215f0  CLR.B   (A7)>                                            {[2, 'D0']}
            <MI 215f2  MOVE.B  D0,-(A7)>                     Δ-2                {[2, 'D0']|[2, 'D0']}
            <Const 0x215f4 0x21e49.4>                        Δ-4                {[2, 'D0']|[2, 'D0']|[##138825]}
            <Call 0x215fa 0x20908>                                              {[2, 'D0']|[2, 'D0']|[##138825]}
            <POP 215fe-21600 StackAdj>                       Δ+8                {}
            <MI 21600  ADDQ.B  #0x1,D0>                                         {}
            <MI 21602  CMP.B   #0x0e,D0>                                        {}
            <MI 21604  BLE     0x215de>                                         {}
        <POP 21606-21620 Naked>                              Σ0 Δ-2     ↓ →0x21622
            <Const 0x21606 0x21c2a.4>                        Δ-4                {[##138282]}
            <Call 0x2160c 0x20bb4>                                              {[##138282]}
            <POP 21610-21612 StackAdj>                       Δ+4                {}
            <Call 0x21612 0x211d6>                                              {}
            <Call 0x21616 0x204ee>                                              {}
            <MI 2161a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <MI 2161c  TST.B   0x21c16>                                         {[#0]}
            <MI 2161e  BNE     0x21622>                                         {[#0]}
        <POP 21620-21622 Naked>                              Σ-2        ↓
            <MI 21620  ADDQ.B  #0x1,(A7)>                                       {[-2-]}
        <POP 21622-21646 Naked>                              Σ-2 Δ+2    ↓ ←0x21606
            <Blob 0x21622 [4] @>                             Δ-4                {[-2-]|[«4""»]}
            <Blob 0x21628 [4] @>                             Δ-4                {[-2-]|[«4""»]|[«4""»]}
            <Blob 0x2162e [2] @>                             Δ-2                {[-2-]|[«4""»]|[«4""»]|[«2""»]}
            <Blob 0x21630 [4] 0x21edc>                       Δ-4                {[-2-]|[«4""»]|[«4""»]|[«2""»]|[«4»]}
            <Blob 0x21636 [4] 0x21ed8>                       Δ-4                {[-2-]|[«4""»]|[«4""»]|[«2""»]|[«4»]|[«4»]}
            <Call 0x2163c 0x1054a>                                              {[-2-]|[«4""»]|[«4""»]|[«2""»]|[«4»]|[«4»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 21642-21646 StackAdj>                       Δ+20               {}
        <POP 21646-2164c Naked>                              Σ0         
            <Call 0x21646 0x10284>                                              {}
                ?exit

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.4828db69cbecbca4
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 14 2a              |   *    |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 1e ee              |        |		.PTR	0x21eee
00020010					code.end:
00020010 00 02 1c 0e              |        |		.PTR	0x21c0e
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 02 48              |   H    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 02 b0              |        |		.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 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
00020118 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_ '
00020126 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_ '
00020134 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_ '
00020142 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
00020154 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error. '
0002016c 49 4e 49 54 53 54 41 54  |INITSTAT|		.TXT	'INITSTATE '
00020176 54 59 50 5c              |TYP\    |		.TXT	'TYP\'
0002017a 56 41 4c 5c              |VAL\    |		.TXT	'VAL\'
0002017e 46 49 55 5c              |FIU\    |		.TXT	'FIU\'
00020182 46 5c                    |F\      |		.TXT	'F\'
00020184 54 5c                    |T\      |		.TXT	'T\'
00020186 54 5c                    |T\      |		.TXT	'T\'
00020188 46 5c                    |F\      |		.TXT	'F\'
0002018a 54 5c                    |T\      |		.TXT	'T\'
0002018c 46 5c                    |F\      |		.TXT	'F\'
0002018e 4e 55 4c 4c              |NULL    |		.TXT	'NULL'
00020192 4e 55 4c 4c              |NULL    |		.TXT	'NULL'
00020196 50 32                    |P2      |		.TXT	'P2'
00020198 55 41                    |UA      |		.TXT	'UA'
0002019a 44 52                    |DR      |		.TXT	'DR'
0002019c 4e 55 4c 4c              |NULL    |		.TXT	'NULL'
000201a0 00 00 00 00 00 00        |        |		.CONST	0x0,0x0,0x0,0x0,0x0,0x0
000201a6 00 00                    |        |		.XXX[0x2]
000201a8 00 00 00                 |        |		.XXX[0x3]
000201ab 00 00 00 00 00 00        |        |		.CONST	0x0,0x0,0x0,0x0,0x0,0x0
000201b1 00 00 00 00 01 00 00     |        |		.XXX[0x7]
000201b8 00 02 00 00 00 03 00 00  |        |		.XXX[0x90]
000201c0 00 04 00 00 00 05 00 00  |        |
000201c8 00 06 00 00 00 07 00 00  |        |
000201d0 00 08 00 00 00 09 00 00  |        |
000201d8 00 0a 00 00 00 0b 00 00  |        |
000201e0 00 0c 00 00 00 0d 00 00  |        |
000201e8 00 0e 00 00 00 0f 00 00  |        |
000201f0 3f ff 00 00 3f fe 00 00  |?   ?   |
000201f8 3f fd 00 00 3f fb 00 00  |?   ?   |
00020200 3f f7 00 00 3f ef 00 00  |?   ?   |
00020208 3f df 00 00 3f bf 00 00  |?   ?   |
00020210 3f 7f 00 00 3e ff 00 00  |?   >   |
00020218 3d ff 00 00 3b ff 00 00  |=   ;   |
00020220 37 ff 00 00 2f ff 00 00  |7   /   |
00020228 1f ff 00 20 20 20 20 20  |        |
00020230 20 20 20 40 40 40 40 40  |   @@@@@|
00020238 40 60 40 40 40 40 40 40  |@`@@@@@@|
00020240 40 40 20 20 20 20 20 20  |@@      |
00020248 ; --------------------------------------------------------------------------------------
00020248 ; OMSI PASCAL Function
00020248 ;    <LVAR  0x008 1(r)>
00020248 ; --------------------------------------------------------------------------------------
00020248					PROG_FAIL:
00020248 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
0002024c bf d5                    |        |		CMPA.L	(A5),A7
0002024e 62 06                    |b       |		BHI	0x20256
00020250 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020254 4e 76                    |Nv      |		TRAPV
00020256 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
0002025a 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
0002025e 41 fa fe b8              |A       |		LEA.L	0x20118,A0
00020262 70 06                    |p       |		MOVEQ.L	#0x06,D0
00020264 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020266 51 c8 ff fc              |Q       |		DBF	D0,0x20264
0002026a 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
0002026e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020270 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
00020274 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020278 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
0002027c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020282 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020284 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020288 48 80                    |H       |		EXTB.W	D0
0002028a 48 c0                    |H       |		EXTW.L	D0
0002028c 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002028e 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
00020294 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020296 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002029c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002029e 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000202a4 de fc 00 14              |        |		ADDA.W	#0x14,A7
000202a8 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000202ac 4e 5e                    |N^      |		UNLK	A6
000202ae 4e 75                    |Nu      |		RTS
000202b0 ; --------------------------------------------------------------------------------------
000202b0 ; OMSI PASCAL Function
000202b0 ;    <LVAR  0x00e 1(r)>
000202b0 ;    <LVAR  0x00a 4(r)>
000202b0 ;    <LVAR  0x008 1(r)>
000202b0 ; --------------------------------------------------------------------------------------
000202b0					EXP_FAIL:
000202b0 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
000202b4 bf d5                    |        |		CMPA.L	(A5),A7
000202b6 62 06                    |b       |		BHI	0x202be
000202b8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000202bc 4e 76                    |Nv      |		TRAPV
000202be de fc 00 74              |   t    |		ADDA.W	#0x74,A7
000202c2 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
000202c6 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
000202cc 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
000202d2 72 01                    |r       |		MOVEQ.L	#0x01,D1
000202d4 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
000202d6 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
000202d8 78 12                    |x       |		MOVEQ.L	#0x12,D4
000202da 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
000202dc 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
000202e2 41 fa fe 70              |A  p    |		LEA.L	0x20154,A0
000202e6 70 08                    |p       |		MOVEQ.L	#0x08,D0
000202e8 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
000202ea 51 c8 ff fc              |Q       |		DBF	D0,0x202e8
000202ee 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000202f0 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000202f4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000202f6 3f 04                    |?       |		MOVE.W	D4,-(A7)
000202f8 4e 93                    |N       |		JSR	(A3)
000202fa 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000202fc 4e 94                    |N       |		JSR	(A4)
000202fe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020300 20 4f                    | O      |		MOVEA.L	A7,A0
00020302 43 fa fe 14              |C       |		LEA.L	0x20118,A1
00020306 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020308 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002030a 51 c8 ff fc              |Q       |		DBF	D0,0x20308
0002030e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020310 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020314 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020316 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020318 4e 93                    |N       |		JSR	(A3)
0002031a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002031c 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
00020320 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
00020326 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020328 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002032e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020330 4e 94                    |N       |		JSR	(A4)
00020332 de c4                    |        |		ADDA.W	D4,A7
00020334 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
00020338 b0 c1                    |        |		CMPA.W	D1,A0
0002033a 67 48                    |gH      |		BEQ	0x20384
0002033c 9e c5                    |        |		SUBA.W	D5,A7
0002033e 22 4f                    |"O      |		MOVEA.L	A7,A1
00020340 45 fa fd e4              |E       |		LEA.L	0x20126,A2
00020344 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
00020346 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020348 51 c8 ff fc              |Q       |		DBF	D0,0x20346
0002034c 9e c3                    |        |		SUBA.W	D3,A7
0002034e 22 4f                    |"O      |		MOVEA.L	A7,A1
00020350 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
00020354 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
00020356 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00020358 51 c8 ff fc              |Q       |		DBF	D0,0x20356
0002035c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002035e 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
00020362 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020364 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020366 4e 93                    |N       |		JSR	(A3)
00020368 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002036a 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
0002036e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020370 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020372 4e 93                    |N       |		JSR	(A3)
00020374 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020376 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002037c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002037e 4e 94                    |N       |		JSR	(A4)
00020380 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
00020384 9e c5                    |        |		SUBA.W	D5,A7
00020386 20 4f                    | O      |		MOVEA.L	A7,A0
00020388 43 fa fd aa              |C       |		LEA.L	0x20134,A1
0002038c 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002038e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020390 51 c8 ff fc              |Q       |		DBF	D0,0x2038e
00020394 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020396 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002039a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002039c 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002039e 4e 93                    |N       |		JSR	(A3)
000203a0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000203a2 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000203a6 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
000203ac 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000203ae 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000203b4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203b6 4e 94                    |N       |		JSR	(A4)
000203b8 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000203ba 20 4f                    | O      |		MOVEA.L	A7,A0
000203bc 43 fa fd 96              |C       |		LEA.L	0x20154,A1
000203c0 70 16                    |p       |		MOVEQ.L	#0x16,D0
000203c2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000203c4 51 c8 ff fc              |Q       |		DBF	D0,0x203c2
000203c8 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000203cc 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000203ce 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000203d2 3f 01                    |?       |		MOVE.W	D1,-(A7)
000203d4 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
000203d8 4e 93                    |N       |		JSR	(A3)
000203da 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203dc 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000203e2 de c3                    |        |		ADDA.W	D3,A7
000203e4 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
000203e8 4e 5e                    |N^      |		UNLK	A6
000203ea 4e 75                    |Nu      |		RTS
000203ec ; --------------------------------------------------------------------------------------
000203ec ; OMSI PASCAL Function
000203ec ;    <LVAR  0x00c 1(r)>
000203ec ;    <LVAR  0x008 4(r)>
000203ec ;    <LVAR -0x002 @>
000203ec ; --------------------------------------------------------------------------------------
000203ec 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
000203f0 bf d5                    |        |		CMPA.L	(A5),A7
000203f2 62 06                    |b       |		BHI	0x203fa
000203f4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000203f8 4e 76                    |Nv      |		TRAPV
000203fa de fc 00 28              |   (    |		ADDA.W	#0x28,A7
000203fe 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
00020402 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020408 1f 2e 00 0c              | .      |		MOVE.B	(A6+0xc),-(A7)
0002040c 4e b9 00 01 05 02        |N       |		JSR	IPC_PutBool(a : Bool)
00020412 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020414 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
0002041a 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
0002041e 20 4f                    | O      |		MOVEA.L	A7,A0
00020420 43 fa fd 4a              |C  J    |		LEA.L	0x2016c,A1
00020424 70 08                    |p       |		MOVEQ.L	#0x08,D0
00020426 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020428 51 c8 ff fc              |Q       |		DBF	D0,0x20426
0002042c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002042e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020432 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020436 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
0002043a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020440 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020442 48 78 00 01              |Hx      |		PEA.L	0x1
00020446 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
0002044a 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002044e 4e b9 00 01 03 b0        |N       |		JSR	PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
00020454 de fc 00 18              |        |		ADDA.W	#0x18,A7
00020458 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
0002045e 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00020462 48 50                    |HP      |		PEA.L	(A0)
00020464 4e b9 00 01 05 26        |N    &  |		JSR	IPC_GetBool() : Bool
0002046a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002046c 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
00020472 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00020476 4e 5e                    |N^      |		UNLK	A6
00020478 4e 75                    |Nu      |		RTS
0002047a ; --------------------------------------------------------------------------------------
0002047a ; OMSI PASCAL Function
0002047a ;    <LVAR  0x008 4(r)>
0002047a ; --------------------------------------------------------------------------------------
0002047a 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4		; Spelunked
0002047e bf d5                    |        |		CMPA.L	(A5),A7
00020480 62 06                    |b       |		BHI	0x20488
00020482 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020486 4e 76                    |Nv      |		TRAPV
00020488 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002048c 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
00020490 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020496 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
0002049a 48 50                    |HP      |		PEA.L	(A0)
0002049c 4e b9 00 01 05 26        |N    &  |		JSR	IPC_GetBool() : Bool
000204a2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000204a4 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
000204aa 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
000204ae 4e 5e                    |N^      |		UNLK	A6
000204b0 4e 75                    |Nu      |		RTS
000204b2 ; --------------------------------------------------------------------------------------
000204b2 ; OMSI PASCAL Function
000204b2 ;    <LVAR  0x008 1(r)>
000204b2 ; --------------------------------------------------------------------------------------
000204b2 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4		; Spelunked
000204b6 bf d5                    |        |		CMPA.L	(A5),A7
000204b8 62 06                    |b       |		BHI	0x204c0
000204ba 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204be 4e 76                    |Nv      |		TRAPV
000204c0 de fc 00 0a              |        |		ADDA.W	#0xa,A7
000204c4 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
000204ca 1f 2e 00 08              | .      |		MOVE.B	(A6+0x8),-(A7)
000204ce 4e b9 00 01 05 02        |N       |		JSR	IPC_PutBool(a : Bool)
000204d4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000204d6 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
000204dc 42 27                    |B'      |		CLR.B	-(A7)
000204de 48 78 00 01              |Hx      |		PEA.L	0x1
000204e2 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000204e8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000204ea 4e 5e                    |N^      |		UNLK	A6
000204ec 4e 75                    |Nu      |		RTS
000204ee ; --------------------------------------------------------------------------------------
000204ee ; OMSI PASCAL Function
000204ee ; --------------------------------------------------------------------------------------
000204ee 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2
000204f2 bf d5                    |        |		CMPA.L	(A5),A7
000204f4 62 06                    |b       |		BHI	0x204fc
000204f6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204fa 4e 76                    |Nv      |		TRAPV
000204fc de fc 00 0e              |        |		ADDA.W	#0xe,A7
00020500 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00020504 10 39 00 02 1c 21        | 9   !  |		MOVE.B	0x21c21,D0
0002050a 48 80                    |H       |		EXTB.W	D0
0002050c 41 bc 00 01              |A       |		CHK.W	#0x1,D0
00020510 1f 00                    |        |		MOVE.B	D0,-(A7)
00020512 48 79 00 02 1c 22        |Hy   "  |		PEA.L	0x21c22
00020518 4e ba fe d2              |N       |		JSR	0x203ec
0002051c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002051e 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
00020522 4e 5e                    |N^      |		UNLK	A6
00020524 4e 75                    |Nu      |		RTS
00020526 ; --------------------------------------------------------------------------------------
00020526 ; OMSI PASCAL Function
00020526 ;    <LVAR  0x008 1(r)>
00020526 ; --------------------------------------------------------------------------------------
00020526 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
0002052a bf d5                    |        |		CMPA.L	(A5),A7
0002052c 62 06                    |b       |		BHI	0x20534
0002052e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020532 4e 76                    |Nv      |		TRAPV
00020534 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00020538 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
0002053c 41 f9 00 02 1c 16        |A       |		LEA.L	0x21c16,A0
00020542 4e ba ff aa              |N       |		JSR	0x204ee
00020546 10 ae 00 08              |        |		MOVE.B	(A6+0x8),(A0)
0002054a 42 27                    |B'      |		CLR.B	-(A7)
0002054c 2f 39 00 02 1c 18        |/9      |		MOVE.L	0x21c18,-(A7)
00020552 2f 39 00 02 1c 1c        |/9      |		MOVE.L	0x21c1c,-(A7)
00020558 1f 10                    |        |		MOVE.B	(A0),-(A7)
0002055a 2f 39 00 02 1e dc        |/9      |		MOVE.L	0x21edc,-(A7)
00020560 2f 39 00 02 1e d8        |/9      |		MOVE.L	0x21ed8,-(A7)
00020566 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
0002056c de fc 00 14              |        |		ADDA.W	#0x14,A7
00020570 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
00020574 4e 5e                    |N^      |		UNLK	A6
00020576 4e 75                    |Nu      |		RTS
00020578 ; --------------------------------------------------------------------------------------
00020578 ; OMSI PASCAL Function
00020578 ; --------------------------------------------------------------------------------------
00020578 4e 56 ff e4              |NV      |		LINK.W	A6,#0xffe4
0002057c bf d5                    |        |		CMPA.L	(A5),A7
0002057e 62 06                    |b       |		BHI	0x20586
00020580 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020584 4e 76                    |Nv      |		TRAPV
00020586 de fc 00 18              |        |		ADDA.W	#0x18,A7
0002058a 48 e7 81 80              |H       |		MOVEM.L	A0+D7+D0,-(A7)
0002058e 41 f9 00 01 04 8a        |A       |		LEA.L	DiProcCmd(board : Byte; cmd : Byte),A0
00020594 70 02                    |p       |		MOVEQ.L	#0x02,D0
00020596 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
0002059a 1f 00                    |        |		MOVE.B	D0,-(A7)
0002059c 4e 90                    |N       |		JSR	(A0)
0002059e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000205a0 1e bc 00 07              |        |		MOVE.B	#0x07,(A7)
000205a4 1f 00                    |        |		MOVE.B	D0,-(A7)
000205a6 4e 90                    |N       |		JSR	(A0)
000205a8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000205aa 1e bc 00 06              |        |		MOVE.B	#0x06,(A7)
000205ae 1f 00                    |        |		MOVE.B	D0,-(A7)
000205b0 4e 90                    |N       |		JSR	(A0)
000205b2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000205b4 1e 80                    |        |		MOVE.B	D0,(A7)
000205b6 1f 00                    |        |		MOVE.B	D0,-(A7)
000205b8 4e 90                    |N       |		JSR	(A0)
000205ba 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000205bc 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
000205c0 1f 00                    |        |		MOVE.B	D0,-(A7)
000205c2 4e 90                    |N       |		JSR	(A0)
000205c4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205c6 7e 0c                    |~       |		MOVEQ.L	#0x0c,D7
000205c8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000205ca 1f 07                    |        |		MOVE.B	D7,-(A7)
000205cc 4e b9 00 01 04 c0        |N       |		JSR	HasBoard(diproc_addr: Byte) : Byte
000205d2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000205d4 4a 1f                    |J       |		TST.B	(A7)+
000205d6 67 08                    |g       |		BEQ	0x205e0
000205d8 1f 07                    |        |		MOVE.B	D7,-(A7)
000205da 1f 00                    |        |		MOVE.B	D0,-(A7)
000205dc 4e 90                    |N       |		JSR	(A0)
000205de 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205e0 52 07                    |R       |		ADDQ.B	#0x1,D7
000205e2 0c 07 00 0f              |        |		CMPI.B	#0x0f,D7
000205e6 6f e0                    |o       |		BLE	0x205c8
000205e8 4c df 01 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0
000205ec 4e 5e                    |N^      |		UNLK	A6
000205ee 4e 75                    |Nu      |		RTS
000205f0 ; --------------------------------------------------------------------------------------
000205f0 ; OMSI PASCAL Function
000205f0 ;    <LVAR  0x00a 2(w)>
000205f0 ;    <LVAR  0x008 2(r)>
000205f0 ;    <LVAR -0x001 1(w)>
000205f0 ;    <LVAR -0x002 1(w) 2(r)>
000205f0 ; --------------------------------------------------------------------------------------
000205f0 4e 56 ff f6              |NV      |		LINK.W	A6,#0xfff6
000205f4 bf d5                    |        |		CMPA.L	(A5),A7
000205f6 62 06                    |b       |		BHI	0x205fe
000205f8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000205fc 4e 76                    |Nv      |		TRAPV
000205fe de fc 00 08              |        |		ADDA.W	#0x8,A7
00020602 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00020606 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
0002060a 02 40 00 ff              | @      |		ANDI.W	#0x00ff,D0
0002060e 1d 40 ff ff              | @      |		MOVE.B	D0,(A6-0x1)
00020612 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020616 e0 48                    | H      |		LSR.W	#0x8,D0
00020618 1d 40 ff fe              | @      |		MOVE.B	D0,(A6-0x2)
0002061c 3d 6e ff fe 00 0a        |=n      |		MOVE.W	(A6-0x2),(A6+0xa)
00020622 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
00020626 4e 5e                    |N^      |		UNLK	A6
00020628 4e 75                    |Nu      |		RTS
0002062a ; --------------------------------------------------------------------------------------
0002062a ; OMSI PASCAL Function
0002062a ; --------------------------------------------------------------------------------------
0002062a 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
0002062e bf d5                    |        |		CMPA.L	(A5),A7
00020630 62 06                    |b       |		BHI	0x20638
00020632 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020636 4e 76                    |Nv      |		TRAPV
00020638 de fc 00 1a              |        |		ADDA.W	#0x1a,A7
0002063c 48 e7 c0 c0              |H       |		MOVEM.L	A1+A0+D1+D0,-(A7)
00020640 32 3c 0b ad              |2<      |		MOVE.W	#0xbad,D1
00020644 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00020646 20 4f                    | O      |		MOVEA.L	A7,A0
00020648 43 fa fb 56              |C  V    |		LEA.L	0x201a0,A1
0002064c 70 04                    |p       |		MOVEQ.L	#0x04,D0
0002064e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020650 51 c8 ff fc              |Q       |		DBF	D0,0x2064e
00020654 4e b9 00 02 1a d6        |N       |		JSR	exp_INIT_WCS.VAL(Sw_5)
0002065a 20 4f                    | O      |		MOVEA.L	A7,A0
0002065c 43 fa fb 47              |C  G    |		LEA.L	0x201a5,A1
00020660 70 05                    |p       |		MOVEQ.L	#0x05,D0
00020662 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020664 51 c8 ff fc              |Q       |		DBF	D0,0x20662
00020668 4e b9 00 02 19 a8        |N       |		JSR	exp_INIT_WCS.TYP(Sw_6)
0002066e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020670 42 17                    |B       |		CLR.B	(A7)
00020672 4e b9 00 02 16 4c        |N    L  |		JSR	exp_ZERO_WCS.FIU(Sw_1)
00020678 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002067a 42 67                    |Bg      |		CLR.W	-(A7)
0002067c 42 27                    |B'      |		CLR.B	-(A7)
0002067e 4e b9 00 02 1b f2        |N       |		JSR	exp_FILL_WCS.IOC(Sw_2, Sw_1)
00020684 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020686 4e b9 00 02 17 94        |N       |		JSR	exp_ZERO_WCS.SEQ()
0002068c 4e b9 00 02 1a b0        |N       |		JSR	exp_INIT_WCS_INC_PATTERN.VAL()
00020692 4e b9 00 02 19 82        |N       |		JSR	exp_INIT_WCS_INC_PATTERN.TYP()
00020698 4e b9 00 02 17 14        |N       |		JSR	exp_LOAD_WCS_TEST_PATTERN.FIU()
0002069e 4e b9 00 02 1b cc        |N       |		JSR	exp_INIT_WCS_TEST_PATTERN.IOC()
000206a4 4e b9 00 02 18 6e        |N    n  |		JSR	exp_INIT_WCS_TEST_PATTERN.SEQ()
000206aa 3f 01                    |?       |		MOVE.W	D1,-(A7)
000206ac 4e b9 00 02 1a 66        |N    f  |		JSR	exp_PREP_RUN.VAL(Sw_2)
000206b2 3e 81                    |>       |		MOVE.W	D1,(A7)
000206b4 4e b9 00 02 19 38        |N    8  |		JSR	exp_PREP_RUN.TYP(Sw_2)
000206ba 3e 81                    |>       |		MOVE.W	D1,(A7)
000206bc 4e b9 00 02 16 e6        |N       |		JSR	exp_PREP_RUN.FIU(Sw_2)
000206c2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000206c4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000206c6 4e b9 00 02 1b 64        |N    d  |		JSR	exp_PREP_RUN.IOC(Sw_2)
000206cc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000206ce 4c df 03 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1
000206d2 4e 5e                    |N^      |		UNLK	A6
000206d4 4e 75                    |Nu      |		RTS
000206d6 ; --------------------------------------------------------------------------------------
000206d6 ; OMSI PASCAL Function
000206d6 ;    <LVAR  0x008 1(r)>
000206d6 ;    <LVAR -0x00b 1(r)>
000206d6 ;    <LVAR -0x00c 1(r) 2(r)>
000206d6 ;    <LVAR -0x00d 1(r)>
000206d6 ;    <LVAR -0x00e 1(w) 2(r)>
000206d6 ;    <LVAR -0x00f 1(w)>
000206d6 ;    <LVAR -0x010 1(w) 2(r)>
000206d6 ;    <LVAR -0x011 1(r)>
000206d6 ;    <LVAR -0x012 1(r) 2(rw)>
000206d6 ; --------------------------------------------------------------------------------------
000206d6 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
000206da bf d5                    |        |		CMPA.L	(A5),A7
000206dc 62 06                    |b       |		BHI	0x206e4
000206de 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000206e2 4e 76                    |Nv      |		TRAPV
000206e4 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000206e8 48 e7 80 e0              |H       |		MOVEM.L	A2+A1+A0+D0,-(A7)
000206ec 45 ee ff ee              |E       |		LEA.L	(A6-0x12),A2
000206f0 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000206f2 20 4f                    | O      |		MOVEA.L	A7,A0
000206f4 43 fa fa aa              |C       |		LEA.L	0x201a0,A1
000206f8 70 04                    |p       |		MOVEQ.L	#0x04,D0
000206fa 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000206fc 51 c8 ff fc              |Q       |		DBF	D0,0x206fa
00020700 42 27                    |B'      |		CLR.B	-(A7)
00020702 4e b9 00 02 1a 94        |N       |		JSR	exp_LOAD_UIR.VAL(Sw_5, Sw_1)
00020708 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002070a 20 4f                    | O      |		MOVEA.L	A7,A0
0002070c 43 fa fa 97              |C       |		LEA.L	0x201a5,A1
00020710 70 05                    |p       |		MOVEQ.L	#0x05,D0
00020712 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020714 51 c8 ff fc              |Q       |		DBF	D0,0x20712
00020718 42 27                    |B'      |		CLR.B	-(A7)
0002071a 4e b9 00 02 19 66        |N    f  |		JSR	exp_LOAD_UIR.TYP(Sw_6, Sw_1)
00020720 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020722 20 4f                    | O      |		MOVEA.L	A7,A0
00020724 43 fa fa 85              |C       |		LEA.L	0x201ab,A1
00020728 70 05                    |p       |		MOVEQ.L	#0x05,D0
0002072a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002072c 51 c8 ff fc              |Q       |		DBF	D0,0x2072a
00020730 42 27                    |B'      |		CLR.B	-(A7)
00020732 4e b9 00 02 17 3a        |N    :  |		JSR	exp_LOAD_UIR.FIU(Sw_6, Sw_1)
00020738 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002073a 3f 3c a0 00              |?<      |		MOVE.W	#0xa000,-(A7)
0002073e 42 27                    |B'      |		CLR.B	-(A7)
00020740 4e b9 00 02 1b 92        |N       |		JSR	exp_LOAD_UIR.IOC(Sw_2, Sw_1)
00020746 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020748 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002074a 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
0002074e 48 80                    |H       |		EXTB.W	D0
00020750 e5 40                    | @      |		ASL.W	#0x2,D0
00020752 41 fa fa 9a              |A       |		LEA.L	0x201ee,A0
00020756 20 30 00 00              | 0      |		MOVE.L	(A0+D0.W),D0
0002075a 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00020760 63 02                    |c       |		BLS	0x20764
00020762 4e 4f                    |NO      |		TRAP	#15
00020764 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020766 4e ba fe 88              |N       |		JSR	0x205f0
0002076a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002076c 34 9f                    |4       |		MOVE.W	(A7)+,(A2)
0002076e 1d 52 ff f0              | R      |		MOVE.B	(A2),(A6-0x10)
00020772 1d 6e ff ef ff f1        | n      |		MOVE.B	(A6-0x11),(A6-0xf)
00020778 1d 7c 00 0e ff f2        | |      |		MOVE.B	#0x0e,(A6-0xe)
0002077e 42 2e ff f3              |B.      |		CLR.B	(A6-0xd)
00020782 42 2e ff f4              |B.      |		CLR.B	(A6-0xc)
00020786 42 2e ff f5              |B.      |		CLR.B	(A6-0xb)
0002078a 3f 12                    |?       |		MOVE.W	(A2),-(A7)
0002078c 4e b9 00 02 18 3a        |N    :  |		JSR	exp_PREP_RUN.SEQ(Sw_2)
00020792 3e ae ff f4              |>       |		MOVE.W	(A6-0xc),(A7)
00020796 3f 2e ff f2              |?.      |		MOVE.W	(A6-0xe),-(A7)
0002079a 3f 2e ff f0              |?.      |		MOVE.W	(A6-0x10),-(A7)
0002079e 4e b9 00 02 18 54        |N    T  |		JSR	exp_LOAD_UIR.SEQ(Sw_6)
000207a4 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000207a6 4c df 07 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2
000207aa 4e 5e                    |N^      |		UNLK	A6
000207ac 4e 75                    |Nu      |		RTS
000207ae ; --------------------------------------------------------------------------------------
000207ae ; OMSI PASCAL Function
000207ae ;    <LVAR  0x008 1(r)>
000207ae ; --------------------------------------------------------------------------------------
000207ae 4e 56 ff f6              |NV      |		LINK.W	A6,#0xfff6
000207b2 bf d5                    |        |		CMPA.L	(A5),A7
000207b4 62 06                    |b       |		BHI	0x207bc
000207b6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000207ba 4e 76                    |Nv      |		TRAPV
000207bc de fc 00 08              |        |		ADDA.W	#0x8,A7
000207c0 4e b9 00 02 1a f0        |N       |		JSR	exp_CLEAR_PARITY.VAL()
000207c6 4e b9 00 02 19 c2        |N       |		JSR	exp_CLEAR_PARITY.TYP()
000207cc 4e b9 00 02 17 76        |N    v  |		JSR	exp_CLEAR_PARITY.FIU()
000207d2 1f 3c 00 ff              | <      |		MOVE.B	#0xff,-(A7)
000207d6 42 27                    |B'      |		CLR.B	-(A7)
000207d8 4e b9 00 02 1b ae        |N       |		JSR	exp_LOAD_PAREG.IOC(Sw_1, Sw_1)
000207de 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000207e0 4e b9 00 02 18 94        |N       |		JSR	exp_CLEAR_PARITY.SEQ()
000207e6 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000207ea 4e b9 00 02 17 56        |N    V  |		JSR	exp_FREEZE_BOARDS.FIU(Sw_2)
000207f0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000207f2 4e b9 00 02 1a 4a        |N    J  |		JSR	exp_RUN_NOCHECK.VAL()
000207f8 4e b9 00 02 19 1c        |N       |		JSR	exp_RUN_NOCHECK.TYP()
000207fe 4e b9 00 02 1b 48        |N    H  |		JSR	exp_RUN_NOCHECK.IOC()
00020804 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
00020808 67 08                    |g       |		BEQ	0x20812
0002080a 4e b9 00 02 17 c8        |N       |		JSR	exp_RUN_NOCHECK.SEQ()
00020810 60 06                    |`       |		BRA	0x20818
00020812 4e b9 00 02 18 16        |N       |		JSR	exp_RUN_BAD_UADR_PARITY.SEQ()
00020818 4e b9 00 02 16 66        |N    f  |		JSR	exp_STEP_MACHINE.FIU()
0002081e 4e b9 00 02 1a 80        |N       |		JSR	exp_MF.VAL()
00020824 4e b9 00 02 19 52        |N    R  |		JSR	exp_MF.TYP()
0002082a 4e b9 00 02 1b 7e        |N    ~  |		JSR	exp_MF.IOC()
00020830 4e b9 00 02 18 00        |N       |		JSR	exp_RESET.SEQ()
00020836 4e b9 00 02 17 00        |N       |		JSR	exp_MF.FIU()
0002083c 4e 5e                    |N^      |		UNLK	A6
0002083e 4e 75                    |Nu      |		RTS
00020840 ; --------------------------------------------------------------------------------------
00020840 ; OMSI PASCAL Function
00020840 ;    <LVAR  0x00c 1(r)>
00020840 ;    <LVAR  0x008 4(r)>
00020840 ;    <LVAR -0x008 1(r)>
00020840 ;    <LVAR -0x009 @ 1(r)>
00020840 ;    <LVAR -0x00a 1(r)>
00020840 ;    <LVAR -0x00b @>
00020840 ;    <LVAR -0x010 1(r)>
00020840 ;    <LVAR -0x011 @>
00020840 ;    <LVAR -0x018 1(r)>
00020840 ;    <LVAR -0x01b @>
00020840 ;    <LVAR -0x01d 1(r)>
00020840 ;    <LVAR -0x021 @>
00020840 ;    <LVAR -0x022 1(r)>
00020840 ;    <LVAR -0x026 @>
00020840 ; --------------------------------------------------------------------------------------
00020840 4e 56 ff be              |NV      |		LINK.W	A6,#0xffbe
00020844 bf d5                    |        |		CMPA.L	(A5),A7
00020846 62 06                    |b       |		BHI	0x2084e
00020848 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002084c 4e 76                    |Nv      |		TRAPV
0002084e de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00020852 48 e7 c0 80              |H       |		MOVEM.L	A0+D1+D0,-(A7)
00020856 42 27                    |B'      |		CLR.B	-(A7)
00020858 48 6e ff da              |Hn      |		PEA.L	(A6-0x26)
0002085c 4e b9 00 02 1a 08        |N       |		JSR	exp_READ_UIR.VAL(Sw_1, &Sr_5)
00020862 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020864 42 17                    |B       |		CLR.B	(A7)
00020866 48 6e ff df              |Hn      |		PEA.L	(A6-0x21)
0002086a 4e b9 00 02 18 da        |N       |		JSR	exp_READ_UIR.TYP(Sw_1, &Sr_6)
00020870 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020872 42 17                    |B       |		CLR.B	(A7)
00020874 48 6e ff e5              |Hn      |		PEA.L	(A6-0x1b)
00020878 4e b9 00 02 16 84        |N       |		JSR	exp_READ_UIR.FIU(Sw_1, &Sr_6)
0002087e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020880 42 27                    |B'      |		CLR.B	-(A7)
00020882 48 6e ff f5              |Hn      |		PEA.L	(A6-0xb)
00020886 4e b9 00 02 1b 0e        |N       |		JSR	exp_READ_UIR.IOC(Sw_1, &Sr_2)
0002088c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002088e 48 6e ff ef              |Hn      |		PEA.L	(A6-0x11)
00020892 4e b9 00 02 17 ae        |N       |		JSR	exp_READ_UIR.SEQ(&Sr_6)
00020898 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002089a 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
0002089e 4e b9 00 02 17 e4        |N       |		JSR	exp_READ_MISC.SEQ(&Sr_2_2_1_1_3)
000208a4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208a6 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000208aa 10 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D0
000208ae 48 80                    |H       |		EXTB.W	D0
000208b0 32 00                    |2       |		MOVE.W	D0,D1
000208b2 e5 41                    | A      |		ASL.W	#0x2,D1
000208b4 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
000208b8 42 81                    |B       |		CLR.L	D1
000208ba 12 2e ff de              | .      |		MOVE.B	(A6-0x22),D1
000208be 21 41 00 b4              |!A      |		MOVE.L	D1,(A0+0xb4)
000208c2 42 81                    |B       |		CLR.L	D1
000208c4 12 2e ff e3              | .      |		MOVE.B	(A6-0x1d),D1
000208c8 21 41 00 78              |!A x    |		MOVE.L	D1,(A0+0x78)
000208cc 42 81                    |B       |		CLR.L	D1
000208ce 12 2e ff e8              | .      |		MOVE.B	(A6-0x18),D1
000208d2 21 41 00 f0              |!A      |		MOVE.L	D1,(A0+0xf0)
000208d6 42 81                    |B       |		CLR.L	D1
000208d8 12 2e ff f6              | .      |		MOVE.B	(A6-0xa),D1
000208dc 21 41 00 3c              |!A <    |		MOVE.L	D1,(A0+0x3c)
000208e0 42 81                    |B       |		CLR.L	D1
000208e2 12 2e ff f0              | .      |		MOVE.B	(A6-0x10),D1
000208e6 20 81                    |        |		MOVE.L	D1,(A0)
000208e8 e3 40                    | @      |		ASL.W	#0x1,D0
000208ea 41 f9 00 02 1c 0e        |A       |		LEA.L	0x21c0e,A0
000208f0 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
000208f4 11 6e ff f7 01 98        | n      |		MOVE.B	(A6-0x9),(A0+0x198)
000208fa 11 6e ff f8 01 99        | n      |		MOVE.B	(A6-0x8),(A0+0x199)
00020900 4c df 01 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0
00020904 4e 5e                    |N^      |		UNLK	A6
00020906 4e 75                    |Nu      |		RTS
00020908 ; --------------------------------------------------------------------------------------
00020908 ; OMSI PASCAL Function
00020908 ;    <LVAR  0x00e 1(r)>
00020908 ;    <LVAR  0x00c 1(r)>
00020908 ;    <LVAR  0x008 4(r)>
00020908 ;    <LVAR -0x006 1(rw)>
00020908 ;    <LVAR -0x00c @>
00020908 ;    <LVAR -0x00d @ 1(rw)>
00020908 ;    <LVAR -0x00e @ 1(rw)>
00020908 ;    <LVAR -0x00f @>
00020908 ;    <LVAR -0x010 @>
00020908 ;    <LVAR -0x011 @>
00020908 ;    <LVAR -0x012 @>
00020908 ;    <LVAR -0x013 @ 1(r)>
00020908 ;    <LVAR -0x014 @>
00020908 ;    <LVAR -0x015 @>
00020908 ;    <LVAR -0x016 @>
00020908 ;    <LVAR -0x017 @>
00020908 ;    <LVAR -0x018 @ 1(r)>
00020908 ; --------------------------------------------------------------------------------------
00020908 4e 56 ff b0              |NV      |		LINK.W	A6,#0xffb0
0002090c bf d5                    |        |		CMPA.L	(A5),A7
0002090e 62 06                    |b       |		BHI	0x20916
00020910 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020914 4e 76                    |Nv      |		TRAPV
00020916 de fc 00 38              |   8    |		ADDA.W	#0x38,A7
0002091a 48 e7 e0 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D2+D1+D0,-(A7)
0002091e 45 ee ff f3              |E       |		LEA.L	(A6-0xd),A2
00020922 47 ee ff f2              |G       |		LEA.L	(A6-0xe),A3
00020926 49 f9 00 02 1c 0e        |I       |		LEA.L	0x21c0e,A4
0002092c 48 6e ff e8              |Hn      |		PEA.L	(A6-0x18)
00020930 48 6e ff e9              |Hn      |		PEA.L	(A6-0x17)
00020934 48 6e ff ea              |Hn      |		PEA.L	(A6-0x16)
00020938 48 6e ff eb              |Hn      |		PEA.L	(A6-0x15)
0002093c 48 6e ff ec              |Hn      |		PEA.L	(A6-0x14)
00020940 4e b9 00 02 1a 24        |N    $  |		JSR	exp_READ_PARITY_REG.VAL(&Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1)
00020946 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002094a 48 6e ff ed              |Hn      |		PEA.L	(A6-0x13)
0002094e 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00020952 48 6e ff ef              |Hn      |		PEA.L	(A6-0x11)
00020956 48 6e ff f0              |Hn      |		PEA.L	(A6-0x10)
0002095a 48 6e ff f1              |Hn      |		PEA.L	(A6-0xf)
0002095e 4e b9 00 02 18 f6        |N       |		JSR	exp_READ_PARITY_REG.TYP(&Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1)
00020964 de fc 00 12              |        |		ADDA.W	#0x12,A7
00020968 42 17                    |B       |		CLR.B	(A7)
0002096a 48 53                    |HS      |		PEA.L	(A3)
0002096c 4e b9 00 02 16 a0        |N       |		JSR	exp_READ_PAREG.FIU(Sw_1, &Sr_1)
00020972 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020974 42 27                    |B'      |		CLR.B	-(A7)
00020976 48 52                    |HR      |		PEA.L	(A2)
00020978 4e b9 00 02 1b 2a        |N    *  |		JSR	exp_READ_PAREG.IOC(Sw_1, &Sr_1)
0002097e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020980 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00020984 4e b9 00 02 17 e4        |N       |		JSR	exp_READ_MISC.SEQ(&Sr_2_2_1_1_3)
0002098a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002098c 42 80                    |B       |		CLR.L	D0
0002098e 10 13                    |        |		MOVE.B	(A3),D0
00020990 02 40 00 02              | @      |		ANDI.W	#0x0002,D0
00020994 16 80                    |        |		MOVE.B	D0,(A3)
00020996 42 81                    |B       |		CLR.L	D1
00020998 12 12                    |        |		MOVE.B	(A2),D1
0002099a 46 41                    |FA      |		NOT.W	D1
0002099c 02 41 00 01              | A      |		ANDI.W	#0x0001,D1
000209a0 14 81                    |        |		MOVE.B	D1,(A2)
000209a2 42 81                    |B       |		CLR.L	D1
000209a4 12 2e ff fa              | .      |		MOVE.B	(A6-0x6),D1
000209a8 02 41 00 60              | A `    |		ANDI.W	#0x0060,D1
000209ac 1d 41 ff fa              | A      |		MOVE.B	D1,(A6-0x6)
000209b0 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
000209b4 14 2e 00 0c              | .      |		MOVE.B	(A6+0xc),D2
000209b8 48 82                    |H       |		EXTB.W	D2
000209ba 42 30 20 2d              |B0 -    |		CLR.B	(A0+D2.W+#0x2d)
000209be 4a 2e ff e8              |J.      |		TST.B	(A6-0x18)
000209c2 67 04                    |g       |		BEQ	0x209c8
000209c4 52 30 20 2d              |R0 -    |		ADDQ.B	#0x1,(A0+D2.W+#0x2d)
000209c8 42 30 20 1e              |B0      |		CLR.B	(A0+D2.W+#0x1e)
000209cc 4a 2e ff ed              |J.      |		TST.B	(A6-0x13)
000209d0 67 04                    |g       |		BEQ	0x209d6
000209d2 52 30 20 1e              |R0      |		ADDQ.B	#0x1,(A0+D2.W+#0x1e)
000209d6 42 30 20 3c              |B0 <    |		CLR.B	(A0+D2.W+#0x3c)
000209da 4a 00                    |J       |		TST.B	D0
000209dc 67 04                    |g       |		BEQ	0x209e2
000209de 52 30 20 3c              |R0 <    |		ADDQ.B	#0x1,(A0+D2.W+#0x3c)
000209e2 42 30 20 0f              |B0      |		CLR.B	(A0+D2.W+#0xf)
000209e6 4a 12                    |J       |		TST.B	(A2)
000209e8 66 04                    |f       |		BNE	0x209ee
000209ea 52 30 20 0f              |R0      |		ADDQ.B	#0x1,(A0+D2.W+#0xf)
000209ee 4a 2e 00 0e              |J.      |		TST.B	(A6+0xe)
000209f2 67 1e                    |g       |		BEQ	0x20a12
000209f4 22 4c                    |"L      |		MOVEA.L	A4,A1
000209f6 43 f1 20 00              |C       |		LEA.L	(A1+D2.W),A1
000209fa 13 41 01 d2              | A      |		MOVE.B	D1,(A1+0x1d2)
000209fe 42 30 20 00              |B0      |		CLR.B	(A0+D2.W)
00020a02 43 fa f8 26              |C  &    |		LEA.L	0x2022a,A1
00020a06 b2 31 20 00              | 1      |		CMP.B	(A1+D2.W),D1
00020a0a 66 04                    |f       |		BNE	0x20a10
00020a0c 52 30 20 00              |R0      |		ADDQ.B	#0x1,(A0+D2.W)
00020a10 60 1c                    |`       |		BRA	0x20a2e
00020a12 22 4c                    |"L      |		MOVEA.L	A4,A1
00020a14 43 f1 20 00              |C       |		LEA.L	(A1+D2.W),A1
00020a18 13 41 01 e1              | A      |		MOVE.B	D1,(A1+0x1e1)
00020a1c 42 30 20 00              |B0      |		CLR.B	(A0+D2.W)
00020a20 43 fa f8 17              |C       |		LEA.L	0x20239,A1
00020a24 b2 31 20 00              | 1      |		CMP.B	(A1+D2.W),D1
00020a28 67 04                    |g       |		BEQ	0x20a2e
00020a2a 52 30 20 00              |R0      |		ADDQ.B	#0x1,(A0+D2.W)
00020a2e 4c df 1f 07              |L       |		MOVEM.L	(A7)+,D0+D1+D2+A0+A1+A2+A3+A4
00020a32 4e 5e                    |N^      |		UNLK	A6
00020a34 4e 75                    |Nu      |		RTS
00020a36 ; --------------------------------------------------------------------------------------
00020a36 ; OMSI PASCAL Function
00020a36 ;    <LVAR  0x00e 4(w)>
00020a36 ; --------------------------------------------------------------------------------------
00020a36 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6		; Spelunked
00020a3a bf d5                    |        |		CMPA.L	(A5),A7
00020a3c 62 06                    |b       |		BHI	0x20a44
00020a3e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a42 4e 76                    |Nv      |		TRAPV
00020a44 de fc 00 14              |        |		ADDA.W	#0x14,A7
00020a48 48 e7 83 00              |H       |		MOVEM.L	D7+D6+D0,-(A7)
00020a4c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020a4e 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020a50 10 06                    |        |		MOVE.B	D6,D0
00020a52 48 80                    |H       |		EXTB.W	D0
00020a54 4a 36 00 08              |J6      |		TST.B	(A6+D0.W+#0x8)
00020a58 66 02                    |f       |		BNE	0x20a5c
00020a5a 52 87                    |R       |		ADDQ.L	#0x1,D7
00020a5c 2d 47 00 0e              |-G      |		MOVE.L	D7,(A6+0xe)
00020a60 52 06                    |R       |		ADDQ.B	#0x1,D6
00020a62 0c 06 00 04              |        |		CMPI.B	#0x04,D6
00020a66 6f e8                    |o       |		BLE	0x20a50
00020a68 4c df 00 c1              |L       |		MOVEM.L	(A7)+,D0+D6+D7
00020a6c 4e 5e                    |N^      |		UNLK	A6
00020a6e 4e 75                    |Nu      |		RTS
00020a70 ; --------------------------------------------------------------------------------------
00020a70 ; OMSI PASCAL Function
00020a70 ;    <LVAR  0x00a 1(rw)>
00020a70 ;    <LVAR  0x008 1(r)>
00020a70 ;    <LVAR -0x003 @ 1(r)>
00020a70 ;    <LVAR -0x005 @>
00020a70 ;    <LVAR -0x006 @>
00020a70 ;    <LVAR -0x007 @ 1(rw)>
00020a70 ;    <LVAR -0x009 @>
00020a70 ;    <LVAR -0x00a @>
00020a70 ; --------------------------------------------------------------------------------------
00020a70 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
00020a74 bf d5                    |        |		CMPA.L	(A5),A7
00020a76 62 06                    |b       |		BHI	0x20a7e
00020a78 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a7c 4e 76                    |Nv      |		TRAPV
00020a7e de fc 00 44              |   D    |		ADDA.W	#0x44,A7
00020a82 48 e7 f8 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
00020a86 41 ee ff fd              |A       |		LEA.L	(A6-0x3),A0
00020a8a 43 ee ff f9              |C       |		LEA.L	(A6-0x7),A1
00020a8e 45 f9 00 02 1c 1c        |E       |		LEA.L	0x21c1c,A2
00020a94 47 f9 00 02 1e d8        |G       |		LEA.L	0x21ed8,A3
00020a9a 49 ee ff f6              |I       |		LEA.L	(A6-0xa),A4
00020a9e 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020aa0 74 04                    |t       |		MOVEQ.L	#0x04,D2
00020aa2 76 18                    |v       |		MOVEQ.L	#0x18,D3
00020aa4 78 03                    |x       |		MOVEQ.L	#0x03,D4
00020aa6 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020aaa 48 80                    |H       |		EXTB.W	D0
00020aac b0 42                    | B      |		CMP.W	D2,D0
00020aae 63 02                    |c       |		BLS	0x20ab2
00020ab0 4e 4e                    |NN      |		TRAP	#14
00020ab2 d0 40                    | @      |		ADD.W	D0,D0
00020ab4 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00020abc 00 0a                    |        |		.CONST	0xa			; [0x0] -> 0x20ac6
00020abe 00 12                    |        |		.CONST	0x12			; [0x1] -> 0x20ace
00020ac0 00 14                    |        |		.CONST	0x14			; [0x2] -> 0x20ad0
00020ac2 00 5a                    | Z      |		.CONST	0x5a			; [0x3] -> 0x20b16
00020ac4 00 9e                    |        |		.CONST	0x9e			; [0x4] -> 0x20b5a
00020ac6					switch@0x20ab4[0x0]:
00020ac6 12 bc 00 02              |        |		MOVE.B	#0x02,(A1)
00020aca 60 00 00 d0              |`       |		BRA	0x20b9c
00020ace					switch@0x20ab4[0x1]:
00020ace 60 f6                    |`       |		BRA	switch@0x20ab4[0x0]
00020ad0					switch@0x20ab4[0x2]:
00020ad0 48 54                    |HT      |		PEA.L	(A4)
00020ad2 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00020ad6 48 51                    |HQ      |		PEA.L	(A1)
00020ad8 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020adc 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020ae0 48 50                    |HP      |		PEA.L	(A0)
00020ae2 4e b9 00 02 18 b2        |N       |		JSR	exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020ae8 de c3                    |        |		ADDA.W	D3,A7
00020aea 4a 10                    |J       |		TST.B	(A0)
00020aec 66 24                    |f$      |		BNE	0x20b12
00020aee 2f 3a f6 86              |/:      |		MOVE.L	0x20176,-(A7)
00020af2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020af4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020af8 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020afa 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020afc 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020b02 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020b04 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00020b06 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b08 16 84                    |        |		MOVE.B	D4,(A3)
00020b0a 1f 01                    |        |		MOVE.B	D1,-(A7)
00020b0c 4e ba fa 18              |N       |		JSR	0x20526
00020b10 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b12 60 00 00 88              |`       |		BRA	0x20b9c
00020b16					switch@0x20ab4[0x3]:
00020b16 48 54                    |HT      |		PEA.L	(A4)
00020b18 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00020b1c 48 51                    |HQ      |		PEA.L	(A1)
00020b1e 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020b22 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020b26 48 50                    |HP      |		PEA.L	(A0)
00020b28 4e b9 00 02 19 e0        |N       |		JSR	exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020b2e de c3                    |        |		ADDA.W	D3,A7
00020b30 4a 10                    |J       |		TST.B	(A0)
00020b32 66 24                    |f$      |		BNE	0x20b58
00020b34 2f 3a f6 44              |/: D    |		MOVE.L	0x2017a,-(A7)
00020b38 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b3a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020b3e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020b40 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020b42 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020b48 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020b4a 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00020b4c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b4e 16 84                    |        |		MOVE.B	D4,(A3)
00020b50 1f 01                    |        |		MOVE.B	D1,-(A7)
00020b52 4e ba f9 d2              |N       |		JSR	0x20526
00020b56 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b58 60 42                    |`B      |		BRA	0x20b9c
00020b5a					switch@0x20ab4[0x4]:
00020b5a 48 54                    |HT      |		PEA.L	(A4)
00020b5c 48 6e ff f7              |Hn      |		PEA.L	(A6-0x9)
00020b60 48 51                    |HQ      |		PEA.L	(A1)
00020b62 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020b66 48 6e ff fb              |Hn      |		PEA.L	(A6-0x5)
00020b6a 48 50                    |HP      |		PEA.L	(A0)
00020b6c 4e b9 00 02 16 be        |N       |		JSR	exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
00020b72 de c3                    |        |		ADDA.W	D3,A7
00020b74 4a 10                    |J       |		TST.B	(A0)
00020b76 66 24                    |f$      |		BNE	0x20b9c
00020b78 2f 3a f6 04              |/:      |		MOVE.L	0x2017e,-(A7)
00020b7c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b7e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020b82 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020b84 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020b86 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020b8c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020b8e 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00020b90 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020b92 16 84                    |        |		MOVE.B	D4,(A3)
00020b94 1f 01                    |        |		MOVE.B	D1,-(A7)
00020b96 4e ba f9 8e              |N       |		JSR	0x20526
00020b9a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b9c 42 2e 00 0a              |B.      |		CLR.B	(A6+0xa)
00020ba0 42 80                    |B       |		CLR.L	D0
00020ba2 10 11                    |        |		MOVE.B	(A1),D0
00020ba4 b0 41                    | A      |		CMP.W	D1,D0
00020ba6 66 04                    |f       |		BNE	0x20bac
00020ba8 52 2e 00 0a              |R.      |		ADDQ.B	#0x1,(A6+0xa)
00020bac 4c df 1f 1f              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
00020bb0 4e 5e                    |N^      |		UNLK	A6
00020bb2 4e 75                    |Nu      |		RTS
00020bb4 ; --------------------------------------------------------------------------------------
00020bb4 ; OMSI PASCAL Function
00020bb4 ;    <LVAR  0x008 4(r)>
00020bb4 ; --------------------------------------------------------------------------------------
00020bb4 4e 56 ff a4              |NV      |		LINK.W	A6,#0xffa4
00020bb8 bf d5                    |        |		CMPA.L	(A5),A7
00020bba 62 06                    |b       |		BHI	0x20bc2
00020bbc 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020bc0 4e 76                    |Nv      |		TRAPV
00020bc2 de fc 00 58              |   X    |		ADDA.W	#0x58,A7
00020bc6 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020bca 47 f9 00 02 1c 0e        |G       |		LEA.L	0x21c0e,A3
00020bd0 49 f9 00 02 1d d8        |I       |		LEA.L	0x21dd8,A4
00020bd6 76 01                    |v       |		MOVEQ.L	#0x01,D3
00020bd8 78 04                    |x       |		MOVEQ.L	#0x04,D4
00020bda 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020bdc 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020bde 1f 07                    |        |		MOVE.B	D7,-(A7)
00020be0 4e ba fe 8e              |N       |		JSR	0x20a70
00020be4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020be6 10 1f                    |        |		MOVE.B	(A7)+,D0
00020be8 48 80                    |H       |		EXTB.W	D0
00020bea 41 83                    |A       |		CHK.W	D3,D0
00020bec 1a 00                    |        |		MOVE.B	D0,D5
00020bee 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020bf0 10 07                    |        |		MOVE.B	D7,D0
00020bf2 48 80                    |H       |		EXTB.W	D0
00020bf4 c1 fc 00 0f              |        |		MULS.W	#0xf,D0
00020bf8 20 4b                    | K      |		MOVEA.L	A3,A0
00020bfa 12 06                    |        |		MOVE.B	D6,D1
00020bfc 48 81                    |H       |		EXTB.W	D1
00020bfe 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020c02 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00020c06 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020c08 42 28 01 48              |B( H    |		CLR.B	(A0+0x148)
00020c0c 10 07                    |        |		MOVE.B	D7,D0
00020c0e 48 80                    |H       |		EXTB.W	D0
00020c10 c1 fc 00 3c              |   <    |		MULS.W	#0x3c,D0
00020c14 12 06                    |        |		MOVE.B	D6,D1
00020c16 48 81                    |H       |		EXTB.W	D1
00020c18 e5 41                    | A      |		ASL.W	#0x2,D1
00020c1a 22 6e 00 08              |"n      |		MOVEA.L	(A6+0x8),A1
00020c1e 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
00020c22 45 fa f5 8e              |E       |		LEA.L	0x201b2,A2
00020c26 20 31 10 00              | 1      |		MOVE.L	(A1+D1.W),D0
00020c2a b0 b2 10 00              |        |		CMP.L	(A2+D1.W),D0
00020c2e 67 04                    |g       |		BEQ	0x20c34
00020c30 52 28 01 48              |R( H    |		ADDQ.B	#0x1,(A0+0x148)
00020c34 10 07                    |        |		MOVE.B	D7,D0
00020c36 48 80                    |H       |		EXTB.W	D0
00020c38 22 4b                    |"K      |		MOVEA.L	A3,A1
00020c3a 12 28 01 48              | ( H    |		MOVE.B	(A0+0x148),D1
00020c3e 44 01                    |D       |		NEG.B	D1
00020c40 52 01                    |R       |		ADDQ.B	#0x1,D1
00020c42 c2 31 00 16              | 1      |		AND.B	(A1+D0.W+#0x16),D1
00020c46 48 81                    |H       |		EXTB.W	D1
00020c48 43 83                    |C       |		CHK.W	D3,D1
00020c4a 13 81 00 16              |        |		MOVE.B	D1,(A1+D0.W+#0x16)
00020c4e 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
00020c52 2f 09                    |/       |		MOVE.L	A1,-(A7)
00020c54 10 29 01 93              | )      |		MOVE.B	(A1+0x193),D0
00020c58 c0 28 01 48              | ( H    |		AND.B	(A0+0x148),D0
00020c5c 48 80                    |H       |		EXTB.W	D0
00020c5e 41 83                    |A       |		CHK.W	D3,D0
00020c60 13 40 01 93              | @      |		MOVE.B	D0,(A1+0x193)
00020c64 4a 28 01 48              |J( H    |		TST.B	(A0+0x148)
00020c68 67 10                    |g       |		BEQ	0x20c7a
00020c6a 10 07                    |        |		MOVE.B	D7,D0
00020c6c 48 80                    |H       |		EXTB.W	D0
00020c6e e5 40                    | @      |		ASL.W	#0x2,D0
00020c70 24 4b                    |$K      |		MOVEA.L	A3,A2
00020c72 45 f2 00 00              |E       |		LEA.L	(A2+D0.W),A2
00020c76 52 aa 01 b6              |R       |		ADDQ.L	#0x1,(A2+0x1b6)
00020c7a 20 57                    | W      |		MOVEA.L	(A7),A0
00020c7c 22 6f 00 04              |"o      |		MOVEA.L	(A7+0x4),A1
00020c80 10 28 02 86              | (      |		MOVE.B	(A0+0x286),D0
00020c84 c0 29 01 f0              | )      |		AND.B	(A1+0x1f0),D0
00020c88 12 05                    |        |		MOVE.B	D5,D1
00020c8a 44 01                    |D       |		NEG.B	D1
00020c8c 52 01                    |R       |		ADDQ.B	#0x1,D1
00020c8e c2 29 02 3b              | ) ;    |		AND.B	(A1+0x23b),D1
00020c92 44 01                    |D       |		NEG.B	D1
00020c94 52 01                    |R       |		ADDQ.B	#0x1,D1
00020c96 c2 00                    |        |		AND.B	D0,D1
00020c98 48 81                    |H       |		EXTB.W	D1
00020c9a 43 83                    |C       |		CHK.W	D3,D1
00020c9c 11 41 02 86              | A      |		MOVE.B	D1,(A0+0x286)
00020ca0 10 29 01 f0              | )      |		MOVE.B	(A1+0x1f0),D0
00020ca4 44 00                    |D       |		NEG.B	D0
00020ca6 52 00                    |R       |		ADDQ.B	#0x1,D0
00020ca8 c0 28 02 a0              | (      |		AND.B	(A0+0x2a0),D0
00020cac 48 80                    |H       |		EXTB.W	D0
00020cae 41 83                    |A       |		CHK.W	D3,D0
00020cb0 11 40 02 a0              | @      |		MOVE.B	D0,(A0+0x2a0)
00020cb4 4a 05                    |J       |		TST.B	D5
00020cb6 66 0c                    |f       |		BNE	0x20cc4
00020cb8 c0 29 02 3b              | ) ;    |		AND.B	(A1+0x23b),D0
00020cbc 48 80                    |H       |		EXTB.W	D0
00020cbe 41 83                    |A       |		CHK.W	D3,D0
00020cc0 11 40 02 a0              | @      |		MOVE.B	D0,(A0+0x2a0)
00020cc4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020cc6 4a 29 01 f0              |J)      |		TST.B	(A1+0x1f0)
00020cca 66 02                    |f       |		BNE	0x20cce
00020ccc 60 0a                    |`       |		BRA	0x20cd8
00020cce 4a 29 02 3b              |J) ;    |		TST.B	(A1+0x23b)
00020cd2 67 14                    |g       |		BEQ	0x20ce8
00020cd4 4a 05                    |J       |		TST.B	D5
00020cd6 66 10                    |f       |		BNE	0x20ce8
00020cd8 10 07                    |        |		MOVE.B	D7,D0
00020cda 48 80                    |H       |		EXTB.W	D0
00020cdc e5 40                    | @      |		ASL.W	#0x2,D0
00020cde 20 4b                    | K      |		MOVEA.L	A3,A0
00020ce0 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020ce4 52 a8 02 8c              |R       |		ADDQ.L	#0x1,(A0+0x28c)
00020ce8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020cea 52 06                    |R       |		ADDQ.B	#0x1,D6
00020cec 0c 06 00 0e              |        |		CMPI.B	#0x0e,D6
00020cf0 6f 00 fe fe              |o       |		BLE	0x20bf0
00020cf4 52 07                    |R       |		ADDQ.B	#0x1,D7
00020cf6 be 04                    |        |		CMP.B	D4,D7
00020cf8 6f 00 fe e2              |o       |		BLE	0x20bdc
00020cfc 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020cfe 10 07                    |        |		MOVE.B	D7,D0
00020d00 48 80                    |H       |		EXTB.W	D0
00020d02 20 4b                    | K      |		MOVEA.L	A3,A0
00020d04 4a 30 00 16              |J0      |		TST.B	(A0+D0.W+#0x16)
00020d08 66 06                    |f       |		BNE	0x20d10
00020d0a 52 b9 00 02 1d dc        |R       |		ADDQ.L	#0x1,0x21ddc
00020d10 12 07                    |        |		MOVE.B	D7,D1
00020d12 48 81                    |H       |		EXTB.W	D1
00020d14 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020d16 34 01                    |4       |		MOVE.W	D1,D2
00020d18 e5 42                    | B      |		ASL.W	#0x2,D2
00020d1a 22 4b                    |"K      |		MOVEA.L	A3,A1
00020d1c 43 f1 20 00              |C       |		LEA.L	(A1+D2.W),A1
00020d20 2f 09                    |/       |		MOVE.L	A1,-(A7)
00020d22 24 14                    |$       |		MOVE.L	(A4),D2
00020d24 d4 a9 01 b6              |        |		ADD.L	(A1+0x1b6),D2
00020d28 28 82                    |(       |		MOVE.L	D2,(A4)
00020d2a 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020d2e 4a 28 02 86              |J(      |		TST.B	(A0+0x286)
00020d32 66 06                    |f       |		BNE	0x20d3a
00020d34 52 b9 00 02 1e b4        |R       |		ADDQ.L	#0x1,0x21eb4
00020d3a 20 5f                    | _      |		MOVEA.L	(A7)+,A0
00020d3c 20 39 00 02 1e b8        | 9      |		MOVE.L	0x21eb8,D0
00020d42 d0 a8 02 8c              |        |		ADD.L	(A0+0x28c),D0
00020d46 23 c0 00 02 1e b8        |#       |		MOVE.L	D0,0x21eb8
00020d4c 3e 1f                    |>       |		MOVE.W	(A7)+,D7
00020d4e 52 47                    |RG      |		ADDQ.W	#0x1,D7
00020d50 be 44                    | D      |		CMP.W	D4,D7
00020d52 6f aa                    |o       |		BLE	0x20cfe
00020d54 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00020d58 4e 5e                    |N^      |		UNLK	A6
00020d5a 4e 75                    |Nu      |		RTS
00020d5c ; --------------------------------------------------------------------------------------
00020d5c ; OMSI PASCAL Function
00020d5c ;    <LVAR  0x008 4(r)>
00020d5c ; --------------------------------------------------------------------------------------
00020d5c 4e 56 ff aa              |NV      |		LINK.W	A6,#0xffaa
00020d60 bf d5                    |        |		CMPA.L	(A5),A7
00020d62 62 06                    |b       |		BHI	0x20d6a
00020d64 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020d68 4e 76                    |Nv      |		TRAPV
00020d6a de fc 00 4e              |   N    |		ADDA.W	#0x4e,A7
00020d6e 48 e7 f7 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7)
00020d72 43 f9 00 02 1c 0e        |C       |		LEA.L	0x21c0e,A1
00020d78 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00020d7c 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
00020d7e 76 0c                    |v       |		MOVEQ.L	#0x0c,D3
00020d80 20 52                    | R      |		MOVEA.L	(A2),A0
00020d82 48 50                    |HP      |		PEA.L	(A0)
00020d84 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00020d8a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020d8c 48 50                    |HP      |		PEA.L	(A0)
00020d8e 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00020d94 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020d96 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020d98 10 06                    |        |		MOVE.B	D6,D0
00020d9a 48 80                    |H       |		EXTB.W	D0
00020d9c 20 49                    | I      |		MOVEA.L	A1,A0
00020d9e 4a 30 00 16              |J0      |		TST.B	(A0+D0.W+#0x16)
00020da2 66 5a                    |fZ      |		BNE	0x20dfe
00020da4 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020da6 10 06                    |        |		MOVE.B	D6,D0
00020da8 48 80                    |H       |		EXTB.W	D0
00020daa c1 fc 00 0f              |        |		MULS.W	#0xf,D0
00020dae 20 49                    | I      |		MOVEA.L	A1,A0
00020db0 12 07                    |        |		MOVE.B	D7,D1
00020db2 48 81                    |H       |		EXTB.W	D1
00020db4 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020db8 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00020dbc 4a 28 01 48              |J( H    |		TST.B	(A0+0x148)
00020dc0 67 08                    |g       |		BEQ	0x20dca
00020dc2 20 52                    | R      |		MOVEA.L	(A2),A0
00020dc4 3f 3a f3 bc              |?:      |		MOVE.W	0x20182,-(A7)
00020dc8 60 06                    |`       |		BRA	0x20dd0
00020dca 20 52                    | R      |		MOVEA.L	(A2),A0
00020dcc 3f 3a f3 b6              |?:      |		MOVE.W	0x20184,-(A7)
00020dd0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020dd2 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00020dd4 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020dd6 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00020dda 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020dde 3f 3c 00 02              |?<      |		MOVE.W	#0x2,-(A7)
00020de2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020de8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020dea 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020df0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020df2 20 9f                    |        |		MOVE.L	(A7)+,(A0)
00020df4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020df6 52 07                    |R       |		ADDQ.B	#0x1,D7
00020df8 be 02                    |        |		CMP.B	D2,D7
00020dfa 6f aa                    |o       |		BLE	0x20da6
00020dfc 60 08                    |`       |		BRA	0x20e06
00020dfe 52 06                    |R       |		ADDQ.B	#0x1,D6
00020e00 0c 06 00 04              |        |		CMPI.B	#0x04,D6
00020e04 6f 92                    |o       |		BLE	0x20d98
00020e06 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020e08 10 07                    |        |		MOVE.B	D7,D0
00020e0a 48 80                    |H       |		EXTB.W	D0
00020e0c e3 40                    | @      |		ASL.W	#0x1,D0
00020e0e 20 49                    | I      |		MOVEA.L	A1,A0
00020e10 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020e14 42 80                    |B       |		CLR.L	D0
00020e16 10 28 01 98              | (      |		MOVE.B	(A0+0x198),D0
00020e1a c0 fc 01 00              |        |		MULU.W	#0x100,D0
00020e1e 42 81                    |B       |		CLR.L	D1
00020e20 12 28 01 99              | (      |		MOVE.B	(A0+0x199),D1
00020e24 d2 40                    | @      |		ADD.W	D0,D1
00020e26 42 80                    |B       |		CLR.L	D0
00020e28 30 01                    |0       |		MOVE.W	D1,D0
00020e2a 2a 00                    |*       |		MOVE.L	D0,D5
00020e2c 20 52                    | R      |		MOVEA.L	(A2),A0
00020e2e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020e30 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00020e32 9e c3                    |        |		SUBA.W	D3,A7
00020e34 2f 05                    |/       |		MOVE.L	D5,-(A7)
00020e36 4e b9 00 01 03 54        |N    T  |		JSR	Long2Quad(a : Long) : Quad
00020e3c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020e3e 48 78 00 10              |Hx      |		PEA.L	0x10
00020e42 4e b9 00 01 03 5c        |N    \  |		JSR	Quad2String(a : Quad; radix : Long ) : String
00020e48 de c3                    |        |		ADDA.W	D3,A7
00020e4a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020e50 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020e52 20 9f                    |        |		MOVE.L	(A7)+,(A0)
00020e54 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00020e56 1f 3c 00 5c              | < \    |		MOVE.B	#0x5c,-(A7)
00020e5a 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00020e60 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020e62 52 07                    |R       |		ADDQ.B	#0x1,D7
00020e64 be 02                    |        |		CMP.B	D2,D7
00020e66 6f a0                    |o       |		BLE	0x20e08
00020e68 4c df 07 ef              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1+A2
00020e6c 4e 5e                    |N^      |		UNLK	A6
00020e6e 4e 75                    |Nu      |		RTS
00020e70 ; --------------------------------------------------------------------------------------
00020e70 ; OMSI PASCAL Function
00020e70 ;    <LVAR  0x008 4(r)>
00020e70 ; --------------------------------------------------------------------------------------
00020e70 4e 56 ff a4              |NV      |		LINK.W	A6,#0xffa4
00020e74 bf d5                    |        |		CMPA.L	(A5),A7
00020e76 62 06                    |b       |		BHI	0x20e7e
00020e78 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020e7c 4e 76                    |Nv      |		TRAPV
00020e7e de fc 00 58              |   X    |		ADDA.W	#0x58,A7
00020e82 48 e7 f3 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7)
00020e86 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
00020e8a 47 f9 00 02 1c 0e        |G       |		LEA.L	0x21c0e,A3
00020e90 74 01                    |t       |		MOVEQ.L	#0x01,D2
00020e92 76 02                    |v       |		MOVEQ.L	#0x02,D3
00020e94 20 52                    | R      |		MOVEA.L	(A2),A0
00020e96 48 50                    |HP      |		PEA.L	(A0)
00020e98 4e b9 00 01 02 bc        |N       |		JSR	FreeString(VAR a : String)
00020e9e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ea0 48 50                    |HP      |		PEA.L	(A0)
00020ea2 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
00020ea8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020eaa 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020eac 10 06                    |        |		MOVE.B	D6,D0
00020eae 48 80                    |H       |		EXTB.W	D0
00020eb0 20 4b                    | K      |		MOVEA.L	A3,A0
00020eb2 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020eb6 4a 28 02 86              |J(      |		TST.B	(A0+0x286)
00020eba 66 00 00 96              |f       |		BNE	0x20f52
00020ebe 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020ec0 10 06                    |        |		MOVE.B	D6,D0
00020ec2 48 80                    |H       |		EXTB.W	D0
00020ec4 c1 fc 00 0f              |        |		MULS.W	#0xf,D0
00020ec8 20 4b                    | K      |		MOVEA.L	A3,A0
00020eca 12 07                    |        |		MOVE.B	D7,D1
00020ecc 48 81                    |H       |		EXTB.W	D1
00020ece 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020ed2 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00020ed6 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020ed8 4a 28 01 f0              |J(      |		TST.B	(A0+0x1f0)
00020edc 67 08                    |g       |		BEQ	0x20ee6
00020ede 22 52                    |"R      |		MOVEA.L	(A2),A1
00020ee0 3f 3a f2 a4              |?:      |		MOVE.W	0x20186,-(A7)
00020ee4 60 06                    |`       |		BRA	0x20eec
00020ee6 22 52                    |"R      |		MOVEA.L	(A2),A1
00020ee8 3f 3a f2 9e              |?:      |		MOVE.W	0x20188,-(A7)
00020eec 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020eee 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00020ef0 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020ef2 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00020ef6 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020ef8 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020efa 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020f00 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f02 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020f08 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f0a 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
00020f0c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f0e 20 5f                    | _      |		MOVEA.L	(A7)+,A0
00020f10 4a 28 02 3b              |J( ;    |		TST.B	(A0+0x23b)
00020f14 66 08                    |f       |		BNE	0x20f1e
00020f16 20 52                    | R      |		MOVEA.L	(A2),A0
00020f18 3f 3a f2 70              |?: p    |		MOVE.W	0x2018a,-(A7)
00020f1c 60 06                    |`       |		BRA	0x20f24
00020f1e 20 52                    | R      |		MOVEA.L	(A2),A0
00020f20 3f 3a f2 6a              |?: j    |		MOVE.W	0x2018c,-(A7)
00020f24 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020f26 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00020f28 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020f2a 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00020f2e 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020f30 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020f32 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020f38 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f3a 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020f40 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020f42 20 9f                    |        |		MOVE.L	(A7)+,(A0)
00020f44 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f46 52 07                    |R       |		ADDQ.B	#0x1,D7
00020f48 0c 07 00 0e              |        |		CMPI.B	#0x0e,D7
00020f4c 6f 00 ff 72              |o  r    |		BLE	0x20ec0
00020f50 60 0a                    |`       |		BRA	0x20f5c
00020f52 52 06                    |R       |		ADDQ.B	#0x1,D6
00020f54 0c 06 00 04              |        |		CMPI.B	#0x04,D6
00020f58 6f 00 ff 52              |o  R    |		BLE	0x20eac
00020f5c 4c df 0f cf              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2+A3
00020f60 4e 5e                    |N^      |		UNLK	A6
00020f62 4e 75                    |Nu      |		RTS
00020f64 ; --------------------------------------------------------------------------------------
00020f64 ; OMSI PASCAL Function
00020f64 ;    <LVAR  0x008 1(w)>
00020f64 ;    <LVAR -0x004 1(rw)>
00020f64 ; --------------------------------------------------------------------------------------
00020f64 4e 56 ff c0              |NV      |		LINK.W	A6,#0xffc0
00020f68 bf d5                    |        |		CMPA.L	(A5),A7
00020f6a 62 06                    |b       |		BHI	0x20f72
00020f6c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020f70 4e 76                    |Nv      |		TRAPV
00020f72 de fc 00 3c              |   <    |		ADDA.W	#0x3c,A7
00020f76 48 e7 ff f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020f7a 45 f9 00 02 1c 0e        |E       |		LEA.L	0x21c0e,A2
00020f80 47 ee ff fc              |G       |		LEA.L	(A6-0x4),A3
00020f84 76 04                    |v       |		MOVEQ.L	#0x04,D3
00020f86 78 0f                    |x       |		MOVEQ.L	#0x0f,D4
00020f88 42 13                    |B       |		CLR.B	(A3)
00020f8a 7a 04                    |z       |		MOVEQ.L	#0x04,D5
00020f8c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020f8e 10 07                    |        |		MOVE.B	D7,D0
00020f90 48 80                    |H       |		EXTB.W	D0
00020f92 20 4a                    | J      |		MOVEA.L	A2,A0
00020f94 4a 30 00 16              |J0      |		TST.B	(A0+D0.W+#0x16)
00020f98 66 04                    |f       |		BNE	0x20f9e
00020f9a 1a 07                    |        |		MOVE.B	D7,D5
00020f9c 60 08                    |`       |		BRA	0x20fa6
00020f9e 52 07                    |R       |		ADDQ.B	#0x1,D7
00020fa0 be 03                    |        |		CMP.B	D3,D7
00020fa2 6f ea                    |o       |		BLE	0x20f8e
00020fa4 60 58                    |`X      |		BRA	0x20ffe
00020fa6 1e 05                    |        |		MOVE.B	D5,D7
00020fa8 be 03                    |        |		CMP.B	D3,D7
00020faa 6e 4e                    |nN      |		BGT	0x20ffa
00020fac 10 07                    |        |		MOVE.B	D7,D0
00020fae 48 80                    |H       |		EXTB.W	D0
00020fb0 20 4a                    | J      |		MOVEA.L	A2,A0
00020fb2 4a 30 00 16              |J0      |		TST.B	(A0+D0.W+#0x16)
00020fb6 66 3e                    |f>      |		BNE	0x20ff6
00020fb8 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020fba 10 07                    |        |		MOVE.B	D7,D0
00020fbc 48 80                    |H       |		EXTB.W	D0
00020fbe c1 c4                    |        |		MULS.W	D4,D0
00020fc0 12 05                    |        |		MOVE.B	D5,D1
00020fc2 48 81                    |H       |		EXTB.W	D1
00020fc4 c3 c4                    |        |		MULS.W	D4,D1
00020fc6 20 4a                    | J      |		MOVEA.L	A2,A0
00020fc8 14 06                    |        |		MOVE.B	D6,D2
00020fca 48 82                    |H       |		EXTB.W	D2
00020fcc 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020fd0 41 f0 20 00              |A       |		LEA.L	(A0+D2.W),A0
00020fd4 22 4a                    |"J      |		MOVEA.L	A2,A1
00020fd6 10 06                    |        |		MOVE.B	D6,D0
00020fd8 48 80                    |H       |		EXTB.W	D0
00020fda 43 f1 10 00              |C       |		LEA.L	(A1+D1.W),A1
00020fde 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
00020fe2 10 28 01 48              | ( H    |		MOVE.B	(A0+0x148),D0
00020fe6 b0 29 01 48              | ) H    |		CMP.B	(A1+0x148),D0
00020fea 67 02                    |g       |		BEQ	0x20fee
00020fec 60 10                    |`       |		BRA	0x20ffe
00020fee 52 06                    |R       |		ADDQ.B	#0x1,D6
00020ff0 0c 06 00 0e              |        |		CMPI.B	#0x0e,D6
00020ff4 6f c4                    |o       |		BLE	0x20fba
00020ff6 52 07                    |R       |		ADDQ.B	#0x1,D7
00020ff8 68 ae                    |h       |		BVC	0x20fa8
00020ffa 16 bc 00 01              |        |		MOVE.B	#0x01,(A3)
00020ffe 1d 53 00 08              | S      |		MOVE.B	(A3),(A6+0x8)
00021002 4c df 0f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3
00021006 4e 5e                    |N^      |		UNLK	A6
00021008 4e 75                    |Nu      |		RTS
0002100a ; --------------------------------------------------------------------------------------
0002100a ; OMSI PASCAL Function
0002100a ;    <LVAR  0x008 1(w)>
0002100a ;    <LVAR -0x004 1(rw)>
0002100a ; --------------------------------------------------------------------------------------
0002100a 4e 56 ff ac              |NV      |		LINK.W	A6,#0xffac
0002100e bf d5                    |        |		CMPA.L	(A5),A7
00021010 62 06                    |b       |		BHI	0x21018
00021012 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021016 4e 76                    |Nv      |		TRAPV
00021018 de fc 00 50              |   P    |		ADDA.W	#0x50,A7
0002101c 48 e7 ff f0              |H       |		MOVEM.L	A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021020 45 f9 00 02 1c 0e        |E       |		LEA.L	0x21c0e,A2
00021026 47 ee ff fc              |G       |		LEA.L	(A6-0x4),A3
0002102a 76 04                    |v       |		MOVEQ.L	#0x04,D3
0002102c 78 0f                    |x       |		MOVEQ.L	#0x0f,D4
0002102e 42 13                    |B       |		CLR.B	(A3)
00021030 7a 04                    |z       |		MOVEQ.L	#0x04,D5
00021032 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021034 10 07                    |        |		MOVE.B	D7,D0
00021036 48 80                    |H       |		EXTB.W	D0
00021038 20 4a                    | J      |		MOVEA.L	A2,A0
0002103a 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
0002103e 4a 28 02 86              |J(      |		TST.B	(A0+0x286)
00021042 66 04                    |f       |		BNE	0x21048
00021044 1a 07                    |        |		MOVE.B	D7,D5
00021046 60 08                    |`       |		BRA	0x21050
00021048 52 07                    |R       |		ADDQ.B	#0x1,D7
0002104a be 03                    |        |		CMP.B	D3,D7
0002104c 6f e6                    |o       |		BLE	0x21034
0002104e 60 66                    |`f      |		BRA	0x210b6
00021050 1e 05                    |        |		MOVE.B	D5,D7
00021052 be 03                    |        |		CMP.B	D3,D7
00021054 6e 5c                    |n\      |		BGT	0x210b2
00021056 10 07                    |        |		MOVE.B	D7,D0
00021058 48 80                    |H       |		EXTB.W	D0
0002105a 20 4a                    | J      |		MOVEA.L	A2,A0
0002105c 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00021060 4a 28 02 86              |J(      |		TST.B	(A0+0x286)
00021064 66 48                    |fH      |		BNE	0x210ae
00021066 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00021068 10 07                    |        |		MOVE.B	D7,D0
0002106a 48 80                    |H       |		EXTB.W	D0
0002106c c1 c4                    |        |		MULS.W	D4,D0
0002106e 20 4a                    | J      |		MOVEA.L	A2,A0
00021070 12 06                    |        |		MOVE.B	D6,D1
00021072 48 81                    |H       |		EXTB.W	D1
00021074 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00021078 10 05                    |        |		MOVE.B	D5,D0
0002107a 48 80                    |H       |		EXTB.W	D0
0002107c c1 c4                    |        |		MULS.W	D4,D0
0002107e 22 4a                    |"J      |		MOVEA.L	A2,A1
00021080 14 06                    |        |		MOVE.B	D6,D2
00021082 48 82                    |H       |		EXTB.W	D2
00021084 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
00021088 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
0002108c 43 f1 20 00              |C       |		LEA.L	(A1+D2.W),A1
00021090 10 28 01 f0              | (      |		MOVE.B	(A0+0x1f0),D0
00021094 b0 29 01 f0              | )      |		CMP.B	(A1+0x1f0),D0
00021098 66 0a                    |f       |		BNE	0x210a4
0002109a 10 28 02 3b              | ( ;    |		MOVE.B	(A0+0x23b),D0
0002109e b0 29 02 3b              | ) ;    |		CMP.B	(A1+0x23b),D0
000210a2 67 02                    |g       |		BEQ	0x210a6
000210a4 60 10                    |`       |		BRA	0x210b6
000210a6 52 06                    |R       |		ADDQ.B	#0x1,D6
000210a8 0c 06 00 0e              |        |		CMPI.B	#0x0e,D6
000210ac 6f ba                    |o       |		BLE	0x21068
000210ae 52 07                    |R       |		ADDQ.B	#0x1,D7
000210b0 68 a0                    |h       |		BVC	0x21052
000210b2 16 bc 00 01              |        |		MOVE.B	#0x01,(A3)
000210b6 1d 53 00 08              | S      |		MOVE.B	(A3),(A6+0x8)
000210ba 4c df 0f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3
000210be 4e 5e                    |N^      |		UNLK	A6
000210c0 4e 75                    |Nu      |		RTS
000210c2 ; --------------------------------------------------------------------------------------
000210c2 ; OMSI PASCAL Function
000210c2 ; --------------------------------------------------------------------------------------
000210c2 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
000210c6 bf d5                    |        |		CMPA.L	(A5),A7
000210c8 62 06                    |b       |		BHI	0x210d0
000210ca 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000210ce 4e 76                    |Nv      |		TRAPV
000210d0 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
000210d4 48 e7 98 c0              |H       |		MOVEM.L	A1+A0+D4+D3+D0,-(A7)
000210d8 41 f9 00 02 1c 16        |A       |		LEA.L	0x21c16,A0
000210de 43 f9 00 02 1c 1c        |C       |		LEA.L	0x21c1c,A1
000210e4 28 39 00 02 1d dc        |(9      |		MOVE.L	0x21ddc,D4
000210ea 76 0f                    |v       |		MOVEQ.L	#0x0f,D3
000210ec 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000210f2 b8 b9 00 02 1d d8        |        |		CMP.L	0x21dd8,D4
000210f8 66 1e                    |f       |		BNE	0x21118
000210fa 2f 3a f0 92              |/:      |		MOVE.L	0x2018e,-(A7)
000210fe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021100 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021104 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00021108 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
0002110c 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00021112 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021114 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
00021116 60 2a                    |`*      |		BRA	0x21142
00021118 55 4f                    |UO      |		SUBQ.L	#0x2,A7
0002111a 4e ba fe 48              |N  H    |		JSR	0x20f64
0002111e 4a 1f                    |J       |		TST.B	(A7)+
00021120 66 0e                    |f       |		BNE	0x21130
00021122 42 80                    |B       |		CLR.L	D0
00021124 10 10                    |        |		MOVE.B	(A0),D0
00021126 54 40                    |T@      |		ADDQ.W	#0x2,D0
00021128 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
0002112c 10 80                    |        |		MOVE.B	D0,(A0)
0002112e 60 14                    |`       |		BRA	0x21144
00021130 42 80                    |B       |		CLR.L	D0
00021132 10 10                    |        |		MOVE.B	(A0),D0
00021134 52 40                    |R@      |		ADDQ.W	#0x1,D0
00021136 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
0002113a 10 80                    |        |		MOVE.B	D0,(A0)
0002113c 48 51                    |HQ      |		PEA.L	(A1)
0002113e 4e ba fc 1c              |N       |		JSR	0x20d5c
00021142 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021144 4c df 03 19              |L       |		MOVEM.L	(A7)+,D0+D3+D4+A0+A1
00021148 4e 5e                    |N^      |		UNLK	A6
0002114a 4e 75                    |Nu      |		RTS
0002114c ; --------------------------------------------------------------------------------------
0002114c ; OMSI PASCAL Function
0002114c ; --------------------------------------------------------------------------------------
0002114c 4e 56 ff d4              |NV      |		LINK.W	A6,#0xffd4
00021150 bf d5                    |        |		CMPA.L	(A5),A7
00021152 62 06                    |b       |		BHI	0x2115a
00021154 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021158 4e 76                    |Nv      |		TRAPV
0002115a de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
0002115e 48 e7 98 c0              |H       |		MOVEM.L	A1+A0+D4+D3+D0,-(A7)
00021162 41 f9 00 02 1c 16        |A       |		LEA.L	0x21c16,A0
00021168 43 f9 00 02 1c 1c        |C       |		LEA.L	0x21c1c,A1
0002116e 28 39 00 02 1e b4        |(9      |		MOVE.L	0x21eb4,D4
00021174 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
00021176 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
0002117c b8 b9 00 02 1e b8        |        |		CMP.L	0x21eb8,D4
00021182 66 1e                    |f       |		BNE	0x211a2
00021184 2f 3a f0 0c              |/:      |		MOVE.L	0x20192,-(A7)
00021188 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002118a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002118e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00021192 3f 3c 00 04              |?<      |		MOVE.W	#0x4,-(A7)
00021196 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002119c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002119e 22 9f                    |"       |		MOVE.L	(A7)+,(A1)
000211a0 60 2a                    |`*      |		BRA	0x211cc
000211a2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
000211a4 4e ba fe 64              |N  d    |		JSR	0x2100a
000211a8 4a 1f                    |J       |		TST.B	(A7)+
000211aa 66 0e                    |f       |		BNE	0x211ba
000211ac 42 80                    |B       |		CLR.L	D0
000211ae 10 10                    |        |		MOVE.B	(A0),D0
000211b0 54 40                    |T@      |		ADDQ.W	#0x2,D0
000211b2 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
000211b6 10 80                    |        |		MOVE.B	D0,(A0)
000211b8 60 14                    |`       |		BRA	0x211ce
000211ba 42 80                    |B       |		CLR.L	D0
000211bc 10 10                    |        |		MOVE.B	(A0),D0
000211be 52 40                    |R@      |		ADDQ.W	#0x1,D0
000211c0 41 bc 00 ff              |A       |		CHK.W	#0xff,D0
000211c4 10 80                    |        |		MOVE.B	D0,(A0)
000211c6 48 51                    |HQ      |		PEA.L	(A1)
000211c8 4e ba fc a6              |N       |		JSR	0x20e70
000211cc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000211ce 4c df 03 19              |L       |		MOVEM.L	(A7)+,D0+D3+D4+A0+A1
000211d2 4e 5e                    |N^      |		UNLK	A6
000211d4 4e 75                    |Nu      |		RTS
000211d6 ; --------------------------------------------------------------------------------------
000211d6 ; OMSI PASCAL Function
000211d6 ; --------------------------------------------------------------------------------------
000211d6 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
000211da bf d5                    |        |		CMPA.L	(A5),A7
000211dc 62 06                    |b       |		BHI	0x211e4
000211de 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000211e2 4e 76                    |Nv      |		TRAPV
000211e4 de fc 00 46              |   F    |		ADDA.W	#0x46,A7
000211e8 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000211ec 45 f9 00 02 1c 16        |E       |		LEA.L	0x21c16,A2
000211f2 47 f9 00 02 1c 0e        |G       |		LEA.L	0x21c0e,A3
000211f8 49 f9 00 02 1e d8        |I       |		LEA.L	0x21ed8,A4
000211fe 24 3c 00 00 00 ff        |$<      |		MOVE.L	#0xff,D2
00021204 76 2a                    |v*      |		MOVEQ.L	#0x2a,D3
00021206 78 04                    |x       |		MOVEQ.L	#0x04,D4
00021208 7a 05                    |z       |		MOVEQ.L	#0x05,D5
0002120a 7c 01                    ||       |		MOVEQ.L	#0x01,D6
0002120c 20 39 00 02 1d dc        | 9      |		MOVE.L	0x21ddc,D0
00021212 b0 85                    |        |		CMP.L	D5,D0
00021214 62 00 01 a6              |b       |		BHI	switch@0x2121a[0x2]
00021218 d0 40                    | @      |		ADD.W	D0,D0
0002121a 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00021222 00 8a                    |        |		.CONST	0x8a			; [0x0] -> 0x212ac
00021224 00 16                    |        |		.CONST	0x16			; [0x1] -> 0x21238
00021226 01 9a                    |        |		.CONST	0x19a			; [0x2] -> 0x213bc
00021228 01 9a                    |        |		.CONST	0x19a			; [0x3] -> 0x213bc
0002122a 01 9a                    |        |		.CONST	0x19a			; [0x4] -> 0x213bc
0002122c 00 0c                    |        |		.CONST	0xc			; [0x5] -> 0x2122e
0002122e					switch@0x2121a[0x5]:
0002122e 14 bc 00 02              |        |		MOVE.B	#0x02,(A2)
00021232 18 85                    |        |		MOVE.B	D5,(A4)
00021234 60 00 01 e8              |`       |		BRA	0x2141e
00021238					switch@0x2121a[0x1]:
00021238 14 bc 00 08              |        |		MOVE.B	#0x08,(A2)
0002123c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002123e 10 07                    |        |		MOVE.B	D7,D0
00021240 48 80                    |H       |		EXTB.W	D0
00021242 20 4b                    | K      |		MOVEA.L	A3,A0
00021244 4a 30 00 16              |J0      |		TST.B	(A0+D0.W+#0x16)
00021248 66 26                    |f&      |		BNE	0x21270
0002124a 10 07                    |        |		MOVE.B	D7,D0
0002124c 48 80                    |H       |		EXTB.W	D0
0002124e 32 00                    |2       |		MOVE.W	D0,D1
00021250 e5 41                    | A      |		ASL.W	#0x2,D1
00021252 20 4b                    | K      |		MOVEA.L	A3,A0
00021254 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00021258 22 28 02 ae              |"(      |		MOVE.L	(A0+0x2ae),D1
0002125c b2 82                    |        |		CMP.L	D2,D1
0002125e 63 02                    |c       |		BLS	0x21262
00021260 4e 4f                    |NO      |		TRAP	#15
00021262 18 81                    |        |		MOVE.B	D1,(A4)
00021264 4a 40                    |J@      |		TST.W	D0
00021266 67 06                    |g       |		BEQ	0x2126e
00021268 13 c3 00 02 1e d9        |        |		MOVE.B	D3,0x21ed9
0002126e 60 06                    |`       |		BRA	0x21276
00021270 52 07                    |R       |		ADDQ.B	#0x1,D7
00021272 be 04                    |        |		CMP.B	D4,D7
00021274 6f c8                    |o       |		BLE	0x2123e
00021276 20 39 00 02 1d d8        | 9      |		MOVE.L	0x21dd8,D0
0002127c b0 86                    |        |		CMP.L	D6,D0
0002127e 66 0a                    |f       |		BNE	0x2128a
00021280 42 80                    |B       |		CLR.L	D0
00021282 10 12                    |        |		MOVE.B	(A2),D0
00021284 54 40                    |T@      |		ADDQ.W	#0x2,D0
00021286 41 82                    |A       |		CHK.W	D2,D0
00021288 60 10                    |`       |		BRA	0x2129a
0002128a 0c 80 00 00 00 0f        |        |		CMPI.L	#0x0000000f,D0
00021290 67 16                    |g       |		BEQ	0x212a8
00021292 42 80                    |B       |		CLR.L	D0
00021294 10 12                    |        |		MOVE.B	(A2),D0
00021296 52 40                    |R@      |		ADDQ.W	#0x1,D0
00021298 41 82                    |A       |		CHK.W	D2,D0
0002129a 14 80                    |        |		MOVE.B	D0,(A2)
0002129c 48 79 00 02 1c 1c        |Hy      |		PEA.L	0x21c1c
000212a2 4e ba fa b8              |N       |		JSR	0x20d5c
000212a6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000212a8 60 00 01 78              |`  x    |		BRA	0x21422
000212ac					switch@0x2121a[0x0]:
000212ac 20 39 00 02 1e b4        | 9      |		MOVE.L	0x21eb4,D0
000212b2 b0 85                    |        |		CMP.L	D5,D0
000212b4 62 00 00 9c              |b       |		BHI	switch@0x212ba[0x2]
000212b8 d0 40                    | @      |		ADD.W	D0,D0
000212ba 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
000212c2 00 0c                    |        |		.CONST	0xc			; [0x0] -> 0x212ce
000212c4 00 1a                    |        |		.CONST	0x1a			; [0x1] -> 0x212dc
000212c6 00 90                    |        |		.CONST	0x90			; [0x2] -> 0x21352
000212c8 00 90                    |        |		.CONST	0x90			; [0x3] -> 0x21352
000212ca 00 90                    |        |		.CONST	0x90			; [0x4] -> 0x21352
000212cc 00 12                    |        |		.CONST	0x12			; [0x5] -> 0x212d4
000212ce					switch@0x212ba[0x0]:
000212ce 42 12                    |B       |		CLR.B	(A2)
000212d0 60 00 00 e8              |`       |		BRA	0x213ba
000212d4					switch@0x212ba[0x5]:
000212d4 14 bc 00 0e              |        |		MOVE.B	#0x0e,(A2)
000212d8 60 00 00 d2              |`       |		BRA	0x213ac
000212dc					switch@0x212ba[0x1]:
000212dc 14 bc 00 14              |        |		MOVE.B	#0x14,(A2)
000212e0 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000212e2 10 07                    |        |		MOVE.B	D7,D0
000212e4 48 80                    |H       |		EXTB.W	D0
000212e6 20 4b                    | K      |		MOVEA.L	A3,A0
000212e8 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
000212ec 4a 28 02 86              |J(      |		TST.B	(A0+0x286)
000212f0 66 26                    |f&      |		BNE	0x21318
000212f2 10 07                    |        |		MOVE.B	D7,D0
000212f4 48 80                    |H       |		EXTB.W	D0
000212f6 32 00                    |2       |		MOVE.W	D0,D1
000212f8 e5 41                    | A      |		ASL.W	#0x2,D1
000212fa 20 4b                    | K      |		MOVEA.L	A3,A0
000212fc 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00021300 22 28 02 ae              |"(      |		MOVE.L	(A0+0x2ae),D1
00021304 b2 82                    |        |		CMP.L	D2,D1
00021306 63 02                    |c       |		BLS	0x2130a
00021308 4e 4f                    |NO      |		TRAP	#15
0002130a 18 81                    |        |		MOVE.B	D1,(A4)
0002130c 4a 40                    |J@      |		TST.W	D0
0002130e 67 06                    |g       |		BEQ	0x21316
00021310 13 c3 00 02 1e d9        |        |		MOVE.B	D3,0x21ed9
00021316 60 06                    |`       |		BRA	0x2131e
00021318 52 07                    |R       |		ADDQ.B	#0x1,D7
0002131a be 04                    |        |		CMP.B	D4,D7
0002131c 6f c4                    |o       |		BLE	0x212e2
0002131e 20 39 00 02 1e b8        | 9      |		MOVE.L	0x21eb8,D0
00021324 b0 86                    |        |		CMP.L	D6,D0
00021326 66 0a                    |f       |		BNE	0x21332
00021328 42 80                    |B       |		CLR.L	D0
0002132a 10 12                    |        |		MOVE.B	(A2),D0
0002132c 54 40                    |T@      |		ADDQ.W	#0x2,D0
0002132e 41 82                    |A       |		CHK.W	D2,D0
00021330 60 10                    |`       |		BRA	0x21342
00021332 0c 80 00 00 00 1e        |        |		CMPI.L	#0x0000001e,D0
00021338 67 16                    |g       |		BEQ	0x21350
0002133a 42 80                    |B       |		CLR.L	D0
0002133c 10 12                    |        |		MOVE.B	(A2),D0
0002133e 52 40                    |R@      |		ADDQ.W	#0x1,D0
00021340 41 82                    |A       |		CHK.W	D2,D0
00021342 14 80                    |        |		MOVE.B	D0,(A2)
00021344 48 79 00 02 1c 1c        |Hy      |		PEA.L	0x21c1c
0002134a 4e ba fb 24              |N  $    |		JSR	0x20e70
0002134e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021350 60 68                    |`h      |		BRA	0x213ba
00021352					switch@0x212ba[0x2]:
00021352					switch@0x212ba[0x3]:
00021352					switch@0x212ba[0x4]:
00021352 14 bc 00 11              |        |		MOVE.B	#0x11,(A2)
00021356 20 39 00 02 1e b4        | 9      |		MOVE.L	0x21eb4,D0
0002135c b0 84                    |        |		CMP.L	D4,D0
0002135e 66 08                    |f       |		BNE	0x21368
00021360 4a 39 00 02 1e 94        |J9      |		TST.B	0x21e94
00021366 66 44                    |fD      |		BNE	0x213ac
00021368 42 80                    |B       |		CLR.L	D0
0002136a 10 12                    |        |		MOVE.B	(A2),D0
0002136c 5c 40                    |\@      |		ADDQ.W	#0x6,D0
0002136e 41 82                    |A       |		CHK.W	D2,D0
00021370 14 80                    |        |		MOVE.B	D0,(A2)
00021372 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021374 10 07                    |        |		MOVE.B	D7,D0
00021376 48 80                    |H       |		EXTB.W	D0
00021378 20 4b                    | K      |		MOVEA.L	A3,A0
0002137a 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
0002137e 4a 28 02 86              |J(      |		TST.B	(A0+0x286)
00021382 66 1a                    |f       |		BNE	0x2139e
00021384 10 07                    |        |		MOVE.B	D7,D0
00021386 48 80                    |H       |		EXTB.W	D0
00021388 e5 40                    | @      |		ASL.W	#0x2,D0
0002138a 22 4b                    |"K      |		MOVEA.L	A3,A1
0002138c 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
00021390 20 29 02 ae              | )      |		MOVE.L	(A1+0x2ae),D0
00021394 b0 82                    |        |		CMP.L	D2,D0
00021396 63 02                    |c       |		BLS	0x2139a
00021398 4e 4f                    |NO      |		TRAP	#15
0002139a 11 40 02 ca              | @      |		MOVE.B	D0,(A0+0x2ca)
0002139e 52 07                    |R       |		ADDQ.B	#0x1,D7
000213a0 be 04                    |        |		CMP.B	D4,D7
000213a2 6f d0                    |o       |		BLE	0x21374
000213a4 13 c3 00 02 1e de        |        |		MOVE.B	D3,0x21ede
000213aa 60 0a                    |`       |		BRA	0x213b6
000213ac 18 bc 00 29              |   )    |		MOVE.B	#0x29,(A4)
000213b0 13 c3 00 02 1e d9        |        |		MOVE.B	D3,0x21ed9
000213b6 4e ba fd 94              |N       |		JSR	0x2114c
000213ba 60 66                    |`f      |		BRA	0x21422
000213bc					switch@0x2121a[0x2]:
000213bc					switch@0x2121a[0x3]:
000213bc					switch@0x2121a[0x4]:
000213bc 14 85                    |        |		MOVE.B	D5,(A2)
000213be 20 39 00 02 1d dc        | 9      |		MOVE.L	0x21ddc,D0
000213c4 b0 84                    |        |		CMP.L	D4,D0
000213c6 66 08                    |f       |		BNE	0x213d0
000213c8 4a 39 00 02 1c 24        |J9   $  |		TST.B	0x21c24
000213ce 66 44                    |fD      |		BNE	0x21414
000213d0 42 80                    |B       |		CLR.L	D0
000213d2 10 12                    |        |		MOVE.B	(A2),D0
000213d4 5c 40                    |\@      |		ADDQ.W	#0x6,D0
000213d6 41 82                    |A       |		CHK.W	D2,D0
000213d8 14 80                    |        |		MOVE.B	D0,(A2)
000213da 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000213dc 10 07                    |        |		MOVE.B	D7,D0
000213de 48 80                    |H       |		EXTB.W	D0
000213e0 20 4b                    | K      |		MOVEA.L	A3,A0
000213e2 4a 30 00 16              |J0      |		TST.B	(A0+D0.W+#0x16)
000213e6 66 1e                    |f       |		BNE	0x21406
000213e8 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
000213ec 10 07                    |        |		MOVE.B	D7,D0
000213ee 48 80                    |H       |		EXTB.W	D0
000213f0 e5 40                    | @      |		ASL.W	#0x2,D0
000213f2 22 4b                    |"K      |		MOVEA.L	A3,A1
000213f4 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
000213f8 20 29 02 ae              | )      |		MOVE.L	(A1+0x2ae),D0
000213fc b0 82                    |        |		CMP.L	D2,D0
000213fe 63 02                    |c       |		BLS	0x21402
00021400 4e 4f                    |NO      |		TRAP	#15
00021402 11 40 02 ca              | @      |		MOVE.B	D0,(A0+0x2ca)
00021406 52 07                    |R       |		ADDQ.B	#0x1,D7
00021408 be 04                    |        |		CMP.B	D4,D7
0002140a 6f d0                    |o       |		BLE	0x213dc
0002140c 13 c3 00 02 1e de        |        |		MOVE.B	D3,0x21ede
00021412 60 0a                    |`       |		BRA	0x2141e
00021414 18 bc 00 29              |   )    |		MOVE.B	#0x29,(A4)
00021418 13 c3 00 02 1e d9        |        |		MOVE.B	D3,0x21ed9
0002141e 4e ba fc a2              |N       |		JSR	0x210c2
00021422 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021426 4e 5e                    |N^      |		UNLK	A6
00021428 4e 75                    |Nu      |		RTS
0002142a ; --------------------------------------------------------------------------------------
0002142a ; OMSI PASCAL Function
0002142a ; --------------------------------------------------------------------------------------
0002142a					START:
0002142a 4f fa 00 08              |O       |		LEA.L	MAIN,A7
0002142e 4e f9 00 01 02 80        |N       |		JMP	?start_program
00021434					MAIN:
00021434 45 f9 00 02 1c 0e        |E       |		LEA.L	0x21c0e,A2
0002143a 47 f9 00 02 1c 16        |G       |		LEA.L	0x21c16,A3
00021440 49 f9 00 02 1c 21        |I    !  |		LEA.L	0x21c21,A4
00021446 76 01                    |v       |		MOVEQ.L	#0x01,D3
00021448 78 04                    |x       |		MOVEQ.L	#0x04,D4
0002144a 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
0002144c 7c 07                    ||       |		MOVEQ.L	#0x07,D6
0002144e 7e 06                    |~       |		MOVEQ.L	#0x06,D7
00021450 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
00021456 48 79 00 02 1c 20        |Hy      |		PEA.L	0x21c20
0002145c 48 54                    |HT      |		PEA.L	(A4)
0002145e 4e b9 00 01 05 44        |N    D  |		JSR	IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
00021464 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021466 48 78 00 0f              |Hx      |		PEA.L	0xf
0002146a 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00021470 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021472 1e 94                    |        |		MOVE.B	(A4),(A7)
00021474 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
0002147a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002147c 42 13                    |B       |		CLR.B	(A3)
0002147e 70 00                    |p       |		MOVEQ.L	#0x00,D0
00021480 23 c0 00 02 1e e0        |#       |		MOVE.L	D0,0x21ee0
00021486 b0 86                    |        |		CMP.L	D6,D0
00021488 63 02                    |c       |		BLS	0x2148c
0002148a 4e 4f                    |NO      |		TRAP	#15
0002148c 20 4a                    | J      |		MOVEA.L	A2,A0
0002148e 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
00021492 42 28 02 ca              |B(      |		CLR.B	(A0+0x2ca)
00021496 52 80                    |R       |		ADDQ.L	#0x1,D0
00021498 b0 86                    |        |		CMP.L	D6,D0
0002149a 6f e4                    |o       |		BLE	0x21480
0002149c 3f 3a ec fc              |?:      |		MOVE.W	0x2019a,-(A7)
000214a0 3f 3a ec f6              |?:      |		MOVE.W	0x20198,-(A7)
000214a4 3f 3a ec f0              |?:      |		MOVE.W	0x20196,-(A7)
000214a8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000214aa 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000214ae 3f 03                    |?       |		MOVE.W	D3,-(A7)
000214b0 3f 07                    |?       |		MOVE.W	D7,-(A7)
000214b2 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000214b8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000214ba 23 df 00 02 1c 18        |#       |		MOVE.L	(A7)+,0x21c18
000214c0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000214c2 2e ba ec d8              |.       |		MOVE.L	0x2019c,(A7)
000214c6 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000214c8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000214cc 3f 03                    |?       |		MOVE.W	D3,-(A7)
000214ce 3f 04                    |?       |		MOVE.W	D4,-(A7)
000214d0 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000214d6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000214d8 23 df 00 02 1c 1c        |#       |		MOVE.L	(A7)+,0x21c1c
000214de 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000214e0 23 fc 00 00 00 05 00 02  |#       |		MOVE.L	#0x5,0x21ebc
000214e8 1e bc                    |        |
000214ea 23 fc 00 00 00 02 00 02  |#       |		MOVE.L	#0x2,0x21ec0
000214f2 1e c0                    |        |
000214f4 23 fc 00 00 00 03 00 02  |#       |		MOVE.L	#0x3,0x21ec4
000214fc 1e c4                    |        |
000214fe 23 c4 00 02 1e c8        |#       |		MOVE.L	D4,0x21ec8
00021504 23 c7 00 02 1e cc        |#       |		MOVE.L	D7,0x21ecc
0002150a 42 b9 00 02 1d d8        |B       |		CLR.L	0x21dd8
00021510 42 b9 00 02 1d dc        |B       |		CLR.L	0x21ddc
00021516 42 b9 00 02 1e b8        |B       |		CLR.L	0x21eb8
0002151c 42 b9 00 02 1e b4        |B       |		CLR.L	0x21eb4
00021522 70 00                    |p       |		MOVEQ.L	#0x00,D0
00021524 13 c0 00 02 1c 23        |     #  |		MOVE.B	D0,0x21c23
0002152a 12 00                    |        |		MOVE.B	D0,D1
0002152c 48 81                    |H       |		EXTB.W	D1
0002152e 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021530 20 4a                    | J      |		MOVEA.L	A2,A0
00021532 11 83 10 16              |        |		MOVE.B	D3,(A0+D1.W+#0x16)
00021536 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
0002153a 11 43 02 86              | C      |		MOVE.B	D3,(A0+0x286)
0002153e 30 01                    |0       |		MOVE.W	D1,D0
00021540 e5 40                    | @      |		ASL.W	#0x2,D0
00021542 22 4a                    |"J      |		MOVEA.L	A2,A1
00021544 43 f1 00 00              |C       |		LEA.L	(A1+D0.W),A1
00021548 42 a9 01 b6              |B       |		CLR.L	(A1+0x1b6)
0002154c 42 a9 02 8c              |B       |		CLR.L	(A1+0x28c)
00021550 42 28 01 93              |B(      |		CLR.B	(A0+0x193)
00021554 70 00                    |p       |		MOVEQ.L	#0x00,D0
00021556 13 c0 00 02 1e d2        |        |		MOVE.B	D0,0x21ed2
0002155c 32 17                    |2       |		MOVE.W	(A7),D1
0002155e c3 fc 00 3c              |   <    |		MULS.W	#0x3c,D1
00021562 20 4a                    | J      |		MOVEA.L	A2,A0
00021564 14 00                    |        |		MOVE.B	D0,D2
00021566 48 82                    |H       |		EXTB.W	D2
00021568 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002156a 30 02                    |0       |		MOVE.W	D2,D0
0002156c e5 40                    | @      |		ASL.W	#0x2,D0
0002156e 41 f0 10 00              |A       |		LEA.L	(A0+D1.W),A0
00021572 42 b0 00 1c              |B       |		CLR.L	(A0+D0.W+#0x1c)
00021576 30 2f 00 02              |0/      |		MOVE.W	(A7+0x2),D0
0002157a c1 fc 00 0f              |        |		MULS.W	#0xf,D0
0002157e 20 4a                    | J      |		MOVEA.L	A2,A0
00021580 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00021584 41 f0 20 00              |A       |		LEA.L	(A0+D2.W),A0
00021588 11 43 01 48              | C H    |		MOVE.B	D3,(A0+0x148)
0002158c 30 1f                    |0       |		MOVE.W	(A7)+,D0
0002158e 52 40                    |R@      |		ADDQ.W	#0x1,D0
00021590 b0 45                    | E      |		CMP.W	D5,D0
00021592 6f c2                    |o       |		BLE	0x21556
00021594 30 1f                    |0       |		MOVE.W	(A7)+,D0
00021596 52 40                    |R@      |		ADDQ.W	#0x1,D0
00021598 b0 44                    | D      |		CMP.W	D4,D0
0002159a 6f 88                    |o       |		BLE	0x21524
0002159c 4e ba ef da              |N       |		JSR	0x20578
000215a0 4e ba f0 88              |N       |		JSR	0x2062a
000215a4 70 00                    |p       |		MOVEQ.L	#0x00,D0
000215a6 13 c0 00 02 1e d2        |        |		MOVE.B	D0,0x21ed2
000215ac 1f 00                    |        |		MOVE.B	D0,-(A7)
000215ae 4e ba f1 26              |N  &    |		JSR	0x206d6
000215b2 1e 83                    |        |		MOVE.B	D3,(A7)
000215b4 4e ba f1 f8              |N       |		JSR	0x207ae
000215b8 1e 80                    |        |		MOVE.B	D0,(A7)
000215ba 48 79 00 02 1c 2a        |Hy   *  |		PEA.L	0x21c2a
000215c0 4e ba f2 7e              |N  ~    |		JSR	0x20840
000215c4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000215c6 1e 83                    |        |		MOVE.B	D3,(A7)
000215c8 1f 00                    |        |		MOVE.B	D0,-(A7)
000215ca 48 79 00 02 1d fe        |Hy      |		PEA.L	0x21dfe
000215d0 4e ba f3 36              |N  6    |		JSR	0x20908
000215d4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000215d6 52 00                    |R       |		ADDQ.B	#0x1,D0
000215d8 b0 05                    |        |		CMP.B	D5,D0
000215da 6f ca                    |o       |		BLE	0x215a6
000215dc 70 00                    |p       |		MOVEQ.L	#0x00,D0
000215de 13 c0 00 02 1e d2        |        |		MOVE.B	D0,0x21ed2
000215e4 1f 00                    |        |		MOVE.B	D0,-(A7)
000215e6 4e ba f0 ee              |N       |		JSR	0x206d6
000215ea 42 17                    |B       |		CLR.B	(A7)
000215ec 4e ba f1 c0              |N       |		JSR	0x207ae
000215f0 42 17                    |B       |		CLR.B	(A7)
000215f2 1f 00                    |        |		MOVE.B	D0,-(A7)
000215f4 48 79 00 02 1e 49        |Hy   I  |		PEA.L	0x21e49
000215fa 4e ba f3 0c              |N       |		JSR	0x20908
000215fe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021600 52 00                    |R       |		ADDQ.B	#0x1,D0
00021602 b0 05                    |        |		CMP.B	D5,D0
00021604 6f d8                    |o       |		BLE	0x215de
00021606 48 79 00 02 1c 2a        |Hy   *  |		PEA.L	0x21c2a
0002160c 4e ba f5 a6              |N       |		JSR	0x20bb4
00021610 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021612 4e ba fb c2              |N       |		JSR	0x211d6
00021616 4e ba ee d6              |N       |		JSR	0x204ee
0002161a 42 27                    |B'      |		CLR.B	-(A7)
0002161c 4a 13                    |J       |		TST.B	(A3)
0002161e 66 02                    |f       |		BNE	0x21622
00021620 52 17                    |R       |		ADDQ.B	#0x1,(A7)
00021622 2f 39 00 02 1c 18        |/9      |		MOVE.L	0x21c18,-(A7)
00021628 2f 39 00 02 1c 1c        |/9      |		MOVE.L	0x21c1c,-(A7)
0002162e 1f 13                    |        |		MOVE.B	(A3),-(A7)
00021630 2f 39 00 02 1e dc        |/9      |		MOVE.L	0x21edc,-(A7)
00021636 2f 39 00 02 1e d8        |/9      |		MOVE.L	0x21ed8,-(A7)
0002163c 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00021642 de fc 00 14              |        |		ADDA.W	#0x14,A7
00021646 4e b9 00 01 02 84        |N       |		JSR	?exit
0002164c					exp_ZERO_WCS.FIU(Sw_1):
0002164c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021652 00 0a                    |        |		.CONST	0x000a			; Stack-delta
00021654 0c 5a 45 52 4f 5f 57 43  | ZERO_WC|		.TXT	12,'ZERO_WCS.FIU'
00021661 00                       |        |		.CONST	0x0
00021662 03                       |        |		.CONST	0x3			; DIPROC address
00021663 00                       |        |		.CONST	0x0			; Output Parameters
00021664 01                       |        |		.CONST	0x1			; Input Parameters
00021665 00                       |        |		.CONST	0x0			; In arg [1]
00021666					exp_STEP_MACHINE.FIU():
00021666 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002166c 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002166e 10 53 54 45 50 5f 4d 41  | STEP_MA|		.TXT	16,'STEP_MACHINE.FIU'
0002167f 00                       |        |		.CONST	0x0
00021680 03                       |        |		.CONST	0x3			; DIPROC address
00021681 00                       |        |		.CONST	0x0			; Output Parameters
00021682 00                       |        |		.CONST	0x0			; Input Parameters
00021683 00                       |        |		.PAD	0x0
00021684					exp_READ_UIR.FIU(Sw_1, &Sr_6):
00021684 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002168a 00 0e                    |        |		.CONST	0x000e			; Stack-delta
0002168c 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.FIU'
00021699 00                       |        |		.CONST	0x0
0002169a 03                       |        |		.CONST	0x3			; DIPROC address
0002169b 01                       |        |		.CONST	0x1			; Output Parameters
0002169c 01                       |        |		.CONST	0x1			; Input Parameters
0002169d 00                       |        |		.CONST	0x0			; In arg [1]
0002169e 05                       |        |		.CONST	0x5			; Out arg [6]
0002169f 00                       |        |		.PAD	0x0
000216a0					exp_READ_PAREG.FIU(Sw_1, &Sr_1):
000216a0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216a6 00 0e                    |        |		.CONST	0x000e			; Stack-delta
000216a8 0e 52 45 41 44 5f 50 41  | READ_PA|		.TXT	14,'READ_PAREG.FIU'
000216b7 00                       |        |		.CONST	0x0
000216b8 03                       |        |		.CONST	0x3			; DIPROC address
000216b9 01                       |        |		.CONST	0x1			; Output Parameters
000216ba 01                       |        |		.CONST	0x1			; Input Parameters
000216bb 00                       |        |		.CONST	0x0			; In arg [1]
000216bc 00                       |        |		.CONST	0x0			; Out arg [1]
000216bd 00                       |        |		.PAD	0x0
000216be					exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
000216be 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216c4 00 20                    |        |		.CONST	0x0020			; Stack-delta
000216c6 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.FIU'
000216db 00                       |        |		.CONST	0x0
000216dc 03                       |        |		.CONST	0x3			; DIPROC address
000216dd 06                       |        |		.CONST	0x6			; Output Parameters
000216de 00                       |        |		.CONST	0x0			; Input Parameters
000216df 00                       |        |		.CONST	0x0			; Out arg [1]
000216e0 01                       |        |		.CONST	0x1			; Out arg [2]
000216e1 00                       |        |		.CONST	0x0			; Out arg [1]
000216e2 00                       |        |		.CONST	0x0			; Out arg [1]
000216e3 01                       |        |		.CONST	0x1			; Out arg [2]
000216e4 08                       |        |		.CONST	0x8			; Out arg flag
000216e5 00                       |        |		.PAD	0x0
000216e6					exp_PREP_RUN.FIU(Sw_2):
000216e6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216ec 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000216ee 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.FIU'
000216fb 00                       |        |		.CONST	0x0
000216fc 03                       |        |		.CONST	0x3			; DIPROC address
000216fd 00                       |        |		.CONST	0x0			; Output Parameters
000216fe 01                       |        |		.CONST	0x1			; Input Parameters
000216ff 01                       |        |		.CONST	0x1			; In arg [2]
00021700					exp_MF.FIU():
00021700 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021706 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021708 06 4d 46 2e 46 49 55     | MF.FIU |		.TXT	6,'MF.FIU'
0002170f 00                       |        |		.CONST	0x0
00021710 03                       |        |		.CONST	0x3			; DIPROC address
00021711 00                       |        |		.CONST	0x0			; Output Parameters
00021712 00                       |        |		.CONST	0x0			; Input Parameters
00021713 00                       |        |		.PAD	0x0
00021714					exp_LOAD_WCS_TEST_PATTERN.FIU():
00021714 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002171a 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002171c 19 4c 4f 41 44 5f 57 43  | LOAD_WC|		.TXT	25,'LOAD_WCS_TEST_PATTERN.FIU'
00021736 00                       |        |		.CONST	0x0
00021737 03                       |        |		.CONST	0x3			; DIPROC address
00021738 00                       |        |		.CONST	0x0			; Output Parameters
00021739 00                       |        |		.CONST	0x0			; Input Parameters
0002173a					exp_LOAD_UIR.FIU(Sw_6, Sw_1):
0002173a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021740 00 10                    |        |		.CONST	0x0010			; Stack-delta
00021742 0c 4c 4f 41 44 5f 55 49  | LOAD_UI|		.TXT	12,'LOAD_UIR.FIU'
0002174f 00                       |        |		.CONST	0x0
00021750 03                       |        |		.CONST	0x3			; DIPROC address
00021751 00                       |        |		.CONST	0x0			; Output Parameters
00021752 02                       |        |		.CONST	0x2			; Input Parameters
00021753 05                       |        |		.CONST	0x5			; In arg [6]
00021754 00                       |        |		.CONST	0x0			; In arg [1]
00021755 00                       |        |		.PAD	0x0
00021756					exp_FREEZE_BOARDS.FIU(Sw_2):
00021756 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002175c 00 0a                    |        |		.CONST	0x000a			; Stack-delta
0002175e 11 46 52 45 45 5a 45 5f  | FREEZE_|		.TXT	17,'FREEZE_BOARDS.FIU'
00021770 00                       |        |		.CONST	0x0
00021771 03                       |        |		.CONST	0x3			; DIPROC address
00021772 00                       |        |		.CONST	0x0			; Output Parameters
00021773 01                       |        |		.CONST	0x1			; Input Parameters
00021774 01                       |        |		.CONST	0x1			; In arg [2]
00021775 00                       |        |		.PAD	0x0
00021776					exp_CLEAR_PARITY.FIU():
00021776 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002177c 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002177e 10 43 4c 45 41 52 5f 50  | CLEAR_P|		.TXT	16,'CLEAR_PARITY.FIU'
0002178f 00                       |        |		.CONST	0x0
00021790 03                       |        |		.CONST	0x3			; DIPROC address
00021791 00                       |        |		.CONST	0x0			; Output Parameters
00021792 00                       |        |		.CONST	0x0			; Input Parameters
00021793 00                       |        |		.PAD	0x0
00021794					exp_ZERO_WCS.SEQ():
00021794 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002179a 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002179c 0c 5a 45 52 4f 5f 57 43  | ZERO_WC|		.TXT	12,'ZERO_WCS.SEQ'
000217a9 00                       |        |		.CONST	0x0
000217aa 02                       |        |		.CONST	0x2			; DIPROC address
000217ab 00                       |        |		.CONST	0x0			; Output Parameters
000217ac 00                       |        |		.CONST	0x0			; Input Parameters
000217ad 00                       |        |		.PAD	0x0
000217ae					exp_READ_UIR.SEQ(&Sr_6):
000217ae 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000217b4 00 0c                    |        |		.CONST	0x000c			; Stack-delta
000217b6 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.SEQ'
000217c3 00                       |        |		.CONST	0x0
000217c4 02                       |        |		.CONST	0x2			; DIPROC address
000217c5 01                       |        |		.CONST	0x1			; Output Parameters
000217c6 00                       |        |		.CONST	0x0			; Input Parameters
000217c7 05                       |        |		.CONST	0x5			; Out arg [6]
000217c8					exp_RUN_NOCHECK.SEQ():
000217c8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000217ce 00 08                    |        |		.CONST	0x0008			; Stack-delta
000217d0 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.SEQ'
000217e0 00                       |        |		.CONST	0x0
000217e1 02                       |        |		.CONST	0x2			; DIPROC address
000217e2 00                       |        |		.CONST	0x0			; Output Parameters
000217e3 00                       |        |		.CONST	0x0			; Input Parameters
000217e4					exp_READ_MISC.SEQ(&Sr_2_2_1_1_3):
000217e4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000217ea 00 0c                    |        |		.CONST	0x000c			; Stack-delta
000217ec 0d 52 45 41 44 5f 4d 49  | READ_MI|		.TXT	13,'READ_MISC.SEQ'
000217fa 00                       |        |		.CONST	0x0
000217fb 02                       |        |		.CONST	0x2			; DIPROC address
000217fc 01                       |        |		.CONST	0x1			; Output Parameters
000217fd 00                       |        |		.CONST	0x0			; Input Parameters
000217fe 0e                       |        |		.CONST	0xe			; Out arg [2, 2, 1, 1, 3]
000217ff 00                       |        |		.PAD	0x0
00021800					exp_RESET.SEQ():
00021800 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021806 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021808 09 52 45 53 45 54 2e 53  | RESET.S|		.TXT	9,'RESET.SEQ'
00021812 00                       |        |		.CONST	0x0
00021813 02                       |        |		.CONST	0x2			; DIPROC address
00021814 00                       |        |		.CONST	0x0			; Output Parameters
00021815 00                       |        |		.CONST	0x0			; Input Parameters
00021816					exp_RUN_BAD_UADR_PARITY.SEQ():
00021816 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002181c 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002181e 17 52 55 4e 5f 42 41 44  | RUN_BAD|		.TXT	23,'RUN_BAD_UADR_PARITY.SEQ'
00021836 00                       |        |		.CONST	0x0
00021837 02                       |        |		.CONST	0x2			; DIPROC address
00021838 00                       |        |		.CONST	0x0			; Output Parameters
00021839 00                       |        |		.CONST	0x0			; Input Parameters
0002183a					exp_PREP_RUN.SEQ(Sw_2):
0002183a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021840 00 0a                    |        |		.CONST	0x000a			; Stack-delta
00021842 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.SEQ'
0002184f 00                       |        |		.CONST	0x0
00021850 02                       |        |		.CONST	0x2			; DIPROC address
00021851 00                       |        |		.CONST	0x0			; Output Parameters
00021852 01                       |        |		.CONST	0x1			; Input Parameters
00021853 01                       |        |		.CONST	0x1			; In arg [2]
00021854					exp_LOAD_UIR.SEQ(Sw_6):
00021854 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002185a 00 0e                    |        |		.CONST	0x000e			; Stack-delta
0002185c 0c 4c 4f 41 44 5f 55 49  | LOAD_UI|		.TXT	12,'LOAD_UIR.SEQ'
00021869 00                       |        |		.CONST	0x0
0002186a 02                       |        |		.CONST	0x2			; DIPROC address
0002186b 00                       |        |		.CONST	0x0			; Output Parameters
0002186c 01                       |        |		.CONST	0x1			; Input Parameters
0002186d 05                       |        |		.CONST	0x5			; In arg [6]
0002186e					exp_INIT_WCS_TEST_PATTERN.SEQ():
0002186e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021874 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021876 19 49 4e 49 54 5f 57 43  | INIT_WC|		.TXT	25,'INIT_WCS_TEST_PATTERN.SEQ'
00021890 00                       |        |		.CONST	0x0
00021891 02                       |        |		.CONST	0x2			; DIPROC address
00021892 00                       |        |		.CONST	0x0			; Output Parameters
00021893 00                       |        |		.CONST	0x0			; Input Parameters
00021894					exp_CLEAR_PARITY.SEQ():
00021894 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002189a 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002189c 10 43 4c 45 41 52 5f 50  | CLEAR_P|		.TXT	16,'CLEAR_PARITY.SEQ'
000218ad 00                       |        |		.CONST	0x0
000218ae 02                       |        |		.CONST	0x2			; DIPROC address
000218af 00                       |        |		.CONST	0x0			; Output Parameters
000218b0 00                       |        |		.CONST	0x0			; Input Parameters
000218b1 00                       |        |		.PAD	0x0
000218b2					exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
000218b2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000218b8 00 20                    |        |		.CONST	0x0020			; Stack-delta
000218ba 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.TYP'
000218cf 00                       |        |		.CONST	0x0
000218d0 06                       |        |		.CONST	0x6			; DIPROC address
000218d1 06                       |        |		.CONST	0x6			; Output Parameters
000218d2 00                       |        |		.CONST	0x0			; Input Parameters
000218d3 00                       |        |		.CONST	0x0			; Out arg [1]
000218d4 01                       |        |		.CONST	0x1			; Out arg [2]
000218d5 00                       |        |		.CONST	0x0			; Out arg [1]
000218d6 00                       |        |		.CONST	0x0			; Out arg [1]
000218d7 01                       |        |		.CONST	0x1			; Out arg [2]
000218d8 08                       |        |		.CONST	0x8			; Out arg flag
000218d9 00                       |        |		.PAD	0x0
000218da					exp_READ_UIR.TYP(Sw_1, &Sr_6):
000218da 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000218e0 00 0e                    |        |		.CONST	0x000e			; Stack-delta
000218e2 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.TYP'
000218ef 00                       |        |		.CONST	0x0
000218f0 06                       |        |		.CONST	0x6			; DIPROC address
000218f1 01                       |        |		.CONST	0x1			; Output Parameters
000218f2 01                       |        |		.CONST	0x1			; Input Parameters
000218f3 00                       |        |		.CONST	0x0			; In arg [1]
000218f4 05                       |        |		.CONST	0x5			; Out arg [6]
000218f5 00                       |        |		.PAD	0x0
000218f6					exp_READ_PARITY_REG.TYP(&Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1):
000218f6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000218fc 00 1c                    |        |		.CONST	0x001c			; Stack-delta
000218fe 13 52 45 41 44 5f 50 41  | READ_PA|		.TXT	19,'READ_PARITY_REG.TYP'
00021912 00                       |        |		.CONST	0x0
00021913 06                       |        |		.CONST	0x6			; DIPROC address
00021914 05                       |        |		.CONST	0x5			; Output Parameters
00021915 00                       |        |		.CONST	0x0			; Input Parameters
00021916 00                       |        |		.CONST	0x0			; Out arg [1]
00021917 00                       |        |		.CONST	0x0			; Out arg [1]
00021918 00                       |        |		.CONST	0x0			; Out arg [1]
00021919 00                       |        |		.CONST	0x0			; Out arg [1]
0002191a 00                       |        |		.CONST	0x0			; Out arg [1]
0002191b 00                       |        |		.PAD	0x0
0002191c					exp_RUN_NOCHECK.TYP():
0002191c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021922 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021924 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.TYP'
00021934 00                       |        |		.CONST	0x0
00021935 06                       |        |		.CONST	0x6			; DIPROC address
00021936 00                       |        |		.CONST	0x0			; Output Parameters
00021937 00                       |        |		.CONST	0x0			; Input Parameters
00021938					exp_PREP_RUN.TYP(Sw_2):
00021938 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002193e 00 0a                    |        |		.CONST	0x000a			; Stack-delta
00021940 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.TYP'
0002194d 00                       |        |		.CONST	0x0
0002194e 06                       |        |		.CONST	0x6			; DIPROC address
0002194f 00                       |        |		.CONST	0x0			; Output Parameters
00021950 01                       |        |		.CONST	0x1			; Input Parameters
00021951 01                       |        |		.CONST	0x1			; In arg [2]
00021952					exp_MF.TYP():
00021952 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021958 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002195a 06 4d 46 2e 54 59 50     | MF.TYP |		.TXT	6,'MF.TYP'
00021961 00                       |        |		.CONST	0x0
00021962 06                       |        |		.CONST	0x6			; DIPROC address
00021963 00                       |        |		.CONST	0x0			; Output Parameters
00021964 00                       |        |		.CONST	0x0			; Input Parameters
00021965 00                       |        |		.PAD	0x0
00021966					exp_LOAD_UIR.TYP(Sw_6, Sw_1):
00021966 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002196c 00 10                    |        |		.CONST	0x0010			; Stack-delta
0002196e 0c 4c 4f 41 44 5f 55 49  | LOAD_UI|		.TXT	12,'LOAD_UIR.TYP'
0002197b 00                       |        |		.CONST	0x0
0002197c 06                       |        |		.CONST	0x6			; DIPROC address
0002197d 00                       |        |		.CONST	0x0			; Output Parameters
0002197e 02                       |        |		.CONST	0x2			; Input Parameters
0002197f 05                       |        |		.CONST	0x5			; In arg [6]
00021980 00                       |        |		.CONST	0x0			; In arg [1]
00021981 00                       |        |		.PAD	0x0
00021982					exp_INIT_WCS_INC_PATTERN.TYP():
00021982 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021988 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002198a 18 49 4e 49 54 5f 57 43  | INIT_WC|		.TXT	24,'INIT_WCS_INC_PATTERN.TYP'
000219a3 00                       |        |		.CONST	0x0
000219a4 06                       |        |		.CONST	0x6			; DIPROC address
000219a5 00                       |        |		.CONST	0x0			; Output Parameters
000219a6 00                       |        |		.CONST	0x0			; Input Parameters
000219a7 00                       |        |		.PAD	0x0
000219a8					exp_INIT_WCS.TYP(Sw_6):
000219a8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000219ae 00 0e                    |        |		.CONST	0x000e			; Stack-delta
000219b0 0c 49 4e 49 54 5f 57 43  | INIT_WC|		.TXT	12,'INIT_WCS.TYP'
000219bd 00                       |        |		.CONST	0x0
000219be 06                       |        |		.CONST	0x6			; DIPROC address
000219bf 00                       |        |		.CONST	0x0			; Output Parameters
000219c0 01                       |        |		.CONST	0x1			; Input Parameters
000219c1 05                       |        |		.CONST	0x5			; In arg [6]
000219c2					exp_CLEAR_PARITY.TYP():
000219c2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000219c8 00 08                    |        |		.CONST	0x0008			; Stack-delta
000219ca 10 43 4c 45 41 52 5f 50  | CLEAR_P|		.TXT	16,'CLEAR_PARITY.TYP'
000219db 00                       |        |		.CONST	0x0
000219dc 06                       |        |		.CONST	0x6			; DIPROC address
000219dd 00                       |        |		.CONST	0x0			; Output Parameters
000219de 00                       |        |		.CONST	0x0			; Input Parameters
000219df 00                       |        |		.PAD	0x0
000219e0					exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr):
000219e0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000219e6 00 20                    |        |		.CONST	0x0020			; Stack-delta
000219e8 14 52 45 41 44 5f 4e 4f  | READ_NO|		.TXT	20,'READ_NOVRAM_DATA.VAL'
000219fd 00                       |        |		.CONST	0x0
000219fe 07                       |        |		.CONST	0x7			; DIPROC address
000219ff 06                       |        |		.CONST	0x6			; Output Parameters
00021a00 00                       |        |		.CONST	0x0			; Input Parameters
00021a01 00                       |        |		.CONST	0x0			; Out arg [1]
00021a02 01                       |        |		.CONST	0x1			; Out arg [2]
00021a03 00                       |        |		.CONST	0x0			; Out arg [1]
00021a04 00                       |        |		.CONST	0x0			; Out arg [1]
00021a05 01                       |        |		.CONST	0x1			; Out arg [2]
00021a06 08                       |        |		.CONST	0x8			; Out arg flag
00021a07 00                       |        |		.PAD	0x0
00021a08					exp_READ_UIR.VAL(Sw_1, &Sr_5):
00021a08 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021a0e 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00021a10 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.VAL'
00021a1d 00                       |        |		.CONST	0x0
00021a1e 07                       |        |		.CONST	0x7			; DIPROC address
00021a1f 01                       |        |		.CONST	0x1			; Output Parameters
00021a20 01                       |        |		.CONST	0x1			; Input Parameters
00021a21 00                       |        |		.CONST	0x0			; In arg [1]
00021a22 04                       |        |		.CONST	0x4			; Out arg [5]
00021a23 00                       |        |		.PAD	0x0
00021a24					exp_READ_PARITY_REG.VAL(&Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1):
00021a24 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021a2a 00 1c                    |        |		.CONST	0x001c			; Stack-delta
00021a2c 13 52 45 41 44 5f 50 41  | READ_PA|		.TXT	19,'READ_PARITY_REG.VAL'
00021a40 00                       |        |		.CONST	0x0
00021a41 07                       |        |		.CONST	0x7			; DIPROC address
00021a42 05                       |        |		.CONST	0x5			; Output Parameters
00021a43 00                       |        |		.CONST	0x0			; Input Parameters
00021a44 00                       |        |		.CONST	0x0			; Out arg [1]
00021a45 00                       |        |		.CONST	0x0			; Out arg [1]
00021a46 00                       |        |		.CONST	0x0			; Out arg [1]
00021a47 00                       |        |		.CONST	0x0			; Out arg [1]
00021a48 00                       |        |		.CONST	0x0			; Out arg [1]
00021a49 00                       |        |		.PAD	0x0
00021a4a					exp_RUN_NOCHECK.VAL():
00021a4a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021a50 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021a52 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.VAL'
00021a62 00                       |        |		.CONST	0x0
00021a63 07                       |        |		.CONST	0x7			; DIPROC address
00021a64 00                       |        |		.CONST	0x0			; Output Parameters
00021a65 00                       |        |		.CONST	0x0			; Input Parameters
00021a66					exp_PREP_RUN.VAL(Sw_2):
00021a66 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021a6c 00 0a                    |        |		.CONST	0x000a			; Stack-delta
00021a6e 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.VAL'
00021a7b 00                       |        |		.CONST	0x0
00021a7c 07                       |        |		.CONST	0x7			; DIPROC address
00021a7d 00                       |        |		.CONST	0x0			; Output Parameters
00021a7e 01                       |        |		.CONST	0x1			; Input Parameters
00021a7f 01                       |        |		.CONST	0x1			; In arg [2]
00021a80					exp_MF.VAL():
00021a80 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021a86 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021a88 06 4d 46 2e 56 41 4c     | MF.VAL |		.TXT	6,'MF.VAL'
00021a8f 00                       |        |		.CONST	0x0
00021a90 07                       |        |		.CONST	0x7			; DIPROC address
00021a91 00                       |        |		.CONST	0x0			; Output Parameters
00021a92 00                       |        |		.CONST	0x0			; Input Parameters
00021a93 00                       |        |		.PAD	0x0
00021a94					exp_LOAD_UIR.VAL(Sw_5, Sw_1):
00021a94 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021a9a 00 10                    |        |		.CONST	0x0010			; Stack-delta
00021a9c 0c 4c 4f 41 44 5f 55 49  | LOAD_UI|		.TXT	12,'LOAD_UIR.VAL'
00021aa9 00                       |        |		.CONST	0x0
00021aaa 07                       |        |		.CONST	0x7			; DIPROC address
00021aab 00                       |        |		.CONST	0x0			; Output Parameters
00021aac 02                       |        |		.CONST	0x2			; Input Parameters
00021aad 04                       |        |		.CONST	0x4			; In arg [5]
00021aae 00                       |        |		.CONST	0x0			; In arg [1]
00021aaf 00                       |        |		.PAD	0x0
00021ab0					exp_INIT_WCS_INC_PATTERN.VAL():
00021ab0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021ab6 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021ab8 18 49 4e 49 54 5f 57 43  | INIT_WC|		.TXT	24,'INIT_WCS_INC_PATTERN.VAL'
00021ad1 00                       |        |		.CONST	0x0
00021ad2 07                       |        |		.CONST	0x7			; DIPROC address
00021ad3 00                       |        |		.CONST	0x0			; Output Parameters
00021ad4 00                       |        |		.CONST	0x0			; Input Parameters
00021ad5 00                       |        |		.PAD	0x0
00021ad6					exp_INIT_WCS.VAL(Sw_5):
00021ad6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021adc 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00021ade 0c 49 4e 49 54 5f 57 43  | INIT_WC|		.TXT	12,'INIT_WCS.VAL'
00021aeb 00                       |        |		.CONST	0x0
00021aec 07                       |        |		.CONST	0x7			; DIPROC address
00021aed 00                       |        |		.CONST	0x0			; Output Parameters
00021aee 01                       |        |		.CONST	0x1			; Input Parameters
00021aef 04                       |        |		.CONST	0x4			; In arg [5]
00021af0					exp_CLEAR_PARITY.VAL():
00021af0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021af6 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021af8 10 43 4c 45 41 52 5f 50  | CLEAR_P|		.TXT	16,'CLEAR_PARITY.VAL'
00021b09 00                       |        |		.CONST	0x0
00021b0a 07                       |        |		.CONST	0x7			; DIPROC address
00021b0b 00                       |        |		.CONST	0x0			; Output Parameters
00021b0c 00                       |        |		.CONST	0x0			; Input Parameters
00021b0d 00                       |        |		.PAD	0x0
00021b0e					exp_READ_UIR.IOC(Sw_1, &Sr_2):
00021b0e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021b14 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00021b16 0c 52 45 41 44 5f 55 49  | READ_UI|		.TXT	12,'READ_UIR.IOC'
00021b23 00                       |        |		.CONST	0x0
00021b24 04                       |        |		.CONST	0x4			; DIPROC address
00021b25 01                       |        |		.CONST	0x1			; Output Parameters
00021b26 01                       |        |		.CONST	0x1			; Input Parameters
00021b27 00                       |        |		.CONST	0x0			; In arg [1]
00021b28 01                       |        |		.CONST	0x1			; Out arg [2]
00021b29 00                       |        |		.PAD	0x0
00021b2a					exp_READ_PAREG.IOC(Sw_1, &Sr_1):
00021b2a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021b30 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00021b32 0e 52 45 41 44 5f 50 41  | READ_PA|		.TXT	14,'READ_PAREG.IOC'
00021b41 00                       |        |		.CONST	0x0
00021b42 04                       |        |		.CONST	0x4			; DIPROC address
00021b43 01                       |        |		.CONST	0x1			; Output Parameters
00021b44 01                       |        |		.CONST	0x1			; Input Parameters
00021b45 00                       |        |		.CONST	0x0			; In arg [1]
00021b46 00                       |        |		.CONST	0x0			; Out arg [1]
00021b47 00                       |        |		.PAD	0x0
00021b48					exp_RUN_NOCHECK.IOC():
00021b48 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021b4e 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021b50 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.IOC'
00021b60 00                       |        |		.CONST	0x0
00021b61 04                       |        |		.CONST	0x4			; DIPROC address
00021b62 00                       |        |		.CONST	0x0			; Output Parameters
00021b63 00                       |        |		.CONST	0x0			; Input Parameters
00021b64					exp_PREP_RUN.IOC(Sw_2):
00021b64 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021b6a 00 0a                    |        |		.CONST	0x000a			; Stack-delta
00021b6c 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.IOC'
00021b79 00                       |        |		.CONST	0x0
00021b7a 04                       |        |		.CONST	0x4			; DIPROC address
00021b7b 00                       |        |		.CONST	0x0			; Output Parameters
00021b7c 01                       |        |		.CONST	0x1			; Input Parameters
00021b7d 01                       |        |		.CONST	0x1			; In arg [2]
00021b7e					exp_MF.IOC():
00021b7e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021b84 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021b86 06 4d 46 2e 49 4f 43     | MF.IOC |		.TXT	6,'MF.IOC'
00021b8d 00                       |        |		.CONST	0x0
00021b8e 04                       |        |		.CONST	0x4			; DIPROC address
00021b8f 00                       |        |		.CONST	0x0			; Output Parameters
00021b90 00                       |        |		.CONST	0x0			; Input Parameters
00021b91 00                       |        |		.PAD	0x0
00021b92					exp_LOAD_UIR.IOC(Sw_2, Sw_1):
00021b92 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021b98 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00021b9a 0c 4c 4f 41 44 5f 55 49  | LOAD_UI|		.TXT	12,'LOAD_UIR.IOC'
00021ba7 00                       |        |		.CONST	0x0
00021ba8 04                       |        |		.CONST	0x4			; DIPROC address
00021ba9 00                       |        |		.CONST	0x0			; Output Parameters
00021baa 02                       |        |		.CONST	0x2			; Input Parameters
00021bab 01                       |        |		.CONST	0x1			; In arg [2]
00021bac 00                       |        |		.CONST	0x0			; In arg [1]
00021bad 00                       |        |		.PAD	0x0
00021bae					exp_LOAD_PAREG.IOC(Sw_1, Sw_1):
00021bae 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021bb4 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00021bb6 0e 4c 4f 41 44 5f 50 41  | LOAD_PA|		.TXT	14,'LOAD_PAREG.IOC'
00021bc5 00                       |        |		.CONST	0x0
00021bc6 04                       |        |		.CONST	0x4			; DIPROC address
00021bc7 00                       |        |		.CONST	0x0			; Output Parameters
00021bc8 02                       |        |		.CONST	0x2			; Input Parameters
00021bc9 00                       |        |		.CONST	0x0			; In arg [1]
00021bca 00                       |        |		.CONST	0x0			; In arg [1]
00021bcb 00                       |        |		.PAD	0x0
00021bcc					exp_INIT_WCS_TEST_PATTERN.IOC():
00021bcc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021bd2 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021bd4 19 49 4e 49 54 5f 57 43  | INIT_WC|		.TXT	25,'INIT_WCS_TEST_PATTERN.IOC'
00021bee 00                       |        |		.CONST	0x0
00021bef 04                       |        |		.CONST	0x4			; DIPROC address
00021bf0 00                       |        |		.CONST	0x0			; Output Parameters
00021bf1 00                       |        |		.CONST	0x0			; Input Parameters
00021bf2					exp_FILL_WCS.IOC(Sw_2, Sw_1):
00021bf2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021bf8 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00021bfa 0c 46 49 4c 4c 5f 57 43  | FILL_WC|		.TXT	12,'FILL_WCS.IOC'
00021c07 00                       |        |		.CONST	0x0
00021c08 04                       |        |		.CONST	0x4			; DIPROC address
00021c09 00                       |        |		.CONST	0x0			; Output Parameters
00021c0a 02                       |        |		.CONST	0x2			; Input Parameters
00021c0b 01                       |        |		.CONST	0x1			; In arg [2]
00021c0c 00                       |        |		.CONST	0x0			; In arg [1]
00021c0d 00                       |        |		.PAD	0x0
00021c0e 00 00                    |        |		.XXX[0x2]
00021c10 00 00 00 00 00 00        |        |		.XXX[0x6]
00021c16 00 00                    |        |		.CONST	0x0,0x0
00021c18 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
00021c1c 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
00021c20 00                       |        |		.XXX[0x1]
00021c21 00 00                    |        |		.CONST	0x0,0x0
00021c23 00 00 00 00 00           |        |		.XXX[0x5]
00021c28 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x1d8]