Comme promis, toujours dans ma lignée de sockets, je poste ici un code pour afficher les dernières sources d'ircfr.com.
Merci à hell et tofu qui m'ont aidé ;)
Source / Exemple :
;------------------------------------------------------
;
; -=- Dernieres sources de ircfr.com -=-
; By Re[M]i_34
;
;------------------------------------------------------
dialog ircfr {
title "Dernières Sources D'ircfr.com by Re[M]i_34"
size -1 -1 194 175
option dbu
box "Résultats :", 4, 6 20 184 138
button "Afficher les dernières sources", 1, 6 7 184 11
edit "", 2, 26 28 141 10, center read autohs
edit "", 3, 10 40 177 115, multi autohs autovs hsbar vsbar
button "Effacer", 5, 33 161 44 10
button "Fermer", 6, 122 161 44 10, ok
}
menu * {
Dernières sources d'ircfr.com:dialog -m ircfr ircfr
}
on *:dialog:ircfr:sclick:*: {
if $did == 1 {
sockopen ircfr www.ircfr.com 80
did -ra ircfr 2 Connection en Cours...
}
if $did == 5 { did -r ircfr 2,3 }
}
on *:sockopen:ircfr:{
sockwrite -n $sockname GET http://www.ircfr.com
did -ra ircfr 2 Connection Effectuée
set %ircfrv 1
}
on *:sockread:ircfr:{
sockread -f %irc
if ($sockbr == 0) return
if ( href="code.aspx?ID= isin %irc) {
did -a ircfr 3 $replace($replace($replace($remove(%irc,$chr(9),<TR>,<td width=80 valign=top>,</td><TD WIDTH=11 valign=top>,<img src=graphix,/nok.gif>,</TD>,<TD WIDTH=11 valign=top>,<img src=graphix,/ok.gif>,</a>,<font color=#4B5C6B>,</font>,</FONT>,</TD>,</tr>,</T),<TD WIDTH=400><FONT Class=f1 COLOR=#00000> <a href=", http://www.ircfr.com/),">, Titre :),É,é) $CRLF
}
}
on *:dialog:ircfr:init:*:{
dll mdx.dll SetMircVersion $version
dll mdx.dll MarkDialog $dname
dll mdx.dll SetColor $dname 2 text $rgb(255,0,0)
dll mdx.dll SetColor $dname 3 text $rgb(0,0,255)
dll mdx.dll SetColor $dname 2,3 textbg $rgb(255,255,255)
dll mdx.dll SetColor $dname 2 background $rgb(255,255,255)
}
Conclusion :
Voilà, dites moi ce que vous en pensez :)
PS: Il vous faut mdx.dll dans la racine de votre mIRC ou Script.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.