r@nger
| Konu: Tropik Fırtına Kodu Salı 15 Haz. - 23:03:36 | |
| - Kod:
-
If Check1(122).Value = 1 Then Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X11), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y11), 1, 4) + "9BFF000000000000" Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X22), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y22), 1, 4) + "9BFF000000000000" Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X11), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y22), 1, 4) + "9BFF000000000000" Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X22), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y11), 1, 4) + "9BFF000000000000"
Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X33), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y33), 1, 4) + "9BFF000000000000" Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X44), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y44), 1, 4) + "9BFF000000000000" Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X33), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y44), 1, 4) + "9BFF000000000000" Paket "3104" + Strings.Mid(AlignDWORD("110745"), 1, 6) + "00" + KarakterID + "FFFF" + Strings.Mid(AlignDWORD(X44), 1, 4) + "0400" + Strings.Mid(AlignDWORD(Y33), 1, 4) + "9BFF000000000000" End If
| |
|