DataMuseum.dk

Rational R1000/400

An automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Produced by: AutoArchaeologist - Free & Open Source Software.


top

⟦924badfc1⟧ M200

    Length: 7168 (0x1c00)
    Types: M200
    Notes: DBUSULOAD.M200, M200_PROGRAM

Derivation

└─⟦30000528⟧ 0, 1, 2, 3, 920603, BEKINS, CLI, DFS_RELEASE, DIAG, DIR, DISKMD, EEPROM_REVS, EM, ENP100, ERRMESS, ERROR_LOG, FIU, HLP, IOC, IOP_DUMP0, IOP_DUMP1, IOP_DUMP2, IOP_DUMP3, IOP_DUMP4, LAST_UCODE, M100_UCODE, M200, M200_CONFIG, M200_PROM, M200_UCODE, M32, M400_PROM, MEM, MLOAD, MT, NETX, PAK, R1000_DUMP1, R1000_DUMP2, R1000_DUMP3, R1000_DUMP4, READ_MANY_LRUS_M32, REWRITE_HLP, S, SCAN, SEG, SEQ, TAP tape, TAPE file, TXT, TYP, UCODE, VAL, WHAT, 8mm tape, Rational 1000, DFS, D_12_6_5, 5802_R1K_CODE, 5805_R1K_CODE, 5807_R1K_CODE, 5808_R1K_CODE, 580b_R1K_CODE, 580c_R1K_CODE, 580d_R1K_CODE, 580e_R1K_CODE, 5810_R1K_CODE, 5811_R1K_CODE, 5878_R1K_CODE, @(#), @(#)200␣IOP␣KERNEL␣0_8_10,92/05/06,09:00:00, @(#)200␣IOP␣KERNEL␣0_8_4,91/03/27,14:00:00, @(#)300C␣IOP␣KERNEL␣0_4_3,91/06/13,12:00:00, @(#)300C␣IOP␣KERNEL␣0_4_8,92/05/07,09:00:00, @(#)300S␣IOP␣KERNEL,0_4_3,91/06/13,12:00:00, @(#)300S␣IOP␣KERNEL,0_4_8,92/05/07,09:00:00, @(#)400C␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400C␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)400S␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400S␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)BBCVT,1.0,91/10/30,10:27:00, @(#)BEKINS,3.3,90/12/06,11:11:00, @(#)CEDIT,2.1,90/12/03,17:18:19, @(#)CONFIGURE,2.2,91/05/21,17:18:19, @(#)CRASHDUMP,2.5,92/02/03,17:18:19, @(#)CRASHLOAD,2.1,90/12/03,17:18:19, @(#)CRASHSAVE,1.2,92/01/17,17:18:19, @(#)DISKMD,3.5,91/10/10,16:25:00, @(#)DISK_MISC,1.00,92/03/26,11:46:00, @(#)ERASEDISK,3.1,91/05/14,13:00:00, @(#)EXPMON,2.1,90/12/04,17:18:19, @(#)FPTEST,2.0,89/09/04,17:18:19, @(#)FRU,2.1,92/01/16,12:34:56, […]
    └─⟦b434774df⟧ 0, 1, 2, 3, 920603, BEKINS, CLI, DFS_RELEASE, DIAG, DIR, DISKMD, EEPROM_REVS, EM, ENP100, ERRMESS, ERROR_LOG, FIU, HLP, IOC, IOP_DUMP0, IOP_DUMP1, IOP_DUMP2, IOP_DUMP3, IOP_DUMP4, LAST_UCODE, M100_UCODE, M200, M200_CONFIG, M200_PROM, M200_UCODE, M32, M400_PROM, MEM, MLOAD, MT, NETX, PAK, R1000_DUMP1, R1000_DUMP2, R1000_DUMP3, R1000_DUMP4, READ_MANY_LRUS_M32, REWRITE_HLP, S, SCAN, SEG, SEQ, TAPE file, TXT, TYP, UCODE, VAL, WHAT, 5802_R1K_CODE, 5805_R1K_CODE, 5807_R1K_CODE, 5808_R1K_CODE, 580b_R1K_CODE, 580c_R1K_CODE, 580d_R1K_CODE, 580e_R1K_CODE, 5810_R1K_CODE, 5811_R1K_CODE, 5878_R1K_CODE, @(#), @(#)200␣IOP␣KERNEL␣0_8_10,92/05/06,09:00:00, @(#)200␣IOP␣KERNEL␣0_8_4,91/03/27,14:00:00, @(#)300C␣IOP␣KERNEL␣0_4_3,91/06/13,12:00:00, @(#)300C␣IOP␣KERNEL␣0_4_8,92/05/07,09:00:00, @(#)300S␣IOP␣KERNEL,0_4_3,91/06/13,12:00:00, @(#)300S␣IOP␣KERNEL,0_4_8,92/05/07,09:00:00, @(#)400C␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400C␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)400S␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400S␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)BBCVT,1.0,91/10/30,10:27:00, @(#)BEKINS,3.3,90/12/06,11:11:00, @(#)CEDIT,2.1,90/12/03,17:18:19, @(#)CONFIGURE,2.2,91/05/21,17:18:19, @(#)CRASHDUMP,2.5,92/02/03,17:18:19, @(#)CRASHLOAD,2.1,90/12/03,17:18:19, @(#)CRASHSAVE,1.2,92/01/17,17:18:19, @(#)DISKMD,3.5,91/10/10,16:25:00, @(#)DISK_MISC,1.00,92/03/26,11:46:00, @(#)ERASEDISK,3.1,91/05/14,13:00:00, @(#)EXPMON,2.1,90/12/04,17:18:19, @(#)FPTEST,2.0,89/09/04,17:18:19, @(#)FRU,2.1,92/01/16,12:34:56, […]
        └─⟦924badfc1⟧ M200, DBUSULOAD.M200, M200_PROGRAM
└─⟦30000528⟧ 0, 1, 2, 3, 920603, BEKINS, CLI, DFS_RELEASE, DIAG, DIR, DISKMD, EEPROM_REVS, EM, ENP100, ERRMESS, ERROR_LOG, FIU, HLP, IOC, IOP_DUMP0, IOP_DUMP1, IOP_DUMP2, IOP_DUMP3, IOP_DUMP4, LAST_UCODE, M100_UCODE, M200, M200_CONFIG, M200_PROM, M200_UCODE, M32, M400_PROM, MEM, MLOAD, MT, NETX, PAK, R1000_DUMP1, R1000_DUMP2, R1000_DUMP3, R1000_DUMP4, READ_MANY_LRUS_M32, REWRITE_HLP, S, SCAN, SEG, SEQ, TAP tape, TAPE file, TXT, TYP, UCODE, VAL, WHAT, 8mm tape, Rational 1000, DFS, D_12_6_5, 5802_R1K_CODE, 5805_R1K_CODE, 5807_R1K_CODE, 5808_R1K_CODE, 580b_R1K_CODE, 580c_R1K_CODE, 580d_R1K_CODE, 580e_R1K_CODE, 5810_R1K_CODE, 5811_R1K_CODE, 5878_R1K_CODE, @(#), @(#)200␣IOP␣KERNEL␣0_8_10,92/05/06,09:00:00, @(#)200␣IOP␣KERNEL␣0_8_4,91/03/27,14:00:00, @(#)300C␣IOP␣KERNEL␣0_4_3,91/06/13,12:00:00, @(#)300C␣IOP␣KERNEL␣0_4_8,92/05/07,09:00:00, @(#)300S␣IOP␣KERNEL,0_4_3,91/06/13,12:00:00, @(#)300S␣IOP␣KERNEL,0_4_8,92/05/07,09:00:00, @(#)400C␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400C␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)400S␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400S␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)BBCVT,1.0,91/10/30,10:27:00, @(#)BEKINS,3.3,90/12/06,11:11:00, @(#)CEDIT,2.1,90/12/03,17:18:19, @(#)CONFIGURE,2.2,91/05/21,17:18:19, @(#)CRASHDUMP,2.5,92/02/03,17:18:19, @(#)CRASHLOAD,2.1,90/12/03,17:18:19, @(#)CRASHSAVE,1.2,92/01/17,17:18:19, @(#)DISKMD,3.5,91/10/10,16:25:00, @(#)DISK_MISC,1.00,92/03/26,11:46:00, @(#)ERASEDISK,3.1,91/05/14,13:00:00, @(#)EXPMON,2.1,90/12/04,17:18:19, @(#)FPTEST,2.0,89/09/04,17:18:19, @(#)FRU,2.1,92/01/16,12:34:56, […]
    └─⟦b434774df⟧ 0, 1, 2, 3, 920603, BEKINS, CLI, DFS_RELEASE, DIAG, DIR, DISKMD, EEPROM_REVS, EM, ENP100, ERRMESS, ERROR_LOG, FIU, HLP, IOC, IOP_DUMP0, IOP_DUMP1, IOP_DUMP2, IOP_DUMP3, IOP_DUMP4, LAST_UCODE, M100_UCODE, M200, M200_CONFIG, M200_PROM, M200_UCODE, M32, M400_PROM, MEM, MLOAD, MT, NETX, PAK, R1000_DUMP1, R1000_DUMP2, R1000_DUMP3, R1000_DUMP4, READ_MANY_LRUS_M32, REWRITE_HLP, S, SCAN, SEG, SEQ, TAPE file, TXT, TYP, UCODE, VAL, WHAT, 5802_R1K_CODE, 5805_R1K_CODE, 5807_R1K_CODE, 5808_R1K_CODE, 580b_R1K_CODE, 580c_R1K_CODE, 580d_R1K_CODE, 580e_R1K_CODE, 5810_R1K_CODE, 5811_R1K_CODE, 5878_R1K_CODE, @(#), @(#)200␣IOP␣KERNEL␣0_8_10,92/05/06,09:00:00, @(#)200␣IOP␣KERNEL␣0_8_4,91/03/27,14:00:00, @(#)300C␣IOP␣KERNEL␣0_4_3,91/06/13,12:00:00, @(#)300C␣IOP␣KERNEL␣0_4_8,92/05/07,09:00:00, @(#)300S␣IOP␣KERNEL,0_4_3,91/06/13,12:00:00, @(#)300S␣IOP␣KERNEL,0_4_8,92/05/07,09:00:00, @(#)400C␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400C␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)400S␣IOP␣KERNEL,4_2_14,92/05/07,16:15:00, @(#)400S␣IOP␣KERNEL,4_2_9,91/08/08,14:00:00, @(#)BBCVT,1.0,91/10/30,10:27:00, @(#)BEKINS,3.3,90/12/06,11:11:00, @(#)CEDIT,2.1,90/12/03,17:18:19, @(#)CONFIGURE,2.2,91/05/21,17:18:19, @(#)CRASHDUMP,2.5,92/02/03,17:18:19, @(#)CRASHLOAD,2.1,90/12/03,17:18:19, @(#)CRASHSAVE,1.2,92/01/17,17:18:19, @(#)DISKMD,3.5,91/10/10,16:25:00, @(#)DISK_MISC,1.00,92/03/26,11:46:00, @(#)ERASEDISK,3.1,91/05/14,13:00:00, @(#)EXPMON,2.1,90/12/04,17:18:19, @(#)FPTEST,2.0,89/09/04,17:18:19, @(#)FRU,2.1,92/01/16,12:34:56, […]
        └─⟦924badfc1⟧ M200, DBUSULOAD.M200, M200_PROGRAM

Disassembly

00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ;   import all
00020000 ;   import kind.program
00020000 ;   no ident.5537b1cf44405481
00020000 ; --------------------------------------------------------------------------------------
00020000 00 04 00 00              |        |		.XXX[0x4]
00020004 00 02 15 b4              |        |		.CODE	START
00020008 00 01 02 88 00 02 19 c0  |        |		.XXX[0x10]
00020010 00 02 19 84 00 00 00 00  |        |
00020018 00 02 17 8c              |        |		.CODE	ProgramFailureHandler()
0002001c 00 02 18 48              |   H    |		.CODE	ExperimentFailureHandler()
00020020 00 00 00 00              |        |		.XXX[0x4]
00020024					exp_init_done:
00020024 00                       |        |		.CONST	0x0
00020025 00 00 00                 |        |		.XXX[0x3]
00020028 00 00 00 00 00 00 00 00  |        |		.BLANK	00[0xe0]
00020108 00 00                    |        |		.XXX[0x2]
0002010a 4d 69 63 72 6f 63 6f 64  |Microcod|		.TXT	'Microcode is not for this type of processor.'
00020136 4d 69 63 72 6f 63 6f 64  |Microcod|		.TXT	'Microcode file size is inconsistent.'
0002015a 46 69 6c 65 20 20        |File    |		.XXX[0x6]
00020160 3a 5f 42 6f 75 6e 64 20  |:_Bound |		.XXX[0x18]
00020168 3a 5f 44 65 6c 74 61 20  |:_Delta |
00020170 3a 5f 4d 6f 6d 20 20 20  |:_Mom   |
00020178 3a 5f                    |:_      |		.XXX[0x2]
0002017a 4c 41 53 54 5f 55 43 4f  |LAST_UCO|		.TXT	'LAST_UCODE'
00020184 4c 41 53 54 5f 55 43 4f  |LAST_UCO|		.TXT	'LAST_UCODE'
0002018e 5f 32                    |_2      |		.XXX[0x2]
00020190 30 30 2e 54 59 50 5f 32  |00.TYP_2|		.XXX[0x20]
00020198 30 30 2e 56 41 4c 5f 32  |00.VAL_2|
000201a0 30 30 2e 46 49 55 5f 32  |00.FIU_2|
000201a8 30 30 2e 53 45 51 5f 32  |00.SEQ_2|
000201b0 30 30 2e 49 4f 43        |00.IOC  |		.XXX[0x6]
000201b6 4c 4f 41 44 5f 52 45 47  |LOAD_REG|		.TXT	'LOAD_REGISTER_FILE'
000201c8 2e 20                    |.       |		.XXX[0x2]
000201ca 4c 4f 41 44 5f 52 45 47  |LOAD_REG|		.TXT	'LOAD_REGISTER_FILE'
000201dc 4c 4f 41 44 5f 44 49 53  |LOAD_DIS|		.TXT	'LOAD_DISPATCH_RAMS'
000201ee 2e 20                    |.       |		.XXX[0x2]
000201f0 4c 4f 41 44 5f 43 4f 4e  |LOAD_CON|		.TXT	'LOAD_CONTROL_STORE'
00020202 2e 20                    |.       |		.XXX[0x2]
00020204 4c 6f 61 64 69 6e 67 20  |Loading |		.TXT	'Loading Register Files and Dispatch Rams_'
0002022d 20                       |        |		.XXX[0x1]
0002022e 20 5b 4f 4b 5d           | [OK]   |		.TXT	' [OK]'
00020233 20                       |        |		.XXX[0x1]
00020234 4c 6f 61 64 69 6e 67 20  |Loading |		.TXT	'Loading Register Files_'
0002024b 20                       |        |		.XXX[0x1]
0002024c 20 5b 4f 4b 5d           | [OK]   |		.TXT	' [OK]'
00020251 20                       |        |		.XXX[0x1]
00020252 4c 6f 61 64 69 6e 67 20  |Loading |		.TXT	'Loading Control Store_'
00020268 20 5b 4f 4b 5d           | [OK]   |		.TXT	' [OK]'
0002026d 20 06 07                 |        |		.XXX[0x3]
00020270 03 02 04 00              |        |		.XXX[0x4]
00020274 4e 56 ff d6              |NV      |		LINK.W	A6,#0xffd6
00020278 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00020280 4e 76                    |Nv      |
00020282 de fc 00 22              |   "    |		ADDA.W	#0x0022,A7
00020286 48 e7 db 00              |H       |		MOVEM.L	D7+D6+D4+D3+D1+D0,-(A7)
0002028a 7c 00                    ||       |		MOVEQ.L	#0x00,D6
0002028c 20 2e 00 08              | .      |		MOVE.L	(A6+0x8),D0
00020290 0c 80 00 00 01 ff        |        |		CMPI.L	#0x000001ff,D0
00020296 63 02                    |c       |		BLS	0x2029a
00020298 4e 4f                    |NO      |		TRAP	#15
0002029a e3 80                    |        |		ASL.L	#0x1,D0
0002029c 42 81                    |B       |		CLR.L	D1
0002029e 32 34 08 00              |24      |		MOVE.W	(A4+D0.L),D1
000202a2 2e 01                    |.       |		MOVE.L	D1,D7
000202a4 4a 06                    |J       |		TST.B	D6
000202a6 67 06                    |g       |		BEQ	0x202ae
000202a8 52 ae 00 08              |R       |		ADDQ.L	#0x1,(A6+0x8)
000202ac 60 10                    |`       |		BRA	0x202be
000202ae 28 07                    |(       |		MOVE.L	D7,D4
000202b0 26 3c 00 00 01 00        |&<      |		MOVE.L	#0x00000100,D3
000202b6 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
000202bc 2e 04                    |.       |		MOVE.L	D4,D7
000202be 02 87 00 00 00 ff        |        |		ANDI.L	#0x000000ff,D7
000202c4 44 06                    |D       |		NEG.B	D6
000202c6 52 06                    |R       |		ADDQ.B	#0x1,D6
000202c8 4a 87                    |J       |		TST.L	D7
000202ca 67 18                    |g       |		BEQ	0x202e4
000202cc 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000202d0 0c 87 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D7
000202d6 63 02                    |c       |		BLS	0x202da
000202d8 4e 4f                    |NO      |		TRAP	#15
000202da 1f 07                    |        |		MOVE.B	D7,-(A7)
000202dc 4e b9 00 01 02 c0        |N       |		JSR	AppendChar(MOD b : String; a : char)
000202e2 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000202e4 4a 87                    |J       |		TST.L	D7
000202e6 66 a4                    |f       |		BNE	0x2028c
000202e8 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000202ec 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
000202f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000202f4 4c df 00 db              |L       |		MOVEM.L	(A7)+,D0+D1+D3+D4+D6+D7
000202f8 4e 5e                    |N^      |		UNLK	A6
000202fa 4e 75                    |Nu      |		RTS
000202fc 4e 56 fb 6a              |NV j    |		LINK.W	A6,#0xfb6a
00020300 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00020308 4e 76                    |Nv      |
0002030a de fc 00 7e              |   ~    |		ADDA.W	#0x007e,A7
0002030e 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020312 45 ee ff e8              |E       |		LEA.L	(A6-0x18),A2
00020316 47 f9 00 01 02 c4        |G       |		LEA.L	?fill_str(WORD, WORD, PTR),A3
0002031c 74 01                    |t       |		MOVEQ.L	#0x01,D2
0002031e 7a 02                    |z       |		MOVEQ.L	#0x02,D5
00020320 7c 14                    ||       |		MOVEQ.L	#0x14,D6
00020322 20 6e 00 10              | n      |		MOVEA.L	(A6+0x10),A0
00020326 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020328 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
0002032c 42 27                    |B'      |		CLR.B	-(A7)
0002032e 1f 05                    |        |		MOVE.B	D5,-(A7)
00020330 48 78 00 00              |Hx      |		PEA.L	0x0
00020334 48 52                    |HR      |		PEA.L	(A2)
00020336 48 50                    |HP      |		PEA.L	(A0)
00020338 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
0002033e de c6                    |        |		ADDA.W	D6,A7
00020340 22 50                    |"P      |		MOVEA.L	(A0),A1
00020342 30 29 00 20              |0)      |		MOVE.W	(A1+0x20),D0
00020346 48 c0                    |H       |		EXTW.L	D0
00020348 2e 00                    |.       |		MOVE.L	D0,D7
0002034a 2f 10                    |/       |		MOVE.L	(A0),-(A7)
0002034c 42 67                    |Bg      |		CLR.W	-(A7)
0002034e 42 67                    |Bg      |		CLR.W	-(A7)
00020350 3f 3c 02 00              |?<      |		MOVE.W	#0x0200,-(A7)
00020354 1f 05                    |        |		MOVE.B	D5,-(A7)
00020356 43 ee fb e8              |C       |		LEA.L	(A6-0x418),A1
0002035a 2f 09                    |/       |		MOVE.L	A1,-(A7)
0002035c 48 52                    |HR      |		PEA.L	(A2)
0002035e 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020364 de c6                    |        |		ADDA.W	D6,A7
00020366 22 6e 00 0c              |"n      |		MOVEA.L	(A6+0xc),A1
0002036a 42 80                    |B       |		CLR.L	D0
0002036c 30 2e fb e8              |0.      |		MOVE.W	(A6-0x418),D0
00020370 22 80                    |"       |		MOVE.L	D0,(A1)
00020372 22 6e 00 08              |"n      |		MOVEA.L	(A6+0x8),A1
00020376 32 2e fb ea              |2.      |		MOVE.W	(A6-0x416),D1
0002037a e0 49                    | I      |		LSR.W	#0x8,D1
0002037c 12 81                    |        |		MOVE.B	D1,(A1)
0002037e 32 2e fb ea              |2.      |		MOVE.W	(A6-0x416),D1
00020382 02 41 00 ff              | A      |		ANDI.W	#0x00ff,D1
00020386 43 bc 00 ff              |C       |		cHK.W	#0x00ff,D1
0002038a 13 41 00 01              | A      |		MOVE.B	D1,(A1+0x1)
0002038e 32 2e fb ec              |2.      |		MOVE.W	(A6-0x414),D1
00020392 0c 41 00 c8              | A      |		CMPI.W	#0x00c8,D1
00020396 67 2a                    |g*      |		BEQ	0x203c2
00020398 41 fa fd 9c 72 0a 2f 20  |A   r / |		PUSHTXT	"Microcode is not for this type of processor."
000203a0 51 c9 ff fc              |Q       |
000203a4 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
000203a8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000203aa 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000203ae 3f 02                    |?       |		MOVE.W	D2,-(A7)
000203b0 3f 3c 00 2c              |?< ,    |		MOVE.W	#0x002c,-(A7)
000203b4 4e 93                    |N       |		JSR	(A3)
000203b6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203b8 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(Byte, String)
000203be de fc                    |        |		.XXX[0x2]
000203c0 00 32                    | 2      |		.XXX[0x2]
000203c2 22 07                    |"       |		MOVE.L	D7,D1
000203c4 04 81 00 00 00 29        |     )  |		SUBI.L	#0x00000029,D1
000203ca 28 00                    |(       |		MOVE.L	D0,D4
000203cc 76 20                    |v       |		MOVEQ.L	#0x20,D3
000203ce 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
000203d4 b2 84                    |        |		CMP.L	D4,D1
000203d6 67 2a                    |g*      |		BEQ	0x20402
000203d8 41 fa fd 80 70 08 2f 20  |A   p / |		PUSHTXT	"Microcode file size is inconsistent."
000203e0 51 c8 ff fc              |Q       |
000203e4 1f 3c 00 0e              | <      |		MOVE.B	#0x0e,-(A7)
000203e8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000203ea 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
000203ee 3f 02                    |?       |		MOVE.W	D2,-(A7)
000203f0 3f 3c 00 24              |?< $    |		MOVE.W	#0x0024,-(A7)
000203f4 4e 93                    |N       |		JSR	(A3)
000203f6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000203f8 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(Byte, String)
000203fe de fc                    |        |		.XXX[0x2]
00020400 00 2a                    | *      |		.XXX[0x2]
00020402 2f 3a fd 5a              |/: Z    |		MOVE.L	0x2015e,-(A7)
00020406 2f 3a fd 52              |/: R    |		MOVE.L	0x2015a,-(A7)
0002040a 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002040c 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00020410 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020412 3f 3c 00 08              |?<      |		MOVE.W	#0x0008,-(A7)
00020416 4e 93                    |N       |		JSR	(A3)
00020418 2e ae 00 18              |.       |		MOVE.L	(A6+0x18),(A7)
0002041c 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
00020422 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020424 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002042a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002042c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00020432 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020434 2e ba fd 30              |.  0    |		MOVE.L	0x20166,(A7)
00020438 2f 3a fd 28              |/: (    |		MOVE.L	0x20162,-(A7)
0002043c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002043e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020442 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020444 3f 3c 00 08              |?<      |		MOVE.W	#0x0008,-(A7)
00020448 4e 93                    |N       |		JSR	(A3)
0002044a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002044c 48 78 00 04              |Hx      |		PEA.L	0x4
00020450 49 ee fb e8              |I       |		LEA.L	(A6-0x418),A4
00020454 4e ba fe 1e              |N       |		JSR	0x20274
00020458 de fc 00 0c              |        |		ADDA.W	#0x000c,A7
0002045c 2e ba fd 10              |.       |		MOVE.L	0x2016e,(A7)
00020460 2f 3a fd 08              |/:      |		MOVE.L	0x2016a,-(A7)
00020464 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020466 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002046a 3f 02                    |?       |		MOVE.W	D2,-(A7)
0002046c 3f 3c 00 08              |?<      |		MOVE.W	#0x0008,-(A7)
00020470 4e 93                    |N       |		JSR	(A3)
00020472 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020474 48 78 00 3c              |Hx <    |		PEA.L	0x3c
00020478 49 ee fb e8              |I       |		LEA.L	(A6-0x418),A4
0002047c 4e ba fd f6              |N       |		JSR	0x20274
00020480 de fc 00 0c              |        |		ADDA.W	#0x000c,A7
00020484 2e ba fc f0              |.       |		MOVE.L	0x20176,(A7)
00020488 2f 3a fc e8              |/:      |		MOVE.L	0x20172,-(A7)
0002048c 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002048e 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020492 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020494 3f 3c 00 08              |?<      |		MOVE.W	#0x0008,-(A7)
00020498 4e 93                    |N       |		JSR	(A3)
0002049a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002049c 48 78 00 14              |Hx      |		PEA.L	0x14
000204a0 49 ee fb e8              |I       |		LEA.L	(A6-0x418),A4
000204a4 4e ba fd ce              |N       |		JSR	0x20274
000204a8 de fc 00 10              |        |		ADDA.W	#0x0010,A7
000204ac 41 fa fc d6 70 04 3f 20  |A   p ? |		PUSHTXT	"LAST_UCODE"
000204b4 51 c8 ff fc              |Q       |
000204b8 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000204ba 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000204be 3f 02                    |?       |		MOVE.W	D2,-(A7)
000204c0 3f 3c 00 0a              |?<      |		MOVE.W	#0x000a,-(A7)
000204c4 4e 93                    |N       |		JSR	(A3)
000204c6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000204c8 2d 5f ff ee              |-_      |		MOVE.L	(A7)+,(A6-0x12)
000204cc de fc 00 0a              |        |		ADDA.W	#0x000a,A7
000204d0 20 6e 00 14              | n      |		MOVEA.L	(A6+0x14),A0
000204d4 4a 10                    |J       |		TST.B	(A0)
000204d6 66 00 01 44              |f  D    |		BNE	0x2061c
000204da 2f 2e ff ee              |/.      |		MOVE.L	(A6-0x12),-(A7)
000204de 42 27                    |B'      |		CLR.B	-(A7)
000204e0 42 27                    |B'      |		CLR.B	-(A7)
000204e2 48 78 00 00              |Hx      |		PEA.L	0x0
000204e6 48 52                    |HR      |		PEA.L	(A2)
000204e8 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
000204ec 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
000204f2 de c6                    |        |		ADDA.W	D6,A7
000204f4 4a 12                    |J       |		TST.B	(A2)
000204f6 67 06                    |g       |		BEQ	0x204fe
000204f8 10 82                    |        |		MOVE.B	D2,(A0)
000204fa 60 00 01 20              |`       |		BRA	0x2061c
000204fe 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00020502 4e b9 00 01 02 b8        |N       |		JSR	NewString() : Pointer
00020508 2e ae ff fa              |.       |		MOVE.L	(A6-0x6),(A7)
0002050c 42 67                    |Bg      |		CLR.W	-(A7)
0002050e 42 67                    |Bg      |		CLR.W	-(A7)
00020510 3f 3c 00 40              |?< @    |		MOVE.W	#0x0040,-(A7)
00020514 1f 05                    |        |		MOVE.B	D5,-(A7)
00020516 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
0002051a 48 52                    |HR      |		PEA.L	(A2)
0002051c 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020522 de fc 00 0e              |        |		ADDA.W	#0x000e,A7
00020526 2e ae ff f2              |.       |		MOVE.L	(A6-0xe),(A7)
0002052a 2f 2e 00 18              |/.      |		MOVE.L	(A6+0x18),-(A7)
0002052e 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
00020534 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020536 4a 1f                    |J       |		TST.B	(A7)+
00020538 66 02                    |f       |		BNE	0x2053c
0002053a 10 82                    |        |		MOVE.B	D2,(A0)
0002053c 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
00020540 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
00020546 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020548 4a 10                    |J       |		TST.B	(A0)
0002054a 66 00 00 86              |f       |		BNE	0x205d2
0002054e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020550 22 6f 00 04              |"o      |		MOVEA.L	(A7+0x4),A1
00020554 22 51                    |"Q      |		MOVEA.L	(A1),A1
00020556 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020558 1e a9 00 3a              |   :    |		MOVE.B	(A1+0x3a),(A7)
0002055c 1f 69 00 3b 00 01        | i ;    |		MOVE.B	(A1+0x3b),(A7+0x1)
00020562 1f 69 00 3c 00 02        | i <    |		MOVE.B	(A1+0x3c),(A7+0x2)
00020568 1f 69 00 3d 00 03        | i =    |		MOVE.B	(A1+0x3d),(A7+0x3)
0002056e 4e b9 00 01 03 08        |N       |		JSR	TimeToText()
00020574 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020576 2d 57 ff f2              |-W      |		MOVE.L	(A7),(A6-0xe)
0002057a 22 6e ff fa              |"n      |		MOVEA.L	(A6-0x6),A1
0002057e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020580 1e a9 00 3a              |   :    |		MOVE.B	(A1+0x3a),(A7)
00020584 1f 69 00 3b 00 01        | i ;    |		MOVE.B	(A1+0x3b),(A7+0x1)
0002058a 1f 69 00 3c 00 02        | i <    |		MOVE.B	(A1+0x3c),(A7+0x2)
00020590 1f 69 00 3d 00 03        | i =    |		MOVE.B	(A1+0x3d),(A7+0x3)
00020596 4e b9 00 01 03 08        |N       |		JSR	TimeToText()
0002059c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002059e 2d 57 ff f6              |-W      |		MOVE.L	(A7),(A6-0xa)
000205a2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000205a4 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
000205a8 2f 2e ff f6              |/.      |		MOVE.L	(A6-0xa),-(A7)
000205ac 4e b9 00 01 02 c8        |N       |		JSR	StringEqual(a, b : String) : Byte
000205b2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000205b4 4a 1f                    |J       |		TST.B	(A7)+
000205b6 66 02                    |f       |		BNE	0x205ba
000205b8 10 82                    |        |		MOVE.B	D2,(A0)
000205ba 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
000205be 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
000205c4 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205c6 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
000205ca 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
000205d0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000205d2 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
000205d6 4e b9 00 01 02 b8        |N       |		JSR	NewString() : Pointer
000205dc 2e ae ff fa              |.       |		MOVE.L	(A6-0x6),(A7)
000205e0 42 67                    |Bg      |		CLR.W	-(A7)
000205e2 42 67                    |Bg      |		CLR.W	-(A7)
000205e4 3f 3c 00 40              |?< @    |		MOVE.W	#0x0040,-(A7)
000205e8 1f 05                    |        |		MOVE.B	D5,-(A7)
000205ea 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
000205ee 48 52                    |HR      |		PEA.L	(A2)
000205f0 4e b9 00 01 03 88        |N       |		JSR	WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
000205f6 de c6                    |        |		ADDA.W	D6,A7
000205f8 48 6e ff f2              |Hn      |		PEA.L	(A6-0xe)
000205fc 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
00020602 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020604 42 17                    |B       |		CLR.B	(A7)
00020606 1f 05                    |        |		MOVE.B	D5,-(A7)
00020608 48 78 00 01              |Hx      |		PEA.L	0x1
0002060c 48 52                    |HR      |		PEA.L	(A2)
0002060e 48 6e ff fa              |Hn      |		PEA.L	(A6-0x6)
00020612 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00020618 de fc 00 10              |        |		ADDA.W	#0x0010,A7
0002061c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002061e 48 6e ff ee              |Hn      |		PEA.L	(A6-0x12)
00020622 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
00020628 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002062a 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
0002062e 4e 5e                    |N^      |		UNLK	A6
00020630 4e 75                    |Nu      |		RTS
00020632 4e 56 ff 92              |NV      |		LINK.W	A6,#0xff92
00020636 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
0002063e 4e 76                    |Nv      |
00020640 de fc 00 5e              |   ^    |		ADDA.W	#0x005e,A7
00020644 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00020648 47 ee ff f8              |G       |		LEA.L	(A6-0x8),A3
0002064c 49 ee ff f0              |I       |		LEA.L	(A6-0x10),A4
00020650 72 01                    |r       |		MOVEQ.L	#0x01,D1
00020652 74 02                    |t       |		MOVEQ.L	#0x02,D2
00020654 76 0a                    |v       |		MOVEQ.L	#0x0a,D3
00020656 78 1e                    |x       |		MOVEQ.L	#0x1e,D4
00020658 7a 10                    |z       |		MOVEQ.L	#0x10,D5
0002065a 41 fa fb 32 70 04 3f 20  |A  2p ? |		PUSHTXT	"LAST_UCODE"
00020662 51 c8 ff fc              |Q       |
00020666 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020668 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002066c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002066e 3f 03                    |?       |		MOVE.W	D3,-(A7)
00020670 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
00020676 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020678 28 9f                    |(       |		MOVE.L	(A7)+,(A4)
0002067a de c3                    |        |		ADDA.W	D3,A7
0002067c 20 6e 00 08              | n      |		MOVEA.L	(A6+0x8),A0
00020680 9e c4                    |        |		SUBA.W	D4,A7
00020682 22 4f                    |"O      |		MOVEA.L	A7,A1
00020684 24 48                    |$H      |		MOVEA.L	A0,A2
00020686 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
00020688 12 da                    |        |		MOVE.B	(A2)+,(A1)+
0002068a 51 c8 ff fc              |Q       |		DBF	D0,0x20688
0002068e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020690 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020694 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020696 3f 04                    |?       |		MOVE.W	D4,-(A7)
00020698 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
0002069e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000206a0 2d 5f ff f4              |-_      |		MOVE.L	(A7)+,(A6-0xc)
000206a4 de fc 00 1a              |        |		ADDA.W	#0x001a,A7
000206a8 2e 94                    |.       |		MOVE.L	(A4),(A7)
000206aa 1f 01                    |        |		MOVE.B	D1,-(A7)
000206ac 1f 02                    |        |		MOVE.B	D2,-(A7)
000206ae 48 78 00 01              |Hx      |		PEA.L	0x1
000206b2 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000206b6 48 53                    |HS      |		PEA.L	(A3)
000206b8 4e b9 00 01 03 80        |N       |		JSR	OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
000206be de c5                    |        |		ADDA.W	D5,A7
000206c0 2e 93                    |.       |		MOVE.L	(A3),(A7)
000206c2 42 67                    |Bg      |		CLR.W	-(A7)
000206c4 42 67                    |Bg      |		CLR.W	-(A7)
000206c6 3f 3c 00 40              |?< @    |		MOVE.W	#0x0040,-(A7)
000206ca 1f 02                    |        |		MOVE.B	D2,-(A7)
000206cc 2f 2e ff f4              |/.      |		MOVE.L	(A6-0xc),-(A7)
000206d0 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
000206d4 4e b9 00 01 03 88        |N       |		JSR	WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
000206da de fc 00 14              |        |		ADDA.W	#0x0014,A7
000206de 22 53                    |"S      |		MOVEA.L	(A3),A1
000206e0 13 68 00 3a 00 3a        | h : :  |		MOVE.B	(A0+0x3a),(A1+0x3a)
000206e6 13 68 00 3b 00 3b        | h ; ;  |		MOVE.B	(A0+0x3b),(A1+0x3b)
000206ec 13 68 00 3c 00 3c        | h < <  |		MOVE.B	(A0+0x3c),(A1+0x3c)
000206f2 13 68 00 3d 00 3d        | h = =  |		MOVE.B	(A0+0x3d),(A1+0x3d)
000206f8 13 41 00 4c              | A L    |		MOVE.B	D1,(A1+0x4c)
000206fc 42 27                    |B'      |		CLR.B	-(A7)
000206fe 1f 02                    |        |		MOVE.B	D2,-(A7)
00020700 48 78 00 01              |Hx      |		PEA.L	0x1
00020704 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00020708 48 53                    |HS      |		PEA.L	(A3)
0002070a 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
00020710 de c5                    |        |		ADDA.W	D5,A7
00020712 48 6e ff f4              |Hn      |		PEA.L	(A6-0xc)
00020716 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
0002071c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002071e 48 54                    |HT      |		PEA.L	(A4)
00020720 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
00020726 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020728 4c df 1f 3f              |L  ?    |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002072c 4e 5e                    |N^      |		UNLK	A6
0002072e 4e 75                    |Nu      |		RTS
00020730 4e 56 ff ba              |NV      |		LINK.W	A6,#0xffba
00020734 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
0002073c 4e 76                    |Nv      |
0002073e de fc 00 3a              |   :    |		ADDA.W	#0x003a,A7
00020742 48 e7 c1 d8              |H       |		MOVEM.L	A4+A3+A1+A0+D7+D1+D0,-(A7)
00020746 43 f9 00 02 19 84        |C       |		LEA.L	0x21984,A1
0002074c 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002074e 1f 2e 00 08              | .      |		MOVE.B	(A6+0x8),-(A7)
00020752 1e 2e 00 0a              | .      |		MOVE.B	(A6+0xa),D7
00020756 be 17                    |        |		CMP.B	(A7),D7
00020758 6e 00 00 ac              |n       |		BGT	0x20806
0002075c 10 07                    |        |		MOVE.B	D7,D0
0002075e 48 80                    |H       |		EXTB.W	D0
00020760 0c 40 00 04              | @      |		CMPI.W	#0x0004,D0
00020764 63 02                    |c       |		BLS	0x20768
00020766 4e 4e                    |NN      |		TRAP	#14
00020768 d0 40                    | @      |		ADD.W	D0,D0
0002076a 30 3b 00 06 4e fb 00 02  |0;  N   |		SWITCH	D0.W
00020772 00 0a                    |        |		.CONST	0xa			; [0x0] -> 0x2077c
00020774 00 14                    |        |		.CONST	0x14			; [0x1] -> 0x20786
00020776 00 1e                    |        |		.CONST	0x1e			; [0x2] -> 0x20790
00020778 00 28                    | (      |		.CONST	0x28			; [0x3] -> 0x2079a
0002077a 00 32                    | 2      |		.CONST	0x32			; [0x4] -> 0x207a4
0002077c					switch@0x2076a[0x0]:
0002077c 2f 3a fa 14              |/:      |		MOVE.L	0x20192,-(A7)
00020780 2f 3a fa 0c              |/:      |		MOVE.L	0x2018e,-(A7)
00020784 60 26                    |`&      |		BRA	0x207ac
00020786					switch@0x2076a[0x1]:
00020786 2f 3a fa 12              |/:      |		MOVE.L	0x2019a,-(A7)
0002078a 2f 3a fa 0a              |/:      |		MOVE.L	0x20196,-(A7)
0002078e 60 1c                    |`       |		BRA	0x207ac
00020790					switch@0x2076a[0x2]:
00020790 2f 3a fa 10              |/:      |		MOVE.L	0x201a2,-(A7)
00020794 2f 3a fa 08              |/:      |		MOVE.L	0x2019e,-(A7)
00020798 60 12                    |`       |		BRA	0x207ac
0002079a					switch@0x2076a[0x3]:
0002079a 2f 3a fa 0e              |/:      |		MOVE.L	0x201aa,-(A7)
0002079e 2f 3a fa 06              |/:      |		MOVE.L	0x201a6,-(A7)
000207a2 60 08                    |`       |		BRA	0x207ac
000207a4					switch@0x2076a[0x4]:
000207a4 2f 3a fa 0c              |/:      |		MOVE.L	0x201b2,-(A7)
000207a8 2f 3a fa 04              |/:      |		MOVE.L	0x201ae,-(A7)
000207ac 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000207ae 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000207b2 3f 01                    |?       |		MOVE.W	D1,-(A7)
000207b4 3f 3c 00 08              |?<      |		MOVE.W	#0x0008,-(A7)
000207b8 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
000207be 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207c0 28 5f                    |(_      |		MOVEA.L	(A7)+,A4
000207c2 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207c4 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000207c6 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
000207ca 4e b9 00 01 02 cc        |N       |		JSR	StringDup(a : String) : String
000207d0 2e 8c                    |.       |		MOVE.L	A4,(A7)
000207d2 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000207d8 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207da 26 5f                    |&_      |		MOVEA.L	(A7)+,A3
000207dc 2f 0b                    |/       |		MOVE.L	A3,-(A7)
000207de 10 07                    |        |		MOVE.B	D7,D0
000207e0 48 80                    |H       |		EXTB.W	D0
000207e2 e5 40                    | @      |		ASL.W	#0x2,D0
000207e4 20 49                    | I      |		MOVEA.L	A1,A0
000207e6 48 70 00 08              |Hp      |		PEA.L	(A0+D0.W+#0x8)
000207ea 4e b9 00 01 04 60        |N    `  |		JSR	ExpLoad(a : String; b: Pointer)
000207f0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000207f2 10 07                    |        |		MOVE.B	D7,D0
000207f4 48 80                    |H       |		EXTB.W	D0
000207f6 3f 00                    |?       |		MOVE.W	D0,-(A7)
000207f8 20 49                    | I      |		MOVEA.L	A1,A0
000207fa 11 81 00 1c              |        |		MOVE.B	D1,(A0+D0.W+#0x1c)
000207fe 3e 1f                    |>       |		MOVE.W	(A7)+,D7
00020800 52 47                    |RG      |		ADDQ.W	#0x1,D7
00020802 68 00 ff 52              |h  R    |		BVC	0x20756
00020806 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020808 48 6e 00 0c              |Hn      |		PEA.L	(A6+0xc)
0002080c 4e b9 00 01 02 bc        |N       |		JSR	FreeString(a : Pointer)
00020812 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020814 4c df 1b 83              |L       |		MOVEM.L	(A7)+,D0+D1+D7+A0+A1+A3+A4
00020818 4e 5e                    |N^      |		UNLK	A6
0002081a 4e 75                    |Nu      |		RTS
0002081c 4e 56 ff c4              |NV      |		LINK.W	A6,#0xffc4
00020820 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00020828 4e 76                    |Nv      |
0002082a de fc 00 32              |   2    |		ADDA.W	#0x0032,A7
0002082e 48 e7 e3 e0              |H       |		MOVEM.L	A2+A1+A0+D7+D6+D2+D1+D0,-(A7)
00020832 43 ee ff fc              |C       |		LEA.L	(A6-0x4),A1
00020836 45 ee ff fa              |E       |		LEA.L	(A6-0x6),A2
0002083a 74 0e                    |t       |		MOVEQ.L	#0x0e,D2
0002083c 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
00020840 48 80                    |H       |		EXTB.W	D0
00020842 41 fa fa 2a              |A  *    |		LEA.L	0x2026e,A0
00020846 1c 30 00 00              | 0      |		MOVE.B	(A0+D0.W),D6
0002084a 7e 01                    |~       |		MOVEQ.L	#0x01,D7
0002084c 1f 06                    |        |		MOVE.B	D6,-(A7)
0002084e 48 51                    |HQ      |		PEA.L	(A1)
00020850 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
00020854 48 52                    |HR      |		PEA.L	(A2)
00020856 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
0002085c de c2                    |        |		ADDA.W	D2,A7
0002085e 4a 12                    |J       |		TST.B	(A2)
00020860 66 06                    |f       |		BNE	0x20868
00020862 12 bc 00 04              |        |		MOVE.B	#0x04,(A1)
00020866 60 3e                    |`>      |		BRA	0x208a6
00020868 10 11                    |        |		MOVE.B	(A1),D0
0002086a 0c 00 00 06              |        |		CMPI.B	#0x06,D0
0002086e 66 36                    |f6      |		BNE	0x208a6
00020870 4a 47                    |JG      |		TST.W	D7
00020872 67 32                    |g2      |		BEQ	0x208a6
00020874 42 80                    |B       |		CLR.L	D0
00020876 30 07                    |0       |		MOVE.W	D7,D0
00020878 52 80                    |R       |		ADDQ.L	#0x1,D0
0002087a 0c 80 00 00 ff ff        |        |		CMPI.L	#0x0000ffff,D0
00020880 63 02                    |c       |		BLS	0x20884
00020882 4e 4f                    |NO      |		TRAP	#15
00020884 3e 00                    |>       |		MOVE.W	D0,D7
00020886 48 78 00 27              |Hx '    |		PEA.L	0x27
0002088a 4e b9 00 01 02 24        |N    $  |		JSR	KC12_Sleep(dur : Long)
00020890 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020892 1e 86                    |        |		MOVE.B	D6,(A7)
00020894 48 51                    |HQ      |		PEA.L	(A1)
00020896 48 6e ff f9              |Hn      |		PEA.L	(A6-0x7)
0002089a 48 52                    |HR      |		PEA.L	(A2)
0002089c 4e b9 00 01 04 84        |N       |		JSR	DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
000208a2 de c2                    |        |		ADDA.W	D2,A7
000208a4 60 c2                    |`       |		BRA	0x20868
000208a6 10 11                    |        |		MOVE.B	(A1),D0
000208a8 0c 00 00 01              |        |		CMPI.B	#0x01,D0
000208ac 67 1e                    |g       |		BEQ	0x208cc
000208ae 1f 06                    |        |		MOVE.B	D6,-(A7)
000208b0 12 2e 00 08              | .      |		MOVE.B	(A6+0x8),D1
000208b4 48 81                    |H       |		EXTB.W	D1
000208b6 e5 41                    | A      |		ASL.W	#0x2,D1
000208b8 41 f9 00 02 19 84        |A       |		LEA.L	0x21984,A0
000208be 2f 30 10 08              |/0      |		MOVE.L	(A0+D1.W+#0x8),-(A7)
000208c2 1f 00                    |        |		MOVE.B	D0,-(A7)
000208c4 4e b9 00 02 18 48        |N    H  |		JSR	ExperimentFailureHandler()
000208ca 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000208cc 4c df 07 c7              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D6+D7+A0+A1+A2
000208d0 4e 5e                    |N^      |		UNLK	A6
000208d2 4e 75                    |Nu      |		RTS
000208d4 4e 56 ff d0              |NV      |		LINK.W	A6,#0xffd0
000208d8 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
000208e0 4e 76                    |Nv      |
000208e2 de fc 00 2a              |   *    |		ADDA.W	#0x002a,A7
000208e6 48 e7 c0 f0              |H       |		MOVEM.L	A3+A2+A1+A0+D1+D0,-(A7)
000208ea 45 f9 00 02 19 84        |E       |		LEA.L	0x21984,A2
000208f0 47 ee ff fa              |G       |		LEA.L	(A6-0x6),A3
000208f4 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000208f8 48 80                    |H       |		EXTB.W	D0
000208fa 32 00                    |2       |		MOVE.W	D0,D1
000208fc e5 41                    | A      |		ASL.W	#0x2,D1
000208fe 20 4a                    | J      |		MOVEA.L	A2,A0
00020900 43 fa f9 6c              |C  l    |		LEA.L	0x2026e,A1
00020904 1f 31 00 00              | 1      |		MOVE.B	(A1+D0.W),-(A7)
00020908 2f 30 10 08              |/0      |		MOVE.L	(A0+D1.W+#0x8),-(A7)
0002090c 4e b9 00 01 04 7e        |N    ~  |		JSR	ExpXmit(adr : Byte; b : Pointer)
00020912 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020914 20 70 10 08              | p      |		MOVEA.L	(A0+D1.W+#0x8),A0
00020918 2f 08                    |/       |		MOVE.L	A0,-(A7)
0002091a 21 68 00 f8 00 f4        |!h      |		MOVE.L	(A0+0xf8),(A0+0xf4)
00020920 22 4a                    |"J      |		MOVEA.L	A2,A1
00020922 4a 31 00 1c              |J1      |		TST.B	(A1+D0.W+#0x1c)
00020926 67 3e                    |g>      |		BEQ	0x20966
00020928 26 a8 00 f8              |&       |		MOVE.L	(A0+0xf8),(A3)
0002092c 20 53                    | S      |		MOVEA.L	(A3),A0
0002092e 22 68 00 02              |"h      |		MOVEA.L	(A0+0x2),A1
00020932 b2 fc 00 01              |        |		CMPA.W	#0x0001,A1
00020936 67 04                    |g       |		BEQ	0x2093c
00020938 26 89                    |&       |		MOVE.L	A1,(A3)
0002093a 60 f0                    |`       |		BRA	0x2092c
0002093c 22 57                    |"W      |		MOVEA.L	(A7),A1
0002093e 42 80                    |B       |		CLR.L	D0
00020940 10 28 00 01              | (      |		MOVE.B	(A0+0x1),D0
00020944 42 81                    |B       |		CLR.L	D1
00020946 12 10                    |        |		MOVE.B	(A0),D1
00020948 e5 09                    |        |		LSL.B	#0x2,D1
0002094a e4 09                    |        |		LSR.B	#0x2,D1
0002094c d2 40                    | @      |		ADD.W	D0,D1
0002094e 04 41 00 10              | A      |		SUBI.W	#0x0010,D1
00020952 43 bc 00 ff              |C       |		cHK.W	#0x00ff,D1
00020956 13 41 00 02              | A      |		MOVE.B	D1,(A1+0x2)
0002095a 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
0002095e 48 80                    |H       |		EXTB.W	D0
00020960 20 4a                    | J      |		MOVEA.L	A2,A0
00020962 42 30 00 1c              |B0      |		CLR.B	(A0+D0.W+#0x1c)
00020966 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020968 4c df 0f 03              |L       |		MOVEM.L	(A7)+,D0+D1+A0+A1+A2+A3
0002096c 4e 5e                    |N^      |		UNLK	A6
0002096e 4e 75                    |Nu      |		RTS
00020970 4e 56 ff e2              |NV      |		LINK.W	A6,#0xffe2
00020974 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
0002097c 4e 76                    |Nv      |
0002097e de fc 00 1a              |        |		ADDA.W	#0x001a,A7
00020982 48 e7 81 80              |H       |		MOVEM.L	A0+D7+D0,-(A7)
00020986 1f 2e 00 08              | .      |		MOVE.B	(A6+0x8),-(A7)
0002098a 1e 2e 00 0a              | .      |		MOVE.B	(A6+0xa),D7
0002098e be 17                    |        |		CMP.B	(A7),D7
00020990 6e 24                    |n$      |		BGT	0x209b6
00020992 1f 07                    |        |		MOVE.B	D7,-(A7)
00020994 4e ba fe 86              |N       |		JSR	0x2081c
00020998 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002099a 10 07                    |        |		MOVE.B	D7,D0
0002099c 48 80                    |H       |		EXTB.W	D0
0002099e e5 40                    | @      |		ASL.W	#0x2,D0
000209a0 41 f9 00 02 19 84        |A       |		LEA.L	0x21984,A0
000209a6 48 70 00 08              |Hp      |		PEA.L	(A0+D0.W+#0x8)
000209aa 4e b9 00 01 04 96        |N       |		JSR	ExpClose(exp : Pointer)
000209b0 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000209b2 52 07                    |R       |		ADDQ.B	#0x1,D7
000209b4 68 d8                    |h       |		BVC	0x2098e
000209b6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000209b8 4c df 01 81              |L       |		MOVEM.L	(A7)+,D0+D7+A0
000209bc 4e 5e                    |N^      |		UNLK	A6
000209be 4e 75                    |Nu      |		RTS
000209c0 4e 56 f3 6a              |NV j    |		LINK.W	A6,#0xf36a
000209c4 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
000209cc 4e 76                    |Nv      |
000209ce de fc 00 74              |   t    |		ADDA.W	#0x0074,A7
000209d2 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000209d6 47 ee ff f8              |G       |		LEA.L	(A6-0x8),A3
000209da 49 f8 00 00              |I       |		LEA.L	0x0,A4
000209de 74 01                    |t       |		MOVEQ.L	#0x01,D2
000209e0 26 bc 00 00 00 10        |&       |		MOVE.L	#0x00000010,(A3)
000209e6 2d 7c 00 00 00 07 ff fc  |-|      |		MOVE.L	#0x00000007,(A6-0x4)
000209ee 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
000209f2 48 c0                    |H       |		EXTW.L	D0
000209f4 2d 40 f3 ea              |-@      |		MOVE.L	D0,(A6-0xc16)
000209f8 4e b9 00 02 16 c2        |N       |		JSR	exp_PREP_LOAD_REGISTER_FILE.TYP()
000209fe 4e b9 00 02 17 0e        |N       |		JSR	exp_PREP_LOAD_REGISTER_FILE.VAL()
00020a04 41 fa f7 c2 70 08 3f 20  |A   p ? |		PUSHTXT	"LOAD_REGISTER_FILE"
00020a0c 51 c8 ff fc              |Q       |
00020a10 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020a12 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020a16 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020a18 3f 3c 00 12              |?<      |		MOVE.W	#0x0012,-(A7)
00020a1c 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
00020a22 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020a24 42 17                    |B       |		CLR.B	(A7)
00020a26 1f 02                    |        |		MOVE.B	D2,-(A7)
00020a28 4e ba fd 06              |N       |		JSR	0x20730
00020a2c de fc 00 1a              |        |		ADDA.W	#0x001a,A7
00020a30 70 00                    |p       |		MOVEQ.L	#0x00,D0
00020a32 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020a34 08 00 00 00              |        |		BTST.L	#0x0,D0
00020a38 67 20                    |g       |		BEQ	0x20a5a
00020a3a 3f 3a f7 8c              |?:      |		MOVE.W	0x201c8,-(A7)
00020a3e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020a40 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020a44 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020a46 3f 3c 00 02              |?<      |		MOVE.W	#0x0002,-(A7)
00020a4a 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
00020a50 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020a52 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00020a58 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020a5a 7a 00                    |z       |		MOVEQ.L	#0x00,D5
00020a5c 2f 2e ff fc              |/.      |		MOVE.L	(A6-0x4),-(A7)
00020a60 72 00                    |r       |		MOVEQ.L	#0x00,D1
00020a62 b2 97                    |        |		CMP.L	(A7),D1
00020a64 6f 06                    |o       |		BLE	0x20a6c
00020a66 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020a68 60 00 01 84              |`       |		BRA	0x20bee
00020a6c 2f 01                    |/       |		MOVE.L	D1,-(A7)
00020a6e 0c 81 00 00 00 02        |        |		CMPI.L	#0x00000002,D1
00020a74 6e 42                    |nB      |		BGT	0x20ab8
00020a76 41 ee f3 f8              |A       |		LEA.L	(A6-0xc08),A0
00020a7a 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020a7c 2c 1f                    |,       |		MOVE.L	(A7)+,D6
00020a7e 20 01                    |        |		MOVE.L	D1,D0
00020a80 e1 80                    |        |		ASL.L	#0x8,D0
00020a82 e5 80                    |        |		ASL.L	#0x2,D0
00020a84 dc 80                    |        |		ADD.L	D0,D6
00020a86 2f 2e 00 0a              |/.      |		MOVE.L	(A6+0xa),-(A7)
00020a8a 20 2e f3 ea              | .      |		MOVE.L	(A6-0xc16),D0
00020a8e 0c 80 00 00 40 00        |    @   |		CMPI.L	#0x00004000,D0
00020a94 63 02                    |c       |		BLS	0x20a98
00020a96 4e 4f                    |NO      |		TRAP	#15
00020a98 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020a9a 42 67                    |Bg      |		CLR.W	-(A7)
00020a9c 3f 3c 02 00              |?<      |		MOVE.W	#0x0200,-(A7)
00020aa0 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020aa4 2f 06                    |/       |		MOVE.L	D6,-(A7)
00020aa6 48 6e f3 f2              |Hn      |		PEA.L	(A6-0xc0e)
00020aaa 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020ab0 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020ab4 52 ae f3 ea              |R       |		ADDQ.L	#0x1,(A6-0xc16)
00020ab8 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00020aba 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00020abc 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020abe be 97                    |        |		CMP.L	(A7),D7
00020ac0 6e 7a                    |nz      |		BGT	0x20b3c
00020ac2 20 05                    |        |		MOVE.L	D5,D0
00020ac4 d0 87                    |        |		ADD.L	D7,D0
00020ac6 0c 80 00 00 00 7f        |        |		CMPI.L	#0x0000007f,D0
00020acc 63 02                    |c       |		BLS	0x20ad0
00020ace 4e 4f                    |NO      |		TRAP	#15
00020ad0 28 00                    |(       |		MOVE.L	D0,D4
00020ad2 76 18                    |v       |		MOVEQ.L	#0x18,D3
00020ad4 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00020ada 41 ee f3 de              |A       |		LEA.L	(A6-0xc22),A0
00020ade 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020ae0 22 4f                    |"O      |		MOVEA.L	A7,A1
00020ae2 45 f0 48 1a              |E H     |		LEA.L	(A0+D4.L+#0x1a),A2
00020ae6 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020ae8 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020aea 51 c8 ff fc              |Q       |		DBF	D0,0x20ae8
00020aee 2f 39 00 02 19 8c        |/9      |		MOVE.L	0x2198c,-(A7)
00020af4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020af8 48 54                    |HT      |		PEA.L	(A4)
00020afa 48 78 00 07              |Hx      |		PEA.L	0x7
00020afe 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020b04 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020b08 1e b0 48 22              |  H"    |		MOVE.B	(A0+D4.L+#0x22),(A7)
00020b0c 1f 70 48 23 00 01        | pH#    |		MOVE.B	(A0+D4.L+#0x23),(A7+0x1)
00020b12 1f 70 48 24 00 02        | pH$    |		MOVE.B	(A0+D4.L+#0x24),(A7+0x2)
00020b18 1f 70 48 25 00 03        | pH%    |		MOVE.B	(A0+D4.L+#0x25),(A7+0x3)
00020b1e 2f 39 00 02 19 8c        |/9      |		MOVE.L	0x2198c,-(A7)
00020b24 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020b28 48 54                    |HT      |		PEA.L	(A4)
00020b2a 48 78 00 03              |Hx      |		PEA.L	0x3
00020b2e 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020b34 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020b38 52 87                    |R       |		ADDQ.L	#0x1,D7
00020b3a 68 82                    |h       |		BVC	0x20abe
00020b3c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b3e 42 17                    |B       |		CLR.B	(A7)
00020b40 4e ba fc da              |N       |		JSR	0x2081c
00020b44 42 17                    |B       |		CLR.B	(A7)
00020b46 4e ba fd 8c              |N       |		JSR	0x208d4
00020b4a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020b4c 2f 13                    |/       |		MOVE.L	(A3),-(A7)
00020b4e 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00020b50 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020b52 be 97                    |        |		CMP.L	(A7),D7
00020b54 6e 7a                    |nz      |		BGT	0x20bd0
00020b56 20 05                    |        |		MOVE.L	D5,D0
00020b58 d0 87                    |        |		ADD.L	D7,D0
00020b5a 0c 80 00 00 00 7f        |        |		CMPI.L	#0x0000007f,D0
00020b60 63 02                    |c       |		BLS	0x20b64
00020b62 4e 4f                    |NO      |		TRAP	#15
00020b64 28 00                    |(       |		MOVE.L	D0,D4
00020b66 76 18                    |v       |		MOVEQ.L	#0x18,D3
00020b68 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00020b6e 41 ee f3 de              |A       |		LEA.L	(A6-0xc22),A0
00020b72 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020b74 22 4f                    |"O      |		MOVEA.L	A7,A1
00020b76 45 f0 48 2a              |E H*    |		LEA.L	(A0+D4.L+#0x2a),A2
00020b7a 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020b7c 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020b7e 51 c8 ff fc              |Q       |		DBF	D0,0x20b7c
00020b82 2f 39 00 02 19 90        |/9      |		MOVE.L	0x21990,-(A7)
00020b88 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020b8c 48 54                    |HT      |		PEA.L	(A4)
00020b8e 48 78 00 07              |Hx      |		PEA.L	0x7
00020b92 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020b98 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020b9c 1e b0 48 26              |  H&    |		MOVE.B	(A0+D4.L+#0x26),(A7)
00020ba0 1f 70 48 27 00 01        | pH'    |		MOVE.B	(A0+D4.L+#0x27),(A7+0x1)
00020ba6 1f 70 48 28 00 02        | pH(    |		MOVE.B	(A0+D4.L+#0x28),(A7+0x2)
00020bac 1f 70 48 29 00 03        | pH)    |		MOVE.B	(A0+D4.L+#0x29),(A7+0x3)
00020bb2 2f 39 00 02 19 90        |/9      |		MOVE.L	0x21990,-(A7)
00020bb8 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020bbc 48 54                    |HT      |		PEA.L	(A4)
00020bbe 48 78 00 03              |Hx      |		PEA.L	0x3
00020bc2 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020bc8 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020bcc 52 87                    |R       |		ADDQ.L	#0x1,D7
00020bce 68 82                    |h       |		BVC	0x20b52
00020bd0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020bd2 1e 82                    |        |		MOVE.B	D2,(A7)
00020bd4 4e ba fc 46              |N  F    |		JSR	0x2081c
00020bd8 1e 82                    |        |		MOVE.B	D2,(A7)
00020bda 4e ba fc f8              |N       |		JSR	0x208d4
00020bde 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020be0 da 93                    |        |		ADD.L	(A3),D5
00020be2 22 17                    |"       |		MOVE.L	(A7),D1
00020be4 52 81                    |R       |		ADDQ.L	#0x1,D1
00020be6 69 06                    |i       |		BVS	0x20bee
00020be8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020bea 60 00 fe 76              |`  v    |		BRA	0x20a62
00020bee 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020bf0 20 17                    |        |		MOVE.L	(A7),D0
00020bf2 52 80                    |R       |		ADDQ.L	#0x1,D0
00020bf4 0c 80 00 00 00 07        |        |		CMPI.L	#0x00000007,D0
00020bfa 6e 06                    |n       |		BGT	0x20c02
00020bfc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020bfe 60 00 fe 32              |`  2    |		BRA	0x20a32
00020c02 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020c04 42 17                    |B       |		CLR.B	(A7)
00020c06 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c08 4e ba fd 66              |N  f    |		JSR	0x20970
00020c0c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020c0e 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00020c12 4e 5e                    |N^      |		UNLK	A6
00020c14 4e 75                    |Nu      |		RTS
00020c16 4e 56 eb 54              |NV T    |		LINK.W	A6,#0xeb54
00020c1a bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00020c22 4e 76                    |Nv      |
00020c24 de fc 00 74              |   t    |		ADDA.W	#0x0074,A7
00020c28 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020c2c 47 ee ff f6              |G       |		LEA.L	(A6-0xa),A3
00020c30 49 ee eb e0              |I       |		LEA.L	(A6-0x1420),A4
00020c34 74 01                    |t       |		MOVEQ.L	#0x01,D2
00020c36 2d 7c 00 00 00 10 ff f2  |-|      |		MOVE.L	#0x00000010,(A6-0xe)
00020c3e 26 bc 00 00 00 10        |&       |		MOVE.L	#0x00000010,(A3)
00020c44 2d 7c 00 00 00 08 ff fa  |-|      |		MOVE.L	#0x00000008,(A6-0x6)
00020c4c 4e b9 00 02 16 c2        |N       |		JSR	exp_PREP_LOAD_REGISTER_FILE.TYP()
00020c52 4e b9 00 02 17 0e        |N       |		JSR	exp_PREP_LOAD_REGISTER_FILE.VAL()
00020c58 4e b9 00 02 16 7c        |N    |  |		JSR	exp_PREP_LOAD_DISPATCH_RAMS.SEQ()
00020c5e 41 fa f5 7c 70 08 3f 20  |A  |p ? |		PUSHTXT	"LOAD_REGISTER_FILE"
00020c66 51 c8 ff fc              |Q       |
00020c6a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020c6c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020c70 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020c72 3f 3c 00 12              |?<      |		MOVE.W	#0x0012,-(A7)
00020c76 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
00020c7c 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020c7e 42 17                    |B       |		CLR.B	(A7)
00020c80 1f 02                    |        |		MOVE.B	D2,-(A7)
00020c82 4e ba fa ac              |N       |		JSR	0x20730
00020c86 de fc 00 1a              |        |		ADDA.W	#0x001a,A7
00020c8a 41 fa f5 62 70 08 3f 20  |A  bp ? |		PUSHTXT	"LOAD_DISPATCH_RAMS"
00020c92 51 c8 ff fc              |Q       |
00020c96 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020c98 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020c9c 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020c9e 3f 3c 00 12              |?<      |		MOVE.W	#0x0012,-(A7)
00020ca2 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
00020ca8 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020caa 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00020cae 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
00020cb2 4e ba fa 7c              |N  |    |		JSR	0x20730
00020cb6 de fc 00 1a              |        |		ADDA.W	#0x001a,A7
00020cba 1d 42 eb e4              | B      |		MOVE.B	D2,(A6-0x141c)
00020cbe 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020cc0 30 2e 00 0a              |0.      |		MOVE.W	(A6+0xa),D0
00020cc4 48 c0                    |H       |		EXTW.L	D0
00020cc6 2d 40 eb d4              |-@      |		MOVE.L	D0,(A6-0x142c)
00020cca 30 2e 00 08              |0.      |		MOVE.W	(A6+0x8),D0
00020cce 48 c0                    |H       |		EXTW.L	D0
00020cd0 2d 40 eb d8              |-@      |		MOVE.L	D0,(A6-0x1428)
00020cd4 70 00                    |p       |		MOVEQ.L	#0x00,D0
00020cd6 2f 00                    |/       |		MOVE.L	D0,-(A7)
00020cd8 08 00 00 00              |        |		BTST.L	#0x0,D0
00020cdc 67 20                    |g       |		BEQ	0x20cfe
00020cde 3f 3a f5 0e              |?:      |		MOVE.W	0x201ee,-(A7)
00020ce2 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020ce4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020ce8 3f 02                    |?       |		MOVE.W	D2,-(A7)
00020cea 3f 3c 00 02              |?<      |		MOVE.W	#0x0002,-(A7)
00020cee 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
00020cf4 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00020cf6 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00020cfc 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00020cfe 0c 80 00 00 00 04        |        |		CMPI.L	#0x00000004,D0
00020d04 66 06                    |f       |		BNE	0x20d0c
00020d06 42 2e eb e4              |B.      |		CLR.B	(A6-0x141c)
00020d0a 7c 00                    ||       |		MOVEQ.L	#0x00,D6
00020d0c 42 ae eb dc              |B       |		CLR.L	(A6-0x1424)
00020d10 42 94                    |B       |		CLR.L	(A4)
00020d12 2f 2e ff fa              |/.      |		MOVE.L	(A6-0x6),-(A7)
00020d16 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00020d18 72 00                    |r       |		MOVEQ.L	#0x00,D1
00020d1a b2 97                    |        |		CMP.L	(A7),D1
00020d1c 6f 06                    |o       |		BLE	0x20d24
00020d1e 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00020d20 60 00 03 6e              |`  n    |		BRA	0x21090
00020d24 2f 01                    |/       |		MOVE.L	D1,-(A7)
00020d26 0c 81 00 00 00 02        |        |		CMPI.L	#0x00000002,D1
00020d2c 6e 42                    |nB      |		BGT	0x20d70
00020d2e 41 ee eb f2              |A       |		LEA.L	(A6-0x140e),A0
00020d32 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020d34 2a 1f                    |*       |		MOVE.L	(A7)+,D5
00020d36 20 01                    |        |		MOVE.L	D1,D0
00020d38 e1 80                    |        |		ASL.L	#0x8,D0
00020d3a e5 80                    |        |		ASL.L	#0x2,D0
00020d3c da 80                    |        |		ADD.L	D0,D5
00020d3e 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020d42 20 2e eb d4              | .      |		MOVE.L	(A6-0x142c),D0
00020d46 0c 80 00 00 40 00        |    @   |		CMPI.L	#0x00004000,D0
00020d4c 63 02                    |c       |		BLS	0x20d50
00020d4e 4e 4f                    |NO      |		TRAP	#15
00020d50 3f 00                    |?       |		MOVE.W	D0,-(A7)
00020d52 42 67                    |Bg      |		CLR.W	-(A7)
00020d54 3f 3c 02 00              |?<      |		MOVE.W	#0x0200,-(A7)
00020d58 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020d5c 2f 05                    |/       |		MOVE.L	D5,-(A7)
00020d5e 48 6e eb ec              |Hn      |		PEA.L	(A6-0x1414)
00020d62 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020d68 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020d6c 52 ae eb d4              |R       |		ADDQ.L	#0x1,(A6-0x142c)
00020d70 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
00020d74 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00020d76 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020d78 be 97                    |        |		CMP.L	(A7),D7
00020d7a 6e 00 00 84              |n       |		BGT	0x20e00
00020d7e 20 2e eb dc              | .      |		MOVE.L	(A6-0x1424),D0
00020d82 d0 87                    |        |		ADD.L	D7,D0
00020d84 0c 80 00 00 00 7f        |        |		CMPI.L	#0x0000007f,D0
00020d8a 63 02                    |c       |		BLS	0x20d8e
00020d8c 4e 4f                    |NO      |		TRAP	#15
00020d8e 28 00                    |(       |		MOVE.L	D0,D4
00020d90 76 18                    |v       |		MOVEQ.L	#0x18,D3
00020d92 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00020d98 41 ee eb c8              |A       |		LEA.L	(A6-0x1438),A0
00020d9c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020d9e 22 4f                    |"O      |		MOVEA.L	A7,A1
00020da0 45 f0 48 2a              |E H*    |		LEA.L	(A0+D4.L+#0x2a),A2
00020da4 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020da6 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020da8 51 c8 ff fc              |Q       |		DBF	D0,0x20da6
00020dac 2f 39 00 02 19 8c        |/9      |		MOVE.L	0x2198c,-(A7)
00020db2 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020db6 48 78 00 00              |Hx      |		PEA.L	0x0
00020dba 48 78 00 07              |Hx      |		PEA.L	0x7
00020dbe 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020dc4 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020dc8 1e b0 48 32              |  H2    |		MOVE.B	(A0+D4.L+#0x32),(A7)
00020dcc 1f 70 48 33 00 01        | pH3    |		MOVE.B	(A0+D4.L+#0x33),(A7+0x1)
00020dd2 1f 70 48 34 00 02        | pH4    |		MOVE.B	(A0+D4.L+#0x34),(A7+0x2)
00020dd8 1f 70 48 35 00 03        | pH5    |		MOVE.B	(A0+D4.L+#0x35),(A7+0x3)
00020dde 2f 39 00 02 19 8c        |/9      |		MOVE.L	0x2198c,-(A7)
00020de4 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020de8 48 78 00 00              |Hx      |		PEA.L	0x0
00020dec 48 78 00 03              |Hx      |		PEA.L	0x3
00020df0 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020df6 de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020dfa 52 87                    |R       |		ADDQ.L	#0x1,D7
00020dfc 68 00 ff 7a              |h  z    |		BVC	0x20d78
00020e00 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e02 42 17                    |B       |		CLR.B	(A7)
00020e04 4e ba fa ce              |N       |		JSR	0x208d4
00020e08 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020e0a 20 17                    |        |		MOVE.L	(A7),D0
00020e0c b0 82                    |        |		CMP.L	D2,D0
00020e0e 6e 42                    |nB      |		BGT	0x20e52
00020e10 41 ee f7 f2              |A       |		LEA.L	(A6-0x80e),A0
00020e14 2f 08                    |/       |		MOVE.L	A0,-(A7)
00020e16 2a 1f                    |*       |		MOVE.L	(A7)+,D5
00020e18 22 00                    |"       |		MOVE.L	D0,D1
00020e1a e1 81                    |        |		ASL.L	#0x8,D1
00020e1c e5 81                    |        |		ASL.L	#0x2,D1
00020e1e da 81                    |        |		ADD.L	D1,D5
00020e20 2f 2e 00 0c              |/.      |		MOVE.L	(A6+0xc),-(A7)
00020e24 22 2e eb d8              |".      |		MOVE.L	(A6-0x1428),D1
00020e28 0c 81 00 00 40 00        |    @   |		CMPI.L	#0x00004000,D1
00020e2e 63 02                    |c       |		BLS	0x20e32
00020e30 4e 4f                    |NO      |		TRAP	#15
00020e32 3f 01                    |?       |		MOVE.W	D1,-(A7)
00020e34 42 67                    |Bg      |		CLR.W	-(A7)
00020e36 3f 3c 02 00              |?<      |		MOVE.W	#0x0200,-(A7)
00020e3a 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00020e3e 2f 05                    |/       |		MOVE.L	D5,-(A7)
00020e40 48 6e eb ec              |Hn      |		PEA.L	(A6-0x1414)
00020e44 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00020e4a de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020e4e 52 ae eb d8              |R       |		ADDQ.L	#0x1,(A6-0x1428)
00020e52 22 06                    |"       |		MOVE.L	D6,D1
00020e54 e0 89                    |        |		LSR.L	#0x8,D1
00020e56 0c 81 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D1
00020e5c 63 02                    |c       |		BLS	0x20e60
00020e5e 4e 4f                    |NO      |		TRAP	#15
00020e60 1d 41 eb ea              | A      |		MOVE.B	D1,(A6-0x1416)
00020e64 22 06                    |"       |		MOVE.L	D6,D1
00020e66 02 81 00 00 00 ff        |        |		ANDI.L	#0x000000ff,D1
00020e6c 0c 81 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D1
00020e72 63 02                    |c       |		BLS	0x20e76
00020e74 4e 4f                    |NO      |		TRAP	#15
00020e76 1d 41 eb eb              | A      |		MOVE.B	D1,(A6-0x1415)
00020e7a 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
00020e80 1f 2e eb e4              | .      |		MOVE.B	(A6-0x141c),-(A7)
00020e84 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
00020e8a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020e8c 3e ae eb ea              |>       |		MOVE.W	(A6-0x1416),(A7)
00020e90 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
00020e96 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020e9a 48 78 00 00              |Hx      |		PEA.L	0x0
00020e9e 48 78 00 01              |Hx      |		PEA.L	0x1
00020ea2 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020ea8 de fc 00 0e              |        |		ADDA.W	#0x000e,A7
00020eac 2e 93                    |.       |		MOVE.L	(A3),(A7)
00020eae 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00020eb0 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020eb2 be 97                    |        |		CMP.L	(A7),D7
00020eb4 6e 40                    |n@      |		BGT	0x20ef6
00020eb6 20 14                    |        |		MOVE.L	(A4),D0
00020eb8 d0 87                    |        |		ADD.L	D7,D0
00020eba 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00020ec0 63 02                    |c       |		BLS	0x20ec4
00020ec2 4e 4f                    |NO      |		TRAP	#15
00020ec4 e7 80                    |        |		ASL.L	#0x3,D0
00020ec6 41 ee eb c8              |A       |		LEA.L	(A6-0x1438),A0
00020eca 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
00020ece 2f 28 0c 2e              |/( .    |		MOVE.L	(A0+0xc2e),-(A7)
00020ed2 2f 28 0c 2a              |/( *    |		MOVE.L	(A0+0xc2a),-(A7)
00020ed6 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
00020edc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020ee0 48 78 00 00              |Hx      |		PEA.L	0x0
00020ee4 48 78 00 07              |Hx      |		PEA.L	0x7
00020ee8 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020eee de fc 00 18              |        |		ADDA.W	#0x0018,A7
00020ef2 52 87                    |R       |		ADDQ.L	#0x1,D7
00020ef4 68 bc                    |h       |		BVC	0x20eb2
00020ef6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020ef8 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00020efc 4e ba f9 d6              |N       |		JSR	0x208d4
00020f00 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020f02 20 14                    |        |		MOVE.L	(A4),D0
00020f04 d0 93                    |        |		ADD.L	(A3),D0
00020f06 28 80                    |(       |		MOVE.L	D0,(A4)
00020f08 4a 2e eb e4              |J.      |		TST.B	(A6-0x141c)
00020f0c 67 04                    |g       |		BEQ	0x20f12
00020f0e dc 93                    |        |		ADD.L	(A3),D6
00020f10 60 06                    |`       |		BRA	0x20f18
00020f12 20 13                    |        |		MOVE.L	(A3),D0
00020f14 ed 80                    |        |		ASL.L	#0x6,D0
00020f16 dc 80                    |        |		ADD.L	D0,D6
00020f18 2f 2e ff f2              |/.      |		MOVE.L	(A6-0xe),-(A7)
00020f1c 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00020f1e 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00020f20 be 97                    |        |		CMP.L	(A7),D7
00020f22 6e 00 00 84              |n       |		BGT	0x20fa8
00020f26 20 2e eb dc              | .      |		MOVE.L	(A6-0x1424),D0
00020f2a d0 87                    |        |		ADD.L	D7,D0
00020f2c 0c 80 00 00 00 7f        |        |		CMPI.L	#0x0000007f,D0
00020f32 63 02                    |c       |		BLS	0x20f36
00020f34 4e 4f                    |NO      |		TRAP	#15
00020f36 28 00                    |(       |		MOVE.L	D0,D4
00020f38 76 18                    |v       |		MOVEQ.L	#0x18,D3
00020f3a 4e b9 00 01 02 8c        |N       |		JSR	?muls_d3_d4
00020f40 41 ee eb c8              |A       |		LEA.L	(A6-0x1438),A0
00020f44 51 4f                    |QO      |		SUBQ.L	#0x8,A7
00020f46 22 4f                    |"O      |		MOVEA.L	A7,A1
00020f48 45 f0 48 3a              |E H:    |		LEA.L	(A0+D4.L+#0x3a),A2
00020f4c 70 07                    |p       |		MOVEQ.L	#0x07,D0
00020f4e 12 da                    |        |		MOVE.B	(A2)+,(A1)+
00020f50 51 c8 ff fc              |Q       |		DBF	D0,0x20f4e
00020f54 2f 39 00 02 19 90        |/9      |		MOVE.L	0x21990,-(A7)
00020f5a 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020f5e 48 78 00 00              |Hx      |		PEA.L	0x0
00020f62 48 78 00 07              |Hx      |		PEA.L	0x7
00020f66 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020f6c de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020f70 1e b0 48 36              |  H6    |		MOVE.B	(A0+D4.L+#0x36),(A7)
00020f74 1f 70 48 37 00 01        | pH7    |		MOVE.B	(A0+D4.L+#0x37),(A7+0x1)
00020f7a 1f 70 48 38 00 02        | pH8    |		MOVE.B	(A0+D4.L+#0x38),(A7+0x2)
00020f80 1f 70 48 39 00 03        | pH9    |		MOVE.B	(A0+D4.L+#0x39),(A7+0x3)
00020f86 2f 39 00 02 19 90        |/9      |		MOVE.L	0x21990,-(A7)
00020f8c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00020f90 48 78 00 00              |Hx      |		PEA.L	0x0
00020f94 48 78 00 03              |Hx      |		PEA.L	0x3
00020f98 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00020f9e de fc 00 14              |        |		ADDA.W	#0x0014,A7
00020fa2 52 87                    |R       |		ADDQ.L	#0x1,D7
00020fa4 68 00 ff 7a              |h  z    |		BVC	0x20f20
00020fa8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020faa 1e 82                    |        |		MOVE.B	D2,(A7)
00020fac 4e ba f9 26              |N  &    |		JSR	0x208d4
00020fb0 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00020fb2 20 2e eb dc              | .      |		MOVE.L	(A6-0x1424),D0
00020fb6 d0 ae ff f2              |        |		ADD.L	(A6-0xe),D0
00020fba 2d 40 eb dc              |-@      |		MOVE.L	D0,(A6-0x1424)
00020fbe 20 06                    |        |		MOVE.L	D6,D0
00020fc0 e0 88                    |        |		LSR.L	#0x8,D0
00020fc2 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00020fc8 63 02                    |c       |		BLS	0x20fcc
00020fca 4e 4f                    |NO      |		TRAP	#15
00020fcc 1d 40 eb ea              | @      |		MOVE.B	D0,(A6-0x1416)
00020fd0 20 06                    |        |		MOVE.L	D6,D0
00020fd2 02 80 00 00 00 ff        |        |		ANDI.L	#0x000000ff,D0
00020fd8 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
00020fde 63 02                    |c       |		BLS	0x20fe2
00020fe0 4e 4f                    |NO      |		TRAP	#15
00020fe2 1d 40 eb eb              | @      |		MOVE.B	D0,(A6-0x1415)
00020fe6 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
00020fec 1f 2e eb e4              | .      |		MOVE.B	(A6-0x141c),-(A7)
00020ff0 4e b9 00 01 04 6c        |N    l  |		JSR	ExpInputFlag(exp : Pointer; val : Word)
00020ff6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00020ff8 3e ae eb ea              |>       |		MOVE.W	(A6-0x1416),(A7)
00020ffc 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
00021002 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021006 48 78 00 00              |Hx      |		PEA.L	0x0
0002100a 48 78 00 01              |Hx      |		PEA.L	0x1
0002100e 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00021014 de fc 00 0e              |        |		ADDA.W	#0x000e,A7
00021018 2e 93                    |.       |		MOVE.L	(A3),(A7)
0002101a 53 97                    |S       |		SUBQ.L	#0x1,(A7)
0002101c 7e 00                    |~       |		MOVEQ.L	#0x00,D7
0002101e be 97                    |        |		CMP.L	(A7),D7
00021020 6e 40                    |n@      |		BGT	0x21062
00021022 20 14                    |        |		MOVE.L	(A4),D0
00021024 d0 87                    |        |		ADD.L	D7,D0
00021026 0c 80 00 00 00 ff        |        |		CMPI.L	#0x000000ff,D0
0002102c 63 02                    |c       |		BLS	0x21030
0002102e 4e 4f                    |NO      |		TRAP	#15
00021030 e7 80                    |        |		ASL.L	#0x3,D0
00021032 41 ee eb c8              |A       |		LEA.L	(A6-0x1438),A0
00021036 41 f0 08 00              |A       |		LEA.L	(A0+D0.L),A0
0002103a 2f 28 0c 2e              |/( .    |		MOVE.L	(A0+0xc2e),-(A7)
0002103e 2f 28 0c 2a              |/( *    |		MOVE.L	(A0+0xc2a),-(A7)
00021042 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
00021048 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002104c 48 78 00 00              |Hx      |		PEA.L	0x0
00021050 48 78 00 07              |Hx      |		PEA.L	0x7
00021054 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
0002105a de fc 00 18              |        |		ADDA.W	#0x0018,A7
0002105e 52 87                    |R       |		ADDQ.L	#0x1,D7
00021060 68 bc                    |h       |		BVC	0x2101e
00021062 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021064 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
00021068 4e ba f8 6a              |N  j    |		JSR	0x208d4
0002106c 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002106e 20 14                    |        |		MOVE.L	(A4),D0
00021070 d0 93                    |        |		ADD.L	(A3),D0
00021072 28 80                    |(       |		MOVE.L	D0,(A4)
00021074 4a 2e eb e4              |J.      |		TST.B	(A6-0x141c)
00021078 67 04                    |g       |		BEQ	0x2107e
0002107a dc 93                    |        |		ADD.L	(A3),D6
0002107c 60 06                    |`       |		BRA	0x21084
0002107e 20 13                    |        |		MOVE.L	(A3),D0
00021080 ed 80                    |        |		ASL.L	#0x6,D0
00021082 dc 80                    |        |		ADD.L	D0,D6
00021084 22 17                    |"       |		MOVE.L	(A7),D1
00021086 52 81                    |R       |		ADDQ.L	#0x1,D1
00021088 69 06                    |i       |		BVS	0x21090
0002108a 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002108c 60 00 fc 8c              |`       |		BRA	0x20d1a
00021090 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021092 20 17                    |        |		MOVE.L	(A7),D0
00021094 52 80                    |R       |		ADDQ.L	#0x1,D0
00021096 0c 80 00 00 00 07        |        |		CMPI.L	#0x00000007,D0
0002109c 6e 06                    |n       |		BGT	0x210a4
0002109e 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000210a0 60 00 fc 34              |`  4    |		BRA	0x20cd6
000210a4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000210a6 42 17                    |B       |		CLR.B	(A7)
000210a8 1f 02                    |        |		MOVE.B	D2,-(A7)
000210aa 4e ba f8 c4              |N       |		JSR	0x20970
000210ae 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000210b0 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
000210b4 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
000210b8 4e ba f8 b6              |N       |		JSR	0x20970
000210bc 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000210be 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000210c2 4e 5e                    |N^      |		UNLK	A6
000210c4 4e 75                    |Nu      |		RTS
000210c6 4e 56 fb 72              |NV r    |		LINK.W	A6,#0xfb72
000210ca bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
000210d2 4e 76                    |Nv      |
000210d4 de fc 00 6e              |   n    |		ADDA.W	#0x006e,A7
000210d8 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000210dc 43 ee ff f8              |C       |		LEA.L	(A6-0x8),A1
000210e0 45 ee 00 08              |E       |		LEA.L	(A6+0x8),A2
000210e4 47 ee fb e0              |G       |		LEA.L	(A6-0x420),A3
000210e8 49 f8 00 00              |I       |		LEA.L	0x0,A4
000210ec 22 bc 00 00 00 10        |"       |		MOVE.L	#0x00000010,(A1)
000210f2 2d 7c 00 00 00 01 ff fc  |-|      |		MOVE.L	#0x00000001,(A6-0x4)
000210fa 70 00                    |p       |		MOVEQ.L	#0x00,D0
000210fc 1d 40 fb f1              | @      |		MOVE.B	D0,(A6-0x40f)
00021100 3f 12                    |?       |		MOVE.W	(A2),-(A7)
00021102 1f 00                    |        |		MOVE.B	D0,-(A7)
00021104 4e b9 00 02 16 ea        |N       |		JSR	exp_LOAD_DIAG_COUNTER.TYP(Sw_2, Sw_1)
0002110a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002110c 3e 92                    |>       |		MOVE.W	(A2),(A7)
0002110e 1f 00                    |        |		MOVE.B	D0,-(A7)
00021110 4e b9 00 02 17 36        |N    6  |		JSR	exp_LOAD_DIAG_COUNTER.VAL(Sw_2, Sw_1)
00021116 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021118 3e 92                    |>       |		MOVE.W	(A2),(A7)
0002111a 3f 12                    |?       |		MOVE.W	(A2),-(A7)
0002111c 1f 00                    |        |		MOVE.B	D0,-(A7)
0002111e 4e b9 00 02 16 5c        |N    \  |		JSR	exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1)
00021124 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021126 3e 92                    |>       |		MOVE.W	(A2),(A7)
00021128 4e b9 00 02 16 a4        |N       |		JSR	exp_LOAD_COUNTER.SEQ(Sw_2)
0002112e 3e 92                    |>       |		MOVE.W	(A2),(A7)
00021130 1f 00                    |        |		MOVE.B	D0,-(A7)
00021132 4e b9 00 02 17 5a        |N    Z  |		JSR	exp_LOAD_WCS_ADDRESS.IOC(Sw_2, Sw_1)
00021138 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002113a 41 fa f0 c6 70 08 3f 20  |A   p ? |		PUSHTXT	"LOAD_CONTROL_STORE"
00021142 51 c8 ff fc              |Q       |
00021146 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021148 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002114c 3f 3c 00 01              |?<      |		MOVE.W	#0x0001,-(A7)
00021150 3f 3c 00 12              |?<      |		MOVE.W	#0x0012,-(A7)
00021154 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
0002115a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002115c 42 17                    |B       |		CLR.B	(A7)
0002115e 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00021162 4e ba f5 cc              |N       |		JSR	0x20730
00021166 de fc 00 16              |        |		ADDA.W	#0x0016,A7
0002116a 2e ae 00 0a              |.       |		MOVE.L	(A6+0xa),(A7)
0002116e 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00021170 70 00                    |p       |		MOVEQ.L	#0x00,D0
00021172 b0 97                    |        |		CMP.L	(A7),D0
00021174 6f 06                    |o       |		BLE	0x2117c
00021176 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021178 60 00 02 86              |`       |		BRA	0x21400
0002117c 2f 00                    |/       |		MOVE.L	D0,-(A7)
0002117e 2f 2e 00 10              |/.      |		MOVE.L	(A6+0x10),-(A7)
00021182 32 2e 00 0e              |2.      |		MOVE.W	(A6+0xe),D1
00021186 48 c1                    |H       |		EXTW.L	D1
00021188 d2 80                    |        |		ADD.L	D0,D1
0002118a 0c 81 00 00 40 00        |    @   |		CMPI.L	#0x00004000,D1
00021190 63 02                    |c       |		BLS	0x21194
00021192 4e 4f                    |NO      |		TRAP	#15
00021194 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021196 42 67                    |Bg      |		CLR.W	-(A7)
00021198 3f 3c 02 00              |?<      |		MOVE.W	#0x0200,-(A7)
0002119c 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
000211a0 41 ee fb f8              |A       |		LEA.L	(A6-0x408),A0
000211a4 2f 08                    |/       |		MOVE.L	A0,-(A7)
000211a6 48 6e fb f0              |Hn      |		PEA.L	(A6-0x410)
000211aa 4e b9 00 01 03 84        |N       |		JSR	ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000211b0 de fc 00 14              |        |		ADDA.W	#0x0014,A7
000211b4 28 00                    |(       |		MOVE.L	D0,D4
000211b6 76 20                    |v       |		MOVEQ.L	#0x20,D3
000211b8 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
000211be 0c 83 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D3
000211c4 66 22                    |f"      |		BNE	0x211e8
000211c6 3f 3a f0 3a              |?: :    |		MOVE.W	0x20202,-(A7)
000211ca 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000211cc 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000211d0 3f 3c 00 01              |?<      |		MOVE.W	#0x0001,-(A7)
000211d4 3f 3c 00 02              |?<      |		MOVE.W	#0x0002,-(A7)
000211d8 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
000211de 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000211e0 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000211e6 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
000211e8 7c 00                    ||       |		MOVEQ.L	#0x00,D6
000211ea 2f 2e ff fc              |/.      |		MOVE.L	(A6-0x4),-(A7)
000211ee 7a 00                    |z       |		MOVEQ.L	#0x00,D5
000211f0 ba 97                    |        |		CMP.L	(A7),D5
000211f2 6e 00 01 fe              |n       |		BGT	0x213f2
000211f6 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000211f8 53 97                    |S       |		SUBQ.L	#0x1,(A7)
000211fa 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000211fc be 97                    |        |		CMP.L	(A7),D7
000211fe 6e 38                    |n8      |		BGT	0x21238
00021200 20 06                    |        |		MOVE.L	D6,D0
00021202 d0 87                    |        |		ADD.L	D7,D0
00021204 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
0002120a 63 02                    |c       |		BLS	0x2120e
0002120c 4e 4f                    |NO      |		TRAP	#15
0002120e eb 80                    |        |		ASL.L	#0x5,D0
00021210 20 4b                    | K      |		MOVEA.L	A3,A0
00021212 2f 30 08 1c              |/0      |		MOVE.L	(A0+D0.L+#0x1c),-(A7)
00021216 2f 30 08 18              |/0      |		MOVE.L	(A0+D0.L+#0x18),-(A7)
0002121a 2f 39 00 02 19 8c        |/9      |		MOVE.L	0x2198c,-(A7)
00021220 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021224 48 54                    |HT      |		PEA.L	(A4)
00021226 48 78 00 07              |Hx      |		PEA.L	0x7
0002122a 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00021230 de fc 00 18              |        |		ADDA.W	#0x0018,A7
00021234 52 87                    |R       |		ADDQ.L	#0x1,D7
00021236 68 c4                    |h       |		BVC	0x211fc
00021238 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002123a 42 17                    |B       |		CLR.B	(A7)
0002123c 4e ba f6 96              |N       |		JSR	0x208d4
00021240 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021242 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00021244 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00021246 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021248 be 97                    |        |		CMP.L	(A7),D7
0002124a 6e 38                    |n8      |		BGT	0x21284
0002124c 20 06                    |        |		MOVE.L	D6,D0
0002124e d0 87                    |        |		ADD.L	D7,D0
00021250 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
00021256 63 02                    |c       |		BLS	0x2125a
00021258 4e 4f                    |NO      |		TRAP	#15
0002125a eb 80                    |        |		ASL.L	#0x5,D0
0002125c 20 4b                    | K      |		MOVEA.L	A3,A0
0002125e 2f 30 08 24              |/0 $    |		MOVE.L	(A0+D0.L+#0x24),-(A7)
00021262 2f 30 08 20              |/0      |		MOVE.L	(A0+D0.L+#0x20),-(A7)
00021266 2f 39 00 02 19 90        |/9      |		MOVE.L	0x21990,-(A7)
0002126c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021270 48 54                    |HT      |		PEA.L	(A4)
00021272 48 78 00 07              |Hx      |		PEA.L	0x7
00021276 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
0002127c de fc 00 18              |        |		ADDA.W	#0x0018,A7
00021280 52 87                    |R       |		ADDQ.L	#0x1,D7
00021282 68 c4                    |h       |		BVC	0x21248
00021284 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021286 1e bc 00 01              |        |		MOVE.B	#0x01,(A7)
0002128a 4e ba f6 48              |N  H    |		JSR	0x208d4
0002128e 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021290 2f 11                    |/       |		MOVE.L	(A1),-(A7)
00021292 53 97                    |S       |		SUBQ.L	#0x1,(A7)
00021294 7e 00                    |~       |		MOVEQ.L	#0x00,D7
00021296 be 97                    |        |		CMP.L	(A7),D7
00021298 6e 38                    |n8      |		BGT	0x212d2
0002129a 20 06                    |        |		MOVE.L	D6,D0
0002129c d0 87                    |        |		ADD.L	D7,D0
0002129e 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
000212a4 63 02                    |c       |		BLS	0x212a8
000212a6 4e 4f                    |NO      |		TRAP	#15
000212a8 eb 80                    |        |		ASL.L	#0x5,D0
000212aa 20 4b                    | K      |		MOVEA.L	A3,A0
000212ac 2f 30 08 2c              |/0 ,    |		MOVE.L	(A0+D0.L+#0x2c),-(A7)
000212b0 2f 30 08 28              |/0 (    |		MOVE.L	(A0+D0.L+#0x28),-(A7)
000212b4 2f 39 00 02 19 94        |/9      |		MOVE.L	0x21994,-(A7)
000212ba 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000212be 48 54                    |HT      |		PEA.L	(A4)
000212c0 48 78 00 07              |Hx      |		PEA.L	0x7
000212c4 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
000212ca de fc 00 18              |        |		ADDA.W	#0x0018,A7
000212ce 52 87                    |R       |		ADDQ.L	#0x1,D7
000212d0 68 c4                    |h       |		BVC	0x21296
000212d2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000212d4 1e bc 00 02              |        |		MOVE.B	#0x02,(A7)
000212d8 4e ba f5 fa              |N       |		JSR	0x208d4
000212dc 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000212de 2f 11                    |/       |		MOVE.L	(A1),-(A7)
000212e0 53 97                    |S       |		SUBQ.L	#0x1,(A7)
000212e2 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000212e4 be 97                    |        |		CMP.L	(A7),D7
000212e6 6e 00 00 a8              |n       |		BGT	0x21390
000212ea 20 06                    |        |		MOVE.L	D6,D0
000212ec d0 87                    |        |		ADD.L	D7,D0
000212ee 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
000212f4 63 02                    |c       |		BLS	0x212f8
000212f6 4e 4f                    |NO      |		TRAP	#15
000212f8 eb 80                    |        |		ASL.L	#0x5,D0
000212fa 20 4b                    | K      |		MOVEA.L	A3,A0
000212fc 42 81                    |B       |		CLR.L	D1
000212fe 12 30 08 28              | 0 (    |		MOVE.B	(A0+D0.L+#0x28),D1
00021302 02 41 00 03              | A      |		ANDI.W	#0x0003,D1
00021306 ed 41                    | A      |		ASL.W	#0x6,D1
00021308 42 82                    |B       |		CLR.L	D2
0002130a 14 30 08 29              | 0 )    |		MOVE.B	(A0+D0.L+#0x29),D2
0002130e 02 42 00 03              | B      |		ANDI.W	#0x0003,D2
00021312 e9 42                    | B      |		ASL.W	#0x4,D2
00021314 d4 41                    | A      |		ADD.W	D1,D2
00021316 42 81                    |B       |		CLR.L	D1
00021318 12 30 08 2a              | 0 *    |		MOVE.B	(A0+D0.L+#0x2a),D1
0002131c 02 41 00 03              | A      |		ANDI.W	#0x0003,D1
00021320 e5 41                    | A      |		ASL.W	#0x2,D1
00021322 d2 42                    | B      |		ADD.W	D2,D1
00021324 42 82                    |B       |		CLR.L	D2
00021326 14 30 08 2b              | 0 +    |		MOVE.B	(A0+D0.L+#0x2b),D2
0002132a 02 42 00 03              | B      |		ANDI.W	#0x0003,D2
0002132e d4 41                    | A      |		ADD.W	D1,D2
00021330 1d 42 fb f6              | B      |		MOVE.B	D2,(A6-0x40a)
00021334 42 81                    |B       |		CLR.L	D1
00021336 12 30 08 2c              | 0 ,    |		MOVE.B	(A0+D0.L+#0x2c),D1
0002133a 02 41 00 03              | A      |		ANDI.W	#0x0003,D1
0002133e ed 41                    | A      |		ASL.W	#0x6,D1
00021340 42 82                    |B       |		CLR.L	D2
00021342 14 30 08 2d              | 0 -    |		MOVE.B	(A0+D0.L+#0x2d),D2
00021346 02 42 00 03              | B      |		ANDI.W	#0x0003,D2
0002134a e9 42                    | B      |		ASL.W	#0x4,D2
0002134c d4 41                    | A      |		ADD.W	D1,D2
0002134e 42 81                    |B       |		CLR.L	D1
00021350 12 30 08 2e              | 0 .    |		MOVE.B	(A0+D0.L+#0x2e),D1
00021354 02 41 00 03              | A      |		ANDI.W	#0x0003,D1
00021358 e5 41                    | A      |		ASL.W	#0x2,D1
0002135a d2 42                    | B      |		ADD.W	D2,D1
0002135c 42 82                    |B       |		CLR.L	D2
0002135e 14 30 08 2f              | 0 /    |		MOVE.B	(A0+D0.L+#0x2f),D2
00021362 02 42 00 03              | B      |		ANDI.W	#0x0003,D2
00021366 d4 41                    | A      |		ADD.W	D1,D2
00021368 1d 42 fb f7              | B      |		MOVE.B	D2,(A6-0x409)
0002136c 3f 2e fb f6              |?.      |		MOVE.W	(A6-0x40a),-(A7)
00021370 2f 39 00 02 19 9c        |/9      |		MOVE.L	0x2199c,-(A7)
00021376 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002137a 48 54                    |HT      |		PEA.L	(A4)
0002137c 48 78 00 01              |Hx      |		PEA.L	0x1
00021380 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
00021386 de fc 00 12              |        |		ADDA.W	#0x0012,A7
0002138a 52 87                    |R       |		ADDQ.L	#0x1,D7
0002138c 68 00 ff 56              |h  V    |		BVC	0x212e4
00021390 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021392 1e bc 00 04              |        |		MOVE.B	#0x04,(A7)
00021396 4e ba f5 3c              |N  <    |		JSR	0x208d4
0002139a 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002139c 2f 11                    |/       |		MOVE.L	(A1),-(A7)
0002139e 53 97                    |S       |		SUBQ.L	#0x1,(A7)
000213a0 7e 00                    |~       |		MOVEQ.L	#0x00,D7
000213a2 be 97                    |        |		CMP.L	(A7),D7
000213a4 6e 38                    |n8      |		BGT	0x213de
000213a6 20 06                    |        |		MOVE.L	D6,D0
000213a8 d0 87                    |        |		ADD.L	D7,D0
000213aa 0c 80 00 00 00 1f        |        |		CMPI.L	#0x0000001f,D0
000213b0 63 02                    |c       |		BLS	0x213b4
000213b2 4e 4f                    |NO      |		TRAP	#15
000213b4 eb 80                    |        |		ASL.L	#0x5,D0
000213b6 20 4b                    | K      |		MOVEA.L	A3,A0
000213b8 2f 30 08 34              |/0 4    |		MOVE.L	(A0+D0.L+#0x34),-(A7)
000213bc 2f 30 08 30              |/0 0    |		MOVE.L	(A0+D0.L+#0x30),-(A7)
000213c0 2f 39 00 02 19 98        |/9      |		MOVE.L	0x21998,-(A7)
000213c6 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000213ca 48 54                    |HT      |		PEA.L	(A4)
000213cc 48 78 00 07              |Hx      |		PEA.L	0x7
000213d0 4e b9 00 01 04 66        |N    f  |		JSR	ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
000213d6 de fc 00 18              |        |		ADDA.W	#0x0018,A7
000213da 52 87                    |R       |		ADDQ.L	#0x1,D7
000213dc 68 c4                    |h       |		BVC	0x213a2
000213de 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000213e0 1e bc 00 03              |        |		MOVE.B	#0x03,(A7)
000213e4 4e ba f4 ee              |N       |		JSR	0x208d4
000213e8 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000213ea dc 91                    |        |		ADD.L	(A1),D6
000213ec 52 85                    |R       |		ADDQ.L	#0x1,D5
000213ee 68 00 fe 00              |h       |		BVC	0x211f0
000213f2 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213f4 20 17                    |        |		MOVE.L	(A7),D0
000213f6 52 80                    |R       |		ADDQ.L	#0x1,D0
000213f8 69 06                    |i       |		BVS	0x21400
000213fa 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000213fc 60 00 fd 74              |`  t    |		BRA	0x21172
00021400 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
00021402 42 17                    |B       |		CLR.B	(A7)
00021404 1f 3c 00 04              | <      |		MOVE.B	#0x04,-(A7)
00021408 4e ba f5 66              |N  f    |		JSR	0x20970
0002140c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002140e 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021412 4e 5e                    |N^      |		UNLK	A6
00021414 4e 75                    |Nu      |		RTS
00021416 4e 56 ff 84              |NV      |		LINK.W	A6,#0xff84
0002141a bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00021422 4e 76                    |Nv      |
00021424 de fc 00 6e              |   n    |		ADDA.W	#0x006e,A7
00021428 48 e7 ff f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002142c 45 ee ff f2              |E       |		LEA.L	(A6-0xe),A2
00021430 47 f9 00 01 02 c4        |G       |		LEA.L	?fill_str(WORD, WORD, PTR),A3
00021436 49 ee 00 0c              |I       |		LEA.L	(A6+0xc),A4
0002143a 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002143c 74 05                    |t       |		MOVEQ.L	#0x05,D2
0002143e 7a 02                    |z       |		MOVEQ.L	#0x02,D5
00021440 7c 2a                    ||*      |		MOVEQ.L	#0x2a,D6
00021442 7e 29                    |~)      |		MOVEQ.L	#0x29,D7
00021444 2f 2e 00 0e              |/.      |		MOVE.L	(A6+0xe),-(A7)
00021448 48 54                    |HT      |		PEA.L	(A4)
0002144a 48 52                    |HR      |		PEA.L	(A2)
0002144c 48 6e ff f8              |Hn      |		PEA.L	(A6-0x8)
00021450 48 6e ff fc              |Hn      |		PEA.L	(A6-0x4)
00021454 4e ba ee a6              |N       |		JSR	0x202fc
00021458 de fc 00 12              |        |		ADDA.W	#0x0012,A7
0002145c 1e 82                    |        |		MOVE.B	D2,(A7)
0002145e 1f 05                    |        |		MOVE.B	D5,-(A7)
00021460 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
00021466 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021468 4a 14                    |J       |		TST.B	(A4)
0002146a 66 06                    |f       |		BNE	0x21472
0002146c 4a 2e 00 08              |J.      |		TST.B	(A6+0x8)
00021470 67 44                    |gD      |		BEQ	0x214b6
00021472 9e c6                    |        |		SUBA.W	D6,A7
00021474 20 4f 43 fa ed 8c 70 28  | OC   p(|		PUSHTXT	"Loading Register Files and Dispatch Rams_"
0002147c 10 d9 51 c8 ff fc        |  Q     |
00021482 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021484 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021488 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002148a 3f 07                    |?       |		MOVE.W	D7,-(A7)
0002148c 4e 93                    |N       |		JSR	(A3)
0002148e 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021490 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
00021496 de c6                    |        |		ADDA.W	D6,A7
00021498 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002149a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002149c 3f 3c 00 19              |?<      |		MOVE.W	#0x0019,-(A7)
000214a0 4e ba f7 74              |N  t    |		JSR	0x20c16
000214a4 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000214a6 20 4f 43 fa ed 84 70 04  | OC   p |		PUSHTXT	" [OK]"
000214ae 10 d9 51 c8 ff fc        |  Q     |
000214b4 60 48                    |`H      |		BRA	0x214fe
000214b6 4a 2e 00 0a              |J.      |		TST.B	(A6+0xa)
000214ba 67 5a                    |gZ      |		BEQ	0x21516
000214bc 9e fc 00 18              |        |		SUBA.W	#0x0018,A7
000214c0 20 4f 43 fa ed 70 70 16  | OC  pp |		PUSHTXT	"Loading Register Files_"
000214c8 10 d9 51 c8 ff fc        |  Q     |
000214ce 59 4f                    |YO      |		SUBQ.L	#0x4,A7
000214d0 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
000214d4 3f 01                    |?       |		MOVE.W	D1,-(A7)
000214d6 3f 3c 00 17              |?<      |		MOVE.W	#0x0017,-(A7)
000214da 4e 93                    |N       |		JSR	(A3)
000214dc 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000214de 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
000214e4 de fc 00 18              |        |		ADDA.W	#0x0018,A7
000214e8 2e 92                    |.       |		MOVE.L	(A2),(A7)
000214ea 3f 01                    |?       |		MOVE.W	D1,-(A7)
000214ec 4e ba f4 d2              |N       |		JSR	0x209c0
000214f0 20 4f 43 fa ed 58 70 04  | OC  Xp |		PUSHTXT	" [OK]"
000214f8 10 d9 51 c8 ff fc        |  Q     |
000214fe 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021500 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021504 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021506 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021508 4e 93                    |N       |		JSR	(A3)
0002150a 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002150c 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
00021512 de fc 00 0a              |        |		ADDA.W	#0x000a,A7
00021516 4a 14                    |J       |		TST.B	(A4)
00021518 67 68                    |gh      |		BEQ	0x21582
0002151a 41 fa ed 4c 70 0a 3f 20  |A  Lp ? |		PUSHTXT	"Loading Control Store_"
00021522 51 c8 ff fc              |Q       |
00021526 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021528 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002152c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002152e 3f 3c 00 16              |?<      |		MOVE.W	#0x0016,-(A7)
00021532 4e 93                    |N       |		JSR	(A3)
00021534 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021536 4e b9 00 01 03 d8        |N       |		JSR	WriteConsoleString(str : String)
0002153c de fc 00 16              |        |		ADDA.W	#0x0016,A7
00021540 2e 92                    |.       |		MOVE.L	(A2),(A7)
00021542 3f 07                    |?       |		MOVE.W	D7,-(A7)
00021544 28 2e ff f8              |(.      |		MOVE.L	(A6-0x8),D4
00021548 76 20                    |v       |		MOVEQ.L	#0x20,D3
0002154a 4e b9 00 01 02 94        |N       |		JSR	?divs_d3_d4
00021550 2f 04                    |/       |		MOVE.L	D4,-(A7)
00021552 3f 2e ff fc              |?.      |		MOVE.W	(A6-0x4),-(A7)
00021556 4e ba fb 6e              |N  n    |		JSR	0x210c6
0002155a 5c 4f                    |\O      |		ADDQ.L	#0x6,A7
0002155c 20 4f 43 fa ed 08 70 04  | OC   p |		PUSHTXT	" [OK]"
00021564 10 d9 51 c8 ff fc        |  Q     |
0002156a 59 4f                    |YO      |		SUBQ.L	#0x4,A7
0002156c 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
00021570 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021572 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021574 4e 93                    |N       |		JSR	(A3)
00021576 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021578 4e b9 00 01 03 e0        |N       |		JSR	WriteConsoleStringCrLf(str : String)
0002157e de fc 00 0a              |        |		ADDA.W	#0x000a,A7
00021582 1f 02                    |        |		MOVE.B	D2,-(A7)
00021584 1f 05                    |        |		MOVE.B	D5,-(A7)
00021586 4e b9 00 01 04 8a        |N       |		JSR	DiProcCmd(board : Byte; cmd : Byte)
0002158c 2e 92                    |.       |		MOVE.L	(A2),(A7)
0002158e 4e ba f0 a2              |N       |		JSR	0x20632
00021592 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021594 42 17                    |B       |		CLR.B	(A7)
00021596 1f 05                    |        |		MOVE.B	D5,-(A7)
00021598 48 78 00 01              |Hx      |		PEA.L	0x1
0002159c 48 6e ff f6              |Hn      |		PEA.L	(A6-0xa)
000215a0 48 52                    |HR      |		PEA.L	(A2)
000215a2 4e b9 00 01 03 8c        |N       |		JSR	CloseFile(a : L; VAR status : B; VAR file : File)
000215a8 de fc 00 10              |        |		ADDA.W	#0x0010,A7
000215ac 4c df 1f ff              |L       |		MOVEM.L	(A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000215b0 4e 5e                    |N^      |		UNLK	A6
000215b2 4e 75                    |Nu      |		RTS
000215b4					START:
000215b4 4f fa 00 08              |O       |		LEA.L	MAIN,A7
000215b8 4e f9 00 01 02 80        |N       |		JMP	?start_program
000215be					MAIN:
000215be 41 f9 00 02 19 a6        |A       |		LEA.L	0x219a6,A0
000215c4 43 f9 00 02 19 aa        |C       |		LEA.L	0x219aa,A1
000215ca 45 f9 00 01 05 26        |E    &  |		LEA.L	IPC_GetBool() : Bool,A2
000215d0 47 f9 00 02 19 ab        |G       |		LEA.L	0x219ab,A3
000215d6 49 f9 00 02 19 ac        |I       |		LEA.L	0x219ac,A4
000215dc 4e b9 00 01 03 98        |N       |		JSR	FSCALL_10398
000215e2 48 78 00 05              |Hx      |		PEA.L	0x5
000215e6 4e b9 00 01 04 d8        |N       |		JSR	ExpInit(a : Long)
000215ec 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000215ee 42 17                    |B       |		CLR.B	(A7)
000215f0 4e b9 00 01 04 d2        |N       |		JSR	SetExpInitDone(a : Byte)
000215f6 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000215f8 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
000215fe 48 50                    |HP      |		PEA.L	(A0)
00021600 4e b9 00 01 05 2c        |N    ,  |		JSR	IPC_GetString(VAR retval : String)
00021606 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021608 48 51                    |HQ      |		PEA.L	(A1)
0002160a 4e 92                    |N       |		JSR	(A2)
0002160c 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002160e 48 53                    |HS      |		PEA.L	(A3)
00021610 4e 92                    |N       |		JSR	(A2)
00021612 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021614 48 54                    |HT      |		PEA.L	(A4)
00021616 4e 92                    |N       |		JSR	(A2)
00021618 58 4f                    |XO      |		ADDQ.L	#0x4,A7
0002161a 4e b9 00 01 05 1a        |N       |		JSR	IPC_GetEnd(void)
00021620 2f 10                    |/       |		MOVE.L	(A0),-(A7)
00021622 1f 11                    |        |		MOVE.B	(A1),-(A7)
00021624 1f 13                    |        |		MOVE.B	(A3),-(A7)
00021626 1f 14                    |        |		MOVE.B	(A4),-(A7)
00021628 4e ba fd ec              |N       |		JSR	0x21416
0002162c de fc 00 0a              |        |		ADDA.W	#0x000a,A7
00021630 4e b9 00 01 05 38        |N    8  |		JSR	IPC_Init(void)
00021636 1f 3c 00 01              | <      |		MOVE.B	#0x01,-(A7)
0002163a 4e b9 00 01 05 02        |N       |		JSR	IPC_PutBool(a : Bool)
00021640 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021642 4e b9 00 01 05 14        |N       |		JSR	IPC_PutEnd(void)
00021648 42 27                    |B'      |		CLR.B	-(A7)
0002164a 48 78 00 01              |Hx      |		PEA.L	0x1
0002164e 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(Byte, String)
00021654 5c 4f 4e b9              |\ON     |		.XXX[0x4]
00021658 00 01 02 84              |        |		.XXX[0x4]
0002165c					exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1):
0002165c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021662 00 0e                    |        |		.CONST	0x000e			; Stack-delta
00021664 10 4c 4f 41 44 5f 43 4f  | LOAD_CO|		.TXT	16,'LOAD_COUNTER.FIU'
00021675 00                       |        |		.CONST	0x0
00021676 03                       |        |		.CONST	0x3			; DIPROC address
00021677 00                       |        |		.CONST	0x0			; Output Parameters
00021678 03                       |        |		.CONST	0x3			; Input Parameters
00021679 01                       |        |		.CONST	0x1			; In arg [2]
0002167a 01                       |        |		.CONST	0x1			; In arg [2]
0002167b 00                       |        |		.CONST	0x0			; In arg [1]
0002167c					exp_PREP_LOAD_DISPATCH_RAMS.SEQ():
0002167c 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021682 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021684 1b 50 52 45 50 5f 4c 4f  | PREP_LO|		.TXT	27,'PREP_LOAD_DISPATCH_RAMS.SEQ'
000216a0 00                       |        |		.CONST	0x0
000216a1 02                       |        |		.CONST	0x2			; DIPROC address
000216a2 00                       |        |		.CONST	0x0			; Output Parameters
000216a3 00                       |        |		.CONST	0x0			; Input Parameters
000216a4					exp_LOAD_COUNTER.SEQ(Sw_2):
000216a4 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216aa 00 0a                    |        |		.CONST	0x000a			; Stack-delta
000216ac 10 4c 4f 41 44 5f 43 4f  | LOAD_CO|		.TXT	16,'LOAD_COUNTER.SEQ'
000216bd 00                       |        |		.CONST	0x0
000216be 02                       |        |		.CONST	0x2			; DIPROC address
000216bf 00                       |        |		.CONST	0x0			; Output Parameters
000216c0 01                       |        |		.CONST	0x1			; Input Parameters
000216c1 01                       |        |		.CONST	0x1			; In arg [2]
000216c2					exp_PREP_LOAD_REGISTER_FILE.TYP():
000216c2 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216c8 00 08                    |        |		.CONST	0x0008			; Stack-delta
000216ca 1b 50 52 45 50 5f 4c 4f  | PREP_LO|		.TXT	27,'PREP_LOAD_REGISTER_FILE.TYP'
000216e6 00                       |        |		.CONST	0x0
000216e7 06                       |        |		.CONST	0x6			; DIPROC address
000216e8 00                       |        |		.CONST	0x0			; Output Parameters
000216e9 00                       |        |		.CONST	0x0			; Input Parameters
000216ea					exp_LOAD_DIAG_COUNTER.TYP(Sw_2, Sw_1):
000216ea 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
000216f0 00 0c                    |        |		.CONST	0x000c			; Stack-delta
000216f2 15 4c 4f 41 44 5f 44 49  | LOAD_DI|		.TXT	21,'LOAD_DIAG_COUNTER.TYP'
00021708 00                       |        |		.CONST	0x0
00021709 06                       |        |		.CONST	0x6			; DIPROC address
0002170a 00                       |        |		.CONST	0x0			; Output Parameters
0002170b 02                       |        |		.CONST	0x2			; Input Parameters
0002170c 01                       |        |		.CONST	0x1			; In arg [2]
0002170d 00                       |        |		.CONST	0x0			; In arg [1]
0002170e					exp_PREP_LOAD_REGISTER_FILE.VAL():
0002170e 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021714 00 08                    |        |		.CONST	0x0008			; Stack-delta
00021716 1b 50 52 45 50 5f 4c 4f  | PREP_LO|		.TXT	27,'PREP_LOAD_REGISTER_FILE.VAL'
00021732 00                       |        |		.CONST	0x0
00021733 07                       |        |		.CONST	0x7			; DIPROC address
00021734 00                       |        |		.CONST	0x0			; Output Parameters
00021735 00                       |        |		.CONST	0x0			; Input Parameters
00021736					exp_LOAD_DIAG_COUNTER.VAL(Sw_2, Sw_1):
00021736 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
0002173c 00 0c                    |        |		.CONST	0x000c			; Stack-delta
0002173e 15 4c 4f 41 44 5f 44 49  | LOAD_DI|		.TXT	21,'LOAD_DIAG_COUNTER.VAL'
00021754 00                       |        |		.CONST	0x0
00021755 07                       |        |		.CONST	0x7			; DIPROC address
00021756 00                       |        |		.CONST	0x0			; Output Parameters
00021757 02                       |        |		.CONST	0x2			; Input Parameters
00021758 01                       |        |		.CONST	0x1			; In arg [2]
00021759 00                       |        |		.CONST	0x0			; In arg [1]
0002175a					exp_LOAD_WCS_ADDRESS.IOC(Sw_2, Sw_1):
0002175a 4e b9 00 01 05 68        |N    h  |		JSR	Run_Experiment()
00021760 00 0c                    |        |		.CONST	0x000c			; Stack-delta
00021762 14 4c 4f 41 44 5f 57 43  | LOAD_WC|		.TXT	20,'LOAD_WCS_ADDRESS.IOC'
00021777 00                       |        |		.CONST	0x0
00021778 04                       |        |		.CONST	0x4			; DIPROC address
00021779 00                       |        |		.CONST	0x0			; Output Parameters
0002177a 02                       |        |		.CONST	0x2			; Input Parameters
0002177b 01                       |        |		.CONST	0x1			; In arg [2]
0002177c 00                       |        |		.CONST	0x0			; In arg [1]
0002177d 00                       |        |		.PAD	0x0
0002177e 57 6f 72 64 73 20 65 72  |Words er|		.TXT	'Words error :_'
0002178c					ProgramFailureHandler():
0002178c 4e 56 ff d2              |NV      |		LINK.W	A6,#0xffd2
00021790 bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00021798 4e 76                    |Nv      |
0002179a de fc 00 2c              |   ,    |		ADDA.W	#0x002c,A7
0002179e 48 e7 80 80              |H       |		MOVEM.L	A0+D0,-(A7)
000217a2 41 fa ff e8 70 06 3f 20  |A   p ? |		PUSHTXT	"Words error :_"
000217aa 51 c8 ff fc              |Q       |
000217ae 1f 3c 00 03              | <      |		MOVE.B	#0x03,-(A7)
000217b2 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000217b4 48 6f 00 0a              |Ho      |		PEA.L	(A7+0xa)
000217b8 3f 3c 00 01              |?<      |		MOVE.W	#0x0001,-(A7)
000217bc 3f 3c 00 0e              |?<      |		MOVE.W	#0x000e,-(A7)
000217c0 4e b9 00 01 02 c4        |N       |		JSR	?fill_str(WORD, WORD, PTR)
000217c6 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000217c8 10 2e 00 08              | .      |		MOVE.B	(A6+0x8),D0
000217cc 48 80                    |H       |		EXTB.W	D0
000217ce 48 c0                    |H       |		EXTW.L	D0
000217d0 2f 00                    |/       |		MOVE.L	D0,-(A7)
000217d2 4e b9 00 01 02 e4        |N       |		JSR	Long2String(a : Long) : String
000217d8 58 4f                    |XO      |		ADDQ.L	#0x4,A7
000217da 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000217e0 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000217e2 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(Byte, String)
000217e8 de fc 00 14 4c df 01 01  |    L   |		.XXX[0x8]
000217f0 4e 5e 4e 75              |N^Nu    |		.XXX[0x4]
000217f4 42 6f 61 72 64 20 20 20  |Board   |		.TXT	'Board      :_'
00021801 20                       |        |		.XXX[0x1]
00021802 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment :_'
0002180f 20                       |        |		.XXX[0x1]
00021810 53 74 61 74 75 73 20 20  |Status  |		.TXT	'Status     :_'
0002181d 20                       |        |		.XXX[0x1]
0002181e 45 78 70 65 72 69 6d 65  |Experime|		.TXT	'Experiment error :'
00021830 46 61 74 61 6c 20 65 78  |Fatal ex|		.TXT	'Fatal experiment error.'
00021847 20                       |        |		.XXX[0x1]
00021848					ExperimentFailureHandler():
00021848 4e 56 ff 8c              |NV      |		LINK.W	A6,#0xff8c
0002184c bf d5 62 06 44 fc 00 02  |  b D   |		STACKCHECK
00021854 4e 76                    |Nv      |
00021856 de fc 00 74              |   t    |		ADDA.W	#0x0074,A7
0002185a 48 e7 fc f8              |H       |		MOVEM.L	A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
0002185e 47 f9 00 01 02 c4        |G       |		LEA.L	?fill_str(WORD, WORD, PTR),A3
00021864 49 f9 00 01 03 e0        |I       |		LEA.L	WriteConsoleStringCrLf(str : String),A4
0002186a 72 01                    |r       |		MOVEQ.L	#0x01,D1
0002186c 74 0d                    |t       |		MOVEQ.L	#0x0d,D2
0002186e 76 1e                    |v       |		MOVEQ.L	#0x1e,D3
00021870 78 12                    |x       |		MOVEQ.L	#0x12,D4
00021872 7a 0e                    |z       |		MOVEQ.L	#0x0e,D5
00021874 4e b9 00 01 03 dc        |N       |		JSR	WriteConsoleCrLf(void)
0002187a 41 fa ff b4 70 08 3f 20  |A   p ? |		PUSHTXT	"Experiment error :"
00021882 51 c8 ff fc              |Q       |
00021886 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021888 48 6f 00 04              |Ho      |		PEA.L	(A7+0x4)
0002188c 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002188e 3f 04                    |?       |		MOVE.W	D4,-(A7)
00021890 4e 93                    |N       |		JSR	(A3)
00021892 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021894 4e 94                    |N       |		JSR	(A4)
00021896 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021898 20 4f 43 fa ff 58 70 0c  | OC  Xp |		PUSHTXT	"Board      :_"
000218a0 10 d9 51 c8 ff fc        |  Q     |
000218a6 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000218a8 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
000218ac 3f 01                    |?       |		MOVE.W	D1,-(A7)
000218ae 3f 02                    |?       |		MOVE.W	D2,-(A7)
000218b0 4e 93                    |N       |		JSR	(A3)
000218b2 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000218b4 1e ae 00 0e              |        |		MOVE.B	(A6+0xe),(A7)
000218b8 4e b9 00 01 04 9c        |N       |		JSR	BoardName(address : B) : String
000218be 54 4f                    |TO      |		ADDQ.L	#0x2,A7
000218c0 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
000218c6 50 4f                    |PO      |		ADDQ.L	#0x8,A7
000218c8 4e 94                    |N       |		JSR	(A4)
000218ca de c4                    |        |		ADDA.W	D4,A7
000218cc 20 6e 00 0a              | n      |		MOVEA.L	(A6+0xa),A0
000218d0 b0 c1                    |        |		CMPA.W	D1,A0
000218d2 67 48                    |gH      |		BEQ	0x2191c
000218d4 9e c5                    |        |		SUBA.W	D5,A7
000218d6 22 4f 45 fa ff 28 70 0c  |"OE  (p |		PUSHTXT	"Experiment :_"
000218de 12 da 51 c8 ff fc        |  Q     |
000218e4 9e c3                    |        |		SUBA.W	D3,A7
000218e6 22 4f                    |"O      |		MOVEA.L	A7,A1
000218e8 41 e8 00 fc              |A       |		LEA.L	(A0+0xfc),A0
000218ec 70 1d                    |p       |		MOVEQ.L	#0x1d,D0
000218ee 12 d8                    |        |		MOVE.B	(A0)+,(A1)+
000218f0 51 c8 ff fc              |Q       |		DBF	D0,0x218ee
000218f4 51 4f                    |QO      |		SUBQ.L	#0x8,A7
000218f6 48 6f 00 26              |Ho &    |		PEA.L	(A7+0x26)
000218fa 3f 01                    |?       |		MOVE.W	D1,-(A7)
000218fc 3f 02                    |?       |		MOVE.W	D2,-(A7)
000218fe 4e 93                    |N       |		JSR	(A3)
00021900 58 4f                    |XO      |		ADDQ.L	#0x4,A7
00021902 48 6f 00 0c              |Ho      |		PEA.L	(A7+0xc)
00021906 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021908 3f 03                    |?       |		MOVE.W	D3,-(A7)
0002190a 4e 93                    |N       |		JSR	(A3)
0002190c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002190e 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
00021914 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021916 4e 94                    |N       |		JSR	(A4)
00021918 de fc 00 30              |   0    |		ADDA.W	#0x0030,A7
0002191c 9e c5                    |        |		SUBA.W	D5,A7
0002191e 20 4f 43 fa fe ee 70 0c  | OC   p |		PUSHTXT	"Status     :_"
00021926 10 d9 51 c8 ff fc        |  Q     |
0002192c 51 4f                    |QO      |		SUBQ.L	#0x8,A7
0002192e 48 6f 00 08              |Ho      |		PEA.L	(A7+0x8)
00021932 3f 01                    |?       |		MOVE.W	D1,-(A7)
00021934 3f 02                    |?       |		MOVE.W	D2,-(A7)
00021936 4e 93                    |N       |		JSR	(A3)
00021938 54 4f                    |TO      |		ADDQ.L	#0x2,A7
0002193a 1e ae 00 08              |        |		MOVE.B	(A6+0x8),(A7)
0002193e 4e b9 00 01 04 a2        |N       |		JSR	ExpStatus2Text(status.B, &String)
00021944 54 4f                    |TO      |		ADDQ.L	#0x2,A7
00021946 4e b9 00 01 02 d0        |N       |		JSR	StringCat2(a, b : String) : String
0002194c 50 4f                    |PO      |		ADDQ.L	#0x8,A7
0002194e 4e 94                    |N       |		JSR	(A4)
00021950 5d 4f                    |]O      |		SUBQ.L	#0x6,A7
00021952 20 4f 43 fa fe da 70 16  | OC   p |		PUSHTXT	"Fatal experiment error."
0002195a 10 d9 51 c8 ff fc        |  Q     |
00021960 1f 3c 00 02              | <      |		MOVE.B	#0x02,-(A7)
00021964 59 4f                    |YO      |		SUBQ.L	#0x4,A7
00021966 48 6f 00 06              |Ho      |		PEA.L	(A7+0x6)
0002196a 3f 01                    |?       |		MOVE.W	D1,-(A7)
0002196c 3f 3c 00 17              |?<      |		MOVE.W	#0x0017,-(A7)
00021970 4e 93                    |N       |		JSR	(A3)
00021972 50 4f                    |PO      |		ADDQ.L	#0x8,A7
00021974 4e b9 00 01 03 b8        |N       |		JSR	PopProgram(Byte, String)
0002197a de c3 4c df 1f 3f        |  L  ?  |		.XXX[0x6]
00021980 4e 5e 4e 75              |N^Nu    |		.XXX[0x4]