RCA ArKanis
Messages postés1287Date d'inscriptionmercredi 21 avril 2004StatutMembreDernière intervention21 février 2009 25 févr. 2006 à 15:16
J'viens de voir que mIRC 6.17 avait désormais l'équivalent de cet alias ^^
"Added $inellipse(x,y,x,y,w,h) and $inroundrect(x,y,x,y,w,h,w,h)."
cs_wims
Messages postés2466Date d'inscriptionvendredi 23 juillet 2004StatutMembreDernière intervention 1 août 20101 26 déc. 2005 à 21:45
J'ai corriger les ptites fautes
L'utilisation est la meme que pour $inrect c'est juste que l'ordre des parametre est "inversé" et je prefere d'abord donner la taille avant les coordonnées :)
Oui ce n'est pas tres precis , peux etre que je peux rajouté 4 ou 8 autres points de verification car pour l'instant je prend juste les coordonné du milieu de chaque quart de rond , il suffit de reprendre le milieu de ce milieu ( en haut et en bas de ce milieu dans chaque quart de rond ) ( enjoy pour comprendre mais j'arriverai pas a expliquer mieux )
AgoRa_ScripT
Messages postés136Date d'inscriptionjeudi 22 juillet 2004StatutMembreDernière intervention20 octobre 2007 26 déc. 2005 à 20:27
Utilisation : $incircle(x,y,w,h,xsouris,ysouris)
dommage que ça ne soit pas ds le même sens que $inrect $inrect(xsouris,ysouris,x,y,w,h)
j'aurais ptetre fais à place:
alias incircle {
if $remove($1-,$chr(32)) !isnum { return Erreur }
elseif ($0 != 6) { echo -a $($incircle,0) : $iif($0 < 6,Pas assez,Trop) de paramètres. | return Erreur }
...
}
pour supprimer ($1 !isnum || $2 !isnum || $3 !isnum || $4 !isnum || $5 !isnum || $6 !isnum)
je chipote un peu, une faute d'orthographe $iif($0 < 6,Pas assez,Trop) de paramETRES.
sinon c'pas mal.
RCA ArKanis
Messages postés1287Date d'inscriptionmercredi 21 avril 2004StatutMembreDernière intervention21 février 2009 26 déc. 2005 à 14:13
En fait mon screen semble montrer que tu as la hauteur d'un point qui est mal placée, va savoir lequel now :)
celui qui est en bas à droite, c'est sûr, mais tu sauras rapidement lequel c'est vu que c'est toi qui l'a codé.
Pour ma part, il faudrait que je m'y penche plus longtemps afin de te dire quel point est pas bon, et comment le corriger :)
RCA ArKanis
Messages postés1287Date d'inscriptionmercredi 21 avril 2004StatutMembreDernière intervention21 février 2009 26 déc. 2005 à 14:09
ça serait plutôt du "in"ellipse :)
très bien codé, mais à mon avis il y a quelques imprecisions (vu que tu définis ton cercle comme un ensemble fini de points, et c'est pas du tout le cas)
Exemple avec une très grosse ellipse :
alias ex {
if ($window(@t)) { window -c @t | return }
window -dCpk +sbx @t 0 0 300 600
drawrect -e @t 1 1 2 2 196 580
}
alias ex1 {
var %a = $incircle(2,2,196,580,$1,$2)
drawrect -f @t 0 0 200 100 100 25
drawtext @t 1 verdana 20 200 100 $iif(%a $true,$($true,0),$iif(%a $false,$($false,0),Erreur))
if (%a) drawdot @t 12 1 $1 $2
if (!%a) drawdot @t 4 1 $1 $2
}
j'ai changé sclick en mouse aussi, pour pas y passer trop de temps :D
les points rouges <=> $false
les points bleus <=> $true
ça me donne : http://arkanisfr.free.fr/@t.bmp j'suis d'accord qu'en général on ne dessine pas de grosse ellipse mais bon ... :)
y'aurait pas moyen de faire autrement, en passant par la distance d'un foyer (ou du centre) au point ? :D
pour un cercle, ça doit être plus ou moins facile, mais pour une ellipse ...
j'crois pas qu'on l'ait fait en maths, j'peux pas t'aider :)
Sinon 9/10 pour la beauté et la complexité du code :D
25 févr. 2006 à 15:16
"Added $inellipse(x,y,x,y,w,h) and $inroundrect(x,y,x,y,w,h,w,h)."
26 déc. 2005 à 21:45
L'utilisation est la meme que pour $inrect c'est juste que l'ordre des parametre est "inversé" et je prefere d'abord donner la taille avant les coordonnées :)
Oui ce n'est pas tres precis , peux etre que je peux rajouté 4 ou 8 autres points de verification car pour l'instant je prend juste les coordonné du milieu de chaque quart de rond , il suffit de reprendre le milieu de ce milieu ( en haut et en bas de ce milieu dans chaque quart de rond ) ( enjoy pour comprendre mais j'arriverai pas a expliquer mieux )
26 déc. 2005 à 20:27
dommage que ça ne soit pas ds le même sens que $inrect $inrect(xsouris,ysouris,x,y,w,h)
j'aurais ptetre fais à place:
alias incircle {
if $remove($1-,$chr(32)) !isnum { return Erreur }
elseif ($0 != 6) { echo -a $($incircle,0) : $iif($0 < 6,Pas assez,Trop) de paramètres. | return Erreur }
...
}
pour supprimer ($1 !isnum || $2 !isnum || $3 !isnum || $4 !isnum || $5 !isnum || $6 !isnum)
je chipote un peu, une faute d'orthographe $iif($0 < 6,Pas assez,Trop) de paramETRES.
sinon c'pas mal.
26 déc. 2005 à 14:13
celui qui est en bas à droite, c'est sûr, mais tu sauras rapidement lequel c'est vu que c'est toi qui l'a codé.
Pour ma part, il faudrait que je m'y penche plus longtemps afin de te dire quel point est pas bon, et comment le corriger :)
26 déc. 2005 à 14:09
très bien codé, mais à mon avis il y a quelques imprecisions (vu que tu définis ton cercle comme un ensemble fini de points, et c'est pas du tout le cas)
Exemple avec une très grosse ellipse :
alias ex {
if ($window(@t)) { window -c @t | return }
window -dCpk +sbx @t 0 0 300 600
drawrect -e @t 1 1 2 2 196 580
}
alias ex1 {
var %a = $incircle(2,2,196,580,$1,$2)
drawrect -f @t 0 0 200 100 100 25
drawtext @t 1 verdana 20 200 100 $iif(%a $true,$($true,0),$iif(%a $false,$($false,0),Erreur))
if (%a) drawdot @t 12 1 $1 $2
if (!%a) drawdot @t 4 1 $1 $2
}
j'ai changé sclick en mouse aussi, pour pas y passer trop de temps :D
les points rouges <=> $false
les points bleus <=> $true
ça me donne : http://arkanisfr.free.fr/@t.bmp
j'suis d'accord qu'en général on ne dessine pas de grosse ellipse mais bon ... :)
y'aurait pas moyen de faire autrement, en passant par la distance d'un foyer (ou du centre) au point ? :D
pour un cercle, ça doit être plus ou moins facile, mais pour une ellipse ...
j'crois pas qu'on l'ait fait en maths, j'peux pas t'aider :)
Sinon 9/10 pour la beauté et la complexité du code :D