CodeBase Entries

A barebones Day/Night Cycle.

you can hide the db mouse and make your own mouse out of lines

2 good functions for encrypting and decrypting files

Move your mouse to see the smoke trail. It also shows how to use blur bitmap.

Shadow volumes in Dark Basic Professional by Erick

Mouse effect... A trail of red balls... No media required...

This is a routine application that tests the abilities of your 3D Graphics Card.

Enter Password. If the wrong password try again. If the right password the program ends.

Construction of a practical instrument measuring angles.

A 2D football game. Still working on it.

A simple following and dieing program thingy.

A menu that you see in games like final fantasy

Assumes knowledge of DBP (arrays, creating objects, etc..), so the document only explains the equation and how to implement it in code.

This almost replicates the windows menu system but its all coded in dbp :)

a Basic Calculator using numbers

"Fool" and not definitive object sector texture recognition...

make 3D line objects

This program takes any number of variables and scrolls them for you.

rem these fuinctions do basic file i/o rem use them as you please rem for the read_file you must ahve txt declared global rem made by free-space.myftp.org rem leave the last paremeter on both of them blank if you do not want silent and want them to choose a file function file_saveas(what$,name$) if name$="" ret: print "so what do you want to save this file as" input file$ if file exist(file$)=1 print "that file exist's already do you want to over write y/n" input temp$ if temp$="y" delete file file$ else goto ret endif endif print "saving file" open to write 1,file$ write string 1,what$ cls else if file exist(name$)=1 then delete file name$ print "saving file" if file exist(name$)=1 then delete file name$ open to write 1,name$ write string 1,what$ cls endif if file open(1)=1 then close file 1 print "done" endfunction function read_file(num,fname$) if fname$="" ret2: print "what file do you want to open" input flname$ if file exist(flname$)=0 print "file does not exist" goto ret2 endif open to read 2,flname$ for i=1 to num+1 read string 2,temp$ if i=num-1 then read string 2,txt$ next i else if file exist(fname$)=0 print "error file don't exist" print "please report this to the maker of this program" txt$="error the file was not found" exitfunction else open to read 2,fname$ for i=1 to num+1 read string 2,temp$ if i=num-1 then read string 2,txt$ next i endif endif if file open(2)=1 then close file 2 endfunction

Make objects with properties safely and easily.

This will allow the programmer to print text on multiple lines. Beginer Stuff.

This Function will allow a user of your Software to set the desired resolution of your program, It will record the settings to a file and load them each time your program is started. This function does not require additional media.

functions of images: alpha, color, etc.

functions of images: alpha, color, etc.

Finds all images within the folder of the executable with extension "jpg". Fades out one by one those images.

Finds all "jpg" within the folder of the executable. Prints it on the screen. It adds the fading-out effect.

This is the source code of fading bitmap

Just another text program.......

Lessons 14 - 19 In these sections we add the guts of the game. We add Opponents, Collision Detection, AI and a very nice score board.

Lessons 4 - 13 This section contains complete instructions and code for the game Limit Rush up to the point where it keeps score for a single player. Newbs, follow each lesson, becuase there is valuble information in each of the lessons. The source code provided in the code link is for lesson 13. Down load the zipped file for lessons 4 - 13. Note: All of the media that is required for these tutorials is located in Lesson 1.