Nie jesteś zalogowany. Proszę się zalogować lub zarejestrować.
SV 2024 WE - program imprezy Już za tydzień odbędzie się zimowa edycja Silly Venture
Nowa obudowa dla 800XL - zostało 36 dni Niewiele ponad miesiąc do końca kampanii.
Zmarł twórca języka BASIC Zmarł Thomas E. Kurtz twórca języka BASIC
Zmiana serwera atari.area Serwis przeszedł właśnie ważną aktualizację infrastruktury
4th Atari ASCII Compo - wyniki Dostępne są już wyniki tegorocznego ATASCII Compo.
atari.area forum » Scena - 8bit » Fractal generator
Strony 1
Zaloguj się lub zarejestruj by napisać odpowiedź
Jest czy nie ma ? Szukam.
Przyjedź na party, to se pogenerujesz.
Na party to nawet gobeliny da się generować ;)
O, można zrobić gobelin compo.
w paczce z mads-em jest mandelbrot
Np. w demie Intel Outside.
spytaj Asa o trójkąty Sierpińskiego ;)
A jakiego fraktala chcesz wygenerować ?
Klasykę czyli zbiór Julii czy też Mandelbrota. Wygenerowałem sobie na kalkulatorze to i na Atari się da ;) Szukam gotowego generatora.
Dawno, dawno temu w którymś ze starych ABBUC Magazinów (okolice numerów 35-40) były załączone jakieś procedury do generowania fraktali w Turbo Basicu bodajże.
@grzeniu: jakiś czas temu zajmowałem się tym tematem. tak na szybko procedurka, mojego autorstwa, rysująca zbiór Julii w Basicu Atari i trybie szesnasto-odcieniowym. efekt całkiem niezły. :) ale procedurka bardzo wolna - nie zoptymalizowana, można się pobawić w opytmalizację (F7 w AtariWin rekomendowane :)).
10 GRAPHICS 9+16
15 CRE=0.5:CIM=0.5
20 FOR Y=-100 TO 91
30 FOR X=-40 TO 39
40 N=0
50 ZRE=X*0.075:ZIM=Y*0.025
100 TEMP=ZRE:TEMP2=ZIM
120 ZRE=ZRE*ZRE-ZIM*ZIM
130 ZIM=2*TEMP*ZIM
140 ZRE=ZRE+CRE:ZIM=ZIM+CIM
160 N=N+1
170 IF N=15 THEN GOTO 200
180 IF (ZRE*ZRE+ZIM*ZIM)>8 THEN GOTO 200
190 GOTO 100
200 COLOR N
202 PLOT X+40,Y+100
210 NEXT X:NEXT Y
230 GOTO 230a widziałeś "Pseudo"-Fraktal demo?
http://sources.pigwa.net/?page=1
jest ze źródłówką (brak tylko 1-go pliku).
Strony 1
Zaloguj się lub zarejestruj by napisać odpowiedź
atari.area forum » Scena - 8bit » Fractal generator
Wygenerowano w 0.019 sekund, wykonano 59 zapytań