PLOUFF@Mit-Mc.ARPA (03/28/84)
From: "Robert L. Plouffe" <PLOUFF@Mit-Mc.ARPA> Replace the DB 0,0 to DB 80H,80H at the ORG 242AH. Upgrade the version to PAT730V same date. Sorry for inconvenience, that 0,0 would have terminated the intended message without printing it.
W8SDZ@Simtel20.ARPA (04/03/84)
From: Keith Petersen <W8SDZ@Simtel20.ARPA> I don't normally send source code files as mail, but in view of the great interest in MDM730, I feel it's of sufficient interest. --Keith ------ ; PAT730V2.ASM --Bob Plouffe 3/28/84 ; (Now includes the Hoff patches for BELL and RUB) ;This patch overlay file will restore the capability to get ;progress reports at a remote-end that answers under BYE and ;when the "Q" switch is not used on the command line. The ;problem was caused when the loop counts in HSNAK and WAITNLP ;were reduced to accomodate the longer max wait times. The ;solution is to change wait-times and loop-count back again. ;Longer max wait times to accomodate network delays are not ;needed here because of the time spent in the loop anyhow. ;Explanation: Characters sent from the other end because of ;the operation of BYE are gobbled by the loops so advance the ;loop counter and we can run out of loop before the end of ;verbose reporting - so never get the correct control character. ;Also changed the max wait times at several other locations ;including inside the receive-sector loop. This SUBSTANTIALLY ;improves performance on networks with packet delays. ;Just assemble this file as an ASM file and overlay the HEX file ;on MDM730.COM with DDT and SAVE 73 MDM730.COM. If you have ;the source code, you should be able to locate the changes at ;the labels shown below. It is NOT INTENDED to change the ;revision number of MDM730 at this time. If it becomes really ;NECESSARY at a later date to issue a new revision, then the ;revisor should include these changes. Treat this patch file ;as a customization just like when you use one of the patch ;overlays for a specific hardware configuration. ;This file now also includes the Hoff patches for BELL and RUB ;and can be conditionally assembled for the way you want it. ;CHECK TO SEE IF YOUR MDM730.COM ALREADY HAS THESE BYTES CHANGED. TRUE EQU 0FFH FALSE EQU 0 ;Set both of these byes FALSE if you wish to have console bell ;continuously beep until a keyboard character is hit after doing ;a dial retry and a connection occurs. Set ONERING to TRUE if ;you want only one beep to occur and NORING to TRUE if you don't ;want any beeps at all. DON'T set both of these bytes to TRUE. ;*********************************************************** ONERING EQU FALSE NORING EQU FALSE ; BKSP2RUB EQU FALSE ;want to convert BACKSP key to RUB? ;setting all three of these to false and then overlaying onto ;any copy of MDM730.COM (SIMTEL20 & CIS versions) will yield ;all of the fixes as it was intended for release. ;*********************************************************** ;In routine SENDC2 ORG 1782H MVI E,120 ;INSTEAD OF 25 ;In routine SENDFN ORG 1BB2H MVI E,120 ;In routine SCKSER ORG 1C56H MVI E,120 ;In routine HSNAK ORG 1D51H MVI E,180 ;INSTEAD OF 40 ;In routine HSNAK1 ORG 1D5FH MVI B,1 ;INSTEAD OF 5 ORG 1E4AH ;This replaces the SENDNOW routine as Irv had done it. EXITTEST EQU 1E79H SENDRDY EQU 1E41H SENDNOW:CALL EXITTEST ;GOBBLE CHARACTER, WANT TO QUIT? CALL SENDRDY ;READY TO SEND A CHARACTER YET? JNZ SENDNOW ;IF NOT WAIT RET ;In routine RCVSOH ORG 240AH MVI B,5 ;INSTEAD OF 1 ; ORG 2413H MVI B,5 ;was 1 ORG 242AH ;This one was not in Irv's release. ;Delete if you wish to. DB 0,0 ;slight format improvement here for: ;'++ Bad record # in header ',0 ;In routine RCVCHR ORG 245EH MVI B,5 ;was 1 ; ORG 2477H MVI B,5 ;was 1 ;In routine RCVCRC2 ORG 2496H MVI B,5 ;was 1 ;In routine WAITNLP ORG 2988H MVI B,1 ;INSTEAD OF 5 ; ;Options below are by Irv Hoff modified for inclusion in this ;patch overlay file by Bob Plouffe: ; Some people have mentioned they are annoyed with the bell ringing ;constantly after a connect when auto-dialing with MDM730. The following ;two small changes will stop that: ; ;1) WILL ONLY RING ONE TIME then go to terminal mode after announcing it ; has connected: IF ONERING ORG 06EAH DB 0C3H,7EH,19H ENDIF ;2) WILL NOT RING AT ALL, but go right to terminal mode after announcing ; it has connected. IF NORING ORG 06E3H DB 00,0CEH,73H,19H ENDIF ; Several people were having trouble getting normal backspace with ;their rub (delete) key. MDM730 offers the option of changing rub to ;backspace. ; 1) Can preset the default option so rub comes up as backspace ; (or preset the default so it comes up as normal rub) ; 2) At any time use the menu option to change it temporarily ; to the opposite configuration. ; Some mainframes will not accept a normal backspace and require a ;rub (delete) character to provide a type of "forward backspace". If ;you need this feature and your terminal does not have a rub (delete) ;key, or if inconvenient to use, then set BKSP2RUB to TRUE IF BKSP2RUB ORG 1629H CPI 7FH ;RUB ; .... ORG 1635H MVI A,08H ;BCKSPC ENDIF IF NOT BKSP2RUB ORG 1629H CPI 08H ; .... ORG 1635H MVI A,7FH ENDIF ; (The menu will still indicate you are changing rub to backspace, ;ignore this statment and realize just the opposite is happening with ;this change.) - Irv Hoff ;the END