Project Manhattan-related AI-generated images

Updated floating point math support: ' float128 math functions /' void float128_from_double(float128* a, double* b) { *a = (float128)(*(double*)(b)); } '/ def SYSTEM_BUS_T.k_float128_from_double(a as FLOAT128 ptr, b as float ptr) *a = *b end def /' void float128_to_double(float128* a, double* b) { ...

bit-array access functions ' bit-array access functions (note: used to be included through 'bit.cpp') proc SYSTEM_BUS_T.getubits(bsize as uint32, _base as uint8 ptr, i as ptrszint) as uint64 static as int64 bmask, n=1 bmask = not (-((peek(int64,@n))) shl bsize) i *= bsize return ((*cptr(uint64 ptr,...

qb64.bi updates #define ptrszint int64 #define uptrszint uint64 #define ptrsz 8 ' QB64 string descriptor structure type qbs_field as int32 fileno as int64 fileid as int64 size as int64 offset end type type qbs as uint8 ptr chr ' a 32 bit pointer to the string's data as int32 len ' must be signed fo...

Math Functions proc SYSTEM_BUS_T.k_f(x as float) as float return x*x end proc proc SYSTEM_BUS_T.k_frexp(d as float, ep as float ptr) as float static as Cheat x if(d = 0) then *ep = 0 return 0 end if x.d = d *ep = ((x.ms shr K_SHIFT) and K_MASK) - K_BIAS x.ms = x.ms and not (K_MASK shl K_SHIFT) x.ms...

LibC stuff: proc SYSTEM_BUS_T.k_min(v1 as SYSTEM_TYPE,v2 as SYSTEM_TYPE) as SYSTEM_TYPE if (v1<v2) then return v1 return v2 end proc proc SYSTEM_BUS_T.k_max(v1 as SYSTEM_TYPE,v2 as SYSTEM_TYPE) as SYSTEM_TYPE if (v1>v2) then return v1 return v2 end proc proc SYSTEM_BUS_T.k_strlen(s as ubyte ptr) as...

Sorry to say my man, your project repo is quite the pile of junk. It's tough to tell who wrote which parts of the source. Many temporary and machine generated files. You may want to clean that up. Just a suggestion if you hope for any meaningful feedback. Tip: search for usage of ".gitignore&q...

CSNG ' CSNG proc SYSTEM_BUS_T.func_csng_float(value as float) as float if ((value <= 3.402823466E38) and (value >= -3.402823466E38)) then return value end if error(6) return 0 end proc proc SYSTEM_BUS_T.func_csng_double(value as double) as double if ((value <= 3.402823466E38) and (value >= -3.40282...

coderJeff wrote: ↑Jul 16, 2022 20:50 Not quite windows friendly. I'm guessing filenames with multiple name cases was a mistake:

Filenames with multiple name cases is a UNIX/BSD/Linux thing. Sorry about that..

Round Cone: /' Original Code: // Round cone - exact float sdRoundCone( vec3 p, float r1, float r2, float h ) { // sampling independent computations (only depend on shape) float b = (r1-r2)/h; float a = sqrt(1.0-b*b); // sampling dependant computations vec2 q = vec2( length(p.xz), p.y ); float k = d...

Cornell University has a great article about rendering realistic images that is worth checking out:
http://www.graphics.cornell.edu/online/box/data.html

@fatman2021, perhaps you can update your readme.md, or post some instructions to show a first step or first couple of steps; show us how these code posts fit in. Hopefully you have noticed that the feed back so far is trying to figure what it is you are offering or how to assist. Like a BSD distrib...

:lol: In spanish we have an expresion for this: "donde vas?, manzanas traigo" (it's looks like "where you go?, apples I bring") I don't speak English, I don't understand English expressions, but I can see that "something" is wrong with this thread. I also ask coderjeff...

1080p Graphics - DRAW statment case 49642 ' 1080p Graphics - DRAW statment select case peek(SYSTEM_TYPE,@v) ' fg_color case 0: draw fgimage, "c" add str(peek(SYSTEM_TYPE,@mem64(49353))) add "M" _ _' r0 add str(peek(SYSTEM_TYPE,@mem64(49361))) add _ "," add str(peek(SYS...

coderJeff wrote: ↑Jul 10, 2022 16:04 What is this exactly? I seen the posts for a few weeks now. Not sure what to make of it. What are users supposed to do with the code snippets posted to the forum?

Let me know if there is a bug in the code and provide a fix if possible...