home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / MODEMS / MODEM / USARTS.DOC < prev    next >
Text File  |  2000-06-30  |  13KB  |  548 lines
  1.  
  2. SMB    EQU    -1    ;TDL-SMB CONFIGURATION (MC6850)
  3. TUART    EQU    0    ;CROMEMCO TU-ART CONFIG (TMS5501)
  4. DISCO    EQU    0    ;INFO 2000 DISCOMEM (8251 USART)
  5. TEI1    EQU    0    ;TEI CONFIGURATION (8251 USART)
  6. TEI2    EQU    0    ;TEI CONFIGURATION (AY 5-1013)
  7. JADE    EQU    0    ;JADE I/O BOARD (AY 5-1013)
  8. MPUB    EQU    0    ;IMSAI MPUB CONFIG (8251 USART)
  9. BSII    EQU    0    ;BITSTREAMER II (8251 USART)
  10. SYS8    EQU    0    ;AMD AmSYS 8/8 (8251 USART)
  11. MSLICE    EQU    0    ;SCION Microslice (2651 USART)
  12. SSMIO4    EQU    0    ;SSM I/O-4
  13. PTC    EQU    0    ;Proc. Tech. 3P+S (TMS6011NC)
  14. SDS    EQU    0    ;SD Systems SBC-100/200 (8251 USART)
  15. DGS    EQU    0    ;Digital Group System (8251 USART)
  16. IMS440    EQU    0    ;IMS-440 I/O BOARD (6402 UART)
  17. MPMCON    EQU    0    ;MP/M Console operation
  18.  
  19. ;--THESE SHOULD WORK BUT HAVE NOT BEEN FULLY CHECKED OUT YET
  20.  
  21. PNTCPM    EQU    0    ;P&T CP/M 2.2 for the TRS-80 Mod II
  22. GODBOT    EQU    0    ;Godbout Interfacer II (UART CFIG FIXED)
  23.  
  24. ;--NOT YET FULLY IMPLIMENTED
  25.  
  26. HEATH    EQU    0    ;HEATH H-8 CONFIGURATION (INS 8250)
  27.  
  28. ;    NOTE: TUART PARITY & NUM.DATA.BITS IS NOT PROGRAMMABLE.
  29. ;          IT IS FIXED FOR DATA.BITS=7 & PARITY=0.
  30.  
  31. ;    NOTE: DISCOMEM SELECTION REQUIRES CONSOLE DEVICE OPERATE AT
  32. ;          A FIXED BAUD RATE.  CURRENTLY SET FOR 9600 BAUD.
  33.  
  34. ;--INITIALIZE UART/USART CONDITIONAL ASSEMBLY FLAGS TO ZERO
  35.  
  36. MC6850    SET    0
  37. TMS5501 SET    0
  38. INT8251 SET    0
  39. JAD1013 SET    0
  40. TEI1013 SET    0
  41. INS8250 SET    0
  42. SIG2651 SET    0
  43. TMS6011 SET    0
  44. IMS6402 SET    0
  45.  
  46. BAUDFLG SET    0    ;ENABLES VARIABLE BAUD RATE (HARDWARE DEPENDANT)
  47. CANBRK    SET    0    ;ENABLES BREAK COMMAND (HARDWARE DEPENDANT)
  48. INVSTAT SET    0    ;INVERTS STATUS BITS (i.e., active low or zero)
  49.  
  50. ;-- *******************************************************************
  51.  
  52.  
  53. ;+++++++++++++++++++++++ MP/M CONFIGURATION +++++++++++++++++++++++++++
  54.  
  55.     IF    MPMCON
  56.  
  57. ;--ASSUMES MODEM PORT IS PRE-INITIALIZED FOR: 7 DATA BITS, EVEN PARITY
  58.  
  59. MPMGO    EQU    2    ;THE CONSOLE NUMBER USED UNDER MP/M FOR THE MODEM
  60. RDA    EQU    1    ;DUMMY RECEIVED DATA AVAILABLE
  61.     ENDIF
  62.  
  63. ;+++++++++++++++++++++++ SMB CONFIGURATION ++++++++++++++++++++++++++++
  64.  
  65.     IF    SMB
  66.  
  67. ;--PORTS 72H & 73H ARE USUALLY IDENTIFIED AS CRT PORTS
  68.  
  69. CMD    EQU    072H    ;COMMAND REGISTER
  70. STATUS    EQU    072H    ;STATUS REGISTER
  71. RXDATA    EQU    073H    ;SERIAL DATA IN
  72. TXDATA    EQU    073H    ;SERIAL DATA OUT
  73.  
  74. CANBRK    SET    -1
  75. MC6850    SET    -1
  76.     ENDIF
  77.  
  78. ;++++++++++++++++++++++++ TU-ART CONFIGURATION ++++++++++++++++++++++++
  79.  
  80.     IF    TUART
  81.  
  82. ;--PORTS 20H, 21H, & 22H ARE COMPATIBLE WITH CROMEMCO SYSTEM 3
  83.  
  84. CMD    EQU    022H    ;COMMAND REGISTER
  85. STATUS    EQU    020H    ;STATUS REGISTER
  86. RXDATA    EQU    021H    ;SERIAL DATA IN
  87. TXDATA    EQU    021H    ;SERIAL DATA OUT
  88. BAUD    EQU    020H    ;BAUD RATE CONTROL
  89.  
  90. ;--BAUD RATE VALUES (APPLIES TO TU-ART ONLY)
  91.  
  92. BAUD10    EQU    081H    ;110 BAUD (MSB=1 ==> NO.STOP.BITS=1)
  93. BAUD15    EQU    082H    ;150 BAUD
  94. BAUD30    EQU    084H    ;300 BAUD
  95. BAUD120 EQU    088H    ;1200 BAUD
  96. BAUD240 EQU    090H    ;2400 BAUD
  97. BAUD480 EQU    0A0H    ;4800 BAUD
  98. BAUD960 EQU    0C0H    ;9600 BAUD
  99. STOPB1    EQU    080H    ;ONE STOP BIT
  100.  
  101. CANBRK    SET    -1
  102. TMS5501 SET    -1
  103. BAUDFLG SET    -1
  104.     ENDIF
  105.     ;PAGE
  106.  
  107. ;++++++++++++++++++++++++ DISCO  CONFIGURATION ++++++++++++++++++++++++
  108.  
  109.     IF    DISCO
  110.  
  111. ;--PORTS 0A4H, & 0A5H ARE IDENTIFIED WITH PORT "B"
  112.  
  113. CMD    EQU    0A5H    ;COMMAND REGISTER
  114. STATUS    EQU    0A5H    ;STATUS REGISTER
  115. RXDATA    EQU    0A4H    ;SERIAL DATA IN
  116. TXDATA    EQU    0A4H    ;SERIAL DATA OUT
  117. BAUD    EQU    0A8H    ;BAUD RATE CONTROL
  118.  
  119. ;--BAUD RATE VALUES
  120.  
  121. BAUD10    EQU    2 SHL 4 ;110 BAUD
  122. BAUD15    EQU    4 SHL 4 ;150 BAUD
  123. BAUD30    EQU    5 SHL 4 ;300 BAUD
  124. BAUD120 EQU    7 SHL 4 ;1200 BAUD
  125. BAUD240 EQU    10 SHL 4 ;2400 BAUD
  126. BAUD480 EQU    12 SHL 4 ;4800 BAUD
  127. BAUD960 EQU    14 SHL 4 ;9600 BAUD
  128. BRSAVE    EQU    0FF00H    ;BIOS SAVE LOCATION FOR BAUD RATES (BOTH A AND B)
  129. BBRMSK    EQU    0F0H    ;CHANNEL B BAUD RATE MASK
  130.  
  131. CANBRK    SET    -1
  132. INT8251 SET    -1
  133. BAUDFLG SET    -1
  134.     ENDIF
  135.     ;PAGE
  136.  
  137. ;+++++++++++++++++++++++ TEI1 CONFIGURATION ++++++++++++++++++++++++++++
  138.  
  139.     IF    TEI1
  140.  
  141. ;--PORT 2 & 3 ARE USUALLY IDENTIFIED AS TTY PORTS
  142.  
  143. CMD    EQU    003H    ;COMMAND REGISTER
  144. STATUS    EQU    003H    ;STATUS REGISTER
  145. RXDATA    EQU    002H    ;SERIAL DATA IN
  146. TXDATA    EQU    002H    ;SERIAL DATA OUT
  147.  
  148. CANBRK    SET    -1
  149. INT8251 SET    -1
  150.     ENDIF
  151.  
  152. ;++++++++++++++++++++++++ TEI2 CONFIGURATION +++++++++++++++++++++++++++
  153.  
  154.     IF    TEI2
  155.  
  156. ;--THIS DEVICE IS USUALLY USED FOR FUNCTION KEYS & BIT LIGHTS
  157.  
  158. CMD    EQU    040H    ;COMMAND REGISTER
  159. STATUS    EQU    040H    ;STATUS REGISTER
  160. RXDATA    EQU    041H    ;SERIAL DATA IN
  161. TXDATA    EQU    041H    ;SERIAL DATA OUT
  162.  
  163. TEI1013 SET    -1
  164. INVSTAT SET    -1
  165.     ENDIF
  166.     ;PAGE
  167.  
  168. ;++++++++++++++++++++++++ JADE CONFIGURATION ++++++++++++++++++++++++++
  169.  
  170.     IF    JADE
  171.  
  172. ;--PORT 00 & 80 ARE USUALLY IDENTIFIED AS PORT B
  173.  
  174. CMD    EQU    080H    ;COMMAND REGISTER
  175. STATUS    EQU    080H    ;STATUS REGISTER
  176. RXDATA    EQU    000H    ;SERIAL DATA IN
  177. TXDATA    EQU    000H    ;SERIA DATA OUT
  178.  
  179. JAD1013 SET    -1
  180.     ENDIF
  181.  
  182. ;+++++++++++++++++++++ HEATH H-8 CONFIGURATION ++++++++++++++++++++++++
  183.  
  184.     IF    HEATH
  185.  
  186. ;--PORT ADDRESSES
  187.  
  188. CMD    EQU    333Q    ;COMMAND REGISTER
  189. STATUS    EQU    335Q    ;STATUS REGISTER
  190. RXDATA    EQU    330Q    ;SERIAL DATA IN
  191. TXDATA    EQU    330Q    ;SERIAL DATA OUT
  192. BAUDR1    EQU    330Q    ;BAUD CONTROL REGISTER 1 (MDLL)
  193. BAUDR2    EQU    331Q    ;BAUD CONTROL REGISTER 2 (MDLM)
  194.  
  195. ;--SPEDIAL PORT ADDRESSES
  196.  
  197. MIER    EQU    331Q
  198. MCR    EQU    334Q
  199.  
  200. ;--BAUD RATE VALUES (APPLIES TO H-8 ONLY)
  201.  
  202. BAUD10    EQU    001H    ;110 BAUD
  203. BAUD15    EQU    001H    ;150 BAUD
  204. BAUD30    EQU    001H    ;300 BAUD
  205. BAUD120 EQU    001H    ;1200 BAUD
  206. BAUD240 EQU    001H    ;2400 BAUD
  207. BAUD480 EQU    001H    ;4800 BAUD
  208. BAUD960 EQU    001H    ;9600 BAUD
  209.  
  210. CANBRK    SET    -1
  211. INS8250 SET    -1
  212. BAUDFLG SET    -1
  213.     ENDIF
  214.     ;PAGE
  215.  
  216. ;++++++++++++++++++++++++ MPUB CONFIGURATION ++++++++++++++++++++++++++
  217.  
  218.     IF    MPUB
  219.  
  220. ;--SERIAL PORT ADDRESSES
  221.  
  222. CMD    EQU    005H    ;COMMAND REGISTER
  223. STATUS    EQU    005H    ;STATUS REGISTER
  224. RXDATA    EQU    004H    ;SERIAL DATA IN
  225. TXDATA    EQU    004H    ;SERIA DATA OUT
  226.  
  227. CANBRK    SET    -1
  228. INT8251 SET    -1
  229.     ENDIF
  230.  
  231. ;++++++++++++++++++++++++ BSII     CONFIGURATION ++++++++++++++++++++++++
  232.  
  233.     IF    BSII
  234.  
  235. BSIIBAS EQU    0    ;BS II BASE ADDRESS (LEGAL VALUES 0..7)
  236. BSIICHN EQU    2    ;BS II CHANNEL OFFSET CH-A => 2, CH-B => 4, CH-C => 6
  237.  
  238. CMD    EQU    BSIIBAS+BSIICHN+1    ;COMMAND REGISTER
  239. STATUS    EQU    BSIIBAS+BSIICHN+1    ;STATUS REGISTER
  240. RXDATA    EQU    BSIIBAS+BSIICHN+0    ;SERIAL DATA IN
  241. TXDATA    EQU    BSIIBAS+BSIICHN+0    ;SERIAL DATA OUT
  242.  
  243.         ; BAUD RATES SWITCH SELECTABLE ON BS II BOARD
  244.  
  245. CANBRK    SET    -1
  246. INT8251 SET    -1
  247.     ENDIF
  248.     ;PAGE
  249.  
  250. ;++++++++++++++++++++++++ MSLICE  CONFIGURATION ++++++++++++++++++++++++
  251.  
  252.     IF    MSLICE
  253.  
  254. ;--SERIAL PORT ADDRESSES
  255.  
  256. CMD    EQU    003H    ;COMMAND REGISTER
  257. STATUS    EQU    001H    ;STATUS REGISTER
  258. RXDATA    EQU    000H    ;SERIAL DATA IN
  259. TXDATA    EQU    000H    ;SERIAL DATA OUT
  260. MODE    EQU    002H    ;INIT & BAUD CONTROL
  261.  
  262. ;--BAUD RATE VALUES
  263.  
  264. BAUD10    EQU    032H    ;110 BAUD
  265. BAUD15    EQU    034H    ;150 BAUD
  266. BAUD30    EQU    035H    ;300 BAUD
  267. BAUD120 EQU    037H    ;1200 BAUD
  268. BAUD240 EQU    03AH    ;2400 BAUD
  269. BAUD480 EQU    03CH    ;4800 BAUD
  270. BAUD960 EQU    03EH    ;9600 BAUD
  271.  
  272. CANBRK    SET    -1
  273. SIG2651 SET    -1
  274. BAUDFLG SET    -1
  275.     ENDIF
  276.  
  277. ;+++++++++++++++++++++++ SYS8 CONFIGURATION ++++++++++++++++++++++++++++
  278.  
  279.     IF    SYS8
  280.  
  281. ;--PORT DC & DD ARE ASSOCIATED WITH CONNECTOR 9
  282.  
  283. CMD    EQU    0DDH    ;COMMAND REGISTER
  284. STATUS    EQU    0DDH    ;STATUS REGISTER
  285. RXDATA    EQU    0DCH    ;SERIAL DATA IN
  286. TXDATA    EQU    0DCH    ;SERIAL DATA OUT
  287.  
  288. CANBRK    SET    -1
  289. INT8251 SET    -1
  290.     ENDIF
  291.     ;PAGE
  292.  
  293. ;++++++++++++++++++++++++ SBC100/200  CONFIGURATION ++++++++++++++++++++
  294.  
  295.     IF    SDS
  296.  
  297. ;--SERIAL PORT ADDRESSES
  298.  
  299. CMD    EQU    07DH    ;COMMAND REGISTER
  300. STATUS    EQU    07DH    ;STATUS REGISTER
  301. RXDATA    EQU    07CH    ;SERIAL DATA IN
  302. TXDATA    EQU    07CH    ;SERIAL DATA OUT
  303. BAUD    EQU    078H    ;CTC-0 CONTROL REGISTER
  304. BAUD2    EQU    005H    ;CTC INIT BYTE
  305.  
  306. ;--BAUD RATE VALUES
  307.  
  308. BAUD10    EQU    057H    ;110 BAUD
  309. BAUD15    EQU    040H    ;150 BAUD
  310. BAUD30    EQU    020H    ;300 BAUD
  311. BAUD120 EQU    008H    ;1200 BAUD
  312. BAUD240 EQU    004H    ;2400 BAUD
  313. BAUD480 EQU    002H    ;4800 BAUD
  314. BAUD960 EQU    001H    ;9600 BAUD
  315.  
  316. CANBRK    SET    -1
  317. INT8251 SET    -1
  318. BAUDFLG SET    -1
  319.     ENDIF
  320.  
  321. ;+++++++++++++++++++++++++++++ SSM I/O-4 +++++++++++++++++++++++++++
  322.  
  323.     IF    SSMIO4
  324.  
  325. ;--PORT ADDRESSES
  326.  
  327. CMD    EQU    03H    ;COMMAND REGISTER
  328. STATUS    EQU    03H    ;STATUS REGISTER
  329. RXDATA    EQU    02H    ;SERIAL DATA IN
  330. TXDATA    EQU    02H    ;SERIAL DATA OUT
  331.  
  332. CANBRK    SET    -1
  333. TMS6601 SET    -1
  334.     ENDIF
  335.     ;PAGE
  336.  
  337. ;+++++++++++++++++++++++ PROC. TECH. CONFIGURATION ++++++++++++++++++++++++++
  338.  
  339.     IF    PTC
  340.  
  341. ;--PORT ADDRESSES (AS SPECIFIED FOR SOL COMPUTER SYSTEM)
  342.  
  343. CMD    EQU    0F8H    ;COMMAND REGISTER
  344. STATUS    EQU    0F8H    ;STATUS REGISTER
  345. RXDATA    EQU    0F9H    ;SERIAL DATA IN
  346. TXDATA    EQU    0F9H    ;SERIAL DATA OUT
  347.  
  348. TMS6011 SET    -1
  349.     ENDIF
  350.  
  351. ;+++++++++++++++ DIGITAL GROUP SYSTEM CONFIGURATION ++++++++++++++++++++
  352.  
  353.     IF    DGS
  354.  
  355. ;--PORTS 10 & 11 ARE ASSOCIATED WITH USART # 1
  356.  
  357. CMD    EQU    011H    ;COMMAND REGISTER
  358. STATUS    EQU    011H    ;STATUS REGISTER
  359. RXDATA    EQU    010H    ;SERIAL DATA IN
  360. TXDATA    EQU    010H    ;SERIAL DATA OUT
  361.  
  362. CANBRK    SET    -1
  363. INT8251 SET    -1
  364.     ENDIF
  365.     ;PAGE
  366.  
  367. ;++++++++++++++++ INDUSTRIAL MICRO SYSTEMS ++++++++++++++++++++++++++
  368.  
  369. PORT    EQU    1    ;PORT WITHIN THE IMS440 BOARD
  370.  
  371.     IF    IMS440
  372.  
  373. ;--SELECT XTAL VALUE AS A FUNCTION OF <ON-BOARD OSCILLATOR>
  374.  
  375. XTAL    EQU    7680    ;USED WITH ON BOARD OSCILLATOR
  376. ;XTAL    EQU    12500    ;ASSUMES NO ON-BOARD OSCILLATOR
  377.  
  378. IOB    EQU    40H    ;BASE ADDRESS OF THE IMS440 BOARD
  379.  
  380. CMD    EQU    IOB + 2*PORT
  381. STATUS    EQU    IOB + 2*PORT
  382. RXDATA    EQU    IOB + 1 + 2*PORT
  383. TXDATA    EQU    IOB + 1 + 2*PORT
  384.  
  385. ;--BAUD RATE VALUES
  386.  
  387. BAUD10    EQU    XTAL/11     ;110 BAUD
  388. BAUD15    EQU    XTAL/15     ;150 BAUD
  389. BAUD30    EQU    XTAL/30     ;300 BAUD
  390. BAUD120 EQU    XTAL/120    ;1200 BAUD
  391. BAUD240 EQU    XTAL/240    ;2400 BAUD
  392. BAUD480 EQU    XTAL/480    ;4800 BAUD
  393. BAUD960 EQU    XTAL/960    ;9600 BAUD
  394.  
  395. CNTVAL    EQU    IOB + 4 + PORT    ;COUNT INITIALIZATION REGISTER
  396. CNTID    EQU    036H + PORT*40H ;COUNTER IDENTITY
  397. CNTSEL    EQU    IOB + 7     ;COUNTER CONTROL REGISTER
  398.  
  399. BAUDFLG SET    -1
  400. IMS6402 SET    -1
  401.     ENDIF
  402.     ;PAGE
  403.  
  404. ;+++++++++++++++++++ P&T TRS-80 Mod II +++++++++++++++++++++
  405.  
  406.     IF    PNTCPM
  407.  
  408. EXX    EQU    0D9H    ;Z-80 REG EXCHANGE OP-CODE
  409. PNT    EQU    040H    ;P&T JUMP VECTOR LOCATION
  410.  
  411. CHANL    EQU    1    ;1 ==> PORT A, 2 ==> PORT B
  412.  
  413. CMD    EQU    0    ;DUMMY VALUE
  414. STATUS    EQU    CHANL+4 ;STATUS REGISTER
  415. RXDATA    EQU    CHANL+0 ;SERIAL DATA IN
  416. TXDATA    EQU    CHANL+2 ;SERIAL DATA OUT
  417.  
  418. ;--UART CONFIGURED BY P&T "SETUP" FUNCTION
  419.  
  420. RDA    EQU    001H    ;RECEIVED DATA AVAILABLE
  421. TBE    EQU    004H    ;TRANSMITTER BUFFER EMPTY
  422.     ENDIF
  423.  
  424. ;++++++++++++++++++ GODBOUT INTERFACER II ++++++++++++++++++++
  425.  
  426.     IF    GODBOT
  427.  
  428. CMD    EQU    011H    ;COMMAND PORT
  429. STATUS    EQU    011H    ;STATUS PORT
  430. RXDATA    EQU    010H    ;RECEIVED DATA PORT
  431. TXDATA    EQU    010H    ;TRANSMITTED DATA PORT
  432.  
  433. ;--UART CONFIGURATION JUMPER CONTROLLED
  434.  
  435. RDA    EQU    002H    ;RECEIVED DATA AVAILABLE BIT
  436. TBE    EQU    001H    ;TRANSMITTER BUFFER EMPTY BIT
  437.     ENDIF
  438.     ;PAGE
  439.  
  440. ;++ *******************************************************************
  441.  
  442. ;            UART/USART SPECIFICATIONS
  443. ;            =========================
  444.  
  445.     IF    MC6850
  446.  
  447. ;--STATUS & COMMAND BIT VALUES (7 DATA BITS, EVEN PARITY, ONE STOP BIT)
  448.  
  449. RDA    EQU    001H    ;RECEIVED DATA AVAILABLE
  450. TBE    EQU    002H    ;TRANSMITTER BUFFER EMPTY
  451. RESET    EQU    04BH    ;UART RESET
  452. INIT    EQU    049H    ;UART INITIALIZATION (FOLLOWING RESET)
  453. BREAK    EQU    069H    ;TRANSMIT A BREAK (MUST BE PULSED)
  454.     ENDIF
  455.  
  456.     IF    TMS5501
  457.  
  458. ;--STATUS & COMMAND VALUES
  459.  
  460. RDA    EQU    040H    ;RECEIVED DATA AVAILABLE
  461. TBE    EQU    080H    ;TRANSMITTER BUFFER EMPTY
  462. RESET    EQU    001H    ;TU-ART RESET
  463. INIT    EQU    000H    ;UART INITIALIZATION (FOLLOWING RESET)
  464. BREAK    EQU    002H    ;TRANSMIT A BREAK (MUST BE PULSED)
  465.     ENDIF
  466.  
  467.     IF    INT8251
  468.  
  469. ;--STATUS & COMMAND VALUES
  470.  
  471. RDA    EQU    002H    ;RECEIVED DATA AVAILABLE
  472. TBE    EQU    001H    ;TRANSMITTER BUFFER EMPTY
  473. RESET    EQU    050H    ;CONTROL = ERROR.RESET, INTERNAL.RESET
  474. INIT1    EQU    07AH    ;MODE = 1-STOP, EVEN.PARITY, 7-BITS, 16X.BAUD
  475. INIT2    EQU    027H    ;CONTROL = RTS, RX.EN, DTR, TX.EN
  476. BREAK    EQU    02AH    ;CONTROL = RTS, SEND.BREAK, DTR
  477.     ENDIF
  478.  
  479.     IF    JAD1013
  480.  
  481. ;--STATUS & COMMAND VALUES
  482.  
  483. RDA    EQU    010H    ;RECEIVED DATA AVAILABLE
  484. TBE    EQU    080H    ;TRANSMITTER BUFFER EMPTY
  485. RESET    EQU    000H    ;UART RESET
  486. INIT    EQU    028H    ;7 DATA BITS, EVEN PARITY, 1 STOP BIT
  487.     ENDIF
  488.  
  489.     IF    TEI1013
  490.  
  491. ;--STATUS & COMMAND VALUES
  492.  
  493. RDA    EQU    001H    ;RECEIVED DATA AVAILABLE
  494. TBE    EQU    080H    ;TRANSMITTER BUFFER EMPTY
  495. RESET    EQU    000H    ;UART RESET
  496. INIT    EQU    000H    ;7 DATA BITS, EVEN PARITY, 1 STOP BIT
  497.     ENDIF
  498.  
  499.     IF    INS8250
  500.  
  501. ;--STATUS & COMMAND VALUES
  502.  
  503. RDA    EQU    001H    ;RECEIVED DATA AVAILABLE
  504. TBE    EQU    020H    ;TRANSMITTER BUFFER EMPTY
  505. RESET    EQU    000H    ;DUMMY VALUE
  506. INIT    EQU    01AH    ;EVEN PARITY, 1 STOP, 7 DATA BITS
  507. DLSEL    EQU    080H    ;DIVISION LATCH SELECT
  508. BREAK    EQU    040H    ;TRANSMIT A BREAK (MUST BE PULSED)
  509.     ENDIF
  510.  
  511.     IF    SIG2651
  512.  
  513. ;--STATUS & COMMAND VALUES
  514.  
  515. RDA    EQU    002H    ;RECEIVED DATA AVAILABLE
  516. TBE    EQU    001H    ;TRANSMITTER BUFFER EMPTY
  517. RESET    EQU    037H    ;UART RESET
  518. INIT    EQU    037H    ;PARTIAL INITIALIZATION
  519. MODE1    EQU    079H    ;1 STOP, EVEN_PAR, 7 D_BITS, 1X BAUD
  520. MODE2    EQU    037H    ;RX & TX CLOCK <= BRCLK, 300 BAUD
  521. BREAK    EQU    03FH    ;TRANSMIT A BREAK (MUST BE PULSED)
  522.     ENDIF
  523.  
  524.     IF    TMS6011
  525.  
  526. ;--STATUS & COMMAND VALUES
  527.  
  528. RDA    EQU    040H    ;RECEIVED DATA AVAILABLE
  529. TBE    EQU    080H    ;TRANSMITTER BUFFER EMPTY
  530. RESET    EQU    010H    ;REQUEST TO SEND
  531. INIT    EQU    010H    ;BIT CONFIGURATION SWITCH SELECTIBLE
  532.     ENDIF
  533.  
  534.     IF    IMS6402
  535.  
  536. ;--STATUS & COMMAND VALUES
  537.  
  538. RDA    EQU    001H    ;RECEIVED DATA AVAILABLE
  539. TBE    EQU    002H    ;TRANSMITTER BUFFER EMPTY
  540. RESET    EQU    000H    ;DUMMY RESET
  541. INIT    EQU    013H    ;7 DATA BITS, EVEN PARITY, 1 STOP BIT
  542.     ENDIF
  543.  
  544. ;-- *******************************************************************
  545. 013H    ;7 DATA BITS, EVEN PARITY, 1 STOP BIT
  546.     ENDIF
  547.  
  548. ;-- ******************************************************************