Xdcc download manager

Soyez le premier à donner votre avis sur cette source.

Vue 17 622 fois - Téléchargée 7 463 fois

Description

Mon script permet de :
- Mettre en memoire des Xdcc

D utilisé des fonctions tels que :
- Ouvrir le repertoire de download et modifier le chemin d acces
- deplacer les download vers des dossier pour les fanatique du rangement ^^ (par l intermédiaire d un .bat) et de le modifier
- De gérer les Xdcc en memoire tel que pouvoir lister, rechercher, information d un pack, activer le send + queue, lancer des plage de packs, modifier la plage de pack, et supprimer le Xdcc.
- Supprimer tout les Xdcc, d 'eteindre le pc a la fin des download en cours soit avec le programme interne shutdown.exe ou le programme switchoff et de modifier son repertoire d acces.
- De resume ou mettre en pause un Xdcc

Les download sont automatiquement repris, des options sont présent pour pouvoir le permettre ou non selon son choix.

Il y a aussi un simple menu qui permet de :
- telecharger un pack, de rechercher, d annuler, de lister, de stopper le listing, et d obtenir les infos d un pack sans mettre en memoire le Xdcc.

Dans le menu status, vous pouvrez joindre les serveurs et les chans des xdcc en memoires dans le cas ou vous les auriez oublié ;)

---

Pour une premiere utilisation, relancer votre irc puis faite une fois la suppression de tout les Bots dans le menu "Lancer les Telechargement -> Suppression de tous les bots" pour assigner les variables.

ainsi que de choisir les repertoire de download, de switch off, et de mettre sur on ou off la reprise des la connection, le deplacement de fichier et l utilisation de shutdown ou switch off.

Source / Exemple :


menu channel {
-
Mon Répértoire De Download
.- Ouvrir => %defautrep: /run explorer %defautrep
.Modifier: /modifrep
.- Deplacer Les Fichiers reçu - %repdeplace
..On: /set %repdeplace On
..Off: /set %repdeplace Off
.Modifier: /deplacements
Lancer Les Téléchargements
.Bot n°01 - %dcc1 [-ON-] %chan1 [-PACK-] %deb1 ON %fin1
..Lister le bot: /set %listerbot 1 | /listingbot
..Rechercher: /set %rechbot 1 | /findbot
..Info du pack: /set %infopack 1 | /infopackbot
..Send + Queue - %sendqueuedcc1
...On: /set %compteur-sq 1 | /set %sendqueuedcc1 On | /testsqdcc
...Off: /set %compteur-sq 1 | /set %sendqueuedcc1 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 1 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 101 | /set %modifpackbot 1 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 1 | /set %compteur-timeur-resetvar 101 | /resetvar
.Bot n°02 - %dcc2 [-ON-] %chan2 [-PACK-] %deb2 ON %fin2
..Lister le bot: /set %listerbot 2 | /listingbot
..Rechercher: /set %rechbot 2 | /findbot
..Info du pack: /set %infopack 2 | /infopackbot
..Send + Queue - %sendqueuedcc2
...On: /set %compteur-sq 2 | /set %sendqueuedcc2 On | /testsqdcc
...Off: /set %compteur-sq 2 | /set %sendqueuedcc2 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 2 |  /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 102 | /set %modifpackbot 2 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 2 | /set %compteur-timeur-resetvar 102 | /resetvar
.Bot n°03 - %dcc3 [-ON-] %chan3 [-PACK-] %deb3 ON %fin3
..Lister le bot: /set %listerbot 3 | /listingbot
..Rechercher: /set %rechbot 3 | /findbot
..Info du pack: /set %infopack 3 | /infopackbot
..Send + Queue - %sendqueuedcc3
...On: /set %compteur-sq 3 | /set %sendqueuedcc3 On | /testsqdcc
...Off: /set %compteur-sq 3 | /set %sendqueuedcc3 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 3 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 103 | /set %modifpackbot 3 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 3 | /set %compteur-timeur-resetvar 103 | /resetvar
.Bot n°04 - %dcc4 [-ON-] %chan4 [-PACK-] %deb4 ON %fin4
..Lister le bot: /set %listerbot 4 | /listingbot
..Rechercher: /set %rechbot 4 | /findbot
..Info du pack: /set %infopack 4 | /infopackbot
..Send + Queue - %sendqueuedcc4
...On: /set %compteur-sq 4 | /set %sendqueuedcc4 On | /testsqdcc
...Off: /set %compteur-sq 4 | /set %sendqueuedcc4 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 4 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 104 | /set %modifpackbot 4 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 4 | /set %compteur-timeur-resetvar 104 | /resetvar
.Bot n°05 - %dcc5 [-ON-] %chan5 [-PACK-] %deb5 ON %fin5
..Lister le bot: /set %listerbot 5 | /listingbot
..Rechercher: /set %rechbot 5 | /findbot
..Info du pack: /set %infopack 5 | /infopackbot
..Send + Queue - %sendqueuedcc5
...On: /set %compteur-sq 5 | /set %sendqueuedcc5 On | /testsqdcc
...Off: /set %compteur-sq 5 | /set %sendqueuedcc5 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 5 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 105 | /set %modifpackbot 5 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 5 | /set %compteur-timeur-resetvar 105 | /resetvar
.Bot n°06 - %dcc6 [-ON-] %chan6 [-PACK-] %deb6 ON %fin6
..Lister le bot: /set %listerbot 6 | /listingbot
..Rechercher: /set %rechbot 6 | /findbot
..Info du pack: /set %infopack 6 | /infopackbot
..Send + Queue - %sendqueuedcc6
...On: /set %compteur-sq 6 | /set %sendqueuedcc6 On | /testsqdcc
...Off: /set %compteur-sq 6 | /set %sendqueuedcc6 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 6 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 106 | /set %modifpackbot 6 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 6 | /set %compteur-timeur-resetvar 106 | /resetvar
.Bot n°07 - %dcc7 [-ON-] %chan7 [-PACK-] %deb7 ON %fin7
..Lister le bot: /set %listerbot 7 | /listingbot
..Rechercher: /set %rechbot 7 | /findbot
..Info du pack: /set %infopack 7 | /infopackbot
..Send + Queue - %sendqueuedcc7
...On: /set %compteur-sq 7 | /set %sendqueuedcc7 On | /testsqdcc
...Off: /set %compteur-sq 7 | /set %sendqueuedcc7 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 7 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 107 | /set %modifpackbot 7 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 7 | /set %compteur-timeur-resetvar 107 | /resetvar
.Bot n°08 - %dcc8 [-ON-] %chan8 [-PACK-] %deb8 ON %fin8
..Lister le bot: /set %listerbot 8 | /listingbot
..Rechercher: /set %rechbot 8 | /findbot
..Info du pack: /set %infopack 8 | /infopackbot
..Send + Queue - %sendqueuedcc8
...On: /set %compteur-sq 8 | /set %sendqueuedcc8 On | /testsqdcc
...Off: /set %compteur-sq 8 | /set %sendqueuedcc8 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 8 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 108 | /set %modifpackbot 8 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 8 | /set %compteur-timeur-resetvar 108 | /resetvar
.Bot n°09 - %dcc9 [-ON-] %chan9 [-PACK-] %deb9 ON %fin9
..Lister le bot: /set %listerbot 9 | /listingbot
..Rechercher: /set %rechbot 9 | /findbot
..Info du pack: /set %infopack 9 | /infopackbot
..Send + Queue - %sendqueuedcc1
...On: /set %compteur-sq 9 | /set %sendqueuedcc9 On | /testsqdcc
...Off: /set %compteur-sq 9 | /set %sendqueuedcc9 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 9 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 109 | /set %modifpackbot 9 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 9 | /set %compteur-timeur-resetvar 109 | /resetvar
.Bot n°10 - %dcc10 [-ON-] %chan10 [-PACK-] %deb10 ON %fin10
..Lister le bot: /set %listerbot 10 | /listingbot
..Rechercher: /set %rechbot 10 | /findbot
..Info du packs: /set %infopack 10 | /infopackbot
..Send + Queue - %sendqueuedcc10
...On: /set %compteur-sq 10 | /set %sendqueuedcc10 On | /testsqdcc
...Off: /set %compteur-sq 10 | /set %sendqueuedcc10 Off | /testsqdcc
..--------------------
..Lancer les packs: /set %compteur-download 10 | /dlxdcc
..Modifer les packs: /set %timeur-modifpackbot 110 | /set %modifpackbot 10 | /modifpack
..Supprimer le bot: /set %compteur-resetvar 10 | /set %compteur-timeur-resetvar 110 | /resetvar
.-----------------------------------------------------------
.Supprimer Tout Les Bots: /resetall
.Eteindre Le PC A La Fin - %pcoff
..On: /set %pcoff On
..Off: /set %pcoff Off | /run shutdown -a | /set %toutfermer 0
.Utiliser L'application - %displayPG
..Switch Off: /set %displayPG Switch Off
..Shutdown: /set %displayPG Shutdown
..Modifier
...-> %defautrepshutdown: /modifrepshutdown
Resumer Les Téléchargements
.Bot n°01 On %etatdcc1 - %dcc1 [-ON-] %chan1 [-PACK-] %deb1 TO %fin1
..Pause %etatpause1: /set %compteur-pause 1 | /set %offresume1 Off | /menudel
..Resume %etatresume1: /set %compteur-resumedown 1 | /set %offresume1 On | /resumedl
.Bot n°02 On %etatdcc2 - %dcc2 [-ON-] %chan2 [-PACK-] %deb2 TO %fin2
..Pause %etatpause2: /set %compteur-pause 2 | /set %offresume2 Off | /menudel
..Resume %etatresume2: /set %compteur-resumedown 2 | /set %offresume2 On | /resumedl
.Bot n°03 On %etatdcc3 - %dcc3 [-ON-] %chan3 [-PACK-] %deb3 TO %fin3
..Pause %etatpause3: /set %compteur-pause 3 | /set %offresume3 Off | /menudel
..Resume %etatresume3: /set %compteur-resumedown 3 | /set %offresume3 On | /resumedl
.Bot n°04 On %etatdcc4 - %dcc4 [-ON-] %chan4 [-PACK-] %deb4 TO %fin4
..Pause %etatpause4: /set %compteur-pause 4 | /set %offresume4 Off | /menudel
..Resume %etatresume4: /set %compteur-resumedown 4 | /set %offresume4 On | /resumedl
.Bot n°05 On %etatdcc5 - %dcc5 [-ON-] %chan5 [-PACK-] %deb5 TO %fin5
..Pause %etatpause5: /set %compteur-pause 5 | /set %offresume5 Off | /menudel
..Resume %etatresume5: /set %compteur-resumedown 5 | /set %offresume5 On | /resumedl
.Bot n°06 On %etatdcc6 - %dcc6 [-ON-] %chan6 [-PACK-] %deb6 TO %fin6
..Pause %etatpause6: /set %compteur-pause 6 | /set %offresume6 Off | /menudel
..Resume %etatresume6: /set %compteur-resumedown 6 | /set %offresume6 On | /resumedl
.Bot n°07 On %etatdcc7 - %dcc7 [-ON-] %chan7 [-PACK-] %deb7 TO %fin7
..Pause %etatpause7: /set %compteur-pause 7 | /set %offresume7 Off | /menudel
..Resume %etatresume7: /set %compteur-resumedown 7 | /set %offresume7 On | /resumedl
.Bot n°08 On %etatdcc8 - %dcc8 [-ON-] %chan8 [-PACK-] %deb8 TO %fin8
..Pause %etatpause8: /set %compteur-pause 8 | /set %offresume8 Off | /menudel
..Resume %etatresume8: /set %compteur-resumedown 8 | /set %offresume8 On | /resumedl
.Bot n°09 On %etatdcc9 - %dcc9 [-ON-] %chan9 [-PACK-] %deb9 TO %fin9
..Pause %etatpause9: /set %compteur-pause 9 | /set %offresume9 Off | /menudel
..Resume %etatresume9: /set %compteur-resumedown 9 | /set %offresume9 On | /resumedl
.Bot n°10 On %etatdcc10 - %dcc10 [-ON-] %chan10 [-PACK-] %deb10 TO %fin10
..Pause %etatpause10: /set %compteur-pause 10 | /set %offresume10 Off | /menudel
..Resume %etatresume10: /set %compteur-resumedown 10 | /set %offresume10 On | /resumedl
.---------------------------------------------------------------------
.Reprendre Les Téléchargements Dès La Connection - %reprise
..On : /set %reprise On
..Off: /set %reprise Off
-
Joindre un chan:/join #$$?="Enter a channel to join:"
Joindre un serveur: /joinserveur
-
}

menu nicklist {
-
Mettre En Mémoire Le Bot
.Bot n°01 - %dcc1: /set %compteur-membot 1 | /set %dcc1 $$1 | /testvide
.Bot n°02 - %dcc2: /set %compteur-membot 2 | /set %dcc2 $$1 | /testvide
.Bot n°03 - %dcc3: /set %compteur-membot 3 | /set %dcc3 $$1 | /testvide
.Bot n°04 - %dcc4: /set %compteur-membot 4 | /set %dcc4 $$1 | /testvide
.Bot n°05 - %dcc5: /set %compteur-membot 5 | /set %dcc5 $$1 | /testvide
.Bot n°06 - %dcc6: /set %compteur-membot 6 | /set %dcc6 $$1 | /testvide
.Bot n°07 - %dcc7: /set %compteur-membot 7 | /set %dcc7 $$1 | /testvide
.Bot n°08 - %dcc8: /set %compteur-membot 8 | /set %dcc8 $$1 | /testvide
.Bot n°09 - %dcc9: /set %compteur-membot 9 | /set %dcc9 $$1 | /testvide
.Bot n°10 - %dcc10: /set %compteur-membot 10 | /set %dcc10 $$1 | /testvide
-
Menu Téléchargement
.Rechercher: /msg $$1 xdcc search $?="Terme de la recherche ?"
.Télécharger: /msg $$1 xdcc send $?="N° du pack ?"
.Annuler: /msg $$1 xdcc remove
.--------------
.Lister: /msg $$1 xdcc list
.Stoper: /msg $$1 xdcc stop
.Info pack: /msg $$1 xdcc info $?="Numero du pack ?"
Envoyer Fichier
.DCC Send:/dcc send $$1
.DCC Chat:/dcc chat $$1
Rechercher sur les Xdcc: /set %cesdcc $$1 | set %surcechan $chan | /demande
Lister des Xdcc: /set %cesdcc $$1 | set %surcechan $chan | /demandelist
-
}

menu status {
-
S'enregistrer: /regserveur
S'identifier: /identserveur
Modifier les options d'enregistrement
.Le nick ->[ %nickorigine ]: /modifregserveurnick
.Le mot de passe: /modifregserveurmotdepasse
.L'email ->[ %emailserv ]: /modifregserveuremail
Ajouter Nick au Groupe: /groupserv
-
Reprendre Les Téléchargements Des Bots
.Se connecter aux serveurs: /connect4dl
-
Lister Les Chans: /list
-
}

on 1:start:startinivar

;--------------------------
;initialisation de variable
;--------------------------

alias startinivar {
  set %compteurserveur 0
  set %toutfermer 0
  set %pcoff Off
  set %compteur-start 1
  while (%compteur-start <= 10) {
    set %sendqueuedcc [ $+ [ %compteur-start ] ] Off
    set %onetimesqdccon [ $+ [ %compteur-start ] ] 1
    unset %conexistserveur [ $+ [ %compteur-start ] ]
    inc %compteur-start
  }
}

;------------------------------------------------------------------
;REM: Script de Gros leecheur. Leech des packs sur 10 bots possible
;------------------------------------------------------------------
;A) Lors d'un fichier recu.
;--------------------------

on 1:FILERCVD:*.*: {
  set %compteurxdcc 1
  while (%compteurxdcc <= 10) {
    if ($nick == %dcc [ $+ [ %compteurxdcc ] ]) {
      echo 4 -----------------------------------------------------------
      echo 4 Transert réussi par $nick dans $filename  
      echo 4 -----------------------------------------------------------
      close -g %dcc [ $+ [ %compteurxdcc ] ]
      if (%offresume [ $+ [ %compteurxdcc ] ] != Off) {
        if (%deb [ $+ [ %compteurxdcc ] ] == %fin [ $+ [ %compteurxdcc ] ]) {
          set %deb [ $+ [ %compteurxdcc ] ] Vide
          set %dcc [ $+ [ %compteurxdcc ] ] Vide 
          set %chan [ $+ [ %compteurxdcc ] ] Vide
          set %fin [ $+ [ %compteurxdcc ] ] Vide
          set %server [ $+ [ %compteurxdcc ] ] Vide
          set %etatdcc [ $+ [ %compteurxdcc ] ] Vide
          set %etatpause [ $+ [ %compteurxdcc ] ] Vide
          set %etatresume [ $+ [ %compteurxdcc ] ] Vide
          if (%pcoff == On) {
            winoff
          }
        }
        elseif (%deb [ $+ [ %compteurxdcc ] ] <= %fin [ $+ [ %compteurxdcc ] ]) {
          if (%sendqueuedcc [ $+ [ %compteurxdcc ] ] == Off) {
            inc %deb [ $+ [ %compteurxdcc ] ]
            msg %dcc [ $+ [ %compteurxdcc ] ] xdcc send %deb [ $+ [ %compteurxdcc ] ]
          }
        }
      }
      else {
        set %etatdcc [ $+ [ %compteurxdcc ] ] Pause
        set %etatpause [ $+ [ %compteurxdcc ] ] On
        set %etatresume [ $+ [ %compteurxdcc ] ] Off
        inc %deb [ $+ [ %compteurxdcc ] ]
      }
      break 
    }
    inc %compteurxdcc
  }
  if (%repdeplace == On) {
    run -p %defautrep $+ [ \deplace.bat ]
  }
}

;---------------------------------------------------------------------------
;B)Redemande le dernier pack en train d'etre dl quand le bot rejoint le chan
;---------------------------------------------------------------------------

on 1:JOIN:#: {
  set %compteur-redemander 1
  while (%compteur-redemander <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-redemander ] ]) {
      if (%etatdcc [ $+ [ %compteur-redemander ] ] == Resume) {
        set %offresume [ $+ [ %compteur-redemander ] ] On
        set %etatdcc [ $+ [ %compteur-redemander ] ] Resume
        set %etatpause [ $+ [ %compteur-redemander ] ] Off
        set %etatresume [ $+ [ %compteur-redemander ] ] On
        timer 1 30 msg %dcc [ $+ [ %compteur-redemander ] ] xdcc send %deb [ $+ [ %compteur-redemander ] ]
        msg $me Le Bot n° [ $+ [ %compteur-redemander ] ] - %dcc [ $+ [ %compteur-redemander ] ] à rejoint le chan %chan [ $+ [ %compteur-redemander ] ] du serveur %server [ $+ [ %compteur-redemander ] ]
      }
      break
    }
    elseif ($nick == $me) {
      if (%dcc [ $+ [ %compteur-redemander ] ] != Vide) {
        if ($chan == %chan [ $+ [ %compteur-redemander ] ]) {
          if (%reprise == On) {          
            set %offresume [ $+ [ %compteur-redemander ] ] On
            set %etatdcc [ $+ [ %compteur-redemander ] ] Resume
            set %etatpause [ $+ [ %compteur-redemander ] ] Off
            set %etatresume [ $+ [ %compteur-redemander ] ] On
            timer 1 30 msg %dcc [ $+ [ %compteur-redemander ] ] xdcc send %deb [ $+ [ %compteur-redemander ] ]            
          }
        }
      }
      break
    }
    inc %compteur-redemander
  }
}

;----------------------------------------------
;C)Redmande le pack au bot si le dl s'est coupé 
;----------------------------------------------

on 1:GETFAIL:*.*: {
  set %compteur-getfail 1
  set %compteur-timeur-getfail 101
  while (%compteur-getfail <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-getfail ] ]) {
      if (%etatdcc [ $+ [ %compteur-getfail ] ] == Resume) {  
        set %etatdcc [ $+ [ %compteur-getfail ] ] Resume
        set %offresume [ $+ [ %compteur-getfail ] ] On
        set %etatpause [ $+ [ %compteur-getfail ] ] Off
        set %etatresume [ $+ [ %compteur-getfail ] ] On
        timer [ $+ [ %compteur-timeur-getfail ] ] 0 60 msg %dcc [ $+ [ %compteur-getfail ] ] xdcc send %deb [ $+ [ %compteur-getfail ] ]
      }
      break
    }
    inc %compteur-getfail
    inc %compteur-timeur-getfail
  }
}

;-----------------------------------------
;D)Stop les timeurs si le download reprend
;-----------------------------------------

on 1:NOTICE:*Sending you*:*: {
  set %compteur-sending 1
  set %compteur-timeur-sending 101
  while (%compteur-sending <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-sending ] ]) {
      timer [ $+ [ %compteur-timeur-sending ] ] off
      if (%sendqueuedcc [ $+ [ %compteur-sending ] ] == On) {
        if (%deb [ $+ [ %compteur-sending ] ] != %fin [ $+ [ %compteur-sending ] ]) {
          inc %deb [ $+ [ %compteur-sending ] ]
          msg %dcc [ $+ [ %compteur-sending ] ] xdcc send %deb [ $+ [ %compteur-sending ] ]
        }
      }
      break
    }
    inc %compteur-sending
    inc %compteur-timeur-sending
  }
}

on 1:NOTICE:*Added you to the main queue*:*: {
  set %compteur-added 1
  set %compteur-timeur-added 101
  while (%compteur-added <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-added ] ]) {
      timer [ $+ [ %compteur-timeur-added ] ] off
      break
    }
    inc %compteur-added
    inc %compteur-timeur-added
  }
}

;-------------------
;E)Redemande le pack
;-------------------

on 1:NOTICE:*Connection Lost*:*: {
  set %compteur-connection 1
  set %compteur-timeur-connection 101
  while (%compteur-connection <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-connection ] ]) {
      if (%etatdcc [ $+ [ %compteur-connection ] ] == Resume) {
        timer [ $+ [ %compteur-timeur-connection ] ] 0 60 msg %dcc [ $+ [ %compteur-connection ] ] xdcc send %deb [ $+ [ %compteur-connection ] ]
      }
      break
    }
    inc %compteur-connection
    inc %compteur-timeur-connection
  }
}

on 1:NOTICE:*Try Again Later*:*: {
  set %compteur-try 1
  set %compteur-timeur-try 101
  while (%compteur-try <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-try ] ]) {
      timer [ $+ [ %compteur-timeur-try ] ] 0 60 msg %dcc [ $+ [ %compteur-try ] ] xdcc send %deb [ $+ [ %compteur-try ] ]
      break
    }
    inc %compteur-try
    inc %compteur-timeur-try
  }
}

on 1:NOTICE:*Under Min Speed*:*: {
  set %compteur-under 1
  set %compteur-timeur-under 101
  while (%compteur-under <= 10) {
    if ($nick == %dcc1) {
      timer [ $+ [ %compteur-timeur-under ] ] 0 60 msg %dcc [ $+ [ %compteur-under ] ] xdcc send %deb [ $+ [ %compteur-under ] ]
      break
    }
    inc %compteur-under
    inc %compteur-timeur-under
  }
}

on 1:NOTICE:*You have a DCC pending*:*: {
  set %compteur-pending 1
  set %compteur-timeur-pending 101
  while (%compteur-pending <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-pending ] ]) {
      timer [ $+ [ %compteur-timeur-pending ] ] 0 180 msg %dcc [ $+ [ %compteur-pending ] ] xdcc send %deb [ $+ [ %compteur-pending ] ]
      break
    }
    inc %compteur-pending
    inc %compteur-timeur-pending
  }
}

on 1:NOTICE:*The Owner Has Requested*:*: {
  if ($nick == %dcclist) {
    :next
    dec %nbruser  
    set %datauser $left($nick(%surcechan,%nbruser),%nbrecaract)
    if (%datauser == %datadcc) {
      msg $nick(%surcechan,%nbruser) xdcc list
      set %dcclist $nick(%surcechan,%nbruser)    
    }
    elseif (%nbruser == 1) {
      unset %dcclist
      goto fin
    }
    else {
      goto next
    }
    :fin
  }
  set %compteur-owner 1
  set %compteur-timeur-owner 101
  while (%compteur-owner <= 10) {
    if ($nick == %dcc [ $+ [ %compteur-owner ] ]) {
      timer [ $+ [ %compteur-timeur-owner ] ] 0 180 msg %dcc [ $+ [ %compteur-owner ] ] xdcc send %deb [ $+ [ %compteur-owner ] ]
      break
    }
    inc %compteur-owner
    inc %compteur-timeur-owner
  }
}

;---------------------------------------------------------------------------
;F)Se connecter aux serveurs et aux chans pour reprendre les téléchargements
;---------------------------------------------------------------------------

on 1:CONNECT: {
  autoperform
  if (%conexistserveur1 == $null) {
    set %conexistserveur1 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur2 == $null) {
    set %conexistserveur2 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur3 == $null) {
    set %conexistserveur3 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur4 == $null) {
    set %conexistserveur4 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur5 == $null) {
    set %conexistserveur5 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur6 == $null) {
    set %conexistserveur6 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur7 == $null) {
    set %conexistserveur7 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur8 == $null) {
    set %conexistserveur8 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur9 == $null) {
    set %conexistserveur9 $server
    inc %compteurserveur
  }
  elseif (%conexistserveur10 == $null) {
    set %conexistserveur10 $server
    inc %compteurserveur
  }
  if (%reprendre == on) {
    set %compteur-con 1
    while (%compteur-con <= 10) {
      if (%server [ $+ [ %compteur-con ] ] != Vide) {
        if ($server != %server [ $+ [ %compteur-con ] ]) {
          if (%existserver [ $+ [ %compteur-con ] ] == Off) {
            server -m %server [ $+ [ %compteur-con ] ]
          }
        }
        else {
          join %chan [ $+ [ %compteur-con ] ]
        }    
      }
      inc %compteur-con
    }
  }
}

;--------------------------------------------------------------------------
;G)Verifier si tout les serveurs en cours sont disconnecter pour fermer irc
;--------------------------------------------------------------------------

on 1:PING: {
  if (%toutfermer == 1) {
    quit
  }
}

on 1:disconnect: {
  set %compteur-disco 1
  while (%compteur-disco <= 10) {
    if ($server == %conexistserveur [ $+ [ %compteur-disco ] ]) {
      unset %conexistserveur [ $+ [ %compteur-disco ] ]
      dec %compteurserveur
      break
    }
    inc %compteur-disco
  }
  if (%toutfermer == 1) {
    if (%compteurserveur == 0) {
      exit
    }
    else if (%compteurserveur == 1) {
      if (%displayPG != Shutdown) {
        run %defautrepshutdown      
      }
      else {
        run shutdown -s -f -t 180 -c "Pour arreter, cliquer sur Off dans le menu d irc (Eteindre le PC) ou tapez shutdown -a dans Démarer -> Executer"
      }
    }
  }
}

;---------------------------------------------------------------------------------
;H)Variables Alias Pour menu popups sur View Channel pour lancer le telechargement
;---------------------------------------------------------------------------------

alias dlxdcc {
  if ($chan == %chan [ $+ [ %compteur-download ] ]) {
    if (%dcc [ $+ [ %compteur-download ] ] == Vide) {
      echo 4 -----------------------------------------------------------
      echo 4 Choisi d'abort un bot dans le menu [Mettre en memoire le bot] en fesant clique droit souris sur le nom du bot ;)   
      echo 4 ----------------------------------------------------------- 
    }
    elseif (%deb [ $+ [ %compteur-download ] ] == Vide) {
      set %deb [ $+ [ %compteur-download ] ] $?="Télécharger du pack ?"
      set %fin [ $+ [ %compteur-download ] ] $?="Au pack ? (mettez le meme numéro pour dl 1 fichier)"
      if (%deb [ $+ [ %compteur-download ] ] > %fin [ $+ [ %compteur-download ] ]) {
        echo 4 -----------------------------------------------------------
        echo 4 Le numéro pour la fin du pack ( %fin [ $+ [ %compteur-download ] ] ) ne peut pas être plus petit que le début du pack ( %deb [ $+ [ %compteur-download ] ] )
        echo 4 -----------------------------------------------------------
        set %deb [ $+ [ %compteur-download ] ] Vide
        set %fin [ $+ [ %compteur-download ] ] Vide
      }
      else {
        set %olddcc [ $+ [ %compteur-download ] ] %dcc [ $+ [ %compteur-download ] ]
        set %etatdcc [ $+ [ %compteur-download ] ] Resume
        set %etatpause [ $+ [ %compteur-download ] ] Off
        set %etatresume [ $+ [ %compteur-download ] ] On
        set %offresume [ $+ [ %compteur-download ] ] On
        msg %dcc [ $+ [ %compteur-download ] ] xdcc send %deb [ $+ [ %compteur-download ] ]
      }
    }
    else {
      echo 4 -----------------------------------------------------------
      echo 4 Le Bot n° [ $+ [ %compteur-download ] ] - %dcc [ $+ [ %compteur-download ] ] est en cour d'utilisation, si vous souhaitez l'arrêté, Utilisé le menu (Supprimer dans la liste, le Bot n°)
      echo 4 -----------------------------------------------------------
    }
  }
  else {
    echo 4 -----------------------------------------------------------
    echo 4 Vous devez lancez le téléchargement à partir du chan %chan [ $+ [ %compteur-download ] ]
    echo 4 -----------------------------------------------------------
  }
}

;--------------------------------------------------------------------------------------------------------------
;I)Variables Alias pour menu popups sur View Channel pour remettre soit un bot choisi sur vide ou tous les bots
;--------------------------------------------------------------------------------------------------------------

alias resetvar {
  if (%dcc [ $+ [ %compteur-resetvar ] ] != Vide) {
    if (%deb [ $+ [ %compteur-resetvar ] ] != Vide) {
      echo 4 -----------------------------------------------------------
      echo 4 Voulez vous stopper le téléchargement en cour du Bot n° [ $+ [ %compteur-resetvar ] ] - %dcc [ $+ [ %compteur-resetvar ] ] ?
      echo 4 -----------------------------------------------------------
      set %stopdl $?="Stopper le téléchargement en cour du Bot n° [ $+ [ %compteur-resetvar ] ] - %dcc [ $+ [ %compteur-resetvar ] ] ? (o/n) ?:"
      if (%stopdl == n) {
        echo 4 -----------------------------------------------------------
        echo 4 Le téléchargement continuera maître vénéré ^-^
        echo 4 -----------------------------------------------------------
      }
      elseif (%stopdl == o) {
        close -g %dcc [ $+ [ %compteur-resetvar ] ]
        echo 4 -----------------------------------------------------------
        echo 4 Le Bot n° [ $+ [ %compteur-resetvar ] ] - %dcc [ $+ [ %compteur-resetvar ] ] a été stopper et mis sur Vide
        echo 4 -----------------------------------------------------------
        msg %dcc [ $+ [ %compteur-resetvar ] ] xdcc remove
        set %deb [ $+ [ %compteur-resetvar ] ] Vide 
        set %fin [ $+ [ %compteur-resetvar ] ] Vide 
        set %dcc [ $+ [ %compteur-resetvar ] ] Vide 
        set %chan [ $+ [ %compteur-resetvar ] ] Vide
        set %server [ $+ [ %compteur-resetvar ] ] Vide
        set %etatdcc [ $+ [ %compteur-resetvar ] ] Vide
        set %etatpause [ $+ [ %compteur-resetvar ] ] Vide
        set %etatresume [ $+ [ %compteur-resetvar ] ] Vide
        timer [ $+ [ %compteur-timeur-resetvar ] ] off
      }
    }
    else {
      set %deb [ $+ [ %compteur-resetvar ] ] Vide 
      set %fin [ $+ [ %compteur-resetvar ] ] Vide 
      set %dcc [ $+ [ %compteur-resetvar ] ] Vide 
      set %chan [ $+ [ %compteur-resetvar ] ] Vide
      set %server [ $+ [ %compteur-resetvar ] ] Vide
      set %etatdcc [ $+ [ %compteur-resetvar ] ] Vide
      set %etatpause [ $+ [ %compteur-resetvar ] ] Vide
      set %etatresume [ $+ [ %compteur-resetvar ] ] Vide
      timer [ $+ [ %compteur-timeur-resetvar ] ] off
      echo 4 -----------------------------------------------------------
      echo 4 Le Bot n° [ $+ [ %compteur-resetvar ] ] a été supprimer
      echo 4 -----------------------------------------------------------
    }
  }
  else {      
    set %deb [ $+ [ %compteur-resetvar ] ] Vide 
    set %fin [ $+ [ %compteur-resetvar ] ] Vide 
    set %dcc [ $+ [ %compteur-resetvar ] ] Vide 
    set %chan [ $+ [ %compteur-resetvar ] ] Vide
    set %server [ $+ [ %compteur-resetvar ] ] Vide
    set %etatdcc [ $+ [ %compteur-resetvar ] ] Vide
    set %etatpause [ $+ [ %compteur-resetvar ] ] Vide
    set %etatresume [ $+ [ %compteur-resetvar ] ] Vide
    timer [ $+ [ %compteur-timeur-resetvar ] ] off
    echo 4 -----------------------------------------------------------
    echo 4 Le Bot n° [ $+ [ %compteur-resetvar ] ] est Vide
    echo 4 -----------------------------------------------------------
  }
}

alias resetall {
  set %stopdl $?="Remettre tout à zéro (o/n) ?:"
  if (%stopdl == o) {
    set %compteur-resetall 1
    set %compteur-timeur-resetall 101
    while (%compteur-resetall <= 10) {
      set %deb [ $+ [ %compteur-resetall ] ] Vide 
      set %fin [ $+ [ %compteur-resetall ] ] Vide 
      set %dcc [ $+ [ %compteur-resetall ] ] Vide 
      set %chan [ $+ [ %compteur-resetall ] ] Vide
      set %server [ $+ [ %compteur-resetall ] ] Vide
      set %etatdcc [ $+ [ %compteur-resetall ] ] Vide
      set %etatpause [ $+ [ %compteur-resetall ] ] Vide
      set %etatresume [ $+ [ %compteur-resetall ] ] Vide
      timer [ $+ [ %compteur-timeur-resetall ] ] off
      inc %compteur-resetall
      inc %compteur-timeur-resetall
    }
  }
}

;-----------------------------------------------------------------------------------------
;J)Variables Alias pour un test si les slots (Mettre en memoire un Bot) est utilsié ou pas
;-----------------------------------------------------------------------------------------

alias testvide {
  if (%dcc [ $+ [ %compteur-membot ] ] != Vide) {
    if (%deb [ $+ [ %compteur-membot ] ] != Vide) {
      set %dcc [ $+ [ %compteur-membot ] ] %olddcc [ $+ [ %compteur-membot ] ]
    }
    else {
      set %chan [ $+ [ %compteur-membot ] ] $chan 
      set %server [ $+ [ %compteur-membot ] ] $server
    }
  }
  else {
    set %chan [ $+ [ %compteur-membot ] ] $chan 
    set %server [ $+ [ %compteur-membot ] ] $server
  }
  %compteur-nextmembot = %compteur-membot + 1
  while (%compteur-nextmembot != %compteur-membot) {
    if (%dcc [ $+ [ %compteur-membot ] ] == %dcc [ $+ [ %compteur-nextmembot ] ])  {
      echo 4 -----------------------------------------------------------
      echo 4 Vous ne pouvez pas mettre deux fois le meme Bot en mémoire.
      echo 4 -----------------------------------------------------------
      echo 4 Le Xdcc %dcc [ $+ [ %compteur-nextmembot ] ] est en cours d'utilisation en Slot n° [ $+  [ %compteur-nextmembot ] ]
      set %dcc [ $+ [ %compteur-membot ] ] Vide
      set %chan [ $+ [ %compteur-membot ] ] Vide
      set %server [ $+ [ %compteur-membot ] ] Vide
      break
    }
    inc %compteur-nextmembot
    if (%compteur-nextmembot > 10) {
      set %compteur-nextmembot 1
    }
  }
}

;-----------------------------------------------------------------------------------------
;K)Variables Alias pour menu popups sur Channel pour repprendre les dernier telechargement
;-----------------------------------------------------------------------------------------

alias resumedl {
  if (%dcc [ $+ [ %compteur-resumedown ] ] != Vide) {
    if (%deb [ $+ [ %compteur-resumedown ] ] != Vide) {
      set %etatpause [ $+ [ %compteur-resumedown ] ] Off
      set %etatresume [ $+ [ %compteur-resumedown ] ] On
      set %etatdcc [ $+ [ %compteur-resumedown ] ] Resume
      set %offresume [ $+ [ %compteur-resumedown ] ] On
      if ($chan == %chan [ $+ [ %compteur-resumedown ] ]) {
        msg %dcc [ $+ [ %compteur-resumedown ] ] xdcc send %deb [ $+ [ %compteur-resumedown ] ]
      }
      elseif ($server != %server [ $+ [ %compteur-resumedown ] ]) {
        echo 4 -----------------------------------------------------------
        echo 4 Vous n'etez pas sur le bon serveur, ni le bon chan. Pour relancer le téléchargement, vous devez le relancer sur le server -> %server [ $+ [ %compteur-resumedown ] ] et le chan -> %chan [ $+ [ %compteur-resumedown ] ]
        echo 4 Voulez vous rejoidre les serveur et le chan ?
        echo 4 -----------------------------------------------------------
        set %asknew $?="(O)ui ou (N)on:"
        if (%asknew == n) {
          echo 4 -----------------------------------------------------------
          echo 4 A vos ordres, maître vénéré ^-^
          echo 4 -----------------------------------------------------------
        }
        elseif (%asknew == o) {
          server -m %server [ $+ [ %compteur-resumedown ] ] -j %chan [ $+ [ %compteur-resumedown ] ]
        }
      }
      else {
        msg %dcc [ $+ [ %compteur-resumedown ] ] xdcc send %deb [ $+ [ %compteur-resumedown ] ]
      }
    }
  }
  elseif (%deb [ $+ [ %compteur-resumedown ] ] == Vide) {
    set %etatpause [ $+ [ %compteur-resumedown ] ] Vide
    set %etatresume [ $+ [ %compteur-resumedown ] ] Vide
    set %etatdcc [ $+ [ %compteur-resumedown ] ] Vide
  }
}

;------------------------------------------------------------------------
;L)Variable Alias pour le menu popups resumer ou mettre en pause un Bot n°
;------------------------------------------------------------------------

alias menudel {
  if (%dcc [ $+ [ %compteur-pause ] ] != Vide) {
    if (%deb [ $+ [ %compteur-pause ] ] != Vide) {
      if (%offresume [ $+ [ %compteur-pause ] ] == Off) {
        set %etatpause [ $+ [ %compteur-pause ] ] On
        set %etatresume [ $+ [ %compteur-pause ] ] Off
        set %etatdcc [ $+ [ %compteur-pause ] ] Pause
        set %offresume [ $+ [ %compteur-pause ] ] Off
        set %stopdl $?="Voulez-vous également mettre en pause le téléchargement en cour ?: (o/n)"
        if (%stopdl == o) {
          close -g %dcc [ $+ [ %compteur-pause ] ]
          msg %dcc [ $+ [ %compteur-pause ] ] xdcc remove
        }
        elseif (%stopdl == n) {
          echo 4 -----------------------------------------------------------
          echo 4 Ok maître vénéré ^-^
          echo 4 -----------------------------------------------------------
        }
      }
    }
  }
  else {
    set %etatdcc [ $+ [ %compteur-pause ] ] Vide
    set %etatpause [ $+ [ %compteur-pause ] ] Vide
    set %etatresume [ $+ [ %compteur-pause ] ] Vide
  }
}

;-----------------------------------------------------------------------------------------------------------
;M)Variable Alias Dans Menu Popups Status pour reprendre les téléchargement en mémoire à l'ouverture de mIrc
;-----------------------------------------------------------------------------------------------------------

alias connect4dl {
  set %reprendre on
  if (%server1 =! Vide) {
    server %server1
    set %existserver1 On
    set %existserver2 Off
    set %existserver3 Off
    set %existserver4 Off
    set %existserver5 Off
    set %existserver6 Off
    set %existserver7 Off
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server2 != Vide) {
    server %server2
    set %existserver2 On
    set %existserver1 Off
    set %existserver3 Off
    set %existserver4 Off    
    set %existserver5 Off
    set %existserver6 Off
    set %existserver7 Off    
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server3 != Vide) {
    server %server3
    set %existserver3 On
    set %existserver2 Off
    set %existserver1 Off
    set %existserver4 Off    
    set %existserver5 Off
    set %existserver6 Off
    set %existserver7 Off    
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server4 != Vide) {
    server %server4
    set %existserver4 On
    set %existserver3 Off
    set %existserver2 Off
    set %existserver1 Off    
    set %existserver5 Off
    set %existserver6 Off
    set %existserver7 Off    
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server5 != Vide) {
    server %server5
    set %existserver5 On
    set %existserver4 Off
    set %existserver3 Off
    set %existserver2 Off    
    set %existserver1 Off
    set %existserver6 Off
    set %existserver7 Off    
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server6 != Vide) {
    server %server6
    set %existserver6 On
    set %existserver5 Off
    set %existserver4 Off
    set %existserver3 Off    
    set %existserver2 Off
    set %existserver1 Off
    set %existserver7 Off    
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server7!= Vide) {
    server %server7
    set %existserver7 On
    set %existserver6 Off
    set %existserver5 Off
    set %existserver4 Off    
    set %existserver3 Off
    set %existserver2 Off
    set %existserver1 Off    
    set %existserver8 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server8 != Vide) {
    server %server8
    set %existserver8 On
    set %existserver7 Off
    set %existserver6 Off
    set %existserver5 Off    
    set %existserver4 Off
    set %existserver3 Off
    set %existserver2 Off    
    set %existserver1 Off
    set %existserver9 Off
    set %existserver10 Off
  }
  elseif (%server9 != Vide) {
    server %server9
    set %existserver9 On
    set %existserver8 Off
    set %existserver7 Off
    set %existserver6 Off    
    set %existserver5 Off
    set %existserver4 Off
    set %existserver3 Off    
    set %existserver2 Off
    set %existserver1 Off
    set %existserver10 Off
  }
  elseif (%server10 != Vide) {
    server %server10
    set %existserver10 On
    set %existserver9 Off
    set %existserver8 Off
    set %existserver7 Off    
    set %existserver6 Off
    set %existserver5 Off
    set %existserver4 Off    
    set %existserver3 Off
    set %existserver2 Off
    set %existserver1 Off    
  }
}

;--------------------------------------------
;N)Variable Alias pour le repertoire download
;--------------------------------------------

alias modifrep {
  set %defautrep $?="Entrez le chemin d'accés de votre répertoire: (ex -> C:\Program Files\mIRC\download). Cancel = C:\Program Files\mIRC\download"
  if (%defautrep == $null) {
    set %defautrep C:\Program Files\mIRC\download
  }
}

alias modifrepshutdown {
  set %defautrepshutdown $?="Entrez le chemin d'accés de votre répertoire: (ex -> C:\Program Files\mIRC\Switch Off\swoff.exe). Cancel = C:\Program Files\mIRC\Switch Off\swoff.exe"
  if (%defautrepshutdown == $null) {
    set %defautrepshutdown C:\Program Files\mIRC\Switch Off\swoff.exe
  }
}

;--------------------------------
;Ouvrir le repertoire de download
;--------------------------------

alias deplacements {
  run notepad %defautrep $+ [ \deplace.bat ]
}

;---------------------
;O)Rechercher sur XDCC
;---------------------

alias demande {
  set %messagetarget 1
  set %waitime 0
  set %recherchep $?="Entrez le numero de l'épisode :"
  set %nbrecaract $?="Entrez le nombre de caractére identique a %cesdcc (min 4)"
  if (%nbrecaract >= 4) {
    if (%recherchep != $null) {
      set %nbruser $nick(%surcechan,0)
      set %datadcc $left(%cesdcc,%nbrecaract)  
      :next  
      set %datauser $left($nick(%surcechan,%nbruser),%nbrecaract)
      if (%datauser == %datadcc) {
        if (%messagetarget < 10) {
          msg $nick(%surcechan,%nbruser) xdcc search %recherchep
          inc %messagetarget
        }
        else {
          timer 1 %waitime msg $nick(%surcechan,%nbruser) xdcc search %recherchep        
          inc %waitime 8
        }
      }
      dec %nbruser
      if %nbruser > 1 goto next
    }
  }
  else {
    echo 4 Le nombre de caractére identique au xdcc %cesdcc doit être supérieur ou égal à 4
  }
}

alias demandelist {
  set %nbrecaract $?="Entrez le nombre de caractére identique a %cesdcc (min 4)"
  if (%nbrecaract >= 4) {
    if (%nbrecaract != $null) {
      set %nbruser $nick(%surcechan,0)
      set %datadcc $left(%cesdcc,%nbrecaract)
      :next
      set %datauser $left($nick(%surcechan,%nbruser),%nbrecaract)
      if (%datauser == %datadcc) {
        msg $nick(%surcechan,%nbruser) xdcc list
        set %dcclist $nick(%surcechan,%nbruser)    
      }
      else {
        dec %nbruser
        goto next
      }
    }
  }
  else {
    echo 4 Le nombre de caractére identique au xdcc %cesdcc doit être supérieur ou égal à 4
  }
}

on 1:NOTICE:*Total Offered*:*: {
  if ($nick == %dcclist) {
    :next
    dec %nbruser  
    set %datauser $left($nick(%surcechan,%nbruser),%nbrecaract)
    if (%datauser == %datadcc) {
      msg $nick(%surcechan,%nbruser) xdcc list
      set %dcclist $nick(%surcechan,%nbruser)    
    }
    elseif (%nbruser == 1) {
      unset %dcclist
      goto fin
    }
    else {
      goto next
    }
    :fin
  }
}

on 1:NOTICE:*XDCC LIST Denied*:*: {
  if ($nick == %dcclist) {
    :next
    dec %nbruser  
    set %datauser $left($nick(%surcechan,%nbruser),%nbrecaract)
    if (%datauser == %datadcc) {
      msg $nick(%surcechan,%nbruser) xdcc list
      set %dcclist $nick(%surcechan,%nbruser)    
    }
    elseif (%nbruser == 1) {
      unset %dcclist
      goto fin
    }
    else {
      goto next
    }
    :fin
  }
}

;-----------------------
;Fin rechercher sur xdcc
;-----------------------

alias joinserveur {
  set %putserv $?="Nom du serveur ?"
  set %repchan $?="Voulez-vous joindre un chan en meme temps ? (o/n)"
  if (%repchan == o) {
    set %putchan $?="Nom du chan ?"
    server -m %putserv -j $chr(35) $+ %putchan
  }
  elseif (%repchan == n) {
    server -m %putserv
  }
}

;----------------------------------
;Enregistrer un nick sur un serveur
;----------------------------------

alias regserveur {
  if (%nickorigine == $null) {
    set %nickorigine $?="Entrez votre nom à enregistrer:"
  }
  if (%motdepasseserv == $null) {
    set %motdepasseserv $?="Votre mot de pass ?"
  }
  if (%emailserv == $null) {
    set %emailserv $?="Votre adresse e-mail@xxxx.xxx ?"
  }
  if (%nickorigine != $null) && (%motdepasseserv != $null) && (%emailserv != $null) {
    nick %nickorigine
    msg nickserv register %motdepasseserv %emailserv
  }
}

;-------------------------------------------------------
;Modifier les données de l enregistrement sur un serveur
;-------------------------------------------------------

alias modifregserveurnick {
  set %repdemodif $?="Modifier le nom ? (o/n)"
  if (%repdemodif != n) && (%repdemodif == o) {
    set %nickorigine $?="Entrez votre nouveau nom à enregistrer:"
    nick %nickorigine
  }
}

alias modifregserveurmotdepasse {
  set %repdemodif $?="Modifier le mot de passe ? (o/n)"
  if (%repdemodif != n) && (%repdemodif == o) {
    set %motdepasseserv $?="Entrez votre nouveau mot de passe à enregistrer:"
  }
}

alias modifregserveuremail {
  set %repdemodif $?="Modifier l'email ? (o/n)"
  if (%repdemodif != n) && (%repdemodif == o) {
    set %emailserv $?="Entrez votre nouvelle adresse email à enregistrer:"
  }
}

;---------------------------
;S'identifier sur un serveur
;---------------------------

alias identserveur {
  if (%motdepasseserv != $null) && (%emailserv != $null) {
    msg nickserv identify %motdepasseserv
  }
}

alias groupserv {
  msg nickserv group %nickorigine %motdepasseserv
}

alias autoperform {
  nick tempnick
  timer 1 5 msg nickserv identify %motdepasseserv
  timer 1 7 msg nickserv ghost %nickorigine %motdepasseserv
  timer 1 10 nick %nickorigine
  timer 1 15 msg nickserv identify %motdepasseserv
  timer 1 25 amsg Salut.
}

;--------------
;Eteindre le PC
;--------------

alias winoff {
  set %compteur-poweroff 1
  while (%compteur-poweroff <= 10) {
    if (%dcc [ $+ [ %compteur-poweroff ] ] != Vide) {
      if (%deb [ $+ [ %compteur-poweroff ] ] != Vide) {
        if (%offresume [ $+ [ %compteur-poweroff ] ] != Off) {
          set %dccvide [ $+ [ %compteur-poweroff ] ] 1
        }
        else {
          set %dccvide [ +$ [ %compteur-poweroff ] ] 0
        }
      }
      else {
        set %dccvide [ $+ [ %compteur-poweroff ] ] 0
      }
    }
    else {
      set %dccvide [ $+ [ %compteur-poweroff ] ] 0
    }
    if (%dccvide1 == 0) && (%dccvide2 == 0) && (%dccvide3 == 0) && (%dccvide4 == 0) && (%dccvide5 == 0) && (%dccvide6 == 0) && (%dccvide7 == 0) && (%dccvide8 == 0) && (%dccvide9 == 0) && (%dccvide10 == 0) {    
      set %toutfermer 1     
    }
    inc %compteur-poweroff
  }
}

;-----------------------------------
;Modifier les pack de telechargement
;-----------------------------------

alias modifpack {
  if (%deb [ $+ [ %modifpackbot ] ] != Vide) {
    set %newdeb $?="Télécharger du pack ? (Actuellement -> %deb [ $+ [ %modifpackbot ] ] )"
    set %newfin $?="Au pack ? (mettez le meme numero pour dl 1 fichier. Actuellement -> %fin [ $+ [ %modifpackbot ] ] )"
    if (%newdeb > %newfin) {
      echo 4 -----------------------------------------------------------
      echo 4 Le numéro pour la fin du pack ( %newfin ) ne peut pas être plus petit que le début du pack ( %newdeb )    
      echo 4 -----------------------------------------------------------    
    }
    elseif (%newdeb != $null) && (%newfin != $null) {
      set %deb [ $+ [ %modifpackbot ] ] %newdeb
      set %fin [ $+ [ %modifpackbot ] ] %newfin
      close -g %dcc [ $+ [ %modifpackbot ] ]
      timer [ $+ [ %timeur-modifpackbot ] ] off
      timer [ $+ [ %timeur-modifpackbot ] ] 1 5 msg %dcc [ $+ [ %modifpackbot ] ] xdcc send %deb [ $+ [ %modifpackbot ] ]
    }
  }
}

;-------------------------
;Lister le xdcc en memoire
;-------------------------

alias listingbot {
  if (%dcc [ $+ [ %listerbot ] ] != Vide) {
    msg %dcc [ $+ [ %listerbot ] ] xdcc list
  }
}

;---------------------------------
;Rechercher sur un xdcc en memoire
;---------------------------------

alias findbot {
  if (%dcc [ $+ [ %rechbot ] ] != Vide) {
    msg %dcc [ $+ [ %rechbot ] ] xdcc search $?="Entrez votre recherche :"
  }
}

;-------------------------------------------------------
;Obtenir les informations d un pack d un xdcc en memoire
;-------------------------------------------------------

alias infopackbot {
  if (%dcc [ $+ [ %infopack ] ] != Vide) {
    msg %dcc [ $+ [ %infopack ] ] xdcc info $?="Entre le numéro du pack :"
  }
}

;-----------------------------
;Activer l'option Send + Queue
;-----------------------------

alias testsqdcc {
  if (%dcc [ $+ [ %compteur-sq ] ] != Vide) {
    if (%deb [ $+ [ %compteur-sq ] ] != Vide) {
      if (%sendqueuedcc [ $+ [ %compteur-sq ] ] == On) {
        set %onetimesqdccoff [ $+ [ %compteur-sq ] ] 1
        if (%onetimesqdccon [ $+ [ %compteur-sq ] ] == 1) {
          inc %deb [ $+ [ %compteur-sq ] ]
          msg %dcc [ $+ [ %compteur-sq ] ] xdcc send %deb [ $+ [ %compteur-sq ] ]
          set %onetimesqdccon [ $+ [ %compteur-sq ] ] 0
        }
      }
      if (%sendqueuedcc [ $+ [ %compteur-sq ] ] == Off) {
        set %onetimesqdccon [ $+ [ %compteur-sq ] ] 1
        if (%onetimesqdccoff [ $+ [ %compteur-sq ] ] == 1) {
          dec %deb [ $+ [ %compteur-sq ] ]
          msg %dcc [ $+ [ %compteur-sq ] ] xdcc remove
          set %onetimesqdccoff [ $+ [ %compteur-sq ] ] 0
        }
      }
    }
    else {
      set %sendqueuedcc [ $+ [ %compteur-sq ] ] Off
      echo 4 -----------------------------------------------------------
      echo 4 Vous devez d'abort Lancer un téléchargement avant de pouvoir l'activer
      echo 4 -----------------------------------------------------------
    }
  }
  else {
    set %sendqueuedcc [ $+ [ %compteur-sq ] ] Off
    echo 4 -----------------------------------------------------------
    echo 4 Vous devez d'abort Lancer un téléchargement avant de pouvoir l'activer
    echo 4 -----------------------------------------------------------
  }
}

;---------------------------
;Fin Du script Gros Leecheur
;---------------------------

Conclusion :


J ai supprimer le programme switchoff car l executable et retiré lors de l upload. Donc télécharger le programme et installer le par vous meme si vous souhaitais utilisé la fonction eteindre le pc a la fin des download par l intermédiare de ce programme. Ou bien utilisé la commande interne dos "shutdown.exe"

Voila, n'ésité pas à me rapporter des bugs ou autre ;)

Pour les mise à jour, voyez plus bas.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
22
Date d'inscription
mardi 10 avril 2007
Statut
Membre
Dernière intervention
21 avril 2009

lol c'est vrais 4000 lignes sa fait énorme ta du avoir du temps pour crée sa mdr c'est bien mais aprés avec le temps tu optimiseras mais bravos ;)
Messages postés
4
Date d'inscription
jeudi 25 janvier 2007
Statut
Membre
Dernière intervention
8 mars 2007

cool merci kaeral, c est exactement ca que je chercher a faire ;)
Messages postés
16
Date d'inscription
jeudi 16 novembre 2006
Statut
Membre
Dernière intervention
3 septembre 2007

tout simplement genre si tu a une variable:
set %p 1
set %dcc [ $+ [ %p ] ] <- ligne x
inc %p
set %dcc [ $+ [ %p ] ] <- ligne y

ici sur la ligne x la variable sera %dcc1
et sur la ligne y la variable sera %dcc2


je ne sais pas si c'était ca que tu cherchais,
je n'ai meme pas lu le code n'étant pas chez moi mais en vacances voila bon courrage (5000 lignes Oo j'avou doit y avoir de gros souccis doptimisation)
javais les meme au debut :D ésite pas a faire des alias etc :D
Messages postés
969
Date d'inscription
lundi 16 juin 2003
Statut
Membre
Dernière intervention
1 juillet 2012
1
Bah...
set %dcc1 %dcc

(je croiais que tu voulais ajouter quelque chose a la valeur de ta variable)
Messages postés
4
Date d'inscription
jeudi 25 janvier 2007
Statut
Membre
Dernière intervention
8 mars 2007

Pour le $addtok lorsque j essaye de faire ceci (%dcc etant ma variable qui contiendra le nom d un xdcc.)

$addtok(%dcc,1,00)

cela ne marche pas. Sauf si je l ecrit comme ca ->

$addtok(dcc,1,00)

ca me donne -> dcc1
Afficher les 10 commentaires

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.