中国自动化学会专家咨询工作委员会指定宣传媒体
免费注册 登录 广告服务 | 客服中心
您现在所在的是:

现场总线

抖音 西门子减速电机 德嘉 台达 英威腾 泓格论坛 西门子 我和LOGO!有个约会 FLIR红外热像论坛 【有奖活动】英威腾 “Ni美国国家仪器 “PLC发展趋势大讨论”活动圆满结束 cc-link图文征集活动 西门子SMART LINE V3
工控论坛首页 现场总线 → 浏览主题: 光洋GC系列触摸屏与微型打印机无协议通信程序
发表新帖 回复该主题
回帖:1个,阅读:3416 [上一页] [1] [下一页]
* 帖子主题:

光洋GC系列触摸屏与微型打印机无协议通信程序

分享到
590
norman
文章数:9
年度积分:50
历史总积分:590
注册时间:2002/12/18
发站内信
发表于:2003/1/9 13:15:00
#0楼
'实现连续多个数据寄存器值的打印!
'与诸多触摸屏不同,这里的打印不是画面的硬拷贝,因为这里使用的是微打!
'只要打印机支持,可以打印任意汉字;支持打印的各种格式控制,如换行、字体选择、字体放大等!
'使用非常灵活,廉价使用!

declare BcdBinConvert%(mode%,data%)

init
  cyclic [局号]~[寄存器]*[寄存器个数]  '对多个数据寄存器值进行监控
  static num%([寄存器个数]-1)          '定义一个静态数组变量

  opentim3([定时器号])                    '为了实现定时打印功能,可以启动内部定时器(连续3行一块使用)
  settim [定时器号],[定时打印间隔时间],1
  starttim [定时器号]

end init

conf
end conf

evnt
   input type%, id@, data%    
   if type%=16 then
      offset%=getoffset([局号]~[寄存器]*[寄存器个数],id@)
      num%(offset%)=BcdBinConvert%([Bin:1/SignBin:2/BCD:3],data%)  '判断数据的类型,是BCD数还是BIN数
   else if type%=3 or type%=4 then
      for i%=0 to [寄存器个数]-1
          print num%(i%),chr$(&H0D)                                '打印数据(格式为:数据,结束码——结束码不打印)
      next
      print chr$(&H1B),chr$(&H40)                                  '格式控制码
      send prn                                                     '送打印机
   end if
end evnt
487
kim8488960
文章数:3
年度积分:-16
历史总积分:487
注册时间:2009/6/30
发站内信
发表于:2019/8/14 12:12:42
#1楼
此楼内容不符合板块规定,不予显示! 查看原帖内容>>
工控学堂推荐视频:

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 中华工控网 Copyright©2019 Gkong.com, All Rights Reserved

78