DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC850

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RegneCentralen RC850

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦86f5625ec⟧ TextFile

    Length: 3584 (0xe00)
    Types: TextFile
    Names: »RCEQUATE.MAC«

Derivation

└─⟦9f46c4107⟧ Bits:30005988 Sources for TurboDOS ver. 1.30 device drivers
    └─⟦this⟧ »RCEQUATE.MAC« 

TextFile

	.XLIST
;
;	EQUATES for RC 850 / 855
;
CTC0	EQU 	0CH		;CTC PORT ADDRESSES
CTC1	EQU 	0DH
CTC2	EQU 	0EH
CTC3	EQU 	0FH
CTC4	EQU 	10H
CTC5	EQU 	11H
CTC6	EQU 	12H
CTC7	EQU 	13H
;
SIO0C	EQU 	00AH		;SIO PORT CONTROL CHANNEL A (comm. line 1)
SIO1C	EQU 	00BH		;SIO PORT CONTROL CHANNEL B (printer line 2)
SIO2C	EQU 	032H		;SIO PORT CONTROL CHANNEL A (rc circuit)
SIO3C	EQU 	033H		;SIO PORT CONTROL CHANNEL B (keyboard)
;
SIO0D	EQU	08H		;communication line
SIO1D	EQU	09H		;SIO DATA CHANNEL (printer)
SIO2D	EQU 	30H		;SIO1 CH-A DATA RC-CIRCUIT
SIO3D	EQU	31H		;keyboard SIO channel
;
; sio (keyboard) channel b
;
KBDATA		EQU	31H		; data port
KBCOMM		EQU	33H		; command port
;
; sio (printer) channel b / line 2
;
PRCOMM		EQU	0BH		; command port
;
;
; double keys on keyboard (octal value)
;
SHRE		EQU	263Q		; release shift key
SHPR1		EQU	306Q		; press 1st shift key
SHPR2		EQU	240Q		; press 2nd shift key
CTRLRE		EQU	264Q		; release ctrl key
CTRLPR		EQU	200Q		; press ctrl key
;
; lamp keys - press value
;
ALPLCK		EQU	201Q		; lamp no. 12 - alpha lock key
;
; display constants
;
DMARD		EQU	00011000B	; dma-read-mode, autoinit. enable
DMASET		EQU	00000100B	; dma-set-mask
DMACLR		EQU	00000000B	; dma-clear-mask
DMAMSK		EQU	0FAH		; dma-mask-addr
DMAMDE		EQU	0FBH		; dma-mode-addr
DMAFFA		EQU	0FCH		; dma-ff-addr
DMADDR		EQU	0F0H		; dma-addr-addr
DMACNT		EQU	0F1H		; dma-count-addr
DMACMD		EQU	0F8H		; dma-command-register
DMAKCK		EQU	20H		; dma-kick-addr
DMARES		EQU	0FDH		; dma-reset-addr
DSPLSE		EQU	24H		; displ-sel
DSPLDA		EQU	25H		; displ-data
DSPLBL		EQU	2Ch		; displ-blocade
DSPLCL		EQU	00000000B	; displ-cl-blcde
DSPLST		EQU	00000100B	; displ-st-blcde
CRFCNT		EQU	4096		; refresh-count
BLANK		EQU	32		; blank
LINE25		EQU	0FF00H		; start address of line 25
NOATRB		EQU	0
COPLN		EQU	80		;number of columns per line
LNPSC		EQU	25		;number of lines per screen
SELDSP		EQU	8EH		;display memory port
DESDSP		EQU	8FH		; "
;
;
SIOR1T	EQU	11000000B	;WR1: Tx only, ready enable
SIORG1	EQU	01101000B	;WR1: not ready mode, int. on first ch.
SIORG3	EQU	11011101B	;WR3: Rx 8 bits,hunt,Rx CRC
SIORG5	EQU	01100001B	;WR5: Tx 8 bits, Tx CRC
SIOERT	EQU	30H		;SIO ERROR RESET
;
NORXER	EQU	80H		;Rx status test
ENQ	EQU	05H		;enquary character
TOKID	EQU	0FFH		;token identifier
ACKID	EQU	TOKID		;ack indentifier
ACK	EQU	06H		;ack
MAXTRY	EQU	3		;number of max retrys
TOKEN	EQU	04H		;token character
MTCCNT	EQU	200		;count value for circuit reconfig.
CTOUVM	EQU	100		;circuit watch timer value for master
MMSGL	EQU	0B8H		;maximum MSG length for RX and TX
RXLMP	EQU	1		;set command for select lamp Rx
RXDLMP	EQU	0		;deselect command for lamp Rx
RSTREQ	EQU	01		;slave reset request
OSLADR	EQU	0010H		;OS link address (page zero)
TBUF	EQU	80H		;default buffer
;
;	DMA commands
;
DISDMA	EQU	06H			;disable DMA command
ENADMA	EQU	02H			;enable DMA transfer
TXDMA	EQU	4AH			;transfer to SIO command
RXDMA	EQU	46H			;receive from SIO command
;
;	DMA register equates
;
DMAMSK	EQU	0FAH			;DMA Mask register
DRQRST	EQU	34H		;address to clear the DMA DRQ-FF
;
;	timer constant value equates
;
D250YS	EQU	4		;250ys
D500YS	EQU	8		;500ys delay
D1MS	EQU	16		;1ms
D2MS	EQU	32		;2ms
D205MS	EQU	40		;2,5ms
D3MS	EQU	47		;3ms
D4MS	EQU	63		;4ms
D5MS	EQU	78		;5ms
D6MS	EQU	94		;6ms
D7MS	EQU	109		;7ms
D8MS	EQU	125		;8ms
D9MS	EQU	141		;9ms
D10MS	EQU	156		;10ms
D15MS	EQU	234		;15ms
;
CTS	EQU	5		;clear to send bit
WCTS	EQU	1		;waiting for CTS to set flag
TXEOM	EQU	6		;TX EOM bit
;
	.LIST
«eof»