使用procomm plus执行串口脚本

分手后的思念是犯贱 2022-05-15 11:37 717阅读 0赞

# 使用procomm plus执行串口脚本 #

## 1 串口脚本 ##

有些串口工具（例如串口调试助手）有定时发送功能，但只能发送一条固定的命令。我需要发送几百条命令，又懒得写程序，就希望找一个可以执行串口脚本的工具。然后我找到了[procomm plus][]。

procomm plus的功能很多。我只需要串口脚本功能，所以没有执行安装程序，解压后直接执行Programs目录的PW5.EXE。在菜单中选择Options->System Options->Modem Connection...，在“Current Modem/Connection”的下拉列表中选择要打开的串口或modem。在主窗口下方可以直接点击、设置编码格式、波特率。编码格式可以选择RAW ASCII。在主窗口可以直接敲AT命令，看到响应，和超机终端差不多。

在菜单中选择Tools->Scripts，就可以看到脚本相关的菜单，包括执行、编译、编辑、录制脚本。procomm plus的脚本系统叫做ASPECT，功能看上去很强大，可以定义变量，有for、while 等流程控制，甚至包括接受用户输入的对话框。procomm plus中有完善的教程和帮助文档。

我当然不会先看文档。首先做的就是录制一个脚本，看看大概是什么样子，然后照猫画虎编写自己的脚本。脚本的源文件是后缀为WAS的文件。源文件经过编译才能运行，编译产生的文件后缀是wax。

如果读者也是只想用串口脚本功能，建议不要安装procomm plus，直接运行就可以了。安装后，每次启动会检测所有modem，浪费时间。

## 2 脚本示例 ##

### 2.1 发送大量命令 ###

我要做的一个事情就是给一个modem打补丁，要发送两百多条命令。例如：

AT:PIB
    AT:Pf800,7b5d,4dc,7b5f,4de,7b59,4d8,7b5b,4da
    AT:Pf808,7b55,4d4,7b57,4d6,7b51,4d0,7b53,4d2
    ...

modem对这些命令的响应都是"\\r\\nOK\\r\\n"。通过录制的脚本，可以看到发送命令并等待响应的过程可以用以下语句完成：

transmit "AT:PIB^M"
       waitfor "K^M^J"

显然transmit就是向串口写。waitfor就是等待响应了。^M是回车符0D（就是\\r）、^J是换行符0A（就是\\n）。 waitfor语句在等待正常响应的最后3个字符。看懂这两句后，编写脚本的过程就是对要发送命令的简单替换。 我常用的文本编辑器是我自己写的[cnbook][]。在cnbook中将行首

替换成

transmit "

将行尾

替换成

^M"\n   waitfor "K^M^J"

替换时要选上“正则表达式”。将替换后的文本放到

proc main
    endproc

之间就可以了。完整的脚本看上去是这样：

proc main
       transmit "AT:PIB^M"
       waitfor "K^M^J"
       transmit "AT:Pf800,7b5d,4dc,7b5f,4de,7b59,4d8,7b5b,4da^M"
       waitfor "K^M^J"
       transmit "AT:Pf808,7b55,4d4,7b57,4d6,7b51,4d0,7b53,4d2^M"
       waitfor "K^M^J"
    ...
    endproc

以后我需要打补丁，就是执行这两百多条命令的时候，只要执行这个脚本就可以了。

### 2.2 自动测试 ###

我需要通过串口敲键测试一台设备。我录制了一次测试过程，然后用for循环自动测试100次。脚本看上去是这样：

proc main
       integer Num                ; Integer variable to increment.
    
       for Num = 0 upto 100       ; Init variable and define loop.
    	   transmit "o"
    	   waitfor "wait ..."
    	   transmit "1"
    	   waitfor "wait ..."
    	   transmit "0"
    	   waitfor "wait ..."
    	   transmit "0"
    	   waitfor "wait ..."
    	   transmit "0"
    	   waitfor "xt_connected_enter^M^J"
    	   transmit "p"
    	   waitfor "xt_idle_enter^M^J"
    ...
       endfor
    endproc

当然，在很多情况下，人工测试比自动测试更容易发现问题。不过，用串口脚本作自动测试也可以作为一种辅助的手段。

### 2.3 保持连接 ###

保持线卡不断开脚本的 ProcomPlus 代码：

保持线卡不断开脚本的 ProcomPlus 代码：
    
    ;Recorded script. Editing may be required.         
    proc main
       transmit "^M"
       LoopA:
           transmit "^M"
           pause 30
       goto LoopA
    endproc

## 3 结束语 ##

procomm plus的功能还有很多，它的脚本系统ASPECT的功能也远远不止于此。不过目前我只用到这些。

[procomm plus]: http://www.ouravr.com/bbs/bbs_content.jsp?bbs_sn=922093&bbs_page_no=1&bbs_id=1000
[cnbook]: http://tieba.baidu.com/f?kz=311456159