00000000: 01 08 13 08 0A 00 99 C7 28 31 34 37 29 C7 28 31 |........(147).(1|
00000010: 35 36 29 00 29 08 0C 00 97 35 33 32 38 30 2C 30 |56).)....53280,0|
00000020: 3A 97 35 33 32 38 31 2C 30 00 4A 08 0E 00 99 A3 |:.53281,0.J.....|
00000030: 39 29 22 44 41 54 41 20 54 52 41 4E 53 46 45 52 |9)"DATA TRANSFER|
00000040: 20 52 4F 55 54 49 4E 45 53 22 00 5A 08 10 00 99 | ROUTINES".Z....|
00000050: 3A 99 3A 99 C7 28 31 35 39 29 00 84 08 12 00 99 |:.:..(159)......|
00000060: A3 32 29 22 54 48 45 53 45 20 54 57 4F 20 52 4F |.2)"THESE TWO RO|
00000070: 55 54 49 4E 45 53 20 57 49 4C 4C 20 43 4C 45 41 |UTINES WILL CLEA|
00000080: 52 4C 59 22 00 8A 08 14 00 99 00 B7 08 16 00 99 |RLY"............|
00000090: A3 32 29 22 44 45 4D 4F 53 54 52 41 54 45 20 54 |.2)"DEMOSTRATE T|
000000A0: 48 45 20 41 44 56 41 4E 54 41 47 45 53 20 49 4E |HE ADVANTAGES IN|
000000B0: 20 55 53 49 4E 47 22 00 BD 08 18 00 99 00 EA 08 | USING".........|
000000C0: 1A 00 99 A3 32 29 22 41 20 4D 41 43 48 49 4E 45 |....2)"A MACHINE|
000000D0: 20 43 4F 44 45 20 52 4F 55 54 49 4E 45 20 54 4F | CODE ROUTINE TO|
000000E0: 20 54 52 41 4E 53 46 45 52 22 00 F0 08 1C 00 99 | TRANSFER"......|
000000F0: 00 1F 09 1E 00 99 A3 32 29 22 54 48 45 20 43 48 |.......2)"THE CH|
00000100: 41 52 41 43 54 45 52 20 53 45 54 20 46 52 4F 4D |ARACTER SET FROM|
00000110: 20 52 4F 4D 20 49 4E 54 4F 20 52 41 4D 2E 22 00 | ROM INTO RAM.".|
00000120: 2F 09 20 00 99 3A 99 3A 99 C7 28 31 35 32 29 00 |/. ..:.:..(152).|
00000130: 53 09 22 00 99 A3 37 29 22 54 52 41 4E 53 46 45 |S."...7)"TRANSFE|
00000140: 52 20 4F 46 20 44 41 54 41 20 42 59 20 42 41 53 |R OF DATA BY BAS|
00000150: 49 43 22 00 5B 09 24 00 8D 36 30 00 67 09 26 00 |IC".[.$..60.g.&.|
00000160: 99 C7 28 31 32 39 29 00 94 09 28 00 99 A3 37 29 |..(129)...(...7)|
00000170: 22 54 49 4D 45 20 54 41 4B 45 4E 2E 2E 2E 2E 2E |"TIME TAKEN.....|
00000180: 2E 2E 20 22 3B C7 28 31 35 38 29 22 37 32 20 53 |.. ";.(158)"72 S|
00000190: 45 43 53 22 00 A2 09 2A 00 99 3A 99 C7 28 31 35 |ECS"...*..:..(15|
000001A0: 32 29 00 CD 09 2C 00 99 A3 34 29 22 54 52 41 4E |2)...,...4)"TRAN|
000001B0: 53 46 45 52 20 4F 46 20 44 41 54 41 20 42 59 20 |SFER OF DATA BY |
000001C0: 4D 41 43 48 49 4E 45 20 43 4F 44 45 22 00 D8 09 |MACHINE CODE"...|
000001D0: 2E 00 99 C7 28 33 30 29 00 E0 09 30 00 8D 38 32 |....(30)...0..82|
000001E0: 00 19 0A 32 00 99 A3 37 29 22 54 49 4D 45 20 54 |...2...7)"TIME T|
000001F0: 41 4B 45 4E 2E 2E 2E 2E 2E 2E 2E 20 22 3B C7 28 |AKEN....... ";.(|
00000200: 31 35 33 29 3B B5 28 28 54 32 AB 54 31 29 AD 36 |153);.((T2.T1).6|
00000210: 30 29 3B 22 53 45 43 53 22 00 21 0A 34 00 89 35 |0);"SECS".!.4..5|
00000220: 32 00 27 0A 36 00 3A 00 46 0A 38 00 8F 20 2A 2A |2.'.6.:.F.8.. **|
00000230: 20 42 41 53 49 43 20 43 4F 44 45 20 52 4F 55 54 | BASIC CODE ROUT|
00000240: 49 4E 45 20 2A 2A 00 4C 0A 3A 00 3A 00 5E 0A 3C |INE **.L.:.:.^.<|
00000250: 00 97 35 32 2C 34 38 3A 97 35 36 2C 34 38 00 76 |..52,48:.56,48.v|
00000260: 0A 3E 00 97 35 36 33 33 34 2C C2 28 35 36 33 33 |.>..56334,.(5633|
00000270: 34 29 AF 32 35 34 00 86 0A 40 00 97 31 2C C2 28 |4).254...@..1,.(|
00000280: 31 29 AF 32 35 31 00 AA 0A 42 00 81 49 B2 30 A4 |1).251...B..I.0.|
00000290: 34 30 39 35 3A 97 31 32 32 38 38 AA 49 2C C2 28 |4095:.12288.I,.(|
000002A0: 35 33 32 34 38 AA 49 29 3A 82 00 B8 0A 44 00 97 |53248.I):....D..|
000002B0: 31 2C C2 28 31 29 B0 34 00 CE 0A 46 00 97 35 36 |1,.(1).4...F..56|
000002C0: 33 33 34 2C C2 28 35 36 33 33 34 29 B0 31 00 EB |334,.(56334).1..|
000002D0: 0A 48 00 97 35 33 32 37 32 2C 28 C2 28 35 33 32 |.H..53272,(.(532|
000002E0: 37 32 29 AF 32 34 30 29 B0 31 32 00 F1 0A 4A 00 |72).240).12...J.|
000002F0: 8E 00 F7 0A 4C 00 3A 00 18 0B 4E 00 8F 20 2A 2A |....L.:...N.. **|
00000300: 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 20 52 4F | MACHINE CODE RO|
00000310: 55 54 49 4E 45 20 2A 2A 00 1E 0B 50 00 3A 00 32 |UTINE **...P.:.2|
00000320: 0B 52 00 54 B2 30 3A 53 55 4D B2 30 3A 54 31 B2 |.R.T.0:SUM.0:T1.|
00000330: 54 49 00 5F 0B 54 00 87 41 3A 8B 41 B3 B1 AB 31 |TI._.T..A:.A...1|
00000340: A7 97 34 39 31 35 32 AA 54 2C 41 3A 54 B2 54 AA |..49152.T,A:T.T.|
00000350: 31 3A 53 55 4D B2 53 55 4D AA 41 3A 89 38 34 00 |1:SUM.SUM.A:.84.|
00000360: 82 0B 56 00 8B 53 55 4D B3 B1 31 35 33 39 32 A7 |..V..SUM..15392.|
00000370: 99 22 45 52 52 4F 52 20 49 4E 20 44 41 54 41 22 |."ERROR IN DATA"|
00000380: 3A 90 00 93 0B 58 00 9E 34 39 31 35 32 3A 54 32 |:....X..49152:T2|
00000390: B2 54 49 00 99 0B 5A 00 8E 00 9F 0B 5C 00 3A 00 |.TI...Z.....\.:.|
000003A0: C9 0B 5E 00 8F 20 2A 2A 20 44 41 54 41 20 46 4F |..^.. ** DATA FO|
000003B0: 52 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 20 52 |R MACHINE CODE R|
000003C0: 4F 55 54 49 4E 45 20 2A 2A 00 CF 0B 60 00 3A 00 |OUTINE **...`.:.|
000003D0: 0A 0C 62 00 83 31 36 39 2C 34 38 2C 31 34 31 2C |..b..169,48,141,|
000003E0: 35 32 2C 30 2C 31 34 31 2C 35 36 2C 30 2C 31 36 |52,0,141,56,0,16|
000003F0: 39 2C 32 35 34 2C 34 35 2C 31 34 2C 32 32 30 2C |9,254,45,14,220,|
00000400: 31 34 31 2C 31 34 2C 32 32 30 00 3F 0C 64 00 83 |141,14,220.?.d..|
00000410: 31 36 39 2C 32 35 31 2C 34 35 2C 31 2C 30 2C 31 |169,251,45,1,0,1|
00000420: 34 31 2C 31 2C 30 2C 31 36 32 2C 30 2C 31 38 39 |41,1,0,162,0,189|
00000430: 2C 30 2C 32 30 38 2C 31 35 37 2C 30 2C 34 38 00 |,0,208,157,0,48.|
00000440: 78 0C 66 00 83 31 38 39 2C 30 2C 32 30 39 2C 31 |x.f..189,0,209,1|
00000450: 35 37 2C 30 2C 34 39 2C 31 38 39 2C 30 2C 32 31 |57,0,49,189,0,21|
00000460: 30 2C 31 35 37 2C 30 2C 35 30 2C 31 38 39 2C 30 |0,157,0,50,189,0|
00000470: 2C 32 31 31 2C 31 35 37 00 AE 0C 68 00 83 30 2C |,211,157...h..0,|
00000480: 35 31 2C 31 38 39 2C 30 2C 32 31 32 2C 31 35 37 |51,189,0,212,157|
00000490: 2C 30 2C 35 32 2C 31 38 39 2C 30 2C 32 31 33 2C |,0,52,189,0,213,|
000004A0: 31 35 37 2C 30 2C 35 33 2C 31 38 39 2C 30 00 E6 |157,0,53,189,0..|
000004B0: 0C 6A 00 83 32 31 34 2C 31 35 37 2C 30 2C 35 34 |.j..214,157,0,54|
000004C0: 2C 31 38 39 2C 30 2C 32 31 35 2C 31 35 37 2C 30 |,189,0,215,157,0|
000004D0: 2C 35 35 2C 31 38 39 2C 30 2C 32 31 36 2C 31 35 |,55,189,0,216,15|
000004E0: 37 2C 30 2C 35 36 00 1F 0D 6C 00 83 31 38 39 2C |7,0,56...l..189,|
000004F0: 30 2C 32 31 37 2C 31 35 37 2C 30 2C 35 37 2C 31 |0,217,157,0,57,1|
00000500: 38 39 2C 30 2C 32 31 38 2C 31 35 37 2C 30 2C 35 |89,0,218,157,0,5|
00000510: 38 2C 31 38 39 2C 30 2C 32 31 39 2C 31 35 37 00 |8,189,0,219,157.|
00000520: 55 0D 6E 00 83 30 2C 35 39 2C 31 38 39 2C 30 2C |U.n..0,59,189,0,|
00000530: 32 32 30 2C 31 35 37 2C 30 2C 36 30 2C 31 38 39 |220,157,0,60,189|
00000540: 2C 30 2C 32 32 31 2C 31 35 37 2C 30 2C 36 31 2C |,0,221,157,0,61,|
00000550: 31 38 39 2C 30 00 8E 0D 70 00 83 32 32 32 2C 31 |189,0...p..222,1|
00000560: 35 37 2C 30 2C 36 32 2C 31 38 39 2C 30 2C 32 32 |57,0,62,189,0,22|
00000570: 33 2C 31 35 37 2C 30 2C 36 33 2C 32 33 32 2C 32 |3,157,0,63,232,2|
00000580: 34 30 2C 33 2C 37 36 2C 32 36 2C 31 39 32 00 C3 |40,3,76,26,192..|
00000590: 0D 72 00 83 31 36 39 2C 34 2C 31 33 2C 31 2C 30 |.r..169,4,13,1,0|
000005A0: 2C 31 34 31 2C 31 2C 30 2C 31 36 39 2C 31 2C 31 |,141,1,0,169,1,1|
000005B0: 33 2C 31 34 2C 32 32 30 2C 31 34 31 2C 31 34 2C |3,14,220,141,14,|
000005C0: 32 32 30 00 ED 0D 74 00 83 31 36 39 2C 32 34 30 |220...t..169,240|
000005D0: 2C 34 35 2C 32 34 2C 32 30 38 2C 39 2C 31 32 2C |,45,24,208,9,12,|
000005E0: 31 34 31 2C 32 34 2C 32 30 38 2C 39 36 00 F5 0D |141,24,208,96...|
000005F0: 76 00 83 2D 31 00 FB 0D 78 00 3A 00 01 0E 7A 00 |v..-1...x.:...z.|
00000600: 3A 00 1D 0E 7C 00 8F 20 23 23 23 23 23 23 23 23 |:...|.. ########|
00000610: 23 23 23 23 23 23 23 23 23 23 23 23 23 00 39 0E |#############.9.|
00000620: 7E 00 8F 20 23 23 23 23 23 23 23 23 23 23 23 23 |~.. ############|
00000630: 23 23 23 23 23 23 23 23 23 00 55 0E 80 00 8F 20 |#########.U.... |
00000640: 23 23 23 20 20 20 20 20 20 20 20 20 20 20 20 20 |### |
00000650: 20 20 23 23 23 00 71 0E 82 00 8F 20 23 23 23 20 | ###.q.... ### |
00000660: 44 41 54 41 20 54 52 41 4E 53 46 45 52 20 23 23 |DATA TRANSFER ##|
00000670: 23 00 8D 0E 84 00 8F 20 23 23 23 20 20 20 20 20 |#...... ### |
00000680: 20 20 20 20 20 20 20 20 20 20 23 23 23 00 A9 0E | ###...|
00000690: 86 00 8F 20 23 23 23 20 43 4F 4D 4D 4F 44 4F 52 |... ### COMMODOR|
000006A0: 45 20 20 36 34 20 23 23 23 00 C5 0E 88 00 8F 20 |E 64 ###...... |
000006B0: 23 23 23 20 20 20 20 20 20 20 20 20 20 20 20 20 |### |
000006C0: 20 20 23 23 23 00 E1 0E 8A 00 8F 20 23 23 23 20 | ###...... ### |
000006D0: 20 20 4C 45 53 20 41 4C 4C 41 4E 20 20 20 23 23 | LES ALLAN ##|
000006E0: 23 00 FD 0E 8C 00 8F 20 23 23 23 20 20 20 20 20 |#...... ### |
000006F0: 20 20 20 20 20 20 20 20 20 20 23 23 23 00 19 0F | ###...|
00000700: 8E 00 8F 20 23 23 23 20 20 20 20 39 2E 31 32 2E |... ### 9.12.|
00000710: 38 33 20 20 20 20 23 23 23 00 35 0F 90 00 8F 20 |83 ###.5.... |
00000720: 23 23 23 20 20 20 20 20 20 20 20 20 20 20 20 20 |### |
00000730: 20 20 23 23 23 00 51 0F 92 00 8F 20 23 23 23 23 | ###.Q.... ####|
00000740: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00000750: 23 00 6D 0F 94 00 8F 20 23 23 23 23 23 23 23 23 |#.m.... ########|
00000760: 23 23 23 23 23 23 23 23 23 23 23 23 23 00 00 29 |#############..)|
.......G(147)G(156).)....53280,0:.53281,
0.J.....9)"DATA TRANSFER ROUTINES".Z....
:.:.G(159).......2)"THESE TWO ROUTINES W
ILL CLEARLY".............2)"DEMOSTRATE T
HE ADVANTAGES IN USING".............2)"A
MACHINE CODE ROUTINE TO TRANSFER"......
.......2)"THE CHARACTER SET FROM ROM INT
O RAM."./. ..:.:.G(152).S."...7)"TRANSFE
R OF DATA BY BASIC".[.$..60.G.&..G(129).
..(...7)"TIME TAKEN....... ";G(158)"72 S
ECS"...*..:.G(152).M.,...4)"TRANSFER OF
DATA BY MACHINE CODE".X....G(30)...0..82
...2...7)"TIME TAKEN....... ";G(153);.((
T2.T1).60);"SECS".!.4..52.'.6.:.F.8.. **
BASIC CODE ROUTINE **.L.:.:.^.<..52,48:
.56,48.V.>..56334,B(56334).254...@..1,B(
1).251...B..I.0.4095:.12288.I,B(53248.I)
:....D..1,B(1).4.N.F..56334,B(56334).1..
.H..53272,(B(53272).240).12...J.....L.:.
..N.. ** MACHINE CODE ROUTINE **...P.:.2
.R.T.0:SUM.0:T1.TI._.T..A:.A...1..49152.
T,A:T.T.1:SUM.SUM.A:.84...V..SUM..15392.
."ERROR IN DATA":....X..49152:T2.TI...Z.
....\.:.I.^.. ** DATA FOR MACHINE CODE R
OUTINE **.O.`.:...B..169,48,141,52,0,141
,56,0,169,254,45,14,220,141,14,220.?.D..
169,251,45,1,0,141,1,0,162,0,189,0,208,1
57,0,48.X.F..189,0,209,157,0,49,189,0,21
0,157,0,50,189,0,211,157...H..0,51,189,0
,212,157,0,52,189,0,213,157,0,53,189,0..
.J..214,157,0,54,189,0,215,157,0,55,189,
0,216,157,0,56...L..189,0,217,157,0,57,1
89,0,218,157,0,58,189,0,219,157.U.N..0,5
9,189,0,220,157,0,60,189,0,221,157,0,61,
189,0...P..222,157,0,62,189,0,223,157,0,
63,232,240,3,76,26,192.C.R..169,4,13,1,0
,141,1,0,169,1,13,14,220,141,14,220...T.
.169,240,45,24,208,9,12,141,24,208,96...
V..-1...X.:...Z.:...|.. ################
#####.9.~.. #####################.U....
### ###.Q.... ### DATA TRA
NSFER ###...... ### ###...
... ### COMMODORE 64 ###.E.... ###
###...... ### LES ALLAN ##
#...... ### ###...... ###
9.12.83 ###.5.... ###
###.Q.... #####################.M....
#####################..)