Ive tried to do this and got an Syntax Error.. xD 'Step1 Create Code sub test print "Hello World" end sub 'Step2 Write Code to binary open "code.bin" for binary as #1 put #1,,test close #1 'Step3 Load and execute code dim as sub code open "code.bin" for binary as #1 get...

C for Atari2600 exisits allready
https://forums.atariage.com/topic/34759 ... atari2600/

I've planned to make a database with id auto incrementation but this idea failed because only static members are allowed :/ type test redim as string datatable(any) id as integer declare sub adddata (s as string,byref d as integer = id) declare sub listdata end type sub test.adddata (s as string,byr...

This one is a massive multithreading demo that reduces the calculation time by increasing the number of threads. It calculates a simple values and saves to allocated data to generate work that can be benchmarked. You can increase the threads to reduce the needed time (up to 1024 threads and more, on...

How did i use mutexes to fix this glitches? Createmutex is already implemented.. type threaddata char as ubyte p as ubyte Mutexdata as any ptr end type sub printchar(c as any ptr) dim as threaddata ptr mythreaddataptr = c dim as threaddata td = *mythreaddataptr static p as integer p+=1 for i as inte...

I've got the example form here: https://www.freebasic.net/wiki/KeyPgVisProtected And it was an easy task to "hack" it.. ' Example to illustrate the access control 'Protected' with a token provided by an admin right for an user right: ' - The 'admin_right' type extends the 'user_right' type...

It gets complicated: dim as integer ptr mem = allocate (len(integer)*2) if mem = 0 then print "Allocate failed" : Sleep : end dim as integer ptr ptr t = @mem mem[0]=12345 '' 'mem[0]' is equivalent to '*(mem + 0)' mem[1]=54321 '' 'mem[1]' is equivalent to '*(mem + 1)' print (*t)[0] '' '(*t...

My next question is how is this Syntax correct?

'd' is a pointer to the integer pointer 'mem' . So 'd' is naturally an 'integer ptr ptr' : dim as integer ptr mem = allocate (len(integer)) if mem = 0 then print "Allocate failed" : sleep : end dim as integer ptr ptr d = @mem deallocate (mem) If you absolutely want to force the 'd' type t...

I did not realy understand how pointers work and get the "Suspicious pointer assignment" error? dim as integer ptr mem = allocate (len(integer)) if mem = 0 then print "Allocate failed" : sleep : end dim as integer ptr d = @mem deallocate (mem) My question is how to do this withou...

Cheaters spoil our fun, who doesn't know it That's why I developed an engine that aims to ward off attacks on variables with cheat programs like Cheatengine. My ideas were there -Encryption of countless XOR links -Variable runtime length -Certain resistance to changes in variables in memory. There i...

Hi mrminecrafttnt ' code analysis to know what your code is for: ' take a look at this: ' dim shared as uinteger f01,f02,code1 declare sub w_(a as ubyte) :declare sub mk(k0 as ubyte) :declare sub txt() dim shared as integer f0(255),f0b(255),f0c(255) dim shared as string PCN ' type ll_integer dim as...

Hi guys, i've created this anticheatsystem an make it a little bit resilient for some attacks with cheatengine but this is not enough for my conditions any links or tipps to improve this? :) Special Idea: adress randomisation with hash checks for for modification detection and make this resilient bu...

fxm wrote: ↑Jun 05, 2022 18:28 If you don't want to split a text line in the file if a delimiter (comma) is encountered in the line, use 'line input #' rather than 'input #'.
(see documentation)

In addition:
Print "Strings:";ubound(load) - lbound(load) + 1

Thanks!

My Question is is that the correct method to load a textfile in an arrey? open "loadme.txt" for input access read as #1 if lof(1)=0 then print "Make a ""loadme.txt"" first." : sleep :end redim load(any) as string dim payload as string Print "loading..&quo...