;serial A
IOPORT(80)=0398h INITVAL=rxxxxxxx
IOPORT(81)=0399h INITVAL=rrrrrrxr

IOPORT(83)=0398h INITVAL=rxxxxxxx
IOPORT(84)=0399h INITVAL=rrrrxxrr

IOPORT(86)=0398h INITVAL=rxxxxxxx
IOPORT(87)=0399h INITVAL=xxrrrrrr


;serial B
IOPORT(90)=0398h INITVAL=rxxxxxxx
IOPORT(91)=0399h INITVAL=rrrrrxrr

IOPORT(93)=0398h INITVAL=rxxxxxxx
IOPORT(94)=0399h INITVAL=rrxxrrrr

IOPORT(96)=0398h INITVAL=rxxxxxxx
IOPORT(97)=0399h INITVAL=xxrrrrrr

IOPORT(98)=0398h INITVAL=rxxxxxxx
IOPORT(99)=0399h INITVAL=rrrrrxrr


FUNCTION="Serial (A)"
 TYPE="COM,ASY"
 CHOICE="COM1"
  SUBTYPE="COM1;A;CMOS=290F0A"
  LINK

;  INIT=PORTADR(0398h) 00000000 ;set index to FER
;  INIT=PORTADR(0399h) rrrrrr1r ;enable UART1
;  INIT=PORTADR(0399h) rrrrrr1r
   
;  INIT=PORTADR(0398h) 00000001 ;set index to FAR
;  INIT=PORTADR(0399h) rrrr00rr ;select UART1 com1
;  INIT=PORTADR(0399h) rrrr00rr

   INIT=IOPORT(80) LOC(6-0) 0000000  ;set index to FER
   INIT=IOPORT(81) LOC(1) 1          ;enable UART1

   INIT=IOPORT(83) LOC(6-0) 0000001  ;set index to FAR
   INIT=IOPORT(84) LOC(3-2) 00       ;select UART1 com1
   
   PORT=3F8h-3FFh
   
   SUBCHOICE
   LINK
   IRQ=4 

   ;SUBCHOICE
   ;LINK
   ;IRQ=4 SHARE=YES TRIGGER=LEVEL

 CHOICE="Disabled"
  SUBTYPE="CMOS=290F80"
  DISABLE=YES
  LINK
;  INIT=PORTADR(0398h) 00000000
;  INIT=PORTADR(0399h) rrrrrr0r ;disable uart1
;  INIT=PORTADR(0399h) rrrrrr0r

   INIT=IOPORT(80) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(81) LOC(1) 0         ;disable UART1


 CHOICE="COM3"
  SUBTYPE="COM3;A;CMOS=290F02"
  LINK

;   INIT=PORTADR(0398h) 00000000
;   INIT=PORTADR(0399h) rrrrrr1r ;enable uart1
;   INIT=PORTADR(0399h) rrrrrr1r
   
;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) rrrr10rr ;select UART1 com3
;   INIT=PORTADR(0399h) rrrr10rr
   
;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) 00rrrrrr ;select com3 addr = 3E8h
;   INIT=PORTADR(0399h) 00rrrrrr
   
   INIT=IOPORT(80) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(81) LOC(1) 1         ;enable UART1
   
   INIT=IOPORT(83) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(84) LOC(3-2) 10      ;select UART1 COM3

   INIT=IOPORT(86) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(87) LOC(7-6) 00      ;select COM3 Addr = 3E8h

   PORT=3E8h-3EFh
   
   SUBCHOICE
   LINK
   IRQ=4  
   
   ;SUBCHOICE
   ;LINK
   ;IRQ=4 SHARE=YES TRIGGER=LEVEL


 CHOICE="COM4"
 SUBTYPE="COM4;A;CMOS=290F02"
 LINK

;   INIT=PORTADR(0398h) 00000000
;   INIT=PORTADR(0399h) rrrrrr1r ;enable uart1
;   INIT=PORTADR(0399h) rrrrrr1r

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) rrrr11rr ;select UART1 com4
;   INIT=PORTADR(0399h) rrrr11rr

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) 10rrrrrr ;select com4 addr = 2E8h
;   INIT=PORTADR(0399h) 10rrrrrr

   INIT=IOPORT(80) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(81) LOC(1) 1         ;enable UART1
   
   INIT=IOPORT(83) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(84) LOC(3-2) 11      ;select UART1 COM4
   
   INIT=IOPORT(86) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(87) LOC(7-6) 00      ;select COM4 Addr = 2E8h

   PORT=2E8h-2EFh

   SUBCHOICE
   LINK
   IRQ=3 

   ;SUBCHOICE
   ;LINK
   ;IRQ=4 SHARE=YES TRIGGER=LEVEL


FUNCTION="Serial (B)"
 TYPE="COM,ASY"
 CHOICE="COM2"
  SUBTYPE="COM2;B;CMOS=290F02"
  LINK
;   INIT=PORTADR(0398h) 00000000
;   INIT=PORTADR(0399h) rrrrr1rr
;   INIT=PORTADR(0399h) rrrrr1rr

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) rr01rrrr ;select UART2 COM2
;   INIT=PORTADR(0399h) rr01rrrr

   INIT=IOPORT(90) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(91) LOC(2) 1         ;enable UART2

   INIT=IOPORT(93) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(94) LOC(5-4) 01      ;select UART2 COM2

   PORT=2F8h-2FFh
   
   SUBCHOICE
   LINK
   IRQ=3 
   

   ;SUBCHOICE
   ;LINK
   ;IRQ=3 SHARE=YES TRIGGER=LEVEL


 CHOICE="Disabled"
  DISABLE=YES
  LINK
;   INIT=PORTADR(0398h) 00000000
;   INIT=PORTADR(0399h) rrrrr0rr ;disable uart2
;   INIT=PORTADR(0399h) rrrrr0rr

   INIT=IOPORT(90) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(91) LOC(2) 0         ;disable UART2


 CHOICE="COM3"
 SUBTYPE="COM3;B;CMOS=290F02"
 LINK
;  INIT=PORTADR(0398h) 00000000
;  INIT=PORTADR(0399h) rrrrr1rr ;enable uart2
;  INIT=PORTADR(0399h) rrrrr1rr

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) rr10rrrr ;select UART2 com3
;   INIT=PORTADR(0399h) rr10rrrr

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) 00rrrrrr ;select com3 addr = 3E8h
;   INIT=PORTADR(0399h) 00rrrrrr


   INIT=IOPORT(90) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(91) LOC(2) 1         ;enable UART2
   
   INIT=IOPORT(93) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(94) LOC(5-4) 10      ;select UART2 COM3

   INIT=IOPORT(96) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(97) LOC(7-6) 00      ;select COM3 Addr = 3E8h

   PORT=3E8h-3EFh

 
   SUBCHOICE
   LINK
   IRQ=4 


   ;SUBCHOICE
   ;LINK
   ;IRQ=3 SHARE=YES TRIGGER=LEVEL

 CHOICE="COM4"
  SUBTYPE="COM4;B;CMOS=290F02"
  LINK
;   INIT=PORTADR(0398h) 00000000
;   INIT=PORTADR(0399h) rrrrr1rr ;enable uart2
;   INIT=PORTADR(0399h) rrrrr1rr

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) rr11rrrr ;select UART2 com4
;   INIT=PORTADR(0399h) rr11rrrr

;   INIT=PORTADR(0398h) 00000001 ;set index to FAR
;   INIT=PORTADR(0399h) 10rrrrrr ;select com4 addr = 2E8h
;   INIT=PORTADR(0399h) 10rrrrrr

   INIT=IOPORT(90) LOC(6-0) 0000000 ;set index to FER
   INIT=IOPORT(91) LOC(2) 1         ;enable UART2
   
   INIT=IOPORT(93) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(94) LOC(5-4) 11      ;select UART2 COM4
   
   INIT=IOPORT(96) LOC(6-0) 0000001 ;set index to FAR
   INIT=IOPORT(97) LOC(7-6) 00      ;select COM4 Addr = 2E8h


   PORT=2E8h-2EFh

   SUBCHOICE
   LINK
   IRQ=3 

   ;SUBCHOICE
   ;LINK
   ;IRQ=3 SHARE=YES TRIGGER=LEVEL