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

⟦8fe3a5d60⟧ M200

    Length: 6656 (0x1a00)
    Types: M200
    Notes: M200_PROGRAM
    Names: »P2STOP.M200«

Derivation

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

Disassembly

0x20306


@ 20306
EXP_FAIL
        <LVAR  0x00e 1(r)>
        <LVAR  0x00a 4(r)>
        <LVAR  0x008 1(r)>
    <POP 20306-20442 Body>                                              
        <POP 20306-2031c Prologue>                           Σ0         ↓
        <POP 2031c-20332 RegCacheLoad>                       Σ0         ↓
        <POP 20332-20392 Naked>                              Σ0         ↓ →0x203da
            <Call 0x20332 0x103dc>                                              {}
                WriteConsoleCrLf(void)
            <Blob 0x20338 [18] @>                            Δ-18               {[«18""»]}
            <POP 20344-20346 StackAdj>                       Δ-4                {[«18""»]|[-4-]}
            <Lit 0x20346 18>                                                    {[«18""»]|[$$Experiment error :]}
            <Call 0x20352 0x103e0>                                              {[«18""»]|[$$Experiment error :]}
                WriteConsoleStringCrLf(str : String)
            <POP 20354-20355 StackAdj>                       Δ+22       ↓       {}
            <Blob 0x20355 [14] @>                            Δ-14               {[«14""»]}
            <POP 20364-20366 StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x20366 13>                                                    {[«14""»]|[-4-]|[$$Board      :_]}
            <POP 20370-20372 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <MI 20372  MOVE.B  (A6+0xe),(A7)>                                   {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
            <Call 0x20376 0x1049c>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-6-]}
                BoardName(address : B) : String
            <POP 2037c-2037e StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
            <Call 0x2037e 0x102d0>                                              {[«14""»]|[-4-]|[$$Board      :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20384-20386 StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x20386 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 20388-2038a StackAdj>                       Δ+18               {}
            <MI 2038a  MOVEA.L (A6+0xa),A0>                                     {}
            <MI 2038e  CMPA.W  #0x01,A0>                                        {}
            <MI 20390  BEQ     0x203da>                                         {}
        <POP 20392-203da Naked>                              Σ0         ↓
            <Blob 0x20392 [14] @>                            Δ-14               {[«14""»]}
            <Blob 0x203a2 [30] (A0+0xfc)>                    Δ-30               {[«14""»]|[«30»]}
            <POP 203b2-203b4 StackAdj>                       Δ-8                {[«14""»]|[«30»]|[-8-]}
            <Lit 0x203b4 13>                                                    {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
            <POP 203be-203c0 StackAdj>                       Δ-4                {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
            <Lit 0x203c0>                                                       {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                <Pointer.sp 0x203c0 12>                      Δ-4        
                <Const 0x203c4 0x1.2>                        Δ-2        
                <Const 0x203c6 0x1e.2>                       Δ-2        
                <Call 0x203c8 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 203ca-203cc StackAdj>                   Δ+8        
            <Call 0x203cc 0x102d0>                                              {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 203d2-203d4 StackAdj>                       Δ+8                {[«14""»]|[«30»]|[-4-]}
            <Call 0x203d4 0x103e0>                                              {[«14""»]|[«30»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 203d6-203da StackAdj>                       Δ+48               {}
        <POP 203da-2043a Naked>                              Σ0         ↓ ←0x20332
            <Blob 0x203da [14] @>                            Δ-14               {[«14""»]}
            <POP 203ea-203ec StackAdj>                       Δ-8                {[«14""»]|[-8-]}
            <Lit 0x203ec 13>                                                    {[«14""»]|[-4-]|[$$Status     :_]}
            <POP 203f6-203f8 StackAdj>                       Δ-6                {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <MI 203f8  MOVE.B  (A6+0x8),(A7)>                                   {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
            <Call 0x203fc 0x104a2>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-6-]}
                ExpStatus2Text(status.B, &String)
            <POP 20402-20404 StackAdj>                       Δ+2                {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
            <Call 0x20404 0x102d0>                                              {[«14""»]|[-4-]|[$$Status     :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 2040a-2040c StackAdj>                       Δ+8                {[«14""»]|[-4-]}
            <Call 0x2040c 0x103e0>                                              {[«14""»]|[-4-]}
                WriteConsoleStringCrLf(str : String)
            <POP 2040e-2040f StackAdj>                       Δ+18       ↓       {}
            <Blob 0x2040f [24] @>                            Δ-24               {[«24""»]}
            <Const 0x2041e 0x2.2>                            Δ-2                {[«24""»]|[#2]}
            <POP 20422-20424 StackAdj>                       Δ-4                {[«24""»]|[#2]|[-4-]}
            <Lit 0x20424 23>                                                    {[«24""»]|[#2]|[$$Fatal experiment error.]}
            <Call 0x20432 0x103b8>                                              {[«24""»]|[#2]|[$$Fatal experiment error.]}
                PopProgram(status : Byte; msg : String)
            <POP 20438-2043a StackAdj>                       Δ+30               {}
        <POP 2043a-20442 Epilogue>                           Σ0         

0x20442


@ 20442
PROG_FAIL
        <LVAR  0x008 1(r)>
    <POP 20442-204aa Body>                                              
        <POP 20442-20458 Prologue>                           Σ0         ↓
        <POP 20458-204a2 Naked>                              Σ0         ↓
            <Blob 0x20458 [14] @>                            Δ-14               {[«14""»]}
            <Const 0x20464 0x3.2>                            Δ-2                {[«14""»]|[#3]}
            <POP 20468-2046a StackAdj>                       Δ-8                {[«14""»]|[#3]|[-8-]}
            <Lit 0x2046a 14>                                                    {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
            <POP 2047c-2047e StackAdj>                       Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 2047e  MOVE.B  (A6+0x8),D0>                                     {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20482  EXTB.W  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20484  EXTW.L  D0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <MI 20486  MOVE.L  D0,-(A7)>                     Δ-4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
            <Call 0x20488 0x102e4>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
                Long2String(a : Long) : String
            <POP 2048e-20490 StackAdj>                       Δ+4                {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
            <Call 0x20490 0x102d0>                                              {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20496-20498 StackAdj>                       Δ+8                {[«14""»]|[#3]|[-4-]}
            <Call 0x20498 0x103b8>                                              {[«14""»]|[#3]|[-4-]}
                PopProgram(status : Byte; msg : String)
            <POP 2049e-204a2 StackAdj>                       Δ+20               {}
        <POP 204a2-204aa Epilogue>                           Σ0         

0x204aa


@ 204aa
        <LVAR  0x00c 1(r)>
        <LVAR  0x008 4(r)>
        <LVAR -0x002 @>
    <POP 204aa-20538 Body>                                              
        <POP 204aa-204c0 Prologue>                           Σ0         ↓
        <POP 204c0-20530 Naked>                              Σ0         ↓
            <Call 0x204c0 0x10538>                                              {}
                IPC_Init(void)
            <MI 204c6  MOVE.B  (A6+0xc),-(A7)>               Δ-2                {[2, '(A6+0xc)']}
            <Call 0x204ca 0x10502>                                              {[2, '(A6+0xc)']}
                IPC_PutBool(a : Bool)
            <POP 204d0-204d2 StackAdj>                       Δ+2                {}
            <Call 0x204d2 0x10514>                                              {}
                IPC_PutEnd(void)
            <Blob 0x204d8 [10] @>                            Δ-10               {[«10""»]}
            <POP 204ea-204ec StackAdj>                       Δ-4                {[«10""»]|[-4-]}
            <Lit 0x204ec 9>                                                     {[«10""»]|[$$INITSTATE]}
            <Const 0x20500 0x1.4>                            Δ-4                {[«10""»]|[$$INITSTATE]|[##1]}
            <Const 0x20504 0x2.2>                            Δ-2                {[«10""»]|[$$INITSTATE]|[##1]|[#2]}
            <Pointer.fp 0x20508 <LVAR -0x002 @>>             Δ-4                {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
            <Call 0x2050c 0x103b0>                                              {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
                PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
            <POP 20512-20516 StackAdj>                       Δ+24               {}
            <Call 0x20516 0x10538>                                              {}
                IPC_Init(void)
            <MI 2051c  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20520  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x20522 0x10526>                                              {[4, '^(A0)']}
                IPC_GetBool() : Bool
            <POP 20528-2052a StackAdj>                       Δ+4                {}
            <Call 0x2052a 0x1051a>                                              {}
                IPC_GetEnd(void)
        <POP 20530-20538 Epilogue>                           Σ0         

0x20538


@ 20538
        <LVAR  0x008 4(r)>
    <POP 20538-20570 Body>                                              
        <POP 20538-2054e Prologue>                           Σ0         ↓
        <POP 2054e-20568 Naked>                              Σ0         ↓
            <Call 0x2054e 0x10538>                                              {}
                IPC_Init(void)
            <MI 20554  MOVEA.L (A6+0x8),A0>                                     {}
            <MI 20558  PEA.L   (A0)>                         Δ-4                {[4, '^(A0)']}
            <Call 0x2055a 0x10526>                                              {[4, '^(A0)']}
                IPC_GetBool() : Bool
            <POP 20560-20562 StackAdj>                       Δ+4                {}
            <Call 0x20562 0x1051a>                                              {}
                IPC_GetEnd(void)
        <POP 20568-20570 Epilogue>                           Σ0         

0x20570


@ 20570
        <LVAR  0x008 1(r)>
    <POP 20570-205ac Body>                                              
        <POP 20570-20582 Prologue>                           Σ0         ↓
        <POP 20582-205a8 Naked>                              Σ0         ↓
            <Call 0x20582 0x10538>                                              {}
                IPC_Init(void)
            <MI 20588  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[2, '(A6+0x8)']}
            <Call 0x2058c 0x10502>                                              {[2, '(A6+0x8)']}
                IPC_PutBool(a : Bool)
            <POP 20592-20594 StackAdj>                       Δ+2                {}
            <Call 0x20594 0x10514>                                              {}
                IPC_PutEnd(void)
            <MI 2059a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2059c 0x1.4>                            Δ-4                {[#0]|[##1]}
            <Call 0x205a0 0x103b8>                                              {[#0]|[##1]}
                PopProgram(status : Byte; msg : String)
            <POP 205a6-205a8 StackAdj>                       Δ+6                {}
        <POP 205a8-205ac Epilogue>                           Σ0         

0x205ac


@ 205ac
    <POP 205ac-2065c Body>                                              
        <POP 205ac-205c2 Prologue>                           Σ0         ↓
        <POP 205c2-205ce RegCacheLoad>                       Σ0         ↓
        <POP 205ce-20654 Naked>                              Σ0         ↓
            <MI 205ce  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <Blob 0x205d0 [2] @>                             Δ-2                {[#0]|[«2""»]}
            <Blob 0x205d4 [2] @>                             Δ-2                {[#0]|[«2""»]|[«2""»]}
            <Blob 0x205d8 [2] @>                             Δ-2                {[#0]|[«2""»]|[«2""»]|[«2""»]}
            <MI 205dc  CLR.B   -(A7)>                        Δ-2                {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
            <Call 0x205de 0x21442>                                              {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
                exp_WRITE_WCS.FIU(Sw_2, Sw_6, Sw_1)
            <POP 205e4-205e6 StackAdj>                       Δ+8                {[#0]}
            <MI 205e6  CLR.W   (A7)>                                            {[#0]}
            <Blob 0x205e8 [6] @>                             Δ-6                {[#0]|[«6""»]}
            <MI 205f8  CLR.B   -(A7)>                        Δ-2                {[#0]|[«6""»]|[#0]}
            <Call 0x205fa 0x2177a>                                              {[#0]|[«6""»]|[#0]}
                exp_WRITE_WCS.VAL(Sw_2, Sw_5, Sw_1)
            <POP 20600-20602 StackAdj>                       Δ+8                {[#0]}
            <MI 20602  CLR.W   (A7)>                                            {[#0]}
            <Blob 0x20604 [2] @>                             Δ-2                {[#0]|[«2""»]}
            <Blob 0x20606 [2] @>                             Δ-2                {[#0]|[«2""»]|[«2""»]}
            <Blob 0x20608 [2] @>                             Δ-2                {[#0]|[«2""»]|[«2""»]|[«2""»]}
            <MI 2060a  CLR.B   -(A7)>                        Δ-2                {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
            <Call 0x2060c 0x21682>                                              {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
                exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1)
            <POP 20612-20614 StackAdj>                       Δ+8                {[#0]}
            <POP 20614-20615 StackAdj>                       Δ+2                {}
            <Const 0x20615 0x1.2>                            Δ-2                {[#1]}
            <Blob 0x20618 [2] @>                             Δ-2                {[#1]|[«2""»]}
            <Blob 0x2061a [2] @>                             Δ-2                {[#1]|[«2""»]|[«2""»]}
            <Blob 0x2061c [2] @>                             Δ-2                {[#1]|[«2""»]|[«2""»]|[«2""»]}
            <MI 2061e  CLR.B   -(A7)>                        Δ-2                {[#1]|[«2""»]|[«2""»]|[«2""»]|[#0]}
            <Call 0x20620 0x21682>                                              {[#1]|[«2""»]|[«2""»]|[«2""»]|[#0]}
                exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1)
            <POP 20626-20628 StackAdj>                       Δ+8                {[#1]}
            <POP 20628-20629 StackAdj>                       Δ+2                {}
            <Const 0x20629 0x2.2>                            Δ-2                {[#2]}
            <Blob 0x2062c [2] @>                             Δ-2                {[#2]|[«2""»]}
            <Blob 0x2062e [2] @>                             Δ-2                {[#2]|[«2""»]|[«2""»]}
            <Blob 0x20630 [2] @>                             Δ-2                {[#2]|[«2""»]|[«2""»]|[«2""»]}
            <MI 20632  CLR.B   -(A7)>                        Δ-2                {[#2]|[«2""»]|[«2""»]|[«2""»]|[#0]}
            <Call 0x20634 0x21682>                                              {[#2]|[«2""»]|[«2""»]|[«2""»]|[#0]}
                exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1)
            <POP 2063a-2063e StackAdj>                       Δ+10               {}
            <MI 2063e  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20640 0xa000.2>                         Δ-2                {[#0]|[#40960]}
            <MI 20644  CLR.B   -(A7)>                        Δ-2                {[#0]|[#40960]|[#0]}
            <Call 0x20646 0x217fa>                                              {[#0]|[#40960]|[#0]}
                exp_WRITE_WCS.IOC(Sw_2, Sw_2, Sw_1)
            <POP 2064c-2064e StackAdj>                       Δ+6                {}
            <Call 0x2064e 0x2164c>                                              {}
                exp_INIT_CSTOP_WCS.SEQ()
        <POP 20654-2065c Epilogue>                           Σ0         

0x2065c


@ 2065c
        <LVAR  0x00a 1(r)>
        <LVAR  0x008 1(r)>
    <POP 2065c-207a2 Body>                                              
        <POP 2065c-20672 Prologue>                           Σ0         ↓
        <POP 20672-2068c RegCacheLoad>                       Σ0         ↓
        <POP 2068c-20692 Naked>                              Σ0         ↓
            <MI 2068c  MOVE.B  (A6+0x8),0x21880>                                {}
            <MI 20690  MOVEQ.L #0x00,D6>                                        {}
        <POP 20692-206ba Naked>                              Σ0         ↓ →0x20692 ←0x20692
            <POP 0x20692 LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {}
            <MI 20698  LEA.L   0x2186e,A0>                                      {}
            <MI 2069e  MOVE.B  (A0+D6.L+#0xa),D0>                               {}
            <MI 206a2  EXTB.W  D0>                                              {}
            <MI 206a4  EXTW.L  D0>                                              {}
            <POP 0x206a6 LimitCheck 0x0 ≤ D0 ≤ 0xff>                            {}
            <MI 206b0  MOVE.B  D0,(A0+D6.L+#0x23)>                              {}
            <MI 206b4  ADDQ.L  #0x1,D6>                                         {}
            <MI 206b6  CMP.L   #0x07,D6>                                        {}
            <MI 206b8  BLE     0x20692>                                         {}
        <POP 206ba-206bc Naked>                              Σ0         ↓
            <MI 206ba  MOVEQ.L #0x00,D7>                                        {}
        <POP 206bc-206c4 Naked>                              Σ0         ↓ →0x20722 ←0x20722
            <MI 206bc  CMP.B   0x2188a,D7>                                      {}
            <MI 206c2  BNE     0x20722>                                         {}
        <POP 206c4-20722 Naked>                              Σ0         ↓
            <MI 206c4  MOVE.B  D7,D0>                                           {}
            <MI 206c6  EXTB.W  D0>                                              {}
            <MI 206c8  MULS.W  #0x0a,D0>                                        {}
            <MI 206ca  LEA.L   0x201bf,A0>                                      {}
            <Blob 0x206ce [10] (A0+D0.W)>                    Δ-10               {[«10»]}
            <POP 206de-206e0 StackAdj>                       Δ-4                {[«10»]|[-4-]}
            <Blob 0x206e0 [4] @>                             Δ-4                {[«10»]|[-4-]|[«4""»]}
            <POP 206e2-206e4 StackAdj>                       Δ-4                {[«10»]|[-4-]|[«4""»]|[-4-]}
            <Lit 0x206e4>                                                       {[«10»]|[-4-]|[«4""»]|[$$…]}
                <Pointer.sp 0x206e4 12>                      Δ-4        
                <Const 0x206e8 0x1.2>                        Δ-2        
                <Const 0x206ea 0xa.2>                        Δ-2        
                <Call 0x206ec 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 206f2-206f4 StackAdj>                   Δ+8        
            <Call 0x206f4 0x102d0>                                              {[«10»]|[-4-]|[«4""»]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 206f6-206f8 StackAdj>                       Δ+8                {[«10»]|[-4-]}
            <MI 206f8  MOVE.L  (A7)+,0x21886>                Δ+4                {[«10»]}
            <POP 206fa-206fc StackAdj>                       Δ+2                {[-8-]}
            <POP 206fc-206fd StackAdj>                       Δ+4                {[-4-]}
            <Blob 0x206fd [4] @>                             Δ-4                {[-4-]|[«4""»]}
            <POP 206fe-20700 StackAdj>                       Δ-4                {[-4-]|[«4""»]|[-4-]}
            <Blob 0x20700 [4] @>                             Δ-4                {[-4-]|[«4""»]|[-4-]|[«4""»]}
            <Call 0x20706 0x102e4>                                              {[-4-]|[«4""»]|[-4-]|[«4""»]}
                Long2String(a : Long) : String
            <POP 2070c-2070e StackAdj>                       Δ+4                {[-4-]|[«4""»]|[-4-]}
            <Call 0x2070e 0x102d0>                                              {[-4-]|[«4""»]|[-4-]}
                StringCat2(a, b : String) : String
            <POP 20710-20712 StackAdj>                       Δ+8                {[-4-]}
            <MI 20712  MOVE.L  (A7)+,0x21886>                Δ+4                {}
            <Blob 0x20714 [4] @>                             Δ-4                {[«4""»]}
            <Const 0x20716 0x5c.2>                           Δ-2                {[«4""»]|[#92]}
            <Call 0x2071a 0x102c0>                                              {[«4""»]|[#92]}
                AppendChar(MOD b : String; a : char)
            <POP 20720-20722 StackAdj>                       Δ+6                {}
        <POP 20722-20728 Naked>                              Σ0         ↓ →0x206bc ←0x206bc
            <MI 20722  ADDQ.B  #0x1,D7>                                         {}
            <MI 20724  CMP.B   #0x04,D7>                                        {}
            <MI 20726  BLE     0x206bc>                                         {}
        <POP 20728-2072a Naked>                              Σ0         ↓
            <MI 20728  MOVEQ.L #0x00,D7>                                        {}
        <POP 2072a-20732 Naked>                              Σ0         ↓ →0x2076a ←0x2076a
            <MI 2072a  CMP.B   0x21890,D7>                                      {}
            <MI 20730  BNE     0x2076a>                                         {}
        <POP 20732-2076a Naked>                              Σ0         ↓
            <MI 20732  MOVE.B  D7,D0>                                           {}
            <MI 20734  EXTB.W  D0>                                              {}
            <MI 20736  MULS.W  #0x0a,D0>                                        {}
            <MI 20738  LEA.L   0x201bf,A0>                                      {}
            <Blob 0x2073c [10] (A0+D0.W)>                    Δ-10               {[«10»]}
            <POP 2074c-2074e StackAdj>                       Δ-4                {[«10»]|[-4-]}
            <Blob 0x2074e [4] @>                             Δ-4                {[«10»]|[-4-]|[«4""»]}
            <POP 20750-20752 StackAdj>                       Δ-4                {[«10»]|[-4-]|[«4""»]|[-4-]}
            <Lit 0x20752>                                                       {[«10»]|[-4-]|[«4""»]|[$$…]}
                <Pointer.sp 0x20752 12>                      Δ-4        
                <Const 0x20756 0x1.2>                        Δ-2        
                <Const 0x20758 0xa.2>                        Δ-2        
                <Call 0x2075a 0x102c4>
                    StringLit(Src : Pointer; Offset: W; Len : W) : String
                <POP 20760-20762 StackAdj>                   Δ+8        
            <Call 0x20762 0x102d0>                                              {[«10»]|[-4-]|[«4""»]|[$$…]}
                StringCat2(a, b : String) : String
            <POP 20764-20766 StackAdj>                       Δ+8                {[«10»]|[-4-]}
            <MI 20766  MOVE.L  (A7)+,0x21886>                Δ+4                {[«10»]}
            <POP 20768-2076a StackAdj>                       Δ+10               {}
        <POP 2076a-20770 Naked>                              Σ0         ↓ →0x2072a ←0x2072a
            <MI 2076a  ADDQ.B  #0x1,D7>                                         {}
            <MI 2076c  CMP.B   #0x04,D7>                                        {}
            <MI 2076e  BLE     0x2072a>                                         {}
        <POP 20770-2079a Naked>                              Σ0         ↓
            <MI 20770  MOVE.B  (A6+0xa),-(A7)>               Δ-2                {[2, '(A6+0xa)']}
            <Blob 0x20774 [4] @>                             Δ-4                {[2, '(A6+0xa)']|[«4""»]}
            <Blob 0x2077a [4] @>                             Δ-4                {[2, '(A6+0xa)']|[«4""»]|[«4""»]}
            <Blob 0x2077c [2] @>                             Δ-2                {[2, '(A6+0xa)']|[«4""»]|[«4""»]|[«2""»]}
            <Blob 0x2077e [8] @>                             Δ-8                {[2, '(A6+0xa)']|[«4""»]|[«4""»]|[«2""»]|[«8""»]}
            <Call 0x20790 0x1054a>                                              {[2, '(A6+0xa)']|[«4""»]|[«4""»]|[«2""»]|[«8""»]}
                ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
            <POP 20796-2079a StackAdj>                       Δ+20               {}
        <POP 2079a-207a2 Epilogue>                           Σ0         

0x207a2


@ 207a2
        <LVAR  0x008 1(r)>
    <POP 207a2-2081a Body>                                   Δ+2        
        <POP 207a2-207b8 Prologue>                           Σ0         ↓
        <POP 207b8-207be Naked>                              Σ0         ↓ →0x207c2
            <MI 207b8  TST.B   (A6+0x8)>                                        {}
            <MI 207bc  BEQ     0x207c2>                                         {}
        <POP 207be-207c2 Naked>                              Σ0 Δ-2     →0x207c6
            <MI 207be  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <MI 207c0  BRA     0x207c6>                                         {[#0]}
        <POP 207c2-207c6 Naked>                              Σ0 Δ-2     ↓ ←0x207b8
            <Const 0x207c2 0x1.2>                            Δ-2                {[#1]}
        <POP 207c6-20812 Naked>                              Σ-2 Δ+2    ↓ ←0x207be
            <Call 0x207c6 0x21632>                                              {[-2-]}
                exp_PREP_RUN.SEQ(Sw_2)
            <POP 207cc-207ce StackAdj>                       Δ+2                {}
            <MI 207ce  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <Call 0x207d0 0x216a0>                                              {[#0]}
                exp_SETUP_CLOCKSTOPS.TYP(Sw_2)
            <MI 207d6  CLR.W   (A7)>                                            {[#0]}
            <Call 0x207d8 0x21798>                                              {[#0]}
                exp_SETUP_CLOCKSTOPS.VAL(Sw_2)
            <POP 207de-207e0 StackAdj>                       Δ+2                {}
            <Call 0x207e0 0x21512>                                              {}
                exp_CLEAR_EXCEPTIONS.FIU()
            <Blob 0x207e6 [8] @>                             Δ-8                {[«8""»]}
            <Call 0x207f6 0x214b2>                                              {[«8""»]}
                exp_LOAD_VAR.FIU(Sw_8)
            <POP 207fc-207fe StackAdj>                       Δ+6                {[-2-]}
            <MI 207fe  CLR.W   (A7)>                                            {[-2-]}
            <Call 0x20800 0x21498>                                              {[-2-]}
                exp_PREP_RUN.FIU(Sw_2)
            <POP 20806-20808 StackAdj>                       Δ+2                {}
            <MI 20808  CLR.W   -(A7)>                        Δ-2                {[#0]}
            <Call 0x2080a 0x21854>                                              {[#0]}
                exp_PREP_RUN.IOC(Sw_2)
            <POP 20810-20812 StackAdj>                       Δ+2                {}
        <POP 20812-2081a Epilogue>                           Σ0         

0x2081a


@ 2081a
    <POP 2081a-20880 Body>                                              
        <POP 2081a-20830 Prologue>                           Σ0         ↓
        <POP 20830-20832 RegCacheLoad>                       Σ0         ↓
        <POP 20832-20878 Naked>                              Σ0         ↓
            <Const 0x20832 0x1.2>                            Δ-2                {[#1]}
            <Call 0x20836 0x214f2>                                              {[#1]}
                exp_FREEZE_BOARDS.FIU(Sw_2)
            <POP 2083c-2083e StackAdj>                       Δ+2                {}
            <Call 0x2083e 0x2160a>                                              {}
                exp_RUN_DIAG_PROMS_NOCHECK.SEQ()
            <Call 0x20844 0x216c2>                                              {}
                exp_RUN_NOCHECK.TYP()
            <Call 0x2084a 0x217ba>                                              {}
                exp_RUN_NOCHECK.VAL()
            <Call 0x20850 0x21818>                                              {}
                exp_RUN_NOCHECK.IOC()
            <Call 0x20856 0x21460>                                              {}
                exp_STEP_MACHINE.FIU()
            <Const 0x2085c 0xa.2>                            Δ-2                {[#10]}
            <Const 0x20860 0x2.2>                            Δ-2                {[#10]|[#2]}
            <Call 0x20862 0x1048a>                                              {[#10]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 20868-2086a StackAdj>                       Δ+2                {[#10]}
            <POP 2086a-2086b StackAdj>                       Δ+2                {}
            <Const 0x2086b 0x9.2>                            Δ-2                {[#9]}
            <Const 0x2086e 0x2.2>                            Δ-2                {[#9]|[#2]}
            <Call 0x20870 0x1048a>                                              {[#9]|[#2]}
                DiProcCmd(board : Byte; cmd : Byte)
            <POP 20876-20878 StackAdj>                       Δ+4                {}
        <POP 20878-20880 Epilogue>                           Σ0         

0x20880


@ 20880
        <LVAR  0x00a 1(rw)>
        <LVAR  0x008 1(r)>
        <LVAR -0x002 @ 1(r)>
    <POP 20880-208c0 Body>                                              
        <POP 20880-20896 Prologue>                           Σ0         ↓
        <POP 20896-208b4 Naked>                              Σ0         ↓ →0x208b8
            <Pointer.fp 0x20896 <LVAR -0x002 @ 1(r)>>        Δ-4                {[@@-2]}
            <Call 0x2089a 0x2166c>                                              {[@@-2]}
                exp_HALT.SEQ(&Fr)
            <POP 208a0-208a2 StackAdj>                       Δ+4                {}
            <MI 208a2  CLR.B   (A6+0xa)>                                        {}
            <MI 208a6  MOVE.B  (A6+0x8),D0>                                     {}
            <MI 208aa  NEG.B   D0>                                              {}
            <MI 208ac  ADDQ.B  #0x1,D0>                                         {}
            <MI 208ae  CMP.B   (A6-0x2),D0>                                     {}
            <MI 208b2  BNE     0x208b8>                                         {}
        <POP 208b4-208b8 Naked>                              Σ0         ↓
            <MI 208b4  ADDQ.B  #0x1,(A6+0xa)>                                   {}
        <POP 208b8-208c0 Epilogue>                           Σ0         ←0x20896

0x208c0


@ 208c0
        <LVAR  0x00a 1(w)>
        <LVAR  0x008 1(r)>
        <LVAR -0x006 1(rw)>
        <LVAR -0x007 1(r)>
        <LVAR -0x008 1(rw)>
        <LVAR -0x009 1(r)>
        <LVAR -0x00a @ 1(r)>
        <LVAR -0x012 @>
    <POP 208c0-2094a Body>                                              
        <POP 208c0-208d6 Prologue>                           Σ0         ↓
        <POP 208d6-208e0 RegCacheLoad>                       Σ0         ↓
        <POP 208e0-208ea Naked>                              Σ0         ↓ →0x208f2
            <MI 208e0  CLR.B   (A6-0x7)>                                        {}
            <MI 208e4  TST.B   (A6+0x8)>                                        {}
            <MI 208e8  BEQ     0x208f2>                                         {}
        <POP 208ea-208f2 Naked>                              Σ0         →0x208f8
            <MI 208ea  CLR.B   (A6-0x6)>                                        {}
            <MI 208ec  MOVE.B  #0xff,(A6-0x8)>                                  {}
            <MI 208f0  BRA     0x208f8>                                         {}
        <POP 208f2-208f8 Naked>                              Σ0         ↓ ←0x208e0
            <MI 208f2  MOVE.B  #0x01,(A6-0x6)>                                  {}
            <MI 208f6  CLR.B   (A6-0x8)>                                        {}
        <POP 208f8-2090c Naked>                              Σ0         ↓ ←0x208ea
            <Pointer.fp 0x208f8 <LVAR -0x012 @>>             Δ-4                {[@@-18]}
            <Pointer.fp 0x208fc <LVAR -0x00a @ 1(r)>>        Δ-4                {[@@-18]|[@@-10]}
            <Call 0x20900 0x21756>                                              {[@@-18]|[@@-10]}
                exp_CHECK_CLOCKSTOPS.TYP(&Sr_8, &Sr_2)
            <POP 20906-20908 StackAdj>                       Δ+8                {}
            <MI 20908  MOVEQ.L #0x01,D7>                                        {}
            <MI 2090a  MOVEQ.L #0x00,D6>                                        {}
        <POP 2090c-2091a Naked>                              Σ0         ↓ →0x2091c ←0x2091c
            <POP 0x2090c LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {}
            <MI 20912  MOVE.B  (A6+D6.L-#0x12),D0>                              {}
            <MI 20916  CMP.B   (A6-0x8),D0>                                     {}
            <MI 20918  BEQ     0x2091c>                                         {}
        <POP 2091a-2091c Naked>                              Σ0         ↓
            <MI 2091a  MOVEQ.L #0x00,D7>                                        {}
        <POP 2091c-20922 Naked>                              Σ0         ↓ →0x2090c ←0x2090c
            <MI 2091c  ADDQ.L  #0x1,D6>                                         {}
            <MI 2091e  CMP.L   #0x07,D6>                                        {}
            <MI 20920  BLE     0x2090c>                                         {}
        <POP 20922-2092a Naked>                              Σ0         ↓ →0x2093e
            <MI 20922  TST.B   0x2189a>                                         {}
            <MI 20928  BNE     0x2093e>                                         {}
        <POP 2092a-20934 Naked>                              Σ0         ↓ →0x2093c
            <MI 2092a  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 2092e  CMP.B   (A6-0x7),D0>                                     {}
            <MI 20932  BNE     0x2093c>                                         {}
        <POP 20934-2093c Naked>                              Σ0         ↓ →0x2093e
            <MI 20934  MOVE.B  (A6-0x9),D0>                                     {}
            <MI 20938  CMP.B   (A6-0x6),D0>                                     {}
            <MI 2093a  BEQ     0x2093e>                                         {}
        <POP 2093c-2093e Naked>                              Σ0         ↓ ←0x2092a
            <MI 2093c  MOVEQ.L #0x00,D7>                                        {}
        <POP 2093e-20942 Naked>                              Σ0         ↓ ←0x20922 ←0x20934
            <MI 2093e  MOVE.B  D7,(A6+0xa)>                                     {}
        <POP 20942-2094a Epilogue>                           Σ0         

0x2094a


@ 2094a
        <LVAR  0x00a 1(w)>
        <LVAR  0x008 1(r)>
        <LVAR -0x006 1(rw)>
        <LVAR -0x007 1(r)>
        <LVAR -0x008 1(rw)>
        <LVAR -0x009 1(r)>
        <LVAR -0x00a @ 1(r)>
        <LVAR -0x012 @>
    <POP 2094a-209cc Body>                                              
        <POP 2094a-20960 Prologue>                           Σ0         ↓
        <POP 20960-2096a RegCacheLoad>                       Σ0         ↓
        <POP 2096a-20974 Naked>                              Σ0         ↓ →0x2097c
            <MI 2096a  CLR.B   (A6-0x7)>                                        {}
            <MI 2096e  TST.B   (A6+0x8)>                                        {}
            <MI 20972  BEQ     0x2097c>                                         {}
        <POP 20974-2097c Naked>                              Σ0         →0x20982
            <MI 20974  CLR.B   (A6-0x6)>                                        {}
            <MI 20976  MOVE.B  #0xff,(A6-0x8)>                                  {}
            <MI 2097a  BRA     0x20982>                                         {}
        <POP 2097c-20982 Naked>                              Σ0         ↓ ←0x2096a
            <MI 2097c  MOVE.B  #0x01,(A6-0x6)>                                  {}
            <MI 20980  CLR.B   (A6-0x8)>                                        {}
        <POP 20982-20996 Naked>                              Σ0         ↓ ←0x20974
            <Pointer.fp 0x20982 <LVAR -0x012 @>>             Δ-4                {[@@-18]}
            <Pointer.fp 0x20986 <LVAR -0x00a @ 1(r)>>        Δ-4                {[@@-18]|[@@-10]}
            <Call 0x2098a 0x217d6>                                              {[@@-18]|[@@-10]}
                exp_CHECK_CLOCKSTOPS.VAL(&Sr_8, &Sr_2)
            <POP 20990-20992 StackAdj>                       Δ+8                {}
            <MI 20992  MOVEQ.L #0x01,D7>                                        {}
            <MI 20994  MOVEQ.L #0x00,D6>                                        {}
        <POP 20996-209a4 Naked>                              Σ0         ↓ →0x209a6 ←0x209a6
            <POP 0x20996 LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {}
            <MI 2099c  MOVE.B  (A6+D6.L-#0x12),D0>                              {}
            <MI 209a0  CMP.B   (A6-0x8),D0>                                     {}
            <MI 209a2  BEQ     0x209a6>                                         {}
        <POP 209a4-209a6 Naked>                              Σ0         ↓
            <MI 209a4  MOVEQ.L #0x00,D7>                                        {}
        <POP 209a6-209ac Naked>                              Σ0         ↓ →0x20996 ←0x20996
            <MI 209a6  ADDQ.L  #0x1,D6>                                         {}
            <MI 209a8  CMP.L   #0x07,D6>                                        {}
            <MI 209aa  BLE     0x20996>                                         {}
        <POP 209ac-209b6 Naked>                              Σ0         ↓ →0x209be
            <MI 209ac  MOVE.B  (A6-0xa),D0>                                     {}
            <MI 209b0  CMP.B   (A6-0x7),D0>                                     {}
            <MI 209b4  BNE     0x209be>                                         {}
        <POP 209b6-209be Naked>                              Σ0         ↓ →0x209c0
            <MI 209b6  MOVE.B  (A6-0x9),D0>                                     {}
            <MI 209ba  CMP.B   (A6-0x6),D0>                                     {}
            <MI 209bc  BEQ     0x209c0>                                         {}
        <POP 209be-209c0 Naked>                              Σ0         ↓ ←0x209ac
            <MI 209be  MOVEQ.L #0x00,D7>                                        {}
        <POP 209c0-209c4 Naked>                              Σ0         ↓ ←0x209b6
            <MI 209c0  MOVE.B  D7,(A6+0xa)>                                     {}
        <POP 209c4-209cc Epilogue>                           Σ0         

0x209cc


@ 209cc
        <LVAR  0x00a 1(w)>
        <LVAR  0x008 1(r)>
        <LVAR -0x006 1(rw)>
        <LVAR -0x00e @>
    <POP 209cc-20a28 Body>                                              
        <POP 209cc-209e2 Prologue>                           Σ0         ↓
        <POP 209e2-209e8 RegCacheLoad>                       Σ0         ↓
        <POP 209e8-209ee Naked>                              Σ0         ↓ →0x209f4
            <MI 209e8  TST.B   (A6+0x8)>                                        {}
            <MI 209ec  BEQ     0x209f4>                                         {}
        <POP 209ee-209f4 Naked>                              Σ0         →0x209f6
            <MI 209ee  MOVE.B  #0xff,(A6-0x6)>                                  {}
            <MI 209f2  BRA     0x209f6>                                         {}
        <POP 209f4-209f6 Naked>                              Σ0         ↓ ←0x209e8
            <MI 209f4  CLR.B   (A6-0x6)>                                        {}
        <POP 209f6-20a06 Naked>                              Σ0         ↓ ←0x209ee
            <Pointer.fp 0x209f6 <LVAR -0x00e @>>             Δ-4                {[@@-14]}
            <Call 0x209fa 0x2147e>                                              {[@@-14]}
                exp_READ_VAR.FIU(&Sr_8)
            <POP 20a00-20a02 StackAdj>                       Δ+4                {}
            <MI 20a02  MOVEQ.L #0x01,D7>                                        {}
            <MI 20a04  MOVEQ.L #0x00,D6>                                        {}
        <POP 20a06-20a14 Naked>                              Σ0         ↓ →0x20a16 ←0x20a16
            <POP 0x20a06 LimitCheck 0x0 ≤ D6 ≤ 0x7>                             {}
            <MI 20a0c  MOVE.B  (A6+D6.L-#0xe),D0>                               {}
            <MI 20a10  CMP.B   (A6-0x6),D0>                                     {}
            <MI 20a12  BEQ     0x20a16>                                         {}
        <POP 20a14-20a16 Naked>                              Σ0         ↓
            <MI 20a14  MOVEQ.L #0x00,D7>                                        {}
        <POP 20a16-20a1c Naked>                              Σ0         ↓ →0x20a06 ←0x20a06
            <MI 20a16  ADDQ.L  #0x1,D6>                                         {}
            <MI 20a18  CMP.L   #0x07,D6>                                        {}
            <MI 20a1a  BLE     0x20a06>                                         {}
        <POP 20a1c-20a20 Naked>                              Σ0         ↓
            <MI 20a1c  MOVE.B  D7,(A6+0xa)>                                     {}
        <POP 20a20-20a28 Epilogue>                           Σ0         

0x20a28


@ 20a28
        <LVAR  0x00a 1(rw)>
        <LVAR  0x008 1(r)>
        <LVAR -0x002 @ 1(r)>
    <POP 20a28-20a64 Body>                                              
        <POP 20a28-20a3e Prologue>                           Σ0         ↓
        <POP 20a3e-20a58 Naked>                              Σ0         ↓ →0x20a5c
            <Pointer.fp 0x20a3e <LVAR -0x002 @ 1(r)>>        Δ-4                {[@@-2]}
            <Call 0x20a42 0x21834>                                              {[@@-2]}
                exp_READ_CLOCKSTOP.IOC(&Fr)
            <POP 20a48-20a4a StackAdj>                       Δ+4                {}
            <MI 20a4a  CLR.B   (A6+0xa)>                                        {}
            <MI 20a4e  MOVE.B  (A6-0x2),D0>                                     {}
            <MI 20a52  CMP.B   (A6+0x8),D0>                                     {}
            <MI 20a56  BNE     0x20a5c>                                         {}
        <POP 20a58-20a5c Naked>                              Σ0         ↓
            <MI 20a58  ADDQ.B  #0x1,(A6+0xa)>                                   {}
        <POP 20a5c-20a64 Epilogue>                           Σ0         ←0x20a3e

0x20a64


@ 20a64
        <LVAR  0x00a 4(w)>
        <LVAR  0x008 1(r)>
    <POP 20a64-20b00 Body>                                              
        <POP 20a64-20a7a Prologue>                           Σ0         ↓
        <POP 20a7a-20a80 RegCacheLoad>                       Σ0         ↓
        <POP 20a80-20a96 Naked>                              Σ0         ↓ →0x20a9c
            <MI 20a80  MOVEQ.L #0x00,D7>                                        {}
            <POP 20a82-20a84 StackAdj>                       Δ-2                {[-2-]}
            <MI 20a84  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[-2-]|[2, '(A6+0x8)']}
            <Call 0x20a86 0x208c0>                                              {[-2-]|[2, '(A6+0x8)']}
            <POP 20a8a-20a8c StackAdj>                       Δ+2                {[-2-]}
            <MI 20a8c  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20a8e  EXTB.W  D0>                                              {}
            <POP 0x20a90 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20a92  MOVE.B  D0,D6>                                           {}
            <MI 20a94  BNE     0x20a9c>                                         {}
        <POP 20a96-20a9c Naked>                              Σ0         ↓
            <MI 20a96  ADDI.L  #0x00000010,D7>                                  {}
        <POP 20a9c-20ab0 Naked>                              Σ0         ↓ →0x20ab2 ←0x20a80
            <POP 20a9c-20a9e StackAdj>                       Δ-2                {[-2-]}
            <MI 20a9e  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[-2-]|[2, '(A6+0x8)']}
            <Call 0x20aa0 0x2094a>                                              {[-2-]|[2, '(A6+0x8)']}
            <POP 20aa4-20aa6 StackAdj>                       Δ+2                {[-2-]}
            <MI 20aa6  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20aa8  EXTB.W  D0>                                              {}
            <POP 0x20aaa LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20aac  MOVE.B  D0,D6>                                           {}
            <MI 20aae  BNE     0x20ab2>                                         {}
        <POP 20ab0-20ab2 Naked>                              Σ0         ↓
            <MI 20ab0  ADDQ.L  #0x8,D7>                                         {}
        <POP 20ab2-20ac6 Naked>                              Σ0         ↓ →0x20ac8 ←0x20a9c
            <POP 20ab2-20ab4 StackAdj>                       Δ-2                {[-2-]}
            <MI 20ab4  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[-2-]|[2, '(A6+0x8)']}
            <Call 0x20ab6 0x209cc>                                              {[-2-]|[2, '(A6+0x8)']}
            <POP 20aba-20abc StackAdj>                       Δ+2                {[-2-]}
            <MI 20abc  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20abe  EXTB.W  D0>                                              {}
            <POP 0x20ac0 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20ac2  MOVE.B  D0,D6>                                           {}
            <MI 20ac4  BNE     0x20ac8>                                         {}
        <POP 20ac6-20ac8 Naked>                              Σ0         ↓
            <MI 20ac6  ADDQ.L  #0x4,D7>                                         {}
        <POP 20ac8-20adc Naked>                              Σ0         ↓ →0x20ade ←0x20ab2
            <POP 20ac8-20aca StackAdj>                       Δ-2                {[-2-]}
            <MI 20aca  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[-2-]|[2, '(A6+0x8)']}
            <Call 0x20acc 0x20a28>                                              {[-2-]|[2, '(A6+0x8)']}
            <POP 20ad0-20ad2 StackAdj>                       Δ+2                {[-2-]}
            <MI 20ad2  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20ad4  EXTB.W  D0>                                              {}
            <POP 0x20ad6 LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20ad8  MOVE.B  D0,D6>                                           {}
            <MI 20ada  BNE     0x20ade>                                         {}
        <POP 20adc-20ade Naked>                              Σ0         ↓
            <MI 20adc  ADDQ.L  #0x2,D7>                                         {}
        <POP 20ade-20af2 Naked>                              Σ0         ↓ →0x20af4 ←0x20ac8
            <POP 20ade-20ae0 StackAdj>                       Δ-2                {[-2-]}
            <MI 20ae0  MOVE.B  (A6+0x8),-(A7)>               Δ-2                {[-2-]|[2, '(A6+0x8)']}
            <Call 0x20ae2 0x20880>                                              {[-2-]|[2, '(A6+0x8)']}
            <POP 20ae6-20ae8 StackAdj>                       Δ+2                {[-2-]}
            <MI 20ae8  MOVE.B  (A7)+,D0>                     Δ+2                {}
            <MI 20aea  EXTB.W  D0>                                              {}
            <POP 0x20aec LimitCheck 0x0 ≤ D0 ≤ 0x1>                             {}
            <MI 20aee  MOVE.B  D0,D6>                                           {}
            <MI 20af0  BNE     0x20af4>                                         {}
        <POP 20af2-20af4 Naked>                              Σ0         ↓
            <MI 20af2  ADDQ.L  #0x1,D7>                                         {}
        <POP 20af4-20af8 Naked>                              Σ0         ↓ ←0x20ade
            <MI 20af4  MOVE.L  D7,(A6+0xa)>                                     {}
        <POP 20af8-20b00 Epilogue>                           Σ0         

0x20b00


@ 20b00
    <POP 20b00-20dce Body>                                   Δ+36       
        <POP 20b00-20b16 Prologue>                           Σ0         ↓
        <POP 20b16-20b32 RegCacheLoad>                       Σ0         ↓
        <POP 20b32-20b5c Naked>                              Σ0         ↓
            <MI 20b32  MOVE.B  #0x01,0x2189a>                                   {}
            <MI 20b3a  MOVEQ.L #0x01,D7>                                        {}
            <MI 20b3c  MOVEQ.L #0x00,D6>                                        {}
            <MI 20b3e  MOVE.B  #0x02,0x2188a>                                   {}
            <MI 20b44  MOVE.B  #0x02,0x21890>                                   {}
            <Call 0x20b4a 0x21738>                                              {}
                exp_INIT_CSTOP_RF.TYP()
            <Call 0x20b50 0x216f8>                                              {}
                exp_INIT_EVENT_WCS.TYP()
            <Call 0x20b56 0x21718>                                              {}
                exp_INIT_CSTOP_WCS.TYP()
        <POP 20b5c-20ba4 Naked>                              Σ0         ↓ →0x20d6e ←0x20db2
            <POP 0x20b5c LimitCheck 0x0 ≤ D6 ≤ 0x12>                            {}
            <MI 20b66  MOVE.L  D6,D0>                                           {}
            <MI 20b68  ASL.L   #0x3,D0>                                         {}
            <MI 20b6a  LEA.L   0x201fa,A0>                                      {}
            <MI 20b6c  MOVE.B  (A0+D0.L+#0x2),-(A7)>         Δ-2                {[2, '(A0+D0.L+#0x2)']}
            <Call 0x20b70 0x207a2>                                              {[2, '(A0+D0.L+#0x2)']}
            <POP 20b74-20b76 StackAdj>                       Δ+2                {}
            <MI 20b76  LEA.L   0x201fa,A0>                                      {}
            <MI 20b78  MOVE.W  (A0+D0.L),-(A7)>              Δ-2                {[2, '(A0+D0.L)']}
            <Call 0x20b7c 0x216de>                                              {[2, '(A0+D0.L)']}
                exp_PREP_RUN.TYP(Sw_2)
            <POP 20b82-20b84 StackAdj>                       Δ+2                {}
            <Call 0x20b84 0x2081a>                                              {}
            <POP 20b88-20b8a StackAdj>                       Δ-4                {[-4-]}
            <MI 20b8a  LEA.L   0x201fa,A0>                                      {[-4-]}
            <MI 20b8c  MOVE.B  (A0+D0.L+#0x3),-(A7)>         Δ-2                {[-4-]|[2, '(A0+D0.L+#0x3)']}
            <Call 0x20b90 0x20a64>                                              {[-4-]|[2, '(A0+D0.L+#0x3)']}
            <POP 20b94-20b96 StackAdj>                       Δ+2                {[-4-]}
            <MI 20b96  MOVE.L  (A7)+,D5>                     Δ+4                {}
            <MI 20b98  MOVE.L  D5,D1>                                           {}
            <MI 20b9a  CMPI.L  #0x0000001f,D1>                                  {}
            <MI 20ba0  BHI     0x20d6e>                                         {}
        <POP 20ba4-20bae Naked>                              Σ0         →0x20bee →0x20bf2 →0x20c20 →0x20d6e →0x20c4c →0x20d6e →0x20d6e →0x20d6e →0x20c7c →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20cac →0x20cf6 →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d6e →0x20d1c
            <MI 20ba4  ADD.W   D1,D1>                                           {}
            <MI 20ba6  SWITCH  D1.W>                                            {}
        <POP 20bee-20bf2 Naked>                              Σ0         →0x20db2 ←0x20ba4
            <MI 20bee  BRA     0x20db2>                                         {}
        <POP 20bf2-20c0a Naked>                              Σ0         ↓ →0x20c10 ←0x20ba4
            <MI 20bf2  MOVE.B  #0x05,0x21878>                                   {}
            <MI 20bf6  MOVE.B  #0x03,0x2188a>                                   {}
            <MI 20bfc  LEA.L   0x201fa,A0>                                      {}
            <MI 20bfe  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20c02  LEA.L   0x201fa,A0>                                      {}
            <MI 20c04  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20c08  BNE     0x20c10>                                         {}
        <POP 20c0a-20c10 Naked>                              Σ0 Δ-4     →0x20c16
            <MI 20c0a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c0c 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20c0e  BRA     0x20c16>                                         {[#0]|[#3]}
        <POP 20c10-20c16 Naked>                              Σ0 Δ-4     ↓ ←0x20bf2
            <MI 20c10  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20c12  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c14 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20c16-20c20 Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20c0a
            <Call 0x20c16 0x2065c>                                              {[-4-]}
            <POP 20c1a-20c1c StackAdj>                       Δ+4                {}
            <MI 20c1c  BRA     0x20db2>                                         {}
        <POP 20c20-20c36 Naked>                              Σ0         ↓ →0x20c3c ←0x20ba4
            <MI 20c20  MOVE.B  #0x02,0x21878>                                   {}
            <MI 20c22  CLR.B   0x2188a>                                         {}
            <MI 20c28  LEA.L   0x201fa,A0>                                      {}
            <MI 20c2a  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20c2e  LEA.L   0x201fa,A0>                                      {}
            <MI 20c30  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20c34  BNE     0x20c3c>                                         {}
        <POP 20c36-20c3c Naked>                              Σ0 Δ-4     →0x20c42
            <MI 20c36  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c38 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20c3a  BRA     0x20c42>                                         {[#0]|[#3]}
        <POP 20c3c-20c42 Naked>                              Σ0 Δ-4     ↓ ←0x20c20
            <MI 20c3c  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20c3e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c40 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20c42-20c4c Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20c36
            <Call 0x20c42 0x2065c>                                              {[-4-]}
            <POP 20c46-20c48 StackAdj>                       Δ+4                {}
            <MI 20c48  BRA     0x20db2>                                         {}
        <POP 20c4c-20c66 Naked>                              Σ0         ↓ →0x20c6c ←0x20ba4
            <MI 20c4c  MOVE.B  #0x06,0x21878>                                   {}
            <MI 20c50  MOVE.B  #0x04,0x2188a>                                   {}
            <MI 20c58  LEA.L   0x201fa,A0>                                      {}
            <MI 20c5a  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20c5e  LEA.L   0x201fa,A0>                                      {}
            <MI 20c60  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20c64  BNE     0x20c6c>                                         {}
        <POP 20c66-20c6c Naked>                              Σ0 Δ-4     →0x20c72
            <MI 20c66  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c68 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20c6a  BRA     0x20c72>                                         {[#0]|[#3]}
        <POP 20c6c-20c72 Naked>                              Σ0 Δ-4     ↓ ←0x20c4c
            <MI 20c6c  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20c6e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c70 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20c72-20c7c Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20c66
            <Call 0x20c72 0x2065c>                                              {[-4-]}
            <POP 20c76-20c78 StackAdj>                       Δ+4                {}
            <MI 20c78  BRA     0x20db2>                                         {}
        <POP 20c7c-20c96 Naked>                              Σ0         ↓ →0x20c9c ←0x20ba4
            <MI 20c7c  MOVE.B  #0x04,0x21878>                                   {}
            <MI 20c80  MOVE.B  #0x01,0x2188a>                                   {}
            <MI 20c88  LEA.L   0x201fa,A0>                                      {}
            <MI 20c8a  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20c8e  LEA.L   0x201fa,A0>                                      {}
            <MI 20c90  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20c94  BNE     0x20c9c>                                         {}
        <POP 20c96-20c9c Naked>                              Σ0 Δ-4     →0x20ca2
            <MI 20c96  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20c98 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20c9a  BRA     0x20ca2>                                         {[#0]|[#3]}
        <POP 20c9c-20ca2 Naked>                              Σ0 Δ-4     ↓ ←0x20c7c
            <MI 20c9c  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20c9e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20ca0 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20ca2-20cac Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20c96
            <Call 0x20ca2 0x2065c>                                              {[-4-]}
            <POP 20ca6-20ca8 StackAdj>                       Δ+4                {}
            <MI 20ca8  BRA     0x20db2>                                         {}
        <POP 20cac-20cba Naked>                              Σ0         ↓ →0x20cc4 ←0x20ba4
            <MI 20cac  LEA.L   0x201fa,A0>                                      {}
            <MI 20cae  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20cb2  LEA.L   0x201fa,A0>                                      {}
            <MI 20cb4  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20cb8  BEQ     0x20cc4>                                         {}
        <POP 20cba-20cc4 Naked>                              Σ0 Δ-4     →0x20cec
            <MI 20cba  MOVE.B  #0x2a,0x21878>                                   {}
            <MI 20cbc  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20cbe 0x7.2>                            Δ-2                {[#0]|[#7]}
            <MI 20cc2  BRA     0x20cec>                                         {[#0]|[#7]}
        <POP 20cc4-20cec Naked>                              Σ0 Δ-4     ↓ ←0x20cac
            <MI 20cc4  MOVE.B  #0x03,0x21878>                                   {}
            <MI 20cc6  MOVE.B  #0x02,0x21879>                                   {}
            <MI 20cc8  MOVE.B  #0x06,0x2187a>                                   {}
            <MI 20cd0  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 20cd8  MOVE.B  #0x05,0x2187c>                                   {}
            <MI 20ce0  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 20ce6  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20ce8 0x9.2>                            Δ-2                {[#0]|[#9]}
        <POP 20cec-20cf6 Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20cba
            <Call 0x20cec 0x2065c>                                              {[-4-]}
            <POP 20cf0-20cf2 StackAdj>                       Δ+4                {}
            <MI 20cf2  BRA     0x20db2>                                         {}
        <POP 20cf6-20d06 Naked>                              Σ0         ↓ →0x20d0e ←0x20ba4
            <MI 20cf6  MOVE.B  #0x03,0x21878>                                   {}
            <MI 20cf8  LEA.L   0x201fa,A0>                                      {}
            <MI 20cfa  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20cfe  LEA.L   0x201fa,A0>                                      {}
            <MI 20d00  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20d04  BEQ     0x20d0e>                                         {}
        <POP 20d06-20d0e Naked>                              Σ0 Δ-4     →0x20d12
            <MI 20d06  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20d08 0x6.2>                            Δ-2                {[#0]|[#6]}
            <MI 20d0c  BRA     0x20d12>                                         {[#0]|[#6]}
        <POP 20d0e-20d12 Naked>                              Σ0 Δ-4     ↓ ←0x20cf6
            <MI 20d0e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20d10 0x3.2>                            Δ-2                {[#0]|[#3]}
        <POP 20d12-20d1c Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20d06
            <Call 0x20d12 0x2065c>                                              {[-4-]}
            <POP 20d16-20d18 StackAdj>                       Δ+4                {}
            <MI 20d18  BRA     0x20db2>                                         {}
        <POP 20d1c-20d2c Naked>                              Σ0         ↓ →0x20d34 ←0x20ba4
            <MI 20d1c  MOVE.B  #0x03,0x21878>                                   {}
            <MI 20d1e  LEA.L   0x201fa,A0>                                      {}
            <MI 20d20  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20d24  LEA.L   0x201fa,A0>                                      {}
            <MI 20d26  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20d2a  BEQ     0x20d34>                                         {}
        <POP 20d2c-20d34 Naked>                              Σ0 Δ-4     →0x20d66
            <MI 20d2c  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20d2e 0x4.2>                            Δ-2                {[#0]|[#4]}
            <MI 20d32  BRA     0x20d66>                                         {[#0]|[#4]}
        <POP 20d34-20d38 Naked>                              Σ0         ↓ →0x20d40 ←0x20d1c
            <MI 20d34  TST.B   D7>                                              {}
            <MI 20d36  BNE     0x20d40>                                         {}
        <POP 20d38-20d40 Naked>                              Σ0 Δ-4     →0x20d66
            <MI 20d38  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20d3a 0x5.2>                            Δ-2                {[#0]|[#5]}
            <MI 20d3e  BRA     0x20d66>                                         {[#0]|[#5]}
        <POP 20d40-20d66 Naked>                              Σ0 Δ-4     ↓ ←0x20d34
            <MI 20d40  MOVE.B  #0x02,0x21879>                                   {}
            <MI 20d42  MOVE.B  #0x06,0x2187a>                                   {}
            <MI 20d4a  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 20d52  MOVE.B  #0x05,0x2187c>                                   {}
            <MI 20d5a  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 20d60  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20d62 0x1.2>                            Δ-2                {[#0]|[#1]}
        <POP 20d66-20d6e Naked>                              Σ-4 Δ+4    →0x20db2 ←0x20d2c ←0x20d38
            <Call 0x20d66 0x2065c>                                              {[-4-]}
            <POP 20d6a-20d6c StackAdj>                       Δ+4                {}
            <MI 20d6c  BRA     0x20db2>                                         {}
        <POP 20d6e-20d9e Naked>                              Σ0         ↓ →0x20da6 ←0x20b5c ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4 ←0x20ba4
            <MI 20d6e  MOVE.B  #0x03,0x21878>                                   {}
            <MI 20d70  MOVE.B  #0x02,0x21879>                                   {}
            <MI 20d72  MOVE.B  #0x06,0x2187a>                                   {}
            <MI 20d7a  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 20d82  MOVE.B  #0x05,0x2187c>                                   {}
            <MI 20d8a  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 20d90  LEA.L   0x201fa,A0>                                      {}
            <MI 20d92  MOVE.L  (A0+D0.L+#0x4),0x2188c>                          {}
            <MI 20d96  LEA.L   0x201fa,A0>                                      {}
            <MI 20d98  TST.B   (A0+D0.L+#0x3)>                                  {}
            <MI 20d9c  BEQ     0x20da6>                                         {}
        <POP 20d9e-20da6 Naked>                              Σ0 Δ-4     →0x20dac
            <MI 20d9e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20da0 0x8.2>                            Δ-2                {[#0]|[#8]}
            <MI 20da4  BRA     0x20dac>                                         {[#0]|[#8]}
        <POP 20da6-20dac Naked>                              Σ0 Δ-4     ↓ ←0x20d6e
            <MI 20da6  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20da8 0x9.2>                            Δ-2                {[#0]|[#9]}
        <POP 20dac-20db2 Naked>                              Σ-4 Δ+4    ↓ ←0x20d9e
            <Call 0x20dac 0x2065c>                                              {[-4-]}
            <POP 20db0-20db2 StackAdj>                       Δ+4                {}
        <POP 20db2-20dc0 Naked>                              Σ0         ↓ →0x20b5c ←0x20bee ←0x20c16 ←0x20c42 ←0x20c72 ←0x20ca2 ←0x20cec ←0x20d12 ←0x20d66
            <MI 20db2  ADDQ.L  #0x1,D6>                                         {}
            <MI 20db4  MOVEQ.L #0x00,D7>                                        {}
            <MI 20db6  CMPI.L  #0x00000012,D6>                                  {}
            <MI 20dbc  BLE     0x20b5c>                                         {}
        <POP 20dc0-20dc6 Naked>                              Σ0         ↓
            <MI 20dc0  CLR.B   0x2189a>                                         {}
        <POP 20dc6-20dce Epilogue>                           Σ0         

0x20dce


@ 20dce
    <POP 20dce-21052 Body>                                   Δ+32       
        <POP 20dce-20de4 Prologue>                           Σ0         ↓
        <POP 20de4-20e00 RegCacheLoad>                       Σ0         ↓
        <POP 20e00-20e12 Naked>                              Σ0         ↓
            <MI 20e00  MOVEQ.L #0x00,D7>                                        {}
            <MI 20e02  MOVE.B  #0x04,0x2188a>                                   {}
            <MI 20e0a  MOVE.B  #0x04,0x21890>                                   {}
        <POP 20e12-20e62 Naked>                              Σ0         ↓ →0x20ffe ←0x21042
            <Const 0x20e12 0x1.2>                            Δ-2                {[#1]}
            <Call 0x20e16 0x207a2>                                              {[#1]}
            <POP 20e1a-20e1c StackAdj>                       Δ+2                {}
            <POP 0x20e1c LimitCheck 0x0 ≤ D7 ≤ 0x2>                             {}
            <MI 20e22  MOVE.L  D7,D4>                                           {}
            <MI 20e24  MOVEQ.L #0x06,D3>                                        {}
            <Call 0x20e26 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 20e2c  LEA.L   0x20292,A0>                                      {}
            <MI 20e2e  MOVE.B  (A0+D4.L),-(A7)>              Δ-2                {[2, '(A0+D4.L)']}
            <Call 0x20e32 0x214cc>                                              {[2, '(A0+D4.L)']}
                exp_LOAD_MAR_STATE_BITS.FIU(Sw_1)
            <MI 20e38  CLR.W   (A7)>                                            {[2, '(A0+D4.L)']}
            <Call 0x20e3a 0x21498>                                              {[2, '(A0+D4.L)']}
                exp_PREP_RUN.FIU(Sw_2)
            <POP 20e40-20e42 StackAdj>                       Δ+2                {}
            <Call 0x20e42 0x2081a>                                              {}
            <POP 20e46-20e48 StackAdj>                       Δ-4                {[-4-]}
            <MI 20e48  LEA.L   0x20292,A0>                                      {[-4-]}
            <MI 20e4a  MOVE.B  (A0+D4.L+#0x1),-(A7)>         Δ-2                {[-4-]|[2, '(A0+D4.L+#0x1)']}
            <Call 0x20e4e 0x20a64>                                              {[-4-]|[2, '(A0+D4.L+#0x1)']}
            <POP 20e52-20e54 StackAdj>                       Δ+2                {[-4-]}
            <MI 20e54  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 20e56  MOVE.L  D6,D0>                                           {}
            <MI 20e58  CMPI.L  #0x0000001f,D0>                                  {}
            <MI 20e5e  BHI     0x20ffe>                                         {}
        <POP 20e62-20e6c Naked>                              Σ0         →0x20eac →0x20eb0 →0x20ede →0x20ffe →0x20f0a →0x20ffe →0x20ffe →0x20ffe →0x20f32 →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20f62 →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20ffe →0x20f8e →0x20ffe →0x20ffe →0x20ffe →0x20fd6
            <MI 20e62  ADD.W   D0,D0>                                           {}
            <MI 20e64  SWITCH  D0.W>                                            {}
        <POP 20eac-20eb0 Naked>                              Σ0         →0x21042 ←0x20e62
            <MI 20eac  BRA     0x21042>                                         {}
        <POP 20eb0-20ec8 Naked>                              Σ0         ↓ →0x20ece ←0x20e62
            <MI 20eb0  MOVE.B  #0x05,0x21878>                                   {}
            <MI 20eb4  MOVE.B  #0x03,0x2188a>                                   {}
            <MI 20eba  LEA.L   0x20292,A0>                                      {}
            <MI 20ebc  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20ec0  LEA.L   0x20292,A0>                                      {}
            <MI 20ec2  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20ec6  BNE     0x20ece>                                         {}
        <POP 20ec8-20ece Naked>                              Σ0 Δ-4     →0x20ed4
            <MI 20ec8  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20eca 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20ecc  BRA     0x20ed4>                                         {[#0]|[#3]}
        <POP 20ece-20ed4 Naked>                              Σ0 Δ-4     ↓ ←0x20eb0
            <MI 20ece  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20ed0  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20ed2 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20ed4-20ede Naked>                              Σ-4 Δ+4    →0x21042 ←0x20ec8
            <Call 0x20ed4 0x2065c>                                              {[-4-]}
            <POP 20ed8-20eda StackAdj>                       Δ+4                {}
            <MI 20eda  BRA     0x21042>                                         {}
        <POP 20ede-20ef4 Naked>                              Σ0         ↓ →0x20efa ←0x20e62
            <MI 20ede  MOVE.B  #0x02,0x21878>                                   {}
            <MI 20ee0  CLR.B   0x2188a>                                         {}
            <MI 20ee6  LEA.L   0x20292,A0>                                      {}
            <MI 20ee8  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20eec  LEA.L   0x20292,A0>                                      {}
            <MI 20eee  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20ef2  BNE     0x20efa>                                         {}
        <POP 20ef4-20efa Naked>                              Σ0 Δ-4     →0x20f00
            <MI 20ef4  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20ef6 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20ef8  BRA     0x20f00>                                         {[#0]|[#3]}
        <POP 20efa-20f00 Naked>                              Σ0 Δ-4     ↓ ←0x20ede
            <MI 20efa  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20efc  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20efe 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20f00-20f0a Naked>                              Σ-4 Δ+4    →0x21042 ←0x20ef4
            <Call 0x20f00 0x2065c>                                              {[-4-]}
            <POP 20f04-20f06 StackAdj>                       Δ+4                {}
            <MI 20f06  BRA     0x21042>                                         {}
        <POP 20f0a-20f1c Naked>                              Σ0         ↓ →0x20f24 ←0x20e62
            <MI 20f0a  MOVE.B  #0x06,0x21878>                                   {}
            <MI 20f0e  LEA.L   0x20292,A0>                                      {}
            <MI 20f10  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20f14  LEA.L   0x20292,A0>                                      {}
            <MI 20f16  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20f1a  BEQ     0x20f24>                                         {}
        <POP 20f1c-20f24 Naked>                              Σ0 Δ-4     →0x20f28
            <MI 20f1c  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20f1e 0x6.2>                            Δ-2                {[#0]|[#6]}
            <MI 20f22  BRA     0x20f28>                                         {[#0]|[#6]}
        <POP 20f24-20f28 Naked>                              Σ0 Δ-4     ↓ ←0x20f0a
            <MI 20f24  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20f26 0x3.2>                            Δ-2                {[#0]|[#3]}
        <POP 20f28-20f32 Naked>                              Σ-4 Δ+4    →0x21042 ←0x20f1c
            <Call 0x20f28 0x2065c>                                              {[-4-]}
            <POP 20f2c-20f2e StackAdj>                       Δ+4                {}
            <MI 20f2e  BRA     0x21042>                                         {}
        <POP 20f32-20f4c Naked>                              Σ0         ↓ →0x20f52 ←0x20e62
            <MI 20f32  MOVE.B  #0x04,0x21878>                                   {}
            <MI 20f36  MOVE.B  #0x01,0x2188a>                                   {}
            <MI 20f3e  LEA.L   0x20292,A0>                                      {}
            <MI 20f40  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20f44  LEA.L   0x20292,A0>                                      {}
            <MI 20f46  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20f4a  BNE     0x20f52>                                         {}
        <POP 20f4c-20f52 Naked>                              Σ0 Δ-4     →0x20f58
            <MI 20f4c  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20f4e 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20f50  BRA     0x20f58>                                         {[#0]|[#3]}
        <POP 20f52-20f58 Naked>                              Σ0 Δ-4     ↓ ←0x20f32
            <MI 20f52  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20f54  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20f56 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20f58-20f62 Naked>                              Σ-4 Δ+4    →0x21042 ←0x20f4c
            <Call 0x20f58 0x2065c>                                              {[-4-]}
            <POP 20f5c-20f5e StackAdj>                       Δ+4                {}
            <MI 20f5e  BRA     0x21042>                                         {}
        <POP 20f62-20f78 Naked>                              Σ0         ↓ →0x20f7e ←0x20e62
            <MI 20f62  MOVE.B  #0x03,0x21878>                                   {}
            <MI 20f64  MOVE.B  #0x02,0x2188a>                                   {}
            <MI 20f6a  LEA.L   0x20292,A0>                                      {}
            <MI 20f6c  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20f70  LEA.L   0x20292,A0>                                      {}
            <MI 20f72  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20f76  BNE     0x20f7e>                                         {}
        <POP 20f78-20f7e Naked>                              Σ0 Δ-4     →0x20f84
            <MI 20f78  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20f7a 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 20f7c  BRA     0x20f84>                                         {[#0]|[#3]}
        <POP 20f7e-20f84 Naked>                              Σ0 Δ-4     ↓ ←0x20f62
            <MI 20f7e  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 20f80  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20f82 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 20f84-20f8e Naked>                              Σ-4 Δ+4    →0x21042 ←0x20f78
            <Call 0x20f84 0x2065c>                                              {[-4-]}
            <POP 20f88-20f8a StackAdj>                       Δ+4                {}
            <MI 20f8a  BRA     0x21042>                                         {}
        <POP 20f8e-20f9c Naked>                              Σ0         ↓ →0x20fa6 ←0x20e62
            <MI 20f8e  LEA.L   0x20292,A0>                                      {}
            <MI 20f90  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20f94  LEA.L   0x20292,A0>                                      {}
            <MI 20f96  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20f9a  BEQ     0x20fa6>                                         {}
        <POP 20f9c-20fa6 Naked>                              Σ0 Δ-4     →0x20fce
            <MI 20f9c  MOVE.B  #0x2a,0x21878>                                   {}
            <MI 20f9e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20fa0 0x7.2>                            Δ-2                {[#0]|[#7]}
            <MI 20fa4  BRA     0x20fce>                                         {[#0]|[#7]}
        <POP 20fa6-20fce Naked>                              Σ0 Δ-4     ↓ ←0x20f8e
            <MI 20fa6  MOVE.B  #0x06,0x21878>                                   {}
            <MI 20faa  MOVE.B  #0x02,0x21879>                                   {}
            <MI 20fac  MOVE.B  #0x03,0x2187a>                                   {}
            <MI 20fb2  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 20fba  MOVE.B  #0x05,0x2187c>                                   {}
            <MI 20fc2  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 20fc8  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20fca 0x9.2>                            Δ-2                {[#0]|[#9]}
        <POP 20fce-20fd6 Naked>                              Σ-4 Δ+4    →0x21042 ←0x20f9c
            <Call 0x20fce 0x2065c>                                              {[-4-]}
            <POP 20fd2-20fd4 StackAdj>                       Δ+4                {}
            <MI 20fd4  BRA     0x21042>                                         {}
        <POP 20fd6-20fe8 Naked>                              Σ0         ↓ →0x20ff0 ←0x20e62
            <MI 20fd6  MOVE.B  #0x06,0x21878>                                   {}
            <MI 20fda  LEA.L   0x20292,A0>                                      {}
            <MI 20fdc  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 20fe0  LEA.L   0x20292,A0>                                      {}
            <MI 20fe2  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 20fe6  BEQ     0x20ff0>                                         {}
        <POP 20fe8-20ff0 Naked>                              Σ0 Δ-4     →0x20ff6
            <MI 20fe8  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20fea 0x4.2>                            Δ-2                {[#0]|[#4]}
            <MI 20fee  BRA     0x20ff6>                                         {[#0]|[#4]}
        <POP 20ff0-20ff6 Naked>                              Σ0 Δ-4     ↓ ←0x20fd6
            <MI 20ff0  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x20ff2 0x5.2>                            Δ-2                {[#0]|[#5]}
        <POP 20ff6-20ffe Naked>                              Σ-4 Δ+4    →0x21042 ←0x20fe8
            <Call 0x20ff6 0x2065c>                                              {[-4-]}
            <POP 20ffa-20ffc StackAdj>                       Δ+4                {}
            <MI 20ffc  BRA     0x21042>                                         {}
        <POP 20ffe-2102e Naked>                              Σ0         ↓ →0x21036 ←0x20e12 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62 ←0x20e62
            <MI 20ffe  MOVE.B  #0x06,0x21878>                                   {}
            <MI 21002  MOVE.B  #0x02,0x21879>                                   {}
            <MI 21004  MOVE.B  #0x03,0x2187a>                                   {}
            <MI 2100a  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 21012  MOVE.B  #0x05,0x2187c>                                   {}
            <MI 2101a  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 21020  LEA.L   0x20292,A0>                                      {}
            <MI 21022  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 21026  LEA.L   0x20292,A0>                                      {}
            <MI 21028  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 2102c  BEQ     0x21036>                                         {}
        <POP 2102e-21036 Naked>                              Σ0 Δ-4     →0x2103c
            <MI 2102e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21030 0x8.2>                            Δ-2                {[#0]|[#8]}
            <MI 21034  BRA     0x2103c>                                         {[#0]|[#8]}
        <POP 21036-2103c Naked>                              Σ0 Δ-4     ↓ ←0x20ffe
            <MI 21036  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21038 0x9.2>                            Δ-2                {[#0]|[#9]}
        <POP 2103c-21042 Naked>                              Σ-4 Δ+4    ↓ ←0x2102e
            <Call 0x2103c 0x2065c>                                              {[-4-]}
            <POP 21040-21042 StackAdj>                       Δ+4                {}
        <POP 21042-2104a Naked>                              Σ0         ↓ →0x20e12 ←0x20eac ←0x20ed4 ←0x20f00 ←0x20f28 ←0x20f58 ←0x20f84 ←0x20fce ←0x20ff6
            <MI 21042  ADDQ.L  #0x1,D7>                                         {}
            <MI 21044  CMP.L   #0x02,D7>                                        {}
            <MI 21046  BLE     0x20e12>                                         {}
        <POP 2104a-21052 Epilogue>                           Σ0         

0x21052


@ 21052
    <POP 21052-21068 Body>                                              
        <POP 21052-21064 Prologue>                           Σ0         ↓
        <POP 21064-21068 Epilogue>                           Σ0         

0x21068


@ 21068
    <POP 21068-21094 Body>                                              
        <POP 21068-2107e Prologue>                           Σ0         ↓
        <POP 2107e-21080 RegCacheLoad>                       Σ0         ↓
        <POP 21080-2108c Naked>                              Σ0         ↓
            <MI 21080  CLR.B   0x2188a>                                         {}
            <MI 21086  CLR.B   0x21890>                                         {}
        <POP 2108c-21094 Epilogue>                           Σ0         

0x21094


@ 21094
    <POP 21094-2135c Body>                                   Δ+32       
        <POP 21094-210aa Prologue>                           Σ0         ↓
        <POP 210aa-210c6 RegCacheLoad>                       Σ0         ↓
        <POP 210c6-210d4 Naked>                              Σ0         ↓
            <MI 210c6  MOVEQ.L #0x00,D7>                                        {}
            <MI 210c8  MOVE.B  #0x03,0x2188a>                                   {}
            <MI 210ce  MOVE.B  #0x03,0x21890>                                   {}
        <POP 210d4-2110a Naked>                              Σ0         →0x21120 →0x21120 →0x21128 →0x21128 →0x21130 →0x21130 →0x21138 →0x21138 →0x21140 →0x21140 →0x21146 ←0x21348
            <POP 0x210d4 LimitCheck 0x0 ≤ D7 ≤ 0xa>                             {}
            <MI 210de  MOVE.L  D7,D4>                                           {}
            <MI 210e0  MOVEQ.L #0x06,D3>                                        {}
            <Call 0x210e2 0x1028c>                                              {}
                ?muls_d3_d4
            <MI 210e8  LEA.L   0x202c4,A0>                                      {}
            <MI 210ea  MOVE.B  (A0+D4.L),-(A7)>              Δ-2                {[2, '(A0+D4.L)']}
            <Call 0x210ee 0x207a2>                                              {[2, '(A0+D4.L)']}
            <POP 210f2-210f4 StackAdj>                       Δ+2                {}
            <MI 210f4  MOVE.L  D7,D0>                                           {}
            <POP 0x210f6 LimitCheck 0x0 ≤ D0 ≤ 0xa>                             {}
            <MI 21100  ADD.W   D0,D0>                                           {}
            <MI 21102  SWITCH  D0.W>                                            {}
        <POP 21120-21128 Naked>                              Σ0         →0x21146 ←0x210d4 ←0x210d4
            <Call 0x21120 0x21582>                                              {}
                exp_SETUP_MICRO_EVENT.SEQ()
            <MI 21126  BRA     0x21146>                                         {}
        <POP 21128-21130 Naked>                              Σ0         →0x21146 ←0x210d4 ←0x210d4
            <Call 0x21128 0x215ea>                                              {}
                exp_SETUP_BAD_HINT.SEQ()
            <MI 2112e  BRA     0x21146>                                         {}
        <POP 21130-21138 Naked>                              Σ0         →0x21146 ←0x210d4 ←0x210d4
            <Call 0x21130 0x215cc>                                              {}
                exp_SETUP_HICCUP.SEQ()
            <MI 21136  BRA     0x21146>                                         {}
        <POP 21138-21140 Naked>                              Σ0         →0x21146 ←0x210d4 ←0x210d4
            <Call 0x21138 0x2155a>                                              {}
                exp_SETUP_MICRO_FIELD_EVENT.SEQ()
            <MI 2113e  BRA     0x21146>                                         {}
        <POP 21140-21146 Naked>                              Σ0         ↓ ←0x210d4 ←0x210d4
            <Call 0x21140 0x215a4>                                              {}
                exp_SETUP_MICRO_EXIT_EVENT.SEQ()
        <POP 21146-21166 Naked>                              Σ0         ↓ →0x21304 ←0x210d4 ←0x21120 ←0x21128 ←0x21130 ←0x21138
            <Call 0x21146 0x2081a>                                              {}
            <POP 2114a-2114c StackAdj>                       Δ-4                {[-4-]}
            <MI 2114c  LEA.L   0x202c4,A0>                                      {[-4-]}
            <MI 2114e  MOVE.B  (A0+D4.L+#0x1),-(A7)>         Δ-2                {[-4-]|[2, '(A0+D4.L+#0x1)']}
            <Call 0x21152 0x20a64>                                              {[-4-]|[2, '(A0+D4.L+#0x1)']}
            <POP 21156-21158 StackAdj>                       Δ+2                {[-4-]}
            <MI 21158  MOVE.L  (A7)+,D6>                     Δ+4                {}
            <MI 2115a  MOVE.L  D6,D0>                                           {}
            <MI 2115c  CMPI.L  #0x0000001f,D0>                                  {}
            <MI 21162  BHI     0x21304>                                         {}
        <POP 21166-21170 Naked>                              Σ0         →0x211b0 →0x211b4 →0x211dc →0x21304 →0x21208 →0x21304 →0x21304 →0x21304 →0x21238 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21268 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21304 →0x21294 →0x212dc
            <MI 21166  ADD.W   D0,D0>                                           {}
            <MI 21168  SWITCH  D0.W>                                            {}
        <POP 211b0-211b4 Naked>                              Σ0         →0x21348 ←0x21166
            <MI 211b0  BRA     0x21348>                                         {}
        <POP 211b4-211c6 Naked>                              Σ0         ↓ →0x211ce ←0x21166
            <MI 211b4  MOVE.B  #0x05,0x21878>                                   {}
            <MI 211b8  LEA.L   0x202c4,A0>                                      {}
            <MI 211ba  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 211be  LEA.L   0x202c4,A0>                                      {}
            <MI 211c0  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 211c4  BEQ     0x211ce>                                         {}
        <POP 211c6-211ce Naked>                              Σ0 Δ-4     →0x211d2
            <MI 211c6  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x211c8 0x6.2>                            Δ-2                {[#0]|[#6]}
            <MI 211cc  BRA     0x211d2>                                         {[#0]|[#6]}
        <POP 211ce-211d2 Naked>                              Σ0 Δ-4     ↓ ←0x211b4
            <MI 211ce  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x211d0 0x3.2>                            Δ-2                {[#0]|[#3]}
        <POP 211d2-211dc Naked>                              Σ-4 Δ+4    →0x21348 ←0x211c6
            <Call 0x211d2 0x2065c>                                              {[-4-]}
            <POP 211d6-211d8 StackAdj>                       Δ+4                {}
            <MI 211d8  BRA     0x21348>                                         {}
        <POP 211dc-211f2 Naked>                              Σ0         ↓ →0x211f8 ←0x21166
            <MI 211dc  MOVE.B  #0x02,0x21878>                                   {}
            <MI 211de  CLR.B   0x2188a>                                         {}
            <MI 211e4  LEA.L   0x202c4,A0>                                      {}
            <MI 211e6  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 211ea  LEA.L   0x202c4,A0>                                      {}
            <MI 211ec  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 211f0  BNE     0x211f8>                                         {}
        <POP 211f2-211f8 Naked>                              Σ0 Δ-4     →0x211fe
            <MI 211f2  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x211f4 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 211f6  BRA     0x211fe>                                         {[#0]|[#3]}
        <POP 211f8-211fe Naked>                              Σ0 Δ-4     ↓ ←0x211dc
            <MI 211f8  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 211fa  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x211fc 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 211fe-21208 Naked>                              Σ-4 Δ+4    →0x21348 ←0x211f2
            <Call 0x211fe 0x2065c>                                              {[-4-]}
            <POP 21202-21204 StackAdj>                       Δ+4                {}
            <MI 21204  BRA     0x21348>                                         {}
        <POP 21208-21222 Naked>                              Σ0         ↓ →0x21228 ←0x21166
            <MI 21208  MOVE.B  #0x06,0x21878>                                   {}
            <MI 2120c  MOVE.B  #0x04,0x2188a>                                   {}
            <MI 21214  LEA.L   0x202c4,A0>                                      {}
            <MI 21216  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 2121a  LEA.L   0x202c4,A0>                                      {}
            <MI 2121c  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 21220  BNE     0x21228>                                         {}
        <POP 21222-21228 Naked>                              Σ0 Δ-4     →0x2122e
            <MI 21222  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21224 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 21226  BRA     0x2122e>                                         {[#0]|[#3]}
        <POP 21228-2122e Naked>                              Σ0 Δ-4     ↓ ←0x21208
            <MI 21228  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 2122a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2122c 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 2122e-21238 Naked>                              Σ-4 Δ+4    →0x21348 ←0x21222
            <Call 0x2122e 0x2065c>                                              {[-4-]}
            <POP 21232-21234 StackAdj>                       Δ+4                {}
            <MI 21234  BRA     0x21348>                                         {}
        <POP 21238-21252 Naked>                              Σ0         ↓ →0x21258 ←0x21166
            <MI 21238  MOVE.B  #0x04,0x21878>                                   {}
            <MI 2123c  MOVE.B  #0x01,0x2188a>                                   {}
            <MI 21244  LEA.L   0x202c4,A0>                                      {}
            <MI 21246  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 2124a  LEA.L   0x202c4,A0>                                      {}
            <MI 2124c  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 21250  BNE     0x21258>                                         {}
        <POP 21252-21258 Naked>                              Σ0 Δ-4     →0x2125e
            <MI 21252  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21254 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 21256  BRA     0x2125e>                                         {[#0]|[#3]}
        <POP 21258-2125e Naked>                              Σ0 Δ-4     ↓ ←0x21238
            <MI 21258  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 2125a  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2125c 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 2125e-21268 Naked>                              Σ-4 Δ+4    →0x21348 ←0x21252
            <Call 0x2125e 0x2065c>                                              {[-4-]}
            <POP 21262-21264 StackAdj>                       Δ+4                {}
            <MI 21264  BRA     0x21348>                                         {}
        <POP 21268-2127e Naked>                              Σ0         ↓ →0x21284 ←0x21166
            <MI 21268  MOVE.B  #0x03,0x21878>                                   {}
            <MI 2126a  MOVE.B  #0x02,0x2188a>                                   {}
            <MI 21270  LEA.L   0x202c4,A0>                                      {}
            <MI 21272  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 21276  LEA.L   0x202c4,A0>                                      {}
            <MI 21278  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 2127c  BNE     0x21284>                                         {}
        <POP 2127e-21284 Naked>                              Σ0 Δ-4     →0x2128a
            <MI 2127e  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21280 0x3.2>                            Δ-2                {[#0]|[#3]}
            <MI 21282  BRA     0x2128a>                                         {[#0]|[#3]}
        <POP 21284-2128a Naked>                              Σ0 Δ-4     ↓ ←0x21268
            <MI 21284  MOVE.B  #0x2a,0x21879>                                   {}
            <MI 21286  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21288 0x2.2>                            Δ-2                {[#0]|[#2]}
        <POP 2128a-21294 Naked>                              Σ-4 Δ+4    →0x21348 ←0x2127e
            <Call 0x2128a 0x2065c>                                              {[-4-]}
            <POP 2128e-21290 StackAdj>                       Δ+4                {}
            <MI 21290  BRA     0x21348>                                         {}
        <POP 21294-212a2 Naked>                              Σ0         ↓ →0x212ac ←0x21166
            <MI 21294  LEA.L   0x202c4,A0>                                      {}
            <MI 21296  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 2129a  LEA.L   0x202c4,A0>                                      {}
            <MI 2129c  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 212a0  BEQ     0x212ac>                                         {}
        <POP 212a2-212ac Naked>                              Σ0 Δ-4     →0x212d4
            <MI 212a2  MOVE.B  #0x2a,0x21878>                                   {}
            <MI 212a4  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x212a6 0x7.2>                            Δ-2                {[#0]|[#7]}
            <MI 212aa  BRA     0x212d4>                                         {[#0]|[#7]}
        <POP 212ac-212d4 Naked>                              Σ0 Δ-4     ↓ ←0x21294
            <MI 212ac  MOVE.B  #0x05,0x21878>                                   {}
            <MI 212b0  MOVE.B  #0x02,0x21879>                                   {}
            <MI 212b2  MOVE.B  #0x06,0x2187a>                                   {}
            <MI 212ba  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 212c2  MOVE.B  #0x03,0x2187c>                                   {}
            <MI 212c8  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 212ce  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x212d0 0x9.2>                            Δ-2                {[#0]|[#9]}
        <POP 212d4-212dc Naked>                              Σ-4 Δ+4    →0x21348 ←0x212a2
            <Call 0x212d4 0x2065c>                                              {[-4-]}
            <POP 212d8-212da StackAdj>                       Δ+4                {}
            <MI 212da  BRA     0x21348>                                         {}
        <POP 212dc-212ee Naked>                              Σ0         ↓ →0x212f6 ←0x21166
            <MI 212dc  MOVE.B  #0x05,0x21878>                                   {}
            <MI 212e0  LEA.L   0x202c4,A0>                                      {}
            <MI 212e2  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 212e6  LEA.L   0x202c4,A0>                                      {}
            <MI 212e8  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 212ec  BEQ     0x212f6>                                         {}
        <POP 212ee-212f6 Naked>                              Σ0 Δ-4     →0x212fc
            <MI 212ee  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x212f0 0x4.2>                            Δ-2                {[#0]|[#4]}
            <MI 212f4  BRA     0x212fc>                                         {[#0]|[#4]}
        <POP 212f6-212fc Naked>                              Σ0 Δ-4     ↓ ←0x212dc
            <MI 212f6  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x212f8 0x5.2>                            Δ-2                {[#0]|[#5]}
        <POP 212fc-21304 Naked>                              Σ-4 Δ+4    →0x21348 ←0x212ee
            <Call 0x212fc 0x2065c>                                              {[-4-]}
            <POP 21300-21302 StackAdj>                       Δ+4                {}
            <MI 21302  BRA     0x21348>                                         {}
        <POP 21304-21334 Naked>                              Σ0         ↓ →0x2133c ←0x21146 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166 ←0x21166
            <MI 21304  MOVE.B  #0x05,0x21878>                                   {}
            <MI 21308  MOVE.B  #0x02,0x21879>                                   {}
            <MI 2130a  MOVE.B  #0x06,0x2187a>                                   {}
            <MI 21312  MOVE.B  #0x04,0x2187b>                                   {}
            <MI 2131a  MOVE.B  #0x03,0x2187c>                                   {}
            <MI 21320  MOVE.B  #0x2a,0x2187d>                                   {}
            <MI 21326  LEA.L   0x202c4,A0>                                      {}
            <MI 21328  MOVE.L  (A0+D4.L+#0x2),0x2188c>                          {}
            <MI 2132c  LEA.L   0x202c4,A0>                                      {}
            <MI 2132e  TST.B   (A0+D4.L+#0x1)>                                  {}
            <MI 21332  BEQ     0x2133c>                                         {}
        <POP 21334-2133c Naked>                              Σ0 Δ-4     →0x21342
            <MI 21334  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x21336 0x8.2>                            Δ-2                {[#0]|[#8]}
            <MI 2133a  BRA     0x21342>                                         {[#0]|[#8]}
        <POP 2133c-21342 Naked>                              Σ0 Δ-4     ↓ ←0x21304
            <MI 2133c  CLR.B   -(A7)>                        Δ-2                {[#0]}
            <Const 0x2133e 0x9.2>                            Δ-2                {[#0]|[#9]}
        <POP 21342-21348 Naked>                              Σ-4 Δ+4    ↓ ←0x21334
            <Call 0x21342 0x2065c>                                              {[-4-]}
            <POP 21346-21348 StackAdj>                       Δ+4                {}
        <POP 21348-21354 Naked>                              Σ0         ↓ →0x210d4 ←0x211b0 ←0x211d2 ←0x211fe ←0x2122e ←0x2125e ←0x2128a ←0x212d4 ←0x212fc
            <MI 21348  ADDQ.L  #0x1,D7>                                         {}
            <MI 2134a  CMPI.L  #0x0000000a,D7>                                  {}
            <MI 21350  BLE     0x210d4>                                         {}
        <POP 21354-2135c Epilogue>                           Σ0         

0x2135c


@ 2135c
START
    <POP 2135c--0001 Body>                                              
        <POP 2135c-21366 Prologue>                           Σ0         
        <POP 21366-21376 RegCacheLoad>                       Σ0         ↓
        <POP 21376-213d8 Naked>                              Σ0         ↓
            <Call 0x21376 0x10398>                                              {}
                FSCALL_10398
            <Const 0x2137c 0x0.4>                            Δ-4                {[##0]}
            <Call 0x21380 0x104d8>                                              {[##0]}
                ExpInit(a : Long)
            <POP 21386-21388 StackAdj>                       Δ+4                {}
            <Const 0x21388 0x21876.4>                        Δ-4                {[##137334]}
            <Const 0x2138e 0x21877.4>                        Δ-4                {[##137334]|[##137335]}
            <Call 0x21390 0x10544>                                              {[##137334]|[##137335]}
                IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
            <POP 21396-21398 StackAdj>                       Δ+6                {[-2-]}
            <POP 21398-21399 StackAdj>                       Δ+2                {}
            <Blob 0x21399 [2] @>                             Δ-2                {[«2""»]}
            <Call 0x2139a 0x104d2>                                              {[«2""»]}
                SetExpInitDone(a : Byte)
            <POP 213a0-213a1 StackAdj>                       Δ+2                {}
            <Blob 0x213a1 [2] @>                             Δ-2                {[«2""»]}
            <Blob 0x213a4 [2] @>                             Δ-2                {[«2""»]|[«2""»]}
            <Blob 0x213a8 [2] @>                             Δ-2                {[«2""»]|[«2""»]|[«2""»]}
            <POP 213ac-213ae StackAdj>                       Δ-4                {[«2""»]|[«2""»]|[«2""»]|[-4-]}
            <Lit 0x213ae 6>                                                     {[«2""»]|[«2""»]|[«2""»]|[$$P2STOP]}
            <MI 213c0  MOVE.L  (A7)+,0x21882>                Δ+4                {[«2""»]|[«2""»]|[«2""»]}
            <POP 213c6-213c8 StackAdj>                       Δ+6                {}
            <Const 0x213c8 0x21886.4>                        Δ-4                {[##137350]}
            <Call 0x213ce 0x102b8>                                              {[##137350]}
                NewString(VAR a : String)
            <POP 213d4-213d6 StackAdj>                       Δ+4                {}
            <MI 213d6  MOVEQ.L #0x00,D0>                                        {}
        <POP 213d8-213f4 Naked>                              Σ0         ↓ →0x213d8 ←0x213d8
            <MI 213d8  MOVE.L  D0,0x2189e>                                      {}
            <POP 0x213de LimitCheck 0x0 ≤ D0 ≤ 0x7>                             {}
            <MI 213e4  LEA.L   0x2186e,A0>                                      {}
            <MI 213ea  CLR.B   (A0+D0.L+#0xa)>                                  {}
            <MI 213ee  ADDQ.L  #0x1,D0>                                         {}
            <MI 213f0  CMP.L   #0x07,D0>                                        {}
            <MI 213f2  BLE     0x213d8>                                         {}
        <POP 213f4-2143c Naked>                              Σ0         ↓
            <Const 0x213f4 0x5555.2>                         Δ-2                {[#21845]}
            <Const 0x213f8 0x2189b.4>                        Δ-4                {[#21845]|[##137371]}
            <Call 0x213fa 0x21534>                                              {[#21845]|[##137371]}
                exp_TEST_LOAD_CUR_INSTR.SEQ(Sw_2, &Sr_2)
            <POP 21400-21402 StackAdj>                       Δ+4                {[#21845]}
            <POP 21402-21403 StackAdj>                       Δ+2                {}
            <Const 0x21403 0x5555.2>                         Δ-2                {[#21845]}
            <Const 0x21406 0x2189b.4>                        Δ-4                {[#21845]|[##137371]}
            <Call 0x21408 0x21534>                                              {[#21845]|[##137371]}
                exp_TEST_LOAD_CUR_INSTR.SEQ(Sw_2, &Sr_2)
            <POP 2140e-21410 StackAdj>                       Δ+6                {}
            <Call 0x21410 0x205ac>                                              {}
            <Call 0x21414 0x20b00>                                              {}
            <Call 0x21418 0x20dce>                                              {}
            <Call 0x2141c 0x21052>                                              {}
            <Call 0x21420 0x21094>                                              {}
            <Blob 0x21424 [2] @>                             Δ-2                {[«2""»]}
            <Const 0x21426 0x21899.4>                        Δ-4                {[«2""»]|[##137369]}
            <Call 0x2142c 0x204aa>                                              {[«2""»]|[##137369]}
            <POP 21430-21432 StackAdj>                       Δ+4                {[«2""»]}
            <POP 21432-21433 StackAdj>                       Δ+2                {}
            <Const 0x21433 0x1.2>                            Δ-2                {[#1]}
            <MI 21434  CLR.B   -(A7)>                        Δ-2                {[#1]|[#0]}
            <Call 0x21436 0x2065c>                                              {[#1]|[#0]}
            <POP 2143a-2143c StackAdj>                       Δ+4                {}
        <POP 2143c-21442 Naked>                              Σ0         
            <Call 0x2143c 0x10284>                                              {}
                ?exit

Raw from R1000.Disassembly/DFS

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.8fe3a5d6074f3016
00020000 ; --------------------------------------------------------------------------------------
00020000					stack.top:
00020000 00 04 00 00              |        |		.CODE	0x40000			; STACK.END
00020004 00 02 13 5c              |   \    |		.CODE	START
00020008 00 01 02 88              |        |		.CODE	FSCALL_10288
0002000c					heap.top:
0002000c 00 02 18 a2              |        |		.PTR	0x218a2
00020010					code.end:
00020010 00 02 18 6e              |   n    |		.PTR	0x2186e
00020014 00 00 00 00              |        |		.CONST	0x00000000
00020018					programfailurehandler:
00020018 00 02 04 42              |   B    |		.CODE	PROG_FAIL
0002001c					experimentfailurehandler:
0002001c 00 02 03 06              |        |		.CODE	EXP_FAIL
00020020 00 00 00 00              |        |		.CONST	0x00000000
00020024					exp_init_done:
00020024 00                       |        |		.CONST	0x00
00020025 00                       |        |		.CONST	0x00
00020026 00 00                    |        |		.CONST	0x0000
00020028 00 00                    |        |		.CONST	0x0000
0002002a 00 00                    |        |		.XXX[0x2]
0002002c 00 00                    |        |		.CONST	0x0000
0002002e 00 00                    |        |		.CONST	0x0000
00020030 00 00                    |        |		.CONST	0x0000
00020032 00 00 00 00 00 00        |        |		.XXX[0x6]
00020038 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0xb0]
000200e8 00 00 00 00              |        |		.XXX[0x4]
000200ec 00 00 00 00              |        |		.PTR	0x0
000200f0					is_open_ERROR_LOG:
000200f0 00                       |        |		.CONST	0x0
000200f1					write_error_ERROR_LOG:
000200f1 00                       |        |		.CONST	0x0
000200f2 00 00 00 00              |        |		.CONST	0x00000000
000200f6 00 00 00 00              |        |		.CONST	0x00000000
000200fa 00                       |        |		.CONST	0x00
000200fb 00                       |        |		.CONST	0x00
000200fc					file_ERROR_LOG:
000200fc 00 00 00 00              |        |		.CONST	0x00000000
00020100 00 00 00 00              |        |		.CONST	0x00000000
00020104 00 00                    |        |		.CONST	0x0000
00020106 00 00                    |        |		.CONST	0x0000
00020108					somekindoffsflag:
00020108 00                       |        |		.CONST	0x00
00020109 00                       |        |		.CONST	0x00
0002010a 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_ '
00020118 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_ '
00020126 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_ '
00020134 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
00020146 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error. '
0002015e 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
0002016c 49 4e 49 54 53 54 41 54  |INITSTAT|		.TXT	'INITSTATE '
00020176 53 59                    |SY      |		.XXX[0x2]
00020178 53 5c 20 20 20 20 20 20  |S\      |		.XXX[0x30]
00020180 56 41 4c 5c 20 20 20 20  |VAL\    |
00020188 20 20 54 59 50 5c 20 20  |  TYP\  |
00020190 20 20 20 20 53 45 51 5c  |    SEQ\|
00020198 20 20 20 20 20 20 46 49  |      FI|
000201a0 55 5c 20 20 20 20 20 20  |U\      |
000201a8 50 32                    |P2      |		.TXT	'P2'
000201aa 53 54                    |ST      |		.TXT	'ST'
000201ac 4f 50                    |OP      |		.TXT	'OP'
000201ae 00 7f                    |        |		.CONST	0x0,0x7f
000201b0 c3 0a                    |        |		.CONST	0xc3,0xa
000201b2 66 03                    |f       |		.CONST	0x66,0x3
000201b4 00 0f                    |        |		.CONST	0x0,0xf
000201b6 f1 c3                    |        |		.CONST	0xf1,0xc3
000201b8 bf 0c                    |        |		.CONST	0xbf,0xc
000201ba 00 0c 3f 0f fe 53        |  ?  S  |		.CONST	0x0,0xc,0x3f,0xf,0xfe,0x53
000201c0 59 53 5c 20 20 20 20 20  |YS\     |		.XXX[0x30]
000201c8 20 56 41 4c 5c 20 20 20  | VAL\   |
000201d0 20 20 20 54 59 50 5c 20  |   TYP\ |
000201d8 20 20 20 20 20 53 45 51  |     SEQ|
000201e0 5c 20 20 20 20 20 20 46  |\      F|
000201e8 49 55 5c 20 20 20 20 20  |IU\     |
000201f0 20                       |        |		.XXX[0x1]
000201f1 ff ff ff ff ff ff ff ff  |        |		.CONST	0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff
000201f9 00 00 01 00 00 00 00     |        |		.XXX[0x7]
00020200 01 4e 00 01 01 00 00 00  | N      |		.XXX[0x100]
00020208 01 4e 00 02 01 01 00 00  | N      |
00020210 01 4e 00 02 00 00 00 00  | N      |
00020218 01 4e 00 03 01 00 00 00  | N      |
00020220 01 4e 00 04 01 01 00 00  | N      |
00020228 01 4e 00 04 00 00 00 00  | N      |
00020230 01 4e 00 05 01 00 00 00  | N      |
00020238 01 4e 00 06 01 00 00 00  | N      |
00020240 01 4e 00 07 01 00 00 00  | N      |
00020248 01 4e 00 08 01 01 00 00  | N      |
00020250 01 4e 00 08 00 00 00 00  | N      |
00020258 01 4e 00 09 01 00 00 00  | N      |
00020260 01 50 00 0a 01 01 00 00  | P      |
00020268 01 50 00 0b 01 00 00 00  | P      |
00020270 01 50 00 0c 01 00 00 00  | P      |
00020278 01 50 00 0d 01 01 00 00  | P      |
00020280 01 50 00 0e 01 00 00 00  | P      |
00020288 01 50 00 0f 01 01 00 00  | P      |
00020290 01 50 17 01 00 00 01 4a  | P     J|
00020298 27 01 00 00 01 4a 07 00  |'    J  |
000202a0 00 00 01 4a 0e 00 39 00  |   J  9 |
000202a8 00 00 01 4c 0a 01 0e 00  |   L    |
000202b0 00 00 01 4c 0c 01 0a 00  |   L    |
000202b8 00 00 01 4c 0e 01 39 00  |   L  9 |
000202c0 00 00 01 4c 00 01 00 00  |   L    |
000202c8 01 53 01 01 00 00 01 53  | S     S|
000202d0 00 01 00 00 01 54 01 01  |     T  |
000202d8 00 00 01 54 00 01 00 00  |   T    |
000202e0 01 54 01 01 00 00 01 54  | T     T|
000202e8 00 00 00 00 01 52 01 01  |     R  |
000202f0 00 00 01 52 00 00 00 00  |   R    |
000202f8 01 52 01 01 00 00 01 52  | R     R|
00020300 01 00 00 00 01 53        |     S  |		.XXX[0x6]
00020306 ; --------------------------------------------------------------------------------------
00020306 ; OMSI PASCAL Function
00020306 ;    <LVAR  0x00e 1(r)>
00020306 ;    <LVAR  0x00a 4(r)>
00020306 ;    <LVAR  0x008 1(r)>
00020306 ; --------------------------------------------------------------------------------------
00020306					EXP_FAIL:
00020306 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
0002030a bf d5                    |        |		CMPA.L	(A5),A7
0002030c 62 06                    |b       |		BHI	0x20314
0002030e 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020312 4e 76                    |Nv      |		TRAPV
00020314 de fc 00 74              |   t    |		ADDA.W	#0x74,A7
00020318 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
0002031c 47 f9 00 01 02 c4        |G       |		LEA.L	StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00020322 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
00020328 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002032a 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
0002032c 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
0002032e 78 12                    |x       |		MOVEQ.L	#0x12,D4
00020330 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
00020332 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
00020338 41 fa fe 0c              |A       |		LEA.L	0x20146,A0
0002033c 70 08                    |p       |		MOVEQ.L	#0x08,D0
0002033e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020340 51 c8 ff fc              |Q       |		DBF	D0,0x2033e
00020344 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020346 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002034a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002034c 3f 04                    |?       |		MOVE.W	D4,-(A7)
0002034e 4e 93                    |N       |		JSR	(A3)
00020350 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020352 4e 94                    |N       |		JSR	(A4)
00020354 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020356 20 4f                    | O      |		MOVEA.L	A7,A0
00020358 43 fa fd b0              |C       |		LEA.L	0x2010a,A1
0002035c 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002035e 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
00020360 51 c8 ff fc              |Q       |		DBF	D0,0x2035e
00020364 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020366 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
0002036a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002036c 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002036e 4e 93                    |N       |		JSR	(A3)
00020370 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020372 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
00020376 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
0002037c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002037e 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020384 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020386 4e 94                    |N       |		JSR	(A4)
00020388 de c4                    |        |		ADDA.W	D4,A7
0002038a 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
0002038e b0 c1                    |        |		CMPA.W	D1,A0
00020390 67 48                    |gH      |		BEQ	0x203da
00020392 9e c5                    |        |		SUBA.W	D5,A7
00020394 22 4f                    |"O      |		MOVEA.L	A7,A1
00020396 45 fa fd 80              |E       |		LEA.L	0x20118,A2
0002039a 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
0002039c 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002039e 51 c8 ff fc              |Q       |		DBF	D0,0x2039c
000203a2 9e c3                    |        |		SUBA.W	D3,A7
000203a4 22 4f                    |"O      |		MOVEA.L	A7,A1
000203a6 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
000203aa 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
000203ac 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000203ae 51 c8 ff fc              |Q       |		DBF	D0,0x203ac
000203b2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000203b4 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
000203b8 3f 01                    |?       |		MOVE.W	D1,-(A7)
000203ba 3f 02                    |?       |		MOVE.W	D2,-(A7)
000203bc 4e 93                    |N       |		JSR	(A3)
000203be 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000203c0 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000203c4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000203c6 3f 03                    |?       |		MOVE.W	D3,-(A7)
000203c8 4e 93                    |N       |		JSR	(A3)
000203ca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203cc 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000203d2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203d4 4e 94                    |N       |		JSR	(A4)
000203d6 de fc 00 30              |   0    |		ADDA.W	#0x30,A7
000203da 9e c5                    |        |		SUBA.W	D5,A7
000203dc 20 4f                    | O      |		MOVEA.L	A7,A0
000203de 43 fa fd 46              |C  F    |		LEA.L	0x20126,A1
000203e2 70 0c                    |p       |		MOVEQ.L	#0x0c,D0
000203e4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000203e6 51 c8 ff fc              |Q       |		DBF	D0,0x203e4
000203ea 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000203ec 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000203f0 3f 01                    |?       |		MOVE.W	D1,-(A7)
000203f2 3f 02                    |?       |		MOVE.W	D2,-(A7)
000203f4 4e 93                    |N       |		JSR	(A3)
000203f6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000203f8 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
000203fc 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
00020402 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020404 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002040a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002040c 4e 94                    |N       |		JSR	(A4)
0002040e 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00020410 20 4f                    | O      |		MOVEA.L	A7,A0
00020412 43 fa fd 32              |C  2    |		LEA.L	0x20146,A1
00020416 70 16                    |p       |		MOVEQ.L	#0x16,D0
00020418 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002041a 51 c8 ff fc              |Q       |		DBF	D0,0x20418
0002041e 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020422 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020424 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
00020428 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002042a 3f 3c 00 17              |?<      |		MOVE.W	#0x17,-(A7)
0002042e 4e 93                    |N       |		JSR	(A3)
00020430 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020432 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
00020438 de c3                    |        |		ADDA.W	D3,A7
0002043a 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002043e 4e 5e                    |N^      |		UNLK	A6
00020440 4e 75                    |Nu      |		RTS
00020442 ; --------------------------------------------------------------------------------------
00020442 ; OMSI PASCAL Function
00020442 ;    <LVAR  0x008 1(r)>
00020442 ; --------------------------------------------------------------------------------------
00020442					PROG_FAIL:
00020442 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00020446 bf d5                    |        |		CMPA.L	(A5),A7
00020448 62 06                    |b       |		BHI	0x20450
0002044a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002044e 4e 76                    |Nv      |		TRAPV
00020450 de fc 00 2c              |   ,    |		ADDA.W	#0x2c,A7
00020454 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
00020458 41 fa fd 12              |A       |		LEA.L	0x2016c,A0
0002045c 70 06                    |p       |		MOVEQ.L	#0x06,D0
0002045e 3f 20                    |?       |		MOVE.W	-(A0),-(A7)
00020460 51 c8 ff fc              |Q       |		DBF	D0,0x2045e
00020464 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00020468 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002046a 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
0002046e 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020472 3f 3c 00 0e              |?<      |		MOVE.W	#0xe,-(A7)
00020476 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
0002047c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002047e 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020482 48 80                    |H       |		EXTB.W	D0
00020484 48 c0                    |H       |		EXTW.L	D0
00020486 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020488 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
0002048e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020490 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00020496 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020498 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
0002049e de fc 00 14              |        |		ADDA.W	#0x14,A7
000204a2 4c df 01 01              |L       |		MOVEM.L	(A7)+,D0+A0
000204a6 4e 5e                    |N^      |		UNLK	A6
000204a8 4e 75                    |Nu      |		RTS
000204aa ; --------------------------------------------------------------------------------------
000204aa ; OMSI PASCAL Function
000204aa ;    <LVAR  0x00c 1(r)>
000204aa ;    <LVAR  0x008 4(r)>
000204aa ;    <LVAR -0x002 @>
000204aa ; --------------------------------------------------------------------------------------
000204aa 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
000204ae bf d5                    |        |		CMPA.L	(A5),A7
000204b0 62 06                    |b       |		BHI	0x204b8
000204b2 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000204b6 4e 76                    |Nv      |		TRAPV
000204b8 de fc 00 28              |   (    |		ADDA.W	#0x28,A7
000204bc 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000204c0 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
000204c6 1f 2e 00 0c              | .      |		MOVE.B	(A6+0xc),-(A7)
000204ca 4e b9 00 01 05 02        |N       |		JSR	IPC_PutBool(a : Bool)
000204d0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000204d2 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
000204d8 9e fc 00 0a              |        |		SUBA.W	#0xa,A7
000204dc 20 4f                    | O      |		MOVEA.L	A7,A0
000204de 43 fa fc 8c              |C       |		LEA.L	0x2016c,A1
000204e2 70 08                    |p       |		MOVEQ.L	#0x08,D0
000204e4 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000204e6 51 c8 ff fc              |Q       |		DBF	D0,0x204e4
000204ea 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000204ec 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000204f0 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000204f4 3f 3c 00 09              |?<      |		MOVE.W	#0x9,-(A7)
000204f8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000204fe 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020500 48 78 00 01              |Hx      |		PEA.L	0x1
00020504 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020508 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002050c 4e b9 00 01 03 b0        |N       |		JSR	PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
00020512 de fc 00 18              |        |		ADDA.W	#0x18,A7
00020516 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
0002051c 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00020520 48 50                    |HP      |		PEA.L	(A0)
00020522 4e b9 00 01 05 26        |N    &  |		JSR	IPC_GetBool() : Bool
00020528 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002052a 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
00020530 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00020534 4e 5e                    |N^      |		UNLK	A6
00020536 4e 75                    |Nu      |		RTS
00020538 ; --------------------------------------------------------------------------------------
00020538 ; OMSI PASCAL Function
00020538 ;    <LVAR  0x008 4(r)>
00020538 ; --------------------------------------------------------------------------------------
00020538 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4		; Spelunked
0002053c bf d5                    |        |		CMPA.L	(A5),A7
0002053e 62 06                    |b       |		BHI	0x20546
00020540 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020544 4e 76                    |Nv      |		TRAPV
00020546 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002054a 48 e7 00 80              |H       |		MOVEM.L	A0,-(A7)
0002054e 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020554 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00020558 48 50                    |HP      |		PEA.L	(A0)
0002055a 4e b9 00 01 05 26        |N    &  |		JSR	IPC_GetBool() : Bool
00020560 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020562 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
00020568 4c df 01 00              |L       |		MOVEM.L	(A7)+,A0
0002056c 4e 5e                    |N^      |		UNLK	A6
0002056e 4e 75                    |Nu      |		RTS
00020570 ; --------------------------------------------------------------------------------------
00020570 ; OMSI PASCAL Function
00020570 ;    <LVAR  0x008 1(r)>
00020570 ; --------------------------------------------------------------------------------------
00020570 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4		; Spelunked
00020574 bf d5                    |        |		CMPA.L	(A5),A7
00020576 62 06                    |b       |		BHI	0x2057e
00020578 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002057c 4e 76                    |Nv      |		TRAPV
0002057e de fc 00 0a              |        |		ADDA.W	#0xa,A7
00020582 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00020588 1f 2e 00 08              | .      |		MOVE.B	(A6+0x8),-(A7)
0002058c 4e b9 00 01 05 02        |N       |		JSR	IPC_PutBool(a : Bool)
00020592 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020594 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
0002059a 42 27                    |B'      |		CLR.B	-(A7)
0002059c 48 78 00 01              |Hx      |		PEA.L	0x1
000205a0 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(status : Byte; msg : String)
000205a6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000205a8 4e 5e                    |N^      |		UNLK	A6
000205aa 4e 75                    |Nu      |		RTS
000205ac ; --------------------------------------------------------------------------------------
000205ac ; OMSI PASCAL Function
000205ac ; --------------------------------------------------------------------------------------
000205ac 4e 56 ff ce              |NV      |		LINK.W	A6,#0xffce
000205b0 bf d5                    |        |		CMPA.L	(A5),A7
000205b2 62 06                    |b       |		BHI	0x205ba
000205b4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000205b8 4e 76                    |Nv      |		TRAPV
000205ba de fc 00 26              |   &    |		ADDA.W	#0x26,A7
000205be 48 e7 80 f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D0,-(A7)
000205c2 45 fa fb f4              |E       |		LEA.L	0x201b8,A2
000205c6 47 fa fb ee              |G       |		LEA.L	0x201b6,A3
000205ca 49 fa fb e8              |I       |		LEA.L	0x201b4,A4
000205ce 42 67                    |Bg      |		CLR.W	-(A7)
000205d0 3f 3a fb e0              |?:      |		MOVE.W	0x201b2,-(A7)
000205d4 3f 3a fb da              |?:      |		MOVE.W	0x201b0,-(A7)
000205d8 3f 3a fb d4              |?:      |		MOVE.W	0x201ae,-(A7)
000205dc 42 27                    |B'      |		CLR.B	-(A7)
000205de 4e b9 00 02 14 42        |N    B  |		JSR	exp_WRITE_WCS.FIU(Sw_2, Sw_6, Sw_1)
000205e4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000205e6 42 57                    |BW      |		CLR.W	(A7)
000205e8 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
000205ea 20 4f                    | O      |		MOVEA.L	A7,A0
000205ec 43 fa fb cc              |C       |		LEA.L	0x201ba,A1
000205f0 70 04                    |p       |		MOVEQ.L	#0x04,D0
000205f2 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000205f4 51 c8 ff fc              |Q       |		DBF	D0,0x205f2
000205f8 42 27                    |B'      |		CLR.B	-(A7)
000205fa 4e b9 00 02 17 7a        |N    z  |		JSR	exp_WRITE_WCS.VAL(Sw_2, Sw_5, Sw_1)
00020600 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020602 42 57                    |BW      |		CLR.W	(A7)
00020604 3f 12                    |?       |		MOVE.W	(A2),-(A7)
00020606 3f 13                    |?       |		MOVE.W	(A3),-(A7)
00020608 3f 14                    |?       |		MOVE.W	(A4),-(A7)
0002060a 42 27                    |B'      |		CLR.B	-(A7)
0002060c 4e b9 00 02 16 82        |N       |		JSR	exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1)
00020612 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020614 3e bc 00 01              |>       |		MOVE.W	#0x1,(A7)
00020618 3f 12                    |?       |		MOVE.W	(A2),-(A7)
0002061a 3f 13                    |?       |		MOVE.W	(A3),-(A7)
0002061c 3f 14                    |?       |		MOVE.W	(A4),-(A7)
0002061e 42 27                    |B'      |		CLR.B	-(A7)
00020620 4e b9 00 02 16 82        |N       |		JSR	exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1)
00020626 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020628 3e bc 00 02              |>       |		MOVE.W	#0x2,(A7)
0002062c 3f 12                    |?       |		MOVE.W	(A2),-(A7)
0002062e 3f 13                    |?       |		MOVE.W	(A3),-(A7)
00020630 3f 14                    |?       |		MOVE.W	(A4),-(A7)
00020632 42 27                    |B'      |		CLR.B	-(A7)
00020634 4e b9 00 02 16 82        |N       |		JSR	exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1)
0002063a de fc 00 0a              |        |		ADDA.W	#0xa,A7
0002063e 42 67                    |Bg      |		CLR.W	-(A7)
00020640 3f 3c a0 00              |?<      |		MOVE.W	#0xa000,-(A7)
00020644 42 27                    |B'      |		CLR.B	-(A7)
00020646 4e b9 00 02 17 fa        |N       |		JSR	exp_WRITE_WCS.IOC(Sw_2, Sw_2, Sw_1)
0002064c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002064e 4e b9 00 02 16 4c        |N    L  |		JSR	exp_INIT_CSTOP_WCS.SEQ()
00020654 4c df 1f 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1+A2+A3+A4
00020658 4e 5e                    |N^      |		UNLK	A6
0002065a 4e 75                    |Nu      |		RTS
0002065c ; --------------------------------------------------------------------------------------
0002065c ; OMSI PASCAL Function
0002065c ;    <LVAR  0x00a 1(r)>
0002065c ;    <LVAR  0x008 1(r)>
0002065c ; --------------------------------------------------------------------------------------
0002065c 4e 56 ff a2              |NV      |		LINK.W	A6,#0xffa2
00020660 bf d5                    |        |		CMPA.L	(A5),A7
00020662 62 06                    |b       |		BHI	0x2066a
00020664 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020668 4e 76                    |Nv      |		TRAPV
0002066a de fc 00 56              |   V    |		ADDA.W	#0x56,A7
0002066e 48 e7 fb f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7)
00020672 45 f9 00 02 18 86        |E       |		LEA.L	0x21886,A2
00020678 47 f9 00 02 18 80        |G       |		LEA.L	0x21880,A3
0002067e 49 f9 00 01 02 d0        |I       |		LEA.L	StringCat2(a, b : String) : String,A4
00020684 72 0a                    |r       |		MOVEQ.L	#0x0a,D1
00020686 74 07                    |t       |		MOVEQ.L	#0x07,D2
00020688 76 01                    |v       |		MOVEQ.L	#0x01,D3
0002068a 78 04                    |x       |		MOVEQ.L	#0x04,D4
0002068c 16 ae 00 08              |        |		MOVE.B	(A6+0x8),(A3)
00020690 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020692 bc 82                    |        |		CMP.L	D2,D6
00020694 63 02                    |c       |		BLS	0x20698
00020696 4e 4f                    |NO      |		TRAP	#15
00020698 41 f9 00 02 18 6e        |A    n  |		LEA.L	0x2186e,A0
0002069e 10 30 68 0a              | 0h     |		MOVE.B	(A0+D6.L+#0xa),D0
000206a2 48 80                    |H       |		EXTB.W	D0
000206a4 48 c0                    |H       |		EXTW.L	D0
000206a6 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
000206ac 63 02                    |c       |		BLS	0x206b0
000206ae 4e 4f                    |NO      |		TRAP	#15
000206b0 11 80 68 23              |  h#    |		MOVE.B	D0,(A0+D6.L+#0x23)
000206b4 52 86                    |R       |		ADDQ.L	#0x1,D6
000206b6 bc 82                    |        |		CMP.L	D2,D6
000206b8 6f d8                    |o       |		BLE	0x20692
000206ba 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000206bc be 39 00 02 18 8a        | 9      |		CMP.B	0x2188a,D7
000206c2 66 5e                    |f^      |		BNE	0x20722
000206c4 10 07                    |        |		MOVE.B	D7,D0
000206c6 48 80                    |H       |		EXTB.W	D0
000206c8 c1 c1                    |        |		MULS.W	D1,D0
000206ca 41 fa fa f3              |A       |		LEA.L	0x201bf,A0
000206ce 9e c1                    |        |		SUBA.W	D1,A7
000206d0 22 4f                    |"O      |		MOVEA.L	A7,A1
000206d2 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
000206d6 70 09                    |p       |		MOVEQ.L	#0x09,D0
000206d8 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000206da 51 c8 ff fc              |Q       |		DBF	D0,0x206d8
000206de 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000206e0 2f 12                    |/       |		MOVE.L	(A2),-(A7)
000206e2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000206e4 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
000206e8 3f 03                    |?       |		MOVE.W	D3,-(A7)
000206ea 3f 01                    |?       |		MOVE.W	D1,-(A7)
000206ec 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000206f2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000206f4 4e 94                    |N       |		JSR	(A4)
000206f6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000206f8 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
000206fa 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000206fc 2e 92                    |.       |		MOVE.L	(A2),(A7)
000206fe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020700 2f 39 00 02 18 8c        |/9      |		MOVE.L	0x2188c,-(A7)
00020706 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
0002070c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002070e 4e 94                    |N       |		JSR	(A4)
00020710 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020712 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00020714 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00020716 1f 3c 00 5c              | < \    |		MOVE.B	#0x5c,-(A7)
0002071a 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
00020720 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020722 52 07                    |R       |		ADDQ.B	#0x1,D7
00020724 be 04                    |        |		CMP.B	D4,D7
00020726 6f 94                    |o       |		BLE	0x206bc
00020728 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002072a be 39 00 02 18 90        | 9      |		CMP.B	0x21890,D7
00020730 66 38                    |f8      |		BNE	0x2076a
00020732 10 07                    |        |		MOVE.B	D7,D0
00020734 48 80                    |H       |		EXTB.W	D0
00020736 c1 c1                    |        |		MULS.W	D1,D0
00020738 41 fa fa 85              |A       |		LEA.L	0x201bf,A0
0002073c 9e c1                    |        |		SUBA.W	D1,A7
0002073e 22 4f                    |"O      |		MOVEA.L	A7,A1
00020740 41 f0 00 00              |A       |		LEA.L	(A0+D0.W),A0
00020744 70 09                    |p       |		MOVEQ.L	#0x09,D0
00020746 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
00020748 51 c8 ff fc              |Q       |		DBF	D0,0x20746
0002074c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002074e 2f 12                    |/       |		MOVE.L	(A2),-(A7)
00020750 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020752 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00020756 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020758 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002075a 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
00020760 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020762 4e 94                    |N       |		JSR	(A4)
00020764 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020766 24 9f                    |$       |		MOVE.L	(A7)+,(A2)
00020768 de c1                    |        |		ADDA.W	D1,A7
0002076a 52 07                    |R       |		ADDQ.B	#0x1,D7
0002076c be 04                    |        |		CMP.B	D4,D7
0002076e 6f ba                    |o       |		BLE	0x2072a
00020770 1f 2e 00 0a              | .      |		MOVE.B	(A6+0xa),-(A7)
00020774 2f 39 00 02 18 82        |/9      |		MOVE.L	0x21882,-(A7)
0002077a 2f 12                    |/       |		MOVE.L	(A2),-(A7)
0002077c 1f 13                    |        |		MOVE.B	(A3),-(A7)
0002077e 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020780 20 4f                    | O      |		MOVEA.L	A7,A0
00020782 43 f9 00 02 18 91        |C       |		LEA.L	0x21891,A1
00020788 70 07                    |p       |		MOVEQ.L	#0x07,D0
0002078a 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
0002078c 51 c8 ff fc              |Q       |		DBF	D0,0x2078a
00020790 4e b9 00 01 05 4a        |N    J  |		JSR	?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
00020796 de fc 00 14              |        |		ADDA.W	#0x14,A7
0002079a 4c df 1f df              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4
0002079e 4e 5e                    |N^      |		UNLK	A6
000207a0 4e 75                    |Nu      |		RTS
000207a2 ; --------------------------------------------------------------------------------------
000207a2 ; OMSI PASCAL Function
000207a2 ;    <LVAR  0x008 1(r)>
000207a2 ; --------------------------------------------------------------------------------------
000207a2 4e 56 ff e6              |NV      |		LINK.W	A6,#0xffe6
000207a6 bf d5                    |        |		CMPA.L	(A5),A7
000207a8 62 06                    |b       |		BHI	0x207b0
000207aa 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000207ae 4e 76                    |Nv      |		TRAPV
000207b0 de fc 00 18              |        |		ADDA.W	#0x18,A7
000207b4 48 e7 80 c0              |H       |		MOVEM.L	A1+A0+D0,-(A7)
000207b8 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
000207bc 67 04                    |g       |		BEQ	0x207c2
000207be 42 67                    |Bg      |		CLR.W	-(A7)
000207c0 60 04                    |`       |		BRA	0x207c6
000207c2 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
000207c6 4e b9 00 02 16 32        |N    2  |		JSR	exp_PREP_RUN.SEQ(Sw_2)
000207cc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000207ce 42 67                    |Bg      |		CLR.W	-(A7)
000207d0 4e b9 00 02 16 a0        |N       |		JSR	exp_SETUP_CLOCKSTOPS.TYP(Sw_2)
000207d6 42 57                    |BW      |		CLR.W	(A7)
000207d8 4e b9 00 02 17 98        |N       |		JSR	exp_SETUP_CLOCKSTOPS.VAL(Sw_2)
000207de 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000207e0 4e b9 00 02 15 12        |N       |		JSR	exp_CLEAR_EXCEPTIONS.FIU()
000207e6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000207e8 20 4f                    | O      |		MOVEA.L	A7,A0
000207ea 43 fa fa 05              |C       |		LEA.L	0x201f1,A1
000207ee 70 07                    |p       |		MOVEQ.L	#0x07,D0
000207f0 10 d9                    |        |		MOVE.B	(A1)+,(A0)+
000207f2 51 c8 ff fc              |Q       |		DBF	D0,0x207f0
000207f6 4e b9 00 02 14 b2        |N       |		JSR	exp_LOAD_VAR.FIU(Sw_8)
000207fc 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000207fe 42 57                    |BW      |		CLR.W	(A7)
00020800 4e b9 00 02 14 98        |N       |		JSR	exp_PREP_RUN.FIU(Sw_2)
00020806 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020808 42 67                    |Bg      |		CLR.W	-(A7)
0002080a 4e b9 00 02 18 54        |N    T  |		JSR	exp_PREP_RUN.IOC(Sw_2)
00020810 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020812 4c df 03 01              |L       |		MOVEM.L	(A7)+,D0+A0+A1
00020816 4e 5e                    |N^      |		UNLK	A6
00020818 4e 75                    |Nu      |		RTS
0002081a ; --------------------------------------------------------------------------------------
0002081a ; OMSI PASCAL Function
0002081a ; --------------------------------------------------------------------------------------
0002081a 4e 56 ff f4              |NV      |		LINK.W	A6,#0xfff4
0002081e bf d5                    |        |		CMPA.L	(A5),A7
00020820 62 06                    |b       |		BHI	0x20828
00020822 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020826 4e 76                    |Nv      |		TRAPV
00020828 de fc 00 0c              |        |		ADDA.W	#0xc,A7
0002082c 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00020830 70 02                    |p       |		MOVEQ.L	#0x02,D0
00020832 3f 3c 00 01              |?<      |		MOVE.W	#0x1,-(A7)
00020836 4e b9 00 02 14 f2        |N       |		JSR	exp_FREEZE_BOARDS.FIU(Sw_2)
0002083c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002083e 4e b9 00 02 16 0a        |N       |		JSR	exp_RUN_DIAG_PROMS_NOCHECK.SEQ()
00020844 4e b9 00 02 16 c2        |N       |		JSR	exp_RUN_NOCHECK.TYP()
0002084a 4e b9 00 02 17 ba        |N       |		JSR	exp_RUN_NOCHECK.VAL()
00020850 4e b9 00 02 18 18        |N       |		JSR	exp_RUN_NOCHECK.IOC()
00020856 4e b9 00 02 14 60        |N    `  |		JSR	exp_STEP_MACHINE.FIU()
0002085c 1f 3c 00 0a              | <      |		MOVE.B	#0x0a,-(A7)
00020860 1f 00                    |        |		MOVE.B	D0,-(A7)
00020862 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
00020868 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002086a 1e bc 00 09              |        |		MOVE.B	#0x09,(A7)
0002086e 1f 00                    |        |		MOVE.B	D0,-(A7)
00020870 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
00020876 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020878 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
0002087c 4e 5e                    |N^      |		UNLK	A6
0002087e 4e 75                    |Nu      |		RTS
00020880 ; --------------------------------------------------------------------------------------
00020880 ; OMSI PASCAL Function
00020880 ;    <LVAR  0x00a 1(rw)>
00020880 ;    <LVAR  0x008 1(r)>
00020880 ;    <LVAR -0x002 @ 1(r)>
00020880 ; --------------------------------------------------------------------------------------
00020880 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2
00020884 bf d5                    |        |		CMPA.L	(A5),A7
00020886 62 06                    |b       |		BHI	0x2088e
00020888 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002088c 4e 76                    |Nv      |		TRAPV
0002088e de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020892 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00020896 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
0002089a 4e b9 00 02 16 6c        |N    l  |		JSR	exp_HALT.SEQ(&Fr)
000208a0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000208a2 42 2e 00 0a              |B.      |		CLR.B	(A6+0xa)
000208a6 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000208aa 44 00                    |D       |		NEG.B	D0
000208ac 52 00                    |R       |		ADDQ.B	#0x1,D0
000208ae b0 2e ff fe              | .      |		CMP.B	(A6-0x2),D0
000208b2 66 04                    |f       |		BNE	0x208b8
000208b4 52 2e 00 0a              |R.      |		ADDQ.B	#0x1,(A6+0xa)
000208b8 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
000208bc 4e 5e                    |N^      |		UNLK	A6
000208be 4e 75                    |Nu      |		RTS
000208c0 ; --------------------------------------------------------------------------------------
000208c0 ; OMSI PASCAL Function
000208c0 ;    <LVAR  0x00a 1(w)>
000208c0 ;    <LVAR  0x008 1(r)>
000208c0 ;    <LVAR -0x006 1(rw)>
000208c0 ;    <LVAR -0x007 1(r)>
000208c0 ;    <LVAR -0x008 1(rw)>
000208c0 ;    <LVAR -0x009 1(r)>
000208c0 ;    <LVAR -0x00a @ 1(r)>
000208c0 ;    <LVAR -0x012 @>
000208c0 ; --------------------------------------------------------------------------------------
000208c0 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
000208c4 bf d5                    |        |		CMPA.L	(A5),A7
000208c6 62 06                    |b       |		BHI	0x208ce
000208c8 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000208cc 4e 76                    |Nv      |		TRAPV
000208ce de fc 00 24              |   $    |		ADDA.W	#0x24,A7
000208d2 48 e7 c3 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D1+D0,-(A7)
000208d6 41 ee ff fa              |A       |		LEA.L	(A6-0x6),A0
000208da 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
000208de 72 07                    |r       |		MOVEQ.L	#0x07,D1
000208e0 42 2e ff f9              |B.      |		CLR.B	(A6-0x7)
000208e4 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
000208e8 67 08                    |g       |		BEQ	0x208f2
000208ea 42 10                    |B       |		CLR.B	(A0)
000208ec 12 bc 00 ff              |        |		MOVE.B	#0xff,(A1)
000208f0 60 06                    |`       |		BRA	0x208f8
000208f2 10 bc 00 01              |        |		MOVE.B	#0x01,(A0)
000208f6 42 11                    |B       |		CLR.B	(A1)
000208f8 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
000208fc 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
00020900 4e b9 00 02 17 56        |N    V  |		JSR	exp_CHECK_CLOCKSTOPS.TYP(&Sr_8, &Sr_2)
00020906 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020908 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002090a 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002090c bc 81                    |        |		CMP.L	D1,D6
0002090e 63 02                    |c       |		BLS	0x20912
00020910 4e 4f                    |NO      |		TRAP	#15
00020912 10 36 68 ee              | 6h     |		MOVE.B	(A6+D6.L-#0x12),D0
00020916 b0 11                    |        |		CMP.B	(A1),D0
00020918 67 02                    |g       |		BEQ	0x2091c
0002091a 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002091c 52 86                    |R       |		ADDQ.L	#0x1,D6
0002091e bc 81                    |        |		CMP.L	D1,D6
00020920 6f ea                    |o       |		BLE	0x2090c
00020922 4a 39 00 02 18 9a        |J9      |		TST.B	0x2189a
00020928 66 14                    |f       |		BNE	0x2093e
0002092a 10 2e ff f6              | .      |		MOVE.B	(A6-0xa),D0
0002092e b0 2e ff f9              | .      |		CMP.B	(A6-0x7),D0
00020932 66 08                    |f       |		BNE	0x2093c
00020934 10 2e ff f7              | .      |		MOVE.B	(A6-0x9),D0
00020938 b0 10                    |        |		CMP.B	(A0),D0
0002093a 67 02                    |g       |		BEQ	0x2093e
0002093c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002093e 1d 47 00 0a              | G      |		MOVE.B	D7,(A6+0xa)
00020942 4c df 03 c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0+A1
00020946 4e 5e                    |N^      |		UNLK	A6
00020948 4e 75                    |Nu      |		RTS
0002094a ; --------------------------------------------------------------------------------------
0002094a ; OMSI PASCAL Function
0002094a ;    <LVAR  0x00a 1(w)>
0002094a ;    <LVAR  0x008 1(r)>
0002094a ;    <LVAR -0x006 1(rw)>
0002094a ;    <LVAR -0x007 1(r)>
0002094a ;    <LVAR -0x008 1(rw)>
0002094a ;    <LVAR -0x009 1(r)>
0002094a ;    <LVAR -0x00a @ 1(r)>
0002094a ;    <LVAR -0x012 @>
0002094a ; --------------------------------------------------------------------------------------
0002094a 4e 56 ff ca              |NV      |		LINK.W	A6,#0xffca
0002094e bf d5                    |        |		CMPA.L	(A5),A7
00020950 62 06                    |b       |		BHI	0x20958
00020952 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020956 4e 76                    |Nv      |		TRAPV
00020958 de fc 00 24              |   $    |		ADDA.W	#0x24,A7
0002095c 48 e7 c3 c0              |H       |		MOVEM.L	A1+A0+D7+D6+D1+D0,-(A7)
00020960 41 ee ff fa              |A       |		LEA.L	(A6-0x6),A0
00020964 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
00020968 72 07                    |r       |		MOVEQ.L	#0x07,D1
0002096a 42 2e ff f9              |B.      |		CLR.B	(A6-0x7)
0002096e 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
00020972 67 08                    |g       |		BEQ	0x2097c
00020974 42 10                    |B       |		CLR.B	(A0)
00020976 12 bc 00 ff              |        |		MOVE.B	#0xff,(A1)
0002097a 60 06                    |`       |		BRA	0x20982
0002097c 10 bc 00 01              |        |		MOVE.B	#0x01,(A0)
00020980 42 11                    |B       |		CLR.B	(A1)
00020982 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00020986 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
0002098a 4e b9 00 02 17 d6        |N       |		JSR	exp_CHECK_CLOCKSTOPS.VAL(&Sr_8, &Sr_2)
00020990 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020992 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00020994 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020996 bc 81                    |        |		CMP.L	D1,D6
00020998 63 02                    |c       |		BLS	0x2099c
0002099a 4e 4f                    |NO      |		TRAP	#15
0002099c 10 36 68 ee              | 6h     |		MOVE.B	(A6+D6.L-#0x12),D0
000209a0 b0 11                    |        |		CMP.B	(A1),D0
000209a2 67 02                    |g       |		BEQ	0x209a6
000209a4 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000209a6 52 86                    |R       |		ADDQ.L	#0x1,D6
000209a8 bc 81                    |        |		CMP.L	D1,D6
000209aa 6f ea                    |o       |		BLE	0x20996
000209ac 10 2e ff f6              | .      |		MOVE.B	(A6-0xa),D0
000209b0 b0 2e ff f9              | .      |		CMP.B	(A6-0x7),D0
000209b4 66 08                    |f       |		BNE	0x209be
000209b6 10 2e ff f7              | .      |		MOVE.B	(A6-0x9),D0
000209ba b0 10                    |        |		CMP.B	(A0),D0
000209bc 67 02                    |g       |		BEQ	0x209c0
000209be 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000209c0 1d 47 00 0a              | G      |		MOVE.B	D7,(A6+0xa)
000209c4 4c df 03 c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0+A1
000209c8 4e 5e                    |N^      |		UNLK	A6
000209ca 4e 75                    |Nu      |		RTS
000209cc ; --------------------------------------------------------------------------------------
000209cc ; OMSI PASCAL Function
000209cc ;    <LVAR  0x00a 1(w)>
000209cc ;    <LVAR  0x008 1(r)>
000209cc ;    <LVAR -0x006 1(rw)>
000209cc ;    <LVAR -0x00e @>
000209cc ; --------------------------------------------------------------------------------------
000209cc 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
000209d0 bf d5                    |        |		CMPA.L	(A5),A7
000209d2 62 06                    |b       |		BHI	0x209da
000209d4 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000209d8 4e 76                    |Nv      |		TRAPV
000209da de fc 00 1c              |        |		ADDA.W	#0x1c,A7
000209de 48 e7 c3 80              |H       |		MOVEM.L	A0+D7+D6+D1+D0,-(A7)
000209e2 41 ee ff fa              |A       |		LEA.L	(A6-0x6),A0
000209e6 72 07                    |r       |		MOVEQ.L	#0x07,D1
000209e8 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
000209ec 67 06                    |g       |		BEQ	0x209f4
000209ee 10 bc 00 ff              |        |		MOVE.B	#0xff,(A0)
000209f2 60 02                    |`       |		BRA	0x209f6
000209f4 42 10                    |B       |		CLR.B	(A0)
000209f6 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
000209fa 4e b9 00 02 14 7e        |N    ~  |		JSR	exp_READ_VAR.FIU(&Sr_8)
00020a00 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a02 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00020a04 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020a06 bc 81                    |        |		CMP.L	D1,D6
00020a08 63 02                    |c       |		BLS	0x20a0c
00020a0a 4e 4f                    |NO      |		TRAP	#15
00020a0c 10 36 68 f2              | 6h     |		MOVE.B	(A6+D6.L-#0xe),D0
00020a10 b0 10                    |        |		CMP.B	(A0),D0
00020a12 67 02                    |g       |		BEQ	0x20a16
00020a14 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020a16 52 86                    |R       |		ADDQ.L	#0x1,D6
00020a18 bc 81                    |        |		CMP.L	D1,D6
00020a1a 6f ea                    |o       |		BLE	0x20a06
00020a1c 1d 47 00 0a              | G      |		MOVE.B	D7,(A6+0xa)
00020a20 4c df 01 c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0
00020a24 4e 5e                    |N^      |		UNLK	A6
00020a26 4e 75                    |Nu      |		RTS
00020a28 ; --------------------------------------------------------------------------------------
00020a28 ; OMSI PASCAL Function
00020a28 ;    <LVAR  0x00a 1(rw)>
00020a28 ;    <LVAR  0x008 1(r)>
00020a28 ;    <LVAR -0x002 @ 1(r)>
00020a28 ; --------------------------------------------------------------------------------------
00020a28 4e 56 ff f2              |NV      |		LINK.W	A6,#0xfff2
00020a2c bf d5                    |        |		CMPA.L	(A5),A7
00020a2e 62 06                    |b       |		BHI	0x20a36
00020a30 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a34 4e 76                    |Nv      |		TRAPV
00020a36 de fc 00 0c              |        |		ADDA.W	#0xc,A7
00020a3a 48 e7 80 00              |H       |		MOVEM.L	D0,-(A7)
00020a3e 48 6e ff fe              |Hn      |		PEA.L	(A6-0x2)
00020a42 4e b9 00 02 18 34        |N    4  |		JSR	exp_READ_CLOCKSTOP.IOC(&Fr)
00020a48 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020a4a 42 2e 00 0a              |B.      |		CLR.B	(A6+0xa)
00020a4e 10 2e ff fe              | .      |		MOVE.B	(A6-0x2),D0
00020a52 b0 2e 00 08              | .      |		CMP.B	(A6+0x8),D0
00020a56 66 04                    |f       |		BNE	0x20a5c
00020a58 52 2e 00 0a              |R.      |		ADDQ.B	#0x1,(A6+0xa)
00020a5c 4c df 00 01              |L       |		MOVEM.L	(A7)+,D0
00020a60 4e 5e                    |N^      |		UNLK	A6
00020a62 4e 75                    |Nu      |		RTS
00020a64 ; --------------------------------------------------------------------------------------
00020a64 ; OMSI PASCAL Function
00020a64 ;    <LVAR  0x00a 4(w)>
00020a64 ;    <LVAR  0x008 1(r)>
00020a64 ; --------------------------------------------------------------------------------------
00020a64 4e 56 ff de              |NV      |		LINK.W	A6,#0xffde
00020a68 bf d5                    |        |		CMPA.L	(A5),A7
00020a6a 62 06                    |b       |		BHI	0x20a72
00020a6c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020a70 4e 76                    |Nv      |		TRAPV
00020a72 de fc 00 1c              |        |		ADDA.W	#0x1c,A7
00020a76 48 e7 c3 80              |H       |		MOVEM.L	A0+D7+D6+D1+D0,-(A7)
00020a7a 41 ee 00 08              |A       |		LEA.L	(A6+0x8),A0
00020a7e 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020a80 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020a82 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a84 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020a86 4e ba fe 38              |N  8    |		JSR	0x208c0
00020a8a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020a8c 10 1f                    |        |		MOVE.B	(A7)+,D0
00020a8e 48 80                    |H       |		EXTB.W	D0
00020a90 41 81                    |A       |		CHK.W	D1,D0
00020a92 1c 00                    |        |		MOVE.B	D0,D6
00020a94 66 06                    |f       |		BNE	0x20a9c
00020a96 06 87 00 00 00 10        |        |		ADDI.L	#0x00000010,D7
00020a9c 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020a9e 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020aa0 4e ba fe a8              |N       |		JSR	0x2094a
00020aa4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020aa6 10 1f                    |        |		MOVE.B	(A7)+,D0
00020aa8 48 80                    |H       |		EXTB.W	D0
00020aaa 41 81                    |A       |		CHK.W	D1,D0
00020aac 1c 00                    |        |		MOVE.B	D0,D6
00020aae 66 02                    |f       |		BNE	0x20ab2
00020ab0 50 87                    |P       |		ADDQ.L	#0x8,D7
00020ab2 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020ab4 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020ab6 4e ba ff 14              |N       |		JSR	0x209cc
00020aba 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020abc 10 1f                    |        |		MOVE.B	(A7)+,D0
00020abe 48 80                    |H       |		EXTB.W	D0
00020ac0 41 81                    |A       |		CHK.W	D1,D0
00020ac2 1c 00                    |        |		MOVE.B	D0,D6
00020ac4 66 02                    |f       |		BNE	0x20ac8
00020ac6 58 87                    |X       |		ADDQ.L	#0x4,D7
00020ac8 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020aca 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020acc 4e ba ff 5a              |N  Z    |		JSR	0x20a28
00020ad0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ad2 10 1f                    |        |		MOVE.B	(A7)+,D0
00020ad4 48 80                    |H       |		EXTB.W	D0
00020ad6 41 81                    |A       |		CHK.W	D1,D0
00020ad8 1c 00                    |        |		MOVE.B	D0,D6
00020ada 66 02                    |f       |		BNE	0x20ade
00020adc 54 87                    |T       |		ADDQ.L	#0x2,D7
00020ade 55 4f                    |UO      |		SUBQ.L	#0x2,A7
00020ae0 1f 10                    |        |		MOVE.B	(A0),-(A7)
00020ae2 4e ba fd 9c              |N       |		JSR	0x20880
00020ae6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ae8 10 1f                    |        |		MOVE.B	(A7)+,D0
00020aea 48 80                    |H       |		EXTB.W	D0
00020aec 41 81                    |A       |		CHK.W	D1,D0
00020aee 1c 00                    |        |		MOVE.B	D0,D6
00020af0 66 02                    |f       |		BNE	0x20af4
00020af2 52 87                    |R       |		ADDQ.L	#0x1,D7
00020af4 2d 47 00 0a              |-G      |		MOVE.L	D7,(A6+0xa)
00020af8 4c df 01 c3              |L       |		MOVEM.L	(A7)+,D0+D1+D6+D7+A0
00020afc 4e 5e                    |N^      |		UNLK	A6
00020afe 4e 75                    |Nu      |		RTS
00020b00 ; --------------------------------------------------------------------------------------
00020b00 ; OMSI PASCAL Function
00020b00 ; --------------------------------------------------------------------------------------
00020b00 4e 56 ff b2              |NV      |		LINK.W	A6,#0xffb2
00020b04 bf d5                    |        |		CMPA.L	(A5),A7
00020b06 62 06                    |b       |		BHI	0x20b0e
00020b08 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020b0c 4e 76                    |Nv      |		TRAPV
00020b0e de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00020b12 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020b16 43 fa f6 e2              |C       |		LEA.L	0x201fa,A1
00020b1a 45 f9 00 02 18 78        |E    x  |		LEA.L	0x21878,A2
00020b20 47 f9 00 02 18 8c        |G       |		LEA.L	0x2188c,A3
00020b26 49 f9 00 02 18 79        |I    y  |		LEA.L	0x21879,A4
00020b2c 74 02                    |t       |		MOVEQ.L	#0x02,D2
00020b2e 76 03                    |v       |		MOVEQ.L	#0x03,D3
00020b30 78 2a                    |x*      |		MOVEQ.L	#0x2a,D4
00020b32 13 fc 00 01 00 02 18 9a  |        |		MOVE.B	#0x01,0x2189a
00020b3a 7e 01                    |~       |		MOVEQ.L	#0x01,D7
00020b3c 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020b3e 13 c2 00 02 18 8a        |        |		MOVE.B	D2,0x2188a
00020b44 13 c2 00 02 18 90        |        |		MOVE.B	D2,0x21890
00020b4a 4e b9 00 02 17 38        |N    8  |		JSR	exp_INIT_CSTOP_RF.TYP()
00020b50 4e b9 00 02 16 f8        |N       |		JSR	exp_INIT_EVENT_WCS.TYP()
00020b56 4e b9 00 02 17 18        |N       |		JSR	exp_INIT_CSTOP_WCS.TYP()
00020b5c 0c 86 00 00 00 12        |        |		CMPI.L	#0x00000012,D6
00020b62 63 02                    |c       |		BLS	0x20b66
00020b64 4e 4f                    |NO      |		TRAP	#15
00020b66 20 06                    |        |		MOVE.L	D6,D0
00020b68 e7 80                    |        |		ASL.L	#0x3,D0
00020b6a 20 49                    | I      |		MOVEA.L	A1,A0
00020b6c 1f 30 08 02              | 0      |		MOVE.B	(A0+D0.L+#0x2),-(A7)
00020b70 4e ba fc 30              |N  0    |		JSR	0x207a2
00020b74 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b76 20 49                    | I      |		MOVEA.L	A1,A0
00020b78 3f 30 08 00              |?0      |		MOVE.W	(A0+D0.L),-(A7)
00020b7c 4e b9 00 02 16 de        |N       |		JSR	exp_PREP_RUN.TYP(Sw_2)
00020b82 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b84 4e ba fc 94              |N       |		JSR	0x2081a
00020b88 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020b8a 20 49                    | I      |		MOVEA.L	A1,A0
00020b8c 1f 30 08 03              | 0      |		MOVE.B	(A0+D0.L+#0x3),-(A7)
00020b90 4e ba fe d2              |N       |		JSR	0x20a64
00020b94 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b96 2a 1f                    |*       |		MOVE.L	(A7)+,D5
00020b98 22 05                    |"       |		MOVE.L	D5,D1
00020b9a 0c 81 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D1
00020ba0 62 00 01 cc              |b       |		BHI	switch@0x20ba6[0x3]
00020ba4 d2 41                    | A      |		ADD.W	D1,D1
00020ba6 32 3b 10 06 4e fb 10 02  |2;  N   |		SWITCH	D1.W
00020bae 00 40                    | @      |		.CONST	0x40			; [0x0] -> 0x20bee
00020bb0 00 44                    | D      |		.CONST	0x44			; [0x1] -> 0x20bf2
00020bb2 00 72                    | r      |		.CONST	0x72			; [0x2] -> 0x20c20
00020bb4 01 c0                    |        |		.CONST	0x1c0			; [0x3] -> 0x20d6e
00020bb6 00 9e                    |        |		.CONST	0x9e			; [0x4] -> 0x20c4c
00020bb8 01 c0                    |        |		.CONST	0x1c0			; [0x5] -> 0x20d6e
00020bba 01 c0                    |        |		.CONST	0x1c0			; [0x6] -> 0x20d6e
00020bbc 01 c0                    |        |		.CONST	0x1c0			; [0x7] -> 0x20d6e
00020bbe 00 ce                    |        |		.CONST	0xce			; [0x8] -> 0x20c7c
00020bc0 01 c0                    |        |		.CONST	0x1c0			; [0x9] -> 0x20d6e
00020bc2 01 c0                    |        |		.CONST	0x1c0			; [0xa] -> 0x20d6e
00020bc4 01 c0                    |        |		.CONST	0x1c0			; [0xb] -> 0x20d6e
00020bc6 01 c0                    |        |		.CONST	0x1c0			; [0xc] -> 0x20d6e
00020bc8 01 c0                    |        |		.CONST	0x1c0			; [0xd] -> 0x20d6e
00020bca 01 c0                    |        |		.CONST	0x1c0			; [0xe] -> 0x20d6e
00020bcc 00 fe                    |        |		.CONST	0xfe			; [0xf] -> 0x20cac
00020bce 01 48                    | H      |		.CONST	0x148			; [0x10] -> 0x20cf6
00020bd0 01 c0                    |        |		.CONST	0x1c0			; [0x11] -> 0x20d6e
00020bd2 01 c0                    |        |		.CONST	0x1c0			; [0x12] -> 0x20d6e
00020bd4 01 c0                    |        |		.CONST	0x1c0			; [0x13] -> 0x20d6e
00020bd6 01 c0                    |        |		.CONST	0x1c0			; [0x14] -> 0x20d6e
00020bd8 01 c0                    |        |		.CONST	0x1c0			; [0x15] -> 0x20d6e
00020bda 01 c0                    |        |		.CONST	0x1c0			; [0x16] -> 0x20d6e
00020bdc 01 c0                    |        |		.CONST	0x1c0			; [0x17] -> 0x20d6e
00020bde 01 c0                    |        |		.CONST	0x1c0			; [0x18] -> 0x20d6e
00020be0 01 c0                    |        |		.CONST	0x1c0			; [0x19] -> 0x20d6e
00020be2 01 c0                    |        |		.CONST	0x1c0			; [0x1a] -> 0x20d6e
00020be4 01 c0                    |        |		.CONST	0x1c0			; [0x1b] -> 0x20d6e
00020be6 01 c0                    |        |		.CONST	0x1c0			; [0x1c] -> 0x20d6e
00020be8 01 c0                    |        |		.CONST	0x1c0			; [0x1d] -> 0x20d6e
00020bea 01 c0                    |        |		.CONST	0x1c0			; [0x1e] -> 0x20d6e
00020bec 01 6e                    | n      |		.CONST	0x16e			; [0x1f] -> 0x20d1c
00020bee					switch@0x20ba6[0x0]:
00020bee 60 00 01 c2              |`       |		BRA	0x20db2
00020bf2					switch@0x20ba6[0x1]:
00020bf2 14 bc 00 05              |        |		MOVE.B	#0x05,(A2)
00020bf6 13 c3 00 02 18 8a        |        |		MOVE.B	D3,0x2188a
00020bfc 20 49                    | I      |		MOVEA.L	A1,A0
00020bfe 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020c02 20 49                    | I      |		MOVEA.L	A1,A0
00020c04 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020c08 66 06                    |f       |		BNE	0x20c10
00020c0a 42 27                    |B'      |		CLR.B	-(A7)
00020c0c 1f 03                    |        |		MOVE.B	D3,-(A7)
00020c0e 60 06                    |`       |		BRA	0x20c16
00020c10 18 84                    |        |		MOVE.B	D4,(A4)
00020c12 42 27                    |B'      |		CLR.B	-(A7)
00020c14 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c16 4e ba fa 44              |N  D    |		JSR	0x2065c
00020c1a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c1c 60 00 01 94              |`       |		BRA	0x20db2
00020c20					switch@0x20ba6[0x2]:
00020c20 14 82                    |        |		MOVE.B	D2,(A2)
00020c22 42 39 00 02 18 8a        |B9      |		CLR.B	0x2188a
00020c28 20 49                    | I      |		MOVEA.L	A1,A0
00020c2a 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020c2e 20 49                    | I      |		MOVEA.L	A1,A0
00020c30 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020c34 66 06                    |f       |		BNE	0x20c3c
00020c36 42 27                    |B'      |		CLR.B	-(A7)
00020c38 1f 03                    |        |		MOVE.B	D3,-(A7)
00020c3a 60 06                    |`       |		BRA	0x20c42
00020c3c 18 84                    |        |		MOVE.B	D4,(A4)
00020c3e 42 27                    |B'      |		CLR.B	-(A7)
00020c40 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c42 4e ba fa 18              |N       |		JSR	0x2065c
00020c46 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c48 60 00 01 68              |`  h    |		BRA	0x20db2
00020c4c					switch@0x20ba6[0x4]:
00020c4c 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
00020c50 13 fc 00 04 00 02 18 8a  |        |		MOVE.B	#0x04,0x2188a
00020c58 20 49                    | I      |		MOVEA.L	A1,A0
00020c5a 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020c5e 20 49                    | I      |		MOVEA.L	A1,A0
00020c60 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020c64 66 06                    |f       |		BNE	0x20c6c
00020c66 42 27                    |B'      |		CLR.B	-(A7)
00020c68 1f 03                    |        |		MOVE.B	D3,-(A7)
00020c6a 60 06                    |`       |		BRA	0x20c72
00020c6c 18 84                    |        |		MOVE.B	D4,(A4)
00020c6e 42 27                    |B'      |		CLR.B	-(A7)
00020c70 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c72 4e ba f9 e8              |N       |		JSR	0x2065c
00020c76 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c78 60 00 01 38              |`  8    |		BRA	0x20db2
00020c7c					switch@0x20ba6[0x8]:
00020c7c 14 bc 00 04              |        |		MOVE.B	#0x04,(A2)
00020c80 13 fc 00 01 00 02 18 8a  |        |		MOVE.B	#0x01,0x2188a
00020c88 20 49                    | I      |		MOVEA.L	A1,A0
00020c8a 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020c8e 20 49                    | I      |		MOVEA.L	A1,A0
00020c90 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020c94 66 06                    |f       |		BNE	0x20c9c
00020c96 42 27                    |B'      |		CLR.B	-(A7)
00020c98 1f 03                    |        |		MOVE.B	D3,-(A7)
00020c9a 60 06                    |`       |		BRA	0x20ca2
00020c9c 18 84                    |        |		MOVE.B	D4,(A4)
00020c9e 42 27                    |B'      |		CLR.B	-(A7)
00020ca0 1f 02                    |        |		MOVE.B	D2,-(A7)
00020ca2 4e ba f9 b8              |N       |		JSR	0x2065c
00020ca6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ca8 60 00 01 08              |`       |		BRA	0x20db2
00020cac					switch@0x20ba6[0xf]:
00020cac 20 49                    | I      |		MOVEA.L	A1,A0
00020cae 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020cb2 20 49                    | I      |		MOVEA.L	A1,A0
00020cb4 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020cb8 67 0a                    |g       |		BEQ	0x20cc4
00020cba 14 84                    |        |		MOVE.B	D4,(A2)
00020cbc 42 27                    |B'      |		CLR.B	-(A7)
00020cbe 1f 3c 00 07              | <      |		MOVE.B	#0x07,-(A7)
00020cc2 60 28                    |`(      |		BRA	0x20cec
00020cc4 14 83                    |        |		MOVE.B	D3,(A2)
00020cc6 18 82                    |        |		MOVE.B	D2,(A4)
00020cc8 13 fc 00 06 00 02 18 7a  |       z|		MOVE.B	#0x06,0x2187a
00020cd0 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
00020cd8 13 fc 00 05 00 02 18 7c  |       ||		MOVE.B	#0x05,0x2187c
00020ce0 13 c4 00 02 18 7d        |     }  |		MOVE.B	D4,0x2187d
00020ce6 42 27                    |B'      |		CLR.B	-(A7)
00020ce8 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
00020cec 4e ba f9 6e              |N  n    |		JSR	0x2065c
00020cf0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020cf2 60 00 00 be              |`       |		BRA	0x20db2
00020cf6					switch@0x20ba6[0x10]:
00020cf6 14 83                    |        |		MOVE.B	D3,(A2)
00020cf8 20 49                    | I      |		MOVEA.L	A1,A0
00020cfa 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020cfe 20 49                    | I      |		MOVEA.L	A1,A0
00020d00 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020d04 67 08                    |g       |		BEQ	0x20d0e
00020d06 42 27                    |B'      |		CLR.B	-(A7)
00020d08 1f 3c 00 06              | <      |		MOVE.B	#0x06,-(A7)
00020d0c 60 04                    |`       |		BRA	0x20d12
00020d0e 42 27                    |B'      |		CLR.B	-(A7)
00020d10 1f 03                    |        |		MOVE.B	D3,-(A7)
00020d12 4e ba f9 48              |N  H    |		JSR	0x2065c
00020d16 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020d18 60 00 00 98              |`       |		BRA	0x20db2
00020d1c					switch@0x20ba6[0x1f]:
00020d1c 14 83                    |        |		MOVE.B	D3,(A2)
00020d1e 20 49                    | I      |		MOVEA.L	A1,A0
00020d20 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020d24 20 49                    | I      |		MOVEA.L	A1,A0
00020d26 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020d2a 67 08                    |g       |		BEQ	0x20d34
00020d2c 42 27                    |B'      |		CLR.B	-(A7)
00020d2e 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00020d32 60 32                    |`2      |		BRA	0x20d66
00020d34 4a 07                    |J       |		TST.B	D7
00020d36 66 08                    |f       |		BNE	0x20d40
00020d38 42 27                    |B'      |		CLR.B	-(A7)
00020d3a 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
00020d3e 60 26                    |`&      |		BRA	0x20d66
00020d40 18 82                    |        |		MOVE.B	D2,(A4)
00020d42 13 fc 00 06 00 02 18 7a  |       z|		MOVE.B	#0x06,0x2187a
00020d4a 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
00020d52 13 fc 00 05 00 02 18 7c  |       ||		MOVE.B	#0x05,0x2187c
00020d5a 13 c4 00 02 18 7d        |     }  |		MOVE.B	D4,0x2187d
00020d60 42 27                    |B'      |		CLR.B	-(A7)
00020d62 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
00020d66 4e ba f8 f4              |N       |		JSR	0x2065c
00020d6a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020d6c 60 44                    |`D      |		BRA	0x20db2
00020d6e					switch@0x20ba6[0x11]:
00020d6e					switch@0x20ba6[0x12]:
00020d6e					switch@0x20ba6[0x13]:
00020d6e					switch@0x20ba6[0x14]:
00020d6e					switch@0x20ba6[0x15]:
00020d6e					switch@0x20ba6[0x16]:
00020d6e					switch@0x20ba6[0x17]:
00020d6e					switch@0x20ba6[0x18]:
00020d6e					switch@0x20ba6[0x19]:
00020d6e					switch@0x20ba6[0x1a]:
00020d6e					switch@0x20ba6[0x1b]:
00020d6e					switch@0x20ba6[0x1c]:
00020d6e					switch@0x20ba6[0x1d]:
00020d6e					switch@0x20ba6[0x1e]:
00020d6e					switch@0x20ba6[0x3]:
00020d6e					switch@0x20ba6[0x5]:
00020d6e					switch@0x20ba6[0x6]:
00020d6e					switch@0x20ba6[0x7]:
00020d6e					switch@0x20ba6[0x9]:
00020d6e					switch@0x20ba6[0xa]:
00020d6e					switch@0x20ba6[0xb]:
00020d6e					switch@0x20ba6[0xc]:
00020d6e					switch@0x20ba6[0xd]:
00020d6e					switch@0x20ba6[0xe]:
00020d6e 14 83                    |        |		MOVE.B	D3,(A2)
00020d70 18 82                    |        |		MOVE.B	D2,(A4)
00020d72 13 fc 00 06 00 02 18 7a  |       z|		MOVE.B	#0x06,0x2187a
00020d7a 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
00020d82 13 fc 00 05 00 02 18 7c  |       ||		MOVE.B	#0x05,0x2187c
00020d8a 13 c4 00 02 18 7d        |     }  |		MOVE.B	D4,0x2187d
00020d90 20 49                    | I      |		MOVEA.L	A1,A0
00020d92 26 b0 08 04              |&       |		MOVE.L	(A0+D0.L+#0x4),(A3)
00020d96 20 49                    | I      |		MOVEA.L	A1,A0
00020d98 4a 30 08 03              |J0      |		TST.B	(A0+D0.L+#0x3)
00020d9c 67 08                    |g       |		BEQ	0x20da6
00020d9e 42 27                    |B'      |		CLR.B	-(A7)
00020da0 1f 3c 00 08              | <      |		MOVE.B	#0x08,-(A7)
00020da4 60 06                    |`       |		BRA	0x20dac
00020da6 42 27                    |B'      |		CLR.B	-(A7)
00020da8 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
00020dac 4e ba f8 ae              |N       |		JSR	0x2065c
00020db0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020db2 52 86                    |R       |		ADDQ.L	#0x1,D6
00020db4 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020db6 0c 86 00 00 00 12        |        |		CMPI.L	#0x00000012,D6
00020dbc 6f 00 fd 9e              |o       |		BLE	0x20b5c
00020dc0 42 39 00 02 18 9a        |B9      |		CLR.B	0x2189a
00020dc6 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00020dca 4e 5e                    |N^      |		UNLK	A6
00020dcc 4e 75                    |Nu      |		RTS
00020dce ; --------------------------------------------------------------------------------------
00020dce ; OMSI PASCAL Function
00020dce ; --------------------------------------------------------------------------------------
00020dce 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
00020dd2 bf d5                    |        |		CMPA.L	(A5),A7
00020dd4 62 06                    |b       |		BHI	0x20ddc
00020dd6 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00020dda 4e 76                    |Nv      |		TRAPV
00020ddc de fc 00 42              |   B    |		ADDA.W	#0x42,A7
00020de0 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020de4 43 fa f4 ac              |C       |		LEA.L	0x20292,A1
00020de8 45 f9 00 02 18 78        |E    x  |		LEA.L	0x21878,A2
00020dee 47 f9 00 02 18 8c        |G       |		LEA.L	0x2188c,A3
00020df4 49 f9 00 02 18 79        |I    y  |		LEA.L	0x21879,A4
00020dfa 72 02                    |r       |		MOVEQ.L	#0x02,D1
00020dfc 74 03                    |t       |		MOVEQ.L	#0x03,D2
00020dfe 7a 2a                    |z*      |		MOVEQ.L	#0x2a,D5
00020e00 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020e02 13 fc 00 04 00 02 18 8a  |        |		MOVE.B	#0x04,0x2188a
00020e0a 13 fc 00 04 00 02 18 90  |        |		MOVE.B	#0x04,0x21890
00020e12 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
00020e16 4e ba f9 8a              |N       |		JSR	0x207a2
00020e1a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e1c be 81                    |        |		CMP.L	D1,D7
00020e1e 63 02                    |c       |		BLS	0x20e22
00020e20 4e 4f                    |NO      |		TRAP	#15
00020e22 28 07                    |(       |		MOVE.L	D7,D4
00020e24 76 06                    |v       |		MOVEQ.L	#0x06,D3
00020e26 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00020e2c 20 49                    | I      |		MOVEA.L	A1,A0
00020e2e 1f 30 48 00              | 0H     |		MOVE.B	(A0+D4.L),-(A7)
00020e32 4e b9 00 02 14 cc        |N       |		JSR	exp_LOAD_MAR_STATE_BITS.FIU(Sw_1)
00020e38 42 57                    |BW      |		CLR.W	(A7)
00020e3a 4e b9 00 02 14 98        |N       |		JSR	exp_PREP_RUN.FIU(Sw_2)
00020e40 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e42 4e ba f9 d6              |N       |		JSR	0x2081a
00020e46 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020e48 20 49                    | I      |		MOVEA.L	A1,A0
00020e4a 1f 30 48 01              | 0H     |		MOVE.B	(A0+D4.L+#0x1),-(A7)
00020e4e 4e ba fc 14              |N       |		JSR	0x20a64
00020e52 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e54 2c 1f                    |,       |		MOVE.L	(A7)+,D6
00020e56 20 06                    |        |		MOVE.L	D6,D0
00020e58 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
00020e5e 62 00 01 9e              |b       |		BHI	switch@0x20e64[0x3]
00020e62 d0 40                    | @      |		ADD.W	D0,D0
00020e64 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00020e6c 00 40                    | @      |		.CONST	0x40			; [0x0] -> 0x20eac
00020e6e 00 44                    | D      |		.CONST	0x44			; [0x1] -> 0x20eb0
00020e70 00 72                    | r      |		.CONST	0x72			; [0x2] -> 0x20ede
00020e72 01 92                    |        |		.CONST	0x192			; [0x3] -> 0x20ffe
00020e74 00 9e                    |        |		.CONST	0x9e			; [0x4] -> 0x20f0a
00020e76 01 92                    |        |		.CONST	0x192			; [0x5] -> 0x20ffe
00020e78 01 92                    |        |		.CONST	0x192			; [0x6] -> 0x20ffe
00020e7a 01 92                    |        |		.CONST	0x192			; [0x7] -> 0x20ffe
00020e7c 00 c6                    |        |		.CONST	0xc6			; [0x8] -> 0x20f32
00020e7e 01 92                    |        |		.CONST	0x192			; [0x9] -> 0x20ffe
00020e80 01 92                    |        |		.CONST	0x192			; [0xa] -> 0x20ffe
00020e82 01 92                    |        |		.CONST	0x192			; [0xb] -> 0x20ffe
00020e84 01 92                    |        |		.CONST	0x192			; [0xc] -> 0x20ffe
00020e86 01 92                    |        |		.CONST	0x192			; [0xd] -> 0x20ffe
00020e88 01 92                    |        |		.CONST	0x192			; [0xe] -> 0x20ffe
00020e8a 01 92                    |        |		.CONST	0x192			; [0xf] -> 0x20ffe
00020e8c 00 f6                    |        |		.CONST	0xf6			; [0x10] -> 0x20f62
00020e8e 01 92                    |        |		.CONST	0x192			; [0x11] -> 0x20ffe
00020e90 01 92                    |        |		.CONST	0x192			; [0x12] -> 0x20ffe
00020e92 01 92                    |        |		.CONST	0x192			; [0x13] -> 0x20ffe
00020e94 01 92                    |        |		.CONST	0x192			; [0x14] -> 0x20ffe
00020e96 01 92                    |        |		.CONST	0x192			; [0x15] -> 0x20ffe
00020e98 01 92                    |        |		.CONST	0x192			; [0x16] -> 0x20ffe
00020e9a 01 92                    |        |		.CONST	0x192			; [0x17] -> 0x20ffe
00020e9c 01 92                    |        |		.CONST	0x192			; [0x18] -> 0x20ffe
00020e9e 01 92                    |        |		.CONST	0x192			; [0x19] -> 0x20ffe
00020ea0 01 92                    |        |		.CONST	0x192			; [0x1a] -> 0x20ffe
00020ea2 01 22                    | "      |		.CONST	0x122			; [0x1b] -> 0x20f8e
00020ea4 01 92                    |        |		.CONST	0x192			; [0x1c] -> 0x20ffe
00020ea6 01 92                    |        |		.CONST	0x192			; [0x1d] -> 0x20ffe
00020ea8 01 92                    |        |		.CONST	0x192			; [0x1e] -> 0x20ffe
00020eaa 01 6a                    | j      |		.CONST	0x16a			; [0x1f] -> 0x20fd6
00020eac					switch@0x20e64[0x0]:
00020eac 60 00 01 94              |`       |		BRA	0x21042
00020eb0					switch@0x20e64[0x1]:
00020eb0 14 bc 00 05              |        |		MOVE.B	#0x05,(A2)
00020eb4 13 c2 00 02 18 8a        |        |		MOVE.B	D2,0x2188a
00020eba 20 49                    | I      |		MOVEA.L	A1,A0
00020ebc 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020ec0 20 49                    | I      |		MOVEA.L	A1,A0
00020ec2 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020ec6 66 06                    |f       |		BNE	0x20ece
00020ec8 42 27                    |B'      |		CLR.B	-(A7)
00020eca 1f 02                    |        |		MOVE.B	D2,-(A7)
00020ecc 60 06                    |`       |		BRA	0x20ed4
00020ece 18 85                    |        |		MOVE.B	D5,(A4)
00020ed0 42 27                    |B'      |		CLR.B	-(A7)
00020ed2 1f 01                    |        |		MOVE.B	D1,-(A7)
00020ed4 4e ba f7 86              |N       |		JSR	0x2065c
00020ed8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020eda 60 00 01 66              |`  f    |		BRA	0x21042
00020ede					switch@0x20e64[0x2]:
00020ede 14 81                    |        |		MOVE.B	D1,(A2)
00020ee0 42 39 00 02 18 8a        |B9      |		CLR.B	0x2188a
00020ee6 20 49                    | I      |		MOVEA.L	A1,A0
00020ee8 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020eec 20 49                    | I      |		MOVEA.L	A1,A0
00020eee 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020ef2 66 06                    |f       |		BNE	0x20efa
00020ef4 42 27                    |B'      |		CLR.B	-(A7)
00020ef6 1f 02                    |        |		MOVE.B	D2,-(A7)
00020ef8 60 06                    |`       |		BRA	0x20f00
00020efa 18 85                    |        |		MOVE.B	D5,(A4)
00020efc 42 27                    |B'      |		CLR.B	-(A7)
00020efe 1f 01                    |        |		MOVE.B	D1,-(A7)
00020f00 4e ba f7 5a              |N  Z    |		JSR	0x2065c
00020f04 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020f06 60 00 01 3a              |`  :    |		BRA	0x21042
00020f0a					switch@0x20e64[0x4]:
00020f0a 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
00020f0e 20 49                    | I      |		MOVEA.L	A1,A0
00020f10 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020f14 20 49                    | I      |		MOVEA.L	A1,A0
00020f16 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020f1a 67 08                    |g       |		BEQ	0x20f24
00020f1c 42 27                    |B'      |		CLR.B	-(A7)
00020f1e 1f 3c 00 06              | <      |		MOVE.B	#0x06,-(A7)
00020f22 60 04                    |`       |		BRA	0x20f28
00020f24 42 27                    |B'      |		CLR.B	-(A7)
00020f26 1f 02                    |        |		MOVE.B	D2,-(A7)
00020f28 4e ba f7 32              |N  2    |		JSR	0x2065c
00020f2c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020f2e 60 00 01 12              |`       |		BRA	0x21042
00020f32					switch@0x20e64[0x8]:
00020f32 14 bc 00 04              |        |		MOVE.B	#0x04,(A2)
00020f36 13 fc 00 01 00 02 18 8a  |        |		MOVE.B	#0x01,0x2188a
00020f3e 20 49                    | I      |		MOVEA.L	A1,A0
00020f40 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020f44 20 49                    | I      |		MOVEA.L	A1,A0
00020f46 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020f4a 66 06                    |f       |		BNE	0x20f52
00020f4c 42 27                    |B'      |		CLR.B	-(A7)
00020f4e 1f 02                    |        |		MOVE.B	D2,-(A7)
00020f50 60 06                    |`       |		BRA	0x20f58
00020f52 18 85                    |        |		MOVE.B	D5,(A4)
00020f54 42 27                    |B'      |		CLR.B	-(A7)
00020f56 1f 01                    |        |		MOVE.B	D1,-(A7)
00020f58 4e ba f7 02              |N       |		JSR	0x2065c
00020f5c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020f5e 60 00 00 e2              |`       |		BRA	0x21042
00020f62					switch@0x20e64[0x10]:
00020f62 14 82                    |        |		MOVE.B	D2,(A2)
00020f64 13 c1 00 02 18 8a        |        |		MOVE.B	D1,0x2188a
00020f6a 20 49                    | I      |		MOVEA.L	A1,A0
00020f6c 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020f70 20 49                    | I      |		MOVEA.L	A1,A0
00020f72 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020f76 66 06                    |f       |		BNE	0x20f7e
00020f78 42 27                    |B'      |		CLR.B	-(A7)
00020f7a 1f 02                    |        |		MOVE.B	D2,-(A7)
00020f7c 60 06                    |`       |		BRA	0x20f84
00020f7e 18 85                    |        |		MOVE.B	D5,(A4)
00020f80 42 27                    |B'      |		CLR.B	-(A7)
00020f82 1f 01                    |        |		MOVE.B	D1,-(A7)
00020f84 4e ba f6 d6              |N       |		JSR	0x2065c
00020f88 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020f8a 60 00 00 b6              |`       |		BRA	0x21042
00020f8e					switch@0x20e64[0x1b]:
00020f8e 20 49                    | I      |		MOVEA.L	A1,A0
00020f90 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020f94 20 49                    | I      |		MOVEA.L	A1,A0
00020f96 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020f9a 67 0a                    |g       |		BEQ	0x20fa6
00020f9c 14 85                    |        |		MOVE.B	D5,(A2)
00020f9e 42 27                    |B'      |		CLR.B	-(A7)
00020fa0 1f 3c 00 07              | <      |		MOVE.B	#0x07,-(A7)
00020fa4 60 28                    |`(      |		BRA	0x20fce
00020fa6 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
00020faa 18 81                    |        |		MOVE.B	D1,(A4)
00020fac 13 c2 00 02 18 7a        |     z  |		MOVE.B	D2,0x2187a
00020fb2 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
00020fba 13 fc 00 05 00 02 18 7c  |       ||		MOVE.B	#0x05,0x2187c
00020fc2 13 c5 00 02 18 7d        |     }  |		MOVE.B	D5,0x2187d
00020fc8 42 27                    |B'      |		CLR.B	-(A7)
00020fca 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
00020fce 4e ba f6 8c              |N       |		JSR	0x2065c
00020fd2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020fd4 60 6c                    |`l      |		BRA	0x21042
00020fd6					switch@0x20e64[0x1f]:
00020fd6 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
00020fda 20 49                    | I      |		MOVEA.L	A1,A0
00020fdc 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00020fe0 20 49                    | I      |		MOVEA.L	A1,A0
00020fe2 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00020fe6 67 08                    |g       |		BEQ	0x20ff0
00020fe8 42 27                    |B'      |		CLR.B	-(A7)
00020fea 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00020fee 60 06                    |`       |		BRA	0x20ff6
00020ff0 42 27                    |B'      |		CLR.B	-(A7)
00020ff2 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
00020ff6 4e ba f6 64              |N  d    |		JSR	0x2065c
00020ffa 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ffc 60 44                    |`D      |		BRA	0x21042
00020ffe					switch@0x20e64[0x11]:
00020ffe					switch@0x20e64[0x12]:
00020ffe					switch@0x20e64[0x13]:
00020ffe					switch@0x20e64[0x14]:
00020ffe					switch@0x20e64[0x15]:
00020ffe					switch@0x20e64[0x16]:
00020ffe					switch@0x20e64[0x17]:
00020ffe					switch@0x20e64[0x18]:
00020ffe					switch@0x20e64[0x19]:
00020ffe					switch@0x20e64[0x1a]:
00020ffe					switch@0x20e64[0x1c]:
00020ffe					switch@0x20e64[0x1d]:
00020ffe					switch@0x20e64[0x1e]:
00020ffe					switch@0x20e64[0x3]:
00020ffe					switch@0x20e64[0x5]:
00020ffe					switch@0x20e64[0x6]:
00020ffe					switch@0x20e64[0x7]:
00020ffe					switch@0x20e64[0x9]:
00020ffe					switch@0x20e64[0xa]:
00020ffe					switch@0x20e64[0xb]:
00020ffe					switch@0x20e64[0xc]:
00020ffe					switch@0x20e64[0xd]:
00020ffe					switch@0x20e64[0xe]:
00020ffe					switch@0x20e64[0xf]:
00020ffe 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
00021002 18 81                    |        |		MOVE.B	D1,(A4)
00021004 13 c2 00 02 18 7a        |     z  |		MOVE.B	D2,0x2187a
0002100a 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
00021012 13 fc 00 05 00 02 18 7c  |       ||		MOVE.B	#0x05,0x2187c
0002101a 13 c5 00 02 18 7d        |     }  |		MOVE.B	D5,0x2187d
00021020 20 49                    | I      |		MOVEA.L	A1,A0
00021022 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00021026 20 49                    | I      |		MOVEA.L	A1,A0
00021028 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
0002102c 67 08                    |g       |		BEQ	0x21036
0002102e 42 27                    |B'      |		CLR.B	-(A7)
00021030 1f 3c 00 08              | <      |		MOVE.B	#0x08,-(A7)
00021034 60 06                    |`       |		BRA	0x2103c
00021036 42 27                    |B'      |		CLR.B	-(A7)
00021038 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
0002103c 4e ba f6 1e              |N       |		JSR	0x2065c
00021040 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021042 52 87                    |R       |		ADDQ.L	#0x1,D7
00021044 be 81                    |        |		CMP.L	D1,D7
00021046 6f 00 fd ca              |o       |		BLE	0x20e12
0002104a 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002104e 4e 5e                    |N^      |		UNLK	A6
00021050 4e 75                    |Nu      |		RTS
00021052 ; --------------------------------------------------------------------------------------
00021052 ; OMSI PASCAL Function
00021052 ; --------------------------------------------------------------------------------------
00021052 4e 56 ff fc              |NV      |		LINK.W	A6,#0xfffc
00021056 bf d5                    |        |		CMPA.L	(A5),A7
00021058 62 06                    |b       |		BHI	0x21060
0002105a 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
0002105e 4e 76                    |Nv      |		TRAPV
00021060 de fc 00 04              |        |		ADDA.W	#0x4,A7
00021064 4e 5e                    |N^      |		UNLK	A6
00021066 4e 75                    |Nu      |		RTS
00021068 ; --------------------------------------------------------------------------------------
00021068 ; OMSI PASCAL Function
00021068 ; --------------------------------------------------------------------------------------
00021068 4e 56 ff f0              |NV      |		LINK.W	A6,#0xfff0		; Spelunked
0002106c bf d5                    |        |		CMPA.L	(A5),A7
0002106e 62 06                    |b       |		BHI	0x21076
00021070 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
00021074 4e 76                    |Nv      |		TRAPV
00021076 de fc 00 08              |        |		ADDA.W	#0x8,A7
0002107a 48 e7 01 00              |H       |		MOVEM.L	D7,-(A7)
0002107e 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021080 42 39 00 02 18 8a        |B9      |		CLR.B	0x2188a
00021086 42 39 00 02 18 90        |B9      |		CLR.B	0x21890
0002108c 4c df 00 80              |L       |		MOVEM.L	(A7)+,D7
00021090 4e 5e                    |N^      |		UNLK	A6
00021092 4e 75                    |Nu      |		RTS
00021094 ; --------------------------------------------------------------------------------------
00021094 ; OMSI PASCAL Function
00021094 ; --------------------------------------------------------------------------------------
00021094 4e 56 ff b6              |NV      |		LINK.W	A6,#0xffb6
00021098 bf d5                    |        |		CMPA.L	(A5),A7
0002109a 62 06                    |b       |		BHI	0x210a2
0002109c 44 fc 00 02              |D       |		MOVE.W	#0x2,CCR
000210a0 4e 76                    |Nv      |		TRAPV
000210a2 de fc 00 42              |   B    |		ADDA.W	#0x42,A7
000210a6 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000210aa 43 fa f2 18              |C       |		LEA.L	0x202c4,A1
000210ae 45 f9 00 02 18 78        |E    x  |		LEA.L	0x21878,A2
000210b4 47 f9 00 02 18 8c        |G       |		LEA.L	0x2188c,A3
000210ba 49 f9 00 02 18 79        |I    y  |		LEA.L	0x21879,A4
000210c0 72 03                    |r       |		MOVEQ.L	#0x03,D1
000210c2 74 02                    |t       |		MOVEQ.L	#0x02,D2
000210c4 7a 2a                    |z*      |		MOVEQ.L	#0x2a,D5
000210c6 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000210c8 13 c1 00 02 18 8a        |        |		MOVE.B	D1,0x2188a
000210ce 13 c1 00 02 18 90        |        |		MOVE.B	D1,0x21890
000210d4 0c 87 00 00 00 0a        |        |		CMPI.L	#0x0000000a,D7
000210da 63 02                    |c       |		BLS	0x210de
000210dc 4e 4f                    |NO      |		TRAP	#15
000210de 28 07                    |(       |		MOVE.L	D7,D4
000210e0 76 06                    |v       |		MOVEQ.L	#0x06,D3
000210e2 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
000210e8 20 49                    | I      |		MOVEA.L	A1,A0
000210ea 1f 30 48 00              | 0H     |		MOVE.B	(A0+D4.L),-(A7)
000210ee 4e ba f6 b2              |N       |		JSR	0x207a2
000210f2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000210f4 20 07                    |        |		MOVE.L	D7,D0
000210f6 0c 80 00 00 00 0a        |        |		CMPI.L	#0x0000000a,D0
000210fc 63 02                    |c       |		BLS	0x21100
000210fe 4e 4e                    |NN      |		TRAP	#14
00021100 d0 40                    | @      |		ADD.W	D0,D0
00021102 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
0002110a 00 16                    |        |		.CONST	0x16			; [0x0] -> 0x21120
0002110c 00 16                    |        |		.CONST	0x16			; [0x1] -> 0x21120
0002110e 00 1e                    |        |		.CONST	0x1e			; [0x2] -> 0x21128
00021110 00 1e                    |        |		.CONST	0x1e			; [0x3] -> 0x21128
00021112 00 26                    | &      |		.CONST	0x26			; [0x4] -> 0x21130
00021114 00 26                    | &      |		.CONST	0x26			; [0x5] -> 0x21130
00021116 00 2e                    | .      |		.CONST	0x2e			; [0x6] -> 0x21138
00021118 00 2e                    | .      |		.CONST	0x2e			; [0x7] -> 0x21138
0002111a 00 36                    | 6      |		.CONST	0x36			; [0x8] -> 0x21140
0002111c 00 36                    | 6      |		.CONST	0x36			; [0x9] -> 0x21140
0002111e 00 3c                    | <      |		.CONST	0x3c			; [0xa] -> 0x21146
00021120					switch@0x21102[0x0]:
00021120					switch@0x21102[0x1]:
00021120 4e b9 00 02 15 82        |N       |		JSR	exp_SETUP_MICRO_EVENT.SEQ()
00021126 60 1e                    |`       |		BRA	switch@0x21102[0xa]
00021128					switch@0x21102[0x2]:
00021128					switch@0x21102[0x3]:
00021128 4e b9 00 02 15 ea        |N       |		JSR	exp_SETUP_BAD_HINT.SEQ()
0002112e 60 16                    |`       |		BRA	switch@0x21102[0xa]
00021130					switch@0x21102[0x4]:
00021130					switch@0x21102[0x5]:
00021130 4e b9 00 02 15 cc        |N       |		JSR	exp_SETUP_HICCUP.SEQ()
00021136 60 0e                    |`       |		BRA	switch@0x21102[0xa]
00021138					switch@0x21102[0x6]:
00021138					switch@0x21102[0x7]:
00021138 4e b9 00 02 15 5a        |N    Z  |		JSR	exp_SETUP_MICRO_FIELD_EVENT.SEQ()
0002113e 60 06                    |`       |		BRA	switch@0x21102[0xa]
00021140					switch@0x21102[0x8]:
00021140					switch@0x21102[0x9]:
00021140 4e b9 00 02 15 a4        |N       |		JSR	exp_SETUP_MICRO_EXIT_EVENT.SEQ()
00021146					switch@0x21102[0xa]:
00021146 4e ba f6 d2              |N       |		JSR	0x2081a
0002114a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002114c 20 49                    | I      |		MOVEA.L	A1,A0
0002114e 1f 30 48 01              | 0H     |		MOVE.B	(A0+D4.L+#0x1),-(A7)
00021152 4e ba f9 10              |N       |		JSR	0x20a64
00021156 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021158 2c 1f                    |,       |		MOVE.L	(A7)+,D6
0002115a 20 06                    |        |		MOVE.L	D6,D0
0002115c 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
00021162 62 00 01 a0              |b       |		BHI	switch@0x21168[0x3]
00021166 d0 40                    | @      |		ADD.W	D0,D0
00021168 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00021170 00 40                    | @      |		.CONST	0x40			; [0x0] -> 0x211b0
00021172 00 44                    | D      |		.CONST	0x44			; [0x1] -> 0x211b4
00021174 00 6c                    | l      |		.CONST	0x6c			; [0x2] -> 0x211dc
00021176 01 94                    |        |		.CONST	0x194			; [0x3] -> 0x21304
00021178 00 98                    |        |		.CONST	0x98			; [0x4] -> 0x21208
0002117a 01 94                    |        |		.CONST	0x194			; [0x5] -> 0x21304
0002117c 01 94                    |        |		.CONST	0x194			; [0x6] -> 0x21304
0002117e 01 94                    |        |		.CONST	0x194			; [0x7] -> 0x21304
00021180 00 c8                    |        |		.CONST	0xc8			; [0x8] -> 0x21238
00021182 01 94                    |        |		.CONST	0x194			; [0x9] -> 0x21304
00021184 01 94                    |        |		.CONST	0x194			; [0xa] -> 0x21304
00021186 01 94                    |        |		.CONST	0x194			; [0xb] -> 0x21304
00021188 01 94                    |        |		.CONST	0x194			; [0xc] -> 0x21304
0002118a 01 94                    |        |		.CONST	0x194			; [0xd] -> 0x21304
0002118c 01 94                    |        |		.CONST	0x194			; [0xe] -> 0x21304
0002118e 01 94                    |        |		.CONST	0x194			; [0xf] -> 0x21304
00021190 00 f8                    |        |		.CONST	0xf8			; [0x10] -> 0x21268
00021192 01 94                    |        |		.CONST	0x194			; [0x11] -> 0x21304
00021194 01 94                    |        |		.CONST	0x194			; [0x12] -> 0x21304
00021196 01 94                    |        |		.CONST	0x194			; [0x13] -> 0x21304
00021198 01 94                    |        |		.CONST	0x194			; [0x14] -> 0x21304
0002119a 01 94                    |        |		.CONST	0x194			; [0x15] -> 0x21304
0002119c 01 94                    |        |		.CONST	0x194			; [0x16] -> 0x21304
0002119e 01 94                    |        |		.CONST	0x194			; [0x17] -> 0x21304
000211a0 01 94                    |        |		.CONST	0x194			; [0x18] -> 0x21304
000211a2 01 94                    |        |		.CONST	0x194			; [0x19] -> 0x21304
000211a4 01 94                    |        |		.CONST	0x194			; [0x1a] -> 0x21304
000211a6 01 94                    |        |		.CONST	0x194			; [0x1b] -> 0x21304
000211a8 01 94                    |        |		.CONST	0x194			; [0x1c] -> 0x21304
000211aa 01 94                    |        |		.CONST	0x194			; [0x1d] -> 0x21304
000211ac 01 24                    | $      |		.CONST	0x124			; [0x1e] -> 0x21294
000211ae 01 6c                    | l      |		.CONST	0x16c			; [0x1f] -> 0x212dc
000211b0					switch@0x21168[0x0]:
000211b0 60 00 01 96              |`       |		BRA	0x21348
000211b4					switch@0x21168[0x1]:
000211b4 14 bc 00 05              |        |		MOVE.B	#0x05,(A2)
000211b8 20 49                    | I      |		MOVEA.L	A1,A0
000211ba 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
000211be 20 49                    | I      |		MOVEA.L	A1,A0
000211c0 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
000211c4 67 08                    |g       |		BEQ	0x211ce
000211c6 42 27                    |B'      |		CLR.B	-(A7)
000211c8 1f 3c 00 06              | <      |		MOVE.B	#0x06,-(A7)
000211cc 60 04                    |`       |		BRA	0x211d2
000211ce 42 27                    |B'      |		CLR.B	-(A7)
000211d0 1f 01                    |        |		MOVE.B	D1,-(A7)
000211d2 4e ba f4 88              |N       |		JSR	0x2065c
000211d6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000211d8 60 00 01 6e              |`  n    |		BRA	0x21348
000211dc					switch@0x21168[0x2]:
000211dc 14 82                    |        |		MOVE.B	D2,(A2)
000211de 42 39 00 02 18 8a        |B9      |		CLR.B	0x2188a
000211e4 20 49                    | I      |		MOVEA.L	A1,A0
000211e6 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
000211ea 20 49                    | I      |		MOVEA.L	A1,A0
000211ec 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
000211f0 66 06                    |f       |		BNE	0x211f8
000211f2 42 27                    |B'      |		CLR.B	-(A7)
000211f4 1f 01                    |        |		MOVE.B	D1,-(A7)
000211f6 60 06                    |`       |		BRA	0x211fe
000211f8 18 85                    |        |		MOVE.B	D5,(A4)
000211fa 42 27                    |B'      |		CLR.B	-(A7)
000211fc 1f 02                    |        |		MOVE.B	D2,-(A7)
000211fe 4e ba f4 5c              |N  \    |		JSR	0x2065c
00021202 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021204 60 00 01 42              |`  B    |		BRA	0x21348
00021208					switch@0x21168[0x4]:
00021208 14 bc 00 06              |        |		MOVE.B	#0x06,(A2)
0002120c 13 fc 00 04 00 02 18 8a  |        |		MOVE.B	#0x04,0x2188a
00021214 20 49                    | I      |		MOVEA.L	A1,A0
00021216 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
0002121a 20 49                    | I      |		MOVEA.L	A1,A0
0002121c 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00021220 66 06                    |f       |		BNE	0x21228
00021222 42 27                    |B'      |		CLR.B	-(A7)
00021224 1f 01                    |        |		MOVE.B	D1,-(A7)
00021226 60 06                    |`       |		BRA	0x2122e
00021228 18 85                    |        |		MOVE.B	D5,(A4)
0002122a 42 27                    |B'      |		CLR.B	-(A7)
0002122c 1f 02                    |        |		MOVE.B	D2,-(A7)
0002122e 4e ba f4 2c              |N  ,    |		JSR	0x2065c
00021232 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021234 60 00 01 12              |`       |		BRA	0x21348
00021238					switch@0x21168[0x8]:
00021238 14 bc 00 04              |        |		MOVE.B	#0x04,(A2)
0002123c 13 fc 00 01 00 02 18 8a  |        |		MOVE.B	#0x01,0x2188a
00021244 20 49                    | I      |		MOVEA.L	A1,A0
00021246 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
0002124a 20 49                    | I      |		MOVEA.L	A1,A0
0002124c 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00021250 66 06                    |f       |		BNE	0x21258
00021252 42 27                    |B'      |		CLR.B	-(A7)
00021254 1f 01                    |        |		MOVE.B	D1,-(A7)
00021256 60 06                    |`       |		BRA	0x2125e
00021258 18 85                    |        |		MOVE.B	D5,(A4)
0002125a 42 27                    |B'      |		CLR.B	-(A7)
0002125c 1f 02                    |        |		MOVE.B	D2,-(A7)
0002125e 4e ba f3 fc              |N       |		JSR	0x2065c
00021262 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021264 60 00 00 e2              |`       |		BRA	0x21348
00021268					switch@0x21168[0x10]:
00021268 14 81                    |        |		MOVE.B	D1,(A2)
0002126a 13 c2 00 02 18 8a        |        |		MOVE.B	D2,0x2188a
00021270 20 49                    | I      |		MOVEA.L	A1,A0
00021272 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
00021276 20 49                    | I      |		MOVEA.L	A1,A0
00021278 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
0002127c 66 06                    |f       |		BNE	0x21284
0002127e 42 27                    |B'      |		CLR.B	-(A7)
00021280 1f 01                    |        |		MOVE.B	D1,-(A7)
00021282 60 06                    |`       |		BRA	0x2128a
00021284 18 85                    |        |		MOVE.B	D5,(A4)
00021286 42 27                    |B'      |		CLR.B	-(A7)
00021288 1f 02                    |        |		MOVE.B	D2,-(A7)
0002128a 4e ba f3 d0              |N       |		JSR	0x2065c
0002128e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021290 60 00 00 b6              |`       |		BRA	0x21348
00021294					switch@0x21168[0x1e]:
00021294 20 49                    | I      |		MOVEA.L	A1,A0
00021296 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
0002129a 20 49                    | I      |		MOVEA.L	A1,A0
0002129c 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
000212a0 67 0a                    |g       |		BEQ	0x212ac
000212a2 14 85                    |        |		MOVE.B	D5,(A2)
000212a4 42 27                    |B'      |		CLR.B	-(A7)
000212a6 1f 3c 00 07              | <      |		MOVE.B	#0x07,-(A7)
000212aa 60 28                    |`(      |		BRA	0x212d4
000212ac 14 bc 00 05              |        |		MOVE.B	#0x05,(A2)
000212b0 18 82                    |        |		MOVE.B	D2,(A4)
000212b2 13 fc 00 06 00 02 18 7a  |       z|		MOVE.B	#0x06,0x2187a
000212ba 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
000212c2 13 c1 00 02 18 7c        |     |  |		MOVE.B	D1,0x2187c
000212c8 13 c5 00 02 18 7d        |     }  |		MOVE.B	D5,0x2187d
000212ce 42 27                    |B'      |		CLR.B	-(A7)
000212d0 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
000212d4 4e ba f3 86              |N       |		JSR	0x2065c
000212d8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000212da 60 6c                    |`l      |		BRA	0x21348
000212dc					switch@0x21168[0x1f]:
000212dc 14 bc 00 05              |        |		MOVE.B	#0x05,(A2)
000212e0 20 49                    | I      |		MOVEA.L	A1,A0
000212e2 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
000212e6 20 49                    | I      |		MOVEA.L	A1,A0
000212e8 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
000212ec 67 08                    |g       |		BEQ	0x212f6
000212ee 42 27                    |B'      |		CLR.B	-(A7)
000212f0 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
000212f4 60 06                    |`       |		BRA	0x212fc
000212f6 42 27                    |B'      |		CLR.B	-(A7)
000212f8 1f 3c 00 05              | <      |		MOVE.B	#0x05,-(A7)
000212fc 4e ba f3 5e              |N  ^    |		JSR	0x2065c
00021300 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021302 60 44                    |`D      |		BRA	0x21348
00021304					switch@0x21168[0x11]:
00021304					switch@0x21168[0x12]:
00021304					switch@0x21168[0x13]:
00021304					switch@0x21168[0x14]:
00021304					switch@0x21168[0x15]:
00021304					switch@0x21168[0x16]:
00021304					switch@0x21168[0x17]:
00021304					switch@0x21168[0x18]:
00021304					switch@0x21168[0x19]:
00021304					switch@0x21168[0x1a]:
00021304					switch@0x21168[0x1b]:
00021304					switch@0x21168[0x1c]:
00021304					switch@0x21168[0x1d]:
00021304					switch@0x21168[0x3]:
00021304					switch@0x21168[0x5]:
00021304					switch@0x21168[0x6]:
00021304					switch@0x21168[0x7]:
00021304					switch@0x21168[0x9]:
00021304					switch@0x21168[0xa]:
00021304					switch@0x21168[0xb]:
00021304					switch@0x21168[0xc]:
00021304					switch@0x21168[0xd]:
00021304					switch@0x21168[0xe]:
00021304					switch@0x21168[0xf]:
00021304 14 bc 00 05              |        |		MOVE.B	#0x05,(A2)
00021308 18 82                    |        |		MOVE.B	D2,(A4)
0002130a 13 fc 00 06 00 02 18 7a  |       z|		MOVE.B	#0x06,0x2187a
00021312 13 fc 00 04 00 02 18 7b  |       {|		MOVE.B	#0x04,0x2187b
0002131a 13 c1 00 02 18 7c        |     |  |		MOVE.B	D1,0x2187c
00021320 13 c5 00 02 18 7d        |     }  |		MOVE.B	D5,0x2187d
00021326 20 49                    | I      |		MOVEA.L	A1,A0
00021328 26 b0 48 02              |& H     |		MOVE.L	(A0+D4.L+#0x2),(A3)
0002132c 20 49                    | I      |		MOVEA.L	A1,A0
0002132e 4a 30 48 01              |J0H     |		TST.B	(A0+D4.L+#0x1)
00021332 67 08                    |g       |		BEQ	0x2133c
00021334 42 27                    |B'      |		CLR.B	-(A7)
00021336 1f 3c 00 08              | <      |		MOVE.B	#0x08,-(A7)
0002133a 60 06                    |`       |		BRA	0x21342
0002133c 42 27                    |B'      |		CLR.B	-(A7)
0002133e 1f 3c 00 09              | <      |		MOVE.B	#0x09,-(A7)
00021342 4e ba f3 18              |N       |		JSR	0x2065c
00021346 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021348 52 87                    |R       |		ADDQ.L	#0x1,D7
0002134a 0c 87 00 00 00 0a        |        |		CMPI.L	#0x0000000a,D7
00021350 6f 00 fd 82              |o       |		BLE	0x210d4
00021354 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021358 4e 5e                    |N^      |		UNLK	A6
0002135a 4e 75                    |Nu      |		RTS
0002135c ; --------------------------------------------------------------------------------------
0002135c ; OMSI PASCAL Function
0002135c ; --------------------------------------------------------------------------------------
0002135c					START:
0002135c 4f fa 00 08              |O       |		LEA.L	MAIN,A7
00021360 4e f9 00 01 02 80        |N       |		JMP	?start_program
00021366					MAIN:
00021366 43 f9 00 02 18 77        |C    w  |		LEA.L	0x21877,A1
0002136c 45 f9 00 02 18 9b        |E       |		LEA.L	0x2189b,A2
00021372 72 01                    |r       |		MOVEQ.L	#0x01,D1
00021374 74 07                    |t       |		MOVEQ.L	#0x07,D2
00021376 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
0002137c 48 78 00 00              |Hx      |		PEA.L	0x0
00021380 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
00021386 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021388 48 79 00 02 18 76        |Hy   v  |		PEA.L	0x21876
0002138e 48 51                    |HQ      |		PEA.L	(A1)
00021390 4e b9 00 01 05 44        |N    D  |		JSR	IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
00021396 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021398 1e 91                    |        |		MOVE.B	(A1),(A7)
0002139a 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
000213a0 3e ba ee 0a              |>       |		MOVE.W	0x201ac,(A7)
000213a4 3f 3a ee 04              |?:      |		MOVE.W	0x201aa,-(A7)
000213a8 3f 3a ed fe              |?:      |		MOVE.W	0x201a8,-(A7)
000213ac 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000213ae 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000213b2 3f 01                    |?       |		MOVE.W	D1,-(A7)
000213b4 3f 3c 00 06              |?<      |		MOVE.W	#0x6,-(A7)
000213b8 4e b9 00 01 02 c4        |N       |		JSR	StringLit(Src : Pointer; Offset: W; Len : W) : String
000213be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000213c0 23 df 00 02 18 82        |#       |		MOVE.L	(A7)+,0x21882
000213c6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000213c8 48 79 00 02 18 86        |Hy      |		PEA.L	0x21886
000213ce 4e b9 00 01 02 b8        |N       |		JSR	NewString(VAR a : String)
000213d4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213d6 70 00                    |p       |		MOVEQ.L	#0x00,D0
000213d8 23 c0 00 02 18 9e        |#       |		MOVE.L	D0,0x2189e
000213de b0 82                    |        |		CMP.L	D2,D0
000213e0 63 02                    |c       |		BLS	0x213e4
000213e2 4e 4f                    |NO      |		TRAP	#15
000213e4 41 f9 00 02 18 6e        |A    n  |		LEA.L	0x2186e,A0
000213ea 42 30 08 0a              |B0      |		CLR.B	(A0+D0.L+#0xa)
000213ee 52 80                    |R       |		ADDQ.L	#0x1,D0
000213f0 b0 82                    |        |		CMP.L	D2,D0
000213f2 6f e4                    |o       |		BLE	0x213d8
000213f4 3f 3c 55 55              |?<UU    |		MOVE.W	#0x5555,-(A7)
000213f8 48 52                    |HR      |		PEA.L	(A2)
000213fa 4e b9 00 02 15 34        |N    4  |		JSR	exp_TEST_LOAD_CUR_INSTR.SEQ(Sw_2, &Sr_2)
00021400 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021402 3e bc 55 55              |> UU    |		MOVE.W	#0x5555,(A7)
00021406 48 52                    |HR      |		PEA.L	(A2)
00021408 4e b9 00 02 15 34        |N    4  |		JSR	exp_TEST_LOAD_CUR_INSTR.SEQ(Sw_2, &Sr_2)
0002140e 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021410 4e ba f1 9a              |N       |		JSR	0x205ac
00021414 4e ba f6 ea              |N       |		JSR	0x20b00
00021418 4e ba f9 b4              |N       |		JSR	0x20dce
0002141c 4e ba fc 34              |N  4    |		JSR	0x21052
00021420 4e ba fc 72              |N  r    |		JSR	0x21094
00021424 1f 11                    |        |		MOVE.B	(A1),-(A7)
00021426 48 79 00 02 18 99        |Hy      |		PEA.L	0x21899
0002142c 4e ba f0 7c              |N  |    |		JSR	0x204aa
00021430 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021432 1e 81                    |        |		MOVE.B	D1,(A7)
00021434 42 27                    |B'      |		CLR.B	-(A7)
00021436 4e ba f2 24              |N  $    |		JSR	0x2065c
0002143a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002143c 4e b9 00 01 02 84        |N       |		JSR	?exit
00021442					exp_WRITE_WCS.FIU(Sw_2, Sw_6, Sw_1):
00021442 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021448 00 12                    |        |		.CONST	0x0012			; Stack-delta
0002144a 0d 57 52 49 54 45 5f 57  | WRITE_W|		.TXT	13,'WRITE_WCS.FIU'
00021458 00                       |        |		.CONST	0x0
00021459 03                       |        |		.CONST	0x3			; DIPROC address
0002145a 00                       |        |		.CONST	0x0			; Output Parameters
0002145b 03                       |        |		.CONST	0x3			; Input Parameters
0002145c 01                       |        |		.CONST	0x1			; In arg [2]
0002145d 05                       |        |		.CONST	0x5			; In arg [6]
0002145e 00                       |        |		.CONST	0x0			; In arg [1]
0002145f 00                       |        |		.PAD	0x0
00021460					exp_STEP_MACHINE.FIU():
00021460 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021466 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021468 10 53 54 45 50 5f 4d 41  | STEP_MA|		.TXT	16,'STEP_MACHINE.FIU'
00021479 00                       |        |		.CONST	0x0
0002147a 03                       |        |		.CONST	0x3			; DIPROC address
0002147b 00                       |        |		.CONST	0x0			; Output Parameters
0002147c 00                       |        |		.CONST	0x0			; Input Parameters
0002147d 00                       |        |		.PAD	0x0
0002147e					exp_READ_VAR.FIU(&Sr_8):
0002147e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021484 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00021486 0c 52 45 41 44 5f 56 41  | READ_VA|		.TXT	12,'READ_VAR.FIU'
00021493 00                       |        |		.CONST	0x0
00021494 03                       |        |		.CONST	0x3			; DIPROC address
00021495 01                       |        |		.CONST	0x1			; Output Parameters
00021496 00                       |        |		.CONST	0x0			; Input Parameters
00021497 07                       |        |		.CONST	0x7			; Out arg [8]
00021498					exp_PREP_RUN.FIU(Sw_2):
00021498 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002149e 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000214a0 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.FIU'
000214ad 00                       |        |		.CONST	0x0
000214ae 03                       |        |		.CONST	0x3			; DIPROC address
000214af 00                       |        |		.CONST	0x0			; Output Parameters
000214b0 01                       |        |		.CONST	0x1			; Input Parameters
000214b1 01                       |        |		.CONST	0x1			; In arg [2]
000214b2					exp_LOAD_VAR.FIU(Sw_8):
000214b2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214b8 00 10                    |        |		.CONST	0x0010			; Stack-delta
000214ba 0c 4c 4f 41 44 5f 56 41  | LOAD_VA|		.TXT	12,'LOAD_VAR.FIU'
000214c7 00                       |        |		.CONST	0x0
000214c8 03                       |        |		.CONST	0x3			; DIPROC address
000214c9 00                       |        |		.CONST	0x0			; Output Parameters
000214ca 01                       |        |		.CONST	0x1			; Input Parameters
000214cb 07                       |        |		.CONST	0x7			; In arg [8]
000214cc					exp_LOAD_MAR_STATE_BITS.FIU(Sw_1):
000214cc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214d2 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000214d4 17 4c 4f 41 44 5f 4d 41  | LOAD_MA|		.TXT	23,'LOAD_MAR_STATE_BITS.FIU'
000214ec 00                       |        |		.CONST	0x0
000214ed 03                       |        |		.CONST	0x3			; DIPROC address
000214ee 00                       |        |		.CONST	0x0			; Output Parameters
000214ef 01                       |        |		.CONST	0x1			; Input Parameters
000214f0 00                       |        |		.CONST	0x0			; In arg [1]
000214f1 00                       |        |		.PAD	0x0
000214f2					exp_FREEZE_BOARDS.FIU(Sw_2):
000214f2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000214f8 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000214fa 11 46 52 45 45 5a 45 5f  | FREEZE_|		.TXT	17,'FREEZE_BOARDS.FIU'
0002150c 00                       |        |		.CONST	0x0
0002150d 03                       |        |		.CONST	0x3			; DIPROC address
0002150e 00                       |        |		.CONST	0x0			; Output Parameters
0002150f 01                       |        |		.CONST	0x1			; Input Parameters
00021510 01                       |        |		.CONST	0x1			; In arg [2]
00021511 00                       |        |		.PAD	0x0
00021512					exp_CLEAR_EXCEPTIONS.FIU():
00021512 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021518 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002151a 14 43 4c 45 41 52 5f 45  | CLEAR_E|		.TXT	20,'CLEAR_EXCEPTIONS.FIU'
0002152f 00                       |        |		.CONST	0x0
00021530 03                       |        |		.CONST	0x3			; DIPROC address
00021531 00                       |        |		.CONST	0x0			; Output Parameters
00021532 00                       |        |		.CONST	0x0			; Input Parameters
00021533 00                       |        |		.PAD	0x0
00021534					exp_TEST_LOAD_CUR_INSTR.SEQ(Sw_2, &Sr_2):
00021534 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002153a 00 0e                    |        |		.CONST	0x000e			; Stack-delta
0002153c 17 54 45 53 54 5f 4c 4f  | TEST_LO|		.TXT	23,'TEST_LOAD_CUR_INSTR.SEQ'
00021554 00                       |        |		.CONST	0x0
00021555 02                       |        |		.CONST	0x2			; DIPROC address
00021556 01                       |        |		.CONST	0x1			; Output Parameters
00021557 01                       |        |		.CONST	0x1			; Input Parameters
00021558 01                       |        |		.CONST	0x1			; In arg [2]
00021559 01                       |        |		.CONST	0x1			; Out arg [2]
0002155a					exp_SETUP_MICRO_FIELD_EVENT.SEQ():
0002155a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021560 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021562 1b 53 45 54 55 50 5f 4d  | SETUP_M|		.TXT	27,'SETUP_MICRO_FIELD_EVENT.SEQ'
0002157e 00                       |        |		.CONST	0x0
0002157f 02                       |        |		.CONST	0x2			; DIPROC address
00021580 00                       |        |		.CONST	0x0			; Output Parameters
00021581 00                       |        |		.CONST	0x0			; Input Parameters
00021582					exp_SETUP_MICRO_EVENT.SEQ():
00021582 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021588 00 08                    |        |		.CONST	0x0008			; Stack-delta
0002158a 15 53 45 54 55 50 5f 4d  | SETUP_M|		.TXT	21,'SETUP_MICRO_EVENT.SEQ'
000215a0 00                       |        |		.CONST	0x0
000215a1 02                       |        |		.CONST	0x2			; DIPROC address
000215a2 00                       |        |		.CONST	0x0			; Output Parameters
000215a3 00                       |        |		.CONST	0x0			; Input Parameters
000215a4					exp_SETUP_MICRO_EXIT_EVENT.SEQ():
000215a4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000215aa 00 08                    |        |		.CONST	0x0008			; Stack-delta
000215ac 1a 53 45 54 55 50 5f 4d  | SETUP_M|		.TXT	26,'SETUP_MICRO_EXIT_EVENT.SEQ'
000215c7 00                       |        |		.CONST	0x0
000215c8 02                       |        |		.CONST	0x2			; DIPROC address
000215c9 00                       |        |		.CONST	0x0			; Output Parameters
000215ca 00                       |        |		.CONST	0x0			; Input Parameters
000215cb 00                       |        |		.PAD	0x0
000215cc					exp_SETUP_HICCUP.SEQ():
000215cc 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000215d2 00 08                    |        |		.CONST	0x0008			; Stack-delta
000215d4 10 53 45 54 55 50 5f 48  | SETUP_H|		.TXT	16,'SETUP_HICCUP.SEQ'
000215e5 00                       |        |		.CONST	0x0
000215e6 02                       |        |		.CONST	0x2			; DIPROC address
000215e7 00                       |        |		.CONST	0x0			; Output Parameters
000215e8 00                       |        |		.CONST	0x0			; Input Parameters
000215e9 00                       |        |		.PAD	0x0
000215ea					exp_SETUP_BAD_HINT.SEQ():
000215ea 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000215f0 00 08                    |        |		.CONST	0x0008			; Stack-delta
000215f2 12 53 45 54 55 50 5f 42  | SETUP_B|		.TXT	18,'SETUP_BAD_HINT.SEQ'
00021605 00                       |        |		.CONST	0x0
00021606 02                       |        |		.CONST	0x2			; DIPROC address
00021607 00                       |        |		.CONST	0x0			; Output Parameters
00021608 00                       |        |		.CONST	0x0			; Input Parameters
00021609 00                       |        |		.PAD	0x0
0002160a					exp_RUN_DIAG_PROMS_NOCHECK.SEQ():
0002160a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021610 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021612 1a 52 55 4e 5f 44 49 41  | RUN_DIA|		.TXT	26,'RUN_DIAG_PROMS_NOCHECK.SEQ'
0002162d 00                       |        |		.CONST	0x0
0002162e 02                       |        |		.CONST	0x2			; DIPROC address
0002162f 00                       |        |		.CONST	0x0			; Output Parameters
00021630 00                       |        |		.CONST	0x0			; Input Parameters
00021631 00                       |        |		.PAD	0x0
00021632					exp_PREP_RUN.SEQ(Sw_2):
00021632 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021638 00 0a                    |        |		.CONST	0x000a			; Stack-delta
0002163a 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.SEQ'
00021647 00                       |        |		.CONST	0x0
00021648 02                       |        |		.CONST	0x2			; DIPROC address
00021649 00                       |        |		.CONST	0x0			; Output Parameters
0002164a 01                       |        |		.CONST	0x1			; Input Parameters
0002164b 01                       |        |		.CONST	0x1			; In arg [2]
0002164c					exp_INIT_CSTOP_WCS.SEQ():
0002164c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021652 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021654 12 49 4e 49 54 5f 43 53  | INIT_CS|		.TXT	18,'INIT_CSTOP_WCS.SEQ'
00021667 00                       |        |		.CONST	0x0
00021668 02                       |        |		.CONST	0x2			; DIPROC address
00021669 00                       |        |		.CONST	0x0			; Output Parameters
0002166a 00                       |        |		.CONST	0x0			; Input Parameters
0002166b 00                       |        |		.PAD	0x0
0002166c					exp_HALT.SEQ(&Fr):
0002166c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021672 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00021674 08 48 41 4c 54 2e 53 45  | HALT.SE|		.TXT	8,'HALT.SEQ'
0002167d 00                       |        |		.CONST	0x0
0002167e 02                       |        |		.CONST	0x2			; DIPROC address
0002167f 01                       |        |		.CONST	0x1			; Output Parameters
00021680 00                       |        |		.CONST	0x0			; Input Parameters
00021681 08                       |        |		.CONST	0x8			; Out arg flag
00021682					exp_WRITE_WCS.TYP(Sw_2, Sw_6, Sw_1):
00021682 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021688 00 12                    |        |		.CONST	0x0012			; Stack-delta
0002168a 0d 57 52 49 54 45 5f 57  | WRITE_W|		.TXT	13,'WRITE_WCS.TYP'
00021698 00                       |        |		.CONST	0x0
00021699 06                       |        |		.CONST	0x6			; DIPROC address
0002169a 00                       |        |		.CONST	0x0			; Output Parameters
0002169b 03                       |        |		.CONST	0x3			; Input Parameters
0002169c 01                       |        |		.CONST	0x1			; In arg [2]
0002169d 05                       |        |		.CONST	0x5			; In arg [6]
0002169e 00                       |        |		.CONST	0x0			; In arg [1]
0002169f 00                       |        |		.PAD	0x0
000216a0					exp_SETUP_CLOCKSTOPS.TYP(Sw_2):
000216a0 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216a6 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000216a8 14 53 45 54 55 50 5f 43  | SETUP_C|		.TXT	20,'SETUP_CLOCKSTOPS.TYP'
000216bd 00                       |        |		.CONST	0x0
000216be 06                       |        |		.CONST	0x6			; DIPROC address
000216bf 00                       |        |		.CONST	0x0			; Output Parameters
000216c0 01                       |        |		.CONST	0x1			; Input Parameters
000216c1 01                       |        |		.CONST	0x1			; In arg [2]
000216c2					exp_RUN_NOCHECK.TYP():
000216c2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216c8 00 08                    |        |		.CONST	0x0008			; Stack-delta
000216ca 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.TYP'
000216da 00                       |        |		.CONST	0x0
000216db 06                       |        |		.CONST	0x6			; DIPROC address
000216dc 00                       |        |		.CONST	0x0			; Output Parameters
000216dd 00                       |        |		.CONST	0x0			; Input Parameters
000216de					exp_PREP_RUN.TYP(Sw_2):
000216de 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216e4 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000216e6 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.TYP'
000216f3 00                       |        |		.CONST	0x0
000216f4 06                       |        |		.CONST	0x6			; DIPROC address
000216f5 00                       |        |		.CONST	0x0			; Output Parameters
000216f6 01                       |        |		.CONST	0x1			; Input Parameters
000216f7 01                       |        |		.CONST	0x1			; In arg [2]
000216f8					exp_INIT_EVENT_WCS.TYP():
000216f8 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216fe 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021700 12 49 4e 49 54 5f 45 56  | INIT_EV|		.TXT	18,'INIT_EVENT_WCS.TYP'
00021713 00                       |        |		.CONST	0x0
00021714 06                       |        |		.CONST	0x6			; DIPROC address
00021715 00                       |        |		.CONST	0x0			; Output Parameters
00021716 00                       |        |		.CONST	0x0			; Input Parameters
00021717 00                       |        |		.PAD	0x0
00021718					exp_INIT_CSTOP_WCS.TYP():
00021718 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002171e 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021720 12 49 4e 49 54 5f 43 53  | INIT_CS|		.TXT	18,'INIT_CSTOP_WCS.TYP'
00021733 00                       |        |		.CONST	0x0
00021734 06                       |        |		.CONST	0x6			; DIPROC address
00021735 00                       |        |		.CONST	0x0			; Output Parameters
00021736 00                       |        |		.CONST	0x0			; Input Parameters
00021737 00                       |        |		.PAD	0x0
00021738					exp_INIT_CSTOP_RF.TYP():
00021738 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002173e 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021740 11 49 4e 49 54 5f 43 53  | INIT_CS|		.TXT	17,'INIT_CSTOP_RF.TYP'
00021752 00                       |        |		.CONST	0x0
00021753 06                       |        |		.CONST	0x6			; DIPROC address
00021754 00                       |        |		.CONST	0x0			; Output Parameters
00021755 00                       |        |		.CONST	0x0			; Input Parameters
00021756					exp_CHECK_CLOCKSTOPS.TYP(&Sr_8, &Sr_2):
00021756 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002175c 00 10                    |        |		.CONST	0x0010			; Stack-delta
0002175e 14 43 48 45 43 4b 5f 43  | CHECK_C|		.TXT	20,'CHECK_CLOCKSTOPS.TYP'
00021773 00                       |        |		.CONST	0x0
00021774 06                       |        |		.CONST	0x6			; DIPROC address
00021775 02                       |        |		.CONST	0x2			; Output Parameters
00021776 00                       |        |		.CONST	0x0			; Input Parameters
00021777 07                       |        |		.CONST	0x7			; Out arg [8]
00021778 01                       |        |		.CONST	0x1			; Out arg [2]
00021779 00                       |        |		.PAD	0x0
0002177a					exp_WRITE_WCS.VAL(Sw_2, Sw_5, Sw_1):
0002177a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021780 00 12                    |        |		.CONST	0x0012			; Stack-delta
00021782 0d 57 52 49 54 45 5f 57  | WRITE_W|		.TXT	13,'WRITE_WCS.VAL'
00021790 00                       |        |		.CONST	0x0
00021791 07                       |        |		.CONST	0x7			; DIPROC address
00021792 00                       |        |		.CONST	0x0			; Output Parameters
00021793 03                       |        |		.CONST	0x3			; Input Parameters
00021794 01                       |        |		.CONST	0x1			; In arg [2]
00021795 04                       |        |		.CONST	0x4			; In arg [5]
00021796 00                       |        |		.CONST	0x0			; In arg [1]
00021797 00                       |        |		.PAD	0x0
00021798					exp_SETUP_CLOCKSTOPS.VAL(Sw_2):
00021798 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002179e 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000217a0 14 53 45 54 55 50 5f 43  | SETUP_C|		.TXT	20,'SETUP_CLOCKSTOPS.VAL'
000217b5 00                       |        |		.CONST	0x0
000217b6 07                       |        |		.CONST	0x7			; DIPROC address
000217b7 00                       |        |		.CONST	0x0			; Output Parameters
000217b8 01                       |        |		.CONST	0x1			; Input Parameters
000217b9 01                       |        |		.CONST	0x1			; In arg [2]
000217ba					exp_RUN_NOCHECK.VAL():
000217ba 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000217c0 00 08                    |        |		.CONST	0x0008			; Stack-delta
000217c2 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.VAL'
000217d2 00                       |        |		.CONST	0x0
000217d3 07                       |        |		.CONST	0x7			; DIPROC address
000217d4 00                       |        |		.CONST	0x0			; Output Parameters
000217d5 00                       |        |		.CONST	0x0			; Input Parameters
000217d6					exp_CHECK_CLOCKSTOPS.VAL(&Sr_8, &Sr_2):
000217d6 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000217dc 00 10                    |        |		.CONST	0x0010			; Stack-delta
000217de 14 43 48 45 43 4b 5f 43  | CHECK_C|		.TXT	20,'CHECK_CLOCKSTOPS.VAL'
000217f3 00                       |        |		.CONST	0x0
000217f4 07                       |        |		.CONST	0x7			; DIPROC address
000217f5 02                       |        |		.CONST	0x2			; Output Parameters
000217f6 00                       |        |		.CONST	0x0			; Input Parameters
000217f7 07                       |        |		.CONST	0x7			; Out arg [8]
000217f8 01                       |        |		.CONST	0x1			; Out arg [2]
000217f9 00                       |        |		.PAD	0x0
000217fa					exp_WRITE_WCS.IOC(Sw_2, Sw_2, Sw_1):
000217fa 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021800 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00021802 0d 57 52 49 54 45 5f 57  | WRITE_W|		.TXT	13,'WRITE_WCS.IOC'
00021810 00                       |        |		.CONST	0x0
00021811 04                       |        |		.CONST	0x4			; DIPROC address
00021812 00                       |        |		.CONST	0x0			; Output Parameters
00021813 03                       |        |		.CONST	0x3			; Input Parameters
00021814 01                       |        |		.CONST	0x1			; In arg [2]
00021815 01                       |        |		.CONST	0x1			; In arg [2]
00021816 00                       |        |		.CONST	0x0			; In arg [1]
00021817 00                       |        |		.PAD	0x0
00021818					exp_RUN_NOCHECK.IOC():
00021818 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002181e 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021820 0f 52 55 4e 5f 4e 4f 43  | RUN_NOC|		.TXT	15,'RUN_NOCHECK.IOC'
00021830 00                       |        |		.CONST	0x0
00021831 04                       |        |		.CONST	0x4			; DIPROC address
00021832 00                       |        |		.CONST	0x0			; Output Parameters
00021833 00                       |        |		.CONST	0x0			; Input Parameters
00021834					exp_READ_CLOCKSTOP.IOC(&Fr):
00021834 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002183a 00 0c                    |        |		.CONST	0x000c			; Stack-delta
0002183c 12 52 45 41 44 5f 43 4c  | READ_CL|		.TXT	18,'READ_CLOCKSTOP.IOC'
0002184f 00                       |        |		.CONST	0x0
00021850 04                       |        |		.CONST	0x4			; DIPROC address
00021851 01                       |        |		.CONST	0x1			; Output Parameters
00021852 00                       |        |		.CONST	0x0			; Input Parameters
00021853 08                       |        |		.CONST	0x8			; Out arg flag
00021854					exp_PREP_RUN.IOC(Sw_2):
00021854 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002185a 00 0a                    |        |		.CONST	0x000a			; Stack-delta
0002185c 0c 50 52 45 50 5f 52 55  | PREP_RU|		.TXT	12,'PREP_RUN.IOC'
00021869 00                       |        |		.CONST	0x0
0002186a 04                       |        |		.CONST	0x4			; DIPROC address
0002186b 00                       |        |		.CONST	0x0			; Output Parameters
0002186c 01                       |        |		.CONST	0x1			; Input Parameters
0002186d 01                       |        |		.CONST	0x1			; In arg [2]
0002186e 00 00                    |        |		.XXX[0x2]
00021870 00 00 00 00 00 00 00     |        |		.XXX[0x7]
00021877 00 00                    |        |		.CONST	0x0,0x0
00021879 00 00 00 00 00 00 00     |        |		.XXX[0x7]
00021880 00 00                    |        |		.CONST	0x0,0x0
00021882 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
00021886 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
0002188a 00 00                    |        |		.XXX[0x2]
0002188c 00 00 00 00              |        |		.CONST	0x0,0x0,0x0,0x0
00021890 00                       |        |		.XXX[0x1]
00021891 00 00 00 00 00 00 00 00  |        |		.CONST	0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
00021899 00 00 00 00 00 00 00     |        |		.XXX[0x7]
000218a0 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0x160]