Retro Basic Programmier Battle: AIM-65 vs Commodore 64

  Рет қаралды 18,712

Zerobrain

Zerobrain

Күн бұрын

"Programmschlacht": Ein einfaches Basic Programm auf unterschiedlichen Rechnern (AIM-65 und C64) programmiert, artet zur kleinen Fehlersuch Orgie aus.
(Werbung) Filmora kostenlos downloaden:bit.ly/2zmP3EA (Ende der Werbung)
Inhalt
0:00 Einleitung
1:11 Wolfgangs Programm
8:18 Kritik (Debugging am C64)
25:05 Gegendarstellung (Wolfgang)
27:27 Abschlussbemerkung
►Mehr zu zum Thema Kino, Serien und Medien auf meinem Zweitkanal "MovieBrain"
/ moviebrain
►Mehr Labereien auf meinem Drittkanal "BrainDumpZero"
/ @braindumpzero
►(Werbung) Verwendete Ausrüstung (*1)/ Fragen / Zuschauerpost
Auf meiner Homepage: www.zerobrain.info/ausruestung
►Unterstützung des Kanals (Patreon / Ebay Partner Links / Amazon Wunschliste)
Auf meiner Homepage: www.zerobrain.info/supportpage/
(*1) Dominik Schuierer ist Teilnehmer des Amazon-Partnerprogramm, das zur Bereitstellung eines Mediums für Webseiten konzipiert wurde, mittels dessen durch die Platzierung von Partner-Links zu Amazon.de Entgelte verdient werden können.
► Unsere Discord Community: / discord
►Folgt mir (für technische Fragen bitte die Email Adresse nutzen s.o.)
Instagram: / zerobrain_info
Twitter: / totalzerobrain
Facebook: / dominik.schuierer
Mewe: mewe.com/i/zerobrain
Meine Homepage: www.zerobrain.info
#RetroComputing #8Bit #BASIC

Пікірлер: 238
@Zerobrain
@Zerobrain 3 жыл бұрын
👉🏼 Ergänzungen / Kommentare 👈🏼 (Werbung) Schaut mal bitte beim Sponsor vorbei: bit.ly/2zmP3EA (/Werbung) 🔸Zur Rundung: Ja 0.5 wäre besser gewesen 🔸Noch ein Fehler: (danke an Clemens Schaeffner und Rocky B Music ) "Bug im Programm 0 gibt keinen Punkt aus aber 1gleich zwei[...]" => Die Schleife muss natürlich bei "1" anfangen. 🔸Ihr könnt am Online Emulator weiterüben: c64emulator.111mb.de/index.php?site=pp_javascript&lang=de&group=c64
@p-196
@p-196 3 жыл бұрын
oder auf der Nintendo Switch mit SmileBasic. Kann man sich dort einfach im eShop herunterladen.
@AtzeDatze
@AtzeDatze 3 жыл бұрын
Oder auf dem Android Handy mit Frodo C64.
@p-196
@p-196 3 жыл бұрын
@@AtzeDatze oder auf einem C64 Mini mit USB Tastatur
@RockyBMusic
@RockyBMusic 3 жыл бұрын
sehr gerne, die Idee/das Format sind wirklich sehr unterhaltsam.. Gruß auch an Wolfgang..
@HannoBehrens
@HannoBehrens 3 жыл бұрын
Ja, ich wollte auch instant schreiben: „Hey! Die 0.5 Rundung! Seht ihr nicht, dass die Sinus-Kurve verhunzt ist?“ Aber da war ich wohl nicht der erste. Ebenfalls, weiterer Fehler, die "#" Line natürlich als GOSUB programmieren. Ebenfalls, die Plot-Line von x=0 bis 2*π laufen lassen in 2π/n Steps, so dass die Linie vernünftig endet. Außerdem kann man das Ende der Linie genauer positionieren, wenn man statt einem "*" die graphischen Symbole nimmt, die beim C64 zur Verfügung stehen, in diesem Falle die vertikalen Linien den ausgefüllten Block für den Balken und am Ende ▏▎▍▌▋▊▉█ voilà: Auflösung in X verachtfacht von 40 auf 320 und das ohne Grafikmodus. Das ganze natürlich nicht nur als Assembler, sondern über den USR() als Assembler-Erweitertungs-Funktion, so dass man bei der Gelegenheit in BASIC bleiben kann. Basic Erweiterungen programmieren kann man recht einfach, indem man mein CYPHERBASIC 64 nimmt, da alle Cryptofunktionen raus kickt und das derartig modifiziert, dass man seine eigene Funktion implementiert. Ich hab' das als Template entwickelt, es wird nur von wenigen genutzt, ich fürchte, das Wissen ist ein bisschen verloren gegangen bei den meisten. Wir waren ohnehin nie viele, die das konnten. Ein weiterer Bug bei dem Programm ist übrigens, dass die Null nicht als "*" gedruckt wird sondern als ".*" nur mal so für die B-Note. PRINTBAR sollte als GOSUB implementiert werden im übrigen. Aber ich sehe schon, ich hätte das Video zuende sehen sollen, bevor ich den Kommentar schreibe. Cypherbasic 64: github.com/silizium/cypherbasic Tolles Projekt, Jungs! Weiter so. 19:26 und um Gottes Willen keine Fallunterscheidung, das kostet irrsinnig Zeit statt dessen y=9+int(sin(x/5)*9+.5) das wär's gewesen. Genauso der IF zum Überspringen der Schleife ist ein großes No-No, weil man keine floating point Zahlen mit Gleich vergleicht sondern immer mit x < 0.5 oder sowas, also den Margin of Error. In diesem Fall braucht man aber ein WHILE…WEND als Struktur und das macht man elegant mit einem GOTO, da der Befehl nicht existiert in BASIC V2. Und schmeißt das alles raus mit dem FOR. FOR ist in diesem Falle falsch angewendet. Tatsächlich ist am schnellsten einen langen STRING zu definieren und ihn mit SUB$ zurecht zu schneiden, das ist ein One-Liner und die Verarbeitung ist schneller als FOR oder GOTO. Es gibt ja implizite Schleifen, das ist eine schöne Lektion, das zu vergleichen mit einer expliziten Schleife und welche Lösung schneller ist. Da das Schneiden des Strings extrem fix ist und nicht erst interpretiert werden muss, ist das tasächlich schneller, kürzer und eleganter als jede Schleife. 19:46 die Variable ZWERG existiert nicht und wird zu Fehlern führen, wenn man später eine Variable ZWISCHENWERT anlegt. Da BASIC nur die ersten beiden Buchstaben berücksichtigt, ist ZWERG und ZWISCHENWERT die selbe Variable, weswegen man in BASIC V2 niemals mehr als zwei Buchstaben für Variablen benutzt. Also ZW in diesem Falle. Die obige Aufgabe könnte man also so umsetzen, hier nicht auf Speed sondern Übersichtlichkeit geschrieben: 10 rem init 20 li$="##########":li$=li$+li$ 30 ba$="..........":ba$=ba$+ba$ 50 def fn xs(x)=int((1+sin(x))*9.5+0.5) 100 rem program 105 print li$ 110 for i=0 to 2*π step 2*π/50 120 gosub 1000 130 next i 900 print li$ 999 end 1000 rem printbar 1010 print left$(ba$,fn xs(i));"*" 1020 return Ein völliges No-Go ist es, Schleifen zu verschachteln. Das ist selbst auf heutigen Computern eine Sache, die in der Regel während der Optimierungsphase fliegt und bei dreifachen Verschachtelungen fliegt der Programmierer gleich hinterher. AWR hat mein alter Chemielehrer das genannt, Amok, Wahnsinn, Rausschmiss. Das geht immer anders, das geht immer in einer einfachen Schleife und wenn man schon schachtelt, dann wenigstens in einer impliziten inneren Schleife, also sowas wie left$() in diesem Falle. Der Aufruf von GOSUB kostet unnötig Zeit, aber ich hab's eingebaut, wegen weil. Schmeißt es raus. Es ist nur eine Zeile und sowas gosub'd man nicht, selbstverständlich. Schneller wird das ganze ebenfalls, wenn man es in eine Zeile setzt, also die eigentliche Programmschleife zum Beispiel, in der nicht viel passiert. Zeilen kosten Zeit. Die Funktion xs steht für X stepped. In diesem Falle, also einer Sinuskurve wäre es sehr viel besser, das als Bresenham zu schreiben, denke ich. Die eigentliche Funktion in ein DEF FN zu setzen beschleunigt die Berechnung auf Basic V2 im übrigen erheblich, soweit ich das richtig erinnere. Ich könnte das aber mit Polynomen verwechseln gerade. Jedenfalls wird es übersichtlich. Wir haben ja sonst wenig strukturierte Programmierung, also sollten wir nutzen, was wir haben. Den kleinen Zipfel, den ihr rausstehen habt in eurer Routine wird allgemein als Fehler angesehen, man rundet auf den Integerwert. Wenn ihr das mit +-0.5 machen wollt und negativen Werten, dann benutzt +0.5*SGN(x) und mit der man sich um eine dödelige Fallunterscheidung lavieren könnte. In diesem Falle habe ich das ganze Ding auf 19 hochgescaled und da es keinen richtigen Nullwert gibt bei 20, bin ich gegen diese Dimensionierung. Sie sollte immer ungerade sein, damit man: Unten, Mittellinie, Oben hat. Das ist bei 20 nicht möglich, die Null liegt zwischen 10 und 11, wenn man von 1 zählt. Ich hab' aber die Subroutine gelassen, falls jemand den Vorschlag mit der weiteren Verfeinerung umsetzen möchte. Biddeschön. Ich hoffe, ihr beide könnt es ab, mal untergeduckert zu werden. Ansonsten könnt ihr euch auf meinem Kanal rächen. Gibt da genug Sachen, die ich weiß, dass man sie besser machen könnte. Ich fordere euch mit einer überlangen Fibonacci-Funktion heraus auf euren Computern, also 15 Sekunden laufen lassen, sehen wie weit man kommt, das Ergebnis muss korrekt angezeigt werden. Gibt da einige Lösungen auf meiner Seite zu. Duckert gern zurück. kzbin.info/www/bejne/eorQdI2Hmbl6i6M Sinus ist langweilig, mit Fibonacci fängt der Spaß erst an.
@jenslooss
@jenslooss 3 жыл бұрын
Mir war sofort klar das Wolfgang den Fehler absichtlich eingebaut hat, jedwede andere Behauptung grenzt an Blasphemie 😉 Wie immer ein tolles Video.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Klar! Was sonst!
@AtzeDatze
@AtzeDatze 3 жыл бұрын
Hey, das ist kein Fehler, sondern ein Feature. Wolfgang wollte zeigen, wie diese in heutiger Software implementiert werden. 😁😁
@_Frank_
@_Frank_ 3 жыл бұрын
@@wolfgangrobel und mit 20% Aufwand 80% Ergebnis erzielt hast Du auch.
@BhdRoussos
@BhdRoussos 3 жыл бұрын
Das Argument vom Sinus und anderen trig. Funktionen muss in Radiant angegeben werden nicht sin(A/5) , sondern sin(A*π/24) 0
@vomHansDampf
@vomHansDampf 3 жыл бұрын
Ihr zwei seid echt der Hammer. Ich verstehe zwar nicht immer alles, bin halt jetzt kein Gelernter wie Ihr in dem Bereich, aber Ihr macht das so gut, dass ich nicht anders kann als euch immer wieder zu zuschauen.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Danke. Dominik versteht auch nicht immer alles. Ist also nicht schlimm...
@ricopeller7601
@ricopeller7601 3 жыл бұрын
Also ich fand es spannend und unterhaltsam.
@Horst021
@Horst021 3 жыл бұрын
So ist es bei deren Vids immer. IMMER! Die zanken sich auf "Bit komm raus", vernaschen Schachteln an "RUM_Prallienen", machen einen auf "dicken Lötkolben" und prahlen anschließend mit ihren Lotabzugspumpen... Ok, Zero prahlt immer mit seiner Beißzange - die, nebenbei gesagt sehr attraktive "Schenkel" hat, und deren Rundungen auch nicht zu verachten sind.... (LOL ) (...komisch, wo war in diesem Vid wohl nur die Zange...) Also ich rieche hier eindeutig eine "Verschwörung". Ja ehrlich, "die Zwei" wollen uns nur bei Laune halten um Zuschauer zu binden. Dann wollen die bestimmt noch ihr Wissen weiter geben.... Richtig hinterhältig so etwas! Spass bei Seite: "Die Zwei" sind echt "TOP"! Wenn ich Zeit habe, dann sehe ich mir gerne diese Videos an. Ist viel nützliches dabei. Gruß Horst
@andreasanders9974
@andreasanders9974 3 жыл бұрын
Deine Lösung ist auch nicht ganz richtig. Sieh dir die Sinuszeile 22-25 an, da wurde auch nicht richtig gerundet. Richtig gerundet wird mit A=INT(WERT+0.5). In deinem fall ZWERG=ZWERG+0.5. Hab früher vor gaaaaanz langer Zeit auch mal in BASIC Programmiert (ZX81 😆). Tolles Video, weiter so. 😎
@Christian-Drackert
@Christian-Drackert 3 жыл бұрын
Vielen Dank für daß sehr Unterhaltsame Video. Wäre sehr schön, wenn es mit BASIC noch weiter gehen würde.
@vaioranerabc793
@vaioranerabc793 Жыл бұрын
Sehr Geil! Ein Hoch auf den "Home Assistant" immer wieder interessant deine Videos! Danke
@Kasi11
@Kasi11 3 жыл бұрын
Trotz des Formates interissant und unterhaltsam!
@shiny593
@shiny593 3 жыл бұрын
25:30 Chapeau für die Einblendung.
@christianaichinger8271
@christianaichinger8271 3 жыл бұрын
Tolles Video! Und obwohl es von einem Basic-Programm handelt, drohen bei schnellem Implementieren auch bei neueren Programmiersprachen diesselben Tücken :) Sehr analytische und v.a. nachvollziehbare Analyse! (Jetzt unter dem richtigen Video)
@automati1506
@automati1506 2 жыл бұрын
Da werde Erinnerungen wach, ich habe den C64 geliebt. Mit SpeedDOS und HD Floppy meine ersten Programmierschritte gemacht. Tolles Video von euch, bitte weitermachen. 👌
@kurtbeyer1190
@kurtbeyer1190 3 жыл бұрын
Vielen Dank für das tolle Video - hat mich in meine Anfangsjahre versetzt. 😆 Damals waren die Computer-Zeitschriften ja voll mit Basic-Programmen, die man abtippen konnte. Wenn man Glück hatte, kam sogar was nützliches hinten raus.😜 Heute sind wir einen Schritt weiter! Microdoof schickt uns ein Update (2004) auf unsere Computer, das bei 50 % aller Maschinen nicht fehlerfrei funktioniert und mehrere Updates und Treiber braucht, bis man seine Maschine wieder einigermaßen in der Reihe hat. 😆
@kolumbus8430
@kolumbus8430 3 жыл бұрын
Genau solche Probleme mit dem runden auf Ganzzahlen hatte ich beim C64 früher, als ich für einen befreundeten Einzelhändler ein Programm zum erstellen einer Rechnung geschrieben habe. Da funktionierte dir Rundung nie ganz genau. Um damals exakte Werte zu erhalten, musste ich berechnete Zahlen in Text umwandeln, die Nachkommastellen ermitteln, auslesen dann runden und wieder zurück umwandeln. War ganz schön trickie.
@amnesie6615
@amnesie6615 3 жыл бұрын
BASIC !!!! endlich! geiles Thema! Arbeite selbst gerade an einem kleinen Basic Interpreter :)
@ritaschulz6536
@ritaschulz6536 3 жыл бұрын
Tolle Idee! aber wenn Sie BASIC mögen dann schauen Sie unter www.qb64.org/portal/ da gib es QB 64-BASIC voll QB-4.5 Compatibel und es Kompiliert das Programm zu EXE FILES! OPEN-GL IST AUCH EINGEBAUT! Grüße Rita EOF EOT
@FrankSchaare
@FrankSchaare 3 жыл бұрын
Wieder sehr interessant! Insbesondere, wenn der Herr Robel mit dabei ist! Programmierung ist natürlich auch sehr interessant, ich allerdings würde mich aber auch wieder über Videos freuen in dem Ihr (alte) Hardware zerlegt und repariert! Bitte weiter so!
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Ich muss meine alte Hardware nicht reparieren, weil sie im Gegenteil zu Dominiks Schrott nicht defekt ist... ;-)
@Zerobrain
@Zerobrain 3 жыл бұрын
Dafür haben selbst meine missglückten Reparaturvideos weniger Fehler als Deine "geglückten" Programmiervideos.
@ChipGuy
@ChipGuy 3 жыл бұрын
Ja die Videos von Dominik sind toll. Mit Wolfgang ist es dann mehr als doppelt so toll. Das Ganze ist dann wertvoller als seine beiden Teile.
@AtzeDatze
@AtzeDatze 3 жыл бұрын
@@Zerobrain Das siehst du falsch, Programmierer machen keine Fehler, sie bauen lediglich besondere Features ein. 😉
@omashaushalt
@omashaushalt 3 жыл бұрын
@@wolfgangrobel ICH WILL NICHT WISSEN, WIE EURE ALTE HARDWARE BEEINANDER IST, ´Zefix!!!
@doktor6495
@doktor6495 3 жыл бұрын
Na dann bin ich ja mal auf die Assembler Version/Folge gespannt! Viele Grüße, Doktor64!
@Hannes_Oesi
@Hannes_Oesi 3 жыл бұрын
Das Zeigt einen auch jetzt ihrgendwie "WARUM ZUM TEUFEL" Progamme auch in der Heutigen Zeit, auf den einem Gerät läuft und auf einem Anderen eben nicht
@jenselstner5527
@jenselstner5527 8 ай бұрын
Nice Video. Ein "FOR B=1 TO Y" hätte es besser gefixt, da du jetzt beim Übergang von Y=1 auf Y=0 einen Sprung von 2 Punkten hats. ;o)
@f.epsilon9582
@f.epsilon9582 3 жыл бұрын
Sehr interessantes und unterhaltsames Video, macht Spaß auch selbst mal ein bisschen mitzudenken. :D Zu der Rundungsproblematik ist mir noch etwas ein- bzw. aufgefallen (betrifft auch das "flache Minimum"): Soweit ich es richtig verstanden habe, rundet der INT-befehl ja immer auf die kleinere Zahl - im positiven also zum Beispiel 8,6 auf 8 statt 9; im negativen -8,4 auf -9 statt -8. Würde man jetzt grundsätzlich auf alle Zahlen +0,5 addieren (statt 0,1), müsst man ja eigentlich eher einem "klassischen"runden entsprechen. Heißt in Beispielen positiv: 8,0-8,49 --> 8,5-8,99 --> "runtergerundet" auf 8, also richtig (ab)gerundet 8,5-8,99 --> 9,0-9,49 --> "runtergerundet" auf 9, also richtig (auf)gerundet im negativen wirds jetzt spannend negativ: -8,01- (-8,5) --> -7,51 - (-8,0) --> "runtergerundet" auf -8 -8,51- (-9,0) --> -8,01- (-8,5) --> "runtergerundet" auf -9 oder anders geschriben/zusammeneafasst: Bereich 0,5-1,49 wird auf 1 gerundet Bereich -0,51- (-1,5) wird auf -1 gerundet Das kommt den "klassischen" auf- bzw. Abrundungsregeln (nach betrag) schon recht nah, abgesehen von den - x,5 welche hier auf -x; sonst aber eher auf (-x+1) gerundet werden. Ich bin weder Mathematiker noch habe ich wirklich Programmier-Erfahrung; rein logisch erscheint mir das aber recht schlüssig. Kann natürlich sein, dass ich irgendwo einen grundlegenden Fahler eingebaut habe - wenn dem so ist, weist mich gerne darauf hin - aber eigentlich sollte zumindest im Fall des Programmes so eine deutlich zuverlässigere Rundung - bei allen Zahlen - entstehen. Ich freue mich auf weitere Antworten, die mir erklären, was daran falsch gedacht ist ;).
@zuppyguppy2087
@zuppyguppy2087 3 жыл бұрын
Ja, wäre ein Ansatz wenn INT denn auch runden würde, aber meines Wissens schneidet INT einfach alles nach dem Komma ab. Es bleibt einfach die "ganze Zahl" übrig.
@f.epsilon9582
@f.epsilon9582 3 жыл бұрын
@@zuppyguppy2087 wenn int aber einfach abschneidet, würde ja nie -9/0 entstehen, weil die minimalen werte die erreich werden ja bei iwas mit -8,99 liegen, also -8 --> 1
@djxitec81
@djxitec81 3 жыл бұрын
Tolles und interessantes Video. Ich vermisse immer noch einen ausführlichen c64 programmierkurs in KZbin genauso wie Amiga Amos.
@Gutenberg1977
@Gutenberg1977 3 жыл бұрын
Es gibt den kompletten 64er-Magazin Programmierkurs als PDF Archiv zum Download. Ich suche dir gerne den Link raus. Assembler und SID-Programmierung sowie BASIC
@djxitec81
@djxitec81 3 жыл бұрын
@@Gutenberg1977 ja das wäre wirklich interessant. Das würde ich mir gerne mal anschauen. Was noch interessanter wäre ist Amiga Amos da habe ich schon ein ebook bekommen aber wirklich lernen tut man da leider recht wenig.
@justafriend5361
@justafriend5361 3 жыл бұрын
23:29 "Endlösung abspeichern"...uiuiuiui Ne, Spass... Aber dass die Inhaltsangabe neben der Laufzeit angegeben wird (d.h. in welchem Kapitel man ist), finde ich 1A* (den Schreibfehler verbuche ich mal als Programmname seitens Herrn Robel...)
@Zerobrain
@Zerobrain 3 жыл бұрын
Korrigiert.
@justafriend5361
@justafriend5361 3 жыл бұрын
@@Zerobrain Tatsache...und ohne Reupload...saubere Sache. PS: Deine Kommentare in der Gegendarstellung:🤣 Witziger sind nur vereinte Videos...
@re-st95
@re-st95 3 жыл бұрын
Ich kenne nur C und ich muss sagen, das ZWER hat mich bis zur Erklärung mit den 2 Zeichen in Basic so stark verwirrt, dass ich mich erstmal selbst neu starten musste 😂
@Zerobrain
@Zerobrain 3 жыл бұрын
Tja. Wir sind alle verwöhnt von paranoiden Compilern, die dauernd nach Hilfe schreien.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Ja... wartet erst mal auf die assembler Beispiele - paranoide Programmierer, die nach Mami schreien...
@Seegalgalguntijak
@Seegalgalguntijak 3 жыл бұрын
Ui, Assembly - das hab ich in der Tat nie gelernt. Da hätte ich gerne ein Grundlagen-/Einführungsvideo zu!
@netzwerk-werkstatt332
@netzwerk-werkstatt332 3 жыл бұрын
Coole Zusammenarbeit. Ich fand die Einstellung schick wo Du mit dem Rücken vor der Laborecke sitzt. Mit all den Messgeräten im Hintergrund... Da möchte man direkt die Messspitzen in die Hand nehmen oder und loslegen 😀
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Die komplexen Messgeräte sind nur Deko. Beißzange reicht.
@RockyBMusic
@RockyBMusic 3 жыл бұрын
Bug: so druckt er immer(außer bei 0) einen Punkt zu viel Richtig wäre 100 FOR B=1 TO Y ------------------------------- als Sinclair anfänger werden als FOR NEXT Variablen grundsätzlich F oder N benutzt ;-)
@Zerobrain
@Zerobrain 3 жыл бұрын
Danke für die Korrektur.
@unbekannter_Nutzer
@unbekannter_Nutzer 3 жыл бұрын
Zeitstempel für die Kontrolle: 7:11 und 13:15 z.B. Ich schlage vor die Programme bis zum nächsten Mal zu verbessern, bevor man sich in Assembleruntiefen begibt. Am besten einen Test-Driven-Developmentansatz entwickeln. Die Kurven müssen natürlich symmetrisch sein, d.h. gleich flach bei Maximum und Minimum, und speziell f.d. Hausherrn: Nein, ein Peak ist da nicht notwendig, auch wenn man in der Natur ähnliche Rundungen mit Nippel schon gesehen hat.
@RockyBMusic
@RockyBMusic 3 жыл бұрын
@@unbekannter_Nutzer ich würde für Assembler allerdings vorschlagen, den Sinus in einer vorberechneten Tabelle abzulegen. Hab ich damals (1986) auch so gemacht .. kzbin.info/www/bejne/aoS2lmqDnLh4ms0 (interessant zu sehen, welchen Weg die eigenen Programmierversuche so gehen)
@riva32
@riva32 3 жыл бұрын
ganz großes kino !
@clausi5585
@clausi5585 3 жыл бұрын
Das war ja wieder ein riesen Spaß. Ich habe mal vor gefühlten 100Jahren für (gegen😀) meine Kinder ein kleines Mathe-Programm für die Grundrechenarten auf meinem Atari(mit 5''Floppy) in Basic geschrieben. Der Vlog hat mich irgendwie daran erinnert.🙋
@beonura5094
@beonura5094 3 жыл бұрын
Ich denke das könnte so ausgesehen haben. LINK:kzbin.info/www/bejne/hWi4loKnlrKkZpY
@wuslon
@wuslon 3 жыл бұрын
Das war natürlich ein Test. Ein Wolfgang R. macht keine Fehler. Er wollte mit dem fehlerhaften Code testen, ob Zero seine Freundschaft wert ist. ;) Wolfgang könnte niemals mit jemandem befreundet sein, der nicht binär denkt und hexadezimal handelt. Bleibt gesund Ihr beiden.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Besser hätte ich das gar nicht ausdrücken können...
@aaaooaao9949
@aaaooaao9949 3 жыл бұрын
Keine Pralinen ... War wieder nett - wenn ich halt Basic auf einem CPC464 erlernte - Da musste man nicht jede Kleinigkeit Poken ;) (wenn halt die Spiele-Auswahl doch etwas restriktiver ausfiel, als beim C64 des Kumpels - aber war missbrauchte ich auch den Arbeits-Rechner des Vaters ... EpsonFX80 - 9-Nadel-Drucker ... nächtelang ...) War schon eine geile Zeit!
@beonura5094
@beonura5094 3 жыл бұрын
Das BASIC vom Amstrad war/ist wirklich gut und ziemlich schnell! Hier mal ein Beispiel! Link:kzbin.info/www/bejne/b2bHk3t_nap-mrc
@beonura5094
@beonura5094 2 жыл бұрын
Es gab auch für den CPC jede Menge Spiele, wenn auch nicht so viele wie für den Brotkasten! Aber das Locomotive Basic war super, da konnte man sogar mit Basic richtig gute Programme erstellen!
@robertrobert5487
@robertrobert5487 3 жыл бұрын
Super Video - Hat mich an meine Schulzeit erinnert wo ich BASIC und dann PSCAL gelernt habe. Ich hab auch noch meinen alten Sharp PC-E500 der auch mit BASIC zu programieren ist.
@ritaschulz6536
@ritaschulz6536 3 жыл бұрын
wenn Sie BASIC mögen dann schauen Sie unter www.qb64.org/portal/ da gib es QB64-BASIC voll QB-4.5 Compatibel und es Kompiliert das Programm zu EXE FILES! OPEN-GL IST AUCH EINGEBAUT!
@slcainehmierz7681
@slcainehmierz7681 3 жыл бұрын
Ich find das Video gut und hoffe das die darauf folgenden Videos in kürzerer Zeitspanne kommen als dies von diesem Video zu dem vorherigen Video dieser Serie Retro der Fall war. Man kann sich ja nur vorstellen wie es gewesen wäre wenn der Coronablödsinn nicht wäre. Aber dennoch war die Folge gut, auch wenn mir die Witze gefehlt haben und das gegenseitig sticheln, da eben keine direkte Interaktion da war. Die Gegendarstellung von Wolfgang hat's so ein bissel wettgemacht :-) Man kann aber erahnen aus den Outtakes von dem Konfettiproduzenten, die man so schlecht wegsaugen kann, das es in normalem Bahnen wohl deutlich besser gewesen wäre. Was ich mich jedoch Frage ist, wozu hat Herr Robel nun einen dritten AIM-65? Er hatte doch bereits 2 die ursprüngliche Rockwell Version und die die dann Commodore herausgebracht hat? Oder ging es da schlicht um die Umverpackung des AIM-65, da die Teile ja schon so 700 bis 1200 Dollar kosten und sicherlich in der frühestens Form wohl noch teurer sind. Das hier erinnert mich stark daran als mein Vater damals mit einem VTech ankam auf dem man Basic programmieren konnte und ich das Geräte genutzt habe und das nicht gerade wenig und es läuft auch heute noch. Habe dies mal rausgekramt und auch mal etwas rumgetipselt. Man was da für lustige Erinnerungen hoch kamen. Danke dafür :-) Schon lustig das meine alten Konsolen wie SEGA, NES, SNES, Gameboy es noch heute machen. Nur doof das die Spiele so teuer geworden sind^^. Das einzige Problem ist nur wenn man sich einen neuen Fernseher kauft und man nicht darauf achtet das dort ein Skartanschluss dran ist muss man sich dann einen Skart-HDMI Konverter kaufen muss^^. Bin bis dato aber nicht so zufrieden mit dem Ergebnis.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Da verwechselt doch tatsächlich jemand KIM-1 und AIM-65... KIM-1 hab ich zwei - einen ganz alten mit ROR-Bug-CPU und einen Commodore-Typ. AIM-65 hab ich jetzt auch zwei - einen mit abgesägter Tastatur und ohne Gehäuse und einen Vollständigen!
@slcainehmierz7681
@slcainehmierz7681 3 жыл бұрын
@@wolfgangrobel Ups. Den mit abgesägter Tastatur und der trendigen neuen Leertaste fand ich auch ganz drollig, nur eben nicht mehr Original. Was natürlich deutlich den Wert mindert.
@daslotaffchen2966
@daslotaffchen2966 3 жыл бұрын
@ Wolfgang könntest du evtl. den super geilen Sound der Vectrex(bzw. der Spiele) auf diese omminöse Webseite hochladen ? & macht ihr beide noch mal ein Let's Play zusammen ? 👍
@knuwepaluwe
@knuwepaluwe 2 жыл бұрын
Ihr seid ein tolles Team! Hach... Schnapspralinen .... (welche Sorte, und wie kann ich euch mal welche schicken?) Danke jedenfalls für die erquicklichen Momente!
@Zerobrain
@Zerobrain 2 жыл бұрын
Schau mal auf Wolfgangs Homepage im Impressum ;-)
@olafhackenberg6192
@olafhackenberg6192 2 жыл бұрын
Ich hab damals mit dem Sharp Pocket Computer PC 1245 begonnen, der hatte 1486 Byte Speicher, kaum zu glauben, damit haben wir Spiele programmiert (man konnte 16 Zeichen à 5*7 Pixel LCD direkt anpoken). Dazu gab es einen externen Thermodrucker mit Kasetteninterface. Das war damal ganz großes Kino.
@mtbjonny9502
@mtbjonny9502 3 жыл бұрын
Ihr erinnert mich sehr stark an die beiden alten knackkern bei der Muppet show ?? Smile .. fehlt nur noch Gonzo mit seinem Motorrad Lodge - Stunt .. schönen Gruss noch.
@bernhardammer5106
@bernhardammer5106 3 жыл бұрын
Ja ja, die Freuden der BASIC-Dialekte und der unterschiedlichen Hardwarefähigkeiten. Deshalb gab es damals auch BASICODE um die Inkompatibiltäten zu umschiffen. Pascal kannte dieselben Probleme. Zumindest zwischen Standard-Pascal nach Wirth und Turbo-Pascal. Letzteres hatte bei den Ein-/Ausgabefehlen kleine Abweichungen vom Standard, die es einem ersparten mit Zeigern für den Satzpuffer arbeiten zu müssen.
@ChipGuy
@ChipGuy 3 жыл бұрын
Ich dachte ja, dass Ihr Beide die Aufnahme eines einer Live-Streaming Session präsentiert. Aber das hier ist auch cool. In den Teams-Sessions mit den Kollegen haben wir jedenfalls neben Arbeit auch jede Menge Spaß.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Wir sind sowas von gut, wir können uns sogar zeit- und ortsversetzt dissen!
@olafschermann1592
@olafschermann1592 3 жыл бұрын
Jaja, wer austeilt muss auch einstecken können. Die korrekte kaufmännische Rundung mit +0.5 hast du ja bereits unten reingeschrieben. Statt zwei if würde ich nur eines nehmen, das im negativen Bereich einfach 1 abzieht, wenn du im default Fall 0.5 addierst. Weiters haben wir Studierte gelernt nie auf =0 abzufragen sondern auf
@TheStyrian001
@TheStyrian001 3 жыл бұрын
Geil !!! Erinnert mich an meine VC20-Zeiten ! Den C64 konnte sich dazumal nicht jeder leisten...und den Sinclair ZX Spectrum schon gar nicht
@TriplexXx2011
@TriplexXx2011 3 жыл бұрын
Wenn das in einem richtigen Battle ausartet steht nachher eine ganz neue künstliche Intelligenz da und wird uns alle vernichten :D Ihr seid also die erschaffer von Skynet :D Auch wenn ich auf halber Strecker aus der Kurve geflogen bin war es doch sehr interessant und unterhaltsam :) Bin auf weitere Battles gespannt ;)
@nighthawkflyer
@nighthawkflyer 3 жыл бұрын
Wenn ein kleines Basicprogramm schon so einen Wind macht , können wir uns ja beim Assembler-Duell auf einen Sturm einstellen. Man hätte ja beim C64 die Zeichenausgabe auch an einen MPS801 Drucker umleiten können. Der hatte einen tollen Sound beim Drucken (Nachts ein Basic-Listing ausdrucken war schon fast eine Ruhestörung).
@Zerobrain
@Zerobrain 3 жыл бұрын
Der 801 steht tatsächlich schon bereit.
@nighthawkflyer
@nighthawkflyer 3 жыл бұрын
@@Zerobrain Habe gerade mal gegoogelt, es gibt tatsächlich noch das Endlospapier mit der Tracktorführung. Hatte ich irgendwie verdrängt .
@Zerobrain
@Zerobrain 3 жыл бұрын
@@nighthawkflyer Auch das liegt schon bereit!
@omashaushalt
@omashaushalt 3 жыл бұрын
@@nighthawkflyer Keine Wunder - endlos viele Firmen arbeiten ja immer noch damit.
@fashionvids6502
@fashionvids6502 3 жыл бұрын
Will mich auch unbedingt in das Thema rein Fuchsen ☺️
@JP10099
@JP10099 3 жыл бұрын
AIM-65 ist ja ganz toll, aber vielleicht kann Wolfgang beim nächten mal zeigen, wie man eine AIM-120 Luft-Luft-Rakete programmiert?
@Zerobrain
@Zerobrain 3 жыл бұрын
Solche "Luftnummern" machen wir nur vor ausgewähltem Publikum.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Nachher wird's so ein Rohrkrepierer, den man nur mit einer Zangengeburt gelöst bekommt... Zerobrain, übernehmen Sie!
@Zerobrain
@Zerobrain 3 жыл бұрын
Erinnert mich an: kzbin.info/www/bejne/m2fdo6GslNpja9E
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
So war's gedacht!
@Dampfkompressor
@Dampfkompressor 3 жыл бұрын
Da passt doch besser die AIM- 9. Die kleine Schlange macht doch auch so schöne Sinuskurven - bei der Fortbewegung...😉
@plasmamac
@plasmamac 3 жыл бұрын
Drucker statt Display 😅 🙈
@streseman
@streseman 3 жыл бұрын
Mensch.... wo waren denn da die Schnapspralinen?
@Lissica1
@Lissica1 3 жыл бұрын
Die gibts nur wenn die Beiden zusammen sind! Weil dann gibts daheim keinen Mecker, haben ja nur Pralinen gegessen :))
@ChipGuy
@ChipGuy 3 жыл бұрын
Zu Wolfgangs neuem Spielzeug würde ich gern mal ein Zerlegevideo sehen. Also non-destructive natürlich.
@Zerobrain
@Zerobrain 3 жыл бұрын
Z E R L E G E N !
@urugulu1656
@urugulu1656 3 жыл бұрын
@@Zerobrain nein nein nein das lied geht ZERSTÖÖÖÖREEEEEN!!!!
@karlbesser1696
@karlbesser1696 3 жыл бұрын
Wenn man alt wird, geht man wieder auf die vertrauten Basics zurück. Mit all diesen neumodernen Kram kann man nichts mehr anfangen. ;-)
@crapcbm
@crapcbm 3 жыл бұрын
Ja, als man noch Zeilennummern hatte, war die Welt noch schön ;-) Also Papier ist schon ein lauter Monitor ... hehehe Wolfgang ist doch nur neidisch auf den Zeh Vierundsechzig! :D
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Passt aber irre viel drauf! Ich bin ganz von der Rolle!
@D_Abbo
@D_Abbo 3 жыл бұрын
@@wolfgangrobel Und man kann weiter hochscrollen als beim C64!
@zycoxlp6465
@zycoxlp6465 3 жыл бұрын
I am literally coding a game in basic right now while watching this
@iginimidi
@iginimidi 3 жыл бұрын
Viel mehr Basic bitte!
@Zerobrain
@Zerobrain 3 жыл бұрын
1 RUN
@ritaschulz6536
@ritaschulz6536 3 жыл бұрын
wenn Sie BASIC mögen dann schauen Sie unter www.qb64.org/portal/ da gib es QB64-BASIC voll QB-4.5 Compatibel und es Kompiliert das Programm zu EXE FILES! OPEN-GL IST AUCH EINGEBAUT!
@Seegalgalguntijak
@Seegalgalguntijak 3 жыл бұрын
Da hat der Wolfgang sich aber was geleistet...in einem Video an alle Zuschauer zu sagen: "Ich bin für Kritik offen, wenn sie nicht von DIR kommt!" Na, wer soll sich denn da bitteschön *NICHT* angesprochen fühlen? Jaja, so ist das mit der Kritikfähigkeit... "Ich bin für jegliche Kritik offen, solange sie nur die positiven Aspekte meines Handelns aufführt!" ;-P
@AtzeDatze
@AtzeDatze 3 жыл бұрын
Du verstehst eben nicht die "besondere Verbindung" zwischen den beiden.😉
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Genau so!
@ChipGuy
@ChipGuy 3 жыл бұрын
Ja, bitte mehr. Assembler wird zwar jetzt auch immer weniger, aber ist dennoch heute interessanter als Basic.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Auch heute gilt: wer die Grundlagen von Assembler nicht versteht, der hat gar nichts verstanden! Spätestens, wenn das Programm wieder mal nicht funktioniert, lohnt es sich, mal näher zu ergründen, was der Compiler aus der Hochsprache gewurschtelt hat! Wer das nicht deuten kann, ist verloren.
@ChipGuy
@ChipGuy 3 жыл бұрын
@@wolfgangrobel Dem kann man nur uneingeschränkt Zustimmen. Die Realität sieht bei vielen Programmierern aber leider anders aus und ich kämpfe seit Monaten mit so Einem. Gut, auch das ist eine Erfahrung mehr als vorher.
@AtzeDatze
@AtzeDatze 3 жыл бұрын
@@wolfgangrobel Bei Mikrocontrollern ist das interessant, bei Windowsprogrammierung eher weniger (ausser Treiberprogrammierung) und bei PHP & Co so ziemlich unmöglich. 😁
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
@rogie18967 Da hast du recht! Ich komme halt aus der hardwarenahem Programmierung...
@AtzeDatze
@AtzeDatze 3 жыл бұрын
@@wolfgangrobel Ich auch, zumindest anfangs. Inzwischen lohnt es wirklich nur in wenigen Fällen. Ich habe Anfang der 90'er mal in Turbo Pascal 6.0 angefangen, eine kleine 3D Grafik Engine zu programmieren, die Texturen auf Rechtecken darstellen konnte, vieles davon habe ich in Assembler geschrieben. Kurze Zeit später hatte ich dann Borland C++3.1 und habe das ganze in C umgesetzt, und das lief tatsächlich schneller als das inline Assembler in Turbo Pascal. Ich war natürlich neugierig, warum, und schaute mir das genrierte Assemblerlisting an und siehe da: Der Compiler benutzte Assembler Befehle, die ich gar nicht kannte. 😄😄
@RMultitool
@RMultitool 3 жыл бұрын
Unterhaltsam die Technik von Wolfgang & die ganzen kryptische zeichen Eingabe 😎 Nur leider verstehe ich Dafoe so viele wie der Dodo fon Fliegen 🤪 Aber die alte Technik ist hoch interessant Besonders was Wolfgang da immer aus seinem Fundus. Herbei zaubert Einfach faszinierend Grüße Das #rmultitool
@relgeiz2
@relgeiz2 3 жыл бұрын
Zerobrain, sag mal, hat der rechthaberische Herr, der das hochkomplexe und über jede Kritik erhabene AIM-65 - Programm geschrieben hat, eigentlich eine eigene Webseite?
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Mit Recht!
@relgeiz2
@relgeiz2 3 жыл бұрын
@@wolfgangrobel - und mit der geliehenen Reichweite von Zerobrain! :-D
@minastaros
@minastaros 3 жыл бұрын
Bin gerade bei 7:24. Ich tippe mal auf das int(). Müsste eher ein round() sein, oder eben (kann mich nicht an BASIC round() erinnern) die korrekte Korrektur mit 0.5. Zudem fällt auf, dass der positive Teil nicht exakt dem negativen entspricht, vermutlich deswegen.
@minastaros
@minastaros 3 жыл бұрын
Nach dem Video: ja, Mensch, das mit dem 0.1 solltest du unbedingt richtigstellen. Muss 0.5 sein. Das ist doch 1x1: Umwandlung von float nach int ohne math.h (bei kontrollierem Wertebereich). Geht auch mit C++ noch...
@daslotaffchen2966
@daslotaffchen2966 3 жыл бұрын
Hah, so eine schöne Tasse !
@Zerobrain
@Zerobrain 3 жыл бұрын
Danke.
@alf9278
@alf9278 3 жыл бұрын
Das Video war gar nicht in meiner Abo Übersicht. Bug or Feature?
@Zerobrain
@Zerobrain 3 жыл бұрын
KZbin fragen...
@hanswurst-zk3xl
@hanswurst-zk3xl 3 жыл бұрын
Dieses Mal gabs keine Mail obwohl Abo und Glocke aktiv sind bei mir. Immerhin tauchte das Video in den Vorschlägen auf.
@Zerobrain
@Zerobrain 3 жыл бұрын
Abonniert einfach meinen Twitter / Facebook / Instagram Feed ;-)
@urugulu1656
@urugulu1656 3 жыл бұрын
dito
@TheMyname707
@TheMyname707 3 жыл бұрын
@ Du meinst bei 0:50 die basics of basic, oder? :'D @ Wolgfang: Du stehst hier nicht unter Beobachtung, wir sind doch unter uns. Ich glaube, diese Fehler hat jeder schon gemacht. Manche verheimlichen es, andere geben es zu, und andere veröffentlichen es damit wieder andere etwas lernen können. :)
@GTRDRIVER1
@GTRDRIVER1 3 жыл бұрын
Ach war das schön als man noch 3 Stunden program listings abgetippt hat und dann vor lauter "gaga" vergessen zu speichern... (natürlich auf datasette.......)
@AtzeDatze
@AtzeDatze 3 жыл бұрын
Oder bevor man speicherte, Run eintippte und der Rechner dann abstürzte 😄😄
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Oder wenn man nach Eintippen des Programms - um den Cassettenrecorder zu holen - hektisch über das Netzkabel des Netzteils stolperte und dieses aus dem Gerät riss... Ist mir beim ZX-81 passiert...
@franconianbike
@franconianbike 3 жыл бұрын
warum muss man beim Runden ne Fallunterscheidung machen. In c/c++/c# würde ich (int)(sin(A / 5.0f) * 9.0f + 0.5f) + 9 schreiben, da brauchst nix zu runden. Nein, d.h. ich würde (int)(sin(A * 0.2f) * 9.0f + 0.5f) + 9 schreiben und die Magic numbers durch Macros ersetzen, aber das iss ja das gleiche.
@matteoreiter
@matteoreiter 3 жыл бұрын
Verwendet ja nicht Filmora, weil weil wondershare bei der Suche nach jeder anderen Open source Videosoftware auf ihre Webseite mit filmora umleitet. Ich hab selbst nach einer filmsoftware gesucht und bin immer als erstes auf ihre Seite geleitet worden.
@Lissica1
@Lissica1 3 жыл бұрын
oO Wolfang hat was falsch gemacht, BATTLE ROYALE :))
@Horst021
@Horst021 3 жыл бұрын
Und jetzt bitte das Ganze noch für den "Z3"...
@Zerobrain
@Zerobrain 3 жыл бұрын
Quasi ein akustik Relais Koppler.
@suhillia
@suhillia 3 жыл бұрын
Wie hieß die URL nochmal?
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
www.wolfgangrobel.de ... wie sonst?
@MompfDompf
@MompfDompf 3 жыл бұрын
Das letzte Mal das ich Basic am 64er gemacht hatte war im letzten Jahrtausend. (VisualBasic zählt nicht hab ich immer gemieden). Kennt ihr noch vom C64 den MSE wo man aus den Heften Seiten weise Maschinencode abgekopft hat. (Und dann am Schluss merkt... F*** das war die April Ausgabe.) Ich könnte heute noch fluchen, aber auch andererseits über meine eigene Dämlichkeit lachen.
@D_Abbo
@D_Abbo 3 жыл бұрын
...oder in der nächsten Ausgabe stand: "Oh, da hat sich leider der Fehlerteufel eingeschlichen." und Du hast einen Monat lang den Fehler bei Dir gesucht.
@amiganer681130
@amiganer681130 3 жыл бұрын
Das ist nicht wirklich ein bug. Das selbe passiert auf dem C64 bei 40 Zeichen. Warum ist das so? Wenn man an die Grenze kommt (AIM 65: 20, C64: 40) , dann springt das nächste Zeichen bereits auf die nächste Zeile. Wenn man dann keine Leerzeile haben will, dann muß man so tun, als würde man einfach weiter schreiben. Versuche mal den Bildschirm mit einem Zeichen zu füllen, es wird immer in der letzten Zeile passieren, das eine Leerzeile erscheint, wenn das Zeichen ganz rechts, ganz unten gedruckt wird.
@udograf2059
@udograf2059 2 жыл бұрын
Hat Wolfgang die Tastatur repariert ,(Die Leertaste ) oder hat er zwei.
@uwegroote7456
@uwegroote7456 3 жыл бұрын
110 IF Y0 THEN PRINT"."; :-) Sehr tolles Video. Ich Programmiere noch in FreeBasic. Der Stil ist aber völlig anders als beim guten alten Basic V2.
@ritaschulz6536
@ritaschulz6536 3 жыл бұрын
wenn Sie BASIC mögen dann schauen Sie unter www.qb64.org/portal/ da gib es QB64-BASIC voll QB-4.5 Compatibel und es Kompiliert das Programm zu EXE FILES! OPEN-GL IST AUCH EINGEBAUT!
@andremuller8174
@andremuller8174 3 жыл бұрын
der VC20 hat gegenüber dem AIM-65 satte 17 Basic bytes mehr zu verfügung ;-)
@urugulu1656
@urugulu1656 3 жыл бұрын
lol ich will mal sehen wie er das selbe programm in assmebler programmiert... Nen 8bitter ohne floating point unit ohne floating point befehle oder ähnliches zu sowas zubringen macht schon echt jede menge spass (nicht) und dann will ich ihn mal sehen wie er die taylorreihe vom sinus im assembler unterbringt...
@Seegalgalguntijak
@Seegalgalguntijak 3 жыл бұрын
Krass, mein KZbin hat mich NICHT benachrichtigt! Weder auf der "my subscriptions" Seite, noch über die Benachrichtigung. Aber das letzte Mini-Video von bigclive hat es mir natürlich über die Empfehlungen trotzdem reingespielt. Aber nerven tut es schon.
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Ein weiterer guter Grund, hier regelmäßig vorbeizusehen!
@Zerobrain
@Zerobrain 3 жыл бұрын
Oder mir auf Twitter zu folgen...
@Seegalgalguntijak
@Seegalgalguntijak 3 жыл бұрын
@@Zerobrain Twitter? Habichnich...
@Seegalgalguntijak
@Seegalgalguntijak 3 жыл бұрын
@@wolfgangrobel Na klar...
@Ratzfaz
@Ratzfaz 3 жыл бұрын
Als damals der Wolfang das Programm am AIM-65 Programmiert hat, wusste man denn damals schon, dass es irgendwann einen C64 geben würde ?
@urugulu1656
@urugulu1656 3 жыл бұрын
das programm ist kaum älter als nen paar wochen (aller wahrscheinlichkeit nach) also ist die frage hinfällig weil beides nach ansicht der massen zum alten eisen gehört...
@Ratzfaz
@Ratzfaz 3 жыл бұрын
@@urugulu1656 Die Frage war mehr Ironisch gemeint. Aber wenn du keine Ironie verstehst: Der AIM-65 wurde 1976 gebaut. Der C64 folgte erst 6 Jahre später. Hätte man damals am AIM65 schon wissen können, dass die Programme später nicht kompatibel mit dem C64 sind ?
3 жыл бұрын
haha, diese nette Kaffeetasse hab ich auch!
3 жыл бұрын
C64 und auch die Eule :D
@marcosch1109
@marcosch1109 3 жыл бұрын
Oh man, ich fühl mich wieder wie 16.
@Chris_Dr
@Chris_Dr 3 жыл бұрын
Ich mich wie 8... Das war damals noch alles so schön simpel - aber nicht minder spannend.
@Sebastian-il2ly
@Sebastian-il2ly 3 жыл бұрын
das war jetzt das erste video was nicht in der abobox war
@Zerobrain
@Zerobrain 3 жыл бұрын
Updates immer per Twitter / Facebook / Instagram!
@Sebastian-il2ly
@Sebastian-il2ly 3 жыл бұрын
@@Zerobrain ich hab aber leider nichts von den drei und will mir auch nichts davon zulegen
@Zerobrain
@Zerobrain 3 жыл бұрын
Dann musst du halt per Hand regelmäßig vorbeischauen...
@omashaushalt
@omashaushalt 3 жыл бұрын
Stimmt, bei mir auch nicht. Und ich habe von dem anderen, unten erwähntem Kram auch nix.
@Zerobrain
@Zerobrain 3 жыл бұрын
@@omashaushalt Dann musst du halt per Hand regelmäßig vorbeischauen...
@AtzeDatze
@AtzeDatze 3 жыл бұрын
2:20 Ätsch der VC20 hatte 3583 Bytes Programmspeicher in der Grundausstattung, ganze 17 Bytes mehr als dein AIM65 😜. 😄😄😄😄😄
@AndreasDelleske
@AndreasDelleske 3 жыл бұрын
rogie18967 da war ich ja mit meinem C64 schon voll der Rockefeller!
@frag_stone
@frag_stone 3 жыл бұрын
Das Programm hatte “Fehler”. Andere würden sagen: Das Programm hatte Verbesserungspotentiale :)
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Features!
@kaspermarte
@kaspermarte 3 жыл бұрын
24:11 "Hardwareabhängikeiten" meint der Drogen?
@carlc.4714
@carlc.4714 3 жыл бұрын
@zerobrain das du "C" und "richtige Sprache" in einem Satz erwähnt hast, hat mich irritiert. War das ironisch gemeint? (Achtung eigene Erfahrung + Meinung voraus:) Als ich vor vielen Jahren noch (hobbymäßig) in C programmiert habe, ist mir das ein oder andere Programm um die Ohren geflogen, so bald ich den C Compiler gewechselt habe. Das darf bei einer "richtigen" Programmiersprache meiner Meinung nach nicht passieren. Da sollte die Spec keinen Interpretationsspielraum lassen.
@urugulu1656
@urugulu1656 3 жыл бұрын
streng genommen ist das bei c der fall! die unterschiede zwischen den compilern findet man hauptsächlich bei undefined behavior und das ist nun mal eben nicht definiert. was ein compiler dann macht muss nicht immer gleich geschweigedenn richtig sein. er kann machen was er will undefined behaviour eben. da hat auch interpretation nicht unbedingt was mit zutun. der compiler produziert was er in dem fall produzieren würde und es fehlt einfach die abfrage ob das ganze valide ist beziehungsweise die ausgabe einer warnung. durch dass das ergebnis nicht definiert ist ist jedes ergebnis standard konform... und jeder compiler ist etwas anders aufgebaut und produziert verschiedene ergebnisse in den verschiedenen edgecases eben weil sein aufbau so verschieden ist.
@temetnosce6192
@temetnosce6192 3 жыл бұрын
Das Coronaexperiment :-)
@udograf2059
@udograf2059 2 жыл бұрын
Wenn man wegen int sowieso if Anweisungen schreiben muß.Kann man sich nicht gleich eine mathematische Rundungsfunktion bauen.
@urugulu1656
@urugulu1656 3 жыл бұрын
ein hoch auf die beschissene youtube hauptseite, da ist mir das doch tatsächlich nicht in die benachrichtigungen gekommen.... Toll
@chudiworks
@chudiworks 3 жыл бұрын
Ich finde das Programm nicht ganz korrekt. Der Treppeneffenkt bei dem Minimum kommt dadurch zustande weil ja die Punkte nur nicht gedruckt werden wenn der Y-Wert 0 ist. Man müsste aber den B-Wert 0 überspringen - also innerhalb der Schleife fragen ob B=0 ist und dann wird in jeder Ausgabezeile der erste Punkt geschluckt. Zeile 95 streichen und stattdessen: 105 IF B=0 goto 120 Sonst nettes Video , wie immer :-)
@Zerobrain
@Zerobrain 3 жыл бұрын
>105 IF B=0 goto 120 Also das macht ja gar keinen Sinn! Damit wird die Schleife nur für B=0 geskippt. Entspricht dann quasi FORor B =1 to Y
@chudiworks
@chudiworks 3 жыл бұрын
@@Zerobrain hmmm .. du sagtest die Schleife wird auf jeden Fall einmal durchlaufen, daher mein eigenartiger Ansatz. bin bei Basic auch schon ewig raus ... edit : gibt ja zum Glück online-Intepreter: und du hast recht :-) 40 for a=1 to 20 50 print "#"; 60 next a 61 print 70 for a=0 to 50 80 z=sin(a/5)*9.5 82 y=9+(int(z)) 100 for b=1 to y 110 print "."; 120 next b 130 print "*"; 140 next a
@f.epsilon9582
@f.epsilon9582 3 жыл бұрын
@@Zerobrain Ich würde sagen, man könnte einfach die punkte statt bis Y immer (außer beim ersten mal) bis (Y-1) gehen lassen; wenn man auf Pos 18 das sternchen setzen will, muss man ja nur 18 Punkte (0-17) davor setzen. Das war in der Lösung von Wolfgang quasi schon mit eingepreist, der Punkt am Anfang "zu viel" war in jeder Zeile da, sodass der erst Punkt sozusagen immer einen Wert von -1 dargestellt hat. Von der Form her hat die ursprüngliche Lösung in dieser Hinsicht sogar besser gepasst ;)
@DrTob
@DrTob 3 жыл бұрын
Zerobrain doch, 1to y wäre korrekt gewesen, denn dann werden immer y Punkte ausgegeben. In deiner Lösung werden bei x=0 0 Punkte, ansonsten y+1 Punkte ausgegeben.
@Goasler
@Goasler 3 жыл бұрын
Commodore C64
@LD49196
@LD49196 3 жыл бұрын
kann ich euch mal mein prg zusenden?
@Zerobrain
@Zerobrain 3 жыл бұрын
... Wenn wir den Stundensatz vorher verhandelt haben.
@crashoverride81
@crashoverride81 3 жыл бұрын
Hatte der Wolfgang nicht ne Website? Wie hieß die noch???😂
@AtzeDatze
@AtzeDatze 3 жыл бұрын
Ja, die ist so kompliziert zu merken, kaum einer weiss, das es www.wolfgangrobel.de ist.😄😄
@wolfi1078
@wolfi1078 3 жыл бұрын
@@AtzeDatze stimmt! Und hätte sogar schön aufs Display der AIM-65 gepaßt.
@ZeeroGamingTV
@ZeeroGamingTV 3 жыл бұрын
altes Rechnerzeugs: mehr gramm als byte
@plasmamac
@plasmamac 3 жыл бұрын
Los Poke(t) euch
@Zerobrain
@Zerobrain 3 жыл бұрын
Und du peekst dann?
@clemensschaeffner9670
@clemensschaeffner9670 3 жыл бұрын
1. Wäre früher niemand auf die Idee gekommen eine Variable mit mehr als 2 Zeichen zu verwenden. 2. Bug im Programm 0 gibt keinen Punkt aus aber 1gleich zwei.🙄
@Zerobrain
@Zerobrain 3 жыл бұрын
zu 2) Ups: stimmt! Sehr gut! (im angepinnten Kommentar ergänzt)
@urugulu1656
@urugulu1656 3 жыл бұрын
zu eins wozu braucht man variablen wen man register und speicheraddressen hat
@AdriaanL1973
@AdriaanL1973 3 жыл бұрын
Man weiß das man Alt ist wenn einen die ganzen doofen Pokes, Peeks und Sys Befehle schneller einfallen als das Geburtsdatum der Liebsten ;-) In dem Sinne: Sys 64738 ;-)
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Call -151
@GodOfFart
@GodOfFart 3 жыл бұрын
Indent 10,3 ich vermisse dich...
@rweninger
@rweninger 3 жыл бұрын
Hab die gleiche Tasse!
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Die mit Eule, gell?
@rweninger
@rweninger 3 жыл бұрын
@@wolfgangrobel Ja genau!
@ritaschulz6536
@ritaschulz6536 3 жыл бұрын
Schönen Tag zusammen tolles Video!!. Wenn Sie BASIC mögen dann schauen Sie bitte unter www.qb64.org/portal/ da gib es einen QB64-BASIC Compiler dr ist voll zu QB-4.5 Compatibel und es Kompiliert das Programm zu EXE FILES! OPEN-GL IST AUCH EINGEBAUT! ACHTUNG DIE COMPILIERTEN FILES SIND E X T R E M S C H N E L L ZUR LAUFZEIT. Viel Spass und alles gute wünscht ... Rita EOF EOT
@iectorguard2753
@iectorguard2753 3 жыл бұрын
Warum kein std::round() 😂
@AndreasDelleske
@AndreasDelleske 3 жыл бұрын
Iector guard weil die Template-Fehlermeldungen sonst immer mehrere Seiten volldrucken.
@maxbaumgartner2983
@maxbaumgartner2983 3 жыл бұрын
Ganz ohne altherren Witze? Schade. -
@Zerobrain
@Zerobrain 3 жыл бұрын
Hast Du den "Sinus" nicht gesehen? Fehlt Dir die Phantasie? Das Programm ist REINER PIXELPORN!
@sturmadler7101
@sturmadler7101 3 жыл бұрын
@@Zerobrain das you Tube das nicht zensiert!
@manfredkuminski5448
@manfredkuminski5448 3 жыл бұрын
@@Zerobrain Darum war der Nuppsi oben an der Kurve auch so wichtig.
@ShoxMG
@ShoxMG 3 жыл бұрын
Aua, Tastatur-Quäler
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Wer jetzt?
@Zerobrain
@Zerobrain 3 жыл бұрын
Er wars!
@ShoxMG
@ShoxMG 3 жыл бұрын
@@wolfgangrobel Der, der fragt ;) Der arme Rockwell
@wolfgangrobel
@wolfgangrobel 3 жыл бұрын
Eine gute Tastatur kann sowas ab.
@beonura5094
@beonura5094 3 жыл бұрын
Warum wird Basic einfach immer nur so schlecht geredet, auch in anderen Programmiersprachen gibt es Sprungbefehle(die vergleichbar mit GOTO sind!!) Aber Programmiersprachen die aus Blöcken bestehen(Scratch, Snap usw.) werden hochgelobt. Und eine andere Programmiersprache wie Python(=verkomplizierte Mischung aus Basic & Logo und ein bischen Pascal)wird ebenfalls hochgelobt, warum eigentlich??
@Zerobrain
@Zerobrain 3 жыл бұрын
Sind auch Modeerscheinungen. Selbst für den "bösen GOTO" gibt es durchaus legitime Ansätze.
@beonura5094
@beonura5094 3 жыл бұрын
@@Zerobrain Allerdings da es in sehr vielen Programmiersprachen vergleichbare Befehle gibt!
@zackbrandigan9209
@zackbrandigan9209 Жыл бұрын
Immer noch falsch 😁. Jetzt ist Wolfgang wieder dran.
Она Постояла За Себя! ❤️
00:25
Глеб Рандалайнен
Рет қаралды 6 МЛН
Кәріс тіріма өзі ?  | Synyptas 3 | 8 серия
24:47
kak budto
Рет қаралды 1,6 МЛН
Which one will take more 😉
00:27
Polar
Рет қаралды 83 МЛН
I PEELED OFF THE CARDBOARD WATERMELON!#asmr
00:56
HAYATAKU はやたく
Рет қаралды 32 МЛН
Exploring Sid Meier's Pirates! - BASIC Code, Quirks, Bugs on Commodore 64
46:01
Compiling MS-DOS 4.0 using DOSbox & Qemu
17:59
Neozeed
Рет қаралды 3,3 М.
10 Rarely Used Commodore 64 BASIC Features
31:20
8-Bit Show And Tell
Рет қаралды 73 М.
Mechanisches Addierwunder: Bell Punch PLUS 509
24:42
Zerobrain
Рет қаралды 20 М.
Mechanisches Rechnen: Sprossenradmaschine Thales CER
23:02
Zerobrain
Рет қаралды 15 М.
KIM - 1 - die 8 Bit Legende (Commodore Retro Computing)
28:51
Zerobrain
Рет қаралды 31 М.
How to Make a C64 Game in BASIC Ep.1 [HOW2] | Nostalgia Nerd
13:53
Nostalgia Nerd
Рет қаралды 112 М.
Why spend $10.000 on a flashlight when these are $200🗿
0:12
NIGHTOPERATOR
Рет қаралды 17 МЛН
Apple Event - May 7
38:32
Apple
Рет қаралды 6 МЛН
Introducing GPT-4o
26:13
OpenAI
Рет қаралды 3,7 МЛН
APPLE УБИЛА ЕГО - iMac 27 5K
19:34
ЗЕ МАККЕРС
Рет қаралды 96 М.