Forum C&A Fan
Witamy, Gościu Serdeczny
Proszę zaloguj się albo zarejestruj.    Nie pamiętasz hasła?
Obsługa trybu tekstowego w basic - Mandelbrot
(1 wejść) 1 Gość
W dół
TEMAT: Obsługa trybu tekstowego w basic - Mandelbrot
#1063
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 2
To jest to na co wpadłem po arcie Tomaaz'a. Może niezupełnie wpadłem bo 12 lat temu coś podobnego zrobiłem, ale program napisałem od nowa, bo już go nie odnalazłem...

40 y=0
80 x=0
100 r=0:i=0:t=1
103 poke1024+(40*y)+x,160
105 iks = (x-(0.5*40))/(0.45*25)
106 ygrek = (y-(0.5*25))/(0.45*25)
110 a = r*r-(i*i)
120 b = 2*r*i
130 z = (a*a)+(b*b)
140 if z>= 4 then goto190
147 t=t+1
148 if t >63 then goto190
150 r = a + iks
160 i = b + ygrek
180 goto 110
190 poke55296+(40*y)+x,t
195 x = x+1
200 if x < 40 then goto100
210 y=y+1
220 if y < 25 then goto80
230 goto230

i druga ciut zmieniona wersja

40 y=0
80 x=0
100 r=0:i=0:t=1
102 poke1024+(40*(24-y))+x,160
103 poke1024+(40*y)+x,160
105 iks = (x-(0.5*40))/(0.45*25)
106 ygrek = (y-(0.5*25))/(0.45*25)
110 a = r*r-(i*i)
120 b = 2*r*i
130 z = (a*a)+(b*b)
140 if z>= 4 then goto190
147 t=t+1
148 if t =64 then goto190
150 r = a + iks
160 i = b + ygrek
180 goto 110
190 poke55296+(40*y)+x,t
191 poke55296+(40*(24-y))+x,t
195 x = x+1
200 if x < 40 then goto100
210 y=y+1
220 if y < 13 then goto80
230 goto230

Mandelbrot w TXT ma tą przewagę, że każdy "punkt" ma możliwość pokolorowania go 16toma kolorami...
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1073
Tomaaz
Gold Boarder
Posty: 161
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
Płeć: Mężczyzna Urodziny: 07/15
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 1
Eee tam, wszystko zepsułeś. Właśnie zabierałem się do napisania tego.

A co byś powiedział na Mandelbrota w NUFLI?
 
Zaloguj się Zaloguj się
 
Ostatnio zmieniany: 2010/01/02 21:37 Przez tomaaz.
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1123
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 2
Według zeznań mistrza od trybów graficznych Michała AKA skull NUFLI ma więcej ograniczeń od FLI i jego rolą będzie pokolorowanie go (jak obiecał) do FLI.

Tymczasem zrobiłem na HIRES 320x200 x1 Mandelbrota w Assemblerze jak obiecałem, gdzie możesz go sobie obejrzeć, poczytać o nim i go ściągnąć

c64.phorum.pl/viewtopic.php?t=48

Pozdrawiam
 
Zaloguj się Zaloguj się
 
Ostatnio zmieniany: 2010/01/03 20:43 Przez wegi.
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1129
Ramos
Moderator
Posty: 497
graph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
Płeć: Mężczyzna HVSC Urodziny: 10/10
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 5
Jak to takie fraktale strasznie wolne, a jakby użyć do szybszych obliczeń stacje 1541 II to czy nie byłby szybszy taki fraktal?
 
Zaloguj się Zaloguj się
 
- Ramos/Samar/HVSC/ASMA/FanCA -
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1132
Tomaaz
Gold Boarder
Posty: 161
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
Płeć: Mężczyzna Urodziny: 07/15
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 1
No faktycznie 20 min. to strasznie długo. Wygląda na to, że tylko ok. 40 razy szybciej niż w BASICu (tam było zdaje się 13 godz.). Przebicie rzeczywiście nieporównywalnie mniejsze niż w przypadku Trójkąta Sierpińskiego. Ale i tak brawo wegi za zrealizowanie postanowienia! No i czekamy na Mandelbrota w kolorkach.
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1135
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 2
Panowie - sprawdźcie sobie, że ten frak przy 320x200 na 50 iteracji wykonuje samych mnożeń ze znakiem liczb 16 bitowych z wynikiem 32bitowym ze znakiem ponad 2 450 000.
Odnajduje ponad 11000 punktów w zbiorze to 11000 plotów jak się tylko rysuje zbiór (a tak nie jest).

Co do calcu w stacji - trzeba by dospawać RAM'u - można próbować starym sposobem bo tablice kwadratów zajmują dokładnie tyle, ile cały ram driv'a. Niewiele zatem przyspieszy calc w stacji nawet gdyby ram było więcej to mniej niż połowę, bo wynik trzeba transmitować...

Tia uwielbiam takie "no to teraz czekamy..." może "no to ja się nauczę FLI, zabiorę i zrobię..." (??)

@skull - czekamy hłe hłe hłe...
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1153
Tomaaz
Gold Boarder
Posty: 161
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
Płeć: Mężczyzna Urodziny: 07/15
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies., 1 Tydzień temu

Punkty: 1
No przecież sam napisałeś, że skull obiecał. To ja na to, że czekamy, bo jestem bardzo ciekaw jak to będzie wyglądać.
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1267
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies. temu

Punkty: 2
Demo Elysion / ORIGIO DREAMLINES - ostatnia część - tam jest kolorowany Mandelbrot...
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1270
skull
Moderator
Posty: 205
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies. temu

Punkty: 4
Rzeczywiście i to bardzo szybki
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1276
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies. temu

Punkty: 2
To jeszcze INHUMANITY III/RESOURCE

noname.c64.org/csdb/release/?id=6514

ELYSION

noname.c64.org/csdb/release/?id=11658

i nieśmiertelna COMA LIGHT XII / OXYRON

noname.c64.org/csdb/release/?id=11654

EDIT:
WINTERACTIVE/RESOURCE
noname.c64.org/csdb/release/?id=4745

W wielu starych demkach było - nie moge skojarzyć, gdzie był fajny zoom mandelbrota w realtime (4x4 chyba)

EDIT2:
Attack of Stubidos 3
tu jest zoomer - wreszcie znalazłem (1994 rok!!)
noname.c64.org/csdb/release/?id=800
 
Zaloguj się Zaloguj się
 
Ostatnio zmieniany: 2010/01/11 22:38 Przez wegi.
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1277
Tomaaz
Gold Boarder
Posty: 161
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
Płeć: Mężczyzna Urodziny: 07/15
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies. temu

Punkty: 1
wegi napisał:
Demo Elysion / ORIGIO DREAMLINES - ostatnia część - tam jest kolorowany Mandelbrot...

Właśnie oglądam i powiem, że robi wrażenie. W jakim trybie graficznym to może być zrobione?
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1281
Axel
Fresh Boarder
Posty: 2
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies. temu

Punkty: 0
Wydaje mi sie, że to jest tryb FLI.
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1283
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
8 mies. temu

Punkty: 2
Proszę bardzo - 1994 rok kolejny zooming Mandelbrota

World of Code 3 / Byterapers
noname.c64.org/csdb/release/?id=11678

EDIT:
I kolejny
World of Code / Byterapers
noname.c64.org/csdb/release/?id=720

EDIT2:
Tutaj piękna "JULIA"
REAL / RESOURCE
noname.c64.org/csdb/release/?id=15103
 
Zaloguj się Zaloguj się
 
Ostatnio zmieniany: 2010/01/12 08:46 Przez wegi.
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1309
wegi
Senior Boarder
Posty: 67
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
7 mies., 4 tygodni(e) temu

Punkty: 2
noname.c64.org/csdb/release/?id=79336

Toaster/Atlantic zrobił fajne animacje w Unfractally w super hires
 
Zaloguj się Zaloguj się
 
Ostatnio zmieniany: 2010/01/13 11:15 Przez wegi.
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
#1311
skull
Moderator
Posty: 205
graphgraph
Użytkownik poza Siecią Kliknij, aby zobaczyć profil tego użytkownika
O:Obsługa trybu tekstowego w basic - Mandelbrot
7 mies., 4 tygodni(e) temu

Punkty: 4
EEE to są zwyczajne "pobite gary". Nie wiem jak tam wykreślenie tego fraka,ale animacja to zwykła zamiana kolorów (piksle nie przemieszczają się ani odrobinkę) - sprytny trick powodujący uczucie animacji.
Tam żadnego super hiresu nie ma - zwykły multicolor czterokolorowy.
Nie ma się czym podniecać.
 
Zaloguj się Zaloguj się
  Administrator wyłączył możliwość wysyłania postów przez anonimowych użytkowników.
Do góry
JoomlaWatch Stats 1.2.9 by Matej Koval
RocketTheme Joomla Templates