Page 1 sur 1

[R] Variables et Coordonnées

Posté : mar. 15 juil. 2008 22:41
par aeko
Bonsoir =)

Pourriez-vous m'aider à trouver le moyen d'additionner des coordonnées ?
Je m'explique :

Nous avons un segment avec à ses extremités le point A et le point B.
Disons qu'on a le point A (1000,500) et le point B (1500,700).
J'aimerai trouver une cmd permettant de déplacer le point B de sorte que le point A se retrouve à l'emplacement du point B. ( les deux points sont liés par le segment )

Donc (1500,700) - (1000,500) = (500,200)
(1500,700) + (500,200) = (2000,900)

Le point B se retrouve donc à (2000,900) et le point A sur (1500,700), ( les anciennes coords de A )

Voila si vous m'avez suivi ^^ j'aimerai savoir si c'est réalisable sous Autoit, ce genre d'opération.

Re: [..] Variables et Coordonnées

Posté : mar. 15 juil. 2008 22:45
par jbnh
Tu devrais pouvoir te débrouiller avec ceci :
http://www.autoitscript.com/autoit3/doc ... rators.htm

Re: [..] Variables et Coordonnées

Posté : mar. 15 juil. 2008 22:48
par aeko
Merci je vais regarder ça.

Re: [..] Variables et Coordonnées

Posté : mar. 15 juil. 2008 23:08
par Tlem
Juste pour le fun :lol:

Code : Tout sélectionner

Dim $Ax = 1000, $Ay = 500
Dim $Bx = 1500, $By = 700
Dim $Xx, $Xy

MsgBox(64, "Info", "Point de départ : "  & @TAB & @CRLF& _
@CRLF & "A = " & $Ax & " x " & $Ay & _
@CRLF & "B = " & $Bx & " x " & $By)

; Mise en 'cache' des coordonnées de B
$Xx = $Bx
$Xy = $By
; Attribution des nouvelles coordonnées de B
$Bx = ($Bx - $Ax) + $Bx
$By = ($By - $Ay) + $By
; Attribution des anciennes coordonnées de B à A
$Ax = $Xx
$Ay = $Xy

MsgBox(64, "Info", "Point d'arrivée : "  & @TAB & @CRLF& _
@CRLF & "A = " & $Ax & " x " & $Ay & _
@CRLF & "B = " & $Bx & " x " & $By)
 

Re: [R] Variables et Coordonnées

Posté : mer. 16 juil. 2008 00:05
par aeko
Merci ! :D