EPSON 代碼程序

1.EPSON SPEL+ 語言代碼示例：

// String RCdata$, InData$, toks$(0), data1$, data2$, data3$ //定義字符型變量名需要添加“$”符號 Integer N, x Double VX(500), VY(500), VZ(500) #define delay_Time 0.1 Function mainSetNet #201, "192.168.60.5", 8000, CRLF, NONE //當控制器作為客戶端的時候ip-set有效 OpenNet #201 As Server //打開#201服務器端口（作為服務器）Print "wait Connect ok..."WaitNet #201 //等待端口打開Print "Connect#201 ok."Print #201, "RC.OK" loop1:Call communication //pc通信 Input #202, RCdata$ ParseStr RCdata$, toks$(), "," //將字符串按間隔符號" "拆分成多組數據. Print "指令=", toks$(0)//解析RCdata$判斷控制If toks$(0) = "CLOSE" ThenPrint "接收到控制類型數據."Call close //關閉機器人ElseIf UBound(toks$()) >= 1 Then //如果toks$(1)不為空則判斷為點數據Call ParsePoint //解析函數Call movePGoTo loop1ElsePrint "數據無效請重新輸入:"GoTo loop1 // 繼續循環EndIf Fend // Function communication //TCP/IP 網口通信 succRC:If ChkNet(201) > 0 Then //Line Input #201, InData$ //從端口接收字符到一個或多個變量中//Print "InData$=", InData$Read #201, RCdata$, ChkNet(201) //從端口接收一行以上字符到一個字符串變量中(指定讀入的字節數)Print "RCdata$=", RCdata$ElseWaitNet #201Print "等待數據接受"GoTo succRCEndIfFend // Function ParsePoint //解析數據：節點3維坐標點N = Val(toks$(0)) //獲取點數//VX(1) = Val(toks$(1))Print "坐標點數N=", NInteger iVX(0) = VY(0) = VZ(0) = 0For i = 1 To N Step 1VX(i) = Val(toks$(i))VY(i) = Val(toks$(N + i))VZ(i) = Val(toks$(2 * N + i))P(i) = XY(VX(i), VY(i), VZ(i), 0)Print " X(i) =", VX(i), "Y(i) =", VY(i), "Z(i) =", VZ(i) //顯示坐標值Next Fend // Function WaiteP //移動到待機點If Motor = Off ThenMotor On //打開電機Power LowSpeed 50Accel 30, 30EndIfTool 0 //設置工具坐標系為0Go waitPFend // Function movePIf Motor = Off ThenMotor OnPower LowSpeedS 50AccelS 50EndIfCall WaiteP //1 回到待機點Tool 2 //2 設置工具坐標系2Integer iCurve "mycurve", O, 0, 4, P(1:N) //3 用自由曲線制作用于 CP 控制的數據與點Jump P1 -Z(-10) //4 運動到開始點上方10mm處CVMove "mycurve" //5 執行定義的自由曲線CP 動作Go P(N) -Z(-10) //6 運動到結束點上方10mm處////Jump P1 -Z(-10) //偏移Z軸坐標Z=P1z-z(-10)mm)移動到P1，如：P1z=-20 則 Z=-10//CP On //運動CP模式:在多個動作連續進行時//For i = 1 To N Step 1//Go P(i)//Next//CP Off//Jump P(N) -Z(-10)// Call WaiteP //回到待機點FendFunction close //關機CloseNet #201If Motor = On ThenMotor OffEndIf Fend //

2.關鍵函數：

Curve，CVMove 函數

3.代碼截圖

總結

以上是生活随笔為你收集整理的EPSON 程序的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。