Accueil > > > XDCC DOWNLOAD MANAGER
XDCC DOWNLOAD MANAGER
Information sur la source
Description
Mon script permet de : - Mettre en memoire des Xdcc D utilisé des fonctions tels que : - Ouvrir le repertoire de download et modifier le chemin d acces - deplacer les download vers des dossier pour les fanatique du rangement ^^ (par l intermédiaire d un .bat) et de le modifier - De gérer les Xdcc en memoire tel que pouvoir lister, rechercher, information d un pack, activer le send + queue, lancer des plage de packs, modifier la plage de pack, et supprimer le Xdcc. - Supprimer tout les Xdcc, d 'eteindre le pc a la fin des download en cours soit avec le programme interne shutdown.exe ou le programme switchoff et de modifier son repertoire d acces. - De resume ou mettre en pause un Xdcc Les download sont automatiquement repris, des options sont présent pour pouvoir le permettre ou non selon son choix. Il y a aussi un simple menu qui permet de : - telecharger un pack, de rechercher, d annuler, de lister, de stopper le listing, et d obtenir les infos d un pack sans mettre en memoire le Xdcc. Dans le menu status, vous pouvrez joindre les serveurs et les chans des xdcc en memoires dans le cas ou vous les auriez oublié ;) --- Pour une premiere utilisation, relancer votre irc puis faite une fois la suppression de tout les Bots dans le menu "Lancer les Telechargement -> Suppression de tous les bots" pour assigner les variables. ainsi que de choisir les repertoire de download, de switch off, et de mettre sur on ou off la reprise des la connection, le deplacement de fichier et l utilisation de shutdown ou switch off.
Source
- 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.
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
Commentaires et avis
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é cré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 à partir d'un adresse ftp, me génè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...)
|
Derniers Blogs
COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ?MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ? par junarnoalg
La prochaine session de MyTIC aura lieu à Namur, le 23 mars prochain. Pendant presque une heure, nous parlerons de SharePoint 2010. Voici un aperçu du programme.
Accueil : 17h30 Début de la session : 18h00 - Les nouvelles int...
Cliquez pour lire la suite de l'article par junarnoalg
Forum
RE : COULEUR TEXTRE : COULEUR TEXT par WorldDMT
Cliquez pour lire la suite par WorldDMT
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|