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 31 20 50 41 47 45 20 33 33 |ISSUE 01 PAGE 33|
00000030: 00 69 04 0A 00 8F 20 20 20 20 20 20 20 2A 2A 2A |.i.... ***|
00000040: 2A 20 20 53 49 4D 50 4C 45 20 42 41 53 49 43 20 |* SIMPLE BASIC |
00000050: 54 45 52 4D 49 4E 41 4C 20 50 52 4F 47 52 41 4D |TERMINAL PROGRAM|
00000060: 20 20 2A 2A 2A 2A 2A 2A 2A 00 6F 04 0F 00 3A 00 | *******.o...:.|
00000070: AD 04 14 00 52 53 20 B2 20 31 34 AC 34 30 39 36 |....RS . 14.4096|
00000080: 20 AA 31 35 AC 32 35 36 20 AA 20 31 35 AC 31 36 | .15.256 . 15.16|
00000090: 20 20 20 3A 8F 20 20 20 53 55 50 45 52 50 45 54 | :. SUPERPET|
000000A0: 20 36 35 35 31 20 41 44 44 52 45 53 53 00 F5 04 | 6551 ADDRESS...|
000000B0: 1E 00 43 4E 20 B2 20 36 20 AA 20 31 36 20 AA 20 |..CN . 6 . 16 . |
000000C0: 33 32 20 AA 20 30 20 20 20 20 3A 8F 20 33 30 30 |32 . 0 :. 300|
000000D0: 20 42 41 55 44 20 2B 20 43 4C 4B 20 2B 20 37 20 | BAUD + CLK + 7 |
000000E0: 42 49 54 20 57 4F 52 44 20 2B 20 31 20 53 54 4F |BIT WORD + 1 STO|
000000F0: 50 20 42 49 54 00 31 05 1F 00 3A 20 20 20 20 20 |P BIT.1...: |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 8F 20 36 20 2B 20 31 36 20 2B 20 33 32 20 2B 20 |. 6 + 16 + 32 + |
00000120: 31 32 38 20 3D 20 32 20 53 54 4F 50 20 42 49 54 |128 = 2 STOP BIT|
00000130: 53 00 7F 05 20 00 3A 20 20 20 20 20 20 20 20 20 |S... .: |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 8F 20 38 20 | . 8 |
00000150: 2B 20 31 36 20 2B 20 33 32 20 2B 20 30 20 20 20 |+ 16 + 32 + 0 |
00000160: 3D 20 31 32 30 30 20 42 41 55 44 2C 20 47 4F 4F |= 1200 BAUD, GOO|
00000170: 44 20 4C 55 43 4B 20 49 4E 20 42 41 53 49 43 00 |D LUCK IN BASIC.|
00000180: BA 05 21 00 3A 20 20 20 20 20 20 20 20 20 20 20 |..!.: |
00000190: 20 20 20 20 20 20 20 20 20 20 8F 20 36 20 2B 20 | . 6 + |
000001A0: 31 36 20 2B 20 30 20 20 2B 20 30 20 20 20 3D 20 |16 + 0 + 0 = |
000001B0: 38 20 42 49 54 20 57 4F 52 44 00 F7 05 28 00 43 |8 BIT WORD...(.C|
000001C0: 4D 20 B2 20 39 36 20 AA 20 31 31 20 20 20 20 20 |M . 96 . 11 |
000001D0: 20 20 20 20 20 20 20 3A 8F 20 45 56 45 4E 20 50 | :. EVEN P|
000001E0: 41 52 49 54 59 20 41 4E 44 20 4E 4F 20 49 4E 54 |ARITY AND NO INT|
000001F0: 45 52 52 55 50 54 53 00 41 06 29 00 3A 20 20 20 |ERRUPTS.A.).: |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 20 8F 20 20 33 32 20 2B 20 31 31 20 | . 32 + 11 |
00000220: 3D 20 4F 44 44 20 50 41 52 49 54 59 2C 20 20 30 |= ODD PARITY, 0|
00000230: 20 2B 20 31 31 20 3D 20 4E 4F 20 50 41 52 49 54 | + 11 = NO PARIT|
00000240: 59 00 53 06 32 00 97 20 52 53 20 AA 20 32 20 2C |Y.S.2.. RS . 2 ,|
00000250: 20 43 4D 00 65 06 3C 00 97 20 52 53 20 AA 20 33 | CM.e.<.. RS . 3|
00000260: 20 2C 20 43 4E 00 7A 06 46 00 44 24 20 B2 C7 28 | , CN.z.F.D$ ..(|
00000270: 32 30 29 3A 43 24 B2 22 2E 22 00 85 06 50 00 8D |20):C$."."...P..|
00000280: 20 31 30 30 30 00 8F 06 5A 00 99 22 93 22 3B 00 | 1000...Z..".";.|
00000290: 95 06 61 00 3A 00 C7 06 62 00 8F 20 20 20 20 20 |..a.:...b.. |
000002A0: 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 20 20 20 47 45 | ******* GE|
000002B0: 54 20 43 48 41 52 41 43 54 45 52 20 49 4E 20 20 |T CHARACTER IN |
000002C0: 2A 2A 2A 2A 2A 2A 2A 00 CD 06 63 00 3A 00 05 07 |*******...c.:...|
000002D0: C8 00 41 20 B2 20 C2 28 52 53 AA 31 29 20 20 20 |..A . .(RS.1) |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002F0: 20 20 20 3A 8F 20 53 54 41 54 55 53 20 52 45 47 | :. STATUS REG|
00000300: 49 53 54 45 52 00 40 07 D2 00 8B 20 28 41 20 AF |ISTER.@.... (A .|
00000310: 20 38 29 20 B2 20 30 20 A7 20 33 30 30 20 20 20 | 8) . 0 . 300 |
00000320: 20 20 20 20 20 20 20 20 3A 8F 20 4E 4F 20 43 48 | :. NO CH|
00000330: 41 52 41 43 54 45 52 20 52 45 43 45 49 56 45 44 |ARACTER RECEIVED|
00000340: 00 7A 07 DC 00 43 52 20 B2 20 C2 28 52 53 29 20 |.z...CR . .(RS) |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000360: 20 20 20 20 20 20 3A 8F 20 52 45 43 45 49 56 45 | :. RECEIVE|
00000370: 20 43 48 41 52 41 43 54 45 52 00 BD 07 E1 00 43 | CHARACTER.....C|
00000380: 52 20 B2 20 41 50 28 43 52 29 20 20 20 20 20 20 |R . AP(CR) |
00000390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003A0: 20 20 20 3A 8F 20 41 53 43 49 49 20 54 4F 20 50 | :. ASCII TO P|
000003B0: 45 54 20 43 4F 4E 56 45 52 53 49 4F 4E 00 CA 07 |ET CONVERSION...|
000003C0: E6 00 99 20 C7 28 43 52 29 3B 00 D0 07 29 01 3A |... .(CR);...).:|
000003D0: 00 02 08 2A 01 8F 20 20 20 20 20 20 20 20 20 2A |...*.. *|
000003E0: 2A 2A 2A 2A 2A 2A 20 20 20 53 45 4E 44 20 43 48 |****** SEND CH|
000003F0: 41 52 41 43 54 45 52 20 4F 55 54 20 2A 2A 2A 2A |ARACTER OUT ****|
00000400: 2A 2A 00 08 08 2B 01 3A 00 45 08 2C 01 A1 20 41 |**...+.:.E.,.. A|
00000410: 24 3A 20 8B 20 41 24 B2 22 22 A7 20 32 30 30 20 |$: . A$."". 200 |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 47 | :. G|
00000430: 45 54 20 4B 45 59 42 4F 41 52 44 20 43 48 41 52 |ET KEYBOARD CHAR|
00000440: 41 43 54 45 52 00 54 08 36 01 43 48 20 B2 20 C6 |ACTER.T.6.CH . .|
00000450: 28 41 24 29 00 90 08 40 01 8B 20 43 48 B2 20 31 |(A$)...@.. CH. 1|
00000460: 38 20 A7 20 43 54 B2 31 3A 89 20 33 30 30 20 20 |8 . CT.1:. 300 |
00000470: 20 20 20 20 20 20 20 3A 8F 20 4E 45 58 54 20 43 | :. NEXT C|
00000480: 48 41 52 41 43 54 45 52 20 43 4F 4E 54 52 4F 4C |HARACTER CONTROL|
00000490: 00 B0 08 4A 01 8B 20 43 54 B2 31 20 A7 20 43 54 |...J.. CT.1 . CT|
000004A0: B2 30 3A 20 43 48 20 B2 20 43 48 20 AF 20 36 33 |.0: CH . CH . 63|
000004B0: 00 C0 08 54 01 41 20 B2 20 C2 28 52 53 AA 31 29 |...T.A . .(RS.1)|
000004C0: 00 FE 08 5E 01 8B 20 41 20 AF 20 31 36 20 B2 20 |...^.. A . 16 . |
000004D0: 30 20 A7 20 33 34 30 20 20 20 20 20 20 20 20 20 |0 . 340 |
000004E0: 20 20 20 20 3A 8F 20 4C 41 53 54 20 43 48 41 52 | :. LAST CHAR|
000004F0: 41 43 54 45 52 20 4E 4F 54 20 53 45 4E 54 00 0B |ACTER NOT SENT..|
00000500: 09 68 01 99 20 C7 28 43 48 29 3B 00 44 09 72 01 |.h.. .(CH);.D.r.|
00000510: 43 48 20 B2 20 50 41 28 43 48 29 20 20 20 20 20 |CH . PA(CH) |
00000520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000530: 20 20 20 20 20 3A 8F 20 50 45 54 20 54 4F 20 41 | :. PET TO A|
00000540: 53 43 49 49 00 80 09 7C 01 97 20 52 53 20 2C 20 |SCII...|.. RS , |
00000550: 43 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |CH |
00000560: 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 53 45 | :. SE|
00000570: 4E 44 20 43 48 41 52 41 43 54 45 52 20 4F 55 54 |ND CHARACTER OUT|
00000580: 00 8A 09 86 01 89 20 32 30 30 00 90 09 E5 03 3A |...... 200.....:|
00000590: 00 C9 09 E6 03 3A 8F 20 20 20 20 20 20 20 20 20 |.....:. |
000005A0: 20 20 20 41 53 43 49 49 20 54 4F 20 50 45 54 20 | ASCII TO PET |
000005B0: 54 4F 20 41 53 43 49 49 20 54 41 42 4C 45 20 43 |TO ASCII TABLE C|
000005C0: 4F 4E 56 45 52 53 49 4F 4E 00 CF 09 E7 03 3A 00 |ONVERSION.....:.|
000005D0: E5 09 E8 03 86 20 50 41 28 32 35 35 29 2C 41 50 |..... PA(255),AP|
000005E0: 28 32 35 35 29 00 1B 0A F2 03 81 20 49 B2 30 20 |(255)...... I.0 |
000005F0: A4 36 34 3A 50 41 28 49 29 B2 49 3A 41 50 28 49 |.64:PA(I).I:AP(I|
00000600: 29 B2 49 3A 82 20 20 3A 8F 20 4E 55 4D 42 45 52 |).I:. :. NUMBER|
00000610: 53 20 41 4E 44 20 53 54 55 46 46 00 2D 0A FC 03 |S AND STUFF.-...|
00000620: 81 20 49 20 B2 20 36 35 20 A4 20 39 30 00 40 0A |. I . 65 . 90.@.|
00000630: 06 04 50 41 28 49 29 20 B2 20 49 20 AA 20 33 32 |..PA(I) . I . 32|
00000640: 00 54 0A 10 04 41 50 28 49 29 20 B2 20 49 20 AA |.T...AP(I) . I .|
00000650: 20 31 32 38 00 5A 0A 1A 04 82 00 88 0A 24 04 81 | 128.Z.......$..|
00000660: 20 49 20 B2 20 39 31 20 A4 20 39 36 3A 50 41 28 | I . 91 . 96:PA(|
00000670: 49 29 B2 49 3A 41 50 28 49 29 B2 49 3A 82 3A 41 |I).I:AP(I).I:.:A|
00000680: 50 28 39 36 29 B2 34 34 00 9A 0A 2E 04 81 20 49 |P(96).44...... I|
00000690: B2 20 39 37 20 A4 20 31 32 37 00 AB 0A 42 04 41 |. 97 . 127...B.A|
000006A0: 50 28 49 29 20 B2 20 49 AB 33 32 00 B1 0A 4C 04 |P(I) . I.32...L.|
000006B0: 82 00 C5 0A 56 04 81 20 49 20 B2 20 31 39 33 20 |....V.. I . 193 |
000006C0: A4 20 32 31 38 00 D6 0A 60 04 50 41 28 49 29 B2 |. 218...`.PA(I).|
000006D0: 20 49 AB 31 32 38 00 DC 0A 6A 04 82 00 0A 0B 74 | I.128...j.....t|
000006E0: 04 41 50 28 31 32 37 29 20 B2 20 32 30 3A 20 50 |.AP(127) . 20: P|
000006F0: 41 28 32 30 29 B2 31 32 37 20 20 20 20 20 20 20 |A(20).127 |
00000700: 3A 8F 20 44 45 4C 45 54 45 53 00 3A 0B 7E 04 41 |:. DELETES.:.~.A|
00000710: 50 28 38 29 20 B2 31 35 37 3A 50 41 28 31 35 37 |P(8) .157:PA(157|
00000720: 29 B2 38 20 20 20 20 20 20 20 20 20 20 20 3A 8F |).8 :.|
00000730: 20 42 41 43 4B 53 50 41 43 45 00 65 0B 88 04 50 | BACKSPACE.e...P|
00000740: 41 28 37 29 B2 37 3A 41 50 28 37 29 B2 37 20 20 |A(7).7:AP(7).7 |
00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
00000760: 20 42 45 4C 4C 00 A0 0B 92 04 41 50 28 31 32 29 | BELL.....AP(12)|
00000770: B2 31 34 37 3A 20 50 41 28 31 34 37 29 B2 31 32 |.147: PA(147).12|
00000780: 20 20 20 20 20 20 20 20 20 3A 8F 20 43 4C 52 20 | :. CLR |
00000790: 53 43 52 45 45 4E 2F 46 4F 52 4D 20 46 45 45 44 |SCREEN/FORM FEED|
000007A0: 00 C9 0B 9C 04 41 50 28 31 30 29 B2 31 30 3A 50 |.....AP(10).10:P|
000007B0: 41 28 31 30 29 B2 31 30 20 20 20 20 20 20 20 20 |A(10).10 |
000007C0: 20 20 20 20 3A 8F 20 4C 46 00 07 0C A6 04 50 41 | :. LF.....PA|
000007D0: 28 31 33 29 B2 31 33 3A 41 50 28 31 33 29 B2 31 |(13).13:AP(13).1|
000007E0: 33 3A 50 41 28 31 34 31 29 B2 31 33 20 3A 8F 20 |3:PA(141).13 :. |
000007F0: 43 52 20 28 50 45 52 4D 49 54 53 20 53 48 49 46 |CR (PERMITS SHIF|
00000800: 54 20 4C 4F 43 4B 29 00 0D 0C B0 04 8E 00 00 00 |T LOCK).........|
..0.... THE TRANSACTOR VOLUME 4 ISSUE 01
PAGE 33.I.... **** SIMPLE BASIC
TERMINAL PROGRAM *******.O...:.....RS .
14.4096 .15.256 . 15.16 :. SUPERPET
6551 ADDRESS.....CN . 6 . 16 . 32 . 0
:. 300 BAUD + CLK + 7 BIT WORD + 1 STO
P BIT.1...: . 6 + 16
+ 32 + 128 = 2 STOP BITS.. .:
. 8 + 16 + 32 + 0 = 1200 B
AUD, GOOD LUCK IN BASIC...!.:
. 6 + 16 + 0 + 0 = 8 BIT WO
RD...(.CM . 96 . 11 :. EVEN P
ARITY AND NO INTERRUPTS.A.).:
. 32 + 11 = ODD PARITY, 0
+ 11 = NO PARITY.S.2.. RS . 2 , CM.E.<.
. RS . 3 , CN.Z.F.D$ .G(20):C$."."...P..
1000...Z..".";...A.:.G.B.. ****
*** GET CHARACTER IN *******.M.C.:...
H.A . B(RS.1) :. ST
ATUS REGISTER.@.R.. (A . 8) . 0 . 300
:. NO CHARACTER RECEIVED.Z...CR
. B(RS) :. RECEIVE
CHARACTER.....CR . AP(CR)
:. ASCII TO PET CONVERSION.J.
... G(CR);.P.).:...*.. *******
SEND CHARACTER OUT ******...+.:.E.,.. A
$: . A$."". 200 :. GET KEYBO
ARD CHARACTER.T.6.CH . F(A$)...@.. CH. 1
8 . CT.1:. 300 :. NEXT CHARACTER
CONTROL...J.. CT.1 . CT.0: CH . CH . 63
...T.A . B(RS.1)...^.. A . 16 . 0 . 340
:. LAST CHARACTER NOT SENT..
.H.. G(CH);.D.R.CH . PA(CH)
:. PET TO ASCII...|.. RS ,
CH :. SEND CHARA
CTER OUT...... 200.....:.I...:.
ASCII TO PET TO ASCII TABLE CONVERSIO
N.O...:...... PA(255),AP(255)...... I.0
.64:PA(I).I:AP(I).I:. :. NUMBERS AND ST
UFF.-.... I . 65 . 90.@...PA(I) . I . 32
.T...AP(I) . I . 128.Z.......$.. I . 91
. 96:PA(I).I:AP(I).I:.:AP(96).44...... I
. 97 . 127...B.AP(I) . I.32...L...E.V..
I . 193 . 218.V.`.PA(I). I.128...J.....T
.AP(127) . 20: PA(20).127 :. DELET
ES.:.~.AP(8) .157:PA(157).8 :.
BACKSPACE.E...PA(7).7:AP(7).7
:. BELL. ...AP(12).147: PA(147).12
:. CLR SCREEN/FORM FEED.I...AP(
10).10:PA(10).10 :. LF.....PA
(13).13:AP(13).13:PA(141).13 :. CR (PERM
ITS SHIFT LOCK).........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL