TI-BASIC Taschenrechner Programm Problem

[K0rnbr0t]

Hi Leute,

Ich hab grad ne sehr große zwickmühle und komme nicht weiter. Ich muss was für eine AG machen. Und zwar ein Taschenrechner Programm.Das Programm enthält 6 Variablen , weil man nicht zwei nullen in eine variable speichen kann. deswegen besitzt das Programm 6 variablen

ZR:MY:WH

Dieses Ausgabe Format besitzt das Programm. Es Werden die Variablen Z,R,M,Y,W und H. Folgenden Anfangs-Code besitzt das Programm.

EDIT : Dieses Programm soll ein Countdown ausführen. Man gibt zuerst die Zahl ein im XX:XX:XX Format ein und dann soll er ein Countdown ausführen

:ClrHome
:Output(1,1,"ZAHLEN EINGEBEN. ENTER DRUECKEN WENN BEREIT. FORMAT :                       XX:XX:XX")
:Pause
:ClrHome
:Input Z
:ClrHome
:Output(3,1,Z)
:Input R
:ClrHome
:Output(3,1,Z)
:Output(3,2,R)
:Output(3,3,":")
:Input M
:ClrHome
:Output(3,1,Z)
:Output(3,2,R)
:Output(3,3,":")
:Output(3,4,M)
:Input Y
:ClrHome
:Output(3,1,Z)
:Output(3,2,R)
:Output(3,3,":")
:Output(3,4,M)
:Output(3,5,Y)
:Output(3,6,":")
:Input W
:ClrHome
:Output(3,1,Z)
:Output(3,2,R)
:Output(3,3,":")
:Output(3,4,M)
:Output(3,5,Y)
:Output(3,6,":")
:Output(3,7,W)
:Input H
:ClrHome
:Output(3,1,Z)
:Output(3,2,R)
:Output(3,3,":")
:Output(3,4,M)
:Output(3,5,Y)
:Output(3,6,":")
:Output(3,7,W)
:Output(3,8,H)
:If H>9 or W>5 or Y>9 or M>5
:Then
:ClrHome
:Output(1,1,"ERROR : ZU HOHE ZAHL IN VARIABLE. LIMIT IM FORMAT : XX:59:59")
:Stop
:End
:Lbl 1
:Output(1,1,Z)
:Output(1,2,R)
:Output(1,3,":")
:Output(1,4,M)
:Output(1,5,Y)
:Output(1,6,":")
:Output(1,7,W)
:Output(1,8,H)
:Output(3,1,"COUNTDOWN LAEUFT")
:For(X,1,350)
:End

Ab hier Beginnt die Rechnung. Da scheitert mein Projekt hat einer eine Idee?

Mfg k0rnbRoT

[K0rnbr0t]

Ahhhh hab das Problem in Griff bekommen

[f0rtex]

Allgemein guter Stil ist es, wenn man die Lösung publiziert und nicht nur sagt, ich habs selber gelöst

Gruss
f0rtex

[mamue]

Ich werde mich in nächster Zeit intensiver mit den Taschenrechnern von TI auseinandersetzen, da ich einen Programmier-AG für Schüler anbieten werde.
Im letzten Jahr hatte ich Java auf Lego-Mindstorms gemacht, in diesem Jahr mußten alle Klassen sich diesen TI-84plus anschaffen, da bietet sich das eigentlich an. Kurz und gut, auch mich würde die Lösung des Problems interessieren.

Danke,
mamue

[bischi]

...in diesem Jahr mußten alle Klassen sich diesen TI-84plus anschaffen, da bietet sich das eigentlich an.

Alle Klassen? Welche Stufe? Die Dinger sind ja richtig teuer...

MfG Bischi

[mamue]

Alle Klassen? Welche Stufe? Die Dinger sind ja richtig teuer...

MfG Bischi

Die sind richtig teuer stimmt. Alle Schüler ab der sechsten oder zumindest der siebten Klassen mußten die anschaffen. Ich persönlich bezweifle stark, dass man vor dem 6. Semester Maschinenbau so ein Ding wirklich benötigt, aber ich wurde auch nicht gefragt. Wenn die aber nun schon mal da sind, sollten wenigstens die Schüler die bedienen können, nicht wahr?

mamue

[bischi]

Alle Schüler ab der sechsten oder zumindest der siebten Klassen mußten die anschaffen. Ich persönlich bezweifle stark, dass man vor dem 6. Semester Maschinenbau so ein Ding wirklich benötigt, aber ich wurde auch nicht gefragt.

Dazu sag ich einfach nur: *LOL*

Wenn die aber nun schon mal da sind, sollten wenigstens die Schüler die bedienen können, nicht wahr?

Sehr gute Idee!

MfG Bischi

[K0rnbr0t]

Allgemein guter Stil ist es, wenn man die Lösung publiziert und nicht nur sagt, ich habs selber gelöst

Gruss
f0rtex

Tut mir Leid ich hab später bei bus fahren ( ) gemerkt das man die IF-Abfragen in einander bauen musste. Wäre aber auchn nett gewesen wenn mir einer Geholfen hätte

etwa so :

:IF H=0
:Then
:If W=0
:Then
:If Y=0
:Then
:If M=0
:Then
:If R=0
:Then
:If Z=0
:usw....

Gruß,

K0rnbr0t