Ooh, pretty!

I wrote this a while ago, thought you guys might appreciate it.

Compile/run it in QuickBasic 7.1

Hey, thats pretty cool. The best thing i've made in Q so far is a (what i think cool) horizontal bar graph generator.

Well I wrote a full fledged 2d game and all in QBasic.. Probably have it around here somewhere..maybe I can dig it up... I will post if I can find....
Zevlag

Great job, super piece of coding:)

Thanks :D

Wierd thing though, the explosion pattern always seems to be very similar, sort of an oval slanting from bottom-left to top-right. Can't really see the reason for that, any ideas anyone?

There is a loop line like...
For k = 1 to 1000:Next k
near the bottom of the code, changing that will alter the speed of the graphics. Helpful if you have a fast computer, just make that number larger and it will slow down the explosions.

Thats a cool program. I wish i had some programs to show off myself, but i seemed to learn qBasic, the syntax that is, and then never really did anything from there. Oh well. :rolleyes:

Thanks for the compliments guys.








RIP, D. Adams

I don't doubt that it is cool but it runs far to quickly, I don't gets to see the display :( Is there any way I can slow it down?

Ah, it's ok now :) I changed the line:

Code:

---

FOR k = 1 TO 5000: NEXT k

---

to

Code:

---

FOR k = 1 TO 50000: NEXT k

---

runs fine now. I'm with everybody else...IT'S COOL :D

Quote:

---

Originally posted by wossname
RIP, D. Adams

---

Sorry if I sound dumb/insensitive, but who is/was D. Adams?

Douglas Adams - he wrote "The Hitchhiker's Guide to the Galaxy"

Yeah, and he died fairly recently of a heart attack.

ohh sail3005, you seem to be very sad virtually...
If you are a fanatic qb fan, you can be a top advance qb programmer in a year. About that firework.bas, okay it's great,
but an advance programmer can do more than that...
Now I hope you guyz stop using VB6 for a while,
try QB, I can guarantee you guyz can be very good in a couplar months, just like me...

Oh, if anybody wants my source collection, that's a mere 1MB
but enough for you to be an advance programmer, tell me
via this forum, lots of things to show-off(not my bird :D
from simple thing (game) to SVGA 16bits or even 24bits color in
MSDOS to modem to compressor(like Winzip) to mouse to
wav player to mid player to asm(sped ur QB to asm speed)
and lots of cool stuffs.

Quote:

---

Originally posted by jian2587
ohh sail3005, you seem to be very sad virtually...

---

:confused: :confused: :confused:

Quote:

---

Originally posted by jian2587
ohh sail3005, you seem to be very sad virtually...At least he doesn't hijack other people's conversations to show off

If you are a fanatic qb fan, you can be a top advance qb programmer in a year. What's "Top Advance QB" is it a new language? About that firework.bas, okay it's great,
but an advance programmer can do more than that...I'm not purporting to be an advance programmer, whatever that is. I bet you couldn't do a better firework simulation in less then 30 minutes, which is how long it took me.
Now I hope you guyz stop using VB6 for a while,
try QB, I can guarantee (At least he spelled that right!) you guyz can be very good in a couplar (Is that a newly discovered planet?) months, just like me...What, you mean we can all have a very tenuous grasp of English and a tendency to deliberately misspell wordz in an attempt to make ourselves look cool?

---

No thanks.

Replace your FOR/NEXT delay loop with:

Code:

---

WAIT &H3DA, 8
WAIT &H3DA, 8, 8

---

That will wait for the vertical refresh and retrace, and will run the same speed on just about every computer.

Nice program. It looks really cool if you replace the projectile delay with one set of WAITs (the above code), and the explosion delay loop with two sets of WAITs, i.e.:

Code:

---

WAIT &H3DA, 8
WAIT &H3DA, 8, 8
WAIT &H3DA, 8
WAIT &H3DA, 8, 8

---

I uploaded the modified version if you want it.

Cool!

Is there a list for all the hexadecimal indexes for all the available ports, like the screen that you used, and things like Com 1 and the printer port?

Quote:

---

Originally posted by wossname
There is a loop line like...
For k = 1 to 1000:Next k
near the bottom of the code, changing that will alter the speed of the graphics. Helpful if you have a fast computer, just make that number larger and it will slow down the explosions.

---

I had to change it to 500,000 on a P3-933. :D :D

i like it....:D ;) :cool: :p :)