打印针检测工具

许鸥
1997-01-01

　　针式打印机如果操作不当或使用时间过久，容易出现断针漏针现象。如通过直接观察打印头很难判断故障所在，尤其是对针头完好而驱动电路有故障的打印头更是难以确定。笔者用Ｔｕｒｂｏ　Ｃ　２．０程序编写的打印针检测程序，可以快速而准确地找到故障所在针头。程序编译后可在ＤＯＳ命令行下直接运行，并可带若干参数。
#3　　功能：
　　检测所有打印针或任意指定８根以下的打印针。
#3　　用法：
　　ＴＥＳＴＰＲＮ　［Ｎ１］　［Ｎ２］　［Ｎ３］　［Ｎ４］　［Ｎ５］　［Ｎ６］　
　　［Ｎ７］　［Ｎ８］
#3　　其中：
　　Ｎｉ为任意指定的打印针号，范围为１～２４（从上至下）。
　　如果只有一个参数且为“／？”，则提示帮助信息；若无参数则默认检测所有打印针。
#3　　程序说明：
　　该程序通过调用打印机图象控制命令实现单针打印，其命令格式为：“ＥＳＣ　＊　Ｍ　Ｎ１　Ｎ２　ＤＡＴＡ”，其中Ｍ表示图象选择，Ｎ１和Ｎ２表示打印列数，总列数为：Ｎ１＋Ｎ２×２５５，ＤＡＴＡ为打印数据，具体请参照有关打印机使用手册。程序所用的图象控制信息和打印数据分别存于数组ＳＴＲ１［］和ＳＴＲ２［］中。ＳＴＲ１［］中内容用户可根据需要自行修改。本程序在ＤＯＳ　６．２２下，对ＬＱ－１６００Ｋ、ＬＱ－１９００Ｋ、ＮＥＣ－Ｐ８０００等打印机进行测试，效果良好。注意：如果在ＵＣＤＯＳ、ＣＣＤＯＳ等汉字系统下运行，请先卸下打印驱动程序，否则将不能正常检测。
#3　　程序清单如下：＜文件名：ＴＥＳＴＰＲＮ．Ｃ＞
　　／＊快速检测打印针程序＊／
　　＃ｉｎｃｌｕｄｅ　＂ｓｔｄｉｏ．ｈ＂
　　＃ｉｎｃｌｕｄｅ　＂ｓｔｄｌｉｂ．ｈ＂
　　ｉｎｔ　ｎ＝１；
　　ＦＩＬＥ　＊ｆｐｒｎ；
　　ｍａｉｎ（ａｒｇｃ，ａｒｇｖ）
　　ｉｎｔ　ａｒｇｃ；
　　ｃｈａｒ　＊ａｒｇｖ［］；
　　｛ｉｎｔ　ｉ，ｊ，ｋ，ｌ，ｎ１，ｎ２，ｆｌａｇ＝０；
　　ｆｐｒｎ＝ｆｏｐｅｎ（＂ＰＲＮ＂，＂ｗ＂）；
　　ｉｆ　（ａｒｇｃ＜２）
　　ｆｏｒ　（ｉ＝０；ｉ＜３；ｉ＋＋）
　　｛　ｆｏｒ　（ｊ＝０；ｊ＜８；ｊ＋＋）　　／＊调用检测子程序＊／
　　｛　ｔｅｓｔ（ｉ，ｊ，ｆｌａｇ）；｝｝
　　ｅｌｓｅ
　　｛ｆｏｒ（ｋ＝１；ｋ＜ａｒｇｃ；ｋ＋＋）
　　｛　　　／＊转换命令行参数为整形数＊／
　　ｌ＝ａｔｏｉ（ａｒｇｖ［ｋ］）；
　　ｉｆ（（ａｒｇｃ＝＝２）＆＆（！（ａｔｒｃｍｐ（ａｒｇｖ［１］，＂／？＂）））｜｜（ａｒｇｃ＞９）｜｜ｌ＜１｜｜ｌ＞２４）
　　｛　　　／＊参数错误显示帮助信息＊／
　　ｈｅｌｐ（）；
　　ｅｘｉｔ（０）；｝｝
　　ｆｌａｇ＝１；
　　ｆｏｒ（ｋ＝１；ｋ＜ａｒｇｃ；ｋ＋＋）
　　｛ｌ＝ａｔｏｉ（ａｒｇｖ［ｋ］）；
　　ｎ１＝１／８；
　　ｎ２＝１％８；
　　ｔｅｓｔ（ｎ１，ｎ２，ｆｌａｇ）；
　　｝｝
　　ｆｐｒｉｎｔ（ｆｐｒｎ，＂＼ｎ＂）；
　　ｆｃｌｏｓｅ（ｆｐｒｎ）；｝
　　ｔｅｓｔ（ｘ，ｙ，ｚ）　　　／＊检测子程序＊／
　　ｉｎｔ　ｘ，ｙ，ｚ；
　　｛ｉｎｔ　ｋ，ｌ，ｍ；　　　／＊图象命令控制信息＊／
　　ｃｈａｒ　ｓｔｒ１［］＝｛２７，４２，３２，４０，１，ＮＵＬＬ｝；　　　
　　　　　　　　　　　　　　　　　　　　／＊用于存放打印数据＊／
　　ｃｈａｒ　ｓｔｒ２［３］；　　　／＊产生各打印针编码＊／
　　ｓｔｒ２［ｘ］＝１２８＞＞ｙ；
　　ｓｗｉｔｃｈ（ｘ）
　　｛ｃａｓｅ　０：ｓｔｒ２［１］＝ｓｔｒ２［２］＝０；
　　ｂｒｅａｋ；
　　ｃａｓｅ　１：ｓｔｒ２［０］＝ｓｔｒ２［２］＝０；
　　ｂｒｅａｋ；
　　ｃａｓｅ　２：ｓｔｒ２［０］＝ｓｔｒ２［１］＝０；
　　ｂｒｅａｋ；｝
　　ｆｐｒｉｎｔｆ（ｆｐｒｎ，＂＼ｎ＼ｎ＼ｔＰｒｉｎｔ　ｗｉｔｈ　％０２－ｐｉｎ：＂，（！ｚ）？（ｎ＋＋）：（ｘ＊８＋ｙ＋１））；
　　ｆｏｒ　（ｍ＝０；ｍ＜５；ｍ＋＋）　　　／＊发送图象打印指令＊／
　　ｆｐｒｉｎｔ（ｆｐｒｎ，＂％ｃ＂，ｓｔｒ１［ｍ］）；
　　ｆｏｒ（ｋ＝０；ｋ＜２９６；ｋ＋＋）
　　ｆｏｒ（ｌ＝０；ｌ＜３；ｌ＋＋）　　　／＊传送打印数据＊／
　　ｆｐｒｉｎｔｆ（ｆｐｒｎ，＂％ｃ＂，ｓｔｒ２［１］）；
　　ｆｐｒｉｎｔｆ（ｆｐｒｎ，＂＼ｎ＂）；｝
　　ｈｅｌｐ（）　　　／＊帮助信息＊／
　　｛ｐｒｉｎｔｆ（＂Ｕｓｅａｇｅ：ｔｅｓｔｐｒｎ　［Ｎ１］　［Ｎ２］　［Ｎ３］　
　　［Ｎ４］　［Ｎ５］　［Ｎ６］　［Ｎ７］　［Ｎ８］＂）；｝　

 