- 1、本文档共20页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
控制卡的应用技巧精要
控制卡的应用技巧;一、控制卡的安装1、硬件安装 2、设备驱动的安装;一、控制卡的安装1、硬件安装 2、设备驱动的安装;二、控制卡的编程入门;二、控制卡的编程入门;2、添加dmc5400卡的函数定义模块;2、添加dmc5400卡的函数定义模块;2、添加dmc5400卡的函数定义模块;2、添加dmc5400卡的函数定义模块;三、控制卡与G代码的编程入门 1、G代码指令 ;三、控制卡与G代码的编程入门 1、G代码指令 ;3、通过控制卡执行G代码的方法 ;3、通过控制卡执行G代码的方法 ;四、控制卡与CAD的接囗编程;下面是读入Dxf文件中线段,并调用运动函数的实例代码:
jj = Vb_TextTotalLine
For ii = 1 To jj
If VB_GetTextLine(ii, m_str) = True Then
If m_str = AcDbLine Then
If VB_GetTextLine(ii + 2, m_str) = True Then x1 = Val(m_str)
If VB_GetTextLine(ii + 4, m_str) = True Then y1 = Val(m_str)
If VB_GetTextLine(ii + 8, m_str) = True Then x2 = Val(m_str)
If VB_GetTextLine(ii + 10, m_str) = True Then y2 = Val(m_str)
ii = ii + 10
pCard.LineTo x1, y1, 0 ‘(运行到线段的起点)
If pCard.WaitDone = True Then Exit For
pCard.LineTo x2, y2, 0 ‘(运行到线段的终点)
If pCard.WaitDone = True Then Exit For
End If
End If
Next;关于控制卡封装后的对象成员;5、 MoveTo成员
功能:让指定轴移动到指定的位置,调用控制卡中的
d5400_t_pmove函数实现
6、Line成员
功能:让X、Y和Z轴作直线插补(相对运动),调用控制卡中的
d5400_t_line3函数实现
7、Line成员
功能:让X、Y和Z轴作直线插补(绝对运动),调用控制卡中的
d5400_t_line3函数实现
8、WaitDone成员
功能:等待运动停止,调用控制卡中的
d5400_check_done函数实现
;
在对象入囗处加入d5400_board_init函数,实现对控制卡的自动初始化;在出囗处加入d5400_board_close,实现对释放对象时,自动关闭控制卡。例如:
Private Sub Class_Initialize()
If d5400_board_init 1 Then
MsgBox 没找到dmc5400运动控制卡
End If
End Sub
Private Sub Class_Terminate()
d5400_board_close
End Sub
注:这段代码是自动执行,当分配对象时,自动执行Class_Initialize
当释放对象时,自动执行Class_Terminate; 以上是对控制卡一些基本的封装应用,掌握这些基本的封装技巧之后,就可以根据自己的需要,针对不同的需求进行封装,便可以实现更高难度的高水平的控制编程。;结束
文档评论(0)