nochmal eine frage zu pong

Moderator: Tim Sasdrich

nochmal eine frage zu pong

Beitragvon ElBubo » 23.02.2012, 15:21

Habe für meinen Kleinen das Pong abgeändert
Statt Pong erscheint nun der Name beim starten. Am Anfang hatte ich nur "nico" stehen das hat funktioniert,
dann wollte ich "hallo nico" schreiben nur das funktionierte nicht mehr
ich habe folgende Änderung vorgenommen ys = 70

Code: Alles auswählen
Start_game:
  Gosub Mtx_cls : Ys = 0 : Level = 1 : Ballwait = 1000
Run_text:
  For Y = 1 To 5
    Yy = Ys + Y : Dispram(y) = Lookup(yy , Title_data)
  Next Y : Waitms 200                                       ' originalwert 100
    Incr Ys : If Ys = 70 Then Ys = 0                     ' originalwert YS=30


so funktioniert es nur weiß ich nicht warum
Wenn ich den Wert noch weiter erhöhe, zeigt er am Start "hallo nico 1 2 3" also auch die Level an, woran liegt das?

jetzt wollte ich noch, wenn das Spiel gewonnen wird nicht nur einen Smily sondern "glückwunsch nico gleich nochmal" schreiben

habe den bisherigen Code
Code: Alles auswählen
Gosub Mtx_cls
  Dispram(1) = &B00010000
  Dispram(2) = &B00100010
  Dispram(3) = &B00101000
  Dispram(4) = &B00100010
  Dispram(5) = &B00010000
  Gosub Waitkeypressed : Goto Start_game

durch das hier ersetzt und natürlich ein data titel_won angelegt

Code: Alles auswählen
Gosub Mtx_cls
   do
     For Y = 1 To 5
    Yy = Ys + Y : Dispram(y) = Lookup(yy , Title_won)
  Next Y : Waitms 200                                       ' original 100
    Incr Ys : If Ys = 100 Then Ys = 0
  Loop


Hier fängt das Prog allerdings mitten im Text an und bringt auch komische Zeichen, es wird auch nicht alles angezeigt.
das gosub keypressed ist absichtlich gelöscht.
Nun meine Fragen:
- Wie muß ich die Einstellung für ys vornehmen damit die Laufschrift passt ?
- Muß ich überhaupt an ys was ändern oder gibts eine andere Möglichkeit?

Danke schonmal
ElBubo
 

Zurück zu Fragen über Basteleien

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast