Programme aus dem Buch Grosse 64er Programm Sammlung

Es gibt 161 Antworten in diesem Thema, welches 12.124 mal aufgerufen wurde. Der letzte Beitrag (27. Mai 2025 um 20:29) ist von digger72.

  • Ich kann etwas eingeben, bei Extremwerte ausgaben laufe ich aber immer in einen Overflow Error.

  • Ich kann etwas eingeben, bei Extremwerte ausgaben laufe ich aber immer in einen Overflow Error.

    Das "o9" in Zeile 1410 muss sicherlich korrekt "og'" heißen.

    EDIT: Noch etwas in Zeile 1950

    1950 e(6,i)=f(0,i)/e(6,i) muss korrekt heißen:

    1950 f(6,i)=f(0,i)/e(6,i)

    EDIT2:

    4370 deffnr(a)=sgn(a)*int((abs(a)+.00005)*10000)-10000:rem rundung muss korrekt heißen:

    4370 deffnr(a)=sgn(a)*int((abs(a)+.00005)*10000)/10000:rem rundung

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

    2 Mal editiert, zuletzt von goloMAK (4. Mai 2025 um 07:51)

  • d64-Image / Version 4

    "Kurvendiskussion" ist in der gefixten Version enthalten.

    P.S. Wo ist der Diskettenlocher?

    Dateien

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

    Einmal editiert, zuletzt von goloMAK (4. Mai 2025 um 08:16)

  • Wenn ein Loch den Speicherplatz verdoppelt, was machen dann erst 4 Löcher?

    C64Studio: Bitte melde dich an, um diesen Link zu sehen. - Bitte melde dich an, um diesen Link zu sehen. --- C64Studio WIP: Bitte melde dich an, um diesen Link zu sehen. - Bitte melde dich an, um diesen Link zu sehen. --- Bitte melde dich an, um diesen Link zu sehen.

  • Dreiecks-Berechnung in allen Varianten

  • Noch mehr Mathe. Hier scheint aber evtl. ein Abschnitt zu fehlen, in Zeile 920 wird eine nicht existierende Zeile 850 angesprungen.

    Plus die nicht gültige 65535 in Zeiel 2570.

  • Dreiecks-Berechnung in allen Varianten

    Typo in Zeile 1130

    1130 A0SQR(C*P) ==> 1130 A=SQR(C*P)

    Korrigierte Version anbei.

    Dateien

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

  • in Zeile 920 wird eine nicht existierende Zeile 850 angesprungen

    Wenn ich es richtig sehe, kommt Zeile 920 nie zur Ausführung, da die Variable PP immer gleich 20 ist. So oder so funktioniert die Primzahlenberechnung nicht und bietet mir z.B. 355 als Primzahl an.

    cbm-warrior : Könntest du nicht mal einen Blick in die 2. Auflage werfen? :whistling:

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

  • in Zeile 920 wird eine nicht existierende Zeile 850 angesprungen

    Wenn ich es richtig sehe, kommt Zeile 920 nie zur Ausführung, da die Variable PP immer gleich 20 ist. So oder so funktioniert die Primzahlenberechnung nicht und bietet mir z.B. 355 als Primzahl an.

    cbm-warrior : Könntest du nicht mal einen Blick in die 2. Auflage werfen? :whistling:

    Wenn man den Bereich 100 bis 200 angibt, gibt er auch 233 aus (zwei mal). Da scheint einiges im Argen zu sein. Ich meine auch bei Zeile 1460 sollte das WA<>0 sein (und nicht O wie es im Listing steht). Da O nie gesetzt wird, passt das eher versehentlich.

    C64Studio: Bitte melde dich an, um diesen Link zu sehen. - Bitte melde dich an, um diesen Link zu sehen. --- C64Studio WIP: Bitte melde dich an, um diesen Link zu sehen. - Bitte melde dich an, um diesen Link zu sehen. --- Bitte melde dich an, um diesen Link zu sehen.

  • Ich meine auch bei Zeile 1460 sollte das WA<>0 sein (und nicht O wie es im Listing steht).

    Also, ich lese im Listing ganz klar WA<>0 und das hast du auch so eingetippt?

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

  • in Zeile 920 wird eine nicht existierende Zeile 850 angesprungen

    Wenn ich es richtig sehe, kommt Zeile 920 nie zur Ausführung, da die Variable PP immer gleich 20 ist. So oder so funktioniert die Primzahlenberechnung nicht und bietet mir z.B. 355 als Primzahl an.

    cbm-warrior : Könntest du nicht mal einen Blick in die 2. Auflage werfen? :whistling:

    Wenn man den Bereich 100 bis 200 angibt, gibt er auch 233 aus (zwei mal). Da scheint einiges im Argen zu sein. Ich meine auch bei Zeile 1460 sollte das WA<>0 sein (und nicht O wie es im Listing steht). Da O nie gesetzt wird, passt das eher versehentlich.

    Auch dort steht in 920 ein Sprung nach 850, welche aber gar nicht im Listing auftaucht. Komisch ist aber das bei den 800er Zeilen nicht die übliche 10er Schrittweite genutzt wird.

  • Ich meine auch bei Zeile 1460 sollte das WA<>0 sein (und nicht O wie es im Listing steht).

    Also, ich lese im Listing ganz klar WA<>0 und das hast du auch so eingetippt?

    Ja, an der Stelle hab ich es angepasst. An sich nehme ich die Fehler und Tippfehler genau so mit wie sie in den Listings vorkommen. Kann man drüber streiten, ob das jetzt authentisch oder korrekt sein soll.

    Edit: Bzw. jetzt sehe ich da auch eine saubere 0. Da war ich vorher 5mal drüber gescrollt, weil mir das als Tippfehler komisch vorkam. Der JS-PDF-Renderer scheint doch immer wieder mal zu zicken.

    C64Studio: Bitte melde dich an, um diesen Link zu sehen. - Bitte melde dich an, um diesen Link zu sehen. --- C64Studio WIP: Bitte melde dich an, um diesen Link zu sehen. - Bitte melde dich an, um diesen Link zu sehen. --- Bitte melde dich an, um diesen Link zu sehen.

  • So etwas wollte ich gar nicht lostreten, aber find ich cool dass doch so viele von euch ähnlich ticken. :P

    Ich bin zwar nur noch mit VC 20 unterwegs, aber auch Ich tippe die Spiele ab und speichere die auf Kassette. Macht Spaß. Man lernt sehr viel so und wenn das Spiel dann läuft was man so manches Mal stundenlang tippt hat man ein wunderbares Gefühl. Bei c64 sind die Listings schön lang. Bei nicht erweiterten Vc20 habe ich hingegen leichtes Spiel. :) Aber ja, ich bin auch so ein wahnsinniger obwohl alle Listings längst eingetippt sind und fertig heruntergeladen werden können. ich mache es trotzdem.

    Ich habe auch mit dem VC20 angefangen und hatte leider das Pech, das aus meiner Schule nur einer noch den VC20 hatte. Alle anderen waren auf dem C64 unterwegs. Also blieb mir nix anderes Übrig, als die Spiele (Weil auch in den Läden keine Module und Software auf Kassette mehr aufzutreiben war) aus Büchern abzutippen. Die habe ich mir immer aus der Stadtbibliothek ausgeliehen und dann stundenlang getippt. Da ich auch keine Speichererweiterung hatte, konnte ich auch nur die Spiele abtippen, die ohne funktioniert haben.

    Durch die Fehlersuche habe ich auch viel über die Programmierung in Basic gelernt damals.

    Aber was hat's mir gebracht? heute arbeite ich in der IT und mache auch teilweise die Programmierung :smile: also hatte das auch was gutes.

  • Das nächste benötigt Simons' BASIC (TSB geht aber auch)

    Nach dem Start und dem Auflisten der Tastenshortcuts F7 drücken, dann gibt es eine Kurvenanzeige, die bei mir mit einer Meldung abbricht.

  • Nach dem Start und dem Auflisten der Tastenshortcuts F7 drücken, dann gibt es eine Kurvenanzeige, die bei mir mit einer Meldung abbricht.

    Die DATA-Werte in Zeile 1500 passen nicht zur angegebenen Funktion. Dort wird die Anzahl der Definitionslücken mit 0 angegeben, die Beispielfunktion (in Zeile 1000) hat aber gleich zwei davon.

    Ein möglicher Fix wäre:

    1500 data2,-1,0

    Und schon löppt es:

    Bitte melde dich an, um diesen Anhang zu sehen.

    Ich habe das Listing jetzt aber originalgetreu gelassen.

    Ein paar kleine Abweichungen vom Buch sind mir noch aufgefallen, die ich angepasst habe. Jetzt sollte das Listing 1:1 dem Buch entsprechen.

    Zeilealtneu (wie im Buch)
    78x1,y1xi,yi
    340KoordinatensystemKoordinatensystems
    3060 und
    3074
    >==>

    Dateien

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

    Einmal editiert, zuletzt von goloMAK (11. Mai 2025 um 23:58)

  • Das nächste ist interessant. Das benutzt eine BASIC-Erweiterung von Data Becker, die sich Supergraphic 64 nennt. Allerdings scheint es eine andere (ältere?) Version davon zu verwenden.

    Ich habe die Version von Bitte melde dich an, um diesen Link zu sehen. verwendet. Dort gibt es ein PCOL= mit 2 Parametern, im Listing wird nur einer verwendet.

    Im Listing gibt es auch ein BCOL=, welches es auf der Seite bzw. in dem verlinkten Data-Becker-Buch auf archive.org nicht gibt (Hab im Sourcecode gesucht)

    Hier mal das Disk-Image mit dem BASIC. Nach dem Start die 9 auswählen (die anderen Drucker-Varianten habe ich weggelassen).Wenn das gestartet ist, mit LOAD"FOURIER",8 das eigentliche Programm laden.

    Das läuft auch im Großen und Ganzen, aber eben nur bis zum ersten PCOL=, dann gibt es SYNTAX ERROR.

    Laut Archive.org ist dieses Supergraphic 64 in der 2. Auflage eingescannt, unterscheidet sich das BASIC evtl. von der 1. Auflage?

    Hier mal das Disk-Image und das dazu passende BASIC-Dialekt-File für C64Studio.

  • Das nächste ist interessant. Das benutzt eine BASIC-Erweiterung von Data Becker, die sich Supergraphic 64 nennt. Allerdings scheint es eine andere (ältere?) Version davon zu verwenden.

    Ich habe die Version von Bitte melde dich an, um diesen Link zu sehen. verwendet. Dort gibt es ein PCOL= mit 2 Parametern, im Listing wird nur einer verwendet.

    Ich habe die ältere Version gefunden (Bitte melde dich an, um diesen Link zu sehen.) - auch im Anhang.

    Bitte melde dich an, um diesen Anhang zu sehen.

    Dateien

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

  • Super, danke! Damit klappt es!

    Ich bekomme leider einen ?OVERFLOW ERROR in einem späteren Teil der Rechteck-Berechnung (Achtung, da muss man ca. 19* mit N und W weiterschalten). Da bleibt leider der Grafikmodus stehen und man muß blind GMODE 0,0 tippen, dann sieht man es.

    Die anderen beiden laufen durch.

    Diese BASIC-Variante hat weniger Tokens, und teilweise haben die auch noch andere Werte. Daher habe ich jetzt zwei Supergraphic-Dialekt Dateien.

    Hier mal das Ergebnis. Supergraphic laden, starten (nur einmal, sonst hängt es), und dann mit LOAD"F*",8 das eigentliche Programm laden.

  • Daher habe ich jetzt zwei Supergraphic-Dialekt Dateien.

    Code
    Invalid BASIC format file 'C:\Users\[...]\C64StudioRelease\net8.0-windows\BASIC Dialects\Data Becker Supergraphic 64 V1.txt', expected three or four columns in line 23
    Invalid BASIC format file 'C:\Users\[...]\C64StudioRelease\net8.0-windows\BASIC Dialects\Data Becker Supergraphic 64 V2.txt', expected three or four columns in line 23

    ?(

    Bitte melde dich an, um diesen Link zu sehen. - Ratespiel • Bitte melde dich an, um diesen Link zu sehen. - BASIC-Erweiterung • Bitte melde dich an, um diesen Link zu sehen. - Sprite-Editor • Bitte melde dich an, um diesen Link zu sehen. - Zeichensatz-Editor Bitte melde dich an, um diesen Link zu sehen. - 2048 Blöcke

  • Ob es sich lohnen würde, die Programme, die Simons' Basic und Supergraphic64 brauchen, nach Basic V2 zu übersetzen, so daß das alles einfach so laufen würde?