Bonjours,
alors voila, je suis entrain de faire un msn messenger pour mirc, mais ma socket, a quelque probleme... quand je fais, sockread -f %msn.temp et que je fai echo -a %msn.temp, il ne me retourne rien du tout :'(
Voici mon code:
si vous voulez l'essayer, veuillez set %msn.mail yourmail@hortmail.com et %msn.pass youpassword.
alias msn.connect {
set %msn.connected 1
set %msn.server 1
sockopen msn messenger.hotmail.com 1863
}
on *:sockopen:msn:{
sockwrite $sockname VER 0 MSNP7 MSNP6 MSNP5 MSNP4 CVRO
}
on *:sockread:msn:{
sockread -f %msn.temp
:re
echo -a %msn.temp
if (%msn.server == 1) {
if (VER 0 MSNP7 isin %msn.temp) {
sockwrite $sockname INF 1
}
if (INF 1 MD5 isin %msn.temp) {
sockwrite $sockname USR 2 MD5 I %msn.mail
}
if (XFR 2 NS isin %msn.temp) {
set %msn.ip.server2 $gettok(%msn.temp,4,32)
set %msn.server 2
sockclose msn
sockopen msn $replace(%msn.ip.server2,$chr(58),$chr(32))
}
}
else if (%msn.server == 2) {
if (VER 0 MSNP7 isin %msn.temp) {
sockwrite $sockname INF 1
}
if (INF 1 MD5 isin %msn.temp) {
sockwrite $sockname USR 2 MD5 I %msn.mail
}
if (USR 5 MD5 S isin %msn.temp) {
sockwrite $sockname USR 6 MD5 S $md5($gettok(%msn.temp,5,32) $+ %msn.pass )
}
if (USR 6 OK isin %msn.temp) {
sockwrite $sockname CHG 7 NLN
}
if (ILN 7 isin %msn.temp) {
echo -a %msn.temp
}
if (Inbox-Unread: isin %msn.temp) {
echo -a New Mail: $gettok(%msn.temp,2,32)
}
if (CHL 0 isin %msn.temp) {
sockwrite -nt $sockname QRY 17 msmsgs@msnmsgr.com 32
sockwrite $sockname $md5($gettok(%msn.temp,3,32) $+ Q1P7W2E4J9R8U3S5)
}
if (QRY 17 isin %msn.temp) {
echo -a Youpi on est connecté :D
}
}
if ($sockbr != 0) goto re
}