Quotes systeme

Soyez le premier à donner votre avis sur cette source.

Vue 8 287 420 fois - Téléchargée 355 fois

Description

Alors voici un quotes systeme simple.
J'ai posté cet addon ici, car j'suis assez content d'avoir, pour la première fois, utilisé les icones en tant que boutons.

Source / Exemple :


dialog quotes {
  title "- Citations - Re[M]i_34"
  size -1 -1 167 122
  option dbu
  list 1, 4 9 157 72, size
  box "Citations :", 2, 2 1 162 83
  list 3, 6 85 50 16, size
  list 4, 56 85 50 16, size
  list 5, 107 85 50 16, size
  list 6, 22 103 50 16, size
  list 7, 86 103 50 16, size
  button "Button", 8, 56 142 37 12, ok
}
alias ico { return $scriptdir\icones\ }
alias mdx { return dll $scriptdir\dll\mdx.dll }
alias bars { return $scriptdir\dll\bars.mdx }

on *:dialog:quotes:*:*: {
  if $devent == init { 
    loadbuf -o quotes 1 $scriptdir\quotes.txt 
    $mdx SetMircVersion $version
    $mdx MarkDialog quotes
    $mdx SetControlMDX 3,4,5,6,7 toolbar arrows nodivider list  noresize flat > $bars
    $mdx SetFont quotes 3,4,5,6,7 +a 13 300 verdana
    $mdx SetBorderStyle 3,4,5,6,7
    did -i quotes 3 1 bmpsize 16 16
    did -i quotes 3 1 setimage icon small $ico $+ add.ico
    did -a quotes 3 +W 75 1 Ajouter $+ $chr(9) $+ Ajouter une citation
    did -i quotes 4 1 bmpsize 16 16
    did -i quotes 4 1 setimage icon small $ico $+ eff.ico
    did -a quotes 4 +W 75 1 Enlever $+ $chr(9) $+ Enlever une citation
    did -i quotes 5 1 bmpsize 16 16
    did -i quotes 5 1 setimage icon small $ico $+ apercu.ico
    did -a quotes 5 +W 75 1 Aperçu $+ $chr(9) $+ Apercevoir la citation
    did -i quotes 6 1 bmpsize 16 16
    did -i quotes 6 1 setimage icon small $ico $+ dire.ico
    did -a quotes 6 +W 75 1 Dire $+ $chr(9) $+ Dire la citation
    did -i quotes 7 1 bmpsize 16 16
    did -i quotes 7 1 setimage icon small $ico $+ fermer.ico
    did -a quotes 7 +W 75 1 Fermer $+ $chr(9) $+ Fermer
  }
  if $devent == sclick {
    if $did == 3 { var %a = $?="Citation :" | write $scriptdir\quotes.txt %a | did -a quotes 1 %a } 
    if $did == 4 { write -dl $+ $did(1).sel $scriptdir\quotes.txt | did -d quotes 1 $did(1).sel }
    if $did == 5 { echo -a 1Aperçu : 12 $+ $did(1).seltext }  
    if $did == 6 { msg $active 1Citation : 12 $+ $did(1).seltext }
    if $did == 7 { timerquotes -mh 1 10 dialog -x quotes quotes }
  }
}
menu * { 
  Quotes Système:dialog -m quotes quotes
}

Conclusion :


Voilà, dites moi ce que vous en pensez :)

PS : Copiez le code dans les remotes puis téléchargez le zip que vous devez mettre dans la racine de votre mIRC ou Script.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
samedi 27 mai 2006
Statut
Membre
Dernière intervention
4 juin 2006

J'ai le même problème, même avec le zip, pas d'icônes ...
Messages postés
1052
Date d'inscription
samedi 10 juillet 2004
Statut
Membre
Dernière intervention
30 novembre 2009
2
super bien les icones ;)
Messages postés
21
Date d'inscription
dimanche 27 juin 2004
Statut
Membre
Dernière intervention
11 avril 2005

il faut télécharger le zip pour ca mais jai du mal avec des zip :(
Messages postés
2
Date d'inscription
mardi 4 mai 2004
Statut
Membre
Dernière intervention
5 mai 2004

pareil j'ai pas d'icône
Messages postés
1
Date d'inscription
mardi 23 mars 2004
Statut
Membre
Dernière intervention
8 avril 2004

J'ai aussi exactement le même problème... Les boutons ressemble même à des textbox :/

Sans ça, beau boulot ! (à la vue du scrshot ^^)
Afficher les 14 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.