Problème de progammation avec if et then goto ...
Posté le 04/10/2009 23:32
Bonsoir, j'ai un problème avec les fonctions if, then, goto, ...J'ai créé un programme de calcul d'escalier avec deux manières, et j'aimerai que au début du programme je puisse choisir entre ces deux manières, soit: "AVEC LIGNE DE GIRON" ou "SANS LONGUEUR LIGNE DE GIRON". Et qu'après avoir choisit, le programme lié démarre.
Mais mon programme bloque déjà au premier if !!
Si une personne pourrais m'aider...
Merci d'avance
voici mon programme:
Filename:ESCALIER
"AVEC LIGNE DE GIRON"?->If 0
Then goto->"AVEC LIGNE DE GIRON"
Else goto->"SANS LONGUEUR LIGNE DE GIRON"
IfEnd
"AVEC LIGNE DE GIRON"
"COTES EN mm"
"Hauteur palier"?->Y
"Longueur ligne de giron"?->X
"Nombre de hauteurs"
((2*Y)+X+250)/615[disp]
"Corriger nbre de hauteurs"?->Z
"Nombre de foulees"->Z-1[disp]
"Hauteur marche"
Y/(Z-1)[disp]
"Longueur foulee"X/(Z-1)[disp]
"Rapport"(2x(Y/(Z-1)))+1x(X/(Z-1)[disp]
"Pente escalier"tan-1(Y-((Y/(Z-1))))/X
"SANS LONGUEUR LIGNE DE GIRON"
"cotes en mm"
"Hauteur palier"?->Y
"Nombre de hauteurs"
Y/170
"corriger nbre de hauteurs"?->Z
"Nombre de foulees"
Z-1
"Hauteur marche"
Y/(Z-1)[disp]
"Longueur foulee"
630-(2x(y/(Z-1)))[disp]
"Rapport"
2*(Y/(Z-1))+(630-(2x(y/(Z-1))))[disp]
"Longueur ligne de giron"
(630-(2x(y/(Z-1))))/(Z-1)[disp]
"Pente escalier"tan-1(y-(y/(Z-1)/(630-(2x(y/(Z-1))))/(Z-1)
Fichier joint