OK here Albert.
They are on the right side of the window half way down,

Albert
I have been messing around with the actual horizontal and vertical scrollers if put on to the main window, but no luck yet.
If you use the mousewheelpress in my previous code it is a bit sharper.
WM_MBUTTONDOWN
and
WM_MBUTTONUP (in the sub)

Fair enough Albert.
I agree, your original scroll was OK.

This is for nostalgic purposes only, a 32 bit debug macro I made up years ago. Purportedly catches early signs of bugs. Windows only. (Only 32 bits due to a bug in 64 bits) #macro debug #if sizeof(integer)=4 Declare Function ScaleWindow Alias "MoveWindow"(As Any Ptr,As Integer=0,As Integer...

Hi Albert. What do you think of dragging the static window with the right mouse button down? example #define WIN_INCLUDEALL #include once "windows.bi" #include once "win\commctrl.bi" '=============================================================================== '===============...

The problem in 32 bits is


if you substitute the number instead of the hex in rnd256.nextinc , it doesn't overflow the array in mutator.mutate()

Hi Albert. Click the character buttons. #define WIN_INCLUDEALL #include once "windows.bi" #include once "win\commctrl.bi" '=============================================================================== '============================================================================...

Here is a string variety. Please use 32 bits (jj2007's assembler included) function duplicate naked cdecl (byval inbyte as long) as integer asm .align 4 mov edx, [esp+4] xor eax, eax mov ecx, -1073741824 L0: rol ecx, 2 shr edx, 1 je L1 jnc L0 or eax, ecx jmp L0 L1: jnc Lx2 or eax, ecx Lx2: ret end a...

Here is a summary #undef valint #undef vallng #undef valuint #undef valulng #ifdef valint #undef valint #endif #ifdef vallng #undef vallng #endif #ifdef valuint #undef valuint #endif #ifdef valulng #undef valulng #endif print cint("12.34") 'uses vallng print cuint("12.34") 'uses ...

cint uses valint/vallng for strings anyway. -- and it is easier to type in. #undef valint #undef vallng #ifdef valint #undef valint #endif #ifdef vallng #undef vallng #endif 'print valint("12.34") 'gone 'print vallng("12.34") 'gone print cint("12.34") 'also gone sleep

You should reset t for Badidea B

' ************* badidea B *************
t=timer

bla
bla

Timer measurements should always be double, even in lang "qb" Here are my #lang "qb" results: #lang "qb" FUNCTION intt naked cdecl(byval a as single) as integer<32> __asm roundss xmm0,[esp+4],1 cvtss2si eax,xmm0 ret end __asm end function print __sizeof(intt(0!)) print ...

The .chm help file, from the home page / downloalds/documenataion https://sourceforge.net/projects/fbc/files/Documentation/ For win 10, right click the .chm, properties then unblock. I use fbide, you can set a path to it in view- settings -freebasic. If you have this set up then can put your cursor ...

Better to use the .chm file IMO. Much easier. Anyway, I ran a test on your asm. parameter in single, 32 bit integer out. must use the 32 bit compiler. Function intt Naked Cdecl(Byval a As Single) As Integer Asm roundss xmm0,[esp+4],1 cvtss2si eax,xmm0 ret End Asm End Function Dim As Single x Dim As ...

You want it in FreeBASIC code, then use the freeBASIC website to tell you. (As a bonus you get an IP address) #include "win\winsock2.bi" function GetSiteAddress(stuff as string="www.freebasic.net") as string dim as WSADATA _wsadate dim as in_addr addr dim as hostent ptr res dim a...