begin process at 2010 03 20 11:36:23
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Scripts

 > XDCC DOWNLOAD MANAGER

XDCC DOWNLOAD MANAGER


 Information sur la source

Note :
Aucune note
Catégorie :Scripts Classé sous :xdcc, download, manager, spy Niveau :Débutant Date de création :26/01/2007 Date de mise à jour :23/03/2007 13:28:33 Vu / téléchargé :12 370 / 7 249

Auteur : BlackShadow69

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

 Description

Cliquez pour voir la capture en taille normale
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

  • 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
  • ;---------------------------
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.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

26 janvier 2007 20:57:40 :
je ne met pas le code source car il fait +de 3000 lignes :p et ne s affiche pas entiérement dans la boite de texte prevu a cet effect. Cependant, il est present dans le zip sous forme d un txt
26 janvier 2007 21:00:19 :
je ne met pas le code source car il fait +- 4000 lignes :p et ne s affiche pas entiérement dans la boite de texte prevu a cet effect. Cependant, il est present dans le zip sous forme d un txt
26 janvier 2007 21:06:56 :
je ne met pas le code source car il fait +- 4000 lignes :p et ne s affiche pas entiérement dans la boite de texte prevu a cet effect. Cependant, il est present dans le zip sous forme d un txt Ajout d un screenshot (dommage qu on ne sait pas en mettre 4 :p)
10 mars 2007 03:05:23 :
Voila, j'ai su optimisé le code et de +-4000 je suis passé à 1400 lignes ^^ J ai également rajouter quelques explication dans le lisez-moi, ainsi que des screenshot des 3 menus
10 mars 2007 17:46:04 :
Suppression du programme switchoff dans le zip car son executable n est pas uploader par le site par mesure de sécurité. Donc télécharger le vous meme si vous souhaitez utilisé la fonction eteindre le pc a la fin des download ou utilisé la commande interne DOS "Shutdown.exe" (a choisir dans le menu "lancer les telchargement".
10 mars 2007 19:24:23 :
Réctification mineure.
12 mars 2007 02:34:07 :
J ai constaté une erreur dans le menu "Resumer les telechargements", celui ci buger du au nom de la variable se terminant par l considéré peut etre par le 1 numérique. J en ai deduis cela en modifiant le nom de cette variable, et cela fonctionne correctement.
13 mars 2007 09:27:23 :
J ai fait une petit modification au miveau d un message lorsqu on veut mettre 2 fois le meme xdcc en memoire.
13 mars 2007 12:28:54 :
Encore une mise à jour :) J avais oublié de mettre dans le code un alias qui permettai de lister tout les bots les uns apres les autres.
16 mars 2007 02:19:44 :
nouvelle mise à jour concernant l option deplacer les telechargements. J ai modifier son action comme ceci : run -p %defautrep $+ [ \deplace.bat ] ce qui a pour effet d'utiliser le fichier deplace.bat de facon dynamique puisque tjs en rapport avec le dossier "download"
17 mars 2007 22:23:54 :
Mise a jour concernant l edition (modification) du fichier deplace.bat que j avais mis par defaut comme c:\programmes files\mirc\download\deplace.bat Certaine personne n ont pas ce chemin et donc je l ai modifié pour que se soit dynamique par rapport a votre propre chemin d acces.
21 mars 2007 15:02:35 :
Nouvelle mise à jour concernant l'événement "Lister des xdcc" qui permetait de lister des xdcc en meme temps. J'ai revu cela, de façon à ce qu'il les listes les uns aprés les autres pour que la visibilité du listing soit plus correct.
21 mars 2007 15:22:17 :
Dégouté de faire cette mise à jour quelques minutes aprés la précédante, dans le code (pour "lister des xdcc"), j avais fait un unset d une varible qui se fesait plus tot que prévu da illeur je ne comprend pas pourquoi, donc je l ai mise dans une condition et maintenant ca marche trés bien.
23 mars 2007 13:28:33 :
j avais mis l initiation de variable lors de la suppression de tous les bots. En y reflechissant, ce n etait pas trés convenu de faire cela. Donc il vaut mieu relancer irc une fois le script copié dans votre remote.

 Sources de la même categorie

Source avec une capture TORRENT VIEWER par kamikaze97441
Source avec Zip Source avec une capture PANNEAU DE CONFIGURATION PS7 par aliassangelius
LA CONFIGURATION D'UN EGGDROP QUI ENLÈVE LES BANS APRÈS X ... par Atok
Source avec Zip Source avec une capture DARKPROJECT - SCRIPT MIRC par Artwerks
Source avec une capture STATISTIQUES DISQUE(S) DUR(S) par Nort0n

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture SERVEUR DE FICHIERS XDCC par donkishock
Source avec Zip Source avec une capture LOGCHAN BY DIIMS :: POUR BOT :: TOTALEMENT CONFIGURABLE par sodims
Source avec une capture ESPION EN ECHO ET SUR SALON HAVE FUN par devorZ
Source avec une capture SPY ( ESPION DE SALON ) BY W4X EN DIALOG ( MENU ) ET EN INP... par confus1on
Source avec Zip Source avec une capture XDCC AUTOLEECH par Sad_Joker

Commentaires et avis

Commentaire de wims le 26/01/2007 22:34:18

4000 lignes mdr, j'ai même pas idée de comment ta trouvé la motivation d'écrire 4000 lignes.

Pour chaque alias/evenement/menu/, tu fait 9 fois la même chose alors que 1 suffit.

avec une petite optimisation ( que j'ai bien sur la flemme de faire ) je dirais que le code tient sur - de 500 lignes :)

Tu as mis cb de temps pour pondre ca ?

Commentaire de BlackShadow69 le 27/01/2007 02:23:39

:) je me doute qu il y a moyen d optimisé ca, mais étant encore novice, avec le temps j essayerai de faire ca ^^

je dirai 9 mois a ce niveau, mias je rajouter des trucs au fur et a mesure quand j en avait le temps ou l envie ^^

Commentaire de BlackShadow69 le 27/01/2007 19:39:36

Comment pourrais je procédé pour ajouter un caractere a une variable ?

Exemple : %salut je voudrai pouvoir mettre %salut1

ca serait comme pouvoir modifier le nom de la variable.

Commentaire de COOLMAN002 le 27/01/2007 19:46:40

Bonsoir,
Utilises $addtok.

Fais pas un .txt, mais un .mrc... c'est beaucoup mieux (moins de problèmes)

J'ai pas regardé le code, bonne continuation.

Commentaire de S333 le 27/01/2007 22:10:29

Bon comme cela a été dit... c'est largement optimisable... tu as prévu pour 10bots, et tu as copié le même script 10fois ^^'. Tu peux rendre le nombre de bot illimité avec un peu d'imagination, et le code sera beaucoup moins long.
Pour ce qui est du .bat, c'est un très mauvais point... les .bat sont souvent des 'virus', ou considérés comme tel pour beaucoup du monde.
Et pour ce qu'il fait :) tu n'as vraiment pas besoin d'un .bat.
/help /copy
$isdir /mkdir /remove

Commentaire de BlackShadow69 le 28/01/2007 14:05:17

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


Commentaire de COOLMAN002 le 28/01/2007 14:08:20

Bah...
set %dcc1 %dcc

(je croiais que tu voulais ajouter quelque chose a la valeur de ta variable)

Commentaire de kaeral le 08/03/2007 11:36:40

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

Commentaire de BlackShadow69 le 08/03/2007 21:23:25

cool merci kaeral, c est exactement ca que je chercher a faire ;)

Commentaire de Exagone le 10/04/2007 09:32:37

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 ;)

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Liste de download [ par Nakah ] Bonjour,Voila je voudrais savoir s'il existe un script permettant de gérer une liste de fichier à télécharger via Xdcc.Exemple : Vous avez pleins de f faire une liste XDCC [ par fred06200 ] Bonjour tt le monde, j'écris ce message car je voudrais réaliser (ou trouver) un programme (ou un morceau de script) qui pourrais me servir pour mettr Xdcc... [ par greenou ] Salut tlm, voilà j'aimerais savoir si il existe un addon ou un script tcl pour eggdrop permettant de mettre la liste qu'offre un xdcc sur une page web download depuis mirc [ par lsteven ] je cherche comment telecharger un fichier du net depuis irc ....ya moyen de faire ca ? Remote Question [ par Jimmy72 ] bojour,je suis debutant et j'aimerais faire une commande pour que mon script fasse la demande automatiquement quand le XDCC en question "[Z]-3107" arr une commande qui reagit sur une notice [ par Jimmy72 ] BonjourJ'aimerais avoir une commande qui reagit sur cette notice "*XDCC-Z-503* *** Closing Connection: Connection Lost"et qui enverrait cette commande Liste dun xdcc sur le web [ par JDai ] Bonjour a tous! Je voulais savoir si je peux trouver un script permettant d'afficher automatiquement une liste d'un xdcc sur une page web via php. M DCC [ par gidzit ] Bonjour je voudr&#233; cr&#233;e un envois de ficher sur un double clickex: 03:33:31 * TonTon Ecoute ( Mylo - Drop The Pressure ) Time: ( 1:47/5:11 (3 Créer un XDCC à partir d'un FTP ? [ par ranouf ] Bonjour, voila qq heures que je cherche et que je ne trouve pas. Je cherche un script qui &#224; partir d'un adresse ftp, me g&#233;n&#232;re automati Clone Xdcc [ par titeuf28310 ] Bonjour je cherche pour mon server, comment connecter une vingtaine de clone ki join et part tous a intervalle irregulier... (script tcl...)


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
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,764 sec (4)

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