Ti voyage 200 bugs

Neue Frage »

Harak Auf diesen Beitrag antworten »
Ti voyage 200 bugs
Meine Frage:
Hallo liebe gemeinde

ich versuche gerade ein ti programm zu schreiben. da ich noch recht am anfang meiner programmier erfahrungen bin benötige ich hilfe von euch. im prinzip geht es darum, dass ich eine lange formel habe und diese, je nachdem man welche variabel braucht berechnet. ich benutzte das ti programm editor for voyage 200.
wenn man das programm nun startet wird durch ein popup die möglichen variabeln gelistet und man wählt dann eins aus. die auswahl wird gespeichert und danach in das program eingespeist. dieser findet dann die richtige formel und man wird aufgefordert die einzelnen werte für die jeweiligen variabeln einzutippen. das ganze sieht dann so aus:

()
Prgm
local wahl
popup {"Q","B","R","Lambdaf","Rohf","Rohd","Ts","Tw","H","Nf"},wahl
If wahl=1
goto q
Elseif wahl=2
goto b
Elseif wahl=3
goto r
Elseif wahl=4
goto lambdaf
Elseif wahl=5
goto rohf
Elseif wahl=6
goto rohd
elseif wahl=7
goto ts
elseif wahl=8
goto tw
elseif wahl=9
goto h
elseif wahl=10
goto nf


lbl b
Local q,r,lambdaf,rohf,rohd,ts,tw,h,nf
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "RohD",rohd
Input "Ts",ts
Input "Tw",tw
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),b)»b
Disp "Hier B",b
goto end

lbl r
Local b,q,lambdaf,rohf,rohd,ts,tw,h,nf
Input "Q",q
Input "B",b
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "RohD",rohd
Input "Ts",ts
Input "Tw",tw
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),r)»r
Disp "Hier R",r
goto end

lbl lambdaf
Local q,r,b,rohf,rohd,ts,tw,h,nf
Input "Q",q
Input "r",r
Input "B",b
Input "RohF",rohf
Input "RohD",rohd
Input "Ts",ts
Input "Tw",tw
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),lambdaf)»lambdaf
Disp "Hier Lambdaf",lambdaf
goto end

lbl rohf
Local q,r,lambdaf,b,rohd,ts,tw,h,nf
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "B",b
Input "RohD",rohd
Input "Ts",ts
Input "Tw",tw
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),rohf)»rohf
Disp "Hier Rohf",rohf
goto end

lbl rohd
Local q,r,lambdaf,rohf,b,ts,tw,h,nf
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "B",b
Input "Ts",ts
Input "Tw",tw
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),rohd)»rohd
Disp "Hier RohD",rohd
goto end

lbl ts
Local q,r,lambdaf,rohf,rohd,b,tw,h,nf
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "RohD",rohd
Input "B",b
Input "Tw",tw
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),ts)»ts
Disp "Hier Ts",ts
goto end

lbl tw
Local q,r,lambdaf,rohf,rohd,ts,b,h,nf
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "RohD",rohd
Input "Ts",ts
Input "B",b
Input "H",h
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),tw)»tw
Disp "Hier Tw",tw
goto end

lbl h
Local q,r,lambdaf,rohf,rohd,ts,tw,b,nf
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "RohD",rohd
Input "Ts",ts
Input "Tw",tw
Input "B",b
Input "NF",nf
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),h)»h
Disp "Hier H",h
goto end

lbl nf
Local q,r,lambdaf,rohf,rohd,ts,tw,h,b
Input "Q",q
Input "r",r
Input "LambdaF",lambdaf
Input "RohF",rohf
Input "RohD",rohd
Input "Ts",ts
Input "Tw",tw
Input "H",h
Input "B",b
solve(q=4/3*b*root((r*9,81*lambdaf^3*rohf*(rohf-rohd)*(ts-tw)^3*h^3)/4*nf,4),b)»b
Disp "Hier Nf",nf
goto end

Lbl end
EndPrgm

er gibt zumal expected endprgm in der 7 zeile mit
goto q
(endprgrm) <---- hier wird dies erwartet
elseif...

ausserdem wird jedesmal bei den formel ein ) erwartet. ich versteh das leider nicht. ich hoffe ihr könnt mir helfen. vielen dank

Meine Ideen:
ideen habe ich ja leider keine mehr
Neue Frage »
Antworten »



Verwandte Themen

Die Beliebtesten »
Die Größten »
Die Neuesten »