Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
My First FreeBASIC Program
#1
This is the first program I've written in FreeBASIC.

Infinity Blobs

Big Grin

-shiftLynx
img]http://www.cdsoft.co.uk/misc/shiftlynx.png[/img]
Reply
#2
Very cool man. Big Grin
I'd knock on wood, but my desk is particle board.
Reply
#3
Quote:INFBLOBS caused an invalid page fault in
module INFBLOBS.EXE at 017f:00401984.
Registers:
EAX=0004ad80 CS=017f EIP=00401984 EFLGS=00010286
EBX=00760980 SS=0187 ESP=0063fde4 EBP=0063fe24
ECX=85454000 DS=0187 ESI=8177b364 FS=6aaf
EDX=00000000 ES=0187 EDI=0063fe24 GS=0000
Bytes at CS:EIP:
0f b6 19 01 5d e4 83 7d f8 00 7e 15 8b 5d 08 8b
Stack dump:
00000000 8177b364 00407030 0000027f 000001df 000001df 00000000 0069c237 85454000 00000000 0004ad80 0004ad7f 0004b000 0004ad81 0004ab00 0004b000

Running win98SE =|
[Image: sig.php]
Back by popular demand!
I will byte and nibble you bit by bit until nothing remains but crumbs.
Reply
#4
If it is what I think it is, the new zip should be fixed... re-download it from the same URL, or if you want to change yourself: in the BlurSurface subroutine, modify:

[syntax="QBASIC"]
FOR y = 0 TO (src->h - 1) STEP 1
[/syntax]

To:

[syntax="QBASIC"]
FOR y = 0 TO (src->h - 2) STEP 1
[/syntax]


-shiftLynx
img]http://www.cdsoft.co.uk/misc/shiftlynx.png[/img]
Reply
#5
Cooooool! Shinery orange dots moving in loop. Just what I need
[Image: sig.php]
Back by popular demand!
I will byte and nibble you bit by bit until nothing remains but crumbs.
Reply
#6
Kewl, where is Rel so we can make a compo ;)

You could use by reference args to pass the Vec2D args, but you love to type the ->'s don't ya? :)

Yeah, the exception.. one byte accessed over the surface and boom, 9x is less forgiven than XP -- i hate when XP pretends no exceptions happened, makes debugging much more difficult to do.
Reply
#7
Quote:Kewl, where is Rel so we can make a compo Wink

You could use by reference args to pass the Vec2D args, but you love to type the ->'s don't ya? Smile

Yeah, the exception.. one byte accessed over the surface and boom, 9x is less forgiven than XP -- i hate when XP pretends no exceptions happened, makes debugging much more difficult to do.

I wish I can but comp is busted right now so...

But I've been thinking about an Open GL demo when I get my hands on a computer. :*)
y smiley is 24 bit.
[Image: anya2.jpg]

Genso's Junkyard:
http://rel.betterwebber.com/
Reply
#8
To shiftLynx:

About your “Infinity Blobs” program on FB, my man, you did such an *excellent* job on it for your very first program in FreeBasic that is simply imaginative! I am proud of you!! Big Grin=b

This demo is truly so creative, in fact, that I just simply added it to my FreeBasic GFX Demo Central at my projects site tonight!! Cool

Check you out later, and you keep up the real good work now, you understand me? Wink



[Image: file.php?id=32]
- Adigun Azikiwe Polack
One of the Founders of “Aura Flow”
Continuing Developer of “Frantic Journey”
Current Developer of “Star Angelic Slugger”
Webmaster of the “AAP Official Projects Squad”
url=http://dhost.hopto.org/aapproj/][Image: file.php?id=194][/url]
Your *official* home of the FreeBasic GFX Demo Central, now holding over 150 FB graphics demos so far!!! Big Grin !
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)