begin process at 2010 03 21 06:33:09
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > AUTOJOIN FAIT RAPIDEMENT (NÉCÉSITE MDX.DLL).

AUTOJOIN FAIT RAPIDEMENT (NÉCÉSITE MDX.DLL).


 Information sur la source

Note :
3,5 / 10 - par 2 personnes
3,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Niveau :Débutant Date de création :02/04/2005 Date de mise à jour :03/04/2005 01:57:23 Vu / téléchargé :1 974 / 97

Auteur : dunmer

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

 Description

Cliquez pour voir la capture en taille normale
Un autojoin fait pour les gens qui veulent un autojoin simple.

Source

  • on *:connect:{ var %x = 1 | while ($read(chan.txt,%x)) { join $read(chan.txt,%x) | inc %x } }
  • dialog autoj {
  • title "Autojoin"
  • option dbu
  • size -1 -1 81 134
  • text "Autojoin",1, 28 2 21 8
  • edit "#",2, 10 10 60 8,
  • button "Ajouter",3, 10 19 60 9
  • list 4, 3 30 76 100
  • button "Supprimer",5, 3 125 60 9
  • button "Ok",6, 69 125 10 9, ok
  • }
  • on *:dialog:autoj:init:*:{
  • dll mdx.dll SetMircVersion $version
  • dll mdx.dll MarkDialog $dname
  • dll mdx.dll SetFont 1 12 700 tahoma
  • dll mdx.dll SetBorderStyle 2,4 border
  • loadbuf -o autoj 4 chan.txt
  • dll mdx.dll SetDialog $dname style staticedge title border tool sysmenu
  • }
  • on *:dialog:autoj:sclick:3:{ set %chan $did(2) | write chan.txt %chan | did -a autoj 4 %chan }
  • on *:dialog:autoj:sclick:5:{ write -dl $+ $did(4).sel chan.txt | did -d autoj 4 $did(4).sel }
on *:connect:{ var %x = 1 | while ($read(chan.txt,%x)) { join $read(chan.txt,%x) | inc %x } }
dialog autoj {
  title "Autojoin"
  option dbu
  size -1 -1 81 134
  text "Autojoin",1, 28 2 21 8
  edit "#",2, 10 10 60 8,
  button "Ajouter",3, 10 19 60 9
  list 4, 3 30 76 100
  button "Supprimer",5, 3 125 60 9
  button "Ok",6, 69 125 10 9, ok
}
on *:dialog:autoj:init:*:{ 
  dll mdx.dll SetMircVersion $version
  dll mdx.dll MarkDialog $dname
  dll mdx.dll SetFont 1 12 700 tahoma
  dll mdx.dll SetBorderStyle 2,4 border
  loadbuf -o autoj 4 chan.txt 
  dll mdx.dll SetDialog $dname style staticedge title border tool sysmenu
}
on *:dialog:autoj:sclick:3:{ set %chan $did(2) | write chan.txt %chan | did -a autoj 4 %chan }
on *:dialog:autoj:sclick:5:{ write -dl $+ $did(4).sel chan.txt | did -d autoj 4 $did(4).sel }

 Conclusion

;)

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  • MDX.DLLTélécharger ce fichier [Réservé aux membres club]42 496 octets

Télécharger le zip


 Historique

02 avril 2005 23:47:01 :
03 avril 2005 00:16:02 :
03 avril 2005 00:17:47 :
03 avril 2005 01:57:23 :

 Sources de la même categorie

TCL - AJOUT SUPPRESSION DE LOGS par Atok
BLACKLIST PSEUDOS/MASKS par usurpateur
Source avec une capture [XCHAT] ANTI KICK / AWAY C++ par GeroXXXX
JEU DU CODE par alanpersonproject
SERVEUR FTP par hisoka2501

Commentaires et avis

Commentaire de fyltum le 02/04/2005 23:57:50

Pas d'inquietude je ne le mettrais pas dans mon script si je voudrais en faire un puisque ça n'a rien d'original genre multiserv ( et encore )  etc..
Moyennement optimisé, avec $devent, $did flem d'expliquer.
Autremment le dialog est pas mal je pense :)

Commentaire de World_mIRC le 03/04/2005 00:11:06

EXPDR !!!

pk "ne le mettez pas dans votre script svp" ???

à ce moment la, ne poste pas ton code sur le site.

Commentaire de wims le 03/04/2005 00:21:37

Des millions d'auto-join on ete poster va voir les commentaire.

on *:connect:{ var %x = 1 | while ($read(chan.txt,%x)) { join $read(chan.txt,%x) | inc %x } }

si chan.txt existe pas ?

tu pourrai proposer d'activer/desactiver l'auto-join
Pas multiserv...

Commentaire de dunmer le 03/04/2005 00:22:28

Lol ouais j'ai eu tort pour le metez pas dans votre script :x

Commentaire de KiNdErMaXi le 03/04/2005 01:45:02

Met un zip avec mdx.dll, meme si tout le monde l'as, c'est la moindre des choses de le mettre avec.
"while ($read(chan.txt,%x))" ca fonction ca ? j'ai des doutes :( met plutot :
while (%x <= $lines(chan.txt))

Sinon tout a été dis.
Bonne continuation

Commentaire de dunmer le 03/04/2005 01:59:33

Voila , j'ai rajouté le zip de mdx.dll et pour ce qui est du while ($read(chan.txt,%x)) , il fonctione bien :)

Commentaire de KiNdErMaXi le 03/04/2005 02:20:29

ok je savais pas qu'on pouvais utiliser ceci

Commentaire de MaX_62 le 03/04/2005 07:10:43

on *:connect:{ var %x = 1 | while ($read(chan.txt,%x)) { join $read(chan.txt,%x) | inc %x } }
>>
on *:connect:{ var %x = 1 | while ($read(chan.txt,%x)) { join $ifmatch | inc %x } }

Sinon l'utilité de mdx.dll est pas flagrante ici.
Le reste est dit.

Commentaire de SornDrixer le 03/04/2005 09:41:53 administrateur CS

- Faut m'expliquer l'utilité d'un autojoin de ce type car mIRC en propose déjà un, qui est même beaucoup mieux. (et qui gère le multi-serveur)

- De + si on souhaite joindre un canal ayant une clé (mode +k), comment on fait ?

- Beaucoup de chose à améliorer pour que l'addon devienne réellement utile.

- A ce niveau, ton utilisation de MDX est inutile. Ca fait + allourdir le zip et ton code qu'autre chose.

- Si on a une dizaine de canal à joindre, il serait bien de mettre un timer pour ton événement CONNECT, certains serveurs supportent mal l'envoie d'autant de commandes.

- Concernant ce bout de code :
set %chan $did(2) | write chan.txt %chan | did -a autoj 4 %chan
Quel est l'utilité de mettre $did(2) dans une variable alors que tu n'utilises plus cette variable plus tard .. ? Autant faire directement appel à $did(2) alors, ca nous évitera de s'encombrer d'une variable inutile.

- loadbuf -o autoj 4 chan.txt
Ca c'est une bonne chose, beaucoup de personnes oublient que /loadbuf existe :)


Essaie d'améliorer et compléter ton code.

Bonne continuation

Commentaire de talking le 03/04/2005 09:56:44

Franchement , moi ce genre d'add-on ne me donne pas envie de l'ajouter dans une de mes remotes.
Et si je veux configurer plusieurs channels , comment je fais ? si mon channel a un mode +k comme l'a dit Sorn
le mieux aurait été de faire une listview avec mdx avec 3 parties :
- Serveur
- Channel
- Pass ( si il y en a un )

et là ça aurait fait un véritable autojoin multiserveur

Voilà à améliorer :

Niveau note : 2/10

Commentaire de Sizlaa le 03/04/2005 10:34:23

Meme si ton code est court regroupe tes event,
Ce qui donne

on *:dialog:autoj:*:*:{
if $devent == init { ...... }
elseif $devent == sclick { .... }
}

Il faut quelques fois etre rigoureux, même si ça ne fait pas grand chose ça améliore déjà un peu la qualité du code voilà
Sinon tout est dit
++

Commentaire de fjxokt le 03/04/2005 10:47:06

j'adore ton dialog (je lui mettrai 8/10)
Cependant je mettrai 1/10 au reste pr les raisons ennoncées plus haut
Si tu doit ameliorer cette source, n'oublie pas de garder la simplicité de ce dialog que je trouve sympa
(un petit combo pr choisir le serveur ?)

Commentaire de Huitre le 03/04/2005 12:09:02

'c:\program' unable to open chan.txt

Owned by repertoire avec des espaces.

Unable to join channel (key required)

Owned by mode +k

J ai 15 323 salon a rejoindre, avec read ta mirc qui plante.

Owned by FileHandling.

Vu plus de fois qu une foto de la terre.

3/10 pour /loadbuff et le combo.

Commentaire de tofu le 03/04/2005 21:23:09

un truc fait à la "va vite" on le post pas, npk.. 1/10 vu qu'il est mêmemoins bien que celui de base qui est ds mIRC..

Commentaire de fjxokt le 03/04/2005 21:36:26

tu devrai mettre a jour ta source
(il a montré un screen d'une version plus avancée sur le forum)
soyez pas trop dur ;)

Commentaire de PtitKev le 01/06/2005 10:55:08

Huitre j'adore ta façon de parler mdrr :) Roxor attitude :) tu dois en avoir des amis avec autant de salons mdrrrr : Owned by me !

(Aime pas les langages : je le place au meme niveau que celui des racailles mdrrr)

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

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

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

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