Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

Link zu dieser Vergleichsansicht

Beide Seiten der vorigen Revision Vorhergehende Überarbeitung
Nächste Überarbeitung		 Vorhergehende Überarbeitung
z1013:literatur:practic-87-1 [2010/07/28 10:05] – volkerpz1013:literatur:practic-87-1 [2017/09/08 11:31] (aktuell) – volkerp
Zeile 18: Zeile 18:
 ===== Spielend lernen ===== ===== Spielend lernen =====
  
-**Computerspiele sind gut geeignet, einem großen Personenkreis die Scheu vor der umfangreichen Tastatur und den vielen Spezialworten im Umgang mit einem Computer zu nehmen. Früher oder spater taucht der Wunsch auf, die Geheimnisse der �Black-box" zu ergründen und ein vorliegendes Programm zu verandern oder eigene Vorstellungen zu verwirklichen. In einem Spielprogramm kann die Wirkung der einzelnen Befehle schnell ohne ökonomische Auswirkungen ausprobiert werden.**+**Computerspiele sind gut geeignet, einem großen Personenkreis die Scheu vor der umfangreichen Tastatur und den vielen Spezialworten im Umgang mit einem Computer zu nehmen. Früher oder spater taucht der Wunsch auf, die Geheimnisse der "Black-box" zu ergründen und ein vorliegendes Programm zu verandern oder eigene Vorstellungen zu verwirklichen. In einem Spielprogramm kann die Wirkung der einzelnen Befehle schnell ohne ökonomische Auswirkungen ausprobiert werden.**
  
 ===== "Sternschnuppe" ===== ===== "Sternschnuppe" =====
Zeile 26: Zeile 26:
 Der Computer zeichnet in zufälligen Abständen die gleiche Anzahl Pünktchen (Sterne: 240 POKE P, 213) und Kreise (Planeten: 220 POKE P, 140) auf den Bildschirm. Der Computer zeichnet in zufälligen Abständen die gleiche Anzahl Pünktchen (Sterne: 240 POKE P, 213) und Kreise (Planeten: 220 POKE P, 140) auf den Bildschirm.
  
-Bei der Version 1 sind es 60...75 und bei Version 2 90...110. Etwa in Bildmitte erscheint auf Tastendruck die Sternschnuppe. Sie läßt sich mit den Cursortasten nach links und rechts bewegen. Da der Z 1013 keine Cursortasten nach oben und unten hat, wurde die �LT-Taste" als Aufwärtstaste (330) und die �Space"-Taste als Abwärtstaste (340) programmiert.+Bei der Version 1 sind es 60...75 und bei Version 2 90...110. Etwa in Bildmitte erscheint auf Tastendruck die Sternschnuppe. Sie läßt sich mit den Cursortasten nach links und rechts bewegen. Da der Z 1013 keine Cursortasten nach oben und unten hat, wurde die "LT-Taste" als Aufwärtstaste (330) und die "Space"-Taste als Abwärtstaste (340) programmiert.
  
 Im **Bild 1** sind die einzelnen Bildelemente zur Verdeutlichung gekennzeichnet: a: Stern, b: Planet, c: zurückgelegter Weg der Sternschnuppe (Schweif). Die Aufgabe des Spielers besteht darin, mit möglichst wenig Im **Bild 1** sind die einzelnen Bildelemente zur Verdeutlichung gekennzeichnet: a: Stern, b: Planet, c: zurückgelegter Weg der Sternschnuppe (Schweif). Die Aufgabe des Spielers besteht darin, mit möglichst wenig
Zeile 44: Zeile 44:
 ===== Spielprogramm-Listing ===== ===== Spielprogramm-Listing =====
  
 +<code>
   010 REM STERNSCHNUPPE   010 REM STERNSCHNUPPE
   020 OUTCHAR 12   020 OUTCHAR 12
Zeile 57: Zeile 58:
   120 PRINT;INPUT "V="V   120 PRINT;INPUT "V="V
   130 OUTCHAR 12   130 OUTCHAR 12
-  140 IF V&lt;1 GOTO 120 +  140 IF V<1 GOTO 120 
-  150 IF V&gt;2 GOTO 120+  150 IF V>2 GOTO 120
   160 REM BILDAUFBAU   160 REM BILDAUFBAU
   165 FOR I=1 TO V   165 FOR I=1 TO V
Zeile 70: Zeile 71:
   240 POKE P,213   240 POKE P,213
   250 P=P+A;T=T+1   250 P=P+A;T=T+1
-  260 IF P&lt;O GOTO 200+  260 IF P<O GOTO 200
   270 NEXT I   270 NEXT I
   280 GOSUB 500   280 GOSUB 500
Zeile 127: Zeile 128:
   810 PRINT;PRINT;PRINT   810 PRINT;PRINT;PRINT
   820 PRINT " Noch einmal? Dann bitte"   820 PRINT " Noch einmal? Dann bitte"
-  830 PRINT;PRINT "Taste&gt;J&lt; druecken!"+  830 PRINT;PRINT "Taste>J< druecken!"
   840 W=INCHAR   840 W=INCHAR
   850 IF W=74 GOTO 10   850 IF W=74 GOTO 10
Zeile 134: Zeile 135:
   880 PRINT "Bis bald"   880 PRINT "Bis bald"
   890 STOP   890 STOP
 +</code>
  
 ===== Spielprogramm-Erweiterung ===== ===== Spielprogramm-Erweiterung =====
  
 +<code>
   122 INPUT "Geschwindigkeit ( 1 - 9 )" G   122 INPUT "Geschwindigkeit ( 1 - 9 )" G
-  124 IF G &gt; 9 GOTO 122 +  124 IF G > 9 GOTO 122 
-  126 IF G &lt; 1 GOTO 122+  126 IF G < 1 GOTO 122
   128 G = 500 / G   128 G = 500 / G
   275 X = HEX (3600); GOSUB 900   275 X = HEX (3600); GOSUB 900
Zeile 145: Zeile 148:
   301 IFW = 0W = Y   301 IFW = 0W = Y
   302 Y = W   302 Y = W
-  303 IF Q &lt; O POKE (HEX (3A00) ), 20 +  303 IF Q < O POKE (HEX (3A00) ), 20 
-  306 IF Q &gt; HEX (EC00) POKE (HEX (3A00) ), 20+  306 IF Q > HEX (EC00) POKE (HEX (3A00) ), 20
   305 FOR I = 1 TO G; NEXT I   305 FOR I = 1 TO G; NEXT I
   900 POKE X, HEX (CD)   900 POKE X, HEX (CD)
Zeile 156: Zeile 159:
   960 POKE (X+6) HEX (C9)   960 POKE (X+6) HEX (C9)
   970 RETURN   970 RETURN
 +</code>
  
  • z1013/literatur/practic-87-1.1280311546.txt.gz
  • Zuletzt geändert: 2010/07/27 22:00
  • (Externe Bearbeitung)