[net.micro.apple] VIDEX Videoterm driver + DCOM 3.2x vt100 Emulator patches

ix742@sdcc6.UUCP (James Hayes) (05/15/86)

	<Munch...Yummy.>

This posting contains:

DCOM.SCREEN.VDX   -  Videx Screen Driver

DCOM.KEYBOARD.SHFMOD - This keyboard driver will support non
			lowercase keyboards witht the famed
			shift-key mod.

DCOM.MODEM.SSC    -  Apple Super Serial Card Driver that will work
		     with other "look-alikes"

DCOM.MODEM.ALSDIS -  ALS Dispatcher Driver that will work with just
		     about any 'cheap' serial card.  This one also
		     knows how to send a break character.

CONFIGURE TERMINAL - This allows the terminal to use the VIDEX and
		     non lowercase keyboards. (It is run automatically 
		     when you type escape at the startup screen.)


Why all the changes? 

The //c uses the Super Serial Card driver.  Some people have had
trouble getting it to work properly.  The SSC driver also used the
SSC roms.  Bad idea.  I now manipulate the hardware directly.  This
means that it will work with the 'SSC Lookalikes'.

The ALS Dispatcher driver also used the built-in ROMS and would not
function with the CCS7710 card or other hardware compatible cards.

The VIDEX screen driver has not been proven yet.  I will be posting
source code for the VIDEX driver tomorrow.  (My apple doesn't run
KERMIT yet.)  The VIDEX driver has been tested on "VIDEX compatible"
cards and seems to work.

The new keyboard driver supports non lowercase keyboards that have
their shift keys wired to paddle button 2 on the GAME I/O port.
This is for the VIDEX driver, as most VIDEX cards use that method to
gather lowercase input.

The keyboard driver uses these keys:

Preceding any key with CTRL-A will make it look like you typed the
key with the OPEN or CLOSED apple key down.  (The open/closed apple
keys are only available on the //e and //c.)  This is used to enter
the set-up menu, the modem menu, and for vt100 keypad keys and
phone dialing.  Whenever you see the OPEN/CLOSED apple in the
instructions, just use CTRL-A.

CTRL-R is the prefix to type special characters: 

CTRL-R !  = |		CTRL-R -  = _
CTRL-R "  = ~		CTRL-R '  = `
CTRL-R (  = {		CTRL-R /  = \
CTRL-R )  = }		CTRL-R P  = @
CTRL-R <  = [		CTRL-R p  = @
CTRL-R >  = ]		CTRL-R N  = ^
			CTRL-R n  = ^

Special CTRL-Keys:

CTRL-R 3  = vt100 ^?
CTRL-R 4  = vt100 ^]
CTRL-R 5  = vt100 ^/
CTRL-R 6  = vt100 ^`

To install the patch, make a COPY of you DCOM disk and download the
			     ^^^^ 
file PATCH.EXEC to your COPY of the DCOM disk and type:

]

]EXEC PATCH.EXEC

The disk will spin and grind.  When it stops and announces itself as
sane, re-boot the system.

NOTE:  You do not need to install the patch if your DCOM disk
       works.  You do need to install the patch if:
       A) you want to use DCOM with a VIDEX Videoterm, 
       B) If you want the new SSC or ALS drivers to use your
	  hardware lookalike.
       C) If you want to use the non lowercase keyboard driver.

As usual, mail complaints, bug reports, etc. to:

UUCP: {ucbvax, ihnp4, decvax, etc...}!sdcsvax!hayes
ARPA: hayes@UCSD.EDU.ARPA
ARPA2: hayes%wizard@UCSD.ARPA

-Jim Hayes,  University of California at Sandy Eggo.

P.S.  Special thanks to:
	John Antypas of UCSD for the use of his hardware, and
	David Smith of UCSD for his SSC manual.

----Snippity----Snippity----Cut it man!-----
#! /bin/sh
# This is a shell archive, meaning:
# 1. Remove everything above the #! /bin/sh line.
# 2. Save the resulting text in a file.
# 3. Execute the file with /bin/sh (not csh) to create the files:
#	patch.exec
# This archive created: Wed May 14 18:05:50 1986
# By:	James Hayes (UC San Diego EE/CS Department.)
export PATH; PATH=/bin:$PATH
echo shar: extracting "'patch.exec'" '(18541 characters)'
if test -f 'patch.exec'
then
	echo shar: will not over-write existing file "'patch.exec'"
else
sed 's/^XX//' << \SHAR_EOF > 'patch.exec'
XXTEXT:HOME:?"UNPACKING:":?"VIDEX SCREEN DRIVER":POKE 34,3:HOME:CALL -151
XX5000: 4C F3 50 4C 02 51 4C 0E 51 4C
XX500A: A0 51 4C A2 52 4C DA 52 4C 02
XX5014: 53 4C 14 53 4C 2D 53 4C 44 53
XX501E: 4C 5E 53 4C 98 53 4C E4 53 4C
XX5028: 31 54 4C C0 54 4C E9 54 4C 0C
XX5032: 55 4C 32 55 4C 4D 55 4C 82 55
XX503C: 4C BA 55 4C 4D 56 4C 9B 54 4C
XX5046: A0 54 4C B6 56 4C F2 56 4C 48
XX5050: 57 4C 9A 57 60 7F 50 62 58 19
XX505A: 00 18 18 00 09 20 00 00 00 00
XX5064: 00 00 50 A0 F0 40 90 E0 30 80
XX506E: D0 20 70 C0 10 60 B0 00 50 A0
XX5078: F0 40 90 E0 30 CC CC CC CC CD
XX5082: CD CD CC CC CC CD CD CD CC CC
XX508C: CC CD CD CD CD CC CC CC CD CC
XX5096: CC CC CC CD CD CB CC CC CC CD
XX50A0: CD CB CC CC CC CD CD CD CB CC
XX50AA: CC CC CD 00 50 A0 F0 40 90 E0
XX50B4: 30 80 D0 20 70 C0 10 60 B0 00
XX50BE: 50 A0 F0 40 90 E0 30 20 7F 7F
XX50C8: 09 0C 0D 0A 2A 2B 20 0B 19 1C
XX50D2: 16 13 1F 1A 1A 1A 1A 1A 17 1D
XX50DC: 1B 1E 15 3C 3E 22 3D 23 2E 00
XX50E6: 00 00 00 00 00 00 8C B0 C0 8D
XX50F0: B1 C0 60 8D 59 C0 A0 0F B9 55
XX50FA: 50 20 EC 50 88 10 F7 60 A0 17
XX5104: 20 0E 51 20 06 20 88 10 F7 60
XX510E: A9 00 99 80 03 2C 00 C3 B9 AD
XX5118: 50 8D 34 51 B9 95 50 8D 35 51
XX5122: 20 06 20 2C FF CF 2C 00 C3 A2
XX512C: 4F 20 D4 57 AD 08 03 9D FF FF
XX5136: CA E0 0F F0 0F E0 1F F0 0B E0
XX5140: 3F F0 07 E8 CA 10 EC 4C 06 20
XX514A: 20 D4 57 8A 48 20 06 20 2C FF
XX5154: CF 2C 00 C3 68 AA C0 06 F0 0E
XX515E: C0 0C F0 11 C0 13 F0 14 AD 08
XX5168: 03 4C 33 51 E0 1F D0 F6 4C 81
XX5172: 51 E0 3F D0 EF 4C 81 51 E0 0F
XX517C: D0 E8 4C 81 51 8A 48 20 06 20
XX5186: 2C FF CF 2C 00 C3 68 AA B9 65
XX5190: 50 8D 34 51 B9 7D 50 8D 35 51
XX519A: AD 08 03 4C 33 51 BD 80 03 99
XX51A4: 80 03 8A 48 20 06 20 2C FF CF
XX51AE: 2C 00 C3 68 AA E0 06 F0 17 E0
XX51B8: 0C F0 13 E0 13 F0 0F C0 06 F0
XX51C2: 0B C0 0C F0 07 C0 13 F0 03 4C
XX51CC: 63 58 8A 48 98 48 8A A8 B9 AD
XX51D6: 50 8D EF 51 B9 95 50 8D F0 51
XX51E0: 20 06 20 2C FF CF 2C 00 C3 A2
XX51EA: 4F 20 D4 57 BD FF FF 9D 94 58
XX51F4: CA E0 0F F0 1C E0 1F F0 18 E0
XX51FE: 3F F0 14 E8 CA 10 E9 8A 48 20
XX5208: 06 20 2C FF CF 2C 00 C3 68 AA
XX5212: 4C 58 52 C0 06 F0 0B C0 0C F0
XX521C: 0E C0 13 F0 11 4C EE 51 E0 1F
XX5226: D0 F9 4C 39 52 E0 3F D0 F2 4C
XX5230: 39 52 E0 0F D0 EB 4C 39 52 20
XX523A: D4 57 8A 48 20 06 20 2C FF CF
XX5244: 2C 00 C3 68 AA B9 65 50 8D EF
XX524E: 51 B9 7D 50 8D F0 51 4C EE 51
XX5258: 68 A8 B9 AD 50 8D 78 52 B9 95
XX5262: 50 8D 79 52 20 06 20 2C FF CF
XX526C: 2C 00 C3 A2 4F 20 D4 57 BD 94
XX5276: 58 9D FF FF CA 20 2C 58 30 02
XX5280: 90 0A E8 CA 10 EE 20 06 20 68
XX528A: AA 60 8A 48 20 06 20 68 AA B9
XX5294: 65 50 8D 78 52 B9 7D 50 8D 79
XX529E: 52 4C 82 52 48 2C 00 C3 8A 48
XX52A8: 20 06 20 68 AA 20 D4 57 20 2C
XX52B2: 58 30 02 90 0F B9 AD 50 8D D4
XX52BC: 52 B9 95 50 8D D5 52 4C D2 52
XX52C6: B9 65 50 8D D4 52 B9 7D 50 8D
XX52D0: D5 52 68 9D FF FF 20 06 20 60
XX52DA: AE 0F 03 E0 00 D0 06 AC 10 03
XX52E4: 4C 0E 51 A2 4F AC 10 03 AD 08
XX52EE: 03 8E E8 50 20 A2 52 AE E8 50
XX52F8: EC 0F 03 F0 04 CA 4C EF 52 60
XX5302: 20 DA 52 A0 17 CC 10 03 F0 07
XX530C: 20 0E 51 88 4C 07 53 60 AC 12
XX5316: 03 C8 98 AA 88 20 A0 51 C8 E8
XX5320: EC 13 03 90 F6 F0 F4 AC 13 03
XX532A: 4C 0E 51 AC 13 03 88 98 AA C8
XX5334: 20 A0 51 88 CA CC 12 03 D0 F6
XX533E: AC 12 03 4C 0E 51 2C E9 50 30
XX5348: 01 60 AD E6 50 AE 0F 03 AC 10
XX5352: 03 20 A2 52 A9 00 8D E9 50 4C
XX535C: 8F 53 AE 11 03 D0 01 60 EE EA
XX5366: 50 F0 03 4C 6F 53 EE EB 50 AE
XX5370: EB 50 EC 11 03 F0 01 60 2C E9
XX537A: 50 10 09 20 44 53 A9 00 8D E9
XX5384: 50 60 20 98 53 A9 80 8D E9 50
XX538E: 60 A9 00 8D EA 50 8D EB 50 60
XX5398: 2C E9 50 30 44 AE 0F 03 AC 10
XX53A2: 03 20 E4 53 8D E6 50 49 80 AE
XX53AC: 0F 03 20 A2 52 A9 80 8D E9 50
XX53B6: AC 10 03 B9 80 03 2A B0 0D A2
XX53C0: 00 8E 09 03 A2 FF 8E 0A 03 4C
XX53CA: E1 53 A2 FF 8E 09 03 2A B0 08
XX53D4: A2 00 8E 0A 03 4C E1 53 A2 FF
XX53DE: 8E 0A 03 4C 8F 53 2C 00 C3 8A
XX53E8: 48 20 06 20 68 AA 20 D4 57 20
XX53F2: 2C 58 90 0F B9 AD 50 8D 12 54
XX53FC: B9 95 50 8D 13 54 4C 11 54 B9
XX5406: 65 50 8D 12 54 B9 7D 50 8D 13
XX5410: 54 BD FF FF 20 06 20 60 2C 0B
XX541A: 03 10 0B C9 5F 90 07 38 E9 5F
XX5424: A8 B9 C5 50 2C 0A 03 30 02 A9
XX542E: 2D 60 00 20 18 54 48 20 44 53
XX5438: 2C 30 54 10 24 AE 0F 03 E0 4F
XX5442: D0 1D 2C 05 03 10 18 A2 00 8E
XX544C: 0F 03 EE 10 03 AC 10 03 CC 13
XX5456: 03 90 08 F0 06 20 14 53 CE 10
XX5460: 03 A2 00 8E 30 54 2C 01 03 10
XX546A: 03 20 82 55 AE 0F 03 AC 10 03
XX5474: 68 2C 08 03 10 02 49 80 2C 0C
XX547E: 03 10 02 49 80 20 A2 52 EE 0F
XX5488: 03 AE 0F 03 E0 50 90 08 A9 FF
XX5492: 8D 30 54 CE 0F 03 4C 98 53 A2
XX549C: 00 8E 0F 03 EE 10 03 AC 10 03
XX54A6: C0 18 F0 0A CC 13 03 B0 03 4C
XX54B0: 98 53 F0 FB 20 14 53 AC 13 03
XX54BA: 8C 10 03 4C 98 53 20 44 53 A2
XX54C4: 00 8E 0F 03 AC 10 03 C0 00 F0
XX54CE: 14 A0 17 A2 16 20 A0 51 88 CA
XX54D8: EC 10 03 B0 F6 20 DA 52 4C 98
XX54E2: 53 20 2D 53 4C 98 53 A2 00 8E
XX54EC: 0F 03 20 44 53 AC 10 03 C0 17
XX54F6: F0 0C 98 AA E8 20 A0 51 C8 E8
XX5500: E0 18 D0 F7 A0 17 20 0E 51 4C
XX550A: 98 53 20 44 53 AE 0F 03 8E 30
XX5514: 55 AC 10 03 8C 31 55 AD 08 03
XX551E: 20 A2 52 AC 31 55 CE 30 55 AE
XX5528: 30 55 10 EF 20 98 53 60 00 00
XX5532: 20 44 53 AC 10 03 F0 12 88 8C
XX553C: 31 55 20 0E 51 CE 31 55 AC 31
XX5546: 55 10 F5 20 0C 55 60 20 44 53
XX5550: AE 0F 03 8E 30 55 AE 30 55 E8
XX555A: AC 10 03 20 E4 53 AE 30 55 AC
XX5564: 10 03 20 A2 52 EE 30 55 AE 30
XX556E: 55 E0 4F 90 E3 A2 4F AC 10 03
XX5578: AD 08 03 20 A2 52 20 98 53 60
XX5582: AE 0F 03 E0 4F F0 2F 20 98 53
XX558C: A2 4E 8E E5 50 AE E5 50 20 E4
XX5596: 53 AE E5 50 E8 20 A2 52 AE E5
XX55A0: 50 EC 0F 03 F0 06 CE E5 50 4C
XX55AA: 91 55 AE 0F 03 AC 10 03 AD 08
XX55B4: 03 20 A2 52 60 00 20 44 53 AE
XX55BE: 08 03 8E B9 55 A2 45 8E 08 03
XX55C8: 20 02 51 AE B9 55 8E 08 03 20
XX55D2: 98 53 60 2C 00 C3 B9 AD 50 8D
XX55DC: F0 55 8D F5 55 B9 95 50 8D F1
XX55E6: 55 8D F6 55 A2 4F 20 D4 57 BD
XX55F0: FF FF 49 80 9D FF FF CA E0 0F
XX55FA: F0 0F E0 1F F0 0B E0 3F F0 07
XX5604: E8 CA 10 E7 4C 06 20 20 D4 57
XX560E: C0 06 F0 0E C0 0C F0 11 C0 13
XX5618: F0 14 AD 08 03 4C EF 55 E0 1F
XX5622: D0 F6 4C 35 56 E0 3F D0 EF 4C
XX562C: 35 56 E0 0F D0 E8 4C 35 56 B9
XX5636: 65 50 8D F5 55 8D F0 55 B9 7D
XX5640: 50 8D F6 55 8D F1 55 AD 08 03
XX564A: 4C EF 55 20 44 53 A0 17 20 D5
XX5654: 55 88 10 FA 20 98 53 60 A2 00
XX565E: BD 00 CC 9D FF FF CA D0 F7 EE
XX5668: 63 56 EE 7B 56 20 06 20 2C FF
XX5672: CF AD 00 C3 BD 00 CD 9D FF FF
XX567C: CA D0 F7 EE 63 56 EE 7B 56 20
XX5686: 06 20 60 A2 00 BD FF FF 9D 00
XX5690: CC CA D0 F7 EE 8D 56 EE A5 56
XX569A: 20 06 20 2C FF CF 2C 00 C3 BD
XX56A4: FF FF 9D 00 CD CA D0 F7 EE 8D
XX56AE: 56 EE A5 56 20 06 20 60 20 44
XX56B8: 53 A2 00 8E 62 56 8E 7A 56 A2
XX56C2: 84 8E 63 56 8E 7B 56 AD B0 C0
XX56CC: 20 5C 56 AD B4 C0 20 5C 56 AD
XX56D6: B8 C0 20 5C 56 AD BC C0 20 5C
XX56E0: 56 A0 A0 B9 00 03 99 00 81 88
XX56EA: C0 FF D0 F5 2C FF CF 60 A2 00
XX56F4: 8E 8C 56 8E A4 56 A2 84 8E 8D
XX56FE: 56 8E A5 56 AD B0 C0 20 89 56
XX5708: AD B4 C0 20 89 56 AD B8 C0 20
XX5712: 89 56 AD BC C0 20 89 56 A0 A0
XX571C: B9 00 81 99 00 03 88 C0 7F D0
XX5726: F5 A0 0F B9 00 81 99 00 03 C8
XX5730: B9 00 81 99 00 03 2C FF CF AD
XX573A: E7 50 8D E6 50 A9 00 8D E9 50
XX5744: 20 98 53 60 20 44 53 A2 00 8E
XX574E: 98 57 8E 99 57 20 44 53 AC 10
XX5758: 03 AE 98 57 20 E4 53 AC 10 03
XX5762: AE 99 57 20 A2 52 EE 98 57 EE
XX576C: 98 57 EE 99 57 AC 99 57 C0 28
XX5776: F0 03 4C 56 57 20 98 53 AD 0F
XX5780: 03 48 20 44 53 A2 28 AC 10 03
XX578A: 8E 0F 03 20 DA 52 68 8D 0F 03
XX5794: 20 98 53 60 00 00 A2 27 8E 98
XX579E: 57 A0 4E 8C 99 57 AE 98 57 AC
XX57A8: 10 03 20 E4 53 AE 99 57 AC 10
XX57B2: 03 20 A2 52 CE 99 57 AC 10 03
XX57BC: AE 99 57 AD 08 03 20 A2 52 CE
XX57C6: 99 57 CE 98 57 AC 98 57 F0 03
XX57D0: 4C A4 57 60 8A 48 20 06 20 68
XX57DA: AA 2C 00 C3 C0 07 90 0E C0 0D
XX57E4: 90 1E C0 14 90 2E AD BC C0 A9
XX57EE: 04 60 C0 06 F0 06 AD B0 C0 A9
XX57F8: 01 60 E0 20 90 F6 AD B4 C0 A9
XX5802: 02 60 C0 0C F0 06 AD B4 C0 A9
XX580C: 02 60 E0 40 90 EC AD B8 C0 A9
XX5816: 03 60 C0 13 F0 06 AD B8 C0 A9
XX5820: 03 60 E0 10 90 EC AD BC C0 A9
XX582A: 04 60 8A 48 20 06 20 68 AA B8
XX5834: C0 06 F0 0C C0 0C F0 10 C0 13
XX583E: F0 14 18 A9 FF 60 E0 20 90 14
XX5848: 38 A9 FF 60 E0 40 90 0C A9 FF
XX5852: 38 60 E0 10 90 04 38 A9 FF 60
XX585C: 18 20 D4 57 A9 00 60 BD 65 50
XX5866: 8D 86 58 BD 7D 50 8D 87 58 B9
XX5870: 65 50 8D 89 58 B9 7D 50 8D 8A
XX587A: 58 8A 48 20 06 20 A2 4F 20 D4
XX5884: 57 BD FF FF 9D FF FF CA 10 F7
XX588E: 20 06 20 68 AA 60 00 A0 A0 A0
XX5898: A0 A0 
XX3D0G
XXBSAVE DCOM.SCREEN.VDX,A$5000,L$899
XXTEXT:HOME:?"UNPACKING:":?"FAKE UPPER/LOWER KEYBOARD DRIVER":POKE 34,3:HOME:CALL -151
XX6000: 4C 9A 60 48
XX6004: 68 4A 6A 4B 6B 4C 6C 51 71 57
XX600E: 77 45 65 72 52 37 38 39 34 35
XX6018: 36 31 32 33 2E 2D 2C 0D 30 08
XX6022: 0A 0B 15 42 62 00 00 00 00 00
XX602C: 00 00 00 00 00 00 00 00 04 04
XX6036: 02 02 01 01 03 03 05 05 06 06
XX6040: 07 07 08 08 09 0A 0B 0D 0E 0F
XX604A: 11 12 13 16 0C 10 14 15 04 02
XX6054: 01 03 17 17 00 00 00 00 00 00
XX605E: 00 00 00 00 00 00 00 00 00 00
XX6068: 00 00 00 00 00 00 00 00 41 42
XX6072: 43 44 50 51 52 53 77 78 79 6D
XX607C: 74 75 76 6C 71 72 73 4D 70 6E
XX6086: 00 00 00 00 00 00 00 00 00 00
XX6090: 00 00 00 00 4C 00 70 00 00 00
XX609A: 29 7F C9 40 D0 05 A9 50 4C B4
XX60A4: 60 C9 5E D0 05 A9 4E 4C B4 60
XX60AE: C9 5D D0 02 A9 4D 8D 98 60 20
XX60B8: DA 61 20 61 62 AD 36 62 C9 01
XX60C2: F0 2A AD 98 60 C9 00 F0 13 20
XX60CC: 09 40 A9 00 8D 36 62 2C 03 03
XX60D6: 30 01 60 A9 0A 4C 09 40 60 4C
XX60E0: 06 70 4C 03 70 4C 0C 70 4C 09
XX60EA: 70 4C CB 60 AD 98 60 C9 00 F0
XX60F4: E9 A9 00 8D 36 62 AD 98 60 C9
XX60FE: 1B F0 93 C9 44 F0 DA C9 64 F0
XX6108: D6 C9 4D F0 D5 C9 6D F0 D1 C9
XX6112: 58 F0 D0 C9 78 F0 CC C9 41 F0
XX611C: CB C9 61 F0 C7 2C 0D 03 10 05
XX6126: A2 3F 4C 2D 61 A2 4F 8E 99 60
XX6130: A2 00 A8 DD 03 60 F0 06 E8 E0
XX613A: 32 D0 F6 60 BC 34 60 88 BE 70
XX6144: 60 8E 97 60 C0 04 90 43 C0 16
XX614E: F0 3B C0 08 90 0E AD 98 60 2C
XX6158: 14 03 10 03 4C 6C 61 4C CB 60
XX6162: 2C 0D 03 10 05 A2 00 8E 99 60
XX616C: A9 1B 20 09 40 20 06 20 AD 99
XX6176: 60 C9 00 F0 03 20 09 40 20 06
XX6180: 20 AD 97 60 20 09 40 20 06 20
XX618A: 60 20 0F 40 60 2C 0D 03 10 08
XX6194: A9 00 8D 99 60 4C A1 61 2C 15
XX619E: 03 10 1F A9 1B 20 09 40 20 06
XX61A8: 20 AD 99 60 C9 00 F0 03 20 09
XX61B2: 40 20 06 20 AD 97 60 20 09 40
XX61BC: 20 06 20 60 A9 1B 20 09 40 20
XX61C6: 06 20 A9 5B 20 09 40 20 06 20
XX61D0: AD 97 60 20 09 40 20 06 20 60
XX61DA: AD 36 62 C9 12 F0 24 C9 01 F0
XX61E4: 1D AD 98 60 C9 12 D0 09 8D 36
XX61EE: 62 A9 00 8D 98 60 60 C9 01 D0
XX61F8: 08 8D 36 62 A9 00 8D 98 60 60
XX6202: 4C 29 62 AD 98 60 C9 12 D0 06
XX620C: 60 A9 00 8D 36 62 A2 14 DD 37
XX6216: 62 F0 04 CA 10 F8 60 BD 4C 62
XX6220: 8D 98 60 A9 00 8D 36 62 60 AD
XX622A: 98 60 C9 01 D0 05 A9 00 8D 36
XX6234: 62 60 00 21 22 3C 3E 28 29 2D
XX623E: 27 2F 4E 50 08 33 34 35 36 00
XX6248: 00 00 00 00 7C 7E 5B 5D 7B 7D
XX6252: 5F 60 5C 5E 40 7F 1C 1D 1E 1F
XX625C: 00 00 00 00 00 2C 63 C0 10 0E
XX6266: C9 41 90 0A C9 5B B0 06 18 69
XX6270: 20 8D 98 60 60 A0 A0 00 B6 B0
XX627A: 
XX3D0G
XXBSAVE DCOM.KEYBOARD.SHFMOD,A$6000,L$279
XXTEXT:HOME:?"UNPACKING:":?"NEW ALS/CCS 7710/ETC DRIVER":POKE 34,3:HOME:CALL -151
XX4000: 4C BE 41 4C DA 41
XX4006: 4C F4 41 4C E2 41 4C 32 40 4C
XX4010: FD 41 00 00 00 F0 FF FF FF F0
XX401A: FF FF 00 00 00 60 00 00 00 00
XX4024: 15 11 1D 00 19 00 00 00 00 00
XX402E: 0D 05 09 01 C9 03 90 13 AA A8
XX4038: B9 12 40 F0 0C C0 05 90 0C C0
XX4042: 07 90 59 C0 0A 90 01 60 4C 12
XX404C: 41 C0 03 D0 27 A9 FF A0 06 99
XX4056: 12 40 88 C0 03 D0 F8 A9 F0 99
XX4060: 12 40 A0 09 B9 12 40 C9 F0 F0
XX406A: 05 A9 FF 99 12 40 88 C0 06 D0
XX4074: EF 4C 63 41 A0 09 A9 00 99 12
XX407E: 40 88 99 12 40 88 A9 F0 99 12
XX4088: 40 88 A9 FF 99 12 40 88 C0 03
XX4092: B0 F8 A0 04 A9 F0 99 12 40 4C
XX409C: 63 41 C0 05 F0 13 20 C8 40 A0
XX40A6: 05 A9 FF 99 12 40 C8 A9 F0 99
XX40B0: 12 40 4C 63 41 20 C8 40 A0 05
XX40BA: A9 F0 99 12 40 C8 A9 FF 99 12
XX40C4: 40 4C 63 41 A0 03 A9 FF 99 12
XX40CE: 40 C8 99 12 40 A0 07 B9 12 40
XX40D8: C9 F0 F0 21 A9 00 99 12 40 C8
XX40E2: B9 12 40 C9 F0 F0 0C A9 FF 99
XX40EC: 12 40 C8 A9 F0 99 12 40 60 C8
XX40F6: A9 FF 99 12 40 60 60 A9 F0 A0
XX4100: 08 99 12 40 88 A9 00 99 12 40
XX410A: A9 FF A0 09 99 12 40 60 BD 12
XX4114: 40 C9 00 F0 1B A0 09 B9 12 40
XX411E: C9 00 F0 05 A9 FF 99 12 40 88
XX4128: C0 06 D0 EF A9 F0 9D 12 40 4C
XX4132: 63 41 60 A0 0B B9 12 40 C9 F0
XX413C: F0 06 88 10 F6 4C 50 41 C0 03
XX4146: 90 09 C0 07 90 0B C0 0C 90 0D
XX4150: 60 8C 1D 03 4C 3E 41 8C 1F 03
XX415A: 4C 3E 41 8C 1E 03 4C 3E 41 20
XX4164: 35 41 AD 1F 03 C9 03 F0 0D C9
XX416E: 04 F0 0E C9 05 F0 0F C9 06 F0
XX4178: 10 60 A2 00 4C 8B 41 A2 01 4C
XX4182: 8B 41 A2 08 4C 8B 41 A2 09 AD
XX418C: 1E 03 C9 07 F0 09 C9 08 F0 0A
XX4196: C9 09 F0 0B 60 A0 02 4C A7 41
XX41A0: A0 06 4C A7 41 A0 04 8A 8C BD
XX41AA: 41 18 6D BD 41 A8 B9 22 40 AE
XX41B4: 20 40 9D 8E C0 8D 21 40 60 00
XX41BE: AE 1A 03 8A 0A 0A 0A 0A 8D 20
XX41C8: 40 A8 A9 23 99 8E C0 A9 11 99
XX41D2: 8E C0 20 63 41 4C 35 41 AC 20
XX41DC: 40 B9 8E C0 4A 60 AC 20 40 29
XX41E6: 7F 48 B9 8E C0 29 03 F0 F9 68
XX41F0: 99 8F C0 60 AC 20 40 B9 8F C0
XX41FA: 29 7F 60 A9 71 AE 20 40 9D 8E
XX4204: C0 A9 00 9D 8F C0 A9 F3 20 A8
XX420E: FC A9 F0 20 A8 FC AD 21 40 AE
XX4218: 20 40 9D 8E C0 60 D0 02 A9 
XX3D0G
XXBSAVE DCOM.MODEM.ALSDIS,A$4000,L$220
XXTEXT:HOME:?"UNPACKING:":?"NEW SUPER SERIAL/LOOK ALIKE DRIVER":POKE 34,3:HOME:CALL -151
XX4000: 4C 9F 40 4C F8 40
XX4006: 4C 1D 41 4C 08 41 4C 2E 40 4C
XX4010: 34 41 FF F0 FF FF F0 FF FF F0
XX401A: FF FF 00 00 FF 60 00 00 06 08
XX4024: 0A 10 90 30 B0 0B 6B 2B 00 00
XX402E: A8 AA BD 12 40 F0 25 98 AA E0
XX4038: 03 90 0D 98 AA E0 07 90 0D 98
XX4042: AA E0 0C 90 0D 60 8E 1D 03 4C
XX404C: 5B 40 8E 1F 03 4C 5B 40 8E 1E
XX4056: 03 4C 5B 40 60 AE 1D 03 AC 1F
XX4060: 03 BD 22 40 18 79 22 40 AC 21
XX406A: 40 99 8B C0 AE 1E 03 BD 22 40
XX4074: 99 8A C0 A2 00 BD 12 40 C9 00
XX407E: F0 05 A9 FF 9D 12 40 E8 E0 0D
XX4088: 90 EF A9 F0 AE 1F 03 AC 1D 03
XX4092: 9D 12 40 99 12 40 AE 1E 03 9D
XX409C: 12 40 60 AD 1A 03 18 69 C0 8D
XX40A6: 20 40 AD 1A 03 0A 0A 0A 0A 8D
XX40B0: 21 40 AE 20 40 AC 21 40 A9 01
XX40BA: 99 8A C0 A2 02 BD 12 40 C9 F0
XX40C4: F0 06 CA 10 F6 4C CF 40 8E 1D
XX40CE: 03 A2 06 BD 12 40 C9 F0 F0 08
XX40D8: CA E0 03 B0 F4 4C E3 40 8E 1F
XX40E2: 03 A2 0B BD 12 40 C9 F0 F0 06
XX40EC: CA E0 07 B0 F4 60 8E 1E 03 4C
XX40F6: 5B 40 AC 21 40 B9 89 C0 29 08
XX4100: C9 08 F0 02 18 60 38 60 AC 21
XX410A: 40 48 B9 89 C0 29 10 C9 10 D0
XX4114: F7 68 99 88 C0 20 06 20 60 AC
XX411E: 21 40 B9 88 C0 29 7F 60 A2 CA
XX4128: CA D0 FD 38 E9 01 D0 F6 AE 1A
XX4132: 03 60 AC 21 40 B9 8A C0 48 09
XX413C: 0C 99 8A C0 A9 E9 20 26 41 68
XX4146: 99 8A C0 60 90 0B C0 0C 90 0D
XX4150: 
XX3D0G
XXBSAVE DCOM.MODEM.SSC,A$4000,L$14F
XXTEXT:HOME:?"---":?:?
XXNEW
XX
XX10 D$ =  CHR$ (4):CF$ = "CONFIG.TERM"
XX20  TEXT : HOME 
XX30  PRINT "DCOM 3.21 TERMINAL CONFIGURATION MENU:"
XX40  PRINT : POKE 34,3
XX50  PRINT "----------------------------------------"
XX60  HOME 
XX70  PRINT : PRINT 
XX80 NO = 1
XX90  REM  LOOP BEGINS HERE
XX100  READ A$
XX110  IF A$ = "**" THEN 400
XX120  POKE 34,3: HOME : PRINT "WHAT "A$" DO YOU HAVE?"
XX130  PRINT :I = 1
XX140  READ N$,F$(I),DE$(I): IF N$ = "*" THEN 190
XX150 N$(I) = N$
XX160  PRINT I") "N$(I)
XX170 I = I + 1
XX180  GOTO 140
XX190  POKE 34,17: HOME 
XX200 I = I - 1
XX210  PRINT : PRINT "ENTER THE NUMBER OF YOU CHOICE, OR 'Q'  TO EXIT."
XX220  PRINT 
XX230  INPUT "-> ";B$
XX240  IF B$ = "Q" THEN  TEXT : HOME : END 
XX250 A =  VAL (B$): IF A < 1 OR A > I THEN  PRINT  CHR$ (7): GOTO 210
XX260 FF$(NO) = F$(A)
XX270 DD$(NO) = DE$(A)
XX280 NO = NO + 1
XX290  IF  LEFT$ (A$,3) <  > "SER" THEN 390
XX300  IF  LEFT$ (N$(A),3) = "//C" THEN SL = 2: GOTO 390
XX310  PRINT : PRINT "WHAT SLOT IS YOUR SERIAL CARD IN?"
XX320  INPUT "[USUALLY 2] >";SL$:ER = 0:SL =  VAL (SL$)
XX330  IF SL < 1 OR SL = 3 OR SL = 6 THEN ER = 1
XX340  IF SL > 7 OR SL <  >  INT (SL) THEN ER = 1
XX350  IF ER THEN  PRINT "THAT'S IMPOSSIBLE!?!  SLOTS 0, 3 AND 6"
XX360  IF ER THEN  PRINT "ARE DIDICATED TO MEMORY, 80 COLS., AND"
XX370  IF ER THEN  PRINT "YOUR DISK CONTROLLER. PLEASE TRY AGAIN."
XX380  IF ER THEN 310
XX390  GOTO 90
XX400  POKE 34,3: HOME 
XX410 NO = NO - 1
XX420  PRINT "I HAVE:": PRINT 
XX430  FOR I = 1 TO NO
XX440  PRINT I") ";DD$(I);
XX450  IF I = 3 THEN  PRINT " (SLOT "SL")";
XX460  PRINT 
XX470  NEXT I
XX480  POKE 34,17
XX490  HOME 
XX500  PRINT "S) SAVE": PRINT "A) ABORT AND START OVER."
XX510  PRINT :
XX520  INPUT "-> ";A$
XX530  IF A$ = "S" THEN 560
XX540  IF A$ = "A" THEN  RUN 
XX550  PRINT : GOTO 500
XX560  TEXT : HOME 
XX570  PRINT "SAVING DRIVER SETTINGS."
XX580  PRINT D$"OPEN "CF$
XX590  PRINT D$"DELETE "CF$
XX600  PRINT D$"OPEN "CF$
XX610  PRINT D$"WRITE "CF$
XX620  PRINT "DCOM.MAIN"
XX630  PRINT "TERMINAL MAIN CODE"
XX640  PRINT "DCOM.CONTROL"
XX650  PRINT "TERMINAL CONTROL PANEL"
XX680  FOR I = 1 TO NO
XX690  PRINT FF$(I): PRINT DD$(I): NEXT I
XX700  PRINT SL
XX710  PRINT D$"CLOSE"
XX720  HOME : PRINT "DONE. HIT ";: INVERSE : PRINT "RETURN";
XX730  NORMAL : PRINT " IF YOU WOULD LIKE TO"
XX740  PRINT : PRINT "FIRE-UP THE TERMINAL, -OR- TYPE ";
XX750  INVERSE : PRINT "ESC";: NORMAL : PRINT " TO"
XX760  PRINT : PRINT "EXIT. ";
XX770  GET A$: IF A$ =  CHR$ (27) THEN  HOME : END 
XX780  IF A$ <  >  CHR$ (13) THEN 770
XX790  HOME 
XX800  PRINT : PRINT "RUNNING 'HELLO'": PRINT D$"RUN HELLO"
XX810  END 
XX820  END 
XX821  DATA KEYBOARD
XX822  DATA TRUE UPPER/LOWER CASE KEYBOARD,DCOM.KEYBOARD.IIE
XX823  DATA TRUE UPPER/LOWER CASE KEYBOARD DRIVER
XX824  DATA FAKE U/L CASE BY SHIFT-KEY>>PADDLE 2
XX825  DATA DCOM.KEYBOARD.SHFMOD
XX826  DATA SHIFT KEY MOD KEYBOARD DRIVER
XX827  DATA *,XX,XX
XX830  DATA 80 COLUMN CARD
XX840  DATA OMNI-VISION (SLOT 2),DCOM.SCREEN.DVISION
XX850  DATA 'COMPUTER STOP' OMNI-VISION DRIVER
XX860  DATA DOUBLE-VISION (SLOT 3),DCOM.SCREEN.DVISION
XX870  DATA 'COMPUTER STOP' DOUBLE-VISION DRIVER
XX880  DATA APPLE //E IN AUX SLOT,DCOM.SCREEN.IIE
XX890  DATA APPLE (AUX SLOT) 80 COLUMN DRIVER
XX900  DATA APPLE //C BUILT-IN 80 COLUMN CARD,DCOM.SCREEN.IIE
XX910  DATA APPLE //C 80 COLUMN DRIVER
XX911  DATA  VIDEX VIDEOTERM SCREEN DRIVER,DCOM.SCREEN.VDX
XX912  DATA  VIDEX VIDEOTERM DRIVER
XX920  DATA *,XX,XX    
XX930  DATA SERIAL CARD
XX940  DATA SUPER SERIAL CARD,DCOM.MODEM.SSC
XX950  DATA SUPER SERIAL CARD DRIVER
XX960  DATA  ALS/CCS 7710/ETC...,DCOM.MODEM.ALSDIS
XX970  DATA  ALS DISPATCHER TYPE DRIVER.
XX980  DATA //C SERIAL PORT,DCOM.MODEM.SSC
XX990  DATA APPLE //C MODEM PORT DRIVER
XX1000  DATA GENERIC PASCAL COMPATIBLE,DCOM.MODEM.PASCAL
XX1010  DATA GENERIC P-SYS SERIAL DRIVER  
XX1020  DATA CPS MULTIFUNCTION CARD,DCOM.MODEM.CPS
XX1030  DATA CPS MULTIFUNCTION DRIVER
XX1035  DATA  SSM-AIO-II SERIAL CARD
XX1036  DATA  DCOM.MODEM.PASCAL
XX1037  DATA  SSM-AIO-II SERIAL DRIVER
XX1040  DATA *,XX,XX 
XX1050  DATA DATA COMM. HARDWARE
XX1060  DATA HAYES COMPAT. MODEM (TONE DIALING)
XX1070  DATA DCOM.PERSONALITY.HAYES
XX1080  DATA HAYES (OR COMPAT.) TONE DIALER
XX1090  DATA HAYES COMPAT. MODEM (PULSE DIALING),DCOM.PERSONALITY.PHAYES
XX1100  DATA HAYES (OR COMPAT.) PULSE DIALER
XX1110  DATA DUMB (NON HAYES COMPAT.) MODEM
XX1120  DATA DCOM.PERSONALITY.DUMB
XX1130  DATA NON DIALING MODEM DRIVER
XX1140  DATA NO MODEM (HOOKED DIRECTLY TO SYSTEM)
XX1150  DATA DCOM.PERSONALITY.NETWORK
XX1160  DATA DIRECT NETWORK CONNECTION DRIVER
XX1170  DATA UNGERMANN/BASS NETONE DIRECT CONNECT
XX1180  DATA DCOM.PERSONALITY.NETONE
XX1190  DATA U/B NET-ONE BROADBAND NETWORK DRIVER
XX1200  DATA *,XX,XX
XX1210  DATA **
XX1220  DATA **  
XXSAVE CONFIGURE TERMINAL
XXTEXT
XXHOME:PRINT"DONE. TERMINAL PROGRAM NOW PATCHED."
XXPRINT"RE-BOOT TO FIRE UP THE TERMINAL..."
SHAR_EOF
if test 18541 -ne "`wc -c < 'patch.exec'`"
then
	echo shar: error transmitting "'patch.exec'" '(should have been 18541 characters)'
fi
fi # end of overwriting check
#	End of shell archive
exit 0