begin process at 2010 02 09 18:26:02
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > RECORD D'AUDIANCE

RECORD D'AUDIANCE


 Information sur la source

Note :
9 / 10 - par 4 personnes
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Niveau :Débutant Date de création :27/02/2005 Date de mise à jour :14/04/2005 22:44:19 Vu :10 892

Auteur : World_mIRC

Ecrire un message privé
Site perso
Commentaire sur cette source (17)
Ajouter un commentaire et/ou une note

 Description

un petit add-on pour enregistrer les records d'users sur vos salons IRC.
j'ai fait une petite recherche et j'en trouvé que 2 sur le site, donc bon
j'ai essayé d'en faire un en prenant en compte les critiques deja existante.
http://www.ircfr.com/code.aspx?ID=2214 3 <--  juki_webmaster
http://www.ircfr.com/code.aspx?ID= 29620 <-- greg13127

Source

  • ON 1:LOAD:World_mIRC.PuB
  • ON 1:UNLOAD:World_mIRC.PuB
  • menu menubar,channel {
  • -
  • <@> Record User <@>:/dialog -m Record_table Record_table
  • -
  • }
  • dialog Record_table {
  • title "<@> Système de record <@>"
  • size -1 -1 185 170
  • option dbu
  • box "Ajouter salon", 1, 5 5 175 35
  • text "Veuillez préciser le nom de salon à surveiller (sans oublier le #)", 2, 10 15 165 8
  • edit "", 3, 10 25 60 10
  • combo 4, 115 25 60 80, size drop
  • button "Valider", 5, 75 25 35 10, flat
  • box "Liste des Salons sous surveillance", 6, 5 45 175 105
  • text "", 7, 10 55 80 8, center
  • list 8, 10 65 80 40, sort size vsbar
  • button "Supprimer le salon", 9, 10 110 80 12, flat
  • radio "Actif", 10, 108 53 30 8, group
  • radio "Inactif", 11, 140 53 30 8
  • text "Actuellement", 12, 100 64 40 8
  • edit "", 13, 140 63 35 10, read center
  • text "Record Users", 14, 100 75 40 8
  • edit "", 15, 140 74 35 10, read center
  • text "Record Date", 16, 100 86 40 8
  • edit "", 17, 140 85 35 10, read center
  • text "Record Heure", 18, 100 97 40 8
  • edit "", 19, 140 96 35 10, read center
  • button "RAZ", 20, 100 110 75 12, flat
  • check "Désactiver les annonces des nouveaux record on-line", 21, 10 125 165 10
  • check "Désactiver les commandes !record - !nombre - !count", 22, 10 135 165 10
  • button "Fermer", 23, 5 155 175 12, default flat ok
  • }
  • on *:dialog:Record_table:*:*:{
  • if ($devent == sclick) {
  • if ($did == 5) {
  • if (($did(Record_table,3).text) && ((!$did(4).seltext) || ($did(4).seltext == Autre Salon ...))) {
  • if ($left($did(Record_table,3).text,1) != $chr(0035)) { if ($input(Vous devez mettre un $chr(0035) devant le nom du salon (case de gauche),308,Warning)) { halt } }
  • else { var %ac = $did(Record_table,3).text }
  • }
  • elseif ((!$did(Record_table,3).text) && ($did(4).seltext) && ($did(4).seltext != Autre Salon ...)) { var %ac = $did(4).seltext }
  • else { if ($input(Pour enregistrer un salon vous devez soit taper son nom (avec le $chr(0035) $+ ) dans la case de gauche - ou alors - le choisir parmi ceux de la liste de droite (mais pas les 2),308,Warning)) { halt } }
  • if (!$istok($readini(Record.ini,CHANNEL,Liste),%ac,32)) {
  • if ($me ison %ac) {
  • writeini -n Record.ini CHANNEL Liste $readini(Record.ini,CHANNEL,Liste) %ac
  • writeini -n Record.ini %ac Etat ON
  • writeini -n Record.ini %ac RecordUser $nick(%ac,0)
  • writeini -n Record.ini %ac RecordDate $date
  • writeini -n Record.ini %ac RecordHeure $time
  • writeini -n Record.ini %ac Annonce ON
  • writeini -n Record.ini %ac Commande ON
  • did -u Record_table 10,11 | did -r Record_table 13,15,17,19 | chan.load
  • var %ru = $readini Record.ini %ac RecordUser, %rd = $readini Record.ini %ac RecordDate, %rh = $readini Record.ini %ac RecordHeure
  • echo -a 7[RECORD] 4» 2Record actuel sur6 %ac :4 %ru Users2 le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ]
  • }
  • else {
  • writeini -n Record.ini CHANNEL Liste $readini(Record.ini,CHANNEL,Liste) %ac
  • writeini -n Record.ini %ac Etat ON
  • writeini -n Record.ini %ac RecordUser 0
  • writeini -n Record.ini %ac RecordDate 00/00/0000
  • writeini -n Record.ini %ac RecordHeure 00:00:00
  • writeini -n Record.ini %ac Annonce ON
  • writeini -n Record.ini %ac Commande ON
  • did -u Record_table 10,11 | did -r Record_table 13,15,17,19 | chan.load
  • }
  • }
  • else { if ($input(Le salon %ac est déjà enregistré dans la liste,308,Warning)) { halt } }
  • }
  • if ($did(8).seltext) {
  • did -e Record_table 9,10,11,20,21,22
  • if ($readini(Record.ini,$did(8).seltext,Etat) == ON) { did -c Record_table 10 | did -u Record_table 11 } | else { did -c Record_table 11 | did -u Record_table 10 }
  • if ($me ison $did(8).seltext) { did -o Record_table 13 1 $nick($did(8).seltext,0) } | else { did -o Record_table 13 1 ... }
  • did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser)
  • did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate)
  • did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
  • if ($readini(Record.ini,$did(8).seltext,Annonce) == ON) { did -u Record_table 21 } | else { did -c Record_table 21 }
  • if ($readini(Record.ini,$did(8).seltext,Commande) == ON) { did -u Record_table 22 } | else { did -c Record_table 22 }
  • }
  • if ($did == 9) {
  • remini Record.ini $did(8).seltext
  • var %lc = $readini Record.ini CHANNEL Liste, %lc2 = $deltok(%lc,$findtok(%lc,$did(8).seltext,1,32),32)
  • if (%lc2) { writeini -n Record.ini CHANNEL Liste %lc2 } | else { remini Record.ini CHANNEL }
  • did -d Record_table 8 $did(8).sel | did -u Record_table 10,11,21,22 | did -r Record_table 13,15,17,19 | did -b Record_table 9,10,11,20,21,22
  • did -o Record_table 7 1 Nombre total de Chan :: $did(8).lines
  • }
  • if ($did == 10) { writeini -n Record.ini $did(8).seltext Etat ON | did -c Record_table 10 | did -u Record_table 11 | set %Record.Chan $did(8).seltext | .record.view }
  • if ($did == 11) { writeini -n Record.ini $did(8).seltext Etat OFF | did -c Record_table 11 | did -u Record_table 10 }
  • if ($did == 20) {
  • writeini -n Record.ini $did(8).seltext RecordUser 0
  • writeini -n Record.ini $did(8).seltext RecordDate 00/00/0000
  • writeini -n Record.ini $did(8).seltext RecordHeure 00:00:00
  • did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser)
  • did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate)
  • did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
  • }
  • if ($did == 21) {
  • if ($readini(Record.ini,$did(8).seltext,Annonce) == ON) { writeini -n Record.ini $did(8).seltext Annonce OFF | did -c Record_table 21 }
  • else { writeini -n Record.ini $did(8).seltext Annonce ON | did -u Record_table 21 }
  • }
  • if ($did == 22) {
  • if ($readini(Record.ini,$did(8).seltext,Commande) == ON) { writeini -n Record.ini $did(8).seltext Commande OFF | did -c Record_table 22 }
  • else { writeini -n Record.ini $did(8).seltext Commande ON | did -u Record_table 22 }
  • }
  • }
  • if ($devent == init) { if ($did == 0) { did -b Record_table 9,10,11,20,21,22 | chan.load | chan.liste } }
  • }
  • ON *:JOIN:*:{
  • if (($istok($readini(Record.ini,CHANNEL,Liste),$chan,32)) && ($readini(Record.ini,$chan,Etat) == ON)) {
  • if ($nick == $me) { set %Record.Chan $chan | /timer1 1 3 .record.view }
  • else {
  • if ($nick($chan,0) > $readini(Record.ini,$chan,RecordUser)) {
  • writeini -n Record.ini $chan RecordUser $nick($chan,0)
  • writeini -n Record.ini $chan RecordDate $date
  • writeini -n Record.ini $chan RecordHeure $time
  • if ($dialog(Record_table)) {
  • did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser)
  • did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate)
  • did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
  • }
  • if ($readini(Record.ini,$chan,Annonce) == ON) {
  • var %ru = $readini Record.ini $chan RecordUser, %rd = $readini Record.ini $chan RecordDate, %rh = $readini Record.ini $chan RecordHeure
  • msg $chan 7[RECORD] 4» 2Nouveau record sur6 $chan 2avec4 %ru Users2, le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ]
  • }
  • }
  • }
  • }
  • }
  • ON *:TEXT:*:*:{
  • if (($istok($readini(Record.ini,CHANNEL,Liste),$chan,32)) && ($readini(Record.ini,$chan,Commande) == ON)) {
  • if ($1 == !record) {
  • var %ru = $readini Record.ini $chan RecordUser, %rd = $readini Record.ini $chan RecordDate, %rh = $readini Record.ini $chan RecordHeure
  • msg $chan 2le record d'audiance sur6 $chan 2est de4 %ru Users2 depuis le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ]
  • }
  • if ($1 == !nombre) { msg $chan 2il y a actuellement4 $nick(#,0) Users2 sur le salon }
  • if ($1 == !count) { msg $chan 2je surveille actuellement4 $gettok($readini(Record.ini,CHANNEL,Liste),0,32) chan(s) }
  • }
  • }
  • alias -l chan.load {
  • var %n = 1, %l = 0, %c = $gettok($readini(Record.ini,CHANNEL,Liste),1,32)
  • while (%c) { inc %l 1 | did -o Record_table 8 %l %c | inc %n 1 | var %c = $gettok($readini(Record.ini,CHANNEL,Liste),%n,32) }
  • did -o Record_table 7 1 Nombre total de Chan :: $did(8).lines | return
  • }
  • alias -l chan.liste {
  • var %l = 1, %c = $chan(%l) | did -o Record_table 4 1 Autre Salon ...
  • while (%c) { inc %l 1 | did -o Record_table 4 %l %c | var %c = $chan(%l) }
  • return
  • }
  • alias -l record.view {
  • if ($nick(%Record.Chan,0) > $readini(Record.ini,%Record.Chan,RecordUser)) {
  • writeini -n Record.ini %Record.Chan RecordUser $nick(%Record.Chan,0)
  • writeini -n Record.ini %Record.Chan RecordDate $date
  • writeini -n Record.ini %Record.Chan RecordHeure $time
  • did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser)
  • did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate)
  • did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
  • if ($readini(Record.ini,%Record.Chan,Annonce) == ON) {
  • var %ru = $readini Record.ini %Record.Chan RecordUser, %rd = $readini Record.ini %Record.Chan RecordDate, %rh = $readini Record.ini %Record.Chan RecordHeure
  • msg %Record.Chan 7[RECORD] 4» 2Nouveau record d'audiance sur6 %Record.Chan avec4 %ru Users2, le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ]
  • }
  • unset %Record.Chan
  • }
  • }
  • alias -l World_mIRC.PuB {
  • echo -a 12(¯`'·.(¯`'·. _______________ .·'¯).·'¯)
  • echo -a 4» 3Add-on Record User pour IRC 12- © - By Folken
  • echo -a 4» 7Auteur 3:: Folken
  • echo -a 4» 10Site 3:: http://www.pub-line.com/world.mirc/
  • echo -a 12 (_.·'(_.·' ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ `'·._)`'·._)
  • }
ON 1:LOAD:World_mIRC.PuB
ON 1:UNLOAD:World_mIRC.PuB

menu menubar,channel { 
  -
  <@> Record User <@>:/dialog -m Record_table Record_table 
  -
}

dialog Record_table {
  title "<@> Système de record <@>"
  size -1 -1 185 170
  option dbu
  box "Ajouter salon", 1, 5 5 175 35
  text "Veuillez préciser le nom de salon à surveiller (sans oublier le #)", 2, 10 15 165 8
  edit "", 3, 10 25 60 10
  combo 4, 115 25 60 80, size drop
  button "Valider", 5, 75 25 35 10, flat
  box "Liste des Salons sous surveillance", 6, 5 45 175 105
  text "", 7, 10 55 80 8, center
  list 8, 10 65 80 40, sort size vsbar
  button "Supprimer le salon", 9, 10 110 80 12, flat
  radio "Actif", 10, 108 53 30 8, group
  radio "Inactif", 11, 140 53 30 8
  text "Actuellement", 12, 100 64 40 8
  edit "", 13, 140 63 35 10, read center
  text "Record Users", 14, 100 75 40 8
  edit "", 15, 140 74 35 10, read center
  text "Record Date", 16, 100 86 40 8
  edit "", 17, 140 85 35 10, read center
  text "Record Heure", 18, 100 97 40 8
  edit "", 19, 140 96 35 10, read center
  button "RAZ", 20, 100 110 75 12, flat
  check "Désactiver les annonces des nouveaux record on-line", 21, 10 125 165 10
  check "Désactiver les commandes !record - !nombre - !count", 22, 10 135 165 10
  button "Fermer", 23, 5 155 175 12, default flat ok
}

on *:dialog:Record_table:*:*:{
  if ($devent == sclick) { 
    if ($did == 5) {
      if (($did(Record_table,3).text) && ((!$did(4).seltext) || ($did(4).seltext == Autre Salon ...))) {
        if ($left($did(Record_table,3).text,1) != $chr(0035)) { if ($input(Vous devez mettre un $chr(0035) devant le nom du salon (case de gauche),308,Warning)) { halt } }
        else { var %ac = $did(Record_table,3).text }
      }
      elseif ((!$did(Record_table,3).text) && ($did(4).seltext) && ($did(4).seltext != Autre Salon ...)) { var %ac = $did(4).seltext } 
      else { if ($input(Pour enregistrer un salon vous devez soit taper son nom (avec le $chr(0035) $+ ) dans la case de gauche - ou alors - le choisir parmi ceux de la liste de droite (mais pas les 2),308,Warning)) { halt } } 
      if (!$istok($readini(Record.ini,CHANNEL,Liste),%ac,32)) {
        if ($me ison %ac) {
          writeini -n Record.ini CHANNEL Liste $readini(Record.ini,CHANNEL,Liste) %ac 
          writeini -n Record.ini %ac Etat ON 
          writeini -n Record.ini %ac RecordUser $nick(%ac,0)
          writeini -n Record.ini %ac RecordDate $date 
          writeini -n Record.ini %ac RecordHeure $time
          writeini -n Record.ini %ac Annonce ON
          writeini -n Record.ini %ac Commande ON
          did -u Record_table 10,11 | did -r Record_table 13,15,17,19 | chan.load
          var %ru = $readini Record.ini %ac RecordUser, %rd = $readini Record.ini %ac RecordDate, %rh = $readini Record.ini %ac RecordHeure
          echo -a 7[RECORD] 4» 2Record actuel sur6 %ac :4 %ru Users2 le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ]
        }
        else {
          writeini -n Record.ini CHANNEL Liste $readini(Record.ini,CHANNEL,Liste) %ac 
          writeini -n Record.ini %ac Etat ON 
          writeini -n Record.ini %ac RecordUser 0
          writeini -n Record.ini %ac RecordDate 00/00/0000 
          writeini -n Record.ini %ac RecordHeure 00:00:00
          writeini -n Record.ini %ac Annonce ON
          writeini -n Record.ini %ac Commande ON
          did -u Record_table 10,11 | did -r Record_table 13,15,17,19 | chan.load
        } 
      }
      else { if ($input(Le salon %ac est déjà enregistré dans la liste,308,Warning)) { halt } }
    }
    if ($did(8).seltext) {
      did -e Record_table 9,10,11,20,21,22
      if ($readini(Record.ini,$did(8).seltext,Etat) == ON) { did -c Record_table 10 | did -u Record_table 11 } | else { did -c Record_table 11 | did -u Record_table 10 }
      if ($me ison $did(8).seltext) { did -o Record_table 13 1 $nick($did(8).seltext,0) } | else { did -o Record_table 13 1 ... }
      did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser) 
      did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate) 
      did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
      if ($readini(Record.ini,$did(8).seltext,Annonce) == ON) { did -u Record_table 21 } | else { did -c Record_table 21 }
      if ($readini(Record.ini,$did(8).seltext,Commande) == ON) { did -u Record_table 22 } | else { did -c Record_table 22 }
    }
    if ($did == 9) {
      remini Record.ini $did(8).seltext
      var %lc = $readini Record.ini CHANNEL Liste, %lc2 = $deltok(%lc,$findtok(%lc,$did(8).seltext,1,32),32)
      if (%lc2) { writeini -n Record.ini CHANNEL Liste %lc2 } | else { remini Record.ini CHANNEL }
      did -d Record_table 8 $did(8).sel | did -u Record_table 10,11,21,22 | did -r Record_table 13,15,17,19 | did -b Record_table 9,10,11,20,21,22
      did -o Record_table 7 1 Nombre total de Chan :: $did(8).lines 
    }
    if ($did == 10) { writeini -n Record.ini $did(8).seltext Etat ON | did -c Record_table 10 | did -u Record_table 11 | set %Record.Chan $did(8).seltext | .record.view }
    if ($did == 11) { writeini -n Record.ini $did(8).seltext Etat OFF | did -c Record_table 11 | did -u Record_table 10 }
    if ($did == 20) { 
      writeini -n Record.ini $did(8).seltext RecordUser 0 
      writeini -n Record.ini $did(8).seltext RecordDate 00/00/0000 
      writeini -n Record.ini $did(8).seltext RecordHeure 00:00:00 
      did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser) 
      did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate) 
      did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
    }
    if ($did == 21) { 
      if ($readini(Record.ini,$did(8).seltext,Annonce) == ON) { writeini -n Record.ini $did(8).seltext Annonce OFF | did -c Record_table 21 }
      else { writeini -n Record.ini $did(8).seltext Annonce ON | did -u Record_table 21 }
    }
    if ($did == 22) { 
      if ($readini(Record.ini,$did(8).seltext,Commande) == ON) { writeini -n Record.ini $did(8).seltext Commande OFF | did -c Record_table 22 }
      else { writeini -n Record.ini $did(8).seltext Commande ON | did -u Record_table 22 }
    }
  }
  if ($devent == init) { if ($did == 0) { did -b Record_table 9,10,11,20,21,22 | chan.load | chan.liste } }
}

ON *:JOIN:*:{ 
  if (($istok($readini(Record.ini,CHANNEL,Liste),$chan,32)) && ($readini(Record.ini,$chan,Etat) == ON)) {
    if ($nick == $me) { set %Record.Chan $chan | /timer1 1 3 .record.view }
    else { 
      if ($nick($chan,0) > $readini(Record.ini,$chan,RecordUser)) {
        writeini -n Record.ini $chan RecordUser $nick($chan,0) 
        writeini -n Record.ini $chan RecordDate $date 
        writeini -n Record.ini $chan RecordHeure $time
        if ($dialog(Record_table)) {
          did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser) 
          did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate) 
          did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
        }     
        if ($readini(Record.ini,$chan,Annonce) == ON) {
          var %ru = $readini Record.ini $chan RecordUser, %rd = $readini Record.ini $chan RecordDate, %rh = $readini Record.ini $chan RecordHeure
          msg $chan 7[RECORD] 4» 2Nouveau record sur6 $chan 2avec4 %ru Users2, le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ] 
        }
      }
    }
  }
}

ON *:TEXT:*:*:{ 
  if (($istok($readini(Record.ini,CHANNEL,Liste),$chan,32)) && ($readini(Record.ini,$chan,Commande) == ON)) {
    if ($1 == !record) { 
      var %ru = $readini Record.ini $chan RecordUser, %rd = $readini Record.ini $chan RecordDate, %rh = $readini Record.ini $chan RecordHeure
      msg $chan 2le record d'audiance sur6 $chan 2est de4 %ru Users2 depuis le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ] 
    }
    if ($1 == !nombre) { msg $chan 2il y a actuellement4 $nick(#,0) Users2 sur le salon }
    if ($1 == !count) { msg $chan 2je surveille actuellement4 $gettok($readini(Record.ini,CHANNEL,Liste),0,32) chan(s) } 
  }
}

alias -l chan.load {
  var %n = 1, %l = 0, %c = $gettok($readini(Record.ini,CHANNEL,Liste),1,32) 
  while (%c) { inc %l 1 | did -o Record_table 8 %l %c | inc %n 1 | var %c = $gettok($readini(Record.ini,CHANNEL,Liste),%n,32) }
  did -o Record_table 7 1 Nombre total de Chan :: $did(8).lines | return
}

alias -l chan.liste { 
  var %l = 1, %c = $chan(%l) | did -o Record_table 4 1 Autre Salon ...
  while (%c) { inc %l 1 | did -o Record_table 4 %l %c | var %c = $chan(%l) }
  return
}

alias -l record.view {
  if ($nick(%Record.Chan,0) > $readini(Record.ini,%Record.Chan,RecordUser)) {
    writeini -n Record.ini %Record.Chan RecordUser $nick(%Record.Chan,0) 
    writeini -n Record.ini %Record.Chan RecordDate $date 
    writeini -n Record.ini %Record.Chan RecordHeure $time 
    did -o Record_table 15 1 $readini(Record.ini,$did(8).seltext,RecordUser) 
    did -o Record_table 17 1 $readini(Record.ini,$did(8).seltext,RecordDate) 
    did -o Record_table 19 1 $readini(Record.ini,$did(8).seltext,RecordHeure)
    if ($readini(Record.ini,%Record.Chan,Annonce) == ON) {
      var %ru = $readini Record.ini %Record.Chan RecordUser, %rd = $readini Record.ini %Record.Chan RecordDate, %rh = $readini Record.ini %Record.Chan RecordHeure
      msg %Record.Chan 7[RECORD] 4» 2Nouveau record d'audiance sur6 %Record.Chan avec4 %ru Users2, le [12 $+ %rd $+ ]2 à [10 $+ %rh $+ ] 
    }
    unset %Record.Chan
  }
}

alias -l World_mIRC.PuB {
  echo -a 12(¯`'·.(¯`'·. _______________ .·'¯).·'¯)
  echo -a 4» 3Add-on Record User pour IRC 12- © - By Folken
  echo -a 4» 7Auteur 3:: Folken
  echo -a 4» 10Site 3:: http://www.pub-line.com/world.mirc/
  echo -a 12 (_.·'(_.·' ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ `'·._)`'·._)
}

 Conclusion

Je sais : j'ai bidouillé a fond les radio et check.
-> mais sinon fallait clicker dessus 2 fois pour que sa affiche vraiment le resultat.

Toutes les infos sont stockées dans un fichier .ini --> aucune variable encombrante !

walaaa, a vous de juger :)


 Historique

28 février 2005 19:23:33 :
- j'ai enlevé tous les "." devant les "did" - j'ai mis des whiles au lieu des goto - correction d'un petit bug
28 février 2005 19:26:15 :
LLoooLL j'avais mal c/c la nouvelle source :p
14 avril 2005 22:44:20 :
carrection de la ligne 121 !

 Sources du même auteur

REGISTER INFORMATIONS
HOROSCOPE POUR BOT

 Sources de la même categorie

BLACKLIST PSEUDOS/MASKS par usurpateur
Source avec une capture [XCHAT] ANTI KICK / AWAY C++ par GeroXXXX
JEU DU CODE par alanpersonproject
SERVEUR FTP par hisoka2501
BANNIR LES AGES, LES HOMMES, LES FEMMES ET PSEUDO AVEC CHIFF... par cougar_du_havre

Commentaires et avis

Commentaire de KiNdErMaXi le 27/02/2005 23:02:17

en effet, déja vu
mais on peux configurer plusieurs salons ce qui est plutot interressant
.did <= interet du "." ???.
sinon je n'ai rien remarquer de spécial
a part que tu pourrai utiliser les while au lieu des goto, ce qui donnerai :
alias -l chan.load {
var %a 1
while (%a <= blabla) {
/commande
inc %a
}
}

Commentaire de World_mIRC le 27/02/2005 23:09:46

oui les . c'est un petit defaut :p
juste pke je trouve ça plus jolie ... lol

pi les while j'en suis pas trop fan dsl ^^

Commentaire de MaX_62 le 28/02/2005 17:39:40

tu as beau ne pas en etre fan, c'est incontestablement la meilleure solution. Lis un tuto si vraiment ça coince, mais fais le, c'est essentiel.

Commentaire de World_mIRC le 28/02/2005 19:29:14

voila j'ai mis des while puisque vous vous êtes tous ligué contres les goto :p
=> sa a gagné 5 lignes.

j'ai enlevé aussi les "." devant les "did"

Commentaire de MaX_62 le 28/02/2005 20:31:26

c'est pas le nombre de ligne qui compte, seulement, ton script sera traité plus vite désormais ;)

Commentaire de World_mIRC le 28/02/2005 22:34:49

oui mais sa allé kan même deja vite héhé
bon en tous cas c'est modifié :)
Merci de vos conseils \o/

si vous voyez d'autre modifications a faire,
n'hesitez pas a me faire signe ;)

a tiens je me suis posé une question existentielle ...
ça fait une diference si je met :
did -o dialog id 1 $readini(fichier.ini,section,item)
ou bien :
did -o dialog id 1 $readini fichier.ini section item
???

Commentaire de popelechat le 05/03/2005 23:17:34

Moi je suis trés satisfait, bravo.
J'ai noté à 9/10

Cdt, MorTiiS

Commentaire de Philou150456 le 11/04/2005 18:40:33

* Invalid parameters: $did (line 115, record.mrc)

Commentaire de Philou150456 le 11/04/2005 19:15:26

A part ca ta source est excellente : 9/10

Commentaire de World_mIRC le 12/04/2005 19:03:34

haaa une erreurrrr ???
t' as fait quoi pour la recevoir ??????

surtout que la ligne 115 ne contient pas de $did Ô_o
=>     if ($nick == $me) { set %Record.Chan $chan | /timer1 1 3 .record.view }


( merci pour les compliements, je vous en pris continuez :p )

Commentaire de TdKAnAthoRn le 14/04/2005 20:42:18

slt
dsl mais moi aussi j'ai une erreur
==> * Invalid parameters: $did (line 121, infoschan.mrc)
/pour infos
"infoschan.mrc" c le nom ke g donné à ta source (g faux? erf)

Commentaire de World_mIRC le 14/04/2005 21:20:11

houlala ....
j'ai refais des tests j' ai ancune erreur.

T' as bien laissé le fichier "Record.ini" dans le dossier racine de mIRC ???

Sinon t' as eu cette erreur en faisant quoi de spéciale ?

(le nom du mrc n' y est pour rien)

Commentaire de popelechat le 14/04/2005 21:22:46

Moi aucune erreur sur 6.16

Commentaire de World_mIRC le 14/04/2005 22:46:24

ça yé ça devrait aller pour la ligne 121 :)

=> * Invalid parameters: $did (line 121, infoschan.mrc)

Commentaire de besky le 12/06/2005 01:11:33

je voudrais juste savoir ou est ce qu'on met le nom du ou des salon à surveiller svp lol je sait c'est pathetique mais bon on commence tous un jour lol merci d'avance

Commentaire de World_mIRC le 12/06/2005 14:48:21

lol c'est tout simple.

Quand tu ouvres ton dialog, tu verras en haut un cadre "ajouter salon"

Tu peux soit remplir la case de gauche avec le nom d'un salon,
ou bien choisir dans la liste de droite le salon ou tu es connecté.

Ensuite tu click sur "valider"

Commentaire de freenaute le 11/03/2008 14:25:24

Salut !
meme si ton code date (2005) ...je viens de le dl et je t'en remercie.
alors si tu passes encore sur le forum ...Thx !
il fonctionne très bien.
voilà !
:)

 Ajouter un commentaire




Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,686 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales