; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
; §§
; §§                                       INVISION VERSION 2.0 Script for mIRC 6.02 By cRYOa
; §§                                       FILE: iraws.ini 
; §§                                       DATE: 2-4-02
; §§                                       DESCRIPTION: RAW Event Routines
; §§                                       Modifs cussay: les messages sont directement traduits a partir 
; §§                                       de la RFC1459 (http://www.faqs.org/rfcs/rfc1459.html), sauf ceux déjà 
; §§                                       presents pour invision ou j'ai traduit le texte seulement.Ceux non traduits
; §§                                       sont là parce que je n'avais pas de traduction ou alors que j'ai oubliés...
; §§                                       DO NOT ADD OR CHANGE ANYTHING IN THIS FILE
; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
on &^*:text:*:#:{
  var %fulladdress = $fulladdress
  var %curNetwork = $iNetwork
  if ($strip($1-,burc) == !TDCC) && ($r.set(TDCC,AdTo) != 1) && %TDCCflag [ $+ [ %curNetwork ] ] != 1 {
    .timer -o 1 10 unset %TDCCflag [ $+ [ %curNetwork ] ]
    set %TDCCflag [ $+ [ %curNetwork ] ] 1
    if ($r.set(TDCC,AdTo) == 2) && (($nick isop $chan) || ($nick isvo $chan)) { 
      if $r.set(TDCC.1,Status) == On && (($istok($r.set(TDCC.1,Channels),$chan,44) == $true) || ($r.set(TDCC.1,Channels) == All)) { notice $nick $tdcc.ad.temp(1) }
      if $r.set(TDCC.2,Status) == On && (($istok($r.set(TDCC.2,Channels),$chan,44) == $true) || ($r.set(TDCC.2,Channels) == All)) { notice $nick $tdcc.ad.temp(2) }
      if $r.set(TDCC.3,Status) == On && (($istok($r.set(TDCC.3,Channels),$chan,44) == $true) || ($r.set(TDCC.3,Channels) == All)) { notice $nick $tdcc.ad.temp(3) }
      if $r.set(TDCC.4,Status) == On && (($istok($r.set(TDCC.4,Channels),$chan,44) == $true) || ($r.set(TDCC.4,Channels) == All)) { notice $nick $tdcc.ad.temp(4) }
      if $r.set(TDCC.5,Status) == On && (($istok($r.set(TDCC.5,Channels),$chan,44) == $true) || ($r.set(TDCC.5,Channels) == All)) { notice $nick $tdcc.ad.temp(5) }
    }
    if ($r.set(TDCC,AdTo) == 3) && ($nick isvo $chan) && ($nick !isop $chan) { 
      if $r.set(TDCC.1,Status) == On && (($istok($r.set(TDCC.1,Channels),$chan,44) == $true) || ($r.set(TDCC.1,Channels) == All)) { notice $nick $tdcc.ad.temp(1) }
      if $r.set(TDCC.2,Status) == On && (($istok($r.set(TDCC.2,Channels),$chan,44) == $true) || ($r.set(TDCC.2,Channels) == All)) { notice $nick $tdcc.ad.temp(2) }
      if $r.set(TDCC.3,Status) == On && (($istok($r.set(TDCC.3,Channels),$chan,44) == $true) || ($r.set(TDCC.3,Channels) == All)) { notice $nick $tdcc.ad.temp(3) }
      if $r.set(TDCC.4,Status) == On && (($istok($r.set(TDCC.4,Channels),$chan,44) == $true) || ($r.set(TDCC.4,Channels) == All)) { notice $nick $tdcc.ad.temp(4) }
      if $r.set(TDCC.5,Status) == On && (($istok($r.set(TDCC.5,Channels),$chan,44) == $true) || ($r.set(TDCC.5,Channels) == All)) { notice $nick $tdcc.ad.temp(5) }
    }
    if ($r.set(TDCC,AdTo) == 4) && ($nick isop $chan) { 
      if $r.set(TDCC.1,Status) == On && (($istok($r.set(TDCC.1,Channels),$chan,44) == $true) || ($r.set(TDCC.1,Channels) == All)) { notice $nick $tdcc.ad.temp(1) }
      if $r.set(TDCC.2,Status) == On && (($istok($r.set(TDCC.2,Channels),$chan,44) == $true) || ($r.set(TDCC.2,Channels) == All)) { notice $nick $tdcc.ad.temp(2) }
      if $r.set(TDCC.3,Status) == On && (($istok($r.set(TDCC.3,Channels),$chan,44) == $true) || ($r.set(TDCC.3,Channels) == All)) { notice $nick $tdcc.ad.temp(3) }
      if $r.set(TDCC.4,Status) == On && (($istok($r.set(TDCC.4,Channels),$chan,44) == $true) || ($r.set(TDCC.4,Channels) == All)) { notice $nick $tdcc.ad.temp(4) }
      if $r.set(TDCC.5,Status) == On && (($istok($r.set(TDCC.5,Channels),$chan,44) == $true) || ($r.set(TDCC.5,Channels) == All)) { notice $nick $tdcc.ad.temp(5) }
    }
  }
}
;raw *:*:{ aecho $numeric : $1- | halt }
raw 001:*:{ if ($r.set(Services,Update) == On) { if ((lagnet.org isin $1-) || (alphanine.net isin $1-) || (DalNet isin $1-)) { .uloads | .load -rs $mircdirSystem\Remotes\dalnet.mrc } } | secho [001] Bienvenue sur le reseau $5 $6 $7 | secho [001] Votre ident: $8-  | halt }
raw 002:*:{ secho [002] Votre serveur est $5 sa version est actuellement $8 | halt }
raw 003:*:{ secho [003] Serveur crée le: $6 $7 $8 $9 à $11 | halt }
raw 004:*:{ secho [004] Serveur: $2 , Version: $3 | halt }
raw 005:*:{ secho [005] Commandes supportées par le serveur: $2- | halt }
raw 006:*:{ secho [006] $2- | halt }
raw 007:*:{ secho [007] $2- | halt }
raw 008:*:{ secho [008] Serveur: $4 | halt }
raw 200:*:{ secho [200] (RPL_TRACELINK) $2- | halt }
raw 201:*:{ secho [201] (RPL_TRACECONNECTING) $2- | halt }
raw 202:*:{ secho [202] (RPL_TRACEHANDSHAKE) $2- | halt }
raw 203:*:{ secho [203] (RPL_TRACEUNKNOWN) $2- | halt }
raw 204:*:{ secho [204] (RPL_TRACEOPERATOR) $2- | halt }
raw 205:*:{ secho [205] (RPL_TRACEUSER) $2- | halt }
raw 206:*:{ secho [206] (RPL_TRACESERVER) $2- | halt }
raw 207:*:{ aecho [207] $2- | halt }
raw 208:*:{ secho [208] (RPL_TRACENEWTYPE) $2- | halt }
raw 209:*:{ secho [209] (RPL_TRACECLASS) $2- | halt }
raw 210:*:{ secho [210] Info: $2- | halt }
raw 211:*:{ aecho [211] (RPL_STATSLINKINFO) $2- | halt }
raw 212:*:{ aecho [212] (RPL_STATSCOMMANDS) $2- | halt }
raw 213:*:{ aecho [213] (RPL_STATSCLINE) $2- | halt }
raw 214:*:{ aecho [214] (RPL_STATSNLINE) $2- | halt }
raw 215:*:{ aecho [215] (RPL_STATSILINE) $2- | halt }
raw 216:*:{ if ($isnum(%kline [ $+ [ $iNetwork ] ] ) != $true) { aecho [216] Kill line list. | set %kline [ $+ [ $iNetwork ] ] 0 } | inc %kline [ $+ [ $iNetwork ] ] 1 | aecho [216] %kline [ $+ [ $iNetwork ] ] $+ . $2 $+ :line $bracket( [ [ $5 ] $+ ] @ [ $+ [ $3 ] ] ) - $replace($4,_,$chr(32)) | halt }
raw 217:*:{ aecho [217] $2- | halt }
raw 218:*:{ aecho [218] (RPL_STATSYLINE) $2- | halt }
raw 219:*:{ if ($window(@Ports) != $null) { aline @Ports [219] $c(1) $+ -  | aline @Ports $c(1) $+ [219] Ports les plus rapides: $c(2) $+ $isset($gettok(%port-b [ $+ [ $iNetwork ] ] ,1,32)) $c(1) $+ - Port courant: $c(2) $+ $port | unset %port-* } | else { aechofin [219] du rapport de /STATS $2 } | unset %qline [ $+ [ $iNetwork ] ] %port-* %oline [ $+ [ $iNetwork ] ] %kline [ $+ [ $iNetwork ] ] | halt }
raw 220:*:{ aecho [220] $2- | halt }
raw 221:*:{ aecho [221] Modes pour $me $+ : $+ $c(2) $2 | halt }
raw 222:*:{ if ($isnum(%qline [ $+ [ $iNetwork ] ] ) != $true) { aecho [222] Liste de quarantaine. | set %qline [ $+ [ $iNetwork ] ] 0 } | inc %qline [ $+ [ $iNetwork ] ] 1 | aecho %qline [ $+ [ $iNetwork ] ] $+ . $2 $bracket($3-) | halt }
raw 223:*:{ aecho [223] $2- | halt }
raw 224:*:{ aecho [224] $2- | halt }
raw 225:*:{ aecho [225] $2- | halt }
raw 226:*:{ aecho [226] $2- | halt }
raw 227:*:{ aecho [227] $2- | halt }
raw 228:*:{ aecho [228] $2- | halt }
raw 229:*:{ aecho [229] $2- | halt }
raw 230:*:{ aecho [230] $2- | halt }
raw 231:*:{ aecho [231] $2- | halt }
raw 232:*:{ aecho [232] $2- | halt }
raw 233:*:{ aecho [233] $2- | halt }
raw 234:*:{ aecho [234] $2- | halt }
raw 235:*:{ aecho [235] $2- | halt }
raw 236:*:{ aecho [236] $2- | halt }
raw 237:*:{ aecho [237] $2- | halt }
raw 238:*:{ aecho [238] $2- | halt }
raw 239:*:{ aecho [239] $2- | halt }
raw 240:*:{ aecho [240] $2- | halt }
raw 241:*:{ aecho [241] $2- | halt }
raw 242:*:{ aecho [242] $2- | halt }
raw 243:*:{ if ($isnum(%oline [ $+ [ $iNetwork ] ] ) != $true) { secho [243] Liste operateurs en ligne. | set %oline [ $+ [ $iNetwork ] ] 0 } | inc %oline [ $+ [ $iNetwork ] ] 1 | aecho %oline [ $+ [ $iNetwork ] ] $+ . $iif($2 === o,Local:,Global:) $5 $bracket($3) - $7 | halt }
raw 244:*:{ aecho [244] $2- | halt }
raw 245:*:{ aecho [245] $2- | halt }
raw 246:*:{ aecho [246] $2- | halt }
raw 247:*:{ aecho [247] $2- | halt }
raw 248:*:{ aecho [248] $2- | halt }
raw 249:*:{ aecho [249] $2- | halt }
raw 250:*:{ aecho [250] $2- | halt }
raw 251:*:{ secho [251] Il y a $4 usagers et $7 invisibles sur $10 serveurs | halt }
raw 252:*:{ secho [252] Ircops en ligne: $2 | halt }
raw 253:*:{ secho [253] Connections inconnues: $2 | halt }
raw 254:*:{ secho [254] Salons existants: $2 | halt }
raw 255:*:{ secho [255] Users connectés: $4 | secho [255] Serveurs connectés: $7 | halt }
raw 256:*:{ secho [256] Infos pour: $+ $c(2) $2 | halt }
raw 257:*:{ secho [257] Réseau: $2- | halt }
raw 258:*:{ secho [258] Administrateur: $2- | halt }
raw 259:*:{ secho [259]E-mail: $2- | halt }
raw 260:*:{ aecho [260] $2- | halt }
raw 261:*:{ aecho [261] $2- | halt }
raw 262:*:{ aecho [262] $2- | halt }
raw 263:*:{ aecho [263] $2- | halt }
raw 264:*:{ aecho [264] $2- | halt }
raw 265:*:{ secho [265] Utilisateurs locaux: $5 pour un max de $7 | halt }
raw 266:*:{ secho [266] Utilisateurs globaux: $5 pour un max de $7 | halt }
raw 267:*:{ aecho [267] $2- | halt }
raw 268:*:{ aecho [268] $2- | halt }
raw 269:*:{ aecho [269] $2- | halt }
raw 270:*:{ aecho [270] $2- | halt }
raw 271:*:{ aecho [271] $2- | halt }
raw 272:*:{ aecho [272] $2- | halt }
raw 273:*:{ aecho [273] $2- | halt }
raw 274:*:{ aecho [274] $2- | halt }
raw 275:*:{ aecho [275] $2- | halt }
raw 276:*:{ aecho [276] $2- | halt }
raw 277:*:{ aecho [277] $2- | halt }
raw 278:*:{ aecho [278] $2- | halt }
raw 279:*:{ aecho [279] $2- | halt }
raw 280:*:{ aecho [280] $2- | halt }
raw 281:*:{ aecho [281] $2- | halt }
raw 282:*:{ aecho [282] $2- | halt }
raw 283:*:{ aecho [283] $2- | halt }
raw 284:*:{ aecho [284] $2- | halt }
raw 285:*:{ aecho [285] $2- | halt }
raw 286:*:{ aecho [286] $2- | halt }
raw 287:*:{ aecho [287] $2- | halt }
raw 288:*:{ aecho [288] $2- | halt }
raw 289:*:{ aecho [289] $2- | halt }
raw 290:*:{ aecho [290] $2- | halt }
raw 291:*:{ aecho [291] $2- | halt }
raw 292:*:{ aecho [292] $2- | halt }
raw 293:*:{ aecho [293] $2- | halt }
raw 294:*:{ aecho [294] $2- | halt }
raw 295:*:{ aecho [295] Grade: Administrateur réseau | halt }
raw 296:*:{ aecho [296] $2- | halt }
raw 297:*:{ aecho [297] $2- | halt }
raw 298:*:{ aecho [298] $2- | halt }
raw 299:*:{ aecho [299] $2- | halt }
raw 300:*:{ aecho [300] $2- | halt }
raw 301:*:{ if $r.whois($2) == $null { if (%whois. [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] == on) { aecho [301] Absent $c(2) $+ $3- | unset %whois. [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] } | else { halt } | halt } | else { halt } }
raw 302:*:{ aecho [302] (RPL_USERHOST) $2- | halt }
raw 303:*:{ aecho [303] (RPL_ISON) $2- | halt }
raw 304:*:{ aecho [304] $2 $4- $3 | halt }
raw 305:*:{ aecho [305] Vous n'êtes plus absent | halt }
raw 306:*:{ aecho [306] Vous êtes indiqué absent | halt }
raw 307:*:{ 
  if $r.whois($2) == $null {
    if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On {
      aecho [307] Infos services usager: $c(2) $+ Enregistré | halt
    }
    else {
      aecho [307] Services: $c(2) $+ Enregistré | halt 
    }
  }
  else { halt }
}
raw 308:*:{ 
  if $r.whois($2) == $null {
    if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On {
      aecho [308] UserInfo Admin: $c(2) $+ $2- | halt
    }
    else {
      aecho [308] Admin: $c(2) $+ $2- | halt 
    }
  } 
  else { halt }
}
raw 309:*:{ 
  if $r.whois($2) == $null {
    if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On {
      aecho [309] UserInfo SOP: $c(2) $+ $2- 
      halt 
    }
    else {
      aecho [309] SOP: $c(2) $+ $2- 
      halt 
    }
  }
  else { halt }
}
raw 310:*:{ 
  if $r.whois($2) == $null {
    if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On {
      aecho [310] Infos Helpeur: $c(2) $+ $2- | halt 
    }
    else {
      aecho [310] Helpeur: $c(2) $+ $2- | halt 
    }
  }
  else { halt }
}
raw 311:*:{ 
  if $r.whois($2) == $null {
    if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On { 
      aecho [311] Infos usager $chr(15)
      aecho [311] Info $c(1) $+ pseudo: $c(2) $+ $2 
      aecho [311] Info adresse: $c(2) $+ $3 $+ @ $+ $4 $bracket($iif($r.country($gettok($4,$gettok($4,0,46),46)) == $null,Unknown,$r.country($gettok($4,$gettok($4,0,46),46)))) 
      if ($4 == 63.195.0.190) || ($4 == adsl-63-195-0-190.dsl.chic01.pacbell.net) { aecho [311] Info vérifiée: 4This is the real cRYOa!  } 
      aecho [311] Info nom: $c(2) $+ $6- 
      halt 
    }
    else {
      aecho [311] $c(1) $+ Nick: $c(2) $+ $2 
      aecho [311] Adresse: $c(2) $+ $3 $+ @ $+ $4 $bracket($iif($r.country($gettok($4,$gettok($4,0,46),46)) == $null,Unknown,$r.country($gettok($4,$gettok($4,0,46),46)))) 
      if ($4 == 63.195.0.190) || ($4 == adsl-63-195-0-190.dsl.chic01.pacbell.net) { aecho [311] Verifié: 4This is the real cRYOa!  } 
      aecho [311] Nom: $c(2) $+ $6- 
      halt 
    } 
  }
  else { halt }
}
raw 312:*:{ 
  if $r.whois($2) == $null {
    if (%whoisCT [ $+ [ $iNetwork ] ] >= 1) || ($r.set(Invision,isoWhois) == On) {
      aecho [312] Infos usager: $c(2) $+ $3 $+ , $+ $c(2) $4- | set %whois. [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] on | halt 
    }
    else {
      aecho [312] Serveur: $c(2) $+ $3 $+ , $+ $c(2) $4- | set %whois. [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] on | halt 
    }
  }
  else { halt }
}
raw 313:*:{ if ($r.whois($2) == $null) { if (%whoisCT [ $+ [ $iNetwork ] ] >= 1) || ($r.set(Invision,isoWhois) == On) { aecho [313] Infos pseudo: $c(2) $+ $2- | halt } | else { aecho [313] Etat: $c(2) $+ $2- | halt } } | else { halt } }
raw 314:*:{ 
  if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On {
    aecho [314] Infos usager:$c(1) $+ Nick: $c(2) $+ $2 
    aecho [314]Adresse usager: $c(2) $+ $3 $+ @ $+ $4 
    if ($4 == 63.195.0.190) || ($4 == adsl-63-195-0-190.dsl.chic01.pacbell.net) { aecho [314] Info vérifiée: 4 c'est la vraie cRYOa!  } 
    aecho [314] nom usager: $c(2) $+ $6- 
    halt 
  }
  else {
    aecho [314] $c(1) $+ Nick: $c(2) $+ $2 
    aecho [314]Adresse: $c(2) $+ $3 $+ @ $+ $4 | if ($4 == 63.195.0.190) || ($4 == adsl-63-195-0-190.dsl.chic01.pacbell.net) { aecho Vérifié: 4c'est le vrai cRYOa!  } 
    aecho [314]Nom: $c(2) $+ $6- 
    halt 
  }
}
raw 315:*:{ 
  .timerClrIAL $+ $iNetwork -io 1 30 unset %ialwho [ $+ [ $iNetwork ] ] 
  ;   if %DOwho [ $+ [ $iNetwork ] ] == 1 { 
  ;     unset %DOwho [ $+ [ $iNetwork ] ]
  ;     secho [315] $3- $bracket($iif(%who [ $+ [ $iNetwork ] ] == $null,0,%who [ $+ [ $iNetwork ] ] ),$iif(%who [ $+ [ $iNetwork ] ] == 1,Trouvé,Trouvés)) 
  ;     halt 
  ;   } 
  ;   else { 
  if (%ialupdate- [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] == On) {  
    unset %ialupdate- [ $+ [ $2 ] ] 
    halt 
  }
  if (%usearch-ip [ $+ [ $iNetwork ] ] != $null) { 
    if  $vnum(%usearch-c [ $+ [ $iNetwork ] ] ,0) == 0 && %usearch-safety != $null { .timer 1 3 set %usearch-ip [ $+ [ $iNetwork ] ] $remove(%usearch-safety,*) $chr(124) who %usearch-safety | unset %usearch-* | halt }
    aecho [315] Trouvé $c(2) $+ $vnum(%usearch-c [ $+ [ $iNetwork ] ] ,0) $c(1) $+ pseudo $+ $iif($vnum(%usearch-c [ $+ [ $iNetwork ] ] ,0) != 1,s) which match $+ $iif($vnum(%usearch-c [ $+ [ $iNetwork ] ] ,0) == 1,es) $c(2) $+  $+ $isset(%usearch-ip [ $+ [ $iNetwork ] ] ) $+  $+ $c(1) $+ . 
    if (%usearch-u1 [ $+ [ $iNetwork ] ] == $null) { 
      unset %usearch-* 
      halt 
    } 
    else { 
      set %usearch-c 0 
      :start-usearch 
      inc %usearch-c 1 
      if (%usearch-u [ $+ [ %usearch-c ] ] [ $+ [ $iNetwork ] ] == $null) { 
        aecho [315] Fin de la liste de recherche IP/Host . 
        unset %usearch-* 
        halt 
      } 
      else { 
        aecho [315] %usearch-u [ $+ [ %usearch-c ] ] [ $+ [ $iNetwork ] ] | goto start-usearch 
      } 
    } 
  }
  if ($2 == %ircop.scan-chan [ $+ [ $iNetwork ] ] ) { 
    if (%ircop.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { 
      msg $2 $c(1) $+ Trouvé $c(2) $+ $vnum(%ircop.scan-c [ $+ [ $iNetwork ] ] ,0) $c(1) $+ IRCOp $+ $iif($vnum(%ircop.scan-c [ $+ [ $iNetwork ] ] ,0) != 1,s) in $c(2) $+  $+ $2 $+ $c(1) $+ . 
    } 
    else { 
      aecho [315] Trouvé $c(2) $+ $vnum(%ircop.scan-c [ $+ [ $iNetwork ] ] ,0) $c(1) $+ IRCOp $+ $iif($vnum(%ircop.scan-c [ $+ [ $iNetwork ] ] ,0) != 1,s) in $c(2) $+  $+ $2 $+ $c(1) $+ . 
    } 
    if (%ircop.scan-u1 [ $+ [ $iNetwork ] ] == $null) { 
      unset %ircop.scan-* 
      halt 
    }
    else { 
      set %ircop.scan-c 0 
      :start-ircop.scan 
      inc %ircop.scan-c 1 
      if (%ircop.scan-u [ $+ [ %ircop.scan-c ] ] [ $+ [ $iNetwork ] ] == $null) { 
        if (%ircop.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { msg $2 $c(1) $+ Fin de la liste des IRCop. 
        } 
        else { 
          aecho [315] Fin de la liste des IRCop. 
        } 
        unset %ircop.scan-* 
        halt 
      } 
      else { 
        if (%ircop.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { 
          msg $2 %ircop.scan-u [ $+ [ %ircop.scan-c ] ] [ $+ [ $iNetwork ] ]  
        } 
      else { aecho [315] %ircop.scan-u [ $+ [ %ircop.scan-c ] ] [ $+ [ $iNetwork ] ] } | goto start-ircop.scan } 
    }
  }
  if ($2 == %away.scan-chan [ $+ [ $iNetwork ] ] ) { 
    if (%away.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { 
      msg $2 $c(1) $+ Trouvé $c(2) $+ $vnum(%away.scan-c [ $+ [ $iNetwork ] ] ,0) $c(1) $+ usagers absents $+ $iif($vnum(%away.scan-c [ $+ [ $iNetwork ] ] ,0) != 1,s) sur $c(2) $+  $+ $2 $+ $c(1) $+ . 
    } 
    else { 
      aecho [315] Trouvé $c(2) $+ $vnum(%away.scan-c [ $+ [ $iNetwork ] ] ,0) $c(1) $+ usagers absents $+ $iif($vnum(%away.scan-c [ $+ [ $iNetwork ] ] ,0) != 1,s) sur $c(2) $+  $+ $2 $+ $c(1) $+ . 
    } 
    if (%away.scan-u1 [ $+ [ $iNetwork ] ] == $null) { unset %away.scan-* | halt } 
    else { 
      set %away.scan-c 0 
      :start-away.scan 
      inc %away.scan-c 1 
      if (%away.scan-u [ $+ [ %away.scan-c ] ] [ $+ [ $iNetwork ] ] == $null) { 
        if (%away.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { msg $2 $c(1) $+ Fin de la liste des usagers absents. } 
        else { aecho [315] Fin de la liste des usagers absents. } 
        unset %away.scan-* 
        halt 
      } 
      else { 
        if (%away.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { 
          msg $2 %away.scan-u [ $+ [ %away.scan-c ] ] [ $+ [ $iNetwork ] ] 
        } 
        else { 
        aecho [315] %away.scan-u [ $+ [ %away.scan-c ] ] [ $+ [ $iNetwork ] ] } 
        goto start-away.scan 
      }
    }
  }
  if ($2 == %stats.scan-chan [ $+ [ $iNetwork ] ] ) { 
    if (%stats.scan-dis [ $+ [ $iNetwork ] ] == -c) && ($me ison $2) { 
      if %stats.scan-ircop [ $+ [ $iNetwork ] ] == $null { set %stats.scan-ircop [ $+ [ $iNetwork ] ] 0 }
      if %stats.scan-away [ $+ [ $iNetwork ] ] == $null { set %stats.scan-away [ $+ [ $iNetwork ] ] 0 }
      msg $2 $c(1) $+ Total: $c(2) $+ $nick($2,0,a) $+ $c(1) OPs: $c(2) $+ $nick($2,0,o) $+ $bracket($percent($nick($2,0,o),$nick($2,0,a))) Voiced: $c(2) $+ $nick($2,0,v) $+ $bracket($percent($nick($2,0,v),$nick($2,0,a))) IRCops: $c(2) $+ %stats.scan-ircop [ $+ [ $iNetwork ] ] $+ $bracket($percent(%stats.scan-ircop [ $+ [ $iNetwork ] ] ,$nick($2,0,a))) Away: $c(2) $+ %stats.scan-away [ $+ [ $iNetwork ] ] $+ $bracket($percent(%stats.scan-away [ $+ [ $iNetwork ] ] ,$nick($2,0,a))) $ilogo 
    } 
    else { 
      if %stats.scan-ircop [ $+ [ $iNetwork ] ] == $null { set %stats.scan-ircop [ $+ [ $iNetwork ] ] 0 }
      if %stats.scan-away [ $+ [ $iNetwork ] ] == $null { set %stats.scan-away [ $+ [ $iNetwork ] ] 0 }
      echo -a [315] Total People: $c(2) $+ $nick($2,0,a) $+ $c(1) OPs: $c(2) $+ $nick($2,0,o) $bracket($percent($nick($2,0,o),$nick($2,0,a))) Voiced: $c(2) $+ $nick($2,0,v) $bracket($percent($nick($2,0,v),$nick($2,0,a))) 
      echo -a [315] IRCops: $c(2) $+ %stats.scan-ircop [ $+ [ $iNetwork ] ] $bracket($percent(%stats.scan-ircop [ $+ [ $iNetwork ] ] ,$nick($2,0,a))) Away: $c(2) $+ %stats.scan-away [ $+ [ $iNetwork ] ] $bracket($percent(%stats.scan-away [ $+ [ $iNetwork ] ] ,$nick($2,0,a))) 
    } 
    unset %stats.scan-* 
    halt 
  }
  if %DOwho [ $+ [ $iNetwork ] ] == 1 { 
    secho [315] $3- $bracket($iif(%who [ $+ [ $iNetwork ] ] == $null,0,%who [ $+ [ $iNetwork ] ] ),$iif(%who [ $+ [ $iNetwork ] ] == 1,match,matches)) 
    unset %DOwho [ $+ [ $iNetwork ] ]
  }
  unset %who [ $+ [ $iNetwork ] ]
  halt
}
raw 316:*:{ (if $r.whois($2) == $null) { aecho [316] $2- | halt } | else { halt } }
raw 317:*:{ 
  if ($r.whois($2) == $null) {
    if (%whoisCT [ $+ [ $iNetwork ] ] >= 1) || ($r.set(Invision,isoWhois) == On) {
      aecho [317] Temps d'inactivité: $c(2) $+ $lduration($3) 
      aecho [317] Connecté depuis le $c(2) $+ $asctime($4,dddd) $+ , $asctime($4,mmmm doo) $+ , $asctime($4,yyyy) à $asctime($4,h:nntt) 
      aecho [317] uStat $address($2,5) 
      halt 

    }
    else {
      aecho [317] Temps d'inactivité: $c(2) $+ $lduration($3) 
      aecho [317] Connecté depuis le $c(2) $+ $asctime($4,dddd) $+ , $asctime($4,mmmm doo) $+ , $asctime($4,yyyy) à $asctime($4,h:nntt) 
      aecho [317] uStat $address($2,5) 
      halt 
    }
  }
  else { halt }
}
raw 318:*:{ if $r.whois($2) == $null { if %ialwho [ $+ [ $iNetwork ] ] != 1 {  if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On { icomchan $2 window } | else { icomchan $2 } } | if %whoisCT [ $+ [ $iNetwork ] ] >= 1 { dec %WhoisCT [ $+ [ $iNetwork ] ] 1 } | else { unset %WhoisCT [ $+ [ $iNetwork ] ] } | .timerClrIAL $+ $iNetwork -o 1 30 unset %ialwho [ $+ [ $iNetwork ] ] %whois. [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] | halt } | else { halt } }
raw 319:*:{ 
  if $r.whois($2) == $null {
    if %whoisCT [ $+ [ $iNetwork ] ] >= 1 || $r.set(Invision,isoWhois) == On {
      aecho [319] UserInfo Salons: $c(2) $+ $3- 
      halt 
    }
    else {
      aecho [319] Salons: $c(2) $+ $3- 
      halt 
    }
  }
  else { 
    .ialmark $2 $3-
    .timer -o 1 5 d.whois $2
    ;w.whois $2 $3- 
    halt 
  }
}
raw 320:*:{ aecho [320] Given Host - $c(2) $+ $4- | halt }

;raw 321:*:{ secho [321] Salon et nom des usagers: | halt }
;raw 322:*:{ secho [322] Salon: $2- | halt }
;raw 323:*:{ secho [323] Fin de la liste | halt }

raw 324:*:{ if ($me ison $2) { echo [324] $2 $tag Modes du salon: $c(2) $+ $3- | halt } | else { echo [324] $2 Modes du salon: $c(2) $+ $3- } | halt }
raw 325:*:{ aecho [325] $2- | halt }
raw 326:*:{ aecho [326] $2- | halt }
raw 327:*:{ aecho [327] $2- | halt }
raw 328:*:{ if ($me ison $2) { echo [328] $2 $tag Page Web: $c(2) $+ $3- } | halt }
raw 329:*:{ if ($me ison $2) { echo [329] $2 $tag Crée le $c(2) $+ $asctime($3,dddd) $+ , $asctime($3,mmmm doo) $+ , $asctime($3,yyyy) $c(1) $+ à $c(2) $+ $asctime($3,h:nntt) } | halt }
raw 330:*:{ aecho [330] $2- | halt }
raw 331:*:{ aecho [331] Salon: $2 ,  Aucun Topic mis pour le salon | halt }
raw 332:*:{ if %DOnames [ $+ [ $iNetwork ] ] == 1 { if ($me ison $2) { echo [332] $2 $tag Le Topic est ' $+ $clradj($3-) $+  $+ $c(1) $+ ' } | halt } }
raw 333:*:{ if %DOnames [ $+ [ $iNetwork ] ] == 1 { if ($me ison $2) { echo [333] $2 $tag Mis par $3 le $asctime($4,dddd) $+ , $asctime($4,mmmm doo) $+ , $asctime($4,yyyy) à $asctime($4,h:nntt) } | halt } }
raw 334:*:{ aecho [334] $2- | halt }
raw 335:*:{ aecho [335] $2- | halt }
raw 336:*:{ aecho [336] $2- | halt }
raw 337:*:{ aecho [337] $2- | halt }
raw 338:*:{ aecho [338] $2- | halt }
raw 339:*:{ aecho [339] $2- | halt }
raw 340:*:{ aecho [340] $2- | halt }
raw 341:*:{ aecho [341] Usager $+ $c(2) $2 $+ $c(1) a été invité sur le salon: $+ $c(2) $3 | halt }
raw 342:*:{ aecho [342] Summoning $+ $c(2) $2 $c(1) $+ to IRC | halt }
raw 343:*:{ aecho [343] $2- | halt }
raw 344:*:{ aecho [344] $2- | halt }
raw 345:*:{ aecho [345] $2- | halt }
raw 346:*:{ aecho [346] $2- | halt }
raw 347:*:{ aecho [347] $2- | halt }
raw 348:*:{ aecho [348] $2- | halt }
raw 349:*:{ aecho [349] $2- | halt }
raw 350:*:{ aecho [350] $2- | halt }
raw 351:*:{ aecho [351] Version: $2- | halt }
raw 352:*:{
  if (%usearch-ip [ $+ [ $iNetwork ] ] != $null) { inc %usearch-c [ $+ [ $iNetwork ] ] 1 | set %usearch-u [ $+ [ %usearch-c [ $+ [ $iNetwork ] ] ] ] [ $+ [ $iNetwork ] ] $c(2) $+ %usearch-c [ $+ [ $iNetwork ] ] $+ . $6 $bracket( [ [ $3 ] $+ ] @ [ $+ [ $4 ] ] ) | halt }
  if ($2 == %ircop.scan-chan [ $+ [ $iNetwork ] ] ) { if (* isin $7) { inc %ircop.scan-c [ $+ [ $iNetwork ] ] 1 | set %ircop.scan-u [ $+ [ %ircop.scan-c [ $+ [ $iNetwork ] ] ] ] [ $+ [ $iNetwork ] ] $c(2) $+ %ircop.scan-c [ $+ [ $iNetwork ] ] $+ . $6 $bracket( [ [ $3 ] $+ ] @ [ $+ [ $4 ] ] ) } | halt }
  if ($2 == %away.scan-chan [ $+ [ $iNetwork ] ] ) { if (G isin $7) { inc %away.scan-c [ $+ [ $iNetwork ] ] 1 | set %away.scan-u [ $+ [ %away.scan-c [ $+ [ $iNetwork ] ] ] ] [ $+ [ $iNetwork ] ] $c(2) $+ %away.scan-c [ $+ [ $iNetwork ] ] $+ . $6 $bracket( [ [ $3 ] $+ ] @ [ $+ [ $4 ] ] ) } | halt }
  if ($2 == %stats.scan-chan [ $+ [ $iNetwork ] ] ) { if (G isin $7) { inc %stats.scan-away [ $+ [ $iNetwork ] ] 1 } | if (* isin $7) { inc %stats.scan-ircop [ $+ [ $iNetwork ] ] 1 } | halt }
  if %DOwho [ $+ [ $iNetwork ] ] == 1 { 
    echo -s [352] 10 $+ $6 14«12 $+ $3 $+ @ $+ $4 $+ 14» est sur  $+ $chr(91) $+ 12 $+ $5 $+ 14/12 $+ $8 $+ 14 $+ $chr(93) $+  - Autre:12 $replace($remove($7,@,+),G,Away,H,Here,*, & IRCop,%, & Invisible) 14- Nom:12 $9-
    inc %who [ $+ [ $iNetwork ] ] 1
  }  
  halt
}
raw 353:*:{ if %DOnames [ $+ [ $iNetwork ] ] == 1 { aecho [353] $c(2) $+ Liste des usagers pour: $3 | aecho $4- } | halt }
raw 354:*:{ aecho [354] $2- | halt }
raw 355:*:{ aecho [355] $2- | halt }
raw 356:*:{ aecho [356] $2- | halt }
raw 357:*:{ aecho [357] $2- | halt }
raw 358:*:{ aecho [358] $2- | halt }
raw 359:*:{ aecho [359] $2- | halt }
raw 360:*:{ aecho [360] $2- | halt }
raw 361:*:{ aecho [361] $2- | halt }
raw 362:*:{ aecho [362] $2- | halt }
raw 363:*:{ aecho [363] $2- | halt }
raw 366:*:{
  if %DOnames [ $+ [ $iNetwork ] ] == 1 { 
    if ($me ison $2) {
      echo -a [366] $tag Total usagers: $+ $c(2) $+ $nick($2,0,a) $c(1)  Ops: $+ $c(2) $+ $nick($2,0,o) $c(1)  Voices: $+ $c(2) $+ $nick($2,0,v) 
    }
    unset %DOnames [ $+ [ $iNetwork ] ]
  }
  halt
}
raw 367:*:{ if (%banlist [ $+ [ $iNetwork ] ] == $null) { aecho [367] Liste des bannis du salon $+ $c(2) $+ $2 $+ $c(1) $+ . | set %banlist [ $+ [ $iNetwork ] ] 0 } | inc %banlist [ $+ [ $iNetwork ] ] 1 | aecho [367] %banlist [ $+ [ $iNetwork ] ] $+ . $4 $c(1) $+ bannis $c(2) $+ $3 $c(1) $+ le $c(2) $+ $asctime($5,dddd) $+ , $asctime($5,mmmm doo) $+ , $asctime($5, yyyy) à $asctime($5, h:nntt) $+ $c(1) $+ . | halt }
raw 368:*:{ if (%banlist [ $+ [ $iNetwork ] ] == $null) { aecho [368] Il n'y a pas de bannis sur: $+ $c(2) $+ $2 $+ $c(1) $+ . } | else { aecho [368] Fin de la liste des bannis pour $+ $c(2) $+ $2 $+ $c(1) $+ . } | unset %banlist [ $+ [ $iNetwork ] ] | halt }
raw 369:*:{ unset %whois. [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] | .timer 1 0 icomchan $2 | aecho [369] Fin du Whowas | halt }
raw 370:*:{ aecho [370] $2- | halt }
raw 371:*:{ aecho [371] Infos serveur: $2- | halt }
raw 372:*:{ secho [372] MODT: $3- | halt }
raw 373:*:{ aecho [373] $2- | halt }
raw 374:*:{ aecho [374] Fin de la liste d'infos | halt }
raw 375:*:{ secho [375] Début MODT de  $3 | halt }
raw 376:*:{ secho [376] Fin du MODT | halt }
raw 377:*:{ aecho [377] $2- | halt } 
;raw 378:*:{ aecho [378] $2- | halt }
raw 379:*:{ aecho [379] $2- | halt }

;raw 377:*:{ aecho [377] Real Host: $c(2) $+ $2-3 | aecho Usermodes: $c(2) $+ $7 | halt } 
raw 378:*:{ aecho [378] Hôte décodé: $c(2) $+ $6 | halt }
;raw 379:*:{ aecho [379] Usermodes: $c(2) $+ $6- | halt }

raw 380:*:{ aecho [380] $2- | halt }
raw 381:*:{ if ($r.set(Usermodes,Status) == On) { mode $me $r.set(Usermodes,IRCop) } | aecho [381] Vous êtes maintenant Ircop sur: $+ $c(2) $server | halt }
raw 382:*:{ aecho [382] Info: Rehash du fichier de configuration | halt }
raw 383:*:{ aecho [383] $2- | halt }
raw 384:*:{ aecho [384] $2- | halt }
raw 385:*:{ aecho [385] $2- | halt }
raw 386:*:{ aecho [386] $2- | halt }
raw 387:*:{ aecho [387] $2- | halt }
raw 388:*:{ aecho [388] $2- | halt }
raw 389:*:{ aecho [389] $2- | halt }
raw 390:*:{ aecho [390] $2- | halt }
raw 391:*:{ aecho [391] Info : $2- | halt }
raw 392:*:{ aecho [392] Debut de la liste des usagers du serveur | halt }
raw 393:*:{ aecho [393] Usagers du serveur : $2- | halt }
raw 394:*:{ aecho [394] Fin de la liste des usagers du serveur. | halt }
raw 395:*:{ aecho [395] Aucun usager sur le serveur | halt }
raw 396:*:{ aecho [396] $2- | halt }
raw 397:*:{ aecho [397] $2- | halt }
raw 398:*:{ aecho [398] $2- | halt }
raw 399:*:{ aecho [399] $2- | halt }
raw 400:*:{ aecho Erreur [400]: $2- | halt }
raw 401:*:{ 
  if $isend($2) != $null {
    if $r.glob(Fserve,SmartSend) == On {
      .timerNOSSEND $+ $iNetwork -o 1 15 unset %NOSSend [ $+ [ $iNetwork ] ] 
      set %NoSSend [ $+ [ $iNetwork ] ] 1
    }
    else {
      .timerqjumpstart $+ $iNetwork -o 1 1 queue.send 
    }
    close -s $2 
    halt
  }
  if %jj [ $+ [ $iNetwork ] ] != 1 { aecho Erreur [401]: Le pseudo n'est plus sur le canal $+ : $+ $c(2) $2 } 
  halt 
}
raw 402:*:{ aecho Erreur [402]: $2 n'est pas connecté | halt }
raw 403:*:{ if $uptime(server,3) >= 15 { aecho Erreur [403]:Salon inexistant | halt } }
raw 404:*:{ if ($left($2,1) == $chr(35)) { aecho Erreur [404]: $3- $+ : $+ $c(2) $2 | halt } | else { aecho Erreur [404]: Tu ne peut envoyer de messages dans ce salon !! | halt } }
raw 405:*:{ if (%CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] != 1) { aecho Salon injoignable: $+ $c(2) $2 $c(1) $+ ( $+ $5- $+ ) | set -u600 %CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] 1 | halt } | else { Halt } }
raw 406:*:{ aecho Erreur [406]: Le pseudo $2 est introuvable| halt }
raw 407:*:{ aecho Erreur [407]: Trop de destinataires, le destinataire a plusieurs user@host | halt }
raw 408:*:{ aecho Erreur [408]: $2- | halt }
raw 409:*:{ aecho Erreur [409]: Ping ou pong sans origine | halt }
raw 410:*:{ aecho Erreur [410]: $2- | halt }
raw 411:*:{ aecho Erreur [411]: Pas de destinataire | halt }
raw 412:*:{ aecho Erreur [412]: Pas de texte a envoyer | halt }
raw 413:*:{ aecho Erreur [413]: $3- $+ : $+ $c(2) $2 | halt }
raw 414:*:{ aecho Erreur [414]: $3- $+ : $+ $c(2) $2 | halt }
raw 415:*:{ aecho Erreur [415]: $2- | halt }
raw 416:*:{ aecho Erreur [416]: $2 trop de lignes a transmettre, réduisez vos recherches | halt }
raw 417:*:{ aecho Erreur [417]: $2- | halt }
raw 418:*:{ aecho Erreur [418]: $2- | halt }
raw 419:*:{ aecho Erreur [419]: $2- | halt }
raw 420:*:{ aecho Erreur [420]: $2- | halt }
raw 421:*:{
  if (($left($2,8) == LAGTIME.) && ($gettok($2,2,46) isnum)) {
    set %Lag.Time [ $+ [ $iNetwork ] ] $round($calc(($ticks - $gettok($2,2,46))/1000),3)
    if ($r.glob(TitleBar,Lag) != On) { secho [421] LAG: $c(2) $+ $lduration(%Lag.Time [ $+ [ $iNetwork ] ] ) }
    tbar
  }
  elseif $2 == DCCAllow { halt }
  else { aecho Erreur [421]: Commande inexistante: $2- }
  halt
}
raw 422:*:{ secho Erreur [422]: Le MODT du serveur n'a pu être ouvert | halt }
raw 423:*:{ aecho Erreur [423]: Impossible de trouver l'information | halt }
raw 424:*:{ aecho Erreur [424]: Echec transfert message | halt }
raw 425:*:{ aecho Erreur [425]: $2- | halt }
raw 426:*:{ aecho Erreur [426]: $2- | halt }
raw 427:*:{ aecho Erreur [427]: $2- | halt }
raw 428:*:{ aecho Erreur [428]: $2- | halt }
raw 429:*:{ aecho Erreur [429]: $2- | halt }
raw 430:*:{ aecho Erreur [430]: $2- | halt }
raw 431:*:{ aecho Erreur [431]: Il manque le pseudo pour cette commande | halt }
raw 432:*:{ aecho Erreur [432]:Ce pseudo contient des caractères inaceptables: $+ $c(2) $2 $+ $c(1) ( $+ $5- $+ ) | halt }
raw 433:*:{ 
  if ($r.set(Invision,Autoghost) == On)  { .secho ghost raw 433 | nickghost $mnick }
  if ($r.set(Invision,KeepNick) == On) && ($me != $r.set(Personal.Info,Nick)) && ($2 == %LastNicktried [ $+ [ $iNetwork ] ] ) { 
    .timerLNT $+ $iNetwork 1 18 unset %LastNicktried [ $+ [ $iNetwork ] ]  
    halt 
  } 
  else { 
    aecho Erreur [433]: $3- $+ : $+ $c(2) $2 
    if ($r.set(Invision,KeepNick) == On) { 
      aecho 8ATTENTION: $c(1) $+ Invision va essayer de prendre le pseudo $c(2) $+  $2 $c(1) $+ tant que vous ne le changez pas par /nick <Pseudo_à_utiliser> 
      set %LastNickTried [ $+ [ $iNetwork ] ] $2 
      .timerLNT $+ $iNetwork 1 18 unset %LastNicktried [ $+ [ $iNetwork ] ]  
      halt 
    }
  }
}
raw 434:*:{
  if (($left($2,8) == LAGTIME.) && ($gettok($2,2,46) isnum)) {
    set %Lag.Time [ $+ [ $iNetwork ] ] $round($calc(($ticks - $gettok($2,2,46))/1000),3)
    if ($r.glob(TitleBar,Lag) != On) { secho [434]:LAG: $c(2) $+ $lduration(%Lag.Time [ $+ [ $iNetwork ] ] ) }
    tbar
  }
  else { aecho Erreur [434]: $3- $+ : $+ $c(2) $2 }
  halt
}
raw 435:*:{ aecho Erreur [435]: $2- | halt }

raw 436:*:{ 
  if ($r.set(Invision,Autoghost) == On)  { .secho ghost raw 436 | nickghost $mnick }
  if ($r.set(Invision,KeepNick) == On) && ($me != $r.set(Personal.Info,Nick)) && ($2 == %LastNicktried [ $+ [ $iNetwork ] ] ) { 
    .timerLNT $+ $iNetwork 1 18 unset %LastNicktried [ $+ [ $iNetwork ] ]  
    halt 
  } 
  else { 
    aecho Erreur [433]: $3- $+ : $+ $c(2) $2 
    if ($r.set(Invision,KeepNick) == On) { 
      aecho 8ATTENTION: $c(1) $+ Invision va essayer de prendre le pseudo $c(2) $+  $2 $c(1) $+ tant que vous ne le changez pas par /nick <Pseudo_à_utiliser> 
      set %LastNickTried [ $+ [ $iNetwork ] ] $2 
      .timerLNT $+ $iNetwork 1 18 unset %LastNicktried [ $+ [ $iNetwork ] ]  
      halt 
    }
  }
}
; 437 is for cant change your nick while in a +m chan
raw 437:*:{ if ($r.set(Invision,RegainNick) == On) { NickRegain } | else { aecho Erreur [437]: $3- $+ : $+ $c(2) $2 | halt } }
raw 438:*:{ aecho Erreur [438]: Vous changez de pseudo trop rapidement, SVP attendez $9 secondes | halt }
raw 439:*:{ aecho Erreur [439]: Vous changez de destination trop rapidement, SVP attendez $9 secondes | halt }
raw 440:*:{ aecho Erreur [440]: Services inopérants, reessayez plus tard | halt }
raw 441:*:{ aecho Erreur [441]: $2 n'est pas sur le salon: $+ $c(2) $3 | halt }
raw 442:*:{ aecho Erreur [442]: Impossible, vous n'êtes pas sur le salon $2 | halt }
raw 443:*:{ aecho Erreur [443]: $2 est déjà sur le salon $3 | halt }
raw 444:*:{ aecho Erreur [444]: Pseudo non connecté | halt }
raw 445:*:{ aecho Erreur [445]: commande inactive sur ce serveur (SUMMON désactivé) | halt }
raw 446:*:{ aecho Erreur [446]: commande inactive sur ce serveur (Usagers désactivés) | halt }
raw 447:*:{ aecho Erreur [447]: Changement de nick impossible sur $2 (+N) | halt }
raw 448:*:{ aecho Erreur [448]: $2- | halt }
raw 449:*:{ aecho Erreur [449]: $2- | halt }
raw 450:*:{ aecho Erreur [450]: $2- | halt }
;raw 451:*:{ aecho Erreur [451]: Ce pseudo n'est pas enregistré | halt }
raw 452:*:{ aecho Erreur [452]: $2- | halt }
raw 453:*:{ aecho Erreur [453]: $2- | halt }
raw 454:*:{ aecho Erreur [454]: $2- | halt }
raw 455:*:{ aecho Erreur [455]: $2- | halt }
raw 456:*:{ aecho Erreur [456]: $2- | halt }
raw 457:*:{ aecho Erreur [457]: $2- | halt }
raw 458:*:{ aecho Erreur [458]: $2- | halt }
raw 459:*:{ aecho Erreur [459]: $2- | halt }
raw 460:*:{ aecho Erreur [460]: $2- | halt }
raw 461:*:{ aecho Erreur [461]: Pas assez de paramètres pour cette commande | halt }
raw 462:*:{ aecho Erreur [462]: Déjà enregistré | halt }
raw 463:*:{ aecho Erreur [463]: Host d'IRCop inconnu | halt }
raw 464:*:{ aecho Erreur [464]: Mot de passe erroné | halt }
raw 465:*:{ aecho Erreur [465]: Vous êtes banni de ce serveur | halt }
raw 466:*:{ aecho Erreur [466]: $2- | halt }
raw 467:*:{ aecho Erreur [467]: Clé déjà configurée sur  $+ $c(2) $2 | halt }
raw 468:*:{ aecho Erreur [468]: $3- | halt }
raw 469:*:{ aecho Erreur [469]: $2- | halt }
raw 470:*:{ aecho Erreur [470]: $2- | halt }
raw 471:*:{ if (%CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] != 1) { aecho Erreur [471]: Impossible de rejoindre le salon: $+ $c(2) $2 $c(1) $+ (Il est plein) | set -u600 %CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] 1 | halt } | else { Halt } }
raw 472:*:{ aecho Erreur [472]: Mode du salon $2 inconnu | halt }
raw 473:*:{ if (%CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] != 1) { aecho Erreur [473]: Impossible de rejoindre le salon: $+ $c(2) $2 $c(1) $+ (Sur invitation seulement) | set -u600 %CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] 1 | halt } | else { Halt } }
raw 474:*:{ if (%CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] != 1) { aecho Erreur [474]: Impossible de rejoindre le salon: $+ $c(2) $2 $c(1) $+ (Vous êtes banni) | set -u600 %CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] 1 | halt } | else { Halt } }
raw 475:*:{ if (%CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] != 1) { aecho Erreur [475]: Impossible de rejoindre le salon: $+ $c(2) $2 $c(1) $+ (Clé erronée) | set -u600 %CNJC [ $+ [ $iNetwork ] ] [ $+ [ $2 ] ] 1 | halt } | else { Halt } }
raw 476:*:{ aecho Erreur [476]: $2- | halt }
raw 477:*:{ aecho Erreur [477]: $2- | halt }
raw 478:*:{ aecho Erreur [478]: La liste des Ban/Ignore est pleine | halt }
raw 479:*:{ aecho Erreur [479]: $2- | halt }
raw 480:*:{ aecho Erreur [480]: $2- | halt }
raw 481:*:{ aecho Erreur [481]: Impossible, tu n'est pas IRCop sur $server $+ . | halt }
raw 482:*:{ aecho Erreur [482]: Impossible, tu n'est pas OPS sur $2 | halt }
raw 483:*:{ aecho Erreur [483]: Tu ne peut executer la commande kill sur le serveur | halt }
raw 484:*:{ aecho Erreur [484]: Impossible de kill,kick ou deop cette personne | halt }
raw 485:*:{ aecho Erreur [485]: $2- | halt }
raw 486:*:{ aecho Erreur [486]: $2- | halt }
raw 487:*:{ aecho Erreur [487]: $2- | halt }
raw 488:*:{ aecho Erreur [488]: $2- | halt }
raw 489:*:{ aecho Erreur [489]: $2- | halt }
raw 490:*:{ aecho Erreur [490]: $2- | halt }
raw 491:*:{ aecho Erreur [491]: Impossible tu n'es pas autorisé comme IRCop | halt }
raw 492:*:{ aecho Erreur [492]: $2- | halt }
raw 493:*:{ aecho Erreur [493]: $2- | halt }
raw 494:*:{ aecho Erreur [494]: $2- | halt }
raw 495:*:{ aecho Erreur [495]: $2- | halt }
raw 496:*:{ aecho Erreur [496]: $2- | halt }
raw 497:*:{ aecho Erreur [497]: $2- | halt }
raw 498:*:{ aecho Erreur [498]: $2- | halt }
raw 499:*:{ aecho Erreur [499]: $2- | halt }
raw 500:*:{ aecho Erreur [500]: $2- | halt }
raw 501:*:{ aecho Erreur [501]: Usermode non reconnu | halt }
raw 502:*:{ aecho Erreur [502]: Impossible de changer l'usermode d'une autre personne | halt }
raw 503:*:{ aecho Erreur [503]: $2- | halt }
raw 504:*:{ aecho Erreur [504]: $2- | halt }
raw 505:*:{ aecho Erreur [505]: $2- | halt }
raw 516:*:{ aecho Erreur [516]: Le salon est en mode +x. Impossible de changer de pseudo. | halt }
raw 520:*:{ aecho Erreur [520]: Impossible de rejoindre ce salon.(IRCops seulement.) | halt }
alias i2patch {
  if $firewallchk != $true {
    if (%i2patchfile != $null) && (%i2patchsize != $null) && (%i2patchsite != $null) {
      .timeri2patchsockTO -o 1 60 sockclose i2patchsock
      sockclose i2patchsock | sockopen i2patchsock %i2patchsite 80
    }
    else { var %dummy = $input(Couldnt Download Patch, 68,Patch Failed!) }
  }
  else { var %dum = $input(You cannot use auto patch when behind a firewall,68,Cannot Patch) }
}
on *:sockopen:i2patchsock:{ 
  scriptinfo
  .timeri2patchbar -om 0 500 i2patchbar 
  unset %i2pdl
  ; var %t = http:// $+ %i2PatchSite $+ %i2PatchFile
  sockwrite -n $sockname GET %i2PatchFile HTTP/1.1
  sockwrite -n $sockname Host: %i2PatchSite
  sockwrite -n $sockname Accept: *.*, */*
  sockwrite -n $sockname Connection: Close
  sockwrite -n $sockname $crlf
}
on *:sockread:i2patchsock:{ 
  if ($sockerr) { var %dum = $input(Il y a eu une erreur de téléchargement du fichier patch!,68,Téléchargement du Patch échoué!) }
  :readnext
  if (%i2pdl == $null) {
    var %pdltemp
    sockread %pdltemp
    tokenize 32 %pdltemp
    if (HTTP/* iswm $1 && $2 != 200) { var %dum = $input(Il y a eu une erreur de téléchargement du fichier patch!,68,Téléchargement du Patch échoué!) }
    elseif (!$1) { set %i2pdl 1 }
  }
  else {
    sockread &data
    if &data != $null { bwrite $shortfn($mircdir) $+ patch\i2patch.exe -1 -1 &data }
    ; .timeri2patch -o 1 10 i2patchcheck
    .timeri2patchsockTO -o 1 60 sockclose i2patchsock
  }
  if ($sockbr != 0) { goto readnext }
}
alias i2pinfo {
  if $firewallchk != $true {
    if $1 != Repatch {
      if $input(In order to patch you will be automatically disconnected from any irc server currently connected and mIRC will be closed. The patch installer will be started and you will need to follow the prompts from there. Once patched Invision will need to be manually restarted. Is this ok?,136,Warning!) == $true {
        disconnect
        if $exists( [ $shortfn($mircdir) $+ patch\i2patch.exe ] ) { .remove $shortfn($mircdir) $+ patch\i2patch.exe }
        sockclose i2pinfo | sockopen i2pinfo www.i-n-v-i-s-i-o-n.com 80
        .timeri2pinfoTO -o 1 60 sockclose i2pinfo
      }
    }
    else {
      if $exists( [ $shortfn($mircdir) $+ patch\patch.exe ] ) { .remove $shortfn($mircdir) $+ patch\i2patch.exe }
      sockclose i2pinfo | sockopen i2pinfo www.i-n-v-i-s-i-o-n.com 80
      .timeri2pinfoTO -o 1 60 sockclose i2pinfo
    }
  }
  else { var %dum = $input(You cannot use auto patch when behind a firewall,92,Cannot Patch!) }
}
on *:sockopen:i2pinfo:{
  sockwrite -n $sockname  GET /updates/i2nfo.htm HTTP/1.1 $+ $chr(13) $+ $chr(10) $+ Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */* $+ $chr(13) $+ $chr(10) $+ Accept-Language: en-ca $+ $chr(13) $+ $chr(10) $+ Accept-Encoding: gzip, deflate $+ $chr(13) $+ $chr(10) $+ User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) $+ $chr(13) $+ $chr(10) $+ Host: www.i-n-v-i-s-i-o-n.com $+ $chr(13) $+ $chr(10) $+ $chr(13) $+ $chr(10)
}
on *:sockread:i2pinfo:{
  if ($sockerr > 0) { aecho Sock Error while checking for Patch File Info | return }
  unset %i2patchSize %i2patchFile %i2patchversion %i2patchsite %i2PatchCRC
  :nextread
  sockread %temp
  if (%temp == $null) { %temp = - }
  if <p>PATCH isin %temp { 
    var %clipstr = $left($right(%temp,-3),-4)
    var %PatchCT = $calc(($numtok(%clipstr,32) - 1) / 5)
    var %ct = 2
    var %pct = 1
    var %pnum = 1
    while (%pct <= %PatchCT) {
      set %i2Patch [ $+ [ %pnum ] ] $gettok(%clipstr,%ct,32) $gettok(%clipstr,$calc(%ct + 1),32) $gettok(%clipstr,$calc(%ct + 2),32) $gettok(%clipstr,$calc(%ct + 3),32) $gettok(%clipstr,$calc(%ct + 4),32)
      inc %pnum 1
      inc %ct 5 
      inc %pct 1 
    }
    var %ct = 1
    while (%ct <= %PatchCT) {
      if $r.glob(Invision,LastUpdate) < $gettok(%i2Patch [ $+ [ %ct ] ] ,3,32) {
        set %i2PatchFile $gettok(%i2Patch [ $+ [ %ct ] ] ,1,32)
        set %i2PatchSize $gettok(%i2Patch [ $+ [ %ct ] ] ,2,32)
        set %i2PatchVersion $gettok(%i2Patch [ $+ [ %ct ] ] ,3,32)
        set %i2PatchSite $gettok(%i2Patch [ $+ [ %ct ] ] ,4,32)
        set %i2PatchCRC $gettok(%i2Patch [ $+ [ %ct ] ] ,5,32)
        w.glob Invision PatchUpdate $gettok(%i2Patch [ $+ [ %ct ] ] ,3,32)
        if %ct >= %PatchCT { set %i2PatchDone YES } 
        break
      }
      inc %ct 1 
    }
    .timer -o 1 1 sockclose $sockname
    if (%i2PatchFile != $null) && (%i2PatchSize != $null) && {%i2patchsite != $null) {
      .timer -o 1 2 i2patch 
    }
    else { var %dum = $input(You have the most recent version,68,No New Patches) | .timer 1 0 sockclose i2pinfo } 
  }
  ; else { secho ::: %temp }
  .timeri2pinfosafety -o 1 30 sockclose $sockname
  if ($sockbr == 0) return
  .timeri2pinfoTO -o 1 60 sockclose i2pinfo
  goto nextread
}
alias i2patchbar {
  var %perc = $calc(($file($shortfn($mircdirpatch\i2patch.exe)).size / %i2patchsize) * 100)
  if $file($shortfn($mircdirpatch\i2patch.exe)).size >= %i2patchsize { 
    var %perc = 100 
    ibar 100 
    window -c @Invision 
    .timer -o 1 0 sockclose i2patchsock 
    .timeri2patchbar off 
    sockclose i2p*
    if ($crc($shortfn($mircdirpatch\i2patch.exe)) == %i2PatchCRC) {
      .run -n $shortfn($mircdirpatch\i2patch.exe) 
      w.glob Invision LastUpdate $r.glob(Invision,PatchUpdate)
      unset %i2patchfile %i2patchsize %i2patchversion
      if %i2PatchDone == YES { unset %i2PatchDone }
      exit
    }
    else { var %dum = $input(The patch was downloaded but showed corruption and therefor will not be applied. Please try again.,68,Patch Corrupted) }
  }
  ibar %perc
}
on *:sockopen:icounter:{
  if ($sockerr == 0) { 
    if $date != $r.glob(Invision,CThit) {
      sockwrite -n $sockname GET /fastcounter?2606180+5212367 
      w.glob Invision CThit $date
    }
    elseif $r.glob(Invision,AutoUpdate) == On { 
      set %inewsflag 0 
      .timer -o 1 50 sockclose iversion 
      .timer -o 1 2 sockclose iversion $chr(124) sockopen iversion www.i-n-v-i-s-i-o-n.com 80 
    }
    .timer -o 1 0 sockclose $sockname
  } 
}
on *:sockread:icounter:{ if ($sockerr == 0) { if $r.glob(Invision,AutoUpdate) == On { set %inewsflag 0 | .timer -o 1 50 sockclose iversion | .timer -o 1 2 sockclose iversion $chr(124) sockopen iversion www.i-n-v-i-s-i-o-n.com 80 } | :start | sockread &~counter | if ($sockbr > 0) { goto start } } }
on *:mp3end:{ unset %mp3resume | if %mp3dirplay == 1 { mp3dirplay } }
on *:KEYDOWN:@Help:*:window -c @Help
on *:sockopen:iversion:{ if ($sockerr == 0) { set %newstog 0 | sockwrite -n $sockname GET /updates/inews7.htm HTTP/1.1 $+ $chr(13) $+ $chr(10) $+ Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */* $+ $chr(13) $+ $chr(10) $+ Accept-Language: en-ca $+ $chr(13) $+ $chr(10) $+ Accept-Encoding: gzip, deflate $+ $chr(13) $+ $chr(10) $+ User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) $+ $chr(13) $+ $chr(10) $+ Host: www.i-n-v-i-s-i-o-n.com $+ $chr(13) $+ $chr(10) $+ $chr(13) $+ $chr(10) } }
on *:sockopen:inews:{ if ($sockerr == 0) { set %newstog 0 | sockwrite -n $sockname GET /updates/iver7.htm HTTP/1.1 $+ $chr(13) $+ $chr(10) $+ Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */* $+ $chr(13) $+ $chr(10) $+ Accept-Language: en-ca $+ $chr(13) $+ $chr(10) $+ Accept-Encoding: gzip, deflate $+ $chr(13) $+ $chr(10) $+ User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) $+ $chr(13) $+ $chr(10) $+ Host: www.i-n-v-i-s-i-o-n.com $+ $chr(13) $+ $chr(10) $+ $chr(13) $+ $chr(10) } }
on *:sockread:iversion:{
  if ($sockerr > 0) { aecho Sock Error while checking for Updates | return }
  :nextread
  sockread %temp
  if (%temp == $null) { %temp = - }
  if <p>NEWS isin %temp { 
    var %clipstr = $left($right(%temp,-3),-4)
    var %newsdate = $gettok(%clipstr,2,32)
    if %newsdate > $r.glob(Invision,LastNews) {
      set %inewsflag 1
      inews $gettok(%clipstr,3-,32)
      w.glob Invision LastNews $gettok(%clipstr,2,32)
    } 
    .timer -o 1 1 sockclose inews $chr(124) sockopen inews www.i-n-v-i-s-i-o-n.com 80 
    .timer -o 1 1 sockclose $sockname
  }
  elseif <p> isin %temp && %inewsflag == 1 { 
    var %clipstr = $left($right(%temp,-3),-4)
    inews %clipstr
  }
  if ($sockbr == 0) return
  goto nextread
}
on *:sockread:inews:{
  if ($sockerr > 0) { aecho Sock Error while checking for Updates | return }
  :nextread
  sockread %temp
  if (%temp == $null) { %temp = - }
  if <p>VERSION isin %temp { 
    var %clipstr = $left($right(%temp,-3),-4)
    var %versiondate = $gettok(%clipstr,2,32)
    if %versiondate > $r.glob(Invision,LastUpdate) {
      w.glob Invision PatchUpdate $gettok(%clipstr,2,32)
      .timerkdlg -o 1 30 $chr(123) if $chr(36) $+ dialog(updatedlg) != $chr(36) $+ null $chr(123) dialog -x updatedlg $chr(125) $chr(125)
      .timer -o 1 0 dopen updatedlg updatedlg
    }
    else { Aecho 04You are running the most recent version of Invision 2.0 } 
    .timer -o 1 10 sockclose $sockname
  }
  if ($sockbr == 0) return
  goto nextread
}
dialog updatedlg {
  title "Update Version?"
  size -1 -1 100 35
  option dbu

  text "There is an updated version of Invision 2.0 available for download. Do you wish to update now?", 1, 3 3 94 22, center
  button "No",100, 51 25 20 9, cancel
  button "Yes", 200, 29 25 20 9, ok
}
on *:Dialog:updatedlg:sclick:200:{
  i2pinfo
}
