Trouver une ressource (Nouvelle version du moteur, plus rapide & pertinent, essayez le !)
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
HL PERSO
Description
un petit gestionnaire d'hl,il est pas top,mais bon,pour l'ouvrir /hl,et c tout (enfin,ne pas oublié de charger l'addon dans le script quand mm :)
Source
- on *:load: { echo -a 12[4Inf012]12 Hl personnalisable chargé! Tape /hl pour l'ouvrir :) }
- alias hl { dialog -m hl hl }
- dialog hl {
- title "hl perso ßy Sad_[A]nG3L"
- size -1 -1 202 266
- text "Pseudo 1", 1, 8 8 45 12
- button "Activer", 2, 6 232 60 30, ok
- button "Desactiver", 3, 71 232 60 30, ok
- button "Close", 4, 135 232 60 30, ok flat
- text "Pseudo 2", 5, 8 32 44 12
- text "Pseudo 4", 6, 8 80 45 13
- text "Pseudo 3", 7, 8 56 45 13
- text "Pseudo 7", 8, 8 152 45 13
- text "Pseudo 8", 9, 8 176 45 13
- text "Pseudo 6", 10, 7 128 45 13
- text "Pseudo 5", 11, 8 104 45 13
- text "Pseudo 9", 12, 7 199 44 13
- edit "%hl1", 13, 72 7 105 22, autohs
- edit "%hl2", 14, 72 32 105 22, autohs
- edit "%hl3", 15, 72 56 105 22, autohs
- edit "%hl4", 16, 72 80 105 22, autohs
- edit "%hl5", 17, 72 104 105 22, autohs
- edit "%hl6", 18, 72 127 105 22, autohs
- edit "%hl7", 19, 72 152 105 22, autohs
- edit "%hl8", 20, 72 176 105 22, autohs
- edit "%hl9", 21, 72 200 105 22, autohs
- }
- on *:dialog:hl:init:*: {
- dll hl\mdx.dll SetMircVersion $version
- dll hl\mdx.dll MarkDialog $dname
- dll hl\mdx.dll SetDialog $dname bgcolor $rgb(146,12,249)
- dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 background $rgb(146,12,249)
- dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 text $rgb(255,255,255)
- dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 textbg $rgb(146,12,249)
- dll hl\mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 verdana 8 verdana
- }
-
- on 1:dialog:hl:edit:*: {
- if ($did == 13) {
- set %hl1 $did($dname,13)
- }
- if ($did == 14) {
- set %hl2 $did($dname,14)
- }
- if ($did == 15) {
- set %hl3 $did($dname,15)
- }
- if ($did == 16) {
- set %hl4 $did($dname,16)
- }
- if ($did == 17) {
- set %hl5 $did($dname,17)
- }
- if ($did == 18) {
- set %hl6 $did($dname,18)
- }
- if ($did == 19) {
- set %hl7 $did($dname,19)
- }
- if ($did == 20) {
- set %hl8 $did($dname,20)
- }
- if ($did == 21) {
- set %hl9 $did($dname,21)
- }
- }
-
- on 1:dialog:hl:sclick:*: {
- if ($did == 2) {
- set %hl on | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont activés !
- }
- if ($did == 3) {
- set %hl off | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont desactivés
- }
- }
-
- on 1:TEXT:*:*:{
- if ($chan != $active) { if (%hl == on) {
- if (%hl1 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl2 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl3 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl4 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl5 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl6 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl7 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl8 isin $1- 1) {
-
- .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
- if (%hl9 isin $1- 1) {
- }
- }
- }
- }
on *:load: { echo -a 12[4Inf012]12 Hl personnalisable chargé! Tape /hl pour l'ouvrir :) }
alias hl { dialog -m hl hl }
dialog hl {
title "hl perso ßy Sad_[A]nG3L"
size -1 -1 202 266
text "Pseudo 1", 1, 8 8 45 12
button "Activer", 2, 6 232 60 30, ok
button "Desactiver", 3, 71 232 60 30, ok
button "Close", 4, 135 232 60 30, ok flat
text "Pseudo 2", 5, 8 32 44 12
text "Pseudo 4", 6, 8 80 45 13
text "Pseudo 3", 7, 8 56 45 13
text "Pseudo 7", 8, 8 152 45 13
text "Pseudo 8", 9, 8 176 45 13
text "Pseudo 6", 10, 7 128 45 13
text "Pseudo 5", 11, 8 104 45 13
text "Pseudo 9", 12, 7 199 44 13
edit "%hl1", 13, 72 7 105 22, autohs
edit "%hl2", 14, 72 32 105 22, autohs
edit "%hl3", 15, 72 56 105 22, autohs
edit "%hl4", 16, 72 80 105 22, autohs
edit "%hl5", 17, 72 104 105 22, autohs
edit "%hl6", 18, 72 127 105 22, autohs
edit "%hl7", 19, 72 152 105 22, autohs
edit "%hl8", 20, 72 176 105 22, autohs
edit "%hl9", 21, 72 200 105 22, autohs
}
on *:dialog:hl:init:*: {
dll hl\mdx.dll SetMircVersion $version
dll hl\mdx.dll MarkDialog $dname
dll hl\mdx.dll SetDialog $dname bgcolor $rgb(146,12,249)
dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 background $rgb(146,12,249)
dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 text $rgb(255,255,255)
dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 textbg $rgb(146,12,249)
dll hl\mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 verdana 8 verdana
}
on 1:dialog:hl:edit:*: {
if ($did == 13) {
set %hl1 $did($dname,13)
}
if ($did == 14) {
set %hl2 $did($dname,14)
}
if ($did == 15) {
set %hl3 $did($dname,15)
}
if ($did == 16) {
set %hl4 $did($dname,16)
}
if ($did == 17) {
set %hl5 $did($dname,17)
}
if ($did == 18) {
set %hl6 $did($dname,18)
}
if ($did == 19) {
set %hl7 $did($dname,19)
}
if ($did == 20) {
set %hl8 $did($dname,20)
}
if ($did == 21) {
set %hl9 $did($dname,21)
}
}
on 1:dialog:hl:sclick:*: {
if ($did == 2) {
set %hl on | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont activés !
}
if ($did == 3) {
set %hl off | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont desactivés
}
}
on 1:TEXT:*:*:{
if ($chan != $active) { if (%hl == on) {
if (%hl1 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl2 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl3 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl4 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl5 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl6 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl7 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl8 isin $1- 1) {
.echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
if (%hl9 isin $1- 1) {
}
}
}
}
Conclusion
voila quelque temps que je m'acharne apres cette source,je me doute qu'elle est tres mal codé et qu'il y'a des beug,mais bon,je prend mon courage a deux mains et je decide de poster quand mm..
mon gestionnaire d'hl utilise MDX,je c tres bien que d'apprendre a utiliser MDX avant de savoir scripter comme il faut,c pas top mais bon..no comment
Historique
- 08 juillet 2006 08:24:22 :
- j'ai rajouter le nom de variables dans le dialog pour que sa regle le probleme du premier edit et que les mot reste dans le dialog apres réouverture
- 09 juillet 2006 15:46:32 :
- là correction est faite,merci pour ton aide RCA ArKanis,car j'avais oublié de rajouter les }
Pour le reste..je suis encore dessus,je pense galerer un petit moment,mais je vais m'en sortir :)
Sources de la même categorie
Commentaires
Discussions en rapport avec ce code source
|
CalendriCode
| | | L | M | M | J | V | S | D |
| | | | | 1 | 2 | 3 |
| 4 | 5 | 6 | 7 | 8 | 9 | 10 |
| 11 | 12 | 13 | 14 | 15 | 16 | 17 |
| 18 | 19 | 20 | 21 | 22 | 23 | 24 |
| 25 | 26 | 27 | 28 | 29 | 30 | 31 |
|
|