00000000: 01 04 30 04 00 00 8F 20 54 48 45 20 54 52 41 4E |..0.... THE TRAN|
00000010: 53 41 43 54 4F 52 20 56 4F 4C 55 4D 45 20 34 20 |SACTOR VOLUME 4 |
00000020: 49 53 53 55 45 20 30 34 20 50 41 47 45 20 33 32 |ISSUE 04 PAGE 32|
00000030: 00 41 04 64 00 8B 20 46 4C B2 31 20 A7 20 31 33 |.A.d.. FL.1 . 13|
00000040: 30 00 52 04 6E 00 8B 20 46 4C B2 32 20 A7 20 32 |0.R.n.. FL.2 . 2|
00000050: 36 30 00 66 04 78 00 46 4C B2 31 20 3A 20 D6 20 |60.f.x.FL.1 : . |
00000060: 22 42 41 53 43 22 00 7B 04 82 00 9E 20 35 AC 34 |"BASC".{.... 5.4|
00000070: 30 39 36 20 AA 20 38 AC 32 35 36 00 99 04 8C 00 |096 . 8.256.....|
00000080: 5C 58 3B 22 30 3A 43 4D 41 43 48 20 31 22 20 3A |\X;"0:CMACH 1" :|
00000090: 20 42 41 B2 31 38 34 33 32 00 A4 04 96 00 99 20 | BA.18432...... |
000000A0: 22 93 22 3B 00 C8 04 A0 00 81 20 49 B2 31 20 A4 |".";...... I.1 .|
000000B0: 20 38 20 3A 20 99 20 22 2A 2A 2A 2A 2A 2A 2A 2A | 8 : . "********|
000000C0: 2A 2A 22 3B 20 3A 20 82 00 ED 04 AA 00 99 20 A3 |**"; : ....... .|
000000D0: 32 39 29 3B 22 42 41 43 4B 55 50 20 41 20 48 41 |29);"BACKUP A HA|
000000E0: 52 44 20 44 49 53 4B 20 46 49 4C 45 22 00 11 05 |RD DISK FILE"...|
000000F0: B4 00 81 20 49 B2 31 20 A4 20 38 20 3A 20 99 20 |... I.1 . 8 : . |
00000100: 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B 20 3A 20 |"**********"; : |
00000110: 82 00 38 05 BE 00 99 20 3A 20 99 20 22 11 45 4E |..8.... : . ".EN|
00000120: 54 45 52 20 53 4F 55 52 43 45 20 46 49 4C 45 20 |TER SOURCE FILE |
00000130: 4E 41 4D 45 3F 20 22 3B 00 53 05 C8 00 4E B2 31 |NAME? ";.S...N.1|
00000140: 32 20 20 3A 20 8D 20 34 36 30 20 3A 20 53 46 24 |2 : . 460 : SF$|
00000150: B2 58 24 00 7C 05 D2 00 99 20 3A 20 99 20 22 11 |.X$.|.... : . ".|
00000160: 45 4E 54 45 52 20 53 4F 55 52 43 45 20 55 4E 49 |ENTER SOURCE UNI|
00000170: 54 20 4E 55 4D 42 45 52 3F 20 22 3B 00 B0 05 DC |T NUMBER? ";....|
00000180: 00 4E B2 20 32 20 20 3A 20 8D 20 34 36 30 20 3A |.N. 2 : . 460 :|
00000190: 20 53 55 B2 C5 28 58 24 29 20 3A 20 8B 20 53 55 | SU..(X$) : . SU|
000001A0: B3 38 20 B0 20 53 55 B1 31 35 20 A7 20 32 32 30 |.8 . SU.15 . 220|
000001B0: 00 DE 05 E6 00 99 20 3A 20 99 20 22 11 45 4E 54 |...... : . ".ENT|
000001C0: 45 52 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 55 |ER DESTINATION U|
000001D0: 4E 49 54 20 4E 55 4D 42 45 52 3F 20 22 3B 00 13 |NIT NUMBER? ";..|
000001E0: 06 F0 00 4E B2 20 32 20 20 3A 20 8D 20 34 36 30 |...N. 2 : . 460|
000001F0: 20 3A 20 44 55 B2 C5 28 58 24 29 20 3A 20 8B 44 | : DU..(X$) : .D|
00000200: 55 B3 38 B0 44 55 B1 31 35 B0 53 55 B2 44 55 A7 |U.8.DU.15.SU.DU.|
00000210: 32 34 30 00 37 06 FA 00 46 4C B2 32 20 3A 20 D6 |240.7...FL.2 : .|
00000220: 28 53 46 24 AA 22 2E 53 43 52 22 29 2C 20 44 30 |(SF$.".SCR"), D0|
00000230: 2C 20 55 28 53 55 29 00 68 06 04 01 9E 20 42 41 |, U(SU).h.... BA|
00000240: 20 3A 20 4E 52 B2 C2 28 32 37 36 33 35 29 AA C2 | : NR..(27635)..|
00000250: 28 32 37 36 33 36 29 AC 32 35 36 20 3A 52 4C B2 |(27636).256 :RL.|
00000260: C2 28 32 37 36 33 34 29 00 9A 06 0E 01 59 31 B2 |.(27634).....Y1.|
00000270: C2 28 32 31 36 29 20 3A 20 58 31 B2 C2 28 31 39 |.(216) : X1..(19|
00000280: 38 29 3A CD 23 31 2C 28 53 46 24 29 2C 44 30 2C |8):.#1,(SF$),D0,|
00000290: 55 28 53 55 29 3A 44 4E B2 30 00 D9 06 18 01 99 |U(SU):DN.0......|
000002A0: 20 3A 20 99 20 22 11 44 4F 20 59 4F 55 20 57 49 | : . ".DO YOU WI|
000002B0: 53 48 20 54 4F 20 46 4F 52 4D 41 54 20 54 48 45 |SH TO FORMAT THE|
000002C0: 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 44 49 53 | DESTINATION DIS|
000002D0: 4B 45 54 54 45 3F 20 22 3B 00 05 07 22 01 4E B2 |KETTE? ";...".N.|
000002E0: 20 31 20 3A 20 8D 20 34 36 30 20 3A 20 8B 20 58 | 1 : . 460 : . X|
000002F0: 24 B3 B1 22 59 22 AF 20 58 24 B3 B1 22 4E 22 20 |$.."Y". X$.."N" |
00000300: A7 20 32 39 30 00 1A 07 2C 01 8B 20 58 24 B2 22 |. 290...,.. X$."|
00000310: 59 22 20 A7 20 8D 20 35 34 30 00 2D 07 36 01 44 |Y" . . 540.-.6.D|
00000320: 24 B2 22 30 22 20 3A 20 8D 20 35 38 30 00 54 07 |$."0" : . 580.T.|
00000330: 40 01 54 52 B2 B5 28 46 42 AC 32 35 34 AD 28 52 |@.TR..(FB.254.(R|
00000340: 4C AA 31 29 29 20 3A 20 8B 20 54 52 B2 30 20 A7 |L.1)) : . TR.0 .|
00000350: 20 33 39 30 00 84 07 4A 01 44 4E B2 44 4E AA 31 | 390...J.DN.DN.1|
00000360: 20 3A 20 CD 23 32 2C 28 22 40 22 AA 53 46 24 AA | : .#2,("@".SF$.|
00000370: C4 28 44 4E 29 29 2C 20 44 30 2C 20 55 28 44 55 |.(DN)), D0, U(DU|
00000380: 29 2C 20 57 00 C0 07 54 01 8B 20 44 4E B2 31 20 |), W...T.. DN.1 |
00000390: A7 20 CD 23 33 2C 22 46 49 4C 45 20 44 41 54 41 |. .#3,"FILE DATA|
000003A0: 22 2C 20 44 30 2C 20 55 28 44 55 29 2C 20 57 20 |", D0, U(DU), W |
000003B0: 3A 20 98 33 2C 4E 52 2C 52 4C 20 3A 20 CE 23 33 |: .3,NR,RL : .#3|
000003C0: 00 D7 07 5E 01 81 20 49 B2 31 20 A4 20 54 52 20 |...^.. I.1 . TR |
000003D0: 3A 20 58 24 B2 22 22 00 0D 08 68 01 5C 49 2C 31 |: X$.""...h.\I,1|
000003E0: 2C 58 24 20 3A 20 58 24 B2 58 24 20 3A 20 8B 20 |,X$ : X$.X$ : . |
000003F0: 58 24 B2 C7 28 32 35 35 29 20 A7 20 CE 23 31 20 |X$..(255) . .#1 |
00000400: 3A 20 CE 23 32 20 3A 20 89 20 34 34 30 00 26 08 |: .#2 : . 440.&.|
00000410: 72 01 4D 45 24 B2 22 16 22 AA C4 28 49 29 20 3A |r.ME$."."..(I) :|
00000420: 20 8D 20 35 31 30 00 4D 08 7C 01 98 32 2C 58 24 | . 510.M.|..2,X$|
00000430: 20 3A 20 82 49 20 3A 20 CE 23 32 20 3A 20 4D 45 | : .I : .#2 : ME|
00000440: 24 B2 22 16 22 20 3A 20 8D 20 35 31 30 00 82 08 |$."." : . 510...|
00000450: 86 01 99 20 3A 20 99 20 22 11 07 07 07 07 49 53 |... : . ".....IS|
00000460: 20 41 4E 4F 54 48 45 52 20 42 41 43 4B 55 50 20 | ANOTHER BACKUP |
00000470: 44 49 53 4B 45 54 54 45 20 52 45 41 44 59 3F 20 |DISKETTE READY? |
00000480: 22 3B 00 A4 08 90 01 4E B2 31 20 3A 20 8D 20 34 |";.....N.1 : . 4|
00000490: 36 30 20 3A 20 8B 20 58 24 B3 B1 22 59 22 20 A7 |60 : . X$.."Y" .|
000004A0: 20 34 30 30 00 C6 08 9A 01 97 32 31 36 2C 20 59 | 400......216, Y|
000004B0: 31 20 3A 20 97 31 39 38 2C 20 58 31 20 3A 20 9E |1 : .198, X1 : .|
000004C0: 20 35 37 34 34 37 00 E0 08 A4 01 81 20 49 B2 31 | 57447...... I.1|
000004D0: 20 A4 20 35 20 3A 20 99 22 16 22 20 3A 20 82 49 | . 5 : ."." : .I|
000004E0: 00 0A 09 AE 01 97 32 31 36 2C 20 59 31 20 3A 20 |......216, Y1 : |
000004F0: 97 31 39 38 2C 20 58 31 20 3A 20 9E 20 35 37 34 |.198, X1 : . 574|
00000500: 34 37 20 3A 20 89 20 32 38 30 00 39 09 B8 01 4D |47 : . 280.9...M|
00000510: 45 24 B2 22 46 49 4E 49 53 48 45 44 20 42 41 43 |E$."FINISHED BAC|
00000520: 4B 49 4E 47 20 55 50 20 54 48 45 20 46 49 4C 45 |KING UP THE FILE|
00000530: 22 20 3A 20 8D 20 35 31 30 00 50 09 C2 01 5C 58 |" : . 510.P...\X|
00000540: 2C 22 30 3A 54 48 45 20 4D 41 4E 41 47 45 52 22 |,"0:THE MANAGER"|
00000550: 00 68 09 CC 01 59 B2 C2 28 32 31 36 29 20 3A 20 |.h...Y..(216) : |
00000560: 58 B2 C2 28 31 39 38 29 00 85 09 D6 01 58 24 B2 |X..(198).....X$.|
00000570: 22 22 20 3A 20 9E 20 42 41 AA 35 37 2C 20 59 2C |"" : . BA.57, Y,|
00000580: 20 58 2C 20 4E 00 96 09 E0 01 8B 20 58 24 B2 22 | X, N...... X$."|
00000590: D1 22 20 A7 20 8A 00 B9 09 EA 01 8B 20 58 24 B2 |." . ....... X$.|
000005A0: 22 51 22 20 A7 3A 20 5C 58 2C 22 30 3A 54 48 45 |"Q" .: \X,"0:THE|
000005B0: 20 4D 41 4E 41 47 45 52 22 00 BF 09 F4 01 8E 00 | MANAGER".......|
000005C0: D9 09 FE 01 59 58 B2 C2 28 32 31 36 29 20 3A 20 |....YX..(216) : |
000005D0: 58 58 B2 C2 28 31 39 38 29 00 FE 09 08 02 4D 45 |XX..(198).....ME|
000005E0: 24 B2 4D 45 24 AA 22 22 20 3A 20 9E 20 42 41 AA |$.ME$."" : . BA.|
000005F0: 36 30 2C 20 32 34 2C 20 30 2C 20 4D 45 24 00 26 |60, 24, 0, ME$.&|
00000600: 0A 12 02 97 20 32 31 36 2C 20 59 58 20 3A 20 97 |.... 216, YX : .|
00000610: 20 31 39 38 2C 20 58 58 20 3A 20 9E 20 35 37 34 | 198, XX : . 574|
00000620: 34 37 20 3A 20 8E 00 4C 0A 1C 02 4D 45 24 B2 22 |47 : ..L...ME$."|
00000630: 46 4F 52 4D 41 54 54 49 4E 47 20 44 49 53 4B 45 |FORMATTING DISKE|
00000640: 54 54 45 22 20 3A 20 8D 20 35 31 30 00 8C 0A 26 |TTE" : . 510...&|
00000650: 02 41 24 B2 22 4E 30 3A 22 AA 53 46 24 AA 22 2C |.A$."N0:".SF$.",|
00000660: 22 AA C9 28 22 20 22 AA C4 28 44 4E 29 2C 32 29 |"..(" "..(DN),2)|
00000670: 20 3A 20 9F 20 31 35 2C 20 28 44 55 29 2C 20 31 | : . 15, (DU), 1|
00000680: 35 2C 20 41 24 20 3A 20 A0 20 31 35 00 A0 0A 30 |5, A$ : . 15...0|
00000690: 02 4D 45 24 B2 22 16 22 20 3A 20 8D 20 35 31 30 |.ME$."." : . 510|
000006A0: 00 A6 0A 3A 02 8E 00 E8 0A 44 02 58 24 B2 22 24 |...:.....D.X$."$|
000006B0: 22 AA 44 24 AA 22 3A 23 24 25 26 27 22 20 3A 20 |".D$.":#$%&'" : |
000006C0: 9F 20 33 2C 20 28 44 55 29 2C 20 30 2C 20 58 24 |. 3, (DU), 0, X$|
000006D0: 20 3A 20 A1 23 33 2C 58 24 2C 58 24 2C 58 24 2C | : .#3,X$,X$,X$,|
000006E0: 58 24 2C 58 24 2C 58 24 00 06 0B 4E 02 A1 23 33 |X$,X$,X$...N..#3|
000006F0: 2C 58 24 20 3A 20 8B 20 C3 28 58 24 29 B3 B1 30 |,X$ : . .(X$)..0|
00000700: 20 89 20 35 39 30 00 34 0B 58 02 A1 23 33 2C 58 | . 590.4.X..#3,X|
00000710: 24 2C 58 24 2C 58 24 2C 59 24 20 3A 20 58 B2 C3 |$,X$,X$,Y$ : X..|
00000720: 28 58 24 29 20 3A 20 8B 20 58 20 A7 20 58 B2 C6 |(X$) : . X . X..|
00000730: 28 58 24 29 00 50 0B 62 02 59 B2 C3 28 59 24 29 |(X$).P.b.Y..(Y$)|
00000740: 20 3A 20 8B 20 59 20 A7 20 59 B2 C6 28 59 24 29 | : . Y . Y..(Y$)|
00000750: 00 6B 0B 6C 02 46 42 B2 58 AA 59 AC 32 35 36 AB |.k.l.FB.X.Y.256.|
00000760: 35 20 3A 20 A0 20 33 20 3A 20 8E 00 00 00 |5 : . 3 : .... |
..0.... THE TRANSACTOR VOLUME 4 ISSUE 04
PAGE 32.A.D.. FL.1 . 130.R.N.. FL.2 . 2
60.F.X.FL.1 : V "BASC".{.... 5.4096 . 8.
256.....\X;"0:CMACH 1" : BA.18432......
".";.H. .. I.1 . 8 : . "**********"; : .
...... .29);"BACKUP A HARD DISK FILE"...
... I.1 . 8 : . "**********"; : ..8....
: . ".ENTER SOURCE FILE NAME? ";.S.H.N.1
2 : . 460 : SF$.X$.|.R.. : . ".ENTER SO
URCE UNIT NUMBER? ";.....N. 2 : . 460 :
SU.E(X$) : . SU.8 . SU.15 . 220...... :
. ".ENTER DESTINATION UNIT NUMBER? ";..
...N. 2 : . 460 : DU.E(X$) : .DU.8.DU.1
5.SU.DU.240.7...FL.2 : V(SF$.".SCR"), D0
, U(SU).H.... BA : NR.B(27635).B(27636).
256 :RL.B(27634).....Y1.B(216) : X1.B(19
8):M#1,(SF$),D0,U(SU):DN.0.Y.... : . ".D
O YOU WISH TO FORMAT THE DESTINATION DIS
KETTE? ";...".N. 1 : . 460 : . X$.."Y".
X$.."N" . 290...,.. X$."Y" . . 540.-.6.D
$."0" : . 580.T.@.TR..(FB.254.(RL.1)) :
. TR.0 . 390...J.DN.DN.1 : M#2,("@".SF$.
D(DN)), D0, U(DU), W...T.. DN.1 . M#3,"F
ILE DATA", D0, U(DU), W : .3,NR,RL : N#3
.W.^.. I.1 . TR : X$.""...H.\I,1,X$ : X$
.X$ : . X$.G(255) . N#1 : N#2 : . 440.&.
R.ME$.".".D(I) : . 510.M.|..2,X$ : .I :
N#2 : ME$."." : . 510...... : . ".....IS
ANOTHER BACKUP DISKETTE READY? ";.....N
.1 : . 460 : . X$.."Y" . 400.F....216, Y
1 : .198, X1 : . 57447...... I.1 . 5 : .
"." : .I......216, Y1 : .198, X1 : . 574
47 : . 280.9...ME$."FINISHED BACKING UP
THE FILE" : . 510.P.B.\X,"0:THE MANAGER"
.H.L.Y.B(216) : X.B(198)...V.X$."" : . B
A.57, Y, X, N...... X$."Q" . ....... X$.
"Q" .: \X,"0:THE MANAGER".......Y...YX.B
(216) : XX.B(198).....ME$.ME$."" : . BA.
60, 24, 0, ME$.&.... 216, YX : . 198, XX
: . 57447 : ..L...ME$."FORMATTING DISKE
TTE" : . 510...&.A$."N0:".SF$.",".I(" ".
D(DN),2) : . 15, (DU), 15, A$ : 15. .0
.ME$."." : . 510...:.....D.X$."$".D$.":#
$%&'" : . 3, (DU), 0, X$ : .#3,X$,X$,X$,
X$,X$,X$...N..#3,X$ : . C(X$)..0 . 590.4
.X..#3,X$,X$,X$,Y$ : X.C(X$) : . X . X.F
(X$).P.B.Y.C(Y$) : . Y . Y.F(Y$).K.L.FB.
X.Y.256.5 : 3 : ....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL