home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / NUBYE / NUBY-FIX.002 < prev    next >
Text File  |  2000-06-30  |  2KB  |  71 lines
  1.  
  2. Note   : These fixes will be in the next NUBYE release (tmb)
  3.  
  4. From   : Bob Clyne CoSYSOP Royal Oak RCP/M (313-759-6569)
  5. Date   : 09/21/86
  6. Subject: NUBYE v1.01 bug fixes
  7.  
  8. I have found two bugs in NUBYE101 in addition to the one addressed in
  9. NUBY-FIX.001 -- both are dependent on the particular equate settings.
  10.  
  11. ======
  12. FIX #1
  13.  
  14. The first, and most obvious, bug is in the routine RDBYTE. There is a 
  15. semicolon missing from in front of "Have to read a sector". This will only
  16. show up if WELFILE is true. [RDBYTE: comes after IMQUIT: -- tmb]
  17.  
  18. ======
  19. FIX #2
  20.  
  21. The second bug is less obvious. In the routine IMQUIT if IMAT is true
  22. and DOATZ, NOATA, and OFFHK are all false then execution will fall through
  23. to IMSEND.
  24.  
  25. Lines marked with "==>>" are new/modified -- either make the individual
  26. changes shown, or insert this entire section of code and delete the old
  27. section in your copy of NUBYE.
  28.  
  29. ;
  30. ; De-initiaize the modem.  When the operator uses CTL-C followed by any-
  31. ; thing but "R", this call will return the modem to default settings.
  32. ;
  33. IMQUIT:    LXI    H,LFMSG
  34.     CALL    PRINTL
  35.     CALL    DLP        ; Some need this delay
  36.     CALL    EATALL        ; ...and this garbage collection
  37.      ENDIF            ; IMAT
  38. ;
  39.      IF    (IMAT AND DOATZ) AND (NOT OFFHK)
  40.     LXI    H,IMATZ
  41.     CALL    IMSEND        ; Send ATZ message to modem
  42.     CALL    DLP
  43.     CALL    EATALL
  44.      ENDIF
  45. ;
  46.      IF    IMAT AND (DOATZ    OR NOATA) AND (NOT OFFHK)
  47.     LXI    H,IMUSR
  48.     CALL    IMSEND        ; Send ATS0=0 to modem
  49. ;==>>    JMP    EATALL    <<== delete this line
  50.      ENDIF
  51. ;
  52.      IF    IMAT AND OFFHK
  53.     LXI    H,IMATH1
  54.     CALL    IMSEND        ; Send ATH1 to the modem
  55. ;==>>    JMP    EATALL    <<== delete this line
  56.      ENDIF
  57. ;
  58. ;==>> Next 2 lines are NEW
  59.      IF    IMAT
  60.     JMP    EATALL        ;Replaces final 2 JMPs deleted above
  61. ;==>> end of NEW code
  62. ;
  63. ; Send a command string to the modem. (If ECHO) Verify, reset the modem
  64. ; and resend string if echo fails.
  65. ;
  66. ;==>>     IF    IMAT    <<== delete this line
  67. IMSEND:    PUSH    B        ; Save 'BC' registers
  68.     SHLD    ADDSTR        ; Save start of command string
  69.  
  70. ** end of fix file **
  71.