1 / 39

'REC435.PPS

'REC435.PPS. 'Version 1.01, 6/16/94. 'By J. Frankiewicz. '. 'This program is used to hang up the modem when it's running with &D1. 'It toggles DTR to go back to command mode, then sends ATH and exits. 'Use this to replace record 435 in PCBTEXT.

yetta
Download Presentation

'REC435.PPS

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. 'REC435.PPS

  2. 'Version 1.01, 6/16/94

  3. 'By J. Frankiewicz

  4. '

  5. 'This program is used to hang up the modem when it's running with &D1.

  6. 'It toggles DTR to go back to command mode, then sends ATH and exits.

  7. 'Use this to replace record 435 in PCBTEXT.

  8. 'Use system default color for lack of better choice

  9. defcolor

  10. 'Fake the action of the real record 435

  11. println "Hanging up now. Thank you for the upload(s)."

  12. println

  13. 'only send modem commands if there's a real connection

  14. if (!onlocal()) then

  15. 'wait a sec for the modem buffer to empty

  16. delay 18

  17. 'toggle the DTR lead for 1/2 sec

  18. dtroff

  19. delay 9

  20. dtron

  21. 'wait a bit for the modem to see DTR again

  22. delay 4

  23. 'Now hang up

  24. mprintln "ATH0"

  25. 'wait a bit for the modem to process the hang-up

  26. delay 9

  27. 'flush out the RX buffer just in case

  28. mdmflush

  29. end if

  30. 'all done

  31. end

More Related