cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008
-
29 juin 2007 à 01:50
skotmarud
Messages postés116Date d'inscriptionsamedi 5 avril 2003StatutMembreDernière intervention26 janvier 2008
-
4 sept. 2007 à 11:07
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
skotmarud
Messages postés116Date d'inscriptionsamedi 5 avril 2003StatutMembreDernière intervention26 janvier 2008 4 sept. 2007 à 11:07
C'est un détail mais il est merveilleux je n'avais même pas fait attention. Oui les exeptions en fait... il en manquer à première vue !? (me rappel plus) Alors je ne les ai volontairement oublier (hm) ça raccourci au max t'as vu!
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 1 sept. 2007 à 18:28
ha oui pas bete mais 2 choses :
- $calc((100 + $int($calc(%i /39)))-1) devient $calc(99 + $int($calc(%i /39))) (c'est un detail certe)
- Tu as oublié toutes les exeptions qui avaient été mise en place.
sinon ca raccourci le code j'aime bien
skotmarud
Messages postés116Date d'inscriptionsamedi 5 avril 2003StatutMembreDernière intervention26 janvier 2008 1 sept. 2007 à 17:31
Je passais par là... quand j'ai vu les 6 while de ISoKa !!!
simplifiable en ceci :
while (%i <= 255) { did -a Ascii $calc((100 + $int($calc(%i /39)))-1) $chr(%i) | inc %i }
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 3 juil. 2007 à 19:14
je métrait a jours la source des que possible la j'ai pas trop le temps.
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 3 juil. 2007 à 14:15
okok ;) thx
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 3 juil. 2007 à 13:27
zarb ca, je testerai ca pour voir mais ca m'etonne
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 3 juil. 2007 à 11:56
a oui juste une question ISoKa le premier bouton modif marche pas j'ai cliquer sur le premier bouton modif et aprè sur la listbox sa n'affiche rien sur leditbox 1.
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 2 juil. 2007 à 13:19
mais comme je te di par contre tu peux pas faire de copier/coller des listbox ver les editbox, faut cliquer sur le modif de chaque editbox puis sur les listbox pour rajouter du texte dedans
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 2 juil. 2007 à 10:31
:o cool cool thx ISoKa sa me plait le code la ^^
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 2 juil. 2007 à 01:18
Voila j'ai fai ca rapide, j't pas refai tes control mdx machin tout ca n'y fai en sorte ke ca stock dans tes var %decoraX mais bon juste un exemple koi pour que tu vois une possibilité de raccourcir le code et de le rendre plus simple d'utilisations puisque tu es plus obligé de faire des copié collé :
dialog Ascii {
title "Ascii"
size -1 -1 283 265
option dbu
text "Tu peux créer temporairement des phrases ASCII ici :", 2, 46 2 152 7, center
edit %decora1, 2000, 44 23 156 12, autohs
edit %decora2, 2001, 44 45 156 12, autohs
edit %decora3, 2002, 44 67 156 12, autohs
edit %decora4, 2003, 44 89 156 12, autohs
edit %decora5, 2004, 44 111 156 12, autohs
edit %decora6, 2005, 44 133 156 12, autohs
edit %decora7, 2006, 44 155 156 12, autohs
edit %decora8, 2007, 44 177 156 12, autohs
edit %decora9, 2008, 44 199 156 12, autohs
edit %decora10, 2009, 44 220 156 12, autohs
text " L'index Des Couleurs[ ctrl+k ]|- - - -|Le Texte En Gras[ ctrl+b ] Le Text Souligné[ ctrl+u ]|----|Le Texte Sans Couleurs[ ctrl+o ]", 50, 45 236 155 15, center
button "Enregistrer", 51, 63 252 37 12, ok
button "Info Ascii", 54, 102 252 37 12
button "Annuler", 98, 141 252 37 12, cancel
text "Décoration 1", 25, 44 15 156 8, center
text "Décoration 2", 26, 44 37 156 8, center
text "Décoration 3", 27, 44 59 156 8, center
text "Décoration 4", 28, 44 81 156 8, center
text "Décoration 5", 48, 44 103 156 8, center
text "Décoration 6", 55, 44 125 156 8, center
text "Décoration 7", 57, 44 147 156 8, center
text "Décoration 8", 81, 44 169 156 8, center
text "Décoration 9", 96, 44 191 156 8, center
text "Décoration 10", 99, 44 212 156 8, center
button "Modif", 1000, 204 24 31 12
button "Modif", 1001, 205 46 31 12
button "Modif", 1002, 205 68 31 12
button "Modif", 1003, 205 90 31 12
button "Modif", 1004, 205 112 31 12
button "Modif", 1005, 205 134 31 13
button "Modif", 1006, 205 157 31 13
button "Modif", 1007, 205 178 31 13
button "Modif", 1008, 205 200 31 13
button "Modif", 1009, 205 220 31 13
list 100, 1 2 14 261, size
list 101, 15 2 14 261, size
list 102, 29 2 14 261, size
list 103, 238 2 14 260, size
list 104, 252 2 14 260, size
list 105, 266 2 14 259, size
}
on *:dialog:Ascii:*:*:{
if ($devent == init) {
var %i 32
while (%i <= 70) { did -a ascii 100 $chr(%i) | inc %i }
while (%i <= 109) {
if (%i !isin 127 129 143 144) { did -a ascii 101 $chr(%i) }
inc %i
}
while (%i <= 148) {
if (%i !isin 157 160) { did -a ascii 102 $chr(%i) }
inc %i
}
while (%i <= 187) { did -a ascii 103 $chr(%i) | inc %i }
while (%i <= 226) { did -a ascii 104 $chr(%i) | inc %i }
while (%i <= 255) { did -a ascii 105 $chr(%i) | inc %i }
}
elseif ($devent == sclick) {
if ($did isnum 1000-1009) { set %varduascii $right($did,1) }
elseif (($did isnum 100-105) && (%varduascii)) { var %t $did(ascii,200 $+ %varduascii) $+ $did(ascii,$did).seltext | did -r ascii 200 $+ %varduascii | did -a ascii 200 $+ %varduascii %t }
}
}
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 1 juil. 2007 à 21:31
j'ai une idée de comment optimiser ca pas mal si j'ai 2min je ferai ca rapidement :)
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 1 juil. 2007 à 16:00
heu lol jy etait pas ^^ dsl uaip tu est allé quand ?
uaip
Messages postés1466Date d'inscriptionmardi 20 février 2007StatutMembreDernière intervention 7 février 2011 1 juil. 2007 à 15:58
regrouper les ID n'est pas une mauvaise idée (j'avais pas compris le 1er post)
PS : pas besoin d'etre pro pour savoir scripter :)
PS2 : jsuis allé sur tes 2servs Dragounix, yavait personne :p
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 1 juil. 2007 à 11:10
ok ok je vais eseiller mais je te promè rien :s
COOLMAN002
Messages postés969Date d'inscriptionlundi 16 juin 2003StatutMembreDernière intervention 1 juillet 20121 30 juin 2007 à 23:58
Je ne te dis pas de supprimer ton devent mais de modifier tes ID de tes EDIT afin d'alléger ton code
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 30 juin 2007 à 21:04
xD arf si je savait scripter mieux :s c'est pas juste :(
uaip
Messages postés1466Date d'inscriptionmardi 20 février 2007StatutMembreDernière intervention 7 février 2011 30 juin 2007 à 20:40
lol coolman002, ca fait plaisir de voir que jsuis pas le seul a m'en soucier ^^
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 30 juin 2007 à 10:37
j'efface tous ? et je mes if ($did isnum 1-10) set $+(%decora,$did) $did($did) ? a la places des if ($did == 21) set %decora1 $did(21)... ect COOLMAN002 ?
COOLMAN002
Messages postés969Date d'inscriptionlundi 16 juin 2003StatutMembreDernière intervention 1 juillet 20121 29 juin 2007 à 21:26
Bonsoir,
euh, je vois pas trop l'utilité...
/run charmap ?
Sinon, le "devent" "edit" peut être largement racourci si tu modifiais les ID de tes edits...
en ID 1 tu mets %decora1 ainsi de suite... comme ca dans ton devent tu fais if ($did isnum 1-10) set $+(%decora,$did) $did($did)
uaip
Messages postés1466Date d'inscriptionmardi 20 février 2007StatutMembreDernière intervention 7 février 2011 29 juin 2007 à 16:38
de rien ^^
(bon ya encore d'autres petits détails comme ca qu'on peut optimiser, mais jpense que jsuis le seul a m'en soucier ^^)
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 29 juin 2007 à 16:32
cool sa marche merci uaip :d
uaip
Messages postés1466Date d'inscriptionmardi 20 février 2007StatutMembreDernière intervention 7 février 2011 29 juin 2007 à 16:29
oulah, mais oui en effet, j'ai oublié les ) :s [dsl]
enfait c'est un truc tout bete, mais ca évite certains pb parfois genre * Dialog déjà existant
on *:dialog:Ascii:sclick:54:$iif($dialog(infoascii),dialog -x infoascii infoascii) | dialog -m infoascii infoascii
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 29 juin 2007 à 16:22
heu non je veut pas que sa s'affiche dans une window. mais merci pour ton aide mais j'ai eseiller tes source marche pas sa m'affiche * Format non valide: $iif :s
uaip
Messages postés1466Date d'inscriptionmardi 20 février 2007StatutMembreDernière intervention 7 février 2011 29 juin 2007 à 16:13
les whiles marchent pas ds la table, je crois.. mais c'est vrai que c'est un peu "lourd".. ce que tu peux faire, c'est un ptit truc genre tu tappe ton caractere (ex : ? ) et ca te retourne le nbr ascii, ou inversement, avec une option 'tout afficher' et ca affiche tt dans une window...
ptite touche aussi :
on *:dialog:Ascii:sclick:54: { dialog -m infoascii infoascii }
devient
on *:dialog:Ascii:sclick:54:$iif(!$dialog(infoascii,dialog -m infoascii infoascii)
ou
on *:dialog:Ascii:sclick:54:$iif($dialog(infoascii,dialog -x infoascii infoascii) | dialog -m infoascii infoascii
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 29 juin 2007 à 11:14
MaX_62 ba crée des phrases ascii pour s'amuser et les montré en tout qua dans mon script il aime bien mon ascii pour crée des slaps. =)
MaX_62
Messages postés879Date d'inscriptionvendredi 22 octobre 2004StatutMembreDernière intervention29 juin 2007 29 juin 2007 à 11:09
Idem, je suis pas fan du dialog, une picture window aurait pu être une bonne alternative ;)
Mais bon, on va pas te faire tout recommencer ^^
Par contre j'ai pas bien pigé l'utilité, ça sert à faire quoi grosso modo ?
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 29 juin 2007 à 10:25
IsoKa heu.. sa fait 1an que j'ai plus scripter je me souvien de pas grand choses quand je touche plus a lordi >< si tu pouvai me montré un peut a quoi sa peut ressemblé Thanks :)
cs_ISoKa
Messages postés435Date d'inscriptionjeudi 27 avril 2006StatutMembreDernière intervention17 octobre 2008 29 juin 2007 à 01:50
je trouve la facon dont es fai le dialogue un peu "lourde", je m'explique :
un dialogue aussi gros pour un add-on finalement qui ne fai pas tellement de choses que ca me semble injustifié. essaye plutot de faire des edit plus grande qui regrouperai tes dizaines d'edit et rempli les avec un while ou meme rentre un while dans la creation de la table de dialogue ( j'ai jamais essayé ca par contre donc je suis pas sur que ca marche) enfin bref essai peut etre de regrouper ton code pour que sa taille soit plus en raport avec son utilité.
4 sept. 2007 à 11:07
1 sept. 2007 à 18:28
- $calc((100 + $int($calc(%i /39)))-1) devient $calc(99 + $int($calc(%i /39))) (c'est un detail certe)
- Tu as oublié toutes les exeptions qui avaient été mise en place.
sinon ca raccourci le code j'aime bien
1 sept. 2007 à 17:31
simplifiable en ceci :
while (%i <= 255) { did -a Ascii $calc((100 + $int($calc(%i /39)))-1) $chr(%i) | inc %i }
3 juil. 2007 à 19:14
3 juil. 2007 à 14:15
3 juil. 2007 à 13:27
3 juil. 2007 à 11:56
2 juil. 2007 à 13:19
2 juil. 2007 à 10:31
2 juil. 2007 à 01:18
dialog Ascii {
title "Ascii"
size -1 -1 283 265
option dbu
text "Tu peux créer temporairement des phrases ASCII ici :", 2, 46 2 152 7, center
edit %decora1, 2000, 44 23 156 12, autohs
edit %decora2, 2001, 44 45 156 12, autohs
edit %decora3, 2002, 44 67 156 12, autohs
edit %decora4, 2003, 44 89 156 12, autohs
edit %decora5, 2004, 44 111 156 12, autohs
edit %decora6, 2005, 44 133 156 12, autohs
edit %decora7, 2006, 44 155 156 12, autohs
edit %decora8, 2007, 44 177 156 12, autohs
edit %decora9, 2008, 44 199 156 12, autohs
edit %decora10, 2009, 44 220 156 12, autohs
text " L'index Des Couleurs[ ctrl+k ]|- - - -|Le Texte En Gras[ ctrl+b ] Le Text Souligné[ ctrl+u ]|----|Le Texte Sans Couleurs[ ctrl+o ]", 50, 45 236 155 15, center
button "Enregistrer", 51, 63 252 37 12, ok
button "Info Ascii", 54, 102 252 37 12
button "Annuler", 98, 141 252 37 12, cancel
text "Décoration 1", 25, 44 15 156 8, center
text "Décoration 2", 26, 44 37 156 8, center
text "Décoration 3", 27, 44 59 156 8, center
text "Décoration 4", 28, 44 81 156 8, center
text "Décoration 5", 48, 44 103 156 8, center
text "Décoration 6", 55, 44 125 156 8, center
text "Décoration 7", 57, 44 147 156 8, center
text "Décoration 8", 81, 44 169 156 8, center
text "Décoration 9", 96, 44 191 156 8, center
text "Décoration 10", 99, 44 212 156 8, center
button "Modif", 1000, 204 24 31 12
button "Modif", 1001, 205 46 31 12
button "Modif", 1002, 205 68 31 12
button "Modif", 1003, 205 90 31 12
button "Modif", 1004, 205 112 31 12
button "Modif", 1005, 205 134 31 13
button "Modif", 1006, 205 157 31 13
button "Modif", 1007, 205 178 31 13
button "Modif", 1008, 205 200 31 13
button "Modif", 1009, 205 220 31 13
list 100, 1 2 14 261, size
list 101, 15 2 14 261, size
list 102, 29 2 14 261, size
list 103, 238 2 14 260, size
list 104, 252 2 14 260, size
list 105, 266 2 14 259, size
}
on *:dialog:Ascii:*:*:{
if ($devent == init) {
var %i 32
while (%i <= 70) { did -a ascii 100 $chr(%i) | inc %i }
while (%i <= 109) {
if (%i !isin 127 129 143 144) { did -a ascii 101 $chr(%i) }
inc %i
}
while (%i <= 148) {
if (%i !isin 157 160) { did -a ascii 102 $chr(%i) }
inc %i
}
while (%i <= 187) { did -a ascii 103 $chr(%i) | inc %i }
while (%i <= 226) { did -a ascii 104 $chr(%i) | inc %i }
while (%i <= 255) { did -a ascii 105 $chr(%i) | inc %i }
}
elseif ($devent == sclick) {
if ($did isnum 1000-1009) { set %varduascii $right($did,1) }
elseif (($did isnum 100-105) && (%varduascii)) { var %t $did(ascii,200 $+ %varduascii) $+ $did(ascii,$did).seltext | did -r ascii 200 $+ %varduascii | did -a ascii 200 $+ %varduascii %t }
}
}
1 juil. 2007 à 21:31
1 juil. 2007 à 16:00
1 juil. 2007 à 15:58
PS : pas besoin d'etre pro pour savoir scripter :)
PS2 : jsuis allé sur tes 2servs Dragounix, yavait personne :p
1 juil. 2007 à 11:10
30 juin 2007 à 23:58
30 juin 2007 à 21:04
30 juin 2007 à 20:40
30 juin 2007 à 10:37
29 juin 2007 à 21:26
euh, je vois pas trop l'utilité...
/run charmap ?
Sinon, le "devent" "edit" peut être largement racourci si tu modifiais les ID de tes edits...
en ID 1 tu mets %decora1 ainsi de suite... comme ca dans ton devent tu fais if ($did isnum 1-10) set $+(%decora,$did) $did($did)
29 juin 2007 à 16:38
(bon ya encore d'autres petits détails comme ca qu'on peut optimiser, mais jpense que jsuis le seul a m'en soucier ^^)
29 juin 2007 à 16:32
29 juin 2007 à 16:29
enfait c'est un truc tout bete, mais ca évite certains pb parfois genre * Dialog déjà existant
on *:dialog:Ascii:sclick:54:$iif($dialog(infoascii),dialog -x infoascii infoascii) | dialog -m infoascii infoascii
29 juin 2007 à 16:22
29 juin 2007 à 16:13
ptite touche aussi :
on *:dialog:Ascii:sclick:54: { dialog -m infoascii infoascii }
devient
on *:dialog:Ascii:sclick:54:$iif(!$dialog(infoascii,dialog -m infoascii infoascii)
ou
on *:dialog:Ascii:sclick:54:$iif($dialog(infoascii,dialog -x infoascii infoascii) | dialog -m infoascii infoascii
29 juin 2007 à 11:14
29 juin 2007 à 11:09
Mais bon, on va pas te faire tout recommencer ^^
Par contre j'ai pas bien pigé l'utilité, ça sert à faire quoi grosso modo ?
29 juin 2007 à 10:25
29 juin 2007 à 01:50
un dialogue aussi gros pour un add-on finalement qui ne fai pas tellement de choses que ca me semble injustifié. essaye plutot de faire des edit plus grande qui regrouperai tes dizaines d'edit et rempli les avec un while ou meme rentre un while dans la creation de la table de dialogue ( j'ai jamais essayé ca par contre donc je suis pas sur que ca marche) enfin bref essai peut etre de regrouper ton code pour que sa taille soit plus en raport avec son utilité.