begin process at 2010 02 09 18:50:00
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > GESTION DE TOPICS

GESTION DE TOPICS


 Information sur la source

Note :
6,25 / 10 - par 4 personnes
6,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Classé sous :topic, gestion, topics Niveau :Débutant Date de création :20/02/2004 Date de mise à jour :03/03/2006 02:32:46 Vu / téléchargé :3 488 / 364

Auteur : ennery

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

 Description

Cliquez pour voir la capture en taille normale
sauvegardez vos plus beaux topics, visionnez les, appliquer les ....
Le zip join contient des topics en exemple ( a mettre dans le rep mirc )
pour le faire fonctionner , click droit sur le channel [Topic]
A vos claviers pour nous faire profiter de vos dons d'artiste :)


Source

  • menu channel {
  • [Topic]:dialog -m topicrea topicrea
  • }
  • alias -l top { return topic.txt }
  • alias -l topicwin {
  • if ($dialog(topicrea)) {
  • window -ph +d @pp 0 0 328 26
  • drawfill @pp 1 1 0 1
  • drawtext -pb @pp 0 1 Arial 12 5 3 $iif($did(topicrea,6),$did(topicrea,6),)
  • drawsave @pp "temptopic.bmp"
  • close -@ @pp
  • did -g topicrea 27 "temptopic.bmp"
  • }
  • }
  • dialog topicrea {
  • title "Topic Creator"
  • size -1 -1 336 283
  • option pixels
  • box "Modèles", 1, 7 83 160 60
  • button "Quitter", 2, 230 250 90 27, flat cancel
  • button "Appliquer Topic", 3, 228 210 90 27, flat
  • text "Entre ton topic", 4, 10 41 78 15
  • button "Effacer", 5, 250 36 66 20, flat
  • edit "", 6, 9 57 310 22, autohs
  • combo 7, 15 108 140 260, drop
  • button "Enreg. Modéle", 31, 8 209 90 28, flat
  • icon 27, 11 6 310 26
  • button "Voir", 30, 127 36 66 20, flat
  • edit "", 8, 203 108 100 21
  • box "Channel", 9, 188 85 131 58
  • text "", 10, 28 164 274 29
  • box "Aide", 11, 18 149 290 52
  • text "", 12, 11 251 213 16
  • button "Effacer Modéle", 13, 118 210 90 28, flat
  • }
  • on *:dialog:topicrea:*:*:{
  • if ($devent == init) {
  • initlig
  • did -ar $dname 6 $chan($active).topic
  • topicwin
  • did -ar topicrea 8 $active
  • did -ar $dname 10 Pour enregistrer comme modéle, entrez comme texte : $crlf $did(8)
  • }
  • if ($devent == sclick) {
  • if ($did == 3) { topic $did(8) $did(6) }
  • if ($did == 5) { did -r $dname 6 | topicwin }
  • if ($did == 7) { did -r $dname 6 | did -a $dname 6 $read($top,$did(7)) | topicwin }
  • if ($did == 13) { dellig }
  • if ($did == 30) { topicwin }
  • if ($did == 31) {
  • if ($did(6) != $null) {
  • if exists($top) { var %numlig = $read($top,0) }
  • else { var %numlig = 0 }
  • .write -l1 $top $eval($calc(%numlig + 1)) | .write $top $replace($did(6),$did(8),$chr(36) $+ did $+ $chr(40) $+ 8 $+ $chr(41))
  • initlig
  • }
  • else {
  • did -ar topicrea 12 Aucun modéle saisie
  • .timer 1 3 did -r topicrea 12
  • }
  • }
  • }
  • if ($devent == edit) {
  • if ($did == 8) { did -ar $dname 10 Pour enregistrer comme modéle, entrez comme texte : $crlf $did(8) }
  • }
  • }
  • alias -l initlig {
  • if exists($top) {
  • did -r topicrea 7
  • var %lig = $read($top,0)
  • var %lig1 = 1
  • while (%lig1 <= $eval(%lig)) {
  • did -a topicrea 7 %lig1
  • inc %lig1
  • }
  • }
  • }
  • alias -l dellig {
  • if ($did(7) != $null) {
  • write -dl $+ $calc($did(7).sel +1 ) scripts/topic.txt
  • var %numlig = $read($top,0)
  • .write -l1 $top $eval($calc(%numlig - 1))
  • did -ar topicrea 12 Modèle effacé
  • .timer 1 3 did -r topicrea 12
  • initlig
  • }
  • else {
  • did -ar topicrea 12 Aucun modèle selectionné dans la liste
  • .timer 1 3 did -r topicrea 12
  • }
  • }
menu channel {
[Topic]:dialog -m topicrea topicrea
}
alias -l top { return topic.txt }
alias -l topicwin {
  if ($dialog(topicrea)) {
    window -ph +d @pp 0 0 328 26
    drawfill @pp 1 1 0 1
    drawtext -pb @pp 0 1 Arial 12 5 3 $iif($did(topicrea,6),$did(topicrea,6),)
    drawsave @pp "temptopic.bmp"
    close -@ @pp
    did -g topicrea 27 "temptopic.bmp"
  }
}
dialog topicrea {
  title "Topic Creator"
  size -1 -1 336 283
  option pixels
  box "Modèles", 1, 7 83 160 60
  button "Quitter", 2, 230 250 90 27, flat cancel
  button "Appliquer Topic", 3, 228 210 90 27, flat
  text "Entre ton topic", 4, 10 41 78 15
  button "Effacer", 5, 250 36 66 20, flat
  edit "", 6, 9 57 310 22, autohs
  combo 7, 15 108 140 260, drop
  button "Enreg. Modéle", 31, 8 209 90 28, flat
  icon 27, 11 6 310 26
  button "Voir", 30, 127 36 66 20, flat
  edit "", 8, 203 108 100 21
  box "Channel", 9, 188 85 131 58
  text "", 10, 28 164 274 29
  box "Aide", 11, 18 149 290 52
  text "", 12, 11 251 213 16
  button "Effacer Modéle", 13, 118 210 90 28, flat
}

on *:dialog:topicrea:*:*:{
  if ($devent == init) {
    initlig
    did -ar $dname 6 $chan($active).topic
    topicwin 
    did -ar topicrea 8 $active
    did -ar $dname 10 Pour enregistrer comme modéle, entrez comme texte : $crlf  $did(8)
  }
  if ($devent == sclick) {
    if ($did == 3) { topic $did(8) $did(6) }
    if ($did == 5) { did -r $dname 6 | topicwin }
    if ($did == 7) { did -r $dname 6 | did -a $dname 6 $read($top,$did(7)) | topicwin } 
    if ($did == 13) { dellig }
    if ($did == 30) { topicwin }
    if ($did == 31) { 
      if ($did(6) != $null) {
        if exists($top) { var  %numlig = $read($top,0) }
        else { var %numlig = 0 }
        .write -l1 $top $eval($calc(%numlig + 1)) | .write $top  $replace($did(6),$did(8),$chr(36) $+ did $+ $chr(40) $+ 8 $+ $chr(41))
        initlig 
      }
      else {
        did -ar topicrea 12 Aucun modéle saisie
        .timer 1 3 did -r topicrea 12
      }
    }
  }
  if ($devent == edit) {
    if ($did == 8) { did -ar $dname 10 Pour enregistrer comme modéle, entrez comme texte : $crlf  $did(8) }
  }
}  

alias -l initlig {
  if exists($top) {
    did -r topicrea 7
    var %lig = $read($top,0)
    var %lig1 = 1
    while (%lig1 <= $eval(%lig)) {
      did -a topicrea 7 %lig1
      inc %lig1
    }
  }
}
alias -l dellig {
  if ($did(7) != $null) {
    write -dl $+ $calc($did(7).sel +1 ) scripts/topic.txt
    var  %numlig = $read($top,0)
    .write -l1 $top $eval($calc(%numlig - 1))
    did -ar topicrea 12 Modèle effacé
    .timer 1 3 did -r topicrea 12
    initlig
  }
  else {
    did -ar topicrea 12 Aucun modèle selectionné dans la liste
    .timer 1 3 did -r topicrea 12
  }
}


 Fichier Zip

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

Télécharger le zip


 Historique

03 mars 2006 02:32:46 :
ajout de la partie menu

 Sources du même auteur

RANDOM REPLACE
GESTION DES SCORES
Source avec une capture LAGBAR EN PICWIN DEGRADÉ
Source avec Zip LECTEUR MP3 EN PICWIN SANS DLL
NICKS TEMPORAIRES

 Sources de la même categorie

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
BANNIR LES AGES, LES HOMMES, LES FEMMES ET PSEUDO AVEC CHIFF... par cougar_du_havre

 Sources en rapport avec celle ci

LIMIT SYSTEM [GESTION D' UN CHAN OU MULTI(CHAN/SERV)] par n0man
Source avec Zip Source avec une capture ANTI BADWORDS par chris_c_mwa
Source avec une capture CONSOLE DE GESTION DE SALONS par Syltheb
GESTION MULTILIGNE DE CHAÎNE DE CARACTÈRE par TropNul

Commentaires et avis

Commentaire de ReMi34 le 20/02/2004 20:02:53

J'aime bien, c'est pas mal, bonne idée surtout (j'en suis en manque :p)

Tu devrais revoir la structure de tes devents :

on *:dialog:topicrea:*:*: {
   if $devent == sclick { ....

7/10

Commentaire de SornDrixer le 20/02/2004 20:21:09 administrateur CS

C'est sympatique comme addon, par contre, tu aurais dû le mettre dans la partie CODE réservé à ça lorsque tu l'as posté, et non en description.

Commentaire de ennery le 20/02/2004 20:51:09

merci ReMi34

SornDrixer : désolé j'avez pas fé attention, est-ce que je peux le modif ?

Commentaire de xleu le 21/02/2004 02:41:08

bon script, tres sympa
merci..

Commentaire de JaxX83 le 21/02/2004 12:06:55

Bien sur que tu peut modifier ça dans ton module 'votre accès' (à droite) tu va dans modifier source.
Concernant ta source ça me plait bien.
Utilité: 8/10
Originalité: 8/10
Scripting: 7/10 (tu peut encore optimiser ton code)
Note: 8/10

Commentaire de [thomas95 le 21/02/2004 13:02:24

c pas mal du tou :)

Commentaire de ennery le 22/02/2004 03:31:34

j'ai modifier mon source, deja je l'ai remis a la bonne place, et optimisé, enfin je pense :)
j'attends l'avis des pros
Merci de vos conseils

Commentaire de tempusus le 03/03/2004 14:27:52 administrateur CS

très bon code très sympa :)

J'adore :D

9/10

Tempusus

Commentaire de ennery le 15/06/2004 00:49:01

je viens de m'apercevoir qu'il manque la partie menu :(

alors ajouter en debut ou fin de script :

menu channel {
[Topic]:dialog -m topicrea topicrea
}

voila :)

Commentaire de _Dams_ le 29/06/2004 17:03:01

Je comprend pas comment l'installer!!!
quelqu'un peut m'aider

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Topic ne s'affiche pas [ par botfreeman ] Bonjour,Voici une question qui demande a réfléchir.Voilà j'ai un script (ash-project) et le problème que j'ai avec, c'est que je ne vois pas les topic Enlever le code couleur de mIRC [ par maxpeg0705 ] Bonjour,je cherche desesperement comment enlever d'une chaine de caracteres le code couleur de mIRCJe m'explique :%salon.1 = #salon%topic.chan1 = $cha topic [ par angeldavid ] Bonjour j'ai un code pour que si kkun change le topic sa le ban 15 min , mais par contre si le mec change le topic sa le ban apres kil est changer le question $nick [ par kishkaya ] j'aimerai pouvoir changer le topic quand j'arrive sur un salon et que je suis la seule personne presente (sur le serveur voila) mais le script que j'a afficher un | dans un topic à l'aide d'un alias [ par Bonhomet ] Voilà, je cherche le moyen de placer le caractere | dans le topic de mon channel..Pas de probleme pour le faire manuellement ...Mais qd je veux le fai Gestion des Hash tables. [ par tofu ] Simple gestionnaire de hash tables lui m&#234;me fait en hash tables (utilisation de quelques regex pour les $did().sel &#231;a m&#233;vitai auto-change topic [ par lenain77 ] Salut, Je un d&#233;butant en prog et je voudrai savoi comment&nbsp;on fait pour :si une personne change le topic&nbsp;de mon chan, mon &nbsp;bot le r Comment effacer un topic ? [ par Squallou ] Salut &#224; tous.Une question toute b&#234;te :y'a-t-il une commande pour effacer le topic d'un salon ?j'ai d&#233;j&#224; vu quand le menu "Effacer Enregistrer le topic d'un chan [ par Bonhomet ] Bonjour, mon bot est sous quakenet En fait j'aimerais qu'&#224; chaque fois que qqn modifie le topic d'un channel mon bot l'enregistre (dans une varia Bnc gestion [ par ricolla ] salut ! j'ai acheter 4 bnc's mais je m'emmelle les pinceaux vec les servers et tout.j'amerais savoir si il existe quelque chose pour ke je puisse conn


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
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 : 1,388 sec (3)

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