Robotrontechnik-Forum

Registrieren || Einloggen || Hilfe/FAQ || Suche || Mitglieder || Home || Statistik || Kalender || Admins

Willkommen Gast!

Robotrontechnik-Forum » Sonstiges » Wie wurde diese Grafik erzeugt? » Themenansicht

Autor

Thread - Seiten: -1-

000
Heute, 12:25 Uhr
ThomasR

Avatar von ThomasR

Zum BasiCode-Rundfunklehrgang konnte man sich das Begleitmaterial zusenden lassen.

Auf der vorletzten Seite ist diese

Grafik abgebildet. Weiß jemand, wie sie erzeugt wurde, kennt jemand das Programm dazu?

Bei der Suche im Internet fand ich eine Grafik

,

die anscheinend nach dem gleichen Prinzip erzeugt wurde, dazu das passende LOGO-Programm https://www.fraktalwelt.de/myhome/js/turtle.js .
--
Tot wie ein Dodo?
viele Informationen zu BasiCode auf basicode.de

Cu via komputilo povas Esperanto?
Jes, BasiCode!

Dieser Beitrag wurde am 30.03.2026 um 12:30 Uhr von ThomasR editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

001
Heute, 17:55 Uhr
RenéB

Hallo
es erinnert mich an Fragestrategien - Shannon-Fano oder Huffmann. Siehe „Computer und Kunst“ von Völz. Da ist aber kein Programm dabei.

Grüße René

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

002
Heute, 18:06 Uhr
Dresdenboy

Die Stichworte lauten "L-System" und "Fraktal"

VG,
Matthias
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Aktuelle Projekte: GDC-Analysen für Grafikeffekte u. Demo/Game-Framework, universelles BIC-Modul auf Pico-Basis, Packer mit sehr kleinem 6502-Dekompressor
HW: BIC, MSX2+, KC87, KC85/2-4, KCC, LC-80, PC1715, C64, C16, Plus/4, A500, A1200, Mega 65, µCs ...

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

003
Heute, 21:57 Uhr
BICa5105

Hallo,

am BIC in etwa so :

10 SCREEN5:CLS:PI!=3.14159265#:MX%=220:MD%=8
20 DIMX%(MX%),Y%(MX%),D%(MX%),A!(MX%),L!(MX%):TP%=0
30 X%(0)=130:Y%(0)=0: D%(0)=0:A!(0)=PI!/2:L!(0)=52
40 IFTP%<0THEN190
50 X1%=X%(TP%):Y1%=Y%(TP%): D1%=D%(TP%)
60 A1!=A!(TP%):L1!=L!(TP%)
70 TP%=TP%-1
80 X2%=X1%+L1!*COS(A1!)
90 Y2%=Y1%+L1!*SIN(A1!)
100 IFD1%<6THENC%=4ELSEC%=10
110 LINE(X1%,Y1%)-(X2%,Y2%),C%
120 IFD1%>=MD%THEN40
130 D2%=D1%+1
140 TP%=TP%+1
150 X%(TP%)=X2%:Y%(TP%)=Y2%: D%(TP%)=D2%:A!(TP%)=A1!-.33:L!(TP%)=L1!*.88
160 TP%=TP%+1
170 X%(TP%)=X2%:Y%(TP%)=Y2%: D%(TP%)=D2%:A!(TP%)=A1!+.68:L!(TP%)=L1!*.5
180 GOTO40
190 A$=INKEY$:IFA$=""THEN190
200 SCREEN0:COLOR6:CLS

VG Cornelius
--
https://www.youtube.com/@robotronA5105

Dieser Beitrag wurde am 30.03.2026 um 21:59 Uhr von BICa5105 editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

Seiten: -1- [ Sonstiges ]