home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / ros / rosmisc.lbr / ROSMDM.PAT < prev    next >
Encoding:
Text File  |  1986-07-28  |  768 b   |  29 lines
  1.    Perhaps someone else has already told you about a way to make this change
  2. but here it is anyway. The problem was that when ros exits it resets the modem
  3. and if you had told it to make the modem busy it reset that as well. the 
  4. following changes fix that with no side effects that i can see.
  5.  
  6. In ROSDEF.INC
  7. add a line at the bottom
  8. IsBusy: Boolean;
  9.  
  10. In ROSINI.INC 
  11. line 320 change from
  12. then mdbusy
  13. to
  14. then begin mdbusy; IsBusy := True; end
  15. line 321 from
  16. else mdhangup;
  17. to
  18. else begin mdhangup; IsBusy := False; end;
  19.  
  20. In ROS.MCH (on a qx-10 anyway)
  21. line 217 is
  22. init_send('AT Z' + CR);
  23. insert a line
  24. If NOT IsBusy then
  25.  
  26. It compiles and seems to work ok. Hope you find it useful.17 is
  27. init_send('AT Z' + CR);
  28. insert a line
  29. If NOT IsBusy then