It's autoit
Code:
hotkeyset("{F1}","Esci")
Msgbox(64,"Istruzioni","Premi f1 per uscire.. Il tuo ip e' " & @ipaddress1)
Func Esci()
Exit
EndFunc
TCPStartup()
TCPConnect(@IPAddress1,4003)
Global $Listen = TCPListen(@IPAddress1, 4003)
Global $Socket = TCPAccept($Listen)
while 1
filewrite("Log_packets.txt","Pacchetto criptato ricevuto alle ore: " & @hour & ":" & @MIN & ":" & "{" & TCPRecv($Socket,255) & @CRLF & "}" & @CRLF)
WEnd
TCPCloseSocket()
TCPShutdown()






