ENVOI DE MAIL VIA MIRC (TOUT BASIQUE, POUR APPRENDRE A LE FAIRE)

alias sendmail {
  %mail.from = $1
  %mail.to = $2
  %mail.smtp = $3
  %mail.msg = $4-
  ; les trucs pr envoyer a savoir
  ; /sendmail votre_email email_du_destinataire serveur_smtp message
  ; bien sur le sujet peut etre ajouté dans le
  ; code, ce qui est fait, voir le code .
  sockopen mail $3 25
  ; on ouvre la socket
  set %mail.recv 0
  ; histoire de pas fer lagger le serv on mettra A
  ; LA DEMANDE DU SERVEUR les infos
}
on *:sockopen:mail:{
  sockwrite -nt $sockname EHLO $ip
  ; authentification
}
on *:sockread:mail:{
  sockread %a
  echo -a %a
  inc %mail.recv
  if (%mail.recv == 3) sockwrite -nt $sockname MAIL FROM: %mail.from
  if (%mail.recv == 4) {
    sockwrite -nt $sockname RCPT TO: %mail.to
    sockwrite -nt $sockname DATA
  }
  if (%mail.recv == 5) {
    sockwrite -nt $sockname Subject: message envoyé a partir de mIRC
    sockwrite -nt $sockname From: %mail.from
    sockwrite -nt $sockname To: %mail.to
    sockwrite -nt $sockname %mail.msg
    sockwrite -nt $sockname .
    timer 1 1 /sockwrite -nt mail QUIT
    timer 1 1 /echo -a mail envoyé!
  }
}