PICTURE 外部函式呼叫功能.pdf| 位元組位置 | 說明 |
|---|---|
| Byte 0 | 長度高位（(N+1)/256） |
| Byte 1 | 長度低位（(N+1)%256） |
| Byte 2 | 命令代碼（Command Code） |
| Byte 3 | 通道/旗標（Channel + toggle bit） |
| Byte 4~5 | 命令參數（依命令定義而定） |
| Byte 6~N | 寫入資料（如有） |
| 位元組位置 | 說明 |
|---|---|
| Byte 0~1 | 回傳封包長度 |
| Byte 2 | 命令碼（回應） |
| Byte 3 | 通道/旗標（回應） |
| Byte 4 | 狀態（0 = 成功；其他 = 錯誤碼） |
| Byte 5 | 回應計數器（Reply Counter） |
| Byte 6~N | 回傳資料 |
| 位元組 | 說明 |
|---|---|
| Byte 0~1 | 長度 0x00 0A |
| Byte 2 | 命令碼（SW） 0x40 |
| Byte 3 | 通道/字數 0x21 |
| Byte 4~5 | 寫入位址 0x00 00 |
| Byte 6~7 | 寫入資料 (高/低) 0x12 34 56 78 |
代碼: 選擇全部
00 0A 40 21 00 00 12 34 56 78
表示向 Channel 1, Address 0 寫入 2 word（資料為 0x12345678）| 位元組 | 說明 |
|---|---|
| Byte 0~1 | 長度 0x00 06 |
| Byte 2 | 命令碼（Echo） 0x40 |
| Byte 3 | 通道/字數 0x21 |
| Byte 4 | 狀態（成功為 0） 0x00 |
| Byte 5 | 回應計數器 0x03 |
代碼: 選擇全部
00 06 40 21 00 03| 位元組 | 說明 |
|---|---|
| Byte 0 | 長度高位 0x00 |
| Byte 1 | 長度低位 0x06 |
| Byte 2 | 命令碼（SR） 0x10 |
| Byte 3 | 通道/字數 0x12 |
| Byte 4 | 讀取位址高位 0x00 |
| Byte 5 | 讀取位址低位 0x00 |
代碼: 選擇全部
00 06 10 12 00 00| 位元組 | 說明 |
|---|---|
| Byte 0~1 | 長度 0x00 0E (14) |
| Byte 2 | 命令碼（Echo） 0x10 |
| Byte 3 | Channel/字數 0x12 |
| Byte 4 | 狀態（成功=0） 0x00 |
| Byte 5 | 回應計數器 0x02 |
| Byte 6~13 | 資料（4 bytes） 31 32 33 34 (ASCII "1234") |
代碼: 選擇全部
00 0E 10 22 00 02 31 32 33 34代碼: 選擇全部
# TCP_Write
keyin_data = rdstr(400, 0, 0, 40, 99, 0) # 從系統變數讀取輸入資料（例：畫面鍵入）
keyin_hex = "000A40120000" + keyin_data.to_s # 前面為寫入用固定指令，keyin_data為要寫入的資料
TcpSendHexString($P_sock, keyin_hex, keyin_hex.length)
recv1 = TcpRecvHexString($P_sock)
sleep(100)
recv2 = TcpRecvHexString($P_sock)
$P_recvdata1 = recv1.to_s
$P_recvdata2 = recv2.to_s
代碼: 選擇全部
# TCP_Read
keyin_hex = "000610120000" # 讀取用固定指令
TcpSendHexString($P_sock, keyin_hex, keyin_hex.length)
recv1 = TcpRecvHexString($P_sock)
sleep(100)
recv2 = TcpRecvHexString($P_sock)
$P_recvdata1 = recv1.to_s
$P_recvdata2 = recv2.to_s
代碼: 選擇全部
__declspec(dllexport) int TcpSendHexString(int sock, const char* hexstr, int hexlen) {
char buffer[1024] = {0};
int len = 0;
// 檢查長度是否為偶數
if (hexlen % 2 != 0) {
return -2;
}
// 檢查是否為合法 HEX 字元
for (int i = 0; i < hexlen; ++i) {
char c = hexstr[i];
if (!((c >= '0' && c <= '9') ||
(c >= 'A' && c <= 'F') ||
(c >= 'a' && c <= 'f'))) {
return -3;
}
}
// 將字串轉換為 byte buffer
for (int i = 0; i < hexlen; i += 2) {
unsigned char high = hexCharToByte(hexstr[i]);
unsigned char low = hexCharToByte(hexstr[i + 1]);
buffer[len++] = (unsigned char)((high << 4) | low);
}
int sent = send((SOCKET)sock, buffer, len, 0);
if (sent <= 0) {
//MessageBoxA(NULL, "send() 傳送失敗", "Socket 錯誤", MB_OK);
return -1;
}
return sent;
}
代碼: 選擇全部
// 接收資料並回傳 HEX 字串
__declspec(dllexport) const char* TcpRecvHexString(int sock)
{
memset(g_recvRaw, 0, sizeof(g_recvRaw));
memset(g_hexBuffer, 0, sizeof(g_hexBuffer));
int total = 0;
// 第一步：先讀取封包長度的前兩個位元組（高位 + 低位）
while (total < 2) {
int ret = recv((SOCKET)sock, g_recvRaw + total, 2 - total, 0);
if (ret <= 0) return ""; // 連線中斷或錯誤
total += ret;
}
// 第二步：解析封包總長度（Byte[0] = 高位, Byte[1] = 低位）
int packet_len = ((unsigned char)g_recvRaw[0] << 8) | (unsigned char)g_recvRaw[1];
// 安全檢查，避免溢出
if (packet_len > sizeof(g_recvRaw)) return "";
// 第三步：讀取剩餘封包內容
while (total < packet_len) {
int ret = recv((SOCKET)sock, g_recvRaw + total, packet_len - total, 0);
if (ret <= 0) return "";
total += ret;
}
// 第四步：將整包資料轉為十六進位格式的字串
char* p = g_hexBuffer;
for (int i = 0; i < total; ++i) {
#ifdef _WIN32_WCE
sprintf(p, "%02X ", (unsigned char)g_recvRaw[i]); //WinCE
#else
wsprintfA(p, "%02X ", (unsigned char)g_recvRaw[i]); //CNC GUIDE, iH PRO
#endif
p += 3;
}
return g_hexBuffer;
}