The World Free


 
AccueilPortailS'enregistrerGalerieFAQRechercherConnexion

Partagez | 
 

 Le XDCC... partage de fichier

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
ZeNiTuDe



Nombre de messages : 142
Age : 46
Date d'inscription : 29/02/2008

MessageSujet: Le XDCC... partage de fichier   Lun 30 Avr - 18:44

Code:
Voila tu copie colle dans ton MIRC a l'espace edditeur de script  sous remotte/fichier/nouveau


dialog myxdcc {
title "Serveur xdcc"
size -1 -1 587 280
option pixels
list 1, 12 17 483 191, size
button "Parcourir", 2, 502 17 75 25
button "Vider", 3, 502 45 75 25
button "Ok", 5, 502 250 75 25, ok
text "Liste des fichiers en partage", 6, 164 3 186 14, center
check "Activer/Désactiver le partage des fichiers", 4, 12 253 288 20
edit "", 7, 12 225 266 20, autohs
edit "", 11, 434 225 35 20, right
text "Afficher la liste toutes les ", 12, 307 227 124 14
text "minute(s)", 13, 474 227 52 16
text "Inscrivez un nom de salon de partage", 8, 55 210 183 14
}
;###################Partie code du dialogue####################;
on *:dialog:myxdcc:*:*: {
if ($devent == init) {
set %myxdcc myxdcc.txt
if ($exists(%myxdcc)) {
loadbuf -otliste myxdcc 1 %myxdcc
}
if (%checkactiv) {
did -c myxdcc 4
}
if (%minuteaff != $null) {
did -a myxdcc 11 %minuteaff
}
if (%chanpartage != $null) {
did -a myxdcc 7 %chanpartage
}
echo 4 -a Ouverture de la console de partage.
}
if ($devent == sclick) {
if ($did == 2) && ($did(1).lines == 0) {
set %dossierxdcc $sdir(*)
set %nbrfiles $findfile(%dossierxdcc,*,0,1)
set %comxdcc 1
write -c %myxdcc
while (%comxdcc <= %nbrfiles) {
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size < 1000) {
set %taillexdcc [ $+ $file($findfile(%dossierxdcc,*,%comxdcc,1)).size o]
}
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size < 1000000) && ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size >= 1000) {
set %taillexdcc [ $+ $ceil($calc($file($findfile(%dossierxdcc,*,%comxdcc,1)).size / 1000)) Ko]
}
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size < 1000000000) && ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size >= 1000000) {
set %taillexdcc [ $+ $ceil($calc($file($findfile(%dossierxdcc,*,%comxdcc,1)).size / 1000000)) Mo]
}
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size >= 1000000000) {
set %taillexdcc [ $+ $ceil($calc($file($findfile(%dossierxdcc,*,%comxdcc,1)).size / 1000000000)) Go]
}
did -a myxdcc 1 [ # [ $+ [ %comxdcc ] ] ] $nopath($findfile(%dossierxdcc,*,%comxdcc,1)) %taillexdcc
inc %comxdcc 1
}
}
if ($did == 3) && ($did(1).lines != 0) {
did -r myxdcc 1
write -c %myxdcc
}
if ($did == 5) {
if ($did(1).lines != 0) && ($did(11) != $null) && ($did(7) != $null) {
write -c %myxdcc
set %comxdcc 1
while (%comxdcc <= $did(1).lines) {
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size < 1000) {
set %taillexdcc [ $+ $file($findfile(%dossierxdcc,*,%comxdcc,1)).size o]
}
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size < 1000000) && ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size >= 1000) {
set %taillexdcc [ $+ $ceil($calc($file($findfile(%dossierxdcc,*,%comxdcc,1)).size / 1000)) Ko]
}
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size < 1000000000) && ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size >= 1000000) {
set %taillexdcc [ $+ $ceil($calc($file($findfile(%dossierxdcc,*,%comxdcc,1)).size / 1000000)) Mo]
}
if ($file($findfile(%dossierxdcc,*,%comxdcc,1)).size >= 1000000000) {
set %taillexdcc [ $+ $ceil($calc($file($findfile(%dossierxdcc,*,%comxdcc,1)).size / 1000000000)) Go]
}
writeini %myxdcc liste [ # [ $+ [ %comxdcc ] ] ] $nopath($findfile(%dossierxdcc,*,%comxdcc,1)) %taillexdcc
writeini %myxdcc ladresse [ # [ $+ [ %comxdcc ] ] ] $findfile(%dossierxdcc,*,%comxdcc,1)
inc %comxdcc 1
}
set %checkactiv $did(4).state
set %minuteaff $did(11)
set %chanpartage $did(7)
if ($did(4).state) {
echo 4 -a Activation de la console de partage.
.timerxdcc off
regltime
.timerxdcc 0 $calc(%minuteaff * 60) regltime
}
else {
.timerxdcc off
echo 4 -a Désactivation de la console de partage.
}
}
else {
write -c %myxdcc
unset %minuteaff
unset %checkactiv
.timerxdcc off
echo 4 -a Désactivation de la console de partage, pour activer la console de partage veuillez y choisir un dossier à partager ainsi qu'un salon et un temps d'affichage.
}
}
}
}
;#######################Partie CTCP#####################;
ctcp *:xdcc:*: {
if ($2 == send) {
if (%checkactiv) {
dcc send $nick $readini(%myxdcc,ladresse,$3)
}
}
}
;###################Partie alias#########################;
alias xdcc {
dialog $iif($dialog(myxdcc),-v,-mied myxdcc) myxdcc
}
alias regltime {
if ($status == connected) {
msg %chanpartage 4Serveur de fichiers 13M7yxdcc 9Je partage actuellement13 %nbrfiles fichiers11, pour un record de13 %vitessemax $+ ko/s
.play -tliste %chanpartage %myxdcc
.timerxdccd 1 $calc(%nbrfiles + 1) msg %chanpartage Pour télecharger tapez:9 /ctcp $me 8xdcc send #numéro_4du_fichier 11n'oublez pas le 9"8#9" 7devant le numéro.12Merci de partager vous aussi 4:).Je vous invite 8a découvrir 4toutes ces nouveautés 11en téléchargeant 7depuis ce serveur. 13Tous les fichiers sont contrôlés 4sans virus 12;)

}
}
;####################partie connexion#########################;
on *:join:%chanpartage: {
if (%checkactiv) {
.timerxdcc off
regltime
.timerxdcc 0 $calc(%minuteaff * 60) regltime
}
}
on *:FILESENT:*: {
if ($window(@Transferts) == $null) {
window -mkOzne @Transferts
}
if (!%vitessemax) {
set %vitessemax 0
}
set %sentenvoi $ceil($calc($calc($send($nick).sent / $send($nick).secs) / 1000))
if (%sentenvoi > %vitessemax) {
set %vitessemax $ceil($calc($calc($send($nick).sent / $send($nick).secs) / 1000))
}
echo @Transferts 3·9·3•9» 11[10 $+ $time $+ 11] 13 $nick 10 a bien reçu13 $nopath($filename) 10! 9«3•9·3·
}
on *:SENDFAIL:*: {
if ($window(@Transferts) == $null) {
window -mkOzne @Transferts
}
echo @Transferts 5·4·5•4X 11[10 $+ $time $+ 11] 13 $nick 4 n'a pas reçu13 $nopath($filename) 4X5•4·5·
}
menu channel,query,nicklist,status {
-
][ Partage de fichiers ][:/xdcc]
}

Ensuite lorsque le fichier est enregistrer sur votre script , dans la fenetre de lecture en clic droit vous devriez voir un onglet << PARTAGE DE FICHIERS >>
Donc vous le lancer puis puis dans la fentre qui s'ouvre allez sur parcourir , et via l'endroit ou vous avez les fichiers a partager puis envoyer votre choix ce qui donne ca si tous est ok




ces ok donc vous n'avez plus qu'as mettre un nom de salon ( #nom du salon ) ou diffuser et le temp espace entre chaque diffusion
Ne mettez pas plus de 50 fichiers d'un coup en diffusion ca risque d'alterrer de plus prévoyer ce sujet sur un salon ou y as peut de t'chat ou encore limiter vos partage en fonction

_________________

découvrez ici -->    http://island-tchat.bestoof.com/index.php
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://zenitude.forum-actif.net
 
Le XDCC... partage de fichier
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Site de partage de fichiers, gratuit, illimité et français
» bbox et ps3
» Fichier excel en FTP
» Partage disque dur via bbox
» Problème : partage de fichiers

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
The World Free :: Tous Pour L'IRC :: espace remottes pour script et robot-
Sauter vers: