## Search found 2979 matches

Feb 01, 2017 14:47
Forum: Beginners
Topic: Pixel
Replies: 21
Views: 1376

### Re: Pixel

What's the easiest way to create a randomly colored pixel from 1 to 1001 for example? is 1-1001 the range of colors or the number of pixels? #Define RndColor Rnd*&hFFFFFF #Define ScrW 800 #Define ScrH 600 Randomize ScreenRes ScrW, ScrH For x As Integer = 0 To 1000 PSet (Rnd*ScrW,Rnd*ScrH),RndCo...
Feb 01, 2017 14:46
Forum: Beginners
Topic: Pixel
Replies: 21
Views: 1376

### Re: Pixel

What's the easiest way to create a randomly colored pixel from 1 to 1001 for example? is 1-1001 the range of colors or the number of pixels? #Define RndColor Rnd*&hFFFFFF #Define ScrW 800 #Define ScrH 600 ScreenRes ScrW, ScrH For x As Integer = 0 To 1000 PSet (Rnd*ScrW,Rnd*ScrH),RndColor Next S...
Feb 01, 2017 14:43
Forum: Beginners
Topic: Pixel
Replies: 21
Views: 1376

### Re: Pixel

TurtleProgrammer wrote:What's the easiest way to create a randomly colored pixel from 1 to 1001 for example?

is 1-1001 the range of colors or the number of pixels?

-Vince
Jan 25, 2017 0:17
Forum: Beginners
Topic: How to "reverse" a byte?
Replies: 69
Views: 3801

### Re: How to "reverse" a byte?

Late to the party but I found this.... Function Rev(in As UInteger) As UInteger ' swap odd and einen bits in = ((in Shr 1) and &h55555555) or ((in and &h55555555) Shl 1) ' swap consecutiine pairs in = ((in Shr 2) And &h33333333) Or ((in And &h33333333) Shl 2) ' swap nibbles ... in = ...
Jan 24, 2017 1:37
Forum: Community Discussion
Topic: Personal Source Code Archive
Replies: 3
Views: 1010

### Re: Personal Source Code Archive

Thank you for putting the files online again. For the sake of completeness I've skimmed all the postings in this forum containing a link to your old site "imakegames.com" and found those additional files by you or others that were hosted exclusively on that site (or the other hosters are ...
Jan 18, 2017 17:11
Forum: Beginners
Topic: How to "reverse" a byte?
Replies: 69
Views: 3801

### Re: How to "reverse" a byte?

Maybe I missed something but can't you just do this?

Code: Select all

`Dim value as long= &hFFFF0000dim rev as long = value XOR &hFFFFFFFFprint hex(value,8), hex(rev,8)sleep`

-Vicne
Jan 17, 2017 1:09
Forum: Community Discussion
Topic: FreeBASIC syntax challenge games
Replies: 363
Views: 17422

### Re: FreeBASIC syntax challenge games

Enigma #12, force 4 By only adding code in the dedicated insertion zone, and without modifying the rest of program, make so that program displays "You won!": Type UDT Dim As String S = "You lost!" End Type Const As String S0 = "You won!" Dim Shared As UDT u0 u0.S = S0 ...
Jan 16, 2017 17:54
Forum: Community Discussion
Topic: Personal Source Code Archive
Replies: 3
Views: 1010

### Personal Source Code Archive

I let my iMakeGames.com domain expire because I did not have time to maintain it, however I created a site on my home computer to host all my FB projects for download. You should be able to access it here... vdecampo's FB project download site. If I am missing something please let me know and I will...
Jan 16, 2017 17:53
Forum: Community Discussion
Topic: Is anyone here purely for nostalgia?
Replies: 38
Views: 3777

### Re: Is anyone here purely for nostalgia?

@vdecampo: Your website "imakegames.com" seems to be offline since a while, which means that unfortunately some interesting FreeBasic projects are not available for download anymore. Could your code or website on some other (free?) hosting service like sourceforge or github or provide a d...
Jan 08, 2017 23:44
Forum: Community Discussion
Topic: Is anyone here purely for nostalgia?
Replies: 38
Views: 3777

### Re: Is anyone here purely for nostalgia?

I'm here for nostalgia and teaching others. I mostly program in C#, C, and ASP.NET but I will program in whatever the situation requires. I've taught myself a little PHP as well. I started with GW-BASIC, and graduated through QB, VB, then C and C# all over the course of 30 years. The move to C/C# ju...
Jan 03, 2017 15:29
Forum: General
Topic: AI : choise helper
Replies: 1
Views: 302

### Re: AI : choise helper

Have a look at this thread for some examples of reading/writing data to a file.

-Vince
Dec 13, 2016 2:05
Forum: Beginners
Topic: How many times I can use ":" ?
Replies: 7
Views: 941

### Re: How many times I can use ":" ?

I would recommend to NEVER use : as it makes code less coherent.

IMHO

-Vince
Sep 06, 2016 18:10
Forum: Documentation
Topic: GetMouse Documentation Error @ Clip? (SOLVED)
Replies: 14
Views: 1933

### Re: GetMouse Documentation Error @ Clip? (SOLVED)

On Win 10 the mouse wheel is no longer registered on a transparent part of a screen. I have mentioned this before. I had written some code to magnify a bit of the desktop. Win 10 has pretty well stopped getcursorpos --( getmouse from kernell32.dll) -- (it is now dead slow and crash) And no longer c...
Aug 30, 2016 23:57
Forum: Projects
Topic: Berzerk 2.0 (Beta Release 0.9.0)
Replies: 19
Views: 3803

### Re: Berzerk 2.0 (Beta Release 0.9.0)

The game crashes on Windows 10. Maybe you are using an old (FreeBasic) compiler version? Anyway, the absence of source code makes it nearly worthless IMHO. It does crash on exit but it plays fine on my Windows 10 machine. I'll see if I can find the original source code. I was just cleaning up the d...
Aug 30, 2016 19:08
Forum: Projects
Topic: Hex Factor 1.0 Released
Replies: 22
Views: 4495