Modül:
Kod:
Function PM(id As String)
Dim pStr As String
Dim pBytes() As Byte
HexString id
pStr = "35010" & "7" & "00" & hexword
ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes
End Function
bu da kullanma şekli(timer buton vs)
PM "xxxxxxxxx" ( xx yerine örnek Humanbecrux)
Kod:
pm "x"
# pm "xx"
# pm "xxx"
# pm "1"
# pm "12"
# pm "123
|
|
 |
|
