<<< THIS FILE CONTAINS REMOTE-PROCESSING PATCHES WHICH WILL  N E V E R
<<< BECOME STANDARD.  FORMAT OF FILE IS AS FOLLOWS:
<<< LINES STARTING WITH '<<' ARE 1-LINE DESCRIPTIONS, WITH VERSION
<<<                          AND EDIT LINE OF PATCH.
<<< LINES STARTING WITH '<' CONTAIN A FULLER COMMENTARY.
<< SUPPRESS-SPACE FOR 2780. E00  LINES 100-199.   25FEB77
<    SOME 2780-TYPE TERMINALS RECOGNIZE ESC-'+' AS A PRINTER SELECT
<    CODE WHICH MEANS DON'T UPSPACE.  THIS PATCH ALLOWS COBOL
<    OUTPUT TO BE PROPERLY TRANSMITTED TO SUCH TERMINALS.
<< IBM HASP RECORDS FULL OF DLE'S. D00 E00. -LINES 200-299.   04MAY77
<    HASP TRANSMISSION SUBSTITUTES DLE-DLE FOR DLE IN DATA.  A RECORD
<    WITH LOTS OF DLE'S MAY SUFFER EXPANSION BY A FACTOR OF 5-TO-3.
<    IBM HARDWARE INSERTS AND STRIPS EXTRA DLE'S, SO CPU BUFFERS OF
<    400 CHARACTERS MAY BE MUCH BIGGER ON THE TRANSMISSION LINE.
<    SIGMA HARDWARE DOESN'T STRIP DLE'S, SO THE CPU BUFFER IS TOO
<    SMALL.  PATCH FORMS ONLY ONE INPUT BUFFER FOR HASP TO FIX IT,
<    BUT SLOWS DOWN HASP PROCESSING.  UNNECESSARY FOR CPV-TO-CPV.
<< 'KEEP' FOR 2780/3780 LP & CP. D00 E00 LINES 300-399. 21JUN77
<    SINCE SUPER DOESN'T ALLOW DEVICE SPECIFICATIONS FOR
<    2780 AND 3780, IT IS IMPOSSIBLE TO SAY 'KEEP' FOR LP AND
<    CP FILES.  THIS PATCH TO SUPER MAKES  A L L  DEFINED
<    2780'S AND 3780'S HAVE 'KEEP' AS THEIR STANDARD.  YOU MUST
<    RE-AUTHORIZE WORKSTATIONS AFTER PATCHING SUPER TO GET 'KEEP'.
<< KEEP FUNNY CHARACTERS FROM IRBTS. E01, LINES 400-499, 6/26/78.
< THIS PATCH WILL KEEP MOST OF THE FUNNY, UNPRINTABLE CHARACTERS  #EXPER
< FROM GETTING TO THE IRBTS. HOWEVER, THOSE THAT FALL BETWEEN THE #EXPER
< CRACKS (E.G., FF, C0, ETC.) WILL STILL GIVE SOME IRBTS FITS.    #EXPER
< HATES IS TO BUILD A 256-BYTE TRANSLATION TABLE AND INDEX INTO   #EXPER
< IT BY THE CONTENTS OF THE REG CONTAINING THE CURRENT            #EXPER
< CHARACTER TO OUTPUT. GET THE TRANSLATION FROM YOUR TABLE,       #EXPER
< AND THEN GO OFF TO THE CRC ROUTINE. (COURTESY OF B. LEISTNER).  #EXPER
<< MAKE HASP VFC CODES WORK CORRECTLY(ON NEWER LINE PRINTERS ONLY)#EXPER
< CHANGE THE HASP VFC PROCESSING TO PROPERLY TRANSLATE THE        #EXPER
< LINK VFC CODES TO CPV VFC CODES. THIS PATCH WILL ***NOT***      #EXPER
< WORK WITH OLD LINE PRINTERS (7440,7445).                        #EXPER
< THIS PATCH WILL WORK WITH LINE PRINTERS 3465/3466/7463/7464/7446 #EXPER
< AND ANY PRINTER THAT SUPPORTS THE X'DX' AND X'EX' VFC CODES     #EXPER
< PERFORM SUPPRESS-SPACE VFC FOR 2780'S WHICH RECOGNIZE        E00#ZZ001
< ESC-'+' AS PRINT/SUPPRESS ORDER.                             E00#ZZ001
UMOV/2780IO+.12B/B @(LI,2 .61)/         1-6 TSM 022577         E00#ZZ001
/@/LI,2 .61/                            2-6 TSM 022577         E00#ZZ001
/@/AI,15 -.60/                          3-6 TSM 022577         E00#ZZ001
/@/BNEZ 2780IO+.12C/                    4-6 TSM 022577         E00#ZZ001
/@/LI,2 '+'/                            5-6 TSM 022577         E00#ZZ001
/@/B 2780IO+.12D/                       6-6 TSM 022577         E00#ZZ001
< PERFORM SUPPRESS-SPACE VFC FOR 2780'S WHICH RECOGNIZE        E01#ZZ001
< ESC-'+' AS PRINT/SUPPRESS ORDER.                             E01#ZZ001
UMOV/2780IO+.151/B @(LI,2 .61)/         1-6 TSM 022577         E01#ZZ001
/@/LI,2 .61/                            2-6 TSM 022577         E01#ZZ001
/@/AI,15 -.60/                          3-6 TSM 022577         E01#ZZ001
/@/BNEZ 2780IO+.152/                    4-6 TSM 022577         E01#ZZ001
/@/LI,2 '+'/                            5-6 TSM 022577         E01#ZZ001
< ALLOW TRANSMISSION OF LOTS OF DLE'S FROM IBM COMPUTERS.      D00#ZZ002
UMOV/HASPIO+.2A/LI,12 .36C(LI,12 .1B4)/                        D00#ZZ002
:GENMD,RBBAT RBG+AC0,35110003(35310003).                       D00#ZZ002
< ALLOW TRANSMISSION OF LOTS OF DLE'S FROM IBM COMPUTERS.      E00#ZZ002
UMOV/HASPIO+.2A/LI,12 .36C(LI,12 .1B4)/                        E00#ZZ002
:GENMD,RBBAT RBG+B0B,35110003(35310003).                       E00#ZZ002
< ALLOW TRANSMISSION OF LOTS OF DLE'S FROM IBM COMPUTERS.      E01#ZZ002
UMOV/HASPIO+.2A/LI,12 .36C(LI,12 .1B4)/                        E01#ZZ002
:GENMD,RBBAT RBG+B0B,35110003(35310003).                       E01#ZZ002
<THIS PATCH IS TO SET KEEP FOR 2780'S AND 3780'S FOR LP AND CP.D00#ZZ003
GENMD SUPER                                                    D00#ZZ003
,DATA+119,90009000(80008000).       WTW D00 06/20/77 001-001   D00#ZZ003
<THIS PATCH IS TO SET KEEP FOR 2780'S AND 3780'S FOR LP AND CP.E00#ZZ003
GENMD SUPER                                                    E00#ZZ003
,DATA+119,90009000(80008000).       WTW E00 06/20/77 001-001   E00#ZZ003
<THIS PATCH IS TO SET KEEP FOR 2780'S AND 3780'S FOR LP AND CP.E01#ZZ003
GENMD SUPER                                                    E01#ZZ003
,DATA+119,90009000(80008000).       WTW E01 06/20/77 001-001   E00#ZZ003
<  KEEP FUNNY CHARACTERS FROM IRBTS                               #EXPER
#2780IO                                  WL  E01 06/26/78 001-010 #EXPER
UMOV/2780IO+.157/LI,10 @(LI,10 BSCIO+.73/WL  E01 06/26/78 002-010 #EXPER
/@/CI,5 .40/                             WL  E01 06/26/78 003-010 #EXPER
/@/BGE BSCIO+.73/                        WL  E01 06/26/78 004-010 #EXPER
/@/LI,5 .40/                             WL  E01 06/26/78 005-010 #EXPER
UMOV/2780IO+.178/BNE @(BNE BSCIO+.195/   WL  E01 06/26/78 007-010 #EXPER
/@/BG 2780IO+.195/                       WL  E01 06/26/78 008-010 #EXPER
/@/LI,2 .40/                             WL  E01 06/26/78 009-010 #EXPER
/@/B 2780IO+.195/                        WL  E01 06/26/78 010-010 #EXPER
<MAKE HASP VFC CODES WORK CORRECTLY (ON NEWER LINE PRINTERS ONLY) #EXPER
#HASPIO                                  DGH F00 10/23/79 001-012 #EXPER
UMOV/HASPIO .2FA/NOP(AI,15 -1/           DGH F00 10/23/79 002-012 #EXPER
UMOV/HASPIO .2FB/LI,14 .E0(LI,14 .C0/    DGH F00 10/23/79 003-012 #EXPER
UMOV/HASPIO .2FE/AI,14 -.10(AI,14 .30/   DGH F00 10/23/79 004-012 #EXPER
UMOV/HASPIO .2FF/NOP(AI,15 1/            DGH F00 10/23/79 005-012 #EXPER
UMOV/HASPIO .307/BCS,1 HASPIO .30C(CI,14 .C0/F00 10/23/79 006-012 #EXPER
UMOV/HASPIO .308/CI,14 .E1(BLE HASPIO .30E/  F00 10/23/79 007-012 #EXPER
UMOV/HASPIO .309/BNE HASPIO .30C(CI,14 16/   F00 10/23/79 008-012 #EXPER
UMOV/HASPIO .30A/LI,14 .C0(BANZ . 2/     DGH F00 10/23/79 009-012 #EXPER
UMOV/HASPIO .30B/B HASPIO .30E(AI,14 -1/ DGH F00 10/23/79 010-012 #EXPER
UMOV/HASPIO .30D/LI,14 .60(LI,14 .C0/    DGH F00 10/23/79 011-012 #EXPER
#                                        DGH F00 10/23/79 012-012 #EXPER
