VoxelSpace is a 3D demo based on classical voxel rendering
algorithms. VoxelSpace features 3D terrain rendering using
24bit depth, texture mapping, dynamic lighting, atmosphere
effect, animated water, semitranslucent overlays and more.
VoxelSpace has been developed in pure Visual Basic, though
some external library calls to the win32 api have been un-
avoidable.
System Requirements: The faster your machine, the faster a
framerate you will get. No OS restriction (works fine with
NT), no libraries (forget DirectX, OpenGL or someone elses
dlls). No display restrictions. Runs at 20+ fps on a P266.
Note: Always evaluate the compiled executable, running the
application from within the VisualBasic environment is too
slow and guarantees frustration!
Note: ALWAYS RUN IN 24bit OR 32bit COLOR MODE!
Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come
out every day, so no prevention program can catch 100% of them. For your own safety, please:
Re-scan downloaded files using your personal virus checker before using it.
NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
Scan the source code with Minnow's Project Scanner
If you don't have a virus scanner, you can get one at many places on the net
including:McAfee.com
Terms of Agreement:
By using this code, you agree to the following terms...
You may use
this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
You may link to this code from another website, but ONLY if it is not wrapped in a frame.
You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.
This keeps crashing under NT 4.0 WS service pack 6.0a. It crashes in the Render sub on the last line of code on the copy from memory. It seems like a viable system but I do not know enough about graphics programming (yet >. Please let me know what could possible be crashing this. I am very interested in learning more. Thanks (If this comment was disrespectful, please report it.)
Hehe, what a coincidence, I just started my own project yesterday, and downloaded tons of source code, about bilinear filtering and heightmapping, and now I see this?!
Thanks for sharing Almar.
(If this comment was disrespectful, please report it.)
That's amazing! NLS keeps coming out with the best stuff! These are the best graphics I've ever seen in pure VB code. Just to back up what you already said: everyone make sure you run in 24 or 32 bit color, otherwise it looks very very different and starts writing into invalid memory as I found out the hard way... (If this comment was disrespectful, please report it.)
Yes works fine (the subscript error is because not in 24 bit color), I've written some David Brebner stuff myself but you've managed to add some nice effects 5/5
(If this comment was disrespectful, please report it.)
let me first thank you for the positive feedback. I felt that David Brebners original voxel code could use some updating, as modern machines can easily handle bigger viewport, full color depth and advanced effects. In addition, his code has been too close to C++ for my taste, this is not how VB is ment to be used, imho. Again, glad you like it.
For the color mode problems, I can only emphasise YOU HAVE TO USE MORE THAN 16BIT COLORS. 16 bit mode would be next to impossible to handle, all the bit extractions necessary and the various subformats would take up much too much frametime. And remember, for the gfx card, 16 bit is actually slower than 24 bit.
Have fun with VoxelSpace
Wolfgang Kienreich NLS - Nonlinear Solutions (If this comment was disrespectful, please report it.)
Great Code!!!! For those of you getting a memory exception error, do the following.
Open the Forms code, goto the Render Sub.
Select & Cut the line:- Dim L_bytDat() as Byte
Goto the top of the code, and paste the line below the Option Explicit
The reason why the program is crashing is that the L_bytDat if left in the Render sub has not be initialised, it is actually intialised in Form_Load, as to why the VB compiler is not complaing about it not being declared is a mystery as Option Explicit is there.
Save the file and run the program. You may get an exception when exiting the program (by pressing ESC)
I compiled it and did not get any memory exceptions even when exiting, it also runs faster as an .exe (If this comment was disrespectful, please report it.)
It doesn't work for me at all. I get a subscript out of range error on line 151 of frmV. Graphics settings don't seem to make any difference. I'm running on NT4 sp6. (If this comment was disrespectful, please report it.)
Let me first ask those of you who have NT4 SP6 to search for the error ... obviously VoxelSpace is not working under this OS, and I cannot figure out why. Any help would be appreciated!
Second, let me note that the solution Steve Henning is offering above is not valid. The declaration of L_bytDat in FORM_MAIN is unnecessary, I just forgot to remove it. And L_bytDat doesnt have to be initialised in sub RENDER ... its filled by that array-points-to-memory trick, not by VB. Strange it made any difference for Steve.
Hope this helps,
Wolfgang Kienreich NLS - Nonlinear Solutions (If this comment was disrespectful, please report it.)
This doesnt work in 32 bit color and for some reason my geforce aint giving me the option to use 24 bit color. any help? (If this comment was disrespectful, please report it.)
I got this to work and it is really great. Good job. Oh and for simon price, your directx 8 tutorial is very good! well, time to sleep ;] (If this comment was disrespectful, please report it.)
Ok - it wont run in the ide with my NT sp 6 but it does run compiled when i set graphics up to truecolour... thanks for a fine bit o work (If this comment was disrespectful, please report it.)
NLS, is the best when it comes to 3D Graphics Applications. The TrueVision3D is a no match to NLS. All of NLS Sample Codes is very easy to learn and actually works unlike the Samples of TrueVision which is definitely a non-working code and very complicated to learn. To NLS 5/5 Globes for you!!! (If this comment was disrespectful, please report it.)
I get a "Subscript Out Of Range" on ' Translate into altitude For L_lngIndex = 0 To UBound(I_bytAlt) I_bytAlt(L_lngIndex) = L_bytTmp(L_lngIndex * 3) Next (If this comment was disrespectful, please report it.)
I think the problem with the NT4 O/S is because the program may be writing into areas reserved by NT4, so it depends on your NT4 setup. Works a beaut on '98 2nd edition tho'. (If this comment was disrespectful, please report it.)
yea dude. it wont work. subscript out of range while translating something into altitude data. its mentioned above. *sup wif that dood???* =P (If this comment was disrespectful, please report it.)
NO LESS THAN AMAZING!!! i program directx7 in c++ and i must tell your demo is just great! It works very good and the coding standard is very high. Cheers! adi barda israel (If this comment was disrespectful, please report it.)
Win 2K sp2 - VB6 sp5 - 32 bit Would not run for me. Crashed... HOWEVER- compiled it and it ran great..Until.. I noticed no way to end it except thru Task Manager. (If this comment was disrespectful, please report it.)
Uhh, this is probably a bad idea but for those of you with the memory problems, if you want a quick glimpse of the program, just add "on error resume next" right above the line that contains the out of bounds error. For me, the program ran a few seconds then vb went up in smoke but the little I saw was pretty cool. Good luck. I wish I was as smart as NLS, then I would be cool (If this comment was disrespectful, please report it.)
Patrick What r u smoking?, this is great i got 7 fps in IDE which is AWSOME, compiled i would get like 120 (If this comment was disrespectful, please report it.)
This is the first project i have seen so far tha thas 3D without the use of directX great work and it would be nice to have more objects to test it out like trees and such. Still great work 5 globes!! (If this comment was disrespectful, please report it.)
Keep crashing on Windows Vista even the DWM (Desktop Window Manager a.ka. Aero) turned off with 32bit color. (If this comment was disrespectful, please report it.)
wow , well done (If this comment was disrespectful, please report it.)
Add Your Feedback
Your feedback will be posted below and an email sent to
the author. Please remember that the author was kind enough to
share this with you, so any criticisms must be stated politely, or they
will be deleted. (For feedback not related to this particular code, please
click here instead.)
Download code
4/19/2001 10:13:12 AM: 
