00000000: 01 04 38 04 00 00 8F 20 54 48 45 20 54 52 41 4E |..8.... THE TRAN|
00000010: 53 41 43 54 4F 52 20 56 4F 4C 55 4D 45 20 3F 20 |SACTOR VOLUME ? |
00000020: 49 53 53 55 45 20 3F 3F 20 20 20 20 20 20 20 20 |ISSUE ?? |
00000030: 20 50 41 47 45 20 3F 3F 00 59 04 01 00 8F 20 20 | PAGE ??.Y.... |
00000040: 20 20 53 41 56 45 22 31 3A 56 45 52 49 46 49 5A | SAVE"1:VERIFIZ|
00000050: 45 52 42 31 32 38 22 2C 38 00 9D 04 02 00 8F 20 |ERB128",8...... |
00000060: 20 20 20 44 4F 4E 27 54 20 4B 4E 4F 57 20 49 46 | DON'T KNOW IF|
00000070: 20 59 4F 55 20 4E 45 45 44 20 54 48 49 53 2C 20 | YOU NEED THIS, |
00000080: 42 55 54 20 49 54 20 44 4F 45 53 20 57 4F 52 4B |BUT IT DOES WORK|
00000090: 20 57 49 54 48 20 54 48 45 20 50 45 54 00 DB 04 | WITH THE PET...|
000000A0: 03 00 8F 20 20 20 20 43 48 45 43 4B 42 59 54 45 |... CHECKBYTE|
000000B0: 53 20 54 4F 20 54 48 45 20 45 58 54 45 4E 54 20 |S TO THE EXTENT |
000000C0: 4F 46 20 49 44 45 4E 54 49 43 41 4C 20 54 4F 4B |OF IDENTICAL TOK|
000000D0: 45 4E 20 4E 55 4D 42 45 52 53 2E 00 27 05 04 00 |EN NUMBERS..'...|
000000E0: 8F 20 20 20 20 4D 41 4B 45 20 53 55 52 45 20 54 |. MAKE SURE T|
000000F0: 48 41 54 20 4C 49 4E 45 20 33 30 20 53 41 59 53 |HAT LINE 30 SAYS|
00000100: 20 27 42 41 4E 4B 20 31 35 27 2C 20 41 4E 44 20 | 'BANK 15', AND |
00000110: 4E 4F 54 20 53 4F 4D 45 20 4F 54 48 45 52 20 4B |NOT SOME OTHER K|
00000120: 45 59 57 4F 52 44 21 00 6E 05 05 00 8F 20 20 20 |EYWORD!.n.... |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4C | L|
00000160: 49 5A 20 44 45 41 4C 20 36 2F 34 2F 38 35 00 98 |IZ DEAL 6/4/85..|
00000170: 05 0A 00 8F 2A 20 44 41 54 41 20 4C 4F 41 44 45 |....* DATA LOADE|
00000180: 52 20 46 4F 52 20 22 56 45 52 49 46 49 5A 45 52 |R FOR "VERIFIZER|
00000190: 20 42 31 32 38 22 20 2A 00 A1 05 14 00 43 53 B2 | B128" *.....CS.|
000001A0: 30 00 C4 05 1E 00 DC 20 31 35 3A 81 20 49 B2 31 |0...... 15:. I.1|
000001B0: 30 32 34 20 A4 20 31 31 36 33 3A 87 20 41 3A 97 |024 . 1163:. A:.|
000001C0: 20 49 2C 41 00 D4 05 28 00 43 53 B2 43 53 AA 41 | I,A...(.CS.CS.A|
000001D0: 3A 82 20 49 00 DA 05 32 00 3A 00 09 06 3C 00 8B |:. I...2.:...<..|
000001E0: 20 43 53 B3 B1 31 36 38 32 38 20 A7 20 99 22 2A | CS..16828 . ."*|
000001F0: 2A 2A 2A 2A 20 44 41 54 41 20 45 52 52 4F 52 20 |**** DATA ERROR |
00000200: 2A 2A 2A 2A 2A 22 3A 20 80 00 41 06 46 00 8F 20 |*****": ..A.F.. |
00000210: 42 41 4E 4B 20 31 35 3A 53 59 53 20 31 30 32 34 |BANK 15:SYS 1024|
00000220: 3A 52 45 4D 20 20 20 42 41 4E 4B 20 31 35 3A 53 |:REM BANK 15:S|
00000230: 59 53 20 31 30 32 37 20 54 55 52 4E 53 20 4F 46 |YS 1027 TURNS OF|
00000240: 46 00 47 06 50 00 80 00 4D 06 64 00 3A 00 73 06 |F.G.P...M.d.:.s.|
00000250: 00 04 83 20 20 37 36 2C 20 31 34 2C 20 20 34 2C |... 76, 14, 4,|
00000260: 31 36 35 2C 32 35 31 2C 31 34 31 2C 31 33 30 2C |165,251,141,130,|
00000270: 20 20 32 00 99 06 08 04 83 20 31 36 35 2C 32 35 | 2...... 165,25|
00000280: 32 2C 31 34 31 2C 31 33 31 2C 20 20 32 2C 20 39 |2,141,131, 2, 9|
00000290: 36 2C 31 37 33 2C 31 33 30 00 BF 06 10 04 83 20 |6,173,130...... |
000002A0: 20 20 32 2C 32 30 31 2C 20 33 39 2C 32 34 30 2C | 2,201, 39,240,|
000002B0: 20 31 37 2C 31 33 33 2C 32 35 31 2C 31 37 33 00 | 17,133,251,173.|
000002C0: E5 06 18 04 83 20 31 33 31 2C 20 20 32 2C 31 33 |..... 131, 2,13|
000002D0: 33 2C 32 35 32 2C 31 36 39 2C 20 33 39 2C 31 34 |3,252,169, 39,14|
000002E0: 31 2C 31 33 30 00 0B 07 20 04 83 20 20 20 32 2C |1,130... .. 2,|
000002F0: 31 36 39 2C 20 20 34 2C 31 34 31 2C 31 33 31 2C |169, 4,141,131,|
00000300: 20 20 32 2C 20 39 36 2C 31 36 35 00 31 07 28 04 | 2, 96,165.1.(.|
00000310: 83 20 20 20 31 2C 20 37 32 2C 31 36 32 2C 20 20 |. 1, 72,162, |
00000320: 31 2C 31 33 34 2C 20 20 31 2C 32 30 32 2C 31 36 |1,134, 1,202,16|
00000330: 35 00 57 07 30 04 83 20 20 32 37 2C 31 33 33 2C |5.W.0.. 27,133,|
00000340: 32 33 33 2C 20 33 32 2C 31 31 38 2C 20 20 34 2C |233, 32,118, 4,|
00000350: 32 33 34 2C 31 37 37 00 7D 07 38 04 83 20 31 33 |234,177.}.8.. 13|
00000360: 36 2C 32 34 30 2C 20 32 32 2C 32 30 31 2C 20 33 |6,240, 22,201, 3|
00000370: 32 2C 32 34 30 2C 20 31 35 2C 31 33 33 00 A3 07 |2,240, 15,133...|
00000380: 40 04 83 20 32 33 35 2C 32 33 32 2C 31 33 38 2C |@.. 235,232,138,|
00000390: 20 34 31 2C 20 20 33 2C 31 33 33 2C 32 33 34 2C | 41, 3,133,234,|
000003A0: 20 33 32 00 C9 07 48 04 83 20 31 31 30 2C 20 20 | 32...H.. 110, |
000003B0: 34 2C 31 39 38 2C 32 33 34 2C 20 31 36 2C 32 34 |4,198,234, 16,24|
000003C0: 39 2C 32 30 30 2C 32 30 38 00 EF 07 50 04 83 20 |9,200,208...P.. |
000003D0: 32 33 30 2C 31 36 35 2C 32 33 33 2C 20 34 31 2C |230,165,233, 41,|
000003E0: 20 31 35 2C 20 32 34 2C 31 30 35 2C 31 39 33 00 | 15, 24,105,193.|
000003F0: 15 08 58 04 83 20 31 34 31 2C 20 20 30 2C 32 30 |..X.. 141, 0,20|
00000400: 38 2C 31 36 35 2C 32 33 33 2C 20 37 34 2C 20 37 |8,165,233, 74, 7|
00000410: 34 2C 20 37 34 00 3B 08 60 04 83 20 20 37 34 2C |4, 74.;.`.. 74,|
00000420: 20 32 34 2C 31 30 35 2C 31 39 33 2C 31 34 31 2C | 24,105,193,141,|
00000430: 20 20 31 2C 32 30 38 2C 20 32 34 00 61 08 68 04 | 1,208, 24.a.h.|
00000440: 83 20 31 30 34 2C 31 33 33 2C 20 20 31 2C 31 30 |. 104,133, 1,10|
00000450: 38 2C 32 35 31 2C 20 20 30 2C 31 36 35 2C 32 33 |8,251, 0,165,23|
00000460: 35 00 87 08 70 04 83 20 20 32 34 2C 31 30 31 2C |5...p.. 24,101,|
00000470: 32 33 33 2C 31 33 33 2C 32 33 33 2C 20 39 36 2C |233,133,233, 96,|
00000480: 31 36 35 2C 31 33 36 00 AD 08 78 04 83 20 31 36 |165,136...x.. 16|
00000490: 34 2C 31 33 37 2C 31 33 33 2C 31 33 33 2C 31 33 |4,137,133,133,13|
000004A0: 32 2C 31 33 34 2C 20 33 32 2C 20 33 38 00 D3 08 |2,134, 32, 38...|
000004B0: 80 04 83 20 31 38 36 2C 20 32 34 2C 20 33 32 2C |... 186, 24, 32,|
000004C0: 20 37 38 2C 31 34 31 2C 31 36 35 2C 31 33 33 2C | 78,141,165,133,|
000004D0: 20 35 36 00 F9 08 88 04 83 20 32 32 39 2C 31 33 | 56...... 229,13|
000004E0: 36 2C 31 36 38 2C 20 39 36 2C 31 37 30 2C 31 37 |6,168, 96,170,17|
000004F0: 30 2C 31 37 30 2C 31 37 30 00 FF 08 92 04 3A 00 |0,170,170.....:.|
00000500: 24 09 88 13 43 91 56 45 52 54 45 44 20 46 52 4F |$...C.VERTED FRO|
00000510: 4D 20 50 45 54 20 AF 20 43 AB 36 34 20 56 45 52 |M PET . C.64 VER|
00000520: 53 49 91 53 00 60 09 89 13 53 4F 4D 45 20 53 55 |SI.S.`...SOME SU|
00000530: 42 53 C0 54 49 41 4C 20 43 48 41 4E 47 45 53 20 |BS.TIAL CHANGES |
00000540: 57 45 52 45 20 4E 45 45 44 45 44 2E 20 57 52 49 |WERE NEEDED. WRI|
00000550: 54 45 55 50 20 81 20 59 4F 55 52 20 55 53 45 3A |TEUP . YOUR USE:|
00000560: 00 97 09 8A 13 54 48 49 53 20 57 49 4C 4C 20 57 |.....THIS WILL W|
00000570: B0 4B 20 91 4C 59 20 8B 20 54 48 45 20 85 20 42 |.K .LY . THE . B|
00000580: 55 46 46 45 52 20 44 4F 45 53 20 A8 20 43 52 4F |UFFER DOES . CRO|
00000590: 53 53 20 50 41 47 45 00 D7 09 8B 13 42 4F 55 4E |SS PAGE.....BOUN|
000005A0: 44 52 59 2E 20 4E B0 4D 41 4C 20 42 55 46 46 45 |DRY. N.MAL BUFFE|
000005B0: 52 20 49 53 20 49 4E 20 DC 20 31 20 41 54 20 24 |R IS IN . 1 AT $|
000005C0: 46 41 35 45 AB 46 41 46 46 2C 20 57 48 49 43 48 |FA5E.FAFF, WHICH|
000005D0: 20 49 53 20 4F 4B 2E 00 DD 09 8C 13 3B 00 1B 0A | IS OK......;...|
000005E0: 92 13 46 30 34 30 30 20 34 43 20 30 45 20 30 34 |..F0400 4C 0E 04|
000005F0: 20 20 20 20 4A 4D 50 20 24 30 34 30 45 20 3B E6 | JMP $040E ;.|
00000600: 20 A2 20 5A AB 50 47 20 50 4C 41 43 45 53 20 24 | . Z.PG PLACES $|
00000610: 45 39 AB 45 42 2C 46 42 AB 46 43 00 39 0A 93 13 |E9.EB,FB.FC.9...|
00000620: 46 30 34 30 33 20 41 35 20 46 42 20 20 20 20 20 |F0403 A5 FB |
00000630: 20 20 4C 44 41 20 24 46 42 00 59 0A 94 13 46 30 | LDA $FB.Y...F0|
00000640: 34 30 35 20 38 44 20 38 32 20 30 32 20 20 20 20 |405 8D 82 02 |
00000650: 53 54 41 20 24 30 32 38 32 00 77 0A 95 13 46 30 |STA $0282.w...F0|
00000660: 34 30 38 20 41 35 20 46 43 20 20 20 20 20 20 20 |408 A5 FC |
00000670: 4C 44 41 20 24 46 43 00 97 0A 96 13 46 30 34 30 |LDA $FC.....F040|
00000680: 41 20 38 44 20 38 33 20 30 32 20 20 20 20 53 54 |A 8D 83 02 ST|
00000690: 41 20 24 30 32 38 33 00 B1 0A 97 13 46 30 34 30 |A $0283.....F040|
000006A0: 44 20 36 30 20 20 20 20 20 20 20 20 20 20 52 54 |D 60 RT|
000006B0: 53 00 F4 0A 98 13 46 30 34 30 45 20 41 44 20 38 |S.....F040E AD 8|
000006C0: 32 20 30 32 20 20 20 20 4C 44 41 20 24 30 32 38 |2 02 LDA $028|
000006D0: 32 20 3B 54 45 53 54 20 4C 4F 57 20 42 59 54 45 |2 ;TEST LOW BYTE|
000006E0: 20 4F 46 20 57 41 52 4D 20 56 45 43 20 AB 20 53 | OF WARM VEC . S|
000006F0: 41 46 45 52 00 37 0B 99 13 46 30 34 31 31 20 43 |AFER.7...F0411 C|
00000700: 39 20 32 37 20 20 20 20 20 20 20 43 4D 50 20 23 |9 27 CMP #|
00000710: 24 32 37 20 20 3B 81 20 4D 45 20 54 48 41 4E 20 |$27 ;. ME THAN |
00000720: 54 48 45 20 48 49 20 BF 43 45 20 49 20 48 41 56 |THE HI .CE I HAV|
00000730: 45 20 4F 54 48 45 52 00 67 0B 9A 13 46 30 34 31 |E OTHER.g...F041|
00000740: 33 20 46 30 20 31 31 20 20 20 20 20 20 20 42 45 |3 F0 11 BE|
00000750: 51 20 24 30 34 32 36 20 3B 53 55 43 48 20 49 4E |Q $0426 ;SUCH IN|
00000760: 20 50 41 47 45 20 34 00 85 0B 9B 13 46 30 34 31 | PAGE 4.....F041|
00000770: 35 20 38 35 20 46 42 20 20 20 20 20 20 20 53 54 |5 85 FB ST|
00000780: 41 20 24 46 42 00 A5 0B 9C 13 46 30 34 31 37 20 |A $FB.....F0417 |
00000790: 41 44 20 38 33 20 30 32 20 20 20 20 4C 44 41 20 |AD 83 02 LDA |
000007A0: 24 30 32 38 33 00 C3 0B 9D 13 46 30 34 31 41 20 |$0283.....F041A |
000007B0: 38 35 20 46 43 20 20 20 20 20 20 20 53 54 41 20 |85 FC STA |
000007C0: 24 46 43 00 E2 0B 9E 13 46 30 34 31 43 20 41 39 |$FC.....F041C A9|
000007D0: 20 32 37 20 20 20 20 20 20 20 4C 44 41 20 23 24 | 27 LDA #$|
000007E0: 32 37 00 02 0C 9F 13 46 30 34 31 45 20 38 44 20 |27.....F041E 8D |
000007F0: 38 32 20 30 32 20 20 20 20 53 54 41 20 24 30 32 |82 02 STA $02|
00000800: 38 32 00 21 0C A0 13 46 30 34 32 31 20 41 39 20 |82.!...F0421 A9 |
00000810: 30 34 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 |04 LDA #$0|
00000820: 34 00 41 0C A1 13 46 30 34 32 33 20 38 44 20 38 |4.A...F0423 8D 8|
00000830: 33 20 30 32 20 20 20 20 53 54 41 20 24 30 32 38 |3 02 STA $028|
00000840: 33 00 5B 0C A2 13 46 30 34 32 36 20 36 30 20 20 |3.[...F0426 60 |
00000850: 20 20 20 20 20 20 20 20 52 54 53 00 99 0C A3 13 | RTS.....|
00000860: 46 30 34 32 37 20 41 35 20 30 31 20 20 20 20 20 |F0427 A5 01 |
00000870: 20 20 4C 44 41 20 24 30 31 20 20 20 20 20 3B 4F | LDA $01 ;O|
00000880: 56 45 52 41 42 55 4E 44 41 4E 43 45 20 4F 46 20 |VERABUNDANCE OF |
00000890: 43 41 55 54 49 91 2E 2E 2E 00 D8 0C A4 13 46 30 |CAUTI.........F0|
000008A0: 34 32 39 20 34 38 20 20 20 20 20 20 20 20 20 20 |429 48 |
000008B0: 50 48 41 20 20 20 20 20 20 20 20 20 3B 20 43 48 |PHA ; CH|
000008C0: 41 4E 43 45 53 20 41 52 45 20 49 54 27 53 20 31 |ANCES ARE IT'S 1|
000008D0: 20 41 4E 59 57 41 59 2E 00 F7 0C A5 13 46 30 34 | ANYWAY......F04|
000008E0: 32 41 20 41 32 20 30 31 20 20 20 20 20 20 20 4C |2A A2 01 L|
000008F0: 44 58 20 23 24 30 31 00 15 0D A6 13 46 30 34 32 |DX #$01.....F042|
00000900: 43 20 38 36 20 30 31 20 20 20 20 20 20 20 53 54 |C 86 01 ST|
00000910: 58 20 24 30 31 00 2F 0D A7 13 46 30 34 32 45 20 |X $01./...F042E |
00000920: 43 41 20 20 20 20 20 20 20 20 20 20 44 45 58 00 |CA DEX.|
00000930: 6E 0D A8 13 46 30 34 32 46 20 41 35 20 31 42 20 |n...F042F A5 1B |
00000940: 20 20 20 20 20 20 4C 44 41 20 24 31 42 20 20 20 | LDA $1B |
00000950: 20 20 3B 4C 4F 57 20 42 59 54 45 20 4F 46 20 4C | ;LOW BYTE OF L|
00000960: 49 4E 45 23 20 53 54 49 4C 4C 20 C5 49 44 00 B1 |INE# STILL .ID..|
00000970: 0D A9 13 46 30 34 33 31 20 38 35 20 45 39 20 20 |...F0431 85 E9 |
00000980: 20 20 20 20 20 53 54 41 20 24 45 39 20 20 20 20 | STA $E9 |
00000990: 20 3B 20 42 31 32 38 20 48 41 53 20 4E 4F 20 4C | ; B128 HAS NO L|
000009A0: 49 4E 45 23 20 91 20 54 48 45 20 53 54 41 43 4B |INE# . THE STACK|
000009B0: 2E 00 F2 0D AA 13 46 30 34 33 33 20 32 30 20 37 |......F0433 20 7|
000009C0: 36 20 30 34 20 20 20 20 4A 53 52 20 24 30 34 37 |6 04 JSR $047|
000009D0: 36 20 20 20 3B 46 49 4E 44 20 57 48 45 52 45 20 |6 ;FIND WHERE |
000009E0: 4C 49 4E 45 23 20 80 53 20 49 4E 20 42 55 46 46 |LINE# .S IN BUFF|
000009F0: 45 52 00 1E 0E AB 13 46 30 34 33 36 20 45 41 20 |ER.....F0436 EA |
00000A00: 20 20 20 20 20 20 20 20 20 4E 4F 50 20 20 20 20 | NOP |
00000A10: 20 20 20 20 20 3B 20 A4 20 A1 20 59 20 81 00 54 | ; . . Y ..T|
00000A20: 0E AC 13 46 30 34 33 37 20 42 31 20 38 38 20 20 |...F0437 B1 88 |
00000A30: 20 20 20 20 20 4C 44 41 20 28 24 38 38 29 2C 59 | LDA ($88),Y|
00000A40: 20 3B 20 C2 49 4E 47 20 54 48 45 20 85 20 42 55 | ; .ING THE . BU|
00000A50: 46 46 45 52 00 87 0E AD 13 46 30 34 33 39 20 46 |FFER.....F0439 F|
00000A60: 30 20 31 36 20 20 20 20 20 20 20 42 45 51 20 24 |0 16 BEQ $|
00000A70: 30 34 35 31 20 20 20 3B 20 E6 20 49 4E 44 49 52 |0451 ; . INDIR|
00000A80: 45 43 54 20 50 54 52 00 CF 0E AE 13 46 30 34 33 |ECT PTR.....F043|
00000A90: 42 20 43 39 20 32 30 20 20 20 20 20 20 20 43 4D |B C9 20 CM|
00000AA0: 50 20 23 24 32 30 20 20 20 20 3B 20 58 AB 59 20 |P #$20 ; X.Y |
00000AB0: 46 52 4F 4D 20 43 36 34 20 43 4F 44 45 20 41 52 |FROM C64 CODE AR|
00000AC0: 45 20 4E 4F 57 20 45 58 43 48 41 4E 47 45 44 00 |E NOW EXCHANGED.|
00000AD0: EF 0E AF 13 46 30 34 33 44 20 46 30 20 30 46 20 |....F043D F0 0F |
00000AE0: 20 20 20 20 20 20 42 45 51 20 24 30 34 34 45 00 | BEQ $044E.|
00000AF0: 0D 0F B0 13 46 30 34 33 46 20 38 35 20 45 42 20 |....F043F 85 EB |
00000B00: 20 20 20 20 20 20 53 54 41 20 24 45 42 00 27 0F | STA $EB.'.|
00000B10: B1 13 46 30 34 34 31 20 45 38 20 20 20 20 20 20 |..F0441 E8 |
00000B20: 20 20 20 20 49 4E 58 00 41 0F B2 13 46 30 34 34 | INX.A...F044|
00000B30: 32 20 38 41 20 20 20 20 20 20 20 20 20 20 54 58 |2 8A TX|
00000B40: 41 00 5E 0F B3 13 46 30 34 34 33 20 32 39 20 30 |A.^...F0443 29 0|
00000B50: 33 20 20 20 20 20 20 20 AF 20 23 24 30 33 00 7C |3 . #$03.||
00000B60: 0F B4 13 46 30 34 34 35 20 38 35 20 45 41 20 20 |...F0445 85 EA |
00000B70: 20 20 20 20 20 53 54 41 20 24 45 41 00 9C 0F B5 | STA $EA....|
00000B80: 13 46 30 34 34 37 20 32 30 20 36 45 20 30 34 20 |.F0447 20 6E 04 |
00000B90: 20 20 20 4A 53 52 20 24 30 34 36 45 00 BA 0F B6 | JSR $046E....|
00000BA0: 13 46 30 34 34 41 20 43 36 20 45 41 20 20 20 20 |.F044A C6 EA |
00000BB0: 20 20 20 44 45 43 20 24 45 41 00 DA 0F B7 13 46 | DEC $EA.....F|
00000BC0: 30 34 34 43 20 31 30 20 46 39 20 20 20 20 20 20 |044C 10 F9 |
00000BD0: 20 42 50 4C 20 24 30 34 34 37 00 F4 0F B8 13 46 | BPL $0447.....F|
00000BE0: 30 34 34 45 20 43 38 20 20 20 20 20 20 20 20 20 |044E C8 |
00000BF0: 20 49 4E 59 00 14 10 B9 13 46 30 34 34 46 20 44 | INY.....F044F D|
00000C00: 30 20 45 36 20 20 20 20 20 20 20 42 4E 45 20 24 |0 E6 BNE $|
00000C10: 30 34 33 37 00 32 10 BA 13 46 30 34 35 31 20 41 |0437.2...F0451 A|
00000C20: 35 20 45 39 20 20 20 20 20 20 20 4C 44 41 20 24 |5 E9 LDA $|
00000C30: 45 39 00 4F 10 BB 13 46 30 34 35 33 20 32 39 20 |E9.O...F0453 29 |
00000C40: 30 46 20 20 20 20 20 20 20 AF 20 23 24 30 46 00 |0F . #$0F.|
00000C50: 69 10 BC 13 46 30 34 35 35 20 31 38 20 20 20 20 |i...F0455 18 |
00000C60: 20 20 20 20 20 20 43 4C 43 00 88 10 BD 13 46 30 | CLC.....F0|
00000C70: 34 35 36 20 36 39 20 43 31 20 20 20 20 20 20 20 |456 69 C1 |
00000C80: 41 44 43 20 23 24 43 31 00 C7 10 BE 13 46 30 34 |ADC #$C1.....F04|
00000C90: 35 38 20 38 44 20 30 30 20 44 30 20 20 20 20 53 |58 8D 00 D0 S|
00000CA0: 54 41 20 24 44 30 30 30 20 20 3B 46 52 4F 4D 20 |TA $D000 ;FROM |
00000CB0: 50 45 54 20 56 45 52 53 49 91 AB 97 20 54 48 45 |PET VERSI... THE|
00000CC0: 20 53 43 52 45 45 4E 00 E5 10 BF 13 46 30 34 35 | SCREEN.....F045|
00000CD0: 42 20 41 35 20 45 39 20 20 20 20 20 20 20 4C 44 |B A5 E9 LD|
00000CE0: 41 20 24 45 39 00 FF 10 C0 13 46 30 34 35 44 20 |A $E9.....F045D |
00000CF0: 34 41 20 20 20 20 20 20 20 20 20 20 4C 53 52 00 |4A LSR.|
00000D00: 19 11 C1 13 46 30 34 35 45 20 34 41 20 20 20 20 |....F045E 4A |
00000D10: 20 20 20 20 20 20 4C 53 52 00 33 11 C2 13 46 30 | LSR.3...F0|
00000D20: 34 35 46 20 34 41 20 20 20 20 20 20 20 20 20 20 |45F 4A |
00000D30: 4C 53 52 00 4D 11 C3 13 46 30 34 36 30 20 34 41 |LSR.M...F0460 4A|
00000D40: 20 20 20 20 20 20 20 20 20 20 4C 53 52 00 67 11 | LSR.g.|
00000D50: C4 13 46 30 34 36 31 20 31 38 20 20 20 20 20 20 |..F0461 18 |
00000D60: 20 20 20 20 43 4C 43 00 86 11 C5 13 46 30 34 36 | CLC.....F046|
00000D70: 32 20 36 39 20 43 31 20 20 20 20 20 20 20 41 44 |2 69 C1 AD|
00000D80: 43 20 23 24 43 31 00 A6 11 C6 13 46 30 34 36 34 |C #$C1.....F0464|
00000D90: 20 38 44 20 30 31 20 44 30 20 20 20 20 53 54 41 | 8D 01 D0 STA|
00000DA0: 20 24 44 30 30 31 00 C0 11 C7 13 46 30 34 36 37 | $D001.....F0467|
00000DB0: 20 31 38 20 20 20 20 20 20 20 20 20 20 43 4C 43 | 18 CLC|
00000DC0: 00 E7 11 C8 13 46 30 34 36 38 20 36 38 20 20 20 |.....F0468 68 |
00000DD0: 20 20 20 20 20 20 20 50 4C 41 20 20 20 20 20 20 | PLA |
00000DE0: 20 20 3B 8C 20 24 31 00 05 12 C9 13 46 30 34 36 | ;. $1.....F046|
00000DF0: 39 20 38 35 20 30 31 20 20 20 20 20 20 20 53 54 |9 85 01 ST|
00000E00: 41 20 24 30 31 00 3B 12 CA 13 46 30 34 36 42 20 |A $01.;...F046B |
00000E10: 36 43 20 46 42 20 30 30 20 20 20 20 4A 4D 50 20 |6C FB 00 JMP |
00000E20: 28 24 30 30 46 42 29 3B AF 20 42 41 43 4B 20 A4 |($00FB);. BACK .|
00000E30: 20 57 41 52 4D 20 53 54 41 52 54 00 66 12 CB 13 | WARM START.f...|
00000E40: 46 30 34 36 45 20 41 35 20 45 42 20 20 20 20 20 |F046E A5 EB |
00000E50: 20 20 4C 44 41 20 24 45 42 20 20 20 20 3B 4D 55 | LDA $EB ;MU|
00000E60: 4C 54 49 4C 50 59 00 80 12 CC 13 46 30 34 37 30 |LTILPY.....F0470|
00000E70: 20 31 38 20 20 20 20 20 20 20 20 20 20 43 4C 43 | 18 CLC|
00000E80: 00 9E 12 CD 13 46 30 34 37 31 20 36 35 20 45 39 |.....F0471 65 E9|
00000E90: 20 20 20 20 20 20 20 41 44 43 20 24 45 39 00 BC | ADC $E9..|
00000EA0: 12 CE 13 46 30 34 37 33 20 38 35 20 45 39 20 20 |...F0473 85 E9 |
00000EB0: 20 20 20 20 20 53 54 41 20 24 45 39 00 D6 12 CF | STA $E9....|
00000EC0: 13 46 30 34 37 35 20 36 30 20 20 20 20 20 20 20 |.F0475 60 |
00000ED0: 20 20 20 52 54 53 00 1D 13 D0 13 46 30 34 37 36 | RTS.....F0476|
00000EE0: 20 41 35 20 38 38 20 20 20 20 20 20 20 4C 44 41 | A5 88 LDA|
00000EF0: 20 24 38 38 20 20 20 20 3B 50 54 52 20 A4 20 A4 | $88 ;PTR . .|
00000F00: 4B 45 4E 49 5A 45 44 20 54 45 58 54 20 49 4E 20 |KENIZED TEXT IN |
00000F10: 54 48 45 20 42 55 46 46 45 52 20 49 53 00 60 13 |THE BUFFER IS.`.|
00000F20: D1 13 46 30 34 37 38 20 41 34 20 38 39 20 20 20 |..F0478 A4 89 |
00000F30: 20 20 20 20 4C 44 59 20 24 38 39 20 20 20 20 3B | LDY $89 ;|
00000F40: 43 4C 4F 42 42 45 52 45 44 2E 20 53 4F 20 57 45 |CLOBBERED. SO WE|
00000F50: 27 4C 4C 20 4A 55 53 54 20 52 45 A1 20 54 48 45 |'LL JUST RE. THE|
00000F60: 00 9C 13 D2 13 46 30 34 37 41 20 38 35 20 38 35 |.....F047A 85 85|
00000F70: 20 20 20 20 20 20 20 53 54 41 20 24 38 35 20 20 | STA $85 |
00000F80: 20 20 3B 4C 49 4E 45 20 4E 55 4D 42 45 52 20 A4 | ;LINE NUMBER .|
00000F90: 20 A1 20 59 20 B9 49 54 49 91 45 44 00 E1 13 D3 | . Y .ITI.ED....|
00000FA0: 13 46 30 34 37 43 20 38 34 20 38 36 20 20 20 20 |.F047C 84 86 |
00000FB0: 20 20 20 53 54 59 20 24 38 36 20 20 20 20 3B 28 | STY $86 ;(|
00000FC0: 24 38 38 AB 38 41 20 42 55 46 46 45 52 20 50 54 |$88.8A BUFFER PT|
00000FD0: 52 2C 20 24 38 35 AB 38 37 20 54 58 54 50 54 52 |R, $85.87 TXTPTR|
00000FE0: 29 00 0D 14 D4 13 46 30 34 37 45 20 32 30 20 32 |).....F047E 20 2|
00000FF0: 36 20 42 41 20 20 20 20 4A 53 52 20 24 42 41 32 |6 BA JSR $BA2|
00001000: 36 20 20 3B 43 48 52 A1 2C 20 59 B2 30 00 43 14 |6 ;CHR., Y.0.C.|
00001010: D5 13 46 30 34 38 31 20 31 38 20 20 20 20 20 20 |..F0481 18 |
00001020: 20 20 20 20 43 4C 43 20 20 20 20 20 20 20 20 3B | CLC ;|
00001030: 43 4C 43 20 A8 20 52 45 41 4C 4C 59 20 4E 45 45 |CLC . REALLY NEE|
00001040: 44 45 44 00 87 14 D6 13 46 30 34 38 32 20 32 30 |DED.....F0482 20|
00001050: 20 34 45 20 38 44 20 20 20 20 4A 53 52 20 24 38 | 4E 8D JSR $8|
00001060: 44 34 45 20 20 3B A1 20 4C 49 4E 45 23 2C 20 4E |D4E ;. LINE#, N|
00001070: 4F 20 45 52 52 B0 53 20 B9 53 49 42 4C 45 2C 20 |O ERR.S .SIBLE, |
00001080: 49 20 48 4F 50 45 2E 00 CB 14 D7 13 46 30 34 38 |I HOPE......F048|
00001090: 35 20 41 35 20 38 35 20 20 20 20 20 20 20 4C 44 |5 A5 85 LD|
000010A0: 41 20 24 38 35 20 20 20 20 3B 54 48 49 53 20 43 |A $85 ;THIS C|
000010B0: 4F 44 45 20 44 4F 45 53 20 20 4E 20 4F 20 54 20 |ODE DOES N O T |
000010C0: 20 50 45 52 4D 49 54 20 54 48 45 00 0A 15 D8 13 | PERMIT THE.....|
000010D0: 46 30 34 38 37 20 33 38 20 20 20 20 20 20 20 20 |F0487 38 |
000010E0: 20 20 53 45 43 20 20 20 20 20 20 20 20 3B 42 55 | SEC ;BU|
000010F0: 46 46 45 52 20 A4 20 43 52 4F 53 53 20 50 41 47 |FFER . CROSS PAG|
00001100: 45 53 2E 20 53 C0 44 41 52 44 00 4B 15 D9 13 46 |ES. S.DARD.K...F|
00001110: 30 34 38 38 20 45 35 20 38 38 20 20 20 20 20 20 |0488 E5 88 |
00001120: 20 53 42 43 20 24 38 38 20 20 20 20 3B 53 45 54 | SBC $88 ;SET|
00001130: 55 50 20 B0 20 53 4F 4D 45 54 48 49 4E 47 20 53 |UP . SOMETHING S|
00001140: 49 4D 49 4C 41 52 20 A4 20 49 54 00 90 15 DA 13 |IMILAR . IT.....|
00001150: 46 30 34 38 41 20 41 38 20 20 20 20 20 20 20 20 |F048A A8 |
00001160: 20 20 54 41 59 20 20 20 20 20 20 20 20 3B 49 53 | TAY ;IS|
00001170: 20 41 53 53 55 4D 45 44 2E 20 41 4C 53 4F 2C 20 | ASSUMED. ALSO, |
00001180: A8 48 49 4E 47 20 57 49 4C 4C 20 57 B0 4B 20 8B |.HING WILL W.K .|
00001190: 00 D2 15 DB 13 46 30 34 38 42 20 36 30 20 20 20 |.....F048B 60 |
000011A0: 20 20 20 20 20 20 20 52 54 53 20 20 20 20 20 20 | RTS |
000011B0: 20 20 3B 59 4F 55 20 4D 4F 56 45 20 54 48 45 20 | ;YOU MOVE THE |
000011C0: 85 20 42 55 46 46 45 52 20 46 52 4F 4D 20 DC 20 |. BUFFER FROM . |
000011D0: 31 2E 00 D8 15 70 17 3A 00 FE 15 7A 17 3A 20 20 |1....p.:...z.: |
000011E0: 20 20 20 20 20 20 20 20 20 20 20 20 42 AB 42 49 | B.BI|
000011F0: 54 53 20 81 20 59 4F 55 52 20 D1 49 91 3A 00 42 |TS . YOUR .I.:.B|
00001200: 16 84 17 AB 20 20 20 53 4F 4D 45 54 49 4D 45 53 |.... SOMETIMES|
00001210: 20 42 31 32 38 20 81 A1 53 20 49 54 53 20 88 54 | B128 ..S ITS .T|
00001220: 45 52 53 2E 20 53 50 45 43 8B 49 43 41 4C 4C 59 |ERS. SPEC.ICALLY|
00001230: 2C 20 49 4E 20 47 52 41 50 48 49 43 53 20 4D 4F |, IN GRAPHICS MO|
00001240: 44 45 00 80 16 8E 17 53 48 8B 54 AB 4C 20 4D 41 |DE.....SH.T.L MA|
00001250: 59 20 43 4F 4D 45 20 4F 55 54 20 41 53 20 53 48 |Y COME OUT AS SH|
00001260: 8B 54 AB 56 2E 20 54 57 4F 20 53 4F 4C 55 54 49 |.T.V. TWO SOLUTI|
00001270: 91 53 3A 20 28 31 29 50 55 53 48 20 8E 2C 20 AF |.S: (1)PUSH ., .|
00001280: 00 C6 16 98 17 46 4C 49 50 20 54 48 45 20 4D 4F |.....FLIP THE MO|
00001290: 44 45 20 53 45 56 45 52 41 4C 20 54 49 4D 45 53 |DE SEVERAL TIMES|
000012A0: 2C 20 B0 20 28 32 29 20 55 53 45 20 43 54 52 4C |, . (2) USE CTRL|
000012B0: AB 5B 20 28 54 48 41 54 27 53 20 9A 52 4F 4C 20 |.[ (THAT'S .ROL |
000012C0: AF 20 4C 45 46 54 00 08 17 A2 17 53 51 55 41 52 |. LEFT.....SQUAR|
000012D0: 45 20 42 52 41 43 4B 45 54 29 2E 20 44 20 46 4F |E BRACKET). D FO|
000012E0: 4C 4C 4F 57 45 44 20 42 59 20 43 54 4C AB 5B 20 |LLOWED BY CTL.[ |
000012F0: 57 49 4C 4C 20 D6 20 41 20 50 52 4F 47 52 41 4D |WILL . A PROGRAM|
00001300: 2E 20 48 91 45 53 54 2E 00 47 17 A4 17 AB 20 20 |. H.EST..G.... |
00001310: 20 9F 31 2C 30 3A 84 31 2C 20 45 54 43 20 49 4E | .1,0:.1, ETC IN|
00001320: 20 54 48 45 20 42 AB 4D 41 43 48 49 4E 45 20 44 | THE B.MACHINE D|
00001330: 4F 45 53 20 20 4E 20 4F 20 54 20 20 53 55 50 52 |OES N O T SUPR|
00001340: 45 53 53 20 54 48 45 00 59 17 A6 17 51 55 45 53 |ESS THE.Y...QUES|
00001350: 54 49 91 20 4D 41 52 4B 2E 00 5F 17 AC 17 3B 00 |TI. MARK.._...;.|
00001360: 97 17 B6 17 3A 20 20 20 20 20 20 20 20 20 20 20 |....: |
00001370: 20 20 20 55 50 47 52 41 44 45 AB 50 45 54 20 56 | UPGRADE.PET V|
00001380: 45 52 8B 49 5A 45 52 20 46 52 4F 4D 20 59 4F 55 |ER.IZER FROM YOU|
00001390: 52 20 44 49 53 4B 3A 00 DC 17 C0 17 56 45 52 8B |R DISK:.....VER.|
000013A0: 49 5A 45 52 20 32 AD 34 20 44 4F 45 53 20 A8 20 |IZER 2.4 DOES . |
000013B0: 57 B0 4B 20 49 4E 20 4D 59 20 32 50 45 54 2E 20 |W.K IN MY 2PET. |
000013C0: 24 44 39 20 55 53 45 53 20 DF 20 4E 55 4D 42 45 |$D9 USES . NUMBE|
000013D0: 52 2E 20 DF 20 4E 55 4D 42 45 52 53 00 19 18 CA |R. . NUMBERS....|
000013E0: 17 41 52 45 4E 27 54 20 C6 49 49 20 43 4F 44 45 |.AREN'T .II CODE|
000013F0: 53 20 49 4E 20 32 2E 20 8E 20 DF 20 49 53 20 DF |S IN 2. . . IS .|
00001400: 20 31 30 2E 20 43 48 45 43 4B 20 81 20 24 30 41 | 10. CHECK . $0A|
00001410: 20 41 54 20 24 32 41 37 2E 00 00 00 | AT $2A7.... |
..8.... THE TRANSACTOR VOLUME ? ISSUE ??
PAGE ??.Y.... SAVE"1:VERIFIZ
ERB128",8...... DON'T KNOW IF YOU NEE
D THIS, BUT IT DOES WORK WITH THE PET...
... CHECKBYTES TO THE EXTENT OF IDENT
ICAL TOKEN NUMBERS..'.... MAKE SURE T
HAT LINE 30 SAYS 'BANK 15', AND NOT SOME
OTHER KEYWORD!.N....
LIZ DEAL
6/4/85......* DATA LOADER FOR "VERIFIZER
B128" *.....CS.0.D.... 15:. I.1024 . 11
63:. A:. I,A.T.(.CS.CS.A:. I.Z.2.:...<..
CS..16828 . ."***** DATA ERROR *****":
..A.F.. BANK 15:SYS 1024:REM BANK 15:S
YS 1027 TURNS OFF.G.P...M.D.:.S.... 76,
14, 4,165,251,141,130, 2...... 165,25
2,141,131, 2, 96,173,130...... 2,201,
39,240, 17,133,251,173...... 131, 2,13
3,252,169, 39,141,130... .. 2,169, 4,
141,131, 2, 96,165.1.(.. 1, 72,162,
1,134, 1,202,165.W.0.. 27,133,233, 32,
118, 4,234,177.}.8.. 136,240, 22,201, 3
2,240, 15,133...@.. 235,232,138, 41, 3,
133,234, 32.I.H.. 110, 4,198,234, 16,24
9,200,208...P.. 230,165,233, 41, 15, 24,
105,193...X.. 141, 0,208,165,233, 74, 7
4, 74.;.`.. 74, 24,105,193,141, 1,208,
24.A.H.. 104,133, 1,108,251, 0,165,23
5...P.. 24,101,233,133,233, 96,165,136.
..X.. 164,137,133,133,132,134, 32, 38.S.
... 186, 24, 32, 78,141,165,133, 56.....
. 229,136,168, 96,170,170,170,170.....:.
$...C.VERTED FROM PET . C.64 VERSI.S.`..
.SOME SUBS.TIAL CHANGES WERE NEEDED. WRI
TEUP . YOUR USE:.....THIS WILL W.K .LY .
THE . BUFFER DOES . CROSS PAGE.W...BOUN
DRY. N.MAL BUFFER IS IN . 1 AT $FA5E.FAF
F, WHICH IS OK......;.....F0400 4C 0E 04
JMP $040E ;. . Z.PG PLACES $E9.EB,FB
.FC.9...F0403 A5 FB LDA $FB.Y...F0
405 8D 82 02 STA $0282.W...F0408 A5 F
C LDA $FC.....F040A 8D 83 02 ST
A $0283.....F040D 60 RTS.....F0
40E AD 82 02 LDA $0282 ;TEST LOW BYTE
OF WARM VEC . SAFER.7...F0411 C9 27
CMP #$27 ;. ME THAN THE HI .CE I HAV
E OTHER.G...F0413 F0 11 BEQ $0426
;SUCH IN PAGE 4.....F0415 85 FB ST
A $FB.....F0417 AD 83 02 LDA $0283.C.
..F041A 85 FC STA $FC.....F041C A9
27 LDA #$27.....F041E 8D 82 02
STA $0282.!. .F0421 A9 04 LDA #$0
4.A...F0423 8D 83 02 STA $0283.[...F0
426 60 RTS.....F0427 A5 01
LDA $01 ;OVERABUNDANCE OF CAUTI...
..X...F0429 48 PHA ; CH
ANCES ARE IT'S 1 ANYWAY......F042A A2 01
LDX #$01.....F042C 86 01 ST
X $01./...F042E CA DEX.N...F042
F A5 1B LDA $1B ;LOW BYTE OF L
INE# STILL EID.....F0431 85 E9 STA
$E9 ; B128 HAS NO LINE# . THE STACK
......F0433 20 76 04 JSR $0476 ;FIN
D WHERE LINE# .S IN BUFFER.....F0436 EA
NOP ; . . Y ..T...F0437
B1 88 LDA ($88),Y ; BING THE . BU
FFER.....F0439 F0 16 BEQ $0451 ;
. INDIRECT PTR.O...F043B C9 20 CM
P #$20 ; X.Y FROM C64 CODE ARE NOW EX
CHANGED.....F043D F0 0F BEQ $044E.
....F043F 85 EB STA $EB.'...F0441
E8 INX.A...F0442 8A TX
A.^...F0443 29 03 . #$03.|...F0445
85 EA STA $EA.....F0447 20 6E 04
JSR $046E.....F044A C6 EA DEC $
EA.Z...F044C 10 F9 BPL $0447.....F
044E C8 INY.....F044F D0 E6
BNE $0437.2...F0451 A5 E9 LDA $
E9.O...F0453 29 0F . #$0F.I...F045
5 18 CLC.....F0456 69 C1
ADC #$C1.G...F0458 8D 00 D0 STA $D000
;FROM PET VERSI... THE SCREEN.....F045
B A5 E9 LDA $E9.....F045D 4A
LSR...A.F045E 4A LSR.3.B.F0
45F 4A LSR.M.C.F0460 4A
LSR.G.D.F0461 18 CLC...E.F046
2 69 C1 ADC #$C1...F.F0464 8D 01 D
0 STA $D001...G.F0467 18 CLC
...H.F0468 68 PLA ;. $1.
..I.F0469 85 01 STA $01.;.J.F046B
6C FB 00 JMP ($00FB);. BACK . WARM ST
ART.F.K.F046E A5 EB LDA $EB ;MU
LTILPY...L.F0470 18 CLC...M.F04
71 65 E9 ADC $E9...N.F0473 85 E9
STA $E9.V.O.F0475 60 RTS..
.P.F0476 A5 88 LDA $88 ;PTR . .
KENIZED TEXT IN THE BUFFER IS.`.Q.F0478
A4 89 LDY $89 ;CLOBBERED. SO WE
'LL JUST RE. THE...R.F047A 85 85 S
TA $85 ;LINE NUMBER . . Y .ITI.ED...S
.F047C 84 86 STY $86 ;($88.8A B
UFFER PTR, $85.87 TXTPTR)...T.F047E 20 2
6 BA JSR $BA26 ;CHR., Y.0.C.U.F0481
18 CLC ;CLC . REALLY NEE
DED...V.F0482 20 4E 8D JSR $8D4E ;.
LINE#, NO ERR.S .SIBLE, I HOPE..K.W.F048
5 A5 85 LDA $85 ;THIS CODE DOES
N O T PERMIT THE...X.F0487 38
SEC ;BUFFER . CROSS PAGES. S.DA
RD.K.Y.F0488 E5 88 SBC $88 ;SET
UP . SOMETHING SIMILAR . IT...Z.F048A A8
TAY ;IS ASSUMED. ALSO,
.HING WILL W.K ..R...F048B 60 R
TS ;YOU MOVE THE . BUFFER FROM .
1..X.P.:...Z.: B.BITS . YOU
R QI.:.B.... SOMETIMES B128 ..S ITS .T
ERS. SPEC.ICALLY, IN GRAPHICS MODE.....S
H.T.L MAY COME OUT AS SH.T.V. TWO SOLUTI
.S: (1)PUSH ., ..F...FLIP THE MODE SEVER
AL TIMES, . (2) USE CTRL.[ (THAT'S .ROL
. LEFT.....SQUARE BRACKET). D FOLLOWED B
Y CTL.[ WILL V A PROGRAM. H.EST..G....
.1,0:.1, ETC IN THE B.MACHINE DOES N O
T SUPRESS THE.Y...QUESTI. MARK.._...;.
....: UPGRADE.PET VER.IZER
FROM YOUR DISK:.....VER.IZER 2.4 DOES .
W.K IN MY 2PET. $D9 USES . NUMBER. . NUM
BERS...J.AREN'T FII CODES IN 2. . . IS .
10. CHECK . $0A AT $2A7....