7400 	STA	72CB 
7403 	LDA	741A ,X
7406 	STA	72CC 
7409 	LDA	7419 ,X
740C 	LDX	72CB 
740F 	STA	72CB 
7412 	TXA
7413 	LDX	#0
7415 	JMP	(72CB )

7418 	RTS             ; RETURN VECTOR 0

7419 	DB      23,74   ; COMLNK
741B 	DB      79,74   ; GBYTE
741D    DB      9B,74   ; PBYTE
741F 	DB      F0,74   ; RIB
7421 	DB      CB,74   ; ROB

      COMLINK:  
7423 	STX	7202 
7426 	LDA	#78
7428 	ADC	#2
742A 	STA	7203 
742D 	CLD
742E 	BIT	7000 
7431 	BMI	7439 
7433 	LDY	7100 
7436 	JMP	7674 

      OIRET:
7439 	BIT	7000 
743C 	BVC	7446 
743E 	LDA	7211 
7441 	BEQ	7446 
7443 	JMP	76DE 
7446 	LDA	72D7 
7449 	BEQ	745D 
744B 	LDA	7213 
744E 	BNE	7453 
7450 	JMP	78E2 
7453 	DEC	72C7 
7456 	BNE	745D 
7458 	LDX	#4
745A 	JMP	74FA 

745D 	BIT	7203    ; RETURN VECTOR 2
7460 	BPL	7463 
7462 	SED
7463 	LDX	7202 
7466 	LDA	72D7 
7469 	ASL
746A 	ORA	7208 
746D 	JMP	7F4B    ; JUMP RETX

7470 	LDX	#6      ; RETURN VECTOR 1
7472 	BNE	7423    ; COMLNK

7474 	JMP	7470    ; RETURN VECTOR 3

      GBYTE0:
7477 	LDY	#0

      GBYTE:
7479 	SEC
747A 	LDA	72D7 
747D 	BEQ	7496 
747F 	TYA
7480 	EOR	7213 
7483 	BNE	7496 
7485 	LDY	7200 
7488 	CPY	7204 
748B 	BCS	7496 
748D 	LDA	7213 ,Y
7490 	INC	7200 
7493 	LDY	7214 
7496 	JMP	7F4B    ; JUMP RETX

      PBYTE0:
7499 	LDY	#0

      PBYTE:
749B 	BIT	726E 
749E 	BPL	74A7 
74A0 	STY	726E 
74A3 	LDY	#2
74A5 	BNE	74B8 
74A7 	CPY	726E 
74AA 	BNE	74C5 
74AC 	LDY	7208 
74AF 	BNE	74C5 
74B1 	LDY	7201 
74B4 	CPY	#5A
74B6 	BCS	74C6 
74B8 	STA	726D ,Y
74BB 	INY
74BC 	TYA
74BD 	EOR	#5A
74BF 	STY	7201 
74C2 	CLC
74C3 	BCC	74C6 
74C5 	SEC
74C6 	JMP	7F4B    ; JUMP RETX

      ROB0:
74C9 	LDY	#0

      ROB:
74CB 	CPY	726E 
74CE 	BNE	74C5 
74D0 	LDY	7208 
74D3 	BNE	74C5 
74D5 	STA	726D 
74D8 	LDY	7201 
74DB 	CPY	#2
74DD 	BCS	74E1 
74DF 	LDY	#2
74E1 	STY	7212 
74E4 	LDY	#1
74E6 	STY	7208 
74E9 	STY	7211 
74EC 	BNE	74C2 

      RIB0:
74EE 	LDY	#0

      RIB:
74F0 	LDA	72D7 
74F3 	BEQ	74C5 
74F5 	CPY	7213 
74F8 	BNE	74C5 
74FA 	LDA	#0
74FC 	STA	7204 
74FF 	STA	72D7 
7502 	LDA	#C0
7504 	STA	720F 
7507 	LDA	#2
7509 	STA	7200 
750C 	LSR
750D 	STA	7211 
7510 	BNE	74C2 

      RESET:
7512 	STA	72DE 
7515 	LDA	#40
7517 	STA	2000 
751A 	STX	72E0 
751D 	STY	72DF 
7520 	LDA	#2
7522 	STA	72E2 
7525 	ASL
7526 	STA	72DC 
7529 	LDA	#52
752B 	STA	72E1 
752E 	CLD
752F 	LDA	6001 
7532 	STA	6001 
7535 	LDA	#AA
7537 	CMP	72D8 
753A 	BEQ	7554 
753C 	STA	72D8 
753F 	LDX	#14
7541 	LDA	757D ,X
7544 	STA	72E2 ,X
7547 	CPX	#8
7549 	BCS	7551 
754B 	LDA	7592 ,X
754E 	STA	FFF8 ,X
7551 	DEX
7552 	BPL	7541 
7554 	LDA	#0
7556 	LDX	#FF
7558 	STX	726E 
755B 	LDX	#4
755D 	STA	7204 ,X
7560 	DEX
7561 	BPL	755D 
7563 	STA	72D7 
7566 	LDA	#2
7568 	STA	7202 
756B 	STA	7200 
756E 	STA	7201 
7571 	LSR
7572 	STA	7211 
7575 	LDA	#12
7577 	STA	720E 
757A 	JMP	7602 
757D 	???
757E 	BRK
757F 	???
7580 	ORA	(1,X)
7582 	JMP	7512 
7585 	JMP	7512 
7588 	BRK
7589 	BRK
758A 	JMP	7512 
758D 	JMP	7512 
7590 	BRK
7591 	BRK

7592 	DB      09,76  ; USIRQ
7594 	DB      0D,76  ; USNMI
7596 	DB      12,75  ; RESET
7598    DB      9A,75  ; INTEN

      INTEN:
759A 	STA     72DE
759D    PLA
759E 	PHA
759F 	AND	#10
75A1 	BNE	75AC 
75A3 	LDA	72DE 
75A6 	JMP	(FFF8 )

75A9 	STA	72DE 
75AC 	STX	72E0 
75AF 	TSX
75B0 	CLC
75B1 	LDA	0102 ,X
75B4 	EOR	72E3 
75B7 	BNE	75D8 
75B9 	LDA	0103 ,X
75BC 	EOR	72E4 
75BF 	BNE	75D8 
75C1 	DEC	72E5 
75C4 	BEQ	75D8 
75C6 	LDA	0101 ,X
75C9 	STA	0103 ,X
75CC 	PLA
75CD 	PLA
75CE 	LDA	72DE 
75D1 	LDX	72E0 
75D4 	PLP
75D5 	JMP	72E7 

75D8 	BIT	72E2 
75DB 	BVC	75E5 
75DD 	LDA	72E2 
75E0 	ORA	#2
75E2 	STA	72E2 
75E5 	LDA	#42
75E7 	CLD
75E8 	STA	72E1 
75EB 	STY	72DF 
75EE 	PLA
75EF 	STA	72DC 
75F2 	PLA
75F3 	BCS	75F7 
75F5 	SBC	#1
75F7 	STA	72DA 
75FA 	PLA
75FB 	BCS	75FF 
75FD 	SBC	#0
75FF 	STA	72DB 
7602 	TSX
7603 	STX	72DD 
7606 	JMP	7AB5 

      USIRQ:
7609 	LDA	#49
760B 	BNE	7617 

      USNMI:
760D 	STA	72DE 
7610 	LDA	#2
7612 	STA	72E2 
7615 	LDA	#4E
7617 	STX	72E0 
761A 	SEC
761B 	BCS	75E7 
761D 	BIT	72E2 
7620 	BMI	760D 
7622 	PHA
7623 	STA	72DE 
7626 	TXA
7627 	PHA
7628 	STX	72E0 
762B 	TYA
762C 	PHA
762D 	STY	72DF 
7630 	TSX
7631 	STX	72DD 
7634 	LDA	#53
7636 	STA	72E1 
7639 	LDA	0104 ,X
763C 	STA	72DC 
763F 	LDA	0105 ,X
7642 	STA	72DA 
7645 	LDA	0106 ,X
7648 	STA	72DB 
764B 	LDX	#8
764D 	JMP	7423    ; COMLNK

7650 	LSR             ; RETURN VECTOR 4
7651 	BCS	764B 
7653 	LDA	7207 
7656 	BNE	764B 
7658 	LDA	720E 
765B 	AND	#8
765D 	BEQ	764B 
765F 	LDA	7206 
7662 	BNE	764B 
7664 	LDA	72D7 
7667 	BEQ	766E 
7669 	LDA	7213 
766C 	BEQ	764B 
766E 	PLA
766F 	TAY
7670 	PLA
7671 	TAX
7672 	PLA
7673 	RTI
7674 	TYA
7675 	CLC
7676 	ADC	720A 
7679 	ADC	#0
767B 	STA	720A 
767E 	ADC	720B 
7681 	ADC	#0
7683 	STA	720B 
7686 	LDX	7206 
7689 	BEQ	7692 
768B 	JMP	7F4B    ; JUMP RETX
768E 	LDX	#A
7690 	BNE	76D5 

7692 	CPY	#1      ; RETURN VECTOR 5
7694 	BNE	76D8 
7696 	STY	720A 
7699 	STY	720B 
769C 	LDX	#C
769E 	BNE	76D5 

76A0 	CPY	#10     ; RETURN VECTOR 6
76A2 	BNE	76BE 
76A4 	LDX	#E
76A6 	BNE	76D5 

76A8 	CPY	#16     ; RETURN VECTOR 7
76AA 	BEQ	769C 
76AC 	CPY	#10
76AE 	BEQ	76BE 
76B0 	STY	7209 
76B3 	LDX	#10
76B5 	BNE	76D5 

76B7 	LDX	#12     ; RETURN VECTOR 8
76B9 	BNE	76D5 

76BB 	JMP	778D    ; RETURN VECTOR 9
76BE 	TYA
76BF 	LDY	72D7 
76C2 	BNE	769C 
76C4 	LDY	7204 
76C7 	CPY	#5A
76C9 	BEQ	76D0 
76CB 	BCS	769C 
76CD 	STA	7213 ,Y
76D0 	INC	7204 
76D3 	BNE	769C 
76D5 	STX	7206 
76D8 	JMP	7439 
76DB 	JMP	784D 
76DE 	LDX	7207 
76E1 	BEQ	76E6 
76E3 	JMP	7F4B    ; JUMP RETX
76E6 	LDA	720E 
76E9 	AND	#8
76EB 	BNE	76DB 
76ED 	STA	720C 
76F0 	STA	720D 
76F3 	LDA	#1
76F5 	LDX	#14
76F7 	BNE	775B 

76F9 	LDA	720E    ; RETURN VECTOR 0A
76FC 	AND	#3
76FE 	BNE	7723 
7700 	STA	7205 
7703 	BEQ	7709 
7705 	LDX	#16
7707 	BNE	775B 

7709 	LDY	7205    ; RETURN VECTOR 0B
770C 	CPY	7212 
770F 	BCS	7723 
7711 	LDA	726D ,Y
7714 	CMP	#10
7716 	BNE	771E 
7718 	LDX	#18
771A 	BNE	775B 

771C 	LDA	#10     ; RETURN VECTOR 0C
771E 	INC	7205 
7721 	BNE	7705 
7723 	LDA	#10
7725 	LDX	#1A
7727 	BNE	775B 

7729 	LDA	720E    ; RETURN VECTOR 0D
772C 	ORA	#8
772E 	STA	720E 
7731 	ASL
7732 	LDX	#1C
7734 	BNE	7775 

7736 	ROR             ; RETURN VECTOR 0E
7737 	LDX	#1E
7739 	BNE	775B 

773B 	LDA	720C    ; RETURN VECTOR 0F
773E 	EOR	#FF
7740 	CLC
7741 	SBC	720D 
7744 	ADC	#0
7746 	LDX	#20
7748 	BNE	775B 

774A 	LDA	720C    ; RETURN VECTOR 10
774D 	EOR	#FF
774F 	LDX	#22
7751 	BNE	775B 

7753 	LDA	#0      ; RETURN VECTOR 11
7755 	STA	7207 
7758 	JMP	784D 
775B 	CLC
775C 	STA	7100 
775F 	ADC	720C 
7762 	ADC	#0
7764 	STA	720C 
7767 	ADC	720D 
776A 	ADC	#0
776C 	STA	720D 
776F 	STX	7207 
7772 	JMP	7446 

7775 	LDY	#7
7777 	SEC
7778 	ROL
7779 	BCC	777E 
777B 	EOR	7785 ,Y
777E 	DEY
777F 	BPL	7778 
7781 	ROL
7782 	JMP	7F4B    ; JUMP RETX

      PSET:
7785 	DB      80,40,20,10,08,04,02,01

778D 	LDA     #C0
778F    STA     720F
7792 	LDA	720A 
7795 	AND	720B 
7798 	EOR	#FF
779A 	BNE	77A4 
779C 	LDA	7209 
779F 	BIT	7789 
77A2 	BNE	77A7 
77A4 	JMP	7830 
77A7 	LDX	#24
77A9 	BNE	7775 

77AB 	BCS	77A4    ; RETURN VECTOR 12
77AD 	AND	#3
77AF 	BNE	77BD 
77B1 	LDA	72D7 
77B4 	BNE	77A4 
77B6 	LDA	#5A
77B8 	CMP	7204 
77BB 	BCC	77A4 
77BD 	LDA	720E 
77C0 	ASL
77C1 	ASL
77C2 	ASL
77C3 	ASL
77C4 	EOR	7209 
77C7 	ASL
77C8 	BMI	77F1 
77CA 	LDA	7209 
77CD 	AND	#10
77CF 	BEQ	77D3 
77D1 	LDA	#1
77D3 	STA	7210 
77D6 	LDA	720E 
77D9 	AND	#3
77DB 	CMP	#1
77DD 	BNE	77F1 
77DF 	INC	720E 
77E2 	LDA	7209 
77E5 	AND	#20
77E7 	BEQ	77F1 
77E9 	DEC	7208 
77EC 	LDA	#80
77EE 	STA	726E 
77F1 	LDA	7209 
77F4 	ASL
77F5 	ASL
77F6 	ASL
77F7 	ASL
77F8 	EOR	720E 
77FB 	ASL
77FC 	BPL	781F 
77FE 	LDA	720E 
7801 	EOR	#40
7803 	AND	#CF
7805 	STA	720E 
7808 	LDA	7209 
780B 	AND	#3
780D 	BNE	781F 
780F 	INC	72D7 
7812 	LDA	#FF
7814 	STA	72C7 
7817 	LDA	#20
7819 	ORA	720E 
781C 	STA	720E 
781F 	LDA	7209 
7822 	AND	#3
7824 	CMP	#2
7826 	BNE	7830 
7828 	LDA	720F 
782B 	AND	#80
782D 	STA	720F 
7830 	LDA	#0
7832 	STA	7206 
7835 	LDA	72D7 
7838 	BNE	7845 
783A 	STA	7204 
783D 	LDA	#10
783F 	ORA	720E 
7842 	STA	720E 
7845 	LDA	#1
7847 	STA	7211 
784A 	JMP	7439 
784D 	LDA	720E 
7850 	AND	#3
7852 	BNE	7856 
7854 	ORA	#1
7856 	CMP	#1
7858 	BNE	7861 
785A 	LDY	7208 
785D 	BNE	7861 
785F 	LDA	#2
7861 	CMP	#2
7863 	BNE	7878 
7865 	LDY	7208 
7868 	BNE	786E 
786A 	LDA	#2
786C 	BNE	7878 
786E 	LDA	720F 
7871 	ORA	#80
7873 	STA	720F 
7876 	LDA	#3
7878 	EOR	720E 
787B 	AND	#3
787D 	EOR	720E 
7880 	STA	720E 
7883 	LDA	720F 
7886 	BPL	7894 
7888 	ASL
7889 	BMI	7899 
788B 	LDA	720E 
788E 	AND	#3
7890 	CMP	#2
7892 	BNE	7899 
7894 	LSR	7211 
7897 	BPL	78DF 
7899 	LDA	#1
789B 	STA	7211 
789E 	LSR
789F 	STA	7207 
78A2 	LDA	720E 
78A5 	AND	#3
78A7 	CMP	#3
78A9 	BNE	78C6 
78AB 	LDA	7210 
78AE 	BEQ	78C6 
78B0 	LDA	7208 
78B3 	CMP	#1
78B5 	LDA	720E 
78B8 	AND	#FC
78BA 	ADC	#0
78BC 	EOR	#5
78BE 	STA	720E 
78C1 	LDA	#0
78C3 	STA	7210 
78C6 	LDA	#0
78C8 	STA	720F 
78CB 	CMP	7206 
78CE 	BNE	78D7 
78D0 	CMP	72D7 
78D3 	BNE	78D7 
78D5 	LDA	#10
78D7 	ORA	720E 
78DA 	AND	#F7
78DC 	STA	720E 
78DF 	JMP	7446 
78E2 	LDA	7215 
78E5 	AND	#1E
78E7 	CMP	#14
78E9 	BCS	7936 
78EB 	TAY
78EC 	LDA	78FB ,Y
78EF 	STA	72C9 
78F2 	LDA	78FC ,Y
78F5 	STA	72CA 
78F8 	JMP	(72C9 )

      CDTAB:
78FB 	DB      3E,79  ; ALTER
78FD    DB      F0,79  ; DISP
78FF    DB      19,79  ; IDENT
7901 	DB      59,7A  ; GO
7903    DB      2D,7B
7905 	DB      82,7B
7907    DB      0C,7C
7909 	DB      B5,7C
790B    DB      72,7D
790D 	DB      53,7E
790F    DB      00,14
7911 	DB      00,17
7913 	.ASCII  /6502BC/

      INDENT:
7919 	LDX	#26
791B 	JMP	7499    ; PBYTE0

791E 	BCS	793B    ; RETURN VECTOR 13
7920 	LDY	#B
7922 	STY	7201 
7925 	LDA	790E ,Y
7928 	STA	726D ,Y
792B 	DEY
792C 	BNE	7925 
792E 	LDA	7214 
7931 	LDX	#28
7933 	JMP	74C9    ; ROB0

7936 	LDX	#2A     ; RETURN VECTOR 14
7938 	JMP	74EE    ; RIB0

793B 	JMP	745D    ; RETURN VECTOR 15

      ALTER:
793E 	LDX	#2C
7940 	JMP	7499    ; PBYTE0

7943 	BCS	793B    ; RETURN VECTOR 16
7945 	LDX	#2E
7947 	BNE	79A4 

7949 	LDA	72E2    ; RETURN VECTOR 17
794C 	ORA	#1
794E 	LDX	#30
7950 	JMP	7477    ; GBYTE0

7953 	BCS	792E    ; RETURN VECTOR 18
7955 	LDX	#32
7957 	JMP	7B14 

795A 	BIT	7215    ; RETURN VECTOR 19
795D 	BVC	796C 
795F 	STA	72D3 
7962 	LDX	#34
7964 	JMP	7B10 

7967 	CMP	72D3    ; RETURN VECTOR 1A
796A 	BNE	7985 
796C 	BIT	7215 
796F 	BPL	7979 
7971 	INC	72CE 
7974 	BNE	7979 
7976 	INC	72CF 
7979 	DEC	72D4 
797C 	BNE	794E 
797E 	LDA	#6
7980 	STA	7201 
7983 	BNE	799E 
7985 	LDX	#36
7987 	JMP	7499    ; PBYTE0

798A 	LDA	726F    ; RETURN VECTOR 1B
798D 	ORA	#20
798F 	STA	726F 
7992 	LDA	72CE 
7995 	STA	7270 
7998 	LDA	72CF 
799B 	STA	7271 
799E 	LDA	72E2 
79A1 	JMP	792E 
79A4 	LDA	7215 
79A7 	ORA	#10
79A9 	STA	726F 
79AC 	LSR
79AD 	LDY	7216 
79B0 	LDA	7217 
79B3 	STY	7270 
79B6 	STA	7271 
79B9 	BCC	79D0 
79BB 	TYA
79BC 	CMP	#1E
79BE 	BMI	79C7 
79C0 	ADC	#DA
79C2 	TAY
79C3 	LDA	#FF
79C5 	BNE	79D0 
79C7 	SEC
79C8 	ADC	#D8
79CA 	TAY
79CB 	LDA	7217 
79CE 	ADC	#72
79D0 	STY	72CE 
79D3 	STA	72CF 
79D6 	LDA	7218 
79D9 	CMP	#54
79DB 	BCC	79DF 
79DD 	LDA	#54
79DF 	STA	7272 
79E2 	STA	72D4 
79E5 	LDY	#6
79E7 	STY	7200 
79EA 	STY	7201 
79ED 	JMP	7F4B    ; JUMP RETX

      DISP:
79F0 	LDX	#38
79F2 	JMP	7499    ; PBYTE0

79F5 	BCS	7A36    ; RETURN VECTOR 1C
79F7 	LDX	#3A
79F9 	JMP	79A4 

79FC 	LDX	#3C     ; RETURN VECTOR 1D
79FE 	JMP	7B10 

7A01 	INC	72CE    ; RETURN VECTOR 1E
7A04 	BNE	7A09 
7A06 	INC	72CF 
7A09 	DEC	72D4 
7A0C 	BEQ	7A39 
7A0E 	LDX	#3E
7A10 	JMP	7499    ; PBYTE0

7A13 	BNE	79FC    ; RETURN VECTOR 1F
7A15 	LDA	7214 
7A18 	LDX	#40
7A1A 	JMP	74C9    ; ROB0

7A1D 	BCS	7A36    ; RETURN VECTOR 20
7A1F 	LDA	72D4 
7A22 	STA	7218 
7A25 	LDA	72CE 
7A28 	STA	7216 
7A2B 	LDA	72CF 
7A2E 	STA	7217 
7A31 	LDA	#2
7A33 	STA	7200 
7A36 	JMP	745D 
7A39 	LDX	#42
7A3B 	JMP	7499    ; PBYTE0

7A3E 	JMP	792E    ; RETURN VECTOR 21
7A41 	LDA	#47
7A43 	STA	72E1 
7A46 	LDA	#4
7A48 	CMP	7204 
7A4B 	BCS	7A59    ; GO
7A4D 	LDA	7216 
7A50 	STA	72DA 
7A53 	LDA	7217 
7A56 	STA	72DB 

      GO:
7A59 	LDX	#44
7A5B 	JMP	74EE    ; RIB0

7A5E 	LDX	#46     ; RETURN VECTOR 22
7A60 	JMP	7423    ; COMLNK

7A63 	LDA	7207    ; RETURN VECTOR 23
7A66 	BNE	7A5E 
7A68 	LDA	720E 
7A6B 	AND	#8
7A6D 	BEQ	7A5E 
7A6F 	LDA	7215 
7A72 	AND	#E1
7A74 	ROL
7A75 	ROL
7A76 	ROL
7A77 	BCC	7A7B 
7A79 	ORA	#80
7A7B 	CLC
7A7C 	ADC	#38
7A7E 	AND	#C3
7A80 	STA	72E2 
7A83 	LDX	72DD 
7A86 	TXS
7A87 	LDX	72E0 
7A8A 	LDY	72DF 
7A8D 	LDA	72E5 
7A90 	BNE	7A98 
7A92 	LDA	72E6 
7A95 	STA	72E5 
7A98 	LDA	72E2 
7A9B 	ASL
7A9C 	LDA	72DC 
7A9F 	BCC	7AAD 
7AA1 	LSR
7AA2 	LSR
7AA3 	LSR
7AA4 	LDA	72DE 
7AA7 	BCS	7AAA 
7AA9 	CLI
7AAA 	JMP	(72DA )
7AAD 	PHA
7AAE 	LDA	72DE 
7AB1 	PLP
7AB2 	JMP	(72DA )
7AB5 	LDA	#48
7AB7 	LDX	#48
7AB9 	JMP	7499    ; PBYTE0

7ABC 	BCS	7ADA    ; RETURN VECTOR 24
7ABE 	LDY	#7
7AC0 	LDA	72DA ,Y
7AC3 	STA	7270 ,Y
7AC6 	DEY
7AC7 	BPL	7AC0 
7AC9 	LDA	#B
7ACB 	STA	7201 
7ACE 	LDA	#FF
7AD0 	LDX	#4A
7AD2 	JMP	74C9    ; ROB0

7AD5 	BCS	7ADA    ; RETURN VECTOR 25
7AD7 	JMP	7470 
7ADA 	LDX	#4C
7ADC 	JMP	7423    ; COMLNK

7ADF 	JMP	7AB5    ; RETURN VECTOR 26
7AE2 	PHP
7AE3 	LDX	#0
7AE5 	BEQ	7AEA 
7AE7 	PHP
7AE8 	LDX	#8
7AEA 	PLA
7AEB 	STA	72DC 
7AEE 	LDA	72EB ,X
7AF1 	PHA
7AF2 	LDA	72EA ,X
7AF5 	PHA
7AF6 	LDA	72DC 
7AF9 	PHA
7AFA 	LDA	72EC ,X
7AFD 	STA	72D5 
7B00 	LDA	72ED ,X
7B03 	STA	72D6 
7B06 	LDX	72E0 
7B09 	LDA	72DE 
7B0C 	PLP
7B0D 	JMP	(72D5 )
7B10 	LDA	#AD
7B12 	BNE	7B19 
7B14 	STA	72CA 
7B17 	LDA	#8D
7B19 	STA	72CD 
7B1C 	LDY	#2
7B1E 	LDA	746D ,Y
7B21 	STA	72D0 ,Y
7B24 	DEY
7B25 	BPL	7B1E 
7B27 	LDA	72CA 
7B2A 	JMP	72CD 


7B2D 	LDX	#4E
7B2F 	JMP	7499    ; PBYTE0

7B32 	BCC	7B37    ; RETURN VECTOR 27
7B34 	JMP	793B 
7B37 	LDX	#50
7B39 	JMP	79A4 

7B3C 	LDA	#0      ; RETURN VECTOR 28
7B3E 	STA	2001 
7B41 	STA	2000 
7B44 	LDY	2002 
7B47 	LDY	2002 
7B4A 	LDA	72CF 
7B4D 	STA	2006 
7B50 	LDA	72CE 
7B53 	STA	2006 
7B56 	LDY	#0
7B58 	LDA	7219 ,Y
7B5B 	STA	2007 
7B5E 	INY
7B5F 	CPY	72D4 
7B62 	BNE	7B58 
7B64 	LDY	2002 
7B67 	LDA	2002 
7B6A 	LDA	#0
7B6C 	STA	2005 
7B6F 	STA	2005 
7B72 	STA	2000 
7B75 	LDA	#1E
7B77 	STA	2001 
7B7A 	LDA	#6
7B7C 	STA	7201 
7B7F 	JMP	792E 


7B82 	LDX	#52
7B84 	JMP	7499    ; PBYTE0
 
7B87 	BCS	7BF0    ; RETURN VECTOR 29
7B89 	LDX	#54
7B8B 	JMP	79A4 

7B8E 	LDA	#0      ; RETURN VECTOR 2A
7B90 	STA	2001 
7B93 	STA	2000 
7B96 	LDY	2002 
7B99 	LDY	2002 
7B9C 	LDA	72CF 
7B9F 	STA	2006 
7BA2 	LDA	72CE 
7BA5 	STA	2006 
7BA8 	LDY	#0
7BAA 	LDA	2007 
7BAD 	LDA	2007 
7BB0 	STA	7273 ,Y
7BB3 	INY
7BB4 	CPY	72D4 
7BB7 	BNE	7BAD 
7BB9 	TYA
7BBA 	CLC
7BBB 	ADC	#6
7BBD 	STA	7201 
7BC0 	LDA	7214 
7BC3 	LDX	#56
7BC5 	JMP	74C9    ; ROB0

7BC8 	BCS	7BF0    ; RETURN VECTOR 2B
7BCA 	LDY	7218 
7BCD 	CPY	72D4 
7BD0 	BEQ	7BF3 
7BD2 	TYA
7BD3 	SBC	72D4 
7BD6 	STA	7218 
7BD9 	LDA	72CE 
7BDC 	CLC
7BDD 	ADC	72D4 
7BE0 	STA	7216 
7BE3 	LDA	72CF 
7BE6 	ADC	#0
7BE8 	STA	7217 
7BEB 	LDA	#2
7BED 	STA	7200 
7BF0 	JMP	745D 
7BF3 	LDY	2002 
7BF6 	LDA	2002 
7BF9 	LDA	#0
7BFB 	STA	2005 
7BFE 	STA	2005 
7C01 	STA	2000 
7C04 	LDA	#1E
7C06 	STA	2001 
7C09 	JMP	7936 


7C0C 	LDA	#0
7C0E 	STA	726E 
7C11 	LDA	#3
7C13 	STA	7201 
7C16 	LDA	7214 
7C19 	LDX	#58
7C1B 	JMP	74C9    ; ROB0

7C1E 	LDX	#5A     ; RETURN VECTOR 2C
7C20 	JMP	74EE    ; RIB0

7C23 	LDA	#0      ; RETURN VECTOR 2D
7C25 	STA	720F 
7C28 	LDX	#5C
7C2A 	JMP	7423    ; COMLNK

7C2D 	LDA	7207    ; RETURN VECTOR 2E
7C30 	BNE	7C28 
7C32 	LDA	720E 
7C35 	AND	#8
7C37 	BEQ	7C28 
7C39 	BIT	7000 
7C3C 	BMI	7C39 
7C3E 	LDA	7100 
7C41 	CMP	#50
7C43 	BNE	7C39 
7C45 	BIT	7000 
7C48 	BMI	7C45 
7C4A 	LDA	7100 
7C4D 	CMP	#51
7C4F 	BNE	7C45 
7C51 	BIT	7000 
7C54 	BMI	7C51 
7C56 	LDA	7100 
7C59 	STA	0
7C5B 	BIT	7000 
7C5E 	BMI	7C5B 
7C60 	LDA	7100 
7C63 	STA	1
7C65 	BIT	7000 
7C68 	BMI	7C65 
7C6A 	LDA	7100 
7C6D 	STA	2
7C6F 	STA	6000 
7C72 	LDA	#6
7C74 	STA	8000 
7C77 	BIT	7000 
7C7A 	BMI	7C77 
7C7C 	LDA	7100 
7C7F 	STA	8001 
7C82 	LDA	#7
7C84 	STA	8000 
7C87 	BIT	7000 
7C8A 	BMI	7C87 
7C8C 	LDA	7100 
7C8F 	STA	8001 
7C92 	STA	6001 
7C95 	LDY	#0
7C97 	BIT	7000 
7C9A 	BMI	7C97 
7C9C 	LDA	7100 
7C9F 	STA	(0),Y
7CA1 	INY
7CA2 	BNE	7C97 
7CA4 	INC	1
7CA6 	DEC	2
7CA8 	BNE	7C97 
7CAA 	STA	6000 
7CAD 	LDA	#C0
7CAF 	STA	720F 
7CB2 	JMP	7470 


7CB5 	LDA	#0
7CB7 	STA	726E 
7CBA 	LDA	#3
7CBC 	STA	7201 
7CBF 	LDA	7214 
7CC2 	LDX	#5E
7CC4 	JMP	74C9    ; ROB0

7CC7 	LDX	#60     ; RETURN VECTOR 2F
7CC9 	JMP	74EE    ; RIB0

7CCC 	LDA	#0      ; RETURN VECTOR 30
7CCE 	STA	720F 
7CD1 	LDX	#62
7CD3 	JMP	7423    ; COMLNK

7CD6 	LDA	7207    ; RETURN VECTOR 31
7CD9 	BNE	7CD1 
7CDB 	LDA	720E 
7CDE 	AND	#8
7CE0 	BEQ	7CD1 
7CE2 	BIT	7000 
7CE5 	BMI	7CE2 
7CE7 	LDA	7100 
7CEA 	CMP	#50
7CEC 	BNE	7CE2 
7CEE 	BIT	7000 
7CF1 	BMI	7CEE 
7CF3 	LDA	7100 
7CF6 	CMP	#53
7CF8 	BNE	7CEE 
7CFA 	BIT	7000 
7CFD 	BMI	7CFA 
7CFF 	LDA	7100 
7D02 	STA	0
7D04 	BIT	7000 
7D07 	BMI	7D04 
7D09 	LDA	7100 
7D0C 	STA	1
7D0E 	BIT	7000 
7D11 	BMI	7D0E 
7D13 	LDA	7100 
7D16 	STA	2
7D18 	STA	6000 
7D1B 	LDA	#6
7D1D 	STA	8000 
7D20 	BIT	7000 
7D23 	BMI	7D20 
7D25 	LDA	7100 
7D28 	STA	8001 
7D2B 	LDA	#7
7D2D 	STA	8000 
7D30 	BIT	7000 
7D33 	BMI	7D30 
7D35 	LDA	7100 
7D38 	STA	8001 
7D3B 	STA	6001 
7D3E 	LDA	#D0
7D40 	BIT	7000 
7D43 	BVC	7D40 
7D45 	STA	7100 
7D48 	LDA	#D3
7D4A 	BIT	7000 
7D4D 	BVC	7D4A 
7D4F 	STA	7100 
7D52 	LDY	#0
7D54 	LDA	(0),Y
7D56 	BIT	7000 
7D59 	BVC	7D56 
7D5B 	STA	7100 
7D5E 	INY
7D5F 	BNE	7D54 
7D61 	INC	1
7D63 	DEC	2
7D65 	BNE	7D54 
7D67 	STA	6000 
7D6A 	LDA	#C0
7D6C 	STA	720F 
7D6F 	JMP	7470 


7D72 	LDA	#0
7D74 	STA	726E 
7D77 	LDA	#3
7D79 	STA	7201 
7D7C 	LDA	7214 
7D7F 	LDX	#64
7D81 	JMP	74C9    ; ROB0

7D84 	LDX	#66     ; RETURN VECTOR 32
7D86 	JMP	74EE    ; RIB0

7D89 	LDA	#0      ; RETURN VECTOR 33
7D8B 	STA	720F 
7D8E 	LDX	#68
7D90 	JMP	7423    ; COMLNK
        
7D93 	LDA	7207    ; RETURN VECTOR 34
7D96 	BNE	7D8E 
7D98 	LDA	720E 
7D9B 	AND	#8
7D9D 	BEQ	7D8E 
7D9F 	BIT	7000 
7DA2 	BMI	7D9F 
7DA4 	LDA	7100 
7DA7 	CMP	#50
7DA9 	BNE	7D9F 
7DAB 	BIT	7000 
7DAE 	BMI	7DAB 
7DB0 	LDA	7100 
7DB3 	CMP	#52
7DB5 	BNE	7DAB 
7DB7 	BIT	7000 
7DBA 	BMI	7DB7 
7DBC 	LDA	7100 
7DBF 	STA	0
7DC1 	BIT	7000 
7DC4 	BMI	7DC1 
7DC6 	LDA	7100 
7DC9 	STA	1
7DCB 	BIT	7000 
7DCE 	BMI	7DCB 
7DD0 	LDA	7100 
7DD3 	STA	2
7DD5 	STA	6000 
7DD8 	BIT	7000 
7DDB 	BMI	7DD8 
7DDD 	LDA	7100 
7DE0 	TAY
7DE1 	LDX	#2
7DE3 	STX	8000 
7DE6 	STY	8001 
7DE9 	INY
7DEA 	INX
7DEB 	STX	8000 
7DEE 	STY	8001 
7DF1 	INY
7DF2 	INX
7DF3 	STX	8000 
7DF6 	STY	8001 
7DF9 	INY
7DFA 	INX
7DFB 	STX	8000 
7DFE 	STY	8001 
7E01 	STA	6001 
7E04 	LDA	#0
7E06 	STA	2001 
7E09 	STA	2000 
7E0C 	LDY	2002 
7E0F 	LDY	2002 
7E12 	LDA	1
7E14 	STA	2006 
7E17 	LDA	0
7E19 	STA	2006 
7E1C 	LDY	#0
7E1E 	BIT	7000 
7E21 	BMI	7E1E 
7E23 	LDA	7100 
7E26 	STA	2007 
7E29 	INY
7E2A 	BNE	7E1E 
7E2C 	INC	1
7E2E 	DEC	2
7E30 	BNE	7E1E 
7E32 	LDX	2002 
7E35 	LDX	2002 
7E38 	LDA	#0
7E3A 	STA	2005 
7E3D 	STA	2005 
7E40 	STA	2000 
7E43 	LDA	1E
7E45 	STA	2001 
7E48 	STA	6000 
7E4B 	LDA	#C0
7E4D 	STA	720F 
7E50 	JMP	7470 


7E53 	LDA	#0
7E55 	STA	726E 
7E58 	LDA	#3
7E5A 	STA	7201 
7E5D 	LDA	7214 
7E60 	LDX	#6A
7E62 	JMP	74C9    ; ROB0

7E65 	LDX	#6C     ; RETURN VECTOR 35
7E67 	JMP	74EE    ; RIB0

7E6A 	LDA	#0      ; RETURN VECTOR 36
7E6C 	STA	720F 
7E6F 	LDX	#6E
7E71 	JMP	7423    ; COMLNK

7E74 	LDA	7207    ; RETURN VECTOR 37
7E77 	BNE	7E6F 
7E79 	LDA	720E 
7E7C 	AND	#8
7E7E 	BEQ	7E6F 
7E80 	BIT	7000 
7E83 	BMI	7E80 
7E85 	LDA	7100 
7E88 	CMP	#50
7E8A 	BNE	7E80 
7E8C 	BIT	7000 
7E8F 	BMI	7E8C 
7E91 	LDA	7100 
7E94 	CMP	#54
7E96 	BNE	7E8C 
7E98 	BIT	7000 
7E9B 	BMI	7E98 
7E9D 	LDA	7100 
7EA0 	STA	0
7EA2 	BIT	7000 
7EA5 	BMI	7EA2 
7EA7 	LDA	7100 
7EAA 	STA	1
7EAC 	BIT	7000 
7EAF 	BMI	7EAC 
7EB1 	LDA	7100 
7EB4 	STA	2
7EB6 	STA	6000 
7EB9 	BIT	7000 
7EBC 	BMI	7EB9 
7EBE 	LDA	7100 
7EC1 	TAY
7EC2 	LDX	#2
7EC4 	STX	8000 
7EC7 	STY	8001 
7ECA 	INY
7ECB 	INX
7ECC 	STX	8000 
7ECF 	STY	8001 
7ED2 	INY
7ED3 	INX
7ED4 	STX	8000 
7ED7 	STY	8001 
7EDA 	INY
7EDB 	INX
7EDC 	STX	8000 
7EDF 	STY	8001 
7EE2 	STA	6001 
7EE5 	LDA	#0
7EE7 	STA	2001 
7EEA 	STA	2000 
7EED 	LDY	2002 
7EF0 	LDY	2002 
7EF3 	LDA	1
7EF5 	STA	2006 
7EF8 	LDA	0
7EFA 	STA	2006 
7EFD 	LDA	#D0
7EFF 	BIT	7000 
7F02 	BVC	7EFF 
7F04 	STA	7100 
7F07 	LDA	#D4
7F09 	BIT	7000 
7F0C 	BVC	7F09 
7F0E 	STA	7100 
7F11 	LDY	#0
7F13 	LDA	2007 
7F16 	BIT	7000 
7F19 	BVC	7F16 
7F1B 	LDA	2007 
7F1E 	STA	7100 
7F21 	INY
7F22 	BNE	7F16 
7F24 	INC	1
7F26 	DEC	2
7F28 	BNE	7F16 
7F2A 	LDX	2002 
7F2D 	LDX	2002 
7F30 	LDA	#0
7F32 	STA	2005 
7F35 	STA	2005 
7F38 	STA	2000 
7F3B 	LDA	1E
7F3D 	STA	2001 
7F40 	STA	6000 
7F43 	LDA	#C0
7F45 	STA	720F 
7F48 	JMP	7470

      RETX: 
7F4B 	STA	72CA 
7F4E 	LDA	7F61 ,X
7F51 	STA	72C9 
7F54 	LDA	7F62 ,X
7F57 	LDX	72CA 
7F5A 	STA	72CA 
7F5D 	TXA
7F5E 	JMP	(72C9 )

7F61    DB      18,74
7F63    DB      70,74
7F65    DB      5D,74
7F67    DB      74,74
7F69    DB      50,76
7F6B    DB      92,76
7F6D    DB      A0,76
7F6F    DB      A8,76
7F71    DB      B7,76
7F73    DB      BB,76
7F75    DB      F9,76
7F77    DB      09,77
7F79    DB      1C,77
7F7B    DB      29,77
7F7D    DB      36,77
7F7F    DB      3B,77
7F81    DB      4A,77
7F83    DB      53,77
7F85    DB      AB,77
7F87    DB      1E,79
7F89    DB      36,79
7F8B    DB      3B,79
7F8D    DB      43,79
7F8F    DB      49,79
7F91    DB      53,79
7F93    DB      5A,79
7F95    DB      67,79
7F97    DB      8A,79
7F99    DB      F5,79
7F9B    DB      FC,79
7F9D    DB      01,7A
7F9F    DB      13,7A
7FA1    DB      1D,7A
7FA3    DB      3E,7A
7FA5    DB      5E,7A
7FA7    DB      63,7A
7FA9    DB      BC,7A
7FAB    DB      D5,7A
7FAD    DB      DF,7A
7FAF    DB      32,7B
7FB1    DB      3C,7B
7FB3    DB      87,7B
7FB5    DB      8E,7B
7FB7    DB      C8,7B
7FB9    DB      1E,7C
7FBB    DB      23,7C
7FBD    DB      2D,7C
7FBF    DB      C7,7C
7FC1    DB      CC,7C
7FC3    DB      D6,7C
7FC5    DB      84,7D
7FC7    DB      89,7D
7FC9    DB      93,7D
7FCB    DB      65,7E
7FCD    DB      6A,7E
7FCF    DB      74,7E

7FD1    DB      FF,FF
7FD3    DB      FF,FF
7FD5    DB      FF,FF
7FD7    DB      FF,FF
7FD9    DB      FF,FF
7FDB    DB      FF,FF
7FDD    DB      FF,FF
7FDF    DB      FF,FF
7FE1    DB      FF,FF
7FE3    DB      FF,FF
7FE5    DB      FF,FF
7FE7    DB      FF,FF
7FE9    DB      FF,FF
7FEB    DB      FF,FF
7FED    DB      FF,FF
7FEF    DB      FF,FF
7FF1    DB      FF

7FF2    DB      E2,7A
7FF4    DB      E7,7A
7FF6    DB      A9,75
7FF8    DB      09,76
7FFA    DB      1D,76
7FFC    DB      12,75
7FFE    DB      9A,75

		.end
