Kleine BASIC-Knobelei

Quote from 4k4rvi

Vielleicht zu einfach

Hmm, mag sein, aber Deine Fallei n Zeile 120 ist tückisch

Ich stelle in den Raum: es werden die Zahlen 10 bis 20 ausgegeben.

Es zählt abwärts, das erste Mal von 10 bis 0, dann von 11 bis 1, beim dritten Mal von 12 bis 2 usw. bis 20 erreicht ist und fängt von vorne an (Zeile 170). Die Zeile 100 braucht man eher nicht und in Zeile 120 fehlt "step-1". Wenn man in 155 einen Slowdown einbaut (z.B. eine FOR-Schleife mit k als Zähler, die sonst nichts tut), sieht man das.

Arndt

GoDot Wahrscheinlich war das die Intension gewesen... aber Step-1 fehlt nunmal...

Quote from GoDot

in Zeile 120 fehlt "step-1"

Es fehlt eben gerade nicht. Das ist Absicht!

Gruß Dirk

hmm, dann zählt das einfach wiederholt von 10 bis 20, weil 10 TO 0 ohne STEP-1 immer bei 10 stehen bleibt.

Ich würde ja sagen, es gibt "HUHU" aus und in Zeile 120 fehlt nicht step-1, sondern :print"huhu":end

Oh, cool! Es zählt immer wieder von 10 bis 20!

Arndt

Was macht dieses kleine Progrämmchen?

Denke mal der eine kleine Poke ist erlaubt. Bildschirmspeicher 1024+

Ich mache nicht mit, da ich die Lösung schon kenne.

Quote from 4k4rvi

Hi, nach langer Zeit!

Hier was neues einfaches für die Interessierten. Diesmal auch ohne Pokes und Peeks.

Vielleicht zu einfach, aber "komplizierter" hat anscheinend diesen Thread beerdigt. Ich versuche, ihn mal wiederzubeleben.

Und ohne Peeks/Pokes damit wohl auch BASIC-native (zumindest MS-BASIC) und nicht speziell für den C64.

100 i=0:j=0:e$=""

110 for i=0 to 10

120 for j=10 to 0

130 print "HOME" ("clear screen" in your BASIC)

140 e$=str$(i+j)

150 print e$

160 next j: next i

170 goto 110

Gruß und viel Spaß 4k4! (HowTo und Regeln im ersten Post dieses Threads!)

Display More

Ohne es genau zu wissen, denke ich, dass das Programm in der j-Schleife festhängt und daher lediglich im Wechsel den Bildschirm löscht und dann 10 ausgibt.
Warum 10? Da die i-Schleife nicht über 0 hinaus kommt (weil bei der j Schleife kein Step-1 enthalten ist und daher immer bei 10 bleibt) ergibt i+j halt 10 was durch str$ in e$ gespeichert und mit Print e$ nach dem löschen des Bildschirms geprintet wird.

Was anderes wäre natürlich, wenn die j-Schleife wegen dem fehlenden Step-1 hochzählen würde… keine Ahnung ohne zu testen 😀

Quote from Miyagi1980

Was macht dieses kleine Progrämmchen?

Quote

- alle, die mitspielen möchten, versuchen herauszufinden, was dieses BASIC-Programm macht (-> OHNE ES ZU STARTEN!)

Um es nicht direkt starten zu können, erst mal nur als Snapshot, farbig und groß.

Quote

- Regeländerungen, die das Spiel verbessern, sind jederzeit gerne gesehen

Wer sich auskennt und es absolut sicher weiß, sollte vllt. Gebrauch von der Spoilerfunktion machen.

---

Welche Zahl gibt stets das folgende Programm aus?

Quote from atomcode

Welche Zahl gibt stets das folgende Programm aus?

Da bin ich mir nicht sicher... ich würde auf 0 (Null) tippen.

Die 0 ist es nicht. Erster Tipp:

Das in 50 bis 56 ist nur ein Bubblesort, der Z(1) bis Z(4) nach Größe sortiert.

42 natürlich

Quote from SkulleateR

42 natürlich

Richtig. Erraten oder analysiert? War sicher eine gute Idee von mir, eine so prominente Zahl zu nehmen. - Download: kquest.prg

Aber wie kann es zu diesem konstanten Ergebnis kommen, wenn doch als Ausgangswert eine Zufallszahl zwischen 0 und 9999 dient? Weiß es jemand?

Wenn nicht, im Spoiler ist die Lösung:

atomcode

Gewusst ! Denn die Antwort auf alles ...

Nein, geraten natürlich

Mist, das mit der 6174 kannte ich noch, aber jetzt habt ihr's schon.