MA-UART0 470E

FILE INFORMATION

FILENAME(S): MA-UART0 470E

FILE TYPE(S): PRG

FILE SIZE: 735b

FIRST SEEN: 2025-11-30 21:24:01

APPEARS ON: 1 disk(s)

FILE HASH

2ee307617efd98d27117e213074feaca553518ef4741a39dd6a896ee6fe20066

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
C64 HULP 29 2	MA-UART0 470E	PRG	DuncanTwain	30	1	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: AA 00 30 D8 32 CE 00 10  20 2E 43 54 20 3B 44 45  |..0.2... .CT ;DE|
00000010: 53 49 47 4E 41 54 45 20  41 53 20 43 4F 4E 54 52  |SIGNATE AS CONTR|
00000020: 4F 4C 20 46 49 4C C5 10  10 AE 20 10 20 2E 43 45  |OL FIL.... . .CE|
00000030: 20 3B 43 4F 4E 54 49 4E  55 45 20 49 46 20 45 52  | ;CONTINUE IF ER|
00000040: 52 4F 52 D3 30 10 AE 40  10 20 2E 42 41 20 24 32  |ROR.0..@. .BA $2|
00000050: 30 30 B0 50 10 AE 60 10  3B 20 20 20 20 20 20 20  |00.P..`.;       |
00000060: 2B 2B 2B 2B 2B 2B 2B 20  44 45 46 49 4E 49 54 49  |+++++++ DEFINITI|
00000070: 4F 4E 53 20 2B 2B 2B 2B  2B 2B 2B AB 70 10 89 80  |ONS +++++++.p...|
00000080: 10 50 49 41 2E 50 4F 52  54 20 2E 44 45 20 24 45  |.PIA.PORT .DE $E|
00000090: 38 34 31 20 3B 50 49 41  20 44 41 54 41 20 50 4F  |841 ;PIA DATA PO|
000000A0: 52 D4 90 10 50 49 41 2E  44 49 52 20 2E 44 45 20  |R...PIA.DIR .DE |
000000B0: 24 45 38 34 33 20 3B 50  49 41 20 44 49 52 45 43  |$E843 ;PIA DIREC|
000000C0: 54 49 4F 4E 20 50 4F 52  D4 00 11 89 10 11 4D 53  |TION POR......MS|
000000D0: 4B 2E 49 4E 20 2E 44 45  20 25 30 31 30 30 30 30  |K.IN .DE %010000|
000000E0: 30 30 20 3B 49 4E 50 55  54 20 49 53 20 4F 4E 20  |00 ;INPUT IS ON |
000000F0: 42 49 54 20 B6 20 11 4D  53 4B 2E 4F 55 54 20 2E  |BIT . .MSK.OUT .|
00000100: 44 45 20 25 31 30 30 30  30 30 30 30 20 3B 4F 55  |DE %10000000 ;OU|
00000110: 54 50 55 54 20 49 53 20  4F 4E 20 42 49 54 20 B7  |TPUT IS ON BIT .|
00000120: 30 11 89 40 11 89 50 11  3B 55 41 52 54 20 43 4F  |0..@..P.;UART CO|
00000130: 4E 54 52 4F 4C 20 50 41  52 41 4D 45 54 45 52 53  |NTROL PARAMETERS|
00000140: BA 60 11 3B 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.`.;------------|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D AD 70 11 89 80  |-----------.p...|
00000160: 11 4E 4F 2E 50 41 44 42  49 54 53 20 2E 44 53 20  |.NO.PADBITS .DS |
00000170: 31 20 3B 4E 4F 2E 20 4F  46 20 50 41 44 20 42 49  |1 ;NO. OF PAD BI|
00000180: 54 53 20 4F 4E 20 43 52  20 4C C6 90 11 AE 00 12  |TS ON CR L......|
00000190: 42 49 54 2E 54 49 4D 45  20 2E 44 53 20 31 20 3B  |BIT.TIME .DS 1 ;|
000001A0: 42 41 55 44 20 52 41 54  45 20 43 4F 44 45 20 28  |BAUD RATE CODE (|
000001B0: 30 2D 37 A9 10 12 3B 2D  2D 2D 2D 20 2D 2D 2D 2D  |0-7...;---- ----|
000001C0: 20 2D 2D 2D 2D 20 2D 2D  2D 2D AD 20 12 3B 30 20  | ---- ----. .;0 |
000001D0: 3D 20 20 31 31 30 20 20  20 3A 20 20 34 20 3D 20  |=  110   :  4 = |
000001E0: 32 34 30 B0 30 12 3B 31  20 3D 20 20 33 30 30 20  |240.0.;1 =  300 |
000001F0: 20 20 3A 20 20 35 20 3D  20 34 38 30 B0 40 12 3B  |  :  5 = 480.@.;|
00000200: 32 20 3D 20 20 36 30 30  20 20 20 3A 20 20 36 20  |2 =  600   :  6 |
00000210: 3D 20 37 32 30 B0 50 12  3B 33 20 3D 20 31 32 30  |= 720.P.;3 = 120|
00000220: 30 20 20 20 3A 20 20 37  20 3D 20 39 36 30 B0 60  |0   :  7 = 960.`|
00000230: 12 AE 70 12 AE 80 12 AE  90 12 20 2E 46 49 20 44  |..p....... .FI D|
00000240: 38 20 22 4D 41 2D 55 41  52 54 31 20 20 20 20 34  |8 "MA-UART1    4|
00000250: 37 30 45 22 20 3B 53 45  54 20 42 41 55 44 20 41  |70E" ;SET BAUD A|
00000260: 4E 44 20 54 41 42 4C 45  20 44 45 4C 41 59 D3 00  |ND TABLE DELAY..|
00000270: 13 20 2E 46 49 20 44 38  20 22 4D 41 2D 55 41 52  |. .FI D8 "MA-UAR|
00000280: 54 32 20 20 20 20 34 37  30 45 22 20 3B 55 41 52  |T2    470E" ;UAR|
00000290: 54 20 4F 55 54 50 55 54  20 44 52 49 56 45 D2 10  |T OUTPUT DRIVE..|
000002A0: 13 20 2E 46 49 20 44 38  20 22 4D 41 2D 55 41 52  |. .FI D8 "MA-UAR|
000002B0: 54 33 20 20 20 20 34 37  30 45 22 20 3B 55 41 52  |T3    470E" ;UAR|
000002C0: 54 20 49 4E 50 55 54 20  44 52 49 56 45 D2 20 13  |T INPUT DRIVE. .|
000002D0: AE 30 13 45 4E 44 2E 50  47 4D 20 2E 45 CE 54     |.0.END.PGM .E.T |

..0X2N.. .CT ;DESIGNATE AS CONTROL FILE.
.. . .CE ;CONTINUE IF ERRORS0..@. .BA $2
00.P..`.;       +++++++ DEFINITIONS ++++
+++.P....PIA.PORT .DE $E841 ;PIA DATA PO
RT..PIA.DIR .DE $E843 ;PIA DIRECTION POR
T.....MSK.IN .DE %01000000 ;INPUT IS ON 
BIT . .MSK.OUT .DE %10000000 ;OUTPUT IS 
ON BIT .0..@..P.;UART CONTROL PARAMETERS
.`.;-----------------------.P....NO.PADB
ITS .DS 1 ;NO. OF PAD BITS ON CR LF.....
BIT.TIME .DS 1 ;BAUD RATE CODE (0-7...;-
--- ---- ---- ----. .;0 =  110   :  4 = 
240.0.;1 =  300   :  5 = 480.@.;2 =  600
   :  6 = 720.P.;3 = 1200   :  7 = 960.`
..P....... .FI D8 "MA-UART1    470E" ;SE
T BAUD AND TABLE DELAYS.. .FI D8 "MA-UAR
T2    470E" ;UART OUTPUT DRIVER.. .FI D8
 "MA-UART3    470E" ;UART INPUT DRIVER .
.0.END.PGM .ENT

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL