TAIWAN FANUC 技術論壇

代碼: 選擇全部

00 0A 40 21 00 00 12 34 56 78

代碼: 選擇全部

00 06 40 21 00 03

代碼: 選擇全部

00 06 10 12 00 00

代碼: 選擇全部

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;
}