/ Commodore Disk User Volume 4 #4 / Commodore_Disk_User_Vol.4_4_1991_-.d64 / ramcheck.src

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 20 3e 20 0a 00 20 3b | 22 52 41 4d 43 48 45 43 |. > .. ;|"RAMCHEC|
|00000010| 4b 2e 53 52 43 22 20 28 | 56 31 2e 30 29 20 42 59 |K.SRC" (|V1.0) BY|
|00000020| 20 ce 45 56 49 4c 4c 45 | 20 c4 55 47 55 49 44 20 | .EVILLE| .UGUID |
|00000030| 20 20 20 20 28 32 32 20 | 4a 55 4e 20 39 30 29 00 |    (22 |JUN 90).|
|00000040| 45 20 14 00 20 3b 00 7d | 20 1e 00 20 3b 41 20 4e |E .. ;.}| .. ;A N|
|00000050| 4f 4e 2d 44 45 53 54 52 | 55 43 54 49 56 45 20 52 |ON-DESTR|UCTIVE R|
|00000060| 41 4d 20 43 48 45 43 4b | 20 46 4f 52 20 54 48 45 |AM CHECK| FOR THE|
|00000070| 20 43 4f 4d 4d 4f 44 4f | 52 45 20 31 32 38 00 af | COMMODO|RE 128..|
|00000080| 20 28 00 20 3b 54 45 53 | 54 53 20 41 4c 4c 20 42 | (. ;TES|TS ALL B|
|00000090| 49 54 53 20 49 4e 20 42 | 41 4e 4b 53 20 30 20 26 |ITS IN B|ANKS 0 &|
|000000a0| 20 31 20 28 24 30 34 30 | 30 2d 24 46 46 46 46 29 | 1 ($040|0-$FFFF)|
|000000b0| 00 ea 20 32 00 20 3b 54 | 41 4b 45 53 20 34 20 53 |.. 2. ;T|AKES 4 S|
|000000c0| 45 43 4f 4e 44 53 20 49 | 4e 20 46 41 53 54 20 4d |ECONDS I|N FAST M|
|000000d0| 4f 44 45 2c 20 39 20 53 | 45 43 4f 4e 44 53 20 49 |ODE, 9 S|ECONDS I|
|000000e0| 4e 20 53 4c 4f 57 20 4d | 4f 44 45 00 18 21 3c 00 |N SLOW M|ODE..!<.|
|000000f0| 20 3b 53 4c 49 47 48 54 | 4c 59 20 4c 4f 4e 47 45 | ;SLIGHT|LY LONGE|
|00000100| 52 20 49 46 20 42 41 44 | 20 42 59 54 45 53 20 41 |R IF BAD| BYTES A|
|00000110| 52 45 20 46 4f 55 4e 44 | 2e 00 1f 21 46 00 20 3b |RE FOUND|...!F. ;|
|00000120| 00 5e 21 50 00 20 3b 54 | 48 49 53 20 53 4f 55 52 |.^!P. ;T|HIS SOUR|
|00000130| 43 45 20 43 4f 4d 50 41 | 54 49 42 4c 45 20 57 49 |CE COMPA|TIBLE WI|
|00000140| 54 48 20 22 c1 53 53 45 | 4d 42 4c 45 52 20 31 32 |TH ".SSE|MBLER 12|
|00000150| 38 22 20 50 55 42 4c 49 | 53 48 45 44 20 42 59 00 |8" PUBLI|SHED BY.|
|00000160| 89 21 5a 00 20 3b 27 d9 | 4f 55 52 20 c3 4f 4d 4d |.!Z. ;'.|OUR .OMM|
|00000170| 4f 44 4f 52 45 27 20 28 | d5 cb 29 2c 20 ca 55 4c |ODORE' (|..), .UL|
|00000180| 2d d3 45 50 2c 20 31 39 | 38 36 00 90 21 64 00 20 |-.EP, 19|86..!d. |
|00000190| 3b 00 97 21 6e 00 20 3b | 00 9e 21 78 00 20 3b 00 |;..!n. ;|..!x. ;.|
|000001a0| c9 21 82 00 20 3b 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.!.. ; -|--------|
|000001b0| 20 44 45 46 53 20 41 4e | 44 20 45 51 55 41 54 45 | DEFS AN|D EQUATE|
|000001c0| 53 20 2d 2d 2d 2d 2d 2d | 2d 2d 00 f4 21 8c 00 20 |S ------|--..!.. |
|000001d0| 2e 53 54 4b 45 59 20 3d | 20 24 30 30 39 31 20 20 |.STKEY =| $0091  |
|000001e0| 20 3b 52 45 53 55 4c 54 | 2c 4c 41 53 54 20 4b 45 | ;RESULT|,LAST KE|
|000001f0| 59 53 43 41 4e 00 25 22 | 96 00 20 2e 42 41 4e 4b |YSCAN.%"|.. .BANK|
|00000200| 20 3d 20 24 30 30 46 42 | 20 20 20 20 3b 42 41 4e | = $00FB|    ;BAN|
|00000210| 4b 20 43 55 52 52 45 4e | 54 4c 59 20 55 4e 44 45 |K CURREN|TLY UNDE|
|00000220| 52 20 54 45 53 54 00 61 | 22 a0 00 20 2e 50 4f 49 |R TEST.a|".. .POI|
|00000230| 4e 54 45 52 20 3d 20 24 | 30 30 46 43 20 3b 43 55 |NTER = $|00FC ;CU|
|00000240| 52 52 45 4e 54 20 52 41 | 4d 20 41 44 44 52 45 53 |RRENT RA|M ADDRES|
|00000250| 53 20 28 59 2d 49 4e 44 | 45 58 45 44 20 50 41 47 |S (Y-IND|EXED PAG|
|00000260| 45 29 00 a3 22 aa 00 20 | 2e 46 4c 41 47 20 3d 20 |E)..".. |.FLAG = |
|00000270| 24 30 30 46 45 20 20 20 | 20 3b 28 4e 4f 4e 2d 5a |$00FE   | ;(NON-Z|
|00000280| 45 52 4f 29 20 3d 20 42 | 41 44 20 4d 45 4d 4f 52 |ERO) = B|AD MEMOR|
|00000290| 59 20 46 4f 55 4e 44 20 | 49 4e 20 43 55 52 52 20 |Y FOUND |IN CURR |
|000002a0| 42 41 4e 4b 00 da 22 b4 | 00 20 2e 43 4f 4d 2d 4d |BANK..".|. .COM-M|
|000002b0| 45 4d 20 3d 20 24 30 32 | 41 32 20 3b 41 52 45 41 |EM = $02|A2 ;AREA|
|000002c0| 20 55 53 45 44 20 46 4f | 52 20 42 41 4e 4b 2d 54 | USED FO|R BANK-T|
|000002d0| 45 53 54 49 4e 47 20 43 | 4f 44 45 00 09 23 be 00 |ESTING C|ODE..#..|
|000002e0| 20 2e 44 46 4c 54 2d 43 | 46 47 20 3d 20 24 34 31 | .DFLT-C|FG = $41|
|000002f0| 37 41 20 3b 53 45 54 20 | cc c3 d2 27 53 20 41 53 |7A ;SET |...'S AS|
|00000300| 20 46 4f 52 20 c2 c1 d3 | c9 c3 00 45 23 c8 00 20 | FOR ...|...E#.. |
|00000310| 2e 48 45 58 2d 41 44 44 | 52 20 3d 20 24 42 38 39 |.HEX-ADD|R = $B89|
|00000320| 46 3b 50 52 49 4e 54 20 | 34 2d 44 49 47 49 54 20 |F;PRINT |4-DIGIT |
|00000330| 48 45 58 20 41 44 44 52 | 45 53 53 20 46 52 4f 4d |HEX ADDR|ESS FROM|
|00000340| 20 2e 41 2f 2e 58 00 57 | 23 d2 00 20 2e 4d 4d 55 | .A/.X.W|#.. .MMU|
|00000350| 20 3d 20 24 44 35 30 30 | 00 95 23 dc 00 20 2e 52 | = $D500|..#.. .R|
|00000360| 41 4d 4f 50 53 20 3d 20 | 24 45 30 43 44 20 20 20 |AMOPS = |$E0CD   |
|00000370| 3b 45 4e 53 55 52 45 20 | c2 41 4e 4b 53 20 30 20 |;ENSURE |.ANKS 0 |
|00000380| 26 20 31 20 53 45 54 20 | 46 4f 52 20 49 4e 54 45 |& 1 SET |FOR INTE|
|00000390| 52 52 55 50 54 53 00 cb | 23 e6 00 20 2e 4b 45 52 |RRUPTS..|#.. .KER|
|000003a0| 4e 41 4c 55 50 20 3d 20 | 24 45 30 45 45 20 3b 52 |NALUP = |$E0EE ;R|
|000003b0| 45 53 54 4f 52 45 20 4b | 45 52 4e 41 4c 20 42 41 |ESTORE K|ERNAL BA|
|000003c0| 4e 4b 2d 53 57 49 54 43 | 48 49 4e 47 00 fa 23 f0 |NK-SWITC|HING..#.|
|000003d0| 00 20 2e 50 52 49 4d 4d | 20 3d 20 24 46 46 37 44 |. .PRIMM| = $FF7D|
|000003e0| 20 20 20 20 3b 50 52 49 | 4e 54 20 53 54 52 49 4e |    ;PRI|NT STRIN|
|000003f0| 47 20 49 4d 4d 45 44 49 | 41 54 45 00 38 24 fa 00 |G IMMEDI|ATE.8$..|
|00000400| 20 2e 42 53 4f 55 54 20 | 3d 20 24 46 46 44 32 20 | .BSOUT |= $FFD2 |
|00000410| 20 20 20 3b 50 52 49 4e | 54 20 41 20 43 48 41 52 |   ;PRIN|T A CHAR|
|00000420| 20 54 4f 20 43 55 52 52 | 45 4e 54 20 4f 55 54 50 | TO CURR|ENT OUTP|
|00000430| 55 54 20 44 45 56 49 43 | 45 00 6c 24 04 01 20 3b |UT DEVIC|E.l$.. ;|
|00000440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 73 24 |--------|-----.s$|
|00000470| 0e 01 20 3b 00 82 24 18 | 01 20 2a 20 3d 20 24 30 |.. ;..$.|. * = $0|
|00000480| 42 30 30 00 89 24 22 01 | 20 3b 00 bd 24 2c 01 20 |B00..$".| ;..$,. |
|00000490| 3b 2d 2d 2d 2d 2d 2d 20 | 43 4f 4e 46 49 47 55 52 |;------ |CONFIGUR|
|000004a0| 45 20 4d 45 4d 4f 52 59 | 20 54 4f 20 4b 4e 4f 57 |E MEMORY| TO KNOW|
|000004b0| 4e 20 53 54 41 54 45 20 | 2d 2d 2d 2d 2d 2d 00 c6 |N STATE |------..|
|000004c0| 24 36 01 20 53 45 49 00 | cd 24 40 01 20 3b 00 ed |$6. SEI.|.$@. ;..|
|000004d0| 24 4a 01 20 4c 44 41 20 | 23 30 3a 53 54 41 20 24 |$J. LDA |#0:STA $|
|000004e0| 46 46 30 30 20 3b 20 42 | 41 4e 4b 2d 31 35 00 f4 |FF00 ; B|ANK-15..|
|000004f0| 24 54 01 20 3b 00 09 25 | 5e 01 20 3b 49 4e 49 54 |$T. ;..%|^. ;INIT|
|00000500| 49 41 4c 49 5a 45 20 4d | 4d 55 00 33 25 68 01 20 |IALIZE M|MU.3%h. |
|00000510| 20 4c 44 58 20 23 31 30 | 20 20 20 20 20 20 3b 4c | LDX #10|      ;L|
|00000520| 4f 41 44 20 31 31 20 cd | cd d5 20 52 45 47 49 53 |OAD 11 .|.. REGIS|
|00000530| 54 45 52 53 00 3f 25 72 | 01 20 2e 4c 4f 4f 50 31 |TERS.?%r|. .LOOP1|
|00000540| 00 66 25 7c 01 20 20 4c | 44 41 20 24 45 30 34 42 |.f%|.  L|DA $E04B|
|00000550| 2c 58 20 20 3b 20 46 52 | 4f 4d 20 54 41 42 4c 45 |,X  ; FR|OM TABLE|
|00000560| 20 49 4e 20 d2 cf cd 00 | 76 25 86 01 20 20 53 54 | IN ....|v%..  ST|
|00000570| 41 20 4d 4d 55 2c 58 00 | 81 25 90 01 20 20 20 44 |A MMU,X.|.%..   D|
|00000580| 45 58 00 92 25 9a 01 20 | 20 20 42 50 4c 20 4c 4f |EX..%.. |  BPL LO|
|00000590| 4f 50 31 00 99 25 a4 01 | 20 3b 00 c5 25 ae 01 20 |OP1..%..| ;..%.. |
|000005a0| 20 4a 53 52 20 44 46 4c | 54 2d 43 46 47 20 20 3b | JSR DFL|T-CFG  ;|
|000005b0| 53 45 54 20 cc c3 d2 27 | 53 20 41 53 20 46 4f 52 |SET ...'|S AS FOR|
|000005c0| 20 c2 c1 d3 c9 c3 00 cc | 25 b8 01 20 3b 00 11 26 | .......|%.. ;..&|
|000005d0| c2 01 20 4c 44 41 20 23 | 30 3a 53 54 41 20 4d 4d |.. LDA #|0:STA MM|
|000005e0| 55 2b 33 20 3b 52 45 2d | 41 53 49 47 4e 20 24 46 |U+3 ;RE-|ASIGN $F|
|000005f0| 46 30 33 20 54 4f 20 c2 | 41 4e 4b 2d 31 35 20 20 |F03 TO .|ANK-15  |
|00000600| 21 21 20 4e 4f 4e 2d 53 | 54 41 4e 44 41 52 44 20 |!! NON-S|TANDARD |
|00000610| 21 21 00 18 26 cc 01 20 | 3b 00 4b 26 d6 01 20 4a |!!..&.. |;.K&.. J|
|00000620| 53 52 20 52 41 4d 4f 50 | 53 20 20 3b 53 54 4f 50 |SR RAMOP|S  ;STOP|
|00000630| 2d 4b 45 59 20 52 45 51 | 55 49 52 45 44 20 49 4e |-KEY REQ|UIRED IN|
|00000640| 20 c2 41 4e 4b 53 20 30 | 20 26 20 31 00 52 26 e0 | .ANKS 0| & 1.R&.|
|00000650| 01 20 3b 00 5e 26 ea 01 | 20 4c 44 58 20 23 35 00 |. ;.^&..| LDX #5.|
|00000660| 6a 26 f4 01 20 2e 4c 4f | 4f 50 32 00 a7 26 fe 01 |j&.. .LO|OP2..&..|
|00000670| 20 4c 44 41 20 24 45 30 | 37 33 2c 58 20 20 20 3b | LDA $E0|73,X   ;|
|00000680| 45 4e 53 55 52 45 20 53 | 54 41 4e 44 41 52 44 20 |ENSURE S|TANDARD |
|00000690| cb 45 52 4e 41 4c 20 49 | 4e 54 45 52 52 55 50 54 |.ERNAL I|NTERRUPT|
|000006a0| 20 56 45 43 54 4f 52 53 | 00 b9 26 08 02 20 20 53 | VECTORS|..&..  S|
|000006b0| 54 41 20 24 30 33 31 34 | 2c 58 00 c3 26 12 02 20 |TA $0314|,X..&.. |
|000006c0| 20 44 45 58 00 d4 26 1c | 02 20 20 20 42 50 4c 20 | DEX..&.|.   BPL |
|000006d0| 4c 4f 4f 50 32 00 db 26 | 26 02 20 3b 00 e4 26 30 |LOOP2..&|&. ;..&0|
|000006e0| 02 20 43 4c 49 00 24 27 | 3a 02 20 3b 2d 2d 2d 2d |. CLI.$'|:. ;----|
|000006f0| 2d 2d 2d 20 54 52 41 4e | 53 46 45 52 20 54 45 53 |--- TRAN|SFER TES|
|00000700| 54 49 4e 47 20 52 4f 55 | 54 49 4e 45 20 54 4f 20 |TING ROU|TINE TO |
|00000710| 43 4f 4d 4d 4f 4e 20 4d | 45 4d 4f 52 59 20 2d 2d |COMMON M|EMORY --|
|00000720| 2d 2d 2d 2d 2d 00 2b 27 | 44 02 20 3b 00 38 27 4e |-----.+'|D. ;.8'N|
|00000730| 02 20 4c 44 59 20 23 38 | 39 00 47 27 58 02 20 2e |. LDY #8|9.G'X. .|
|00000740| 54 52 41 4e 53 46 45 52 | 00 5d 27 62 02 20 20 4c |TRANSFER|.]'b.  L|
|00000750| 44 41 20 42 41 4e 4b 2d | 54 45 53 54 2c 59 00 70 |DA BANK-|TEST,Y.p|
|00000760| 27 6c 02 20 53 54 41 20 | 43 4f 4d 2d 4d 45 4d 2c |'l. STA |COM-MEM,|
|00000770| 59 00 79 27 76 02 20 44 | 45 59 00 8b 27 80 02 20 |Y.y'v. D|EY..'.. |
|00000780| 42 50 4c 20 54 52 41 4e | 53 46 45 52 00 92 27 8a |BPL TRAN|SFER..'.|
|00000790| 02 20 3b 00 cc 27 94 02 | 20 3b 2d 2d 2d 2d 2d 2d |. ;..'..| ;------|
|000007a0| 20 d4 45 53 54 20 c2 41 | 4e 4b 53 20 30 20 41 4e | .EST .A|NKS 0 AN|
|000007b0| 44 20 31 2c 20 52 45 50 | 4f 52 54 49 4e 47 20 50 |D 1, REP|ORTING P|
|000007c0| 52 4f 47 52 45 53 53 20 | 2d 2d 2d 2d 2d 00 d3 27 |ROGRESS |-----..'|
|000007d0| 9e 02 20 3b 00 e2 27 a8 | 02 20 4a 53 52 20 50 52 |.. ;..'.|. JSR PR|
|000007e0| 49 4d 4d 00 0b 28 b2 02 | 20 23 42 3a 31 33 2c 31 |IMM..(..| #B:13,1|
|000007f0| 33 2c 31 33 20 20 3b 41 | 44 56 49 53 45 20 55 53 |3,13  ;A|DVISE US|
|00000800| 45 52 20 22 54 45 53 54 | 49 4e 47 22 00 1b 28 bc |ER "TEST|ING"..(.|
|00000810| 02 20 23 54 3a 54 45 53 | 54 49 4e 47 00 28 28 c6 |. #T:TES|TING.((.|
|00000820| 02 20 23 42 3a 31 33 2c | 30 00 2f 28 d0 02 20 3b |. #B:13,|0./(.. ;|
|00000830| 00 3d 28 da 02 20 4c 44 | 58 20 23 24 30 30 00 4b |.=(.. LD|X #$00.K|
|00000840| 28 e4 02 20 53 54 58 20 | 42 41 4e 4b 00 52 28 ee |(.. STX |BANK.R(.|
|00000850| 02 20 3b 00 62 28 f8 02 | 20 20 2e 52 55 4e 2d 54 |. ;.b(..|  .RUN-T|
|00000860| 45 53 54 00 71 28 02 03 | 20 4a 53 52 20 50 52 49 |EST.q(..| JSR PRI|
|00000870| 4d 4d 00 7c 28 0c 03 20 | 23 42 3a 31 33 00 8b 28 |MM.|(.. |#B:13..(|
|00000880| 16 03 20 23 54 3a 20 42 | 41 4e 4b 2d 00 95 28 20 |.. #T: B|ANK-..( |
|00000890| 03 20 23 42 3a 30 00 bd | 28 2a 03 20 20 54 58 41 |. #B:0..|(*.  TXA|
|000008a0| 3a 4f 52 41 20 23 24 33 | 30 20 3b 43 41 4c 43 20 |:ORA #$3|0 ;CALC |
|000008b0| 41 53 43 49 49 20 42 41 | 4e 4b 2d 4e 4f 2e 00 cd |ASCII BA|NK-NO...|
|000008c0| 28 34 03 20 20 4a 53 52 | 20 42 53 4f 55 54 00 dc |(4.  JSR| BSOUT..|
|000008d0| 28 3e 03 20 4a 53 52 20 | 50 52 49 4d 4d 00 f2 28 |(>. JSR |PRIMM..(|
|000008e0| 48 03 20 23 42 3a 34 36 | 2c 34 36 2c 34 36 2c 33 |H. #B:46|,46,46,3|
|000008f0| 32 2c 30 00 f9 28 52 03 | 20 3b 00 23 29 5c 03 20 |2,0..(R.| ;.#)\. |
|00000900| 20 4c 44 41 20 23 24 30 | 34 20 20 3b 54 45 53 54 | LDA #$0|4  ;TEST|
|00000910| 20 42 41 4e 4b 20 46 52 | 4f 4d 20 30 34 30 30 2d | BANK FR|OM 0400-|
|00000920| 46 46 46 46 00 32 29 66 | 03 20 20 4c 44 59 20 23 |FFFF.2)f|.  LDY #|
|00000930| 24 30 30 00 41 29 70 03 | 20 20 53 54 59 20 46 4c |$00.A)p.|  STY FL|
|00000940| 41 47 00 53 29 7a 03 20 | 20 53 54 59 20 50 4f 49 |AG.S)z. | STY POI|
|00000950| 4e 54 45 52 00 67 29 84 | 03 20 20 53 54 41 20 50 |NTER.g).|.  STA P|
|00000960| 4f 49 4e 54 45 52 2b 31 | 00 6f 29 8e 03 20 20 3b |OINTER+1|.o)..  ;|
|00000970| 00 80 29 98 03 20 4a 53 | 52 20 43 4f 4d 2d 4d 45 |..).. JS|R COM-ME|
|00000980| 4d 00 88 29 a2 03 20 20 | 3b 00 9b 29 ac 03 20 20 |M..)..  |;..)..  |
|00000990| 42 43 43 20 43 4f 4e 54 | 49 4e 55 45 00 c4 29 b6 |BCC CONT|INUE..).|
|000009a0| 03 20 20 20 4a 53 52 20 | 50 52 49 4d 4d 20 20 20 |.   JSR |PRIMM   |
|000009b0| 20 20 3b 49 46 20 53 54 | 4f 50 4b 45 59 20 50 52 |  ;IF ST|OPKEY PR|
|000009c0| 45 53 53 45 44 00 d1 29 | c0 03 20 20 20 23 42 3a |ESSED..)|..   #B:|
|000009d0| 31 33 00 eb 29 ca 03 20 | 20 20 23 54 3a 54 45 53 |13..).. |  #T:TES|
|000009e0| 54 20 41 42 4f 52 54 45 | 44 20 21 21 00 fa 29 d4 |T ABORTE|D !!..).|
|000009f0| 03 20 20 20 23 42 3a 31 | 33 2c 30 00 11 2a de 03 |.   #B:1|3,0..*..|
|00000a00| 20 20 43 4c 43 3a 42 43 | 43 20 45 4e 44 2d 54 45 |  CLC:BC|C END-TE|
|00000a10| 53 54 00 19 2a e8 03 20 | 20 3b 00 28 2a f2 03 20 |ST..*.. | ;.(*.. |
|00000a20| 2e 43 4f 4e 54 49 4e 55 | 45 00 37 2a fc 03 20 20 |.CONTINU|E.7*..  |
|00000a30| 4c 44 41 20 46 4c 41 47 | 00 4a 2a 06 04 20 20 42 |LDA FLAG|.J*..  B|
|00000a40| 4e 45 20 42 41 44 2d 4e | 45 57 53 00 54 2a 10 04 |NE BAD-N|EWS.T*..|
|00000a50| 20 20 50 48 50 00 7e 2a | 1a 04 20 20 4a 53 52 20 |  PHP.~*|..  JSR |
|00000a60| 50 52 49 4d 4d 20 20 20 | 3b 49 46 20 4e 4f 20 45 |PRIMM   |;IF NO E|
|00000a70| 52 52 4f 52 53 20 4c 41 | 53 54 20 42 41 4e 4b 00 |RRORS LA|ST BANK.|
|00000a80| 8e 2a 24 04 20 20 23 54 | 3a 52 41 4d 20 4f 4b 00 |.*$.  #T|:RAM OK.|
|00000a90| 9c 2a 2e 04 20 20 23 42 | 3a 31 33 2c 30 00 b4 2a |.*..  #B|:13,0..*|
|00000aa0| 38 04 20 20 50 4c 50 3a | 42 45 51 20 4e 45 58 54 |8.  PLP:|BEQ NEXT|
|00000ab0| 2d 42 41 4e 4b 00 bc 2a | 42 04 20 20 3b 00 cc 2a |-BANK..*|B.  ;..*|
|00000ac0| 4c 04 20 20 2e 42 41 44 | 2d 4e 45 57 53 00 04 2b |L.  .BAD|-NEWS..+|
|00000ad0| 56 04 20 20 4a 53 52 20 | 50 52 49 4d 4d 20 20 3b |V.  JSR |PRIMM  ;|
|00000ae0| 45 52 52 4f 52 53 20 44 | 45 54 45 43 54 45 44 20 |ERRORS D|ETECTED |
|00000af0| 28 41 44 44 52 45 53 53 | 45 53 20 4f 4e 20 53 43 |(ADDRESS|ES ON SC|
|00000b00| 52 45 45 4e 29 00 1a 2b | 60 04 20 20 23 54 3a 3d |REEN)..+|`.  #T:=|
|00000b10| 20 42 41 44 20 52 41 4d | 20 21 21 00 28 2b 6a 04 | BAD RAM| !!.(+j.|
|00000b20| 20 20 23 42 3a 31 33 2c | 30 00 2f 2b 74 04 20 3b |  #B:13,|0./+t. ;|
|00000b30| 00 3f 2b 7e 04 20 2e 4e | 45 58 54 2d 42 41 4e 4b |.?+~. .N|EXT-BANK|
|00000b40| 00 4d 2b 88 04 20 49 4e | 43 20 42 41 4e 4b 00 5b |.M+.. IN|C BANK.[|
|00000b50| 2b 92 04 20 4c 44 58 20 | 42 41 4e 4b 00 7c 2b 9c |+.. LDX |BANK.|+.|
|00000b60| 04 20 43 50 58 20 23 32 | 20 20 20 20 20 20 20 20 |. CPX #2|        |
|00000b70| 3b 54 45 53 54 20 32 20 | 42 41 4e 4b 53 00 8f 2b |;TEST 2 |BANKS..+|
|00000b80| a6 04 20 20 42 4e 45 20 | 52 55 4e 2d 54 45 53 54 |..  BNE |RUN-TEST|
|00000b90| 00 96 2b b0 04 20 3b 00 | a6 2b ba 04 20 20 2e 45 |..+.. ;.|.+..  .E|
|00000ba0| 4e 44 2d 54 45 53 54 00 | e7 2b c4 04 20 20 4c 44 |ND-TEST.|.+..  LD|
|00000bb0| 41 20 23 31 3a 53 54 41 | 20 4d 4d 55 2b 33 20 3b |A #1:STA| MMU+3 ;|
|00000bc0| 20 52 45 53 54 4f 52 45 | 20 24 46 46 30 33 20 54 | RESTORE| $FF03 T|
|00000bd0| 4f 20 42 41 4e 4b 2d 31 | 34 20 28 4e 4f 52 4d 41 |O BANK-1|4 (NORMA|
|00000be0| 4c 20 c2 c1 d3 c9 c3 29 | 00 ee 2b ce 04 20 3b 00 |L .....)|..+.. ;.|
|00000bf0| 0c 2c d8 04 20 4a 4d 50 | 20 4b 45 52 4e 41 4c 55 |.,.. JMP| KERNALU|
|00000c00| 50 20 20 20 20 20 20 3b | 20 c5 d8 c9 d4 00 44 2c |P      ;| .....D,|
|00000c10| e2 04 20 3b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.. ;----|--------|
|00000c20| 2d 2d 2d 2d 2d 20 45 4e | 44 20 4f 46 20 50 52 4f |----- EN|D OF PRO|
|00000c30| 47 52 41 4d 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |GRAM ---|--------|
|00000c40| 2d 2d 2d 2d 2d 00 4b 2c | ec 04 20 3b 00 52 2c f6 |-----.K,|.. ;.R,.|
|00000c50| 04 20 3b 00 59 2c 00 05 | 20 3b 00 a0 2c 0a 05 20 |. ;.Y,..| ;..,.. |
|00000c60| 3b 2d 2d 2d 2d 20 4d 4f | 44 55 4c 45 20 52 45 4c |;---- MO|DULE REL|
|00000c70| 4f 43 41 54 45 44 20 54 | 4f 20 43 4f 4d 4d 4f 4e |OCATED T|O COMMON|
|00000c80| 20 4d 45 4d 4f 52 59 20 | 50 52 49 4f 52 20 54 4f | MEMORY |PRIOR TO|
|00000c90| 20 45 58 45 43 55 54 49 | 4f 4e 20 2d 2d 2d 2d 2d | EXECUTI|ON -----|
|00000ca0| 2d 00 e9 2c 14 05 20 3b | 2d 2d 20 28 46 4f 52 20 |-..,.. ;|-- (FOR |
|00000cb0| 53 50 45 45 44 2c 20 41 | 53 20 54 48 45 4e 20 44 |SPEED, A|S THEN D|
|00000cc0| 4f 45 53 20 4e 4f 54 20 | 4e 45 45 44 20 54 4f 20 |OES NOT |NEED TO |
|00000cd0| 42 41 4e 4b 2d 53 57 49 | 54 43 48 20 45 56 45 52 |BANK-SWI|TCH EVER|
|00000ce0| 59 20 42 59 54 45 29 20 | 2d 2d 00 f0 2c 1e 05 20 |Y BYTE) |--..,.. |
|00000cf0| 3b 00 f7 2c 28 05 20 3b | 00 08 2d 32 05 20 20 2e |;..,(. ;|..-2.  .|
|00000d00| 42 41 4e 4b 2d 54 45 53 | 54 00 19 2d 3c 05 20 2a |BANK-TES|T..-<. *|
|00000d10| 20 3d 20 43 4f 4d 2d 4d | 45 4d 00 2c 2d 46 05 20 | = COM-M|EM.,-F. |
|00000d20| 20 23 4c 3a 42 41 4e 4b | 2d 54 45 53 54 00 33 2d | #L:BANK|-TEST.3-|
|00000d30| 50 05 20 3b 00 6c 2d 5a | 05 20 20 53 54 41 20 24 |P. ;.l-Z|.  STA $|
|00000d40| 46 46 30 31 2c 58 20 20 | 20 20 20 20 3b 28 24 46 |FF01,X  |    ;($F|
|00000d50| 46 30 31 2c 20 24 46 46 | 30 32 20 46 4f 52 20 42 |F01, $FF|02 FOR B|
|00000d60| 41 4e 4b 53 20 30 20 41 | 4e 44 20 31 29 00 73 2d |ANKS 0 A|ND 1).s-|
|00000d70| 64 05 20 3b 00 85 2d 6e | 05 20 2e 54 45 53 54 2d |d. ;..-n|. .TEST-|
|00000d80| 41 2d 42 59 54 45 00 c2 | 2d 78 05 20 20 20 42 49 |A-BYTE..|-x.   BI|
|00000d90| 54 20 53 54 4b 45 59 20 | 20 20 20 20 3b 4e 4f 54 |T STKEY |    ;NOT|
|00000da0| 45 20 53 54 4f 50 4b 45 | 59 20 4e 4f 54 20 41 56 |E STOPKE|Y NOT AV|
|00000db0| 41 49 4c 41 42 4c 45 20 | 41 42 4f 56 45 20 24 46 |AILABLE |ABOVE $F|
|00000dc0| 46 30 30 00 d8 2d 82 05 | 20 20 42 50 4c 20 4a 45 |F00..-..|  BPL JE|
|00000dd0| 4e 44 2d 42 41 4e 4b 2b | 32 00 19 2e 8c 05 20 20 |ND-BANK+|2.....  |
|00000de0| 4c 44 41 20 28 50 4f 49 | 4e 54 45 52 29 2c 59 20 |LDA (POI|NTER),Y |
|00000df0| 20 3b 47 45 54 20 4f 52 | 49 47 49 4e 41 4c 20 43 | ;GET OR|IGINAL C|
|00000e00| 4f 4e 54 45 4e 54 53 20 | 4f 46 20 43 55 52 52 45 |ONTENTS |OF CURRE|
|00000e10| 4e 54 20 41 44 44 52 45 | 53 53 00 39 2e 96 05 20 |NT ADDRE|SS.9... |
|00000e20| 20 50 48 41 20 20 20 20 | 20 20 20 20 20 20 20 20 | PHA    |        |
|00000e30| 20 20 3b 53 41 56 45 20 | 49 54 00 41 2e a0 05 20 |  ;SAVE |IT.A... |
|00000e40| 20 3b 00 75 2e aa 05 20 | 20 4c 44 41 20 23 24 35 | ;.u... | LDA #$5|
|00000e50| 35 20 20 20 20 20 20 20 | 20 20 3b 54 45 53 54 20 |5       |  ;TEST |
|00000e60| 42 49 54 20 50 41 54 54 | 45 52 4e 20 27 30 31 30 |BIT PATT|ERN '010|
|00000e70| 31 30 31 30 31 27 00 b0 | 2e b4 05 20 20 53 54 41 |10101'..|...  STA|
|00000e80| 20 28 50 4f 49 4e 54 45 | 52 29 2c 59 20 20 3b 53 | (POINTE|R),Y  ;S|
|00000e90| 54 4f 52 45 20 49 54 20 | 41 54 20 43 55 52 52 45 |TORE IT |AT CURRE|
|00000ea0| 4e 54 20 4d 45 4d 4f 52 | 59 20 41 44 44 52 45 53 |NT MEMOR|Y ADDRES|
|00000eb0| 53 00 d5 2e be 05 20 20 | 4c 44 41 20 28 50 4f 49 |S.....  |LDA (POI|
|00000ec0| 4e 54 45 52 29 2c 59 20 | 20 3b 52 45 41 44 20 49 |NTER),Y | ;READ I|
|00000ed0| 54 20 42 41 43 4b 00 f5 | 2e c8 05 20 20 43 4d 50 |T BACK..|...  CMP|
|00000ee0| 20 23 24 35 35 20 20 20 | 20 20 20 20 20 20 3b 54 | #$55   |      ;T|
|00000ef0| 45 53 54 20 49 54 00 08 | 2f d2 05 20 20 42 4e 45 |EST IT..|/..  BNE|
|00000f00| 20 42 41 44 2d 42 59 54 | 45 00 0f 2f dc 05 20 3b | BAD-BYT|E../.. ;|
|00000f10| 00 46 2f e6 05 20 20 4c | 44 41 20 23 24 41 41 20 |.F/..  L|DA #$AA |
|00000f20| 20 20 20 20 20 20 20 20 | 3b 52 45 56 45 52 53 45 |        |;REVERSE|
|00000f30| 20 42 49 54 20 50 41 54 | 54 45 52 4e 20 27 31 30 | BIT PAT|TERN '10|
|00000f40| 31 30 31 30 31 30 27 00 | 7e 2f f0 05 20 20 53 54 |101010'.|~/..  ST|
|00000f50| 41 20 28 50 4f 49 4e 54 | 45 52 29 2c 59 20 20 3b |A (POINT|ER),Y  ;|
|00000f60| 53 54 4f 52 45 20 49 54 | 20 41 54 20 53 41 4d 45 |STORE IT| AT SAME|
|00000f70| 20 4d 45 4d 4f 52 59 20 | 41 44 44 52 45 53 53 00 | MEMORY |ADDRESS.|
|00000f80| a3 2f fa 05 20 20 4c 44 | 41 20 28 50 4f 49 4e 54 |./..  LD|A (POINT|
|00000f90| 45 52 29 2c 59 20 20 3b | 52 45 41 44 20 49 54 20 |ER),Y  ;|READ IT |
|00000fa0| 42 41 43 4b 00 c3 2f 04 | 06 20 20 43 4d 50 20 23 |BACK../.|.  CMP #|
|00000fb0| 24 41 41 20 20 20 20 20 | 20 20 20 20 3b 54 45 53 |$AA     |    ;TES|
|00000fc0| 54 20 49 54 00 d7 2f 0e | 06 20 20 42 4e 45 20 42 |T IT../.|.  BNE B|
|00000fd0| 41 44 2d 42 59 54 45 a0 | 00 e0 2f 18 06 20 20 20 |AD-BYTE.|../..   |
|00000fe0| 3b 00 ef 2f 22 06 20 2e | 46 49 58 2d 42 59 54 45 |;../". .|FIX-BYTE|
|00000ff0| 00 22 30 2c 06 20 20 50 | 4c 41 20 20 20 20 20 20 |."0,.  P|LA      |
|00001000| 20 20 20 20 20 20 20 20 | 3b 52 45 54 52 49 45 56 |        |;RETRIEV|
|00001010| 45 20 4f 52 49 47 49 4e | 41 4c 20 43 4f 4e 54 45 |E ORIGIN|AL CONTE|
|00001020| 4e 54 53 00 56 30 36 06 | 20 20 53 54 41 20 28 50 |NTS.V06.|  STA (P|
|00001030| 4f 49 4e 54 45 52 29 2c | 59 20 20 3b 52 45 53 54 |OINTER),|Y  ;REST|
|00001040| 4f 52 45 20 54 4f 20 4f | 52 49 47 49 4e 41 4c 20 |ORE TO O|RIGINAL |
|00001050| 41 44 44 52 45 53 53 00 | 5e 30 40 06 20 20 3b 00 |ADDRESS.|^0@.  ;.|
|00001060| 83 30 4a 06 20 20 49 4e | 59 20 20 20 20 20 20 20 |.0J.  IN|Y       |
|00001070| 20 20 20 20 20 20 20 3b | 4e 45 58 54 20 41 44 44 |       ;|NEXT ADD|
|00001080| 52 45 53 53 00 98 30 54 | 06 20 42 4e 45 20 54 45 |RESS..0T|. BNE TE|
|00001090| 53 54 2d 41 2d 42 59 54 | 45 00 bf 30 5e 06 20 20 |ST-A-BYT|E..0^.  |
|000010a0| 20 49 4e 43 20 50 4f 49 | 4e 54 45 52 2b 31 20 20 | INC POI|NTER+1  |
|000010b0| 20 3b 55 50 44 41 54 45 | 20 50 4f 49 4e 54 45 52 | ;UPDATE| POINTER|
|000010c0| 00 d4 30 68 06 20 20 20 | 42 45 51 20 4a 45 4e 44 |..0h.   |BEQ JEND|
|000010d0| 2d 42 41 4e 4b 00 e9 30 | 72 06 20 20 20 4c 44 41 |-BANK..0|r.   LDA|
|000010e0| 20 50 4f 49 4e 54 45 52 | 2b 31 00 23 31 7c 06 20 | POINTER|+1.#1|. |
|000010f0| 20 20 43 4d 50 20 23 24 | 46 46 20 20 20 20 20 20 |  CMP #$|FF      |
|00001100| 20 20 3b 53 4b 49 50 20 | 43 46 47 20 52 45 47 49 |  ;SKIP |CFG REGI|
|00001110| 53 54 45 52 53 20 41 54 | 20 24 46 46 30 30 2d 24 |STERS AT| $FF00-$|
|00001120| 46 46 30 34 00 48 31 86 | 06 20 20 42 4e 45 20 54 |FF04.H1.|.  BNE T|
|00001130| 45 53 54 2d 41 2d 42 59 | 54 45 20 20 3b 4e 45 58 |EST-A-BY|TE  ;NEX|
|00001140| 54 20 41 44 44 52 45 53 | 53 00 90 31 90 06 20 20 |T ADDRES|S..1..  |
|00001150| 4c 44 59 20 23 35 20 20 | 20 20 20 20 20 3b 28 20 |LDY #5  |     ;( |
|00001160| 23 34 20 57 49 4c 4c 20 | 47 49 56 45 20 43 52 55 |#4 WILL |GIVE CRU|
|00001170| 44 45 20 45 4d 55 4c 41 | 54 49 4f 4e 20 4f 46 20 |DE EMULA|TION OF |
|00001180| 42 41 44 20 52 41 4d 20 | 41 54 20 24 46 46 30 34 |BAD RAM |AT $FF04|
|00001190| 29 00 b9 31 9a 06 20 53 | 45 49 20 20 20 20 20 20 |)..1.. S|EI      |
|000011a0| 20 20 20 20 20 3b 4e 4f | 20 49 52 51 27 53 20 41 |     ;NO| IRQ'S A|
|000011b0| 42 4f 56 45 20 24 46 46 | 30 30 00 cf 31 a4 06 20 |BOVE $FF|00..1.. |
|000011c0| 20 42 4e 45 20 54 45 53 | 54 2d 41 2d 42 59 54 45 | BNE TES|T-A-BYTE|
|000011d0| 00 e5 31 ae 06 20 3b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..1.. ;-|--------|
|000011e0| 2d 2d 2d 2d 2d 2d 00 ec | 31 b8 06 20 3b 00 f3 31 |------..|1.. ;..1|
|000011f0| c2 06 20 3b 00 02 32 cc | 06 20 2e 42 41 44 2d 42 |.. ;..2.|. .BAD-B|
|00001200| 59 54 45 00 1b 32 d6 06 | 20 53 54 41 20 24 46 46 |YTE..2..| STA $FF|
|00001210| 30 33 20 3b 20 42 41 4e | 4b 2d 31 35 00 34 32 e0 |03 ; BAN|K-15.42.|
|00001220| 06 20 54 59 41 20 3a 20 | 4c 44 58 20 50 4f 49 4e |. TYA : |LDX POIN|
|00001230| 54 45 52 2b 31 00 5a 32 | ea 06 20 20 4a 53 52 20 |TER+1.Z2|..  JSR |
|00001240| 48 45 58 2d 41 44 44 52 | 20 3b 45 58 49 54 53 20 |HEX-ADDR| ;EXITS |
|00001250| 57 49 54 48 20 2e 41 3d | 23 33 32 00 69 32 f4 06 |WITH .A=|#32.i2..|
|00001260| 20 20 4c 44 58 20 42 41 | 4e 4b 00 7a 32 fe 06 20 |  LDX BA|NK.z2.. |
|00001270| 53 54 41 20 24 46 46 30 | 31 2c 58 00 9b 32 08 07 |STA $FF0|1,X..2..|
|00001280| 20 20 53 54 41 20 46 4c | 41 47 20 20 20 20 20 3b |  STA FL|AG     ;|
|00001290| 28 46 4c 41 47 20 3d 20 | 23 33 32 29 00 c2 32 12 |(FLAG = |#32)..2.|
|000012a0| 07 20 42 50 4c 20 46 49 | 58 2d 42 59 54 45 20 20 |. BPL FI|X-BYTE  |
|000012b0| 3b 28 41 4c 57 41 59 53 | 2c 20 58 3d 30 20 4f 52 |;(ALWAYS|, X=0 OR|
|000012c0| 20 31 29 00 e9 32 1c 07 | 20 3b 2d 2d 2d 2d 2d 2d | 1)..2..| ;------|
|000012d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 00 f0 32 26 07 20 |--------|--..2&. |
|000012f0| 3b 00 01 33 30 07 20 20 | 2e 4a 45 4e 44 2d 42 41 |;..30.  |.JEND-BA|
|00001300| 4e 4b 00 0a 33 3a 07 20 | 43 4c 43 00 33 33 44 07 |NK..3:. |CLC.33D.|
|00001310| 20 23 42 3a 24 32 34 20 | 20 3b 42 49 54 20 54 52 | #B:$24 | ;BIT TR|
|00001320| 49 43 4b 3d 22 53 4b 49 | 50 20 4e 45 58 54 20 42 |ICK="SKI|P NEXT B|
|00001330| 59 54 45 22 00 5b 33 4e | 07 20 53 45 43 20 20 20 |YTE".[3N|. SEC   |
|00001340| 20 20 3b 28 46 4c 41 47 | 53 20 53 54 4f 50 4b 45 |  ;(FLAG|S STOPKE|
|00001350| 59 20 45 58 49 54 20 4f | 4e 4c 59 29 00 77 33 58 |Y EXIT O|NLY).w3X|
|00001360| 07 20 53 54 41 20 24 46 | 46 30 33 20 20 20 20 20 |. STA $F|F03     |
|00001370| 3b c2 41 4e 4b 2d 31 35 | 00 80 33 62 07 20 43 4c |;.ANK-15|..3b. CL|
|00001380| 49 00 89 33 6c 07 20 52 | 54 53 00 bf 33 76 07 20 |I..3l. R|TS..3v. |
|00001390| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |;-------|------- |
|000013a0| 28 45 4e 44 20 4f 46 20 | 43 4f 4d 4d 4f 4e 20 43 |(END OF |COMMON C|
|000013b0| 4f 44 45 29 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ODE) ---|--------|
|000013c0| 00 c6 33 80 07 20 5d 00 | 00 00                   |..3.. ].|..      |
+--------+-------------------------+-------------------------+--------+--------+