wow. It looks like its made of pixels but I see that lines is the primitive. still somewhat in shock; it's very beautiful This is how it should look like Beautiful - my compliments! Thank you for your feedback. :-) - removal of: Do -- Loop (it's not serving any usefull purpose, by cons it's a CPU h...

dist should be #Define Dist(x1, y1, x2, y2) (Sqr((x1 - x2) * (x1 - x2) + (y1 - y2) * (y1 - y2))) you had - (which if probably a function of the distance to the nearest black hole). Thanks dodicat. It fixes the issue. It should be the Euclidean distance. I don't know why I used minus instead of plus...

I have this code: #Include "fbgfx.bi" Using FB Type Vector As Single x, y End Type Dim Shared As Ushort iArrayLen Dim Shared As Vector pathPoints(64) Const iW = 500, iH = iW, iW2 = iW \ 2 Const As Single r = iW / 2.1, PI = Acos(-1), PId4 = PI / 4, PId3 = PI / 3, PIm2 = 2 * PI, PId2 = PI / ...

@badidea: using the disk is similar using atoms! If you forget to cleanup or at app crash you cannot check for 1st run, imho.

What about multi user environment, something like a terminal server? For example, the exe should only be allowed to start once per user....

Version 2.1.7 (May 31, 2020) Editor: - Added: Occurrences Highlighting. Editor will highlight words under the current cursor position (Visual Studio has this type of feature as well). - Changed: Changed the default toolchain to: FreeBASIC-1.07.1-gcc-8.4 - Fixed: Performance issue with parsing docum...

@SARG: I've tested your semaphore version and it works properly - simple and short. According to MS: "Use the CloseHandle function to close the handle. The system closes the handle automatically when the process terminates. The semaphore object is destroyed when its last handle has been closed....

The disadvantage of jj2007's atom version is when you forget to use GlobalDeleteAtom(IsRunning) or the program crashes then the atom with Command(0) already exists.

How does the check will know if it was started the first time?

@jj2007 I have hit a snag with your method. I did not want to be told of a successful start so commented the second MessageBox. Running as a console program the following does not work. '#Console On #include "Windows.bi" Dim ItsMe as string=Command(0) If GlobalFindAtom(ItsMe) Then Message...

#include "Windows.bi" Dim ItsMe as string=Command(0) If GlobalFindAtom(ItsMe) Then Messagebox Null, ItsMe+" is already running", "Sorry:", MB_IconWarning Or MB_Topmost else Dim IsRunning as short=GlobalAddAtom(ItsMe) Messagebox Null, ItsMe+" successfully started&q...

Here the ported Autoit function _Singleton 'Ported from Autoit's function _Singleton #Include "windows.bi" 'iFlag: '0 - Exit the script with the exit code -1 if another instance already exists. '1 - Return from the function without exiting the script. '2 - Allow the object to be accessed b...

Dear Guys; I compiled this code with FreeBASIC 1.07.1 32bit version (Windows 10). by spodhaje » Apr 21, 2008 22:00 Then, the following errors were displayed. Please tell me how to fix it. (I'm sorry I didn't look it up myself and just gave it away.) error 181: Invalid assignment/conversion, at para...

........@@.......... Dear UEZ: Please tell me more details about this bug, iu occur while using "Goto Definition" / "Show Type"? of just simple key in? Is there a fixed and easy way to reproduce it? That's not easy to reproduce because it doesn't occur everytime. As far as I can...

@jepalza: thanks for sharing the code.

For the 3D version the textures are missing... ;-)

........@@.......... Dear UEZ: Please tell me more details about this bug, iu occur while using "Goto Definition" / "Show Type"? of just simple key in? Is there a fixed and easy way to reproduce it? That's not easy to reproduce because it doesn't occur everytime. As far as I can...

I get this error sometimes when typing https://i.ibb.co/9hj6BB0/Error.jpg This issue should be occur when "Enable Codecomplete At Back Thread" is "ON", the autocomplete thread and calltip thread Conflict with each other. I'm rewrite the code about multi-thread and test, please t...