Discussion :

[Mkn31]

Bonjour,

j'ai mis dans une procédure une condition mais je ne la trouves pas très jolie y'a t'il une meilleur solution pour incrémenter tous les "4" mes $nb_operation ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
if {$nb_operation== 5 || $nb_operation== 9  || $nb_operation== 13 || $nb_operation== 17 || $nb_operation== 21 } {
puts "ok"
}

Merci de votre aide

[bhamp0]

Modulo ?

expr $var % 4

[Mkn31]

j'ai finalement trouvé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
for { set i 1 } { $i < 9999 } { incr i 4 } {
if {$nb_operation == $i } {
puts "ok"
}
}

Merci

[bhamp0]

j'ai finalement trouvé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
for { set i 1 } { $i < 9999 } { incr i 4 } {
if {$nb_operation == $i } {
puts "ok"
}
}

Merci

Ce code est horrible !

Le code suivant fait la même chose mais sans la boucle for totalement pourrie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
if { [expr $nb_operation % 4] == 1 } {
puts "ok"
}

[Mkn31]

Ce code est horrible !

C'est pas mon métier c'est pour ça que je viens sur des forums comme celui ci
Merci pour cette autre solution

[Canvas]

Bonsoir,

C'est très honnête de reconnaître que programmer c'est un métier

Sinon pour revenir à la solution citée plus haut, il est possible de se passer de expr étant donnée que if évalue le contenu entre accolade comme une expression. Ce qui permet d'écrire simplement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
if {$nb_operation % 4 == 1} {
  puts "ok"
}