$incircle

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 624 fois - Téléchargée 30 fois

Contenu du snippet

Aucune description n'est fournie pour ce projet

A voir également

Ajouter un commentaire

Commentaires

RCA ArKanis
Messages postés
1287
Date d'inscription
mercredi 21 avril 2004
Statut
Membre
Dernière intervention
21 février 2009
-
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és
2466
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
1 août 2010
1 -
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és
140
Date d'inscription
jeudi 22 juillet 2004
Statut
Membre
Dernière intervention
20 octobre 2007
-
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és
1287
Date d'inscription
mercredi 21 avril 2004
Statut
Membre
Dernière intervention
21 février 2009
-
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és
1287
Date d'inscription
mercredi 21 avril 2004
Statut
Membre
Dernière intervention
21 février 2009
-
ç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

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.