FoxPro/Visual FoxPro - ayuda en programacion foxpro

Ayuda, me podrian explicar como programas fox pro para crear un software que por escribir sus medidas el programa diga que tipo de triangulo es ,

por ejemplo

[text1] <--------medida 1
[text2]<---------medida 2
[text3] <---------medida 3

{comand1}

lo que quiero que haga el pregrama es ke al presionar el comand1 salga un cuadro de texto con el tipo de triangulo, ya hize todo y siempre me sale un error!! miren mis codigos y diganme en que me equivoco:

store 0 to text1 text2 text3

text1=thisform.text1.value
text2=thisform.text2.value
text3=thisform.text2.value

if value(text1)=Text2=text3
MESSAGEBOX("equilatero")
Else
If value(text1)<>text2<>text3
MESSAGEBOX("Escaleno")
Else
If value(text1)<>text2=text3
MESSAGEBOX("isoceles")
ENDIF

en que me equivoco???

No se si la tarea tenga que ser con if pero yo lo hago asi y funciona perfecto.

por cierto tu codigo deberia se ser



sin el value() que tu usas y con and para que evalue 2 situaciones.

hola :

mas alla que el codigo de es_binario es mas optimo ,te paso este que esta hecho usando la sentencia if :

saludos

STORE 0 TO text1,text2,text3

text1=VAL(thisform.text1.value)
text2=VAL(thisform.text2.value)
text3=VAL(thisform.text3.value)

if text1=Text2 AND text2=text3
MESSAGEBOX("equilatero")
Else
If text1<>text2 AND text2<>text3 AND text1<>text3
MESSAGEBOX("Escaleno")
Else
If ((text1<>text2 AND text2=text3) or;
(text1=text2 AND text2<>text3) OR ;
(text1=text3 AND text2<>text3))
MESSAGEBOX("isoceles")
ENDIF
endif
ENDIF

me corrijo:
en el codigo anterior que postee ,está demas la evaluacion que hago para saber si es isosceles el triangulo.al no ser escaleno ni equilatero estarian demas estas lineas :

if ((text1<>text2 AND text2=text3) or;
(text1=text2 AND text2<>text3) OR ;
(text1=text3 AND text2<>text3))

endif

despues del segundo else se muestra el mensaje que es isosceles y nada mas
saludos