Hermes to Modem Question

[t0nyt]

Can anyone confirm if this code (which works fine on a standard QL) should also be expected to work with a Hermes fitted please?

With Hermes I get a response in a$ containing a mix of what I sent and garbage, and then it returns "" so the rest of my code doesn't run

Code: Select all

370 OPEN #8,ser2h
380 BAUD 1200
390 PRINT #8,"AT&T" & CHR$(34) & "GMT,%yyyy%MM%dd%HH%mm%ss,0.uk.pool.ntp.org" & CHR$(34)
400 a$=GetLine$(8)
410 IF a$="" THEN GO TO 900
420 IF a$(1 TO 2)<>"OK" THEN GO TO 400
Etc. etc.

Many thanks

[stephen_usher]

It should work the same way. BAUD sets the baud rate for both ports in that usage. Otherwise the system interacts with the IPC in the same way.

[t0nyt]

It should work the same way. BAUD sets the baud rate for both ports in that usage. Otherwise the system interacts with the IPC in the same way.

Thanks, looks like I have a fault somewhere then

Will have to get QTERM up and running (am in the process of re-organising my WIN1) and see if I can talk to the modem properly or not

Many thanks

[t0nyt]

IPCVER$ returns "0.0"

So I guess it's not a Hermes!

[dilwyn]

Classic 8749 symptons with modems! This was a replacement for the 8049 original second processor intended to cure keyboard debounce problems with replacement keyboards. Had side-effect of sabotaging modem communications!
https://qlwiki.theqlforum.com/doku.php?i ... r&s[]=8749

[t0nyt]

Classic 8749 symptons with modems! This was a replacement for the 8049 original second processor intended to cure keyboard debounce problems with replacement keyboards. Had side-effect of sabotaging modem communications!
https://qlwiki.theqlforum.com/doku.php?i ... r&s[]=8749

Many thanks for the info Dilwyn. A bent pin also probably wasn't helping much either!

Have re-fitted my 8049 for now

Many thanks

[BSJR]

Code: Select all

370 OPEN #8,ser2h
380 BAUD 1200
390 PRINT #8,"AT&T" & CHR$(34) & "GMT,%yyyy%MM%dd%HH%mm%ss,0.uk.pool.ntp.org" & CHR$(34)
400 a$=GetLine$(8)
410 IF a$="" THEN GO TO 900
420 IF a$(1 TO 2)<>"OK" THEN GO TO 400
Etc. etc.

Not knowing much about serial comms, I am confused by the PRINT line.
As CHR$(34) is a double quote, does this not upset the whole string when also using double quotes directly?

BSJR

[t0nyt]

Code: Select all

370 OPEN #8,ser2h
380 BAUD 1200
390 PRINT #8,"AT&T" & CHR$(34) & "GMT,%yyyy%MM%dd%HH%mm%ss,0.uk.pool.ntp.org" & CHR$(34)
400 a$=GetLine$(8)
410 IF a$="" THEN GO TO 900
420 IF a$(1 TO 2)<>"OK" THEN GO TO 400
Etc. etc.

Not knowing much about serial comms, I am confused by the PRINT line.
As CHR$(34) is a double quote, does this not upset the whole string when also using double quotes directly?

BSJR

It’s just embedding double quotes into the string so they get sent to the serial port, whereas the actual “ aren’t sent