Question

我正在使用QBasic阅读设备回复。问题是qbasic在输出数据之前等待换行符或CHR $（13）但我的设备回复没有CHR $（13）（例如：“OK”）所以qbasic挂起等待换行符。

即使没有换行，我怎样才能收到回复或阅读？这可能吗？

[编辑]

*CLOSE*

这是我的代码，但在该代码中，它无法读取*CLOSE*，因为在jekyll serve之后没有换行符。

另一件事是设备在回复前延迟5秒。

Answer 1

你能举个例子吗？我怀疑你使用的是usleep()，但也许你应该使用INPUT#n。我找到了example here，请参阅下面的代码

INPUT$(x)

Answer 2

此代码示例演示如何在Basic中访问调制解调器。

REM Reset modem source:
CLS
OPEN "COM2:9600,N,8,1,BIN,CS,DS,RS" FOR RANDOM AS #1
Reset$ = "ATZ" + CHR$(13) + CHR$(10)
PRINT #1, Reset$;
Inp$ = ""
DO
    IF LOC(1) THEN
        Inp$ = Inp$ + INPUT$(1, 1)
        IF INSTR(Inp$, "OK") THEN
            PRINT "Modem reset."
            EXIT DO
        END IF
    END IF
LOOP
END

Qbasic阅读compale回复没有换行

2 个答案: