Thanks for the thanks dodicat.
I was expecting dozens of posts by neil with improved versions... he must be busy transcending to a higher being or learning Lisp or something.
Search found 59 matches
- May 03, 2024 8:48
- Forum: Sources, Examples, Tips and Tricks
- Topic: Fireworks Demo
- Replies: 2
- Views: 298
- Apr 24, 2024 9:42
- Forum: Sources, Examples, Tips and Tricks
- Topic: Fireworks Demo
- Replies: 2
- Views: 298
Fireworks Demo
Everyone seems obsessed with Cairo at the moment so I thought I'd have a go. Sit back and enjoy the show (make your own noises). 'Program Fireworks 'Author David Watson 'Version 1.00 'Language FreeBASIC 1.10 for Linux '########################## includes and declarations ########################## #...
- Apr 01, 2024 8:40
- Forum: Sources, Examples, Tips and Tricks
- Topic: Waterfall effect
- Replies: 18
- Views: 1560
Re: Waterfall effect
Here's a cheesy old effect from around 1980 'oldskool water effect dim as short i, s dim as short rx(199), ry(199), rs(199) randomize timer 'initial ripples for i = 0 to 199 rx(i) = int(rnd * 1024) 'x centre ry(i) = int(rnd * 768) 'y position rs(i) = int(rnd * 9) 'size next i screen 20 color 7, 1 do...
- Jan 26, 2024 9:51
- Forum: Game Dev
- Topic: Gravity test program
- Replies: 4
- Views: 501
Re: Gravity test program
Your program looks good so far, but it would be better if you only burn fuel when thrusting.
- Jan 21, 2024 9:42
- Forum: Sources, Examples, Tips and Tricks
- Topic: Fish aquarium
- Replies: 18
- Views: 1298
Re: Fish aquarium
Check out this aquarium:
https://itsfoss.com/asciiquarium/
https://itsfoss.com/asciiquarium/
- Jan 14, 2024 9:38
- Forum: Sources, Examples, Tips and Tricks
- Topic: Conway's Game of Life
- Replies: 4
- Views: 426
Re: Conway's Game of Life
Game of Life is a classic Artificial Life program, I remember writing a version in GFA Basic for the Atari STe.
Another classic is Langton's ants: https://en.wikipedia.org/wiki/Langton%27s_ant
Another classic is Langton's ants: https://en.wikipedia.org/wiki/Langton%27s_ant
- Dec 27, 2023 9:09
- Forum: General
- Topic: Random Bug?
- Replies: 3
- Views: 428
Re: Random Bug?
When you convert from a real number to an integer in FreeBasic it rounds to the nearest integer, which means it might round up or down. Use INT() to
always round down.
always round down.
Code: Select all
x = int(rnd * 3) + 1
- Oct 25, 2023 8:40
- Forum: Sources, Examples, Tips and Tricks
- Topic: LED Scanner
- Replies: 5
- Views: 1896
Re: LED Scanner
Knight Rider style dim as short c, dotx(31), i, x, z dim as string k screenres 542, 80, 32 do for i = 40 to 964 step 2 screenlock if i < 502 then x = i else x = 1004 - i for z = 0 to 30 dotx(z) = dotx(z + 1) next z dotx(31) = x cls for z = 0 to 31 c = 38 + z * 7 circle (dotx(z), 40), 15, c shl 16, ,...
- Oct 15, 2023 8:32
- Forum: Game Dev
- Topic: 3 Puzzle Games
- Replies: 7
- Views: 1886
Re: 3 Puzzle Games
@neil Take a look at this site:
https://www.chiark.greenend.org.uk/~sgtatham/puzzles/
https://www.chiark.greenend.org.uk/~sgtatham/puzzles/
- Oct 14, 2023 8:46
- Forum: Game Dev
- Topic: 3 Puzzle Games
- Replies: 7
- Views: 1886
Re: 3 Puzzle Games
I tried the Klotski puzzles. They were way too hard for me! I'll stick with Sodokus.
- Oct 13, 2023 9:33
- Forum: Game Dev
- Topic: 3 Puzzle Games
- Replies: 7
- Views: 1886
Re: 3 Puzzle Games
I discovered you can slide the rectangular pieces into the hole squares around the edge and I've completed the puzzle.
- Oct 13, 2023 9:27
- Forum: Game Dev
- Topic: 3 Puzzle Games
- Replies: 7
- Views: 1886
Re: 3 Puzzle Games
These puzzle games are pretty good. Peg Solitaire and smallpuzzle are both enjoyable and well made, but I cannot figure out how to do the 4-ball slider puzzle!
- Jun 14, 2023 8:01
- Forum: General
- Topic: Unicode doesn't work in graphics mode
- Replies: 7
- Views: 574
Re: Unicode doesn't work in graphics mode
You could save some space by using text strings to store your 1s and 0s, eg
becomes
Alternatively, you could keep the font in a graphics file using a non-compressed format like .BMP.
Code: Select all
data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0
Code: Select all
data "0000000000000111100000"
Re: Microbot
When this line
is first executed it erases the top left of the maze.
Code: Select all
microbot C(M).X * 16, C(M).Y * 16,rgb(0,0,0) ''erase microbot
- May 16, 2023 8:10
- Forum: Sources, Examples, Tips and Tricks
- Topic: 3D Demo's
- Replies: 28
- Views: 5142
Re: 3D Demo's
I wrote this years ago, but it might interest you. It also supports red/cyan glasses. Hold a mouse button and move the mouse to rotate the torus. 'Program Torus 'Version 1.03 'Language FreeBASIC 0.21 for Linux 'Copyright © 2011 David Watson [david@watzon.co.uk] 'Anyone is permitted to copy, modify, ...