Schritt 6: Meilen und Kilometer
Von jetzt Sie wissen wie man eine Programm etwas Ausgang machen und wie man es für einen Wert Fragen, also warum nicht machen eine Programm, die Meilen in Kilometer und umgekehrt umwandeln kann. Weil Sie wissen, dass die ClrHome, Eingang und Ausgang (Befehl und Sie wissen, wie man Variablen innerhalb eines Programms zu speichern, können Sie bereits eine Programm, das eine Art und Weise tun kann. Natürlich können Sie auch ein anderes Programm, das anders tun können. Diese Programme sollten wie folgt aussehen:Meilen in km:
: ClrHome
: Geben Sie "Meilen:",
M
: M * 1, 609344→K
: Output(2,1,"KM
:
: Output(2,7,K
: Pause
: ClrHome
km auf Meilen
: ClrHome
: Geben Sie "KM:",
K
: K/1, 609344→M
: Output(2,1,"MIL
ES:
: Output(2,7,M
: Pause
: ClrHome
Aber was ist, wenn Sie diese zwei Programme in einem? Auch das ist möglich. Dazu wollen wir Etiketten zu verwenden. Etiketten sind Positionen im Inneren ein Programm, das Sie einen Namen (A-Z, Θ, 1-99) geben können. Mit der Goto-Befehl kann dem Programm Ihnen die Aufgabe direkt auf dem Etikett egal zu springen, wenn die Beschriftung vor oder nach dem Goto-Befehl ist. Auch mit dem Menü (Befehl können Sie das Programm auf einem Etikett zu gehen. Das Menü (Befehl erklärt sich eigentlich ein Menü erstellt. Wir wollen dies zu tun, weil wir wollen, können wählen, ob wir Kilometer in Meilen oder Meilen bis km konvertieren möchten. Das Menü (Befehl ist ein bisschen kompliziert. Nachdem dieser Befehl Sie müssen Sie den Text am oberen Rand des Menüs, dann den Text für die erste Option, dann der Name des ersten Etiketts Zeit zuerst der Name der zweiten Option, dann der Name des zweiten beschriften und so weiter. Es gibt ein Maximum von 7 Optionen. Dieses Programm benötigt nur drei: Meilen, km, Kilometer, Meilen und beenden, also der Menü-Befehlszeile wird etwa wie folgt aussehen:
: Menu("MILES
/ KM "," MILES
BIS KM", 1,"KM
"MEILEN", 2, "QUIT",
3
Nun lasst uns zuerst Etikett 1. Das ist wirklich einfach. Nur geben Sie die Lbl-Befehl und geben Sie eine nacheinander:
: Lbl 1
Danach kann das eigentliche Programm starten. Dies finden Sie am Anfang dieses Schrittes. Achten Sie darauf, dass Sie übernehmen die Meilen in km und nicht das andere zu konvertieren.
Nach der Übernahme dieses Programms müssen Sie eine Zeile hinzufügen: zu stoppen. Das Programm muss wissen, dass es dort anhalten muss. Wenn Sie diese Zeile nicht hinzufügen, wird es weitergehen-Label 2 und bitten Sie um die km. So fügen Sie diese Zeile!
Nun fügen Sie zwei Label und übernehmen Sie das Konvertierungsprogramm zu Beginn dieses Schritts. Hier du musst nicht fügen Sie die Haltestelle der Linie, weil es die einzige Aufgabe des Labels 3, fortsetzen muss aufhören. Also nachdem das Konvertierungsprogramm nur hinzufügen "Lbl 3" und du bist fertig. Auch nach der Lbl-3, die Sie nicht brauchen einen Stop-Befehl hinzufügen, weil das Programm Linien befindet, reagiert das Programm automatisch ausführen. Das Programm sollte wie folgt aussehen:
: Menu("MILES
/ KM "," MILES
BIS KM", 1,"KM
"MEILEN", 2, "QUIT",
3
: Lbl 1
: ClrHome
: Geben Sie "Meilen:",
M
: M * 1, 609344→K
: Output(2,1,"KM
:
: Output(2,7,K
: Pause
: ClrHome
: Stop
LBL-2
: ClrHome
: Geben Sie "KM:",
K
: K/1, 609344→M
: Output(2,1,"MIL
ES:
: Output(2,7,M
: Pause
: ClrHome
: Lbl 3
Tipp
An Stelle des nach der Platzierung eines Stop-Befehls nach Etikett 1 können Sie ihm auch die Aufgabe zu gehen Label 3 geben. Sie können dies tun, durch das Ersetzen der Stop-Befehl für ´Goto 3´. Der einzige Unterschied ist, dass diese letzte Option ein weiteres Bit Speicher nimmt...
Neuen Befehls
Menü)
LBL
GOTO
Stop