_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

RS232-INTERFACE

FILE INFORMATION

FILENAME(S): RS232-INTERFACE

FILE TYPE(S): PRG

FILE SIZE: 2K

FIRST SEEN: 2025-11-30 21:13:21

APPEARS ON: 2 disk(s)

FILE HASH

8bfe5556186f57e6434b3f0c80ce3c0209a9a468d75f24ee5808cf9bad405095

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
64 ER SEPT 84 RS232-INTERFACE PRG DuncanTwain 12 14 DOWNLOAD FILE
64 ER SEPT 84 RS232-INTERFACE PRG DuncanTwain 12 14 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1C 08 64 00 8F 20  52 53 20 32 33 32 20 53  |....d.. RS 232 S|
00000010: 43 48 4E 49 54 54 53 54  45 4C 4C 45 00 2B 08 6E  |CHNITTSTELLE.+.n|
00000020: 00 8F 20 31 33 2E 30 32  2E 38 34 00 46 08 78 00  |.. 13.02.84.F.x.|
00000030: 8F 20 28 43 29 20 48 2E  2D 4A 2E 20 4B 45 4C 4C  |. (C) H.-J. KELL|
00000040: 45 52 4D 41 4E 4E 00 63  08 82 00 8F 20 41 4E 46  |ERMANN.c.... ANF|
00000050: 41 4E 47 53 57 45 52 54  45 20 46 45 53 54 4C 45  |ANGSWERTE FESTLE|
00000060: 47 45 4E 00 98 08 8C 00  4B 28 30 29 B2 30 3A 4B  |GEN.....K(0).0:K|
00000070: 28 31 29 B2 36 3A 4B 28  32 29 B2 30 3A 4B 28 33  |(1).6:K(2).0:K(3|
00000080: 29 B2 30 3A 4B 28 34 29  B2 30 3A 4B 28 35 29 B2  |).0:K(4).0:K(5).|
00000090: 30 3A 4B 28 36 29 B2 30  00 DC 08 96 00 83 36 2C  |0:K(6).0......6,|
000000A0: 22 22 2C 22 54 45 53 54  2D 52 4F 55 54 49 4E 45  |"","TEST-ROUTINE|
000000B0: 22 2C 22 42 41 55 44 2D  52 41 54 45 22 2C 22 44  |","BAUD-RATE","D|
000000C0: 41 54 45 4E 57 4F 52 54  2D 4C 41 45 4E 47 45 22  |ATENWORT-LAENGE"|
000000D0: 2C 22 53 54 4F 50 2D 42  49 54 53 22 00 14 09 A0  |,"STOP-BITS"....|
000000E0: 00 83 22 48 41 4E 44 53  48 41 4B 45 22 2C 22 55  |.."HANDSHAKE","U|
000000F0: 45 42 45 52 54 52 41 47  55 4E 47 53 41 52 54 22  |EBERTRAGUNGSART"|
00000100: 2C 22 50 41 52 49 54 41  45 54 53 50 52 55 45 46  |,"PARITAETSPRUEF|
00000110: 55 4E 47 22 00 59 09 AA  00 83 31 30 2C 22 42 41  |UNG".Y....10,"BA|
00000120: 55 44 22 2C 22 20 41 4E  57 2E 20 22 2C 22 20 20  |UD"," ANW. ","  |
00000130: 35 30 20 20 22 2C 22 20  20 37 35 20 20 22 2C 22  |50  ","  75  ","|
00000140: 20 31 31 30 20 20 22 2C  22 20 31 33 34 2E 35 22  | 110  "," 134.5"|
00000150: 2C 22 20 31 35 30 20 20  22 00 8B 09 B4 00 83 22  |," 150  "......"|
00000160: 20 33 30 30 20 20 22 2C  22 20 36 30 30 20 20 22  | 300  "," 600  "|
00000170: 2C 22 31 32 30 30 20 20  22 2C 22 31 38 30 30 20  |,"1200  ","1800 |
00000180: 20 22 2C 22 32 34 30 30  20 20 22 00 A2 09 BE 00  | ","2400  ".....|
00000190: 83 33 2C 22 20 42 49 54  53 22 2C 38 2C 37 2C 36  |.3," BITS",8,7,6|
000001A0: 2C 35 00 BA 09 C8 00 83  31 2C 22 20 53 54 4F 50  |,5......1," STOP|
000001B0: 2D 42 49 54 53 22 2C 31  2C 32 00 CC 09 D2 00 83  |-BITS",1,2......|
000001C0: 31 2C 2D 44 52 41 48 54  2C 33 2C 58 00 E4 09 DC  |1,-DRAHT,3,X....|
000001D0: 00 83 31 2C 44 55 50 4C  45 58 2C 56 4F 4C 4C 2C  |..1,DUPLEX,VOLL,|
000001E0: 48 41 4C 42 00 18 0A E6  00 83 37 2C 2C 4F 48 4E  |HALB......7,,OHN|
000001F0: 45 20 50 41 52 2E 50 52  55 45 46 2E 2C 55 4E 47  |E PAR.PRUEF.,UNG|
00000200: 45 52 2E 50 41 52 49 54  2E 2C 4F 48 4E 45 20 50  |ER.PARIT.,OHNE P|
00000210: 41 52 2E 50 52 55 45 46  00 60 0A F0 00 83 47 45  |AR.PRUEF.`....GE|
00000220: 52 41 44 2E 50 41 52 49  54 2E 2C 4F 48 4E 45 20  |RAD.PARIT.,OHNE |
00000230: 50 41 52 2E 50 52 55 45  46 2C 38 2E 42 49 54 20  |PAR.PRUEF,8.BIT |
00000240: 41 55 46 20 31 2C 4F 48  4E 45 20 50 41 52 2E 50  |AUF 1,OHNE PAR.P|
00000250: 52 55 45 46 2C 38 2E 42  49 54 20 41 55 46 20 30  |RUEF,8.BIT AUF 0|
00000260: 00 82 0A FA 00 97 36 35  30 2C 31 32 38 3A 8F 20  |......650,128:. |
00000270: 41 4C 4C 45 20 54 41 53  54 45 4E 20 52 45 50 45  |ALLE TASTEN REPE|
00000280: 41 54 00 88 0A 04 01 8F  00 AB 0A 0E 01 8F 20 4D  |AT............ M|
00000290: 45 4E 55 45 20 5A 55 52  20 50 41 52 41 4D 45 54  |ENUE ZUR PARAMET|
000002A0: 45 52 41 45 4E 44 45 52  55 4E 47 00 BF 0A 18 01  |ERAENDERUNG.....|
000002B0: 8C 3A 81 4A B2 30 A4 36  3A 87 4B 25 28 4A 29 00  |.:.J.0.6:.K%(J).|
000002C0: EE 0A 22 01 87 4B 24 3A  81 49 B2 30 A4 4B 25 28  |.."..K$:.I.0.K%(|
000002D0: 4A 29 3A 87 4B 24 28 49  2C 4A 29 3A 4B 24 28 49  |J):.K$(I,J):K$(I|
000002E0: 2C 4A 29 B2 4B 24 28 49  2C 4A 29 AA 4B 24 00 F8  |,J).K$(I,J).K$..|
000002F0: 0A 2C 01 82 49 3A 82 4A  00 1B 0B 36 01 4A B2 30  |.,..I:.J...6.J.0|
00000300: 3A 4B 28 4A 29 B2 4B 28  4A 29 AA 31 3A 8B 4B 28  |:K(J).K(J).1:.K(|
00000310: 4A 29 B2 37 A7 4B 28 4A  29 B2 30 00 58 0B 40 01  |J).7.K(J).0.X.@.|
00000320: 8D 36 38 30 3A 4B 24 B2  22 52 45 47 49 53 54 45  |.680:K$."REGISTE|
00000330: 52 49 4E 48 41 4C 54 45  9D 9D 9D 9D 9D 9D 9D 9D  |RINHALTE........|
00000340: 9D 9D 9D 9D 9D 9D 9D 11  2D 2D 2D 2D 2D 2D 2D 2D  |........--------|
00000350: 2D 2D 2D 2D 2D 2D 2D 22  00 94 0B 4A 01 4B 24 B2  |-------"...J.K$.|
00000360: 4B 24 AA 22 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |K$."............|
00000370: 9D 91 91 91 12 4B 52 3D  22 AA C4 28 4B 52 29 AA  |.....KR="..(KR).|
00000380: 22 92 20 20 12 42 52 3D  22 AA C4 28 42 52 29 AA  |".  .BR="..(BR).|
00000390: 22 11 11 22 00 BE 0B 54  01 8D 35 32 30 3A 4A B2  |".."...T..520:J.|
000003A0: 4B 28 4A 29 3A 8B 4A B1  30 A7 4B 24 B2 4B 24 28  |K(J):.J.0.K$.K$(|
000003B0: 4A 2C 30 29 3A 8D 35 32  30 3A 89 33 31 30 00 C4  |J,0):.520:.310..|
000003C0: 0B 5E 01 8F 00 E1 0B 68  01 8F 20 54 45 53 54 52  |.^.....h.. TESTR|
000003D0: 4F 55 54 49 4E 45 20 41  42 41 52 42 45 49 54 45  |OUTINE ABARBEITE|
000003E0: 4E 00 FC 0B 72 01 8D 37  31 30 3A 8D 36 39 30 3A  |N...r..710:.690:|
000003F0: 8D 36 36 30 3A A0 31 3A  8D 37 30 30 00 1D 0C 7C  |.660:.1:.700...||
00000400: 01 8D 36 38 30 3A 9F 31  2C 32 2C 30 2C C7 28 4B  |..680:.1,2,0,.(K|
00000410: 52 29 AA C7 28 42 52 29  3A 8D 37 30 30 00 40 0C  |R)..(BR):.700.@.|
00000420: 86 01 A1 23 31 2C 49 24  3A 8F 20 50 55 46 46 45  |...#1,I$:. PUFFE|
00000430: 52 20 49 4E 49 54 49 41  4C 49 53 49 45 52 45 4E  |R INITIALISIEREN|
00000440: 00 69 0C 90 01 99 22 12  22 3B 3A 8F 20 4F 50 54  |.i....".";:. OPT|
00000450: 49 53 43 48 45 20 4B 45  4E 4E 55 4E 47 20 46 55  |ISCHE KENNUNG FU|
00000460: 45 52 20 53 45 4E 44 45  4E 00 96 0C 9A 01 81 49  |ER SENDEN......I|
00000470: B2 33 32 A4 39 35 3A 99  C7 28 49 29 3B 3A 98 31  |.32.95:..(I);:.1|
00000480: 2C C7 28 49 29 3B 3A 82  3A 8F 20 5A 45 49 43 48  |,.(I);:.:. ZEICH|
00000490: 45 4E 53 41 54 5A 00 A4  0C A4 01 98 31 3A 99 3A  |ENSATZ......1:.:|
000004A0: 98 31 3A 99 00 E4 0C AE  01 98 31 2C 22 54 48 45  |.1:.......1,"THE|
000004B0: 20 51 55 49 43 4B 20 42  52 4F 57 4E 20 46 4F 58  | QUICK BROWN FOX|
000004C0: 20 4A 55 4D 50 53 20 4F  56 45 52 20 54 48 45 20  | JUMPS OVER THE |
000004D0: 4C 41 5A 59 20 44 4F 47  20 30 31 32 33 34 35 36  |LAZY DOG 0123456|
000004E0: 37 38 39 22 00 07 0D B8  01 98 31 3A 97 32 30 34  |789"......1:.204|
000004F0: 2C 30 3A 8F 20 43 55 52  53 4F 52 20 42 4C 49 4E  |,0:. CURSOR BLIN|
00000500: 4B 45 4E 20 45 49 4E 00  1D 0D C2 01 A1 23 31 2C  |KEN EIN......#1,|
00000510: 49 24 3A 8B 49 24 B2 22  22 A7 34 38 30 00 4A 0D  |I$:.I$."".480.J.|
00000520: CC 01 8B 28 C6 28 49 24  29 AF 31 32 37 29 B3 33  |...(.(I$).127).3|
00000530: 32 A7 92 32 30 37 2C 31  2C 31 3A 8F 20 53 54 45  |2..207,1,1:. STE|
00000540: 55 45 52 5A 45 49 43 48  45 4E 00 73 0D D6 01 97  |UERZEICHEN.s....|
00000550: 32 30 37 2C 30 3A 99 49  24 3B 3A 97 32 30 34 2C  |207,0:.I$;:.204,|
00000560: 30 3A 8F 20 42 4C 49 4E  4B 45 4E 20 53 54 45 55  |0:. BLINKEN STEU|
00000570: 45 52 4E 00 AA 0D E0 01  A1 49 24 3A 8B 49 24 B2  |ERN......I$:.I$.|
00000580: 22 5F 22 A7 97 32 30 34  2C 31 3A 99 22 93 11 11  |"_"..204,1:."...|
00000590: 11 11 11 1D 1D 1D 1D 1D  4D 4F 4D 45 4E 54 20 42  |........MOMENT B|
000005A0: 49 54 54 45 22 3A 89 32  38 30 00 CC 0D EA 01 98  |ITTE":.280......|
000005B0: 31 2C 49 24 3B 3A 89 34  35 30 3A 8F 20 41 42 46  |1,I$;:.450:. ABF|
000005C0: 52 41 47 45 53 43 48 4C  45 49 46 45 00 D2 0D F4  |RAGESCHLEIFE....|
000005D0: 01 8F 00 E7 0D FE 01 8F  20 55 4E 54 45 52 50 52  |........ UNTERPR|
000005E0: 4F 47 52 41 4D 4D 45 00  FB 0D 08 02 8D 37 31 30  |OGRAMME......710|
000005F0: 3A 99 22 20 20 22 4B 24  22 11 22 00 16 0E 12 02  |:."  "K$".".....|
00000600: 81 49 B2 30 A4 4B 25 28  4A 29 3A 8B 4A B3 B1 31  |.I.0.K%(J):.J..1|
00000610: A7 99 22 11 22 3B 00 29  0E 1C 02 99 22 20 20 22  |..".";.)...."  "|
00000620: 4B 24 28 49 2C 4A 29 3A  82 00 60 0E 26 02 99 22  |K$(I,J):..`.&.."|
00000630: 13 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000640: 11 11 11 11 11 11 11 12  3E 20 43 55 52 53 4F 52  |........> CURSOR|
00000650: 20 4F 44 45 52 20 52 45  54 55 52 4E 20 92 22 3B  | ODER RETURN .";|
00000660: 00 78 0E 30 02 99 22 13  11 11 11 11 11 11 22 3B  |.x.0..".......";|
00000670: 3A 8B 4A B3 B1 31 A7 99  00 88 0E 3A 02 8B 4B 28  |:.J..1.....:..K(|
00000680: 4A 29 B2 30 A7 36 30 30  00 A4 0E 44 02 81 49 B2  |J).0.600...D..I.|
00000690: 31 A4 4B 28 4A 29 3A 99  22 11 22 3B 3A 8B 4A B3  |1.K(J):.".";:.J.|
000006A0: B1 31 A7 99 00 AA 0E 4E  02 82 00 BF 0E 58 02 99  |.1.....N.....X..|
000006B0: 22 20 20 12 22 4B 24 28  4B 28 4A 29 2C 4A 29 00  |"  ."K$(K(J),J).|
000006C0: D2 0E 62 02 A1 4B 24 3A  8B 4B 24 B2 22 22 A7 36  |..b..K$:.K$."".6|
000006D0: 31 30 00 08 0F 6C 02 8B  4B 24 B2 22 91 22 A7 8B  |10...l..K$."."..|
000006E0: 4B 28 4A 29 B1 30 A7 99  22 91 20 20 22 4B 24 28  |K(J).0..".  "K$(|
000006F0: 4B 28 4A 29 2C 4A 29 3A  4B 28 4A 29 B2 4B 28 4A  |K(J),J):K(J).K(J|
00000700: 29 AB 31 3A 89 35 36 30  00 42 0F 76 02 8B 4B 24  |).1:.560.B.v..K$|
00000710: B2 22 11 22 A7 8B 4B 28  4A 29 B3 4B 25 28 4A 29  |."."..K(J).K%(J)|
00000720: A7 99 22 91 20 20 22 4B  24 28 4B 28 4A 29 2C 4A  |..".  "K$(K(J),J|
00000730: 29 3A 4B 28 4A 29 B2 4B  28 4A 29 AA 31 3A 89 35  |):K(J).K(J).1:.5|
00000740: 36 30 00 55 0F 80 02 8B  4B 24 B3 B1 C7 28 31 33  |60.U....K$...(13|
00000750: 29 A7 36 31 30 00 5B 0F  8A 02 8E 00 82 0F 94 02  |).610.[.........|
00000760: 8B 28 36 34 AF C2 28 33  37 31 35 30 29 29 A7 36  |.(64..(37150)).6|
00000770: 36 30 3A 8F 20 50 55 46  46 45 52 20 4C 45 45 52  |60:. PUFFER LEER|
00000780: 45 4E 00 88 0F 9E 02 8E  00 BF 0F A8 02 4B 52 B2  |EN...........KR.|
00000790: 31 32 38 AC 4B 28 33 29  AA 33 32 AC 4B 28 32 29  |128.K(3).32.K(2)|
000007A0: AA 4B 28 31 29 3A 42 52  B2 33 32 AC 4B 28 36 29  |.K(1):BR.32.K(6)|
000007B0: AA 31 36 AC 4B 28 35 29  AA 4B 28 34 29 3A 8E 00  |.16.K(5).K(4):..|
000007C0: DA 0F B2 02 81 49 B2 30  A4 37 3A 97 38 32 38 AA  |.....I.0.7:.828.|
000007D0: 49 2C 4B 28 49 29 3A 82  3A 8E 00 F7 0F BC 02 81  |I,K(I):.:.......|
000007E0: 49 B2 30 A4 37 3A 4B 28  49 29 B2 C2 28 38 32 38  |I.0.7:K(I)..(828|
000007F0: AA 49 29 3A 82 3A 8E 00  1B 10 C6 02 99 22 93 12  |.I):.:......."..|
00000800: 20 20 52 53 2D 32 33 32  20 45 49 4E 2F 41 55 53  |  RS-232 EIN/AUS|
00000810: 47 41 42 45 20 20 11 11  22 3A 8E 00 00 00        |GABE  ..":....  |
....D.. RS 232 SCHNITTSTELLE.+.N.. 13.02
.84.F.X.. (C) H.-J. KELLERMANN.C.... ANF
ANGSWERTE FESTLEGEN.....K(0).0:K(1).6:K(
2).0:K(3).0:K(4).0:K(5).0:K(6).0......6,
"","TEST-ROUTINE","BAUD-RATE","DATENWORT
-LAENGE","STOP-BITS"... .."HANDSHAKE","U
EBERTRAGUNGSART","PARITAETSPRUEFUNG".Y..
..10,"BAUD"," ANW. ","  50  ","  75  ","
 110  "," 134.5"," 150  "......" 300  ",
" 600  ","1200  ","1800  ","2400  ".....
.3," BITS",8,7,6,5...H..1," STOP-BITS",1
,2.L.R..1,-DRAHT,3,X......1,DUPLEX,VOLL,
HALB......7,,OHNE PAR.PRUEF.,UNGER.PARIT
.,OHNE PAR.PRUEF.`....GERAD.PARIT.,OHNE 
PAR.PRUEF,8.BIT AUF 1,OHNE PAR.PRUEF,8.B
IT AUF 0......650,128:. ALLE TASTEN REPE
AT............ MENUE ZUR PARAMETERAENDER
UNG......:.J.0.6:.K%(J)..."..K$:.I.0.K%(
J):.K$(I,J):K$(I,J).K$(I,J).K$...,..I:.J
...6.J.0:K(J).K(J).1:.K(J).7.K(J).0.X.@.
.680:K$."REGISTERINHALTE................
---------------"...J.K$.K$."............
.....KR=".D(KR).".  .BR=".D(BR).".."...T
..520:J.K(J):.J.0.K$.K$(J,0):.520:.310.D
.^.....H.. TESTROUTINE ABARBEITEN...R..7
10:.690:.660: 1:.700...|..680:.1,2,0,G(K
R).G(BR):.700.@....#1,I$:. PUFFER INITIA
LISIEREN.I....".";:. OPTISCHE KENNUNG FU
ER SENDEN......I.32.95:.G(I);:.1,G(I);:.
:. ZEICHENSATZ......1:.:.1:.......1,"THE
 QUICK BROWN FOX JUMPS OVER THE LAZY DOG
 0123456789"......1:.204,0:. CURSOR BLIN
KEN EIN...B..#1,I$:.I$."".480.J.L..(F(I$
).127).32..207,1,1:. STEUERZEICHEN.S.V..
207,0:.I$;:.204,0:. BLINKEN STEUERN.....
.I$:.I$."_"..204,1:."...........MOMENT B
ITTE":.280.L....1,I$;:.450:. ABFRAGESCHL
EIFE.R.......... UNTERPROGRAMME......710
:."  "K$"."......I.0.K%(J):.J..1..".";.)
...."  "K$(I,J):..`.&.."................
........> CURSOR ODER RETURN .";.X.0..".
......";:.J..1.....:..K(J).0.600...D..I.
1.K(J):.".";:.J..1.....N.....X.."  ."K$(
K(J),J).R.B..K$:.K$."".610...L..K$."."..
K(J).0..".  "K$(K(J),J):K(J).K(J).1:.560
.B.V..K$."."..K(J).K%(J)..".  "K$(K(J),J
):K(J).K(J).1:.560.U....K$..G(13).610.[.
.........(64.B(37150)).660:. PUFFER LEER
EN...........KR.128.K(3).32.K(2).K(1):BR
.32.K(6).16.K(5).K(4):..Z....I.0.7:.828.
I,K(I):.:.......I.0.7:K(I).B(828.I):.:..
..F.."..  RS-232 EIN/AUSGABE  ..":....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL