place2 hits 7 twice as place1 goes from 0 to 15.

0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 - place1
0,1,1,2,3,4,5,6,7,7, 8, 9, 10, 11,12,13 -place2

place2 has 1 and 7 repeated so I cannot get a one to one mapping formula.

This is a great big pseudo anti aliasing cheat. The final result shows when the fractal is finished and the close button is clicked or <esc> is pressed. #include "windows.bi" #define cdXSize 640 '//cdYSize*1.6 #define cdYSize 400 #define cdColFondo 0 #define MAIN_ICON 100 ' // IDI_APPLICAT...

Hi bluatigro. Here is a moving texture (via an image) on your two quads. '' BLUATIGRO 27 JAN 2020 '' openGL texture example--tweaked #include "fbgfx.bi" #if __FB_LANG__ = "fb" Using FB #endif #include once "GL/gl.bi" #include once "GL/glu.bi" #include "GL...

I have edited the fractal GDI setpixel() spheres code.
No blue background, but a blue frame instead.
You cannot resize the main window.
It is quite fast with 64 bit fbc -O3 optimised.

I tried your spheres in GDI. better to use -O3 optimisation. edit:made the window fixed size with blue frame. #include "windows.bi" #define cdXSize 640 '//cdYSize*1.6 #define cdYSize 400 #define cdColFondo 0 #define MAIN_ICON 100 ' // IDI_APPLICATION #define cdVCursor IDC_ARROW #define cdV...

It's a big job to take on.
Thank you for reconstructing my nomdyploom.

Not the code of course, I translated your template thing from tiny c to fb. (Not a difficult task I know) But the music link (YouTube). Maybe I am too old for that fast music. Anything you can't whistle is not music to my ear. I prefer the sixties stuff. https://www.freebasic.net/forum/viewtopic.php...

I tried this tree by hurtado by winapi GDI shapes. It is a bit slower of course. #include "windows.bi" Const xres=800 Const yres=600 Const c1 = 27 Const c2 =6 Const c3 =3 Dim Shared As Ubyte mColores(0 To 19) Dim Shared As Ulong miColor(2 To 10) Declare Function WndProc(As HWND,As UINT, As...

Cairo is desperately slow to replace direct pixel drawing with anti aliased lines.
hurtado.
I have no complaints whatsoever about your graphics, in fact they are very nice, but that music must be hard to play, for it is hard to listen to.

If this is any help, look at the strings and v2,v3 and v4. Using your method of looping. function cremainder(mods() As long,remainders() As long) As longint dim as longint max=1 for n as long=lbound(mods) to ubound(mods) max*=mods(n) next dim as long b,c,d dim as long s(lbound(mods) to ubound(mods))...

Hi Albert. I see that you add 1 (then 2 in your last post) i.e. in compress_loop v2 = ( v1 mod 2 ) + 1 I have used a select case in the decompress_loop to test for values of n1 which are missed if the 1 is not added.(in the case ELSE) This might help in debugging. The 2,3,11 gives value (in theory) ...

Yea hurtado, I know that integer plods through 0 to 255 in four loops for rgba(r,g,b,a) just as well as ulong. But as you have seen integer is actually longint in 64 bits. So, depending on how you use colours (via pointers e.t.c.), strange aberrations can occur flipping between the 64 and 32 bit com...

Nice hurtado. Using 32 bit colour ulong (or double) will hold all values in fb 32 bit or fb 64 bit. I avoid using Integer or uinteger for 32 bit colours. basiccoder2 You can adjust the colour for the second BresLine, which seems mainly the trunk. for example: if i>2 then c=rgb(cast(ubyte ptr,@c)[2]+...

paul doe . . . (being both Greenpeace members) . . . my respect. Here is my variation screenres 900,700,32 color ,rgb(150,150,150) cls type point as long x,y as ulong col end type type angle as single cosa,sina declare sub set(as single) end type sub angle.set(a as single) cosa=cos(a) sina=sin(a) en...