Free Programs and Source Code

Discuss whatever you want here--both QB and non-QB related. Anything from the DEF INT command to the meaning of life!

Moderators: Pete, Mods

Post Reply
mikecaterina1
Coder
Posts: 11
Joined: Sun Sep 09, 2012 6:49 pm

Free Programs and Source Code

Post by mikecaterina1 »

Post any porgram you have created or modified, finished or unfinished. Post a link to you program/ code if possbile (i.e. Dropbox), as copy and paste doesn't work in Qbasic only QB64 and retyping a program leaves alot of room for errors.
Note: Any programs you post can be downloaded, modified and reposted by anyone, so do not post if you do not want this to happen.
Last edited by mikecaterina1 on Tue Sep 18, 2012 3:15 pm, edited 2 times in total.
mikecaterina1
Coder
Posts: 11
Joined: Sun Sep 09, 2012 6:49 pm

Countdown

Post by mikecaterina1 »

Here is a simple countdown program I wrote just for fun. You can set the countdown length. You can also set what the program says after the countdown. The scroll the program talks about is a little arrow the moves across the screen after the countdown. Feel free to download, use and edit this program.

https://www.dropbox.com/sh/5hycvasm0cvgxmu/nxTTclkzVN
User avatar
bongomeno
Veteran
Posts: 266
Joined: Wed Dec 10, 2008 9:08 am
Location: Arizona
Contact:

Post by bongomeno »

Here is a simple jewel elimination style game that I made last week.

http://www.geekbasic.com/downloads/QJEWEL.ZIP
Last edited by bongomeno on Wed Sep 19, 2012 1:16 pm, edited 2 times in total.
mikecaterina1
Coder
Posts: 11
Joined: Sun Sep 09, 2012 6:49 pm

Post by mikecaterina1 »

Good game but only the right arrow key work for me and I can't get past the first line, is there a bug in the program or is it my computer? :?
User avatar
burger2227
Veteran
Posts: 2466
Joined: Mon Aug 21, 2006 12:40 am
Location: Pittsburgh, PA

Post by burger2227 »

Same here. K is missing to go left.

The code allows you to use just CAP letter keys too
Please acknowledge and thank members who answer your questions!
QB64 is a FREE QBasic compiler for WIN, MAC(OSX) and LINUX : https://www.qb64.org/forum/index.php
Get my Q-Basics demonstrator: https://www.dropbox.com/s/fdmgp91d6h8ps ... s.zip?dl=0
User avatar
bongomeno
Veteran
Posts: 266
Joined: Wed Dec 10, 2008 9:08 am
Location: Arizona
Contact:

Post by bongomeno »

Are you using the arrow keys to move the cursor?
User avatar
burger2227
Veteran
Posts: 2466
Joined: Mon Aug 21, 2006 12:40 am
Location: Pittsburgh, PA

Post by burger2227 »

Of course and like I said the CHR$(0) + K is missing to go left. Why don't you fix it. It doesn't move any way but right.
Please acknowledge and thank members who answer your questions!
QB64 is a FREE QBasic compiler for WIN, MAC(OSX) and LINUX : https://www.qb64.org/forum/index.php
Get my Q-Basics demonstrator: https://www.dropbox.com/s/fdmgp91d6h8ps ... s.zip?dl=0
User avatar
bongomeno
Veteran
Posts: 266
Joined: Wed Dec 10, 2008 9:08 am
Location: Arizona
Contact:

Post by bongomeno »

It works on all of the computers that I have tested it on.
Try this link to the exe and actual source file. http://www.geekbasic.com/downloads/QJEWEL.ZIP Stuff was lost while posting here.

Also, why would I need chr$(0) when I have SELECT CASE RIGHT$(in$, 1)?
mikecaterina1
Coder
Posts: 11
Joined: Sun Sep 09, 2012 6:49 pm

Post by mikecaterina1 »

I downloaded and it works with DosBox but it is very skippy and slow :(
User avatar
burger2227
Veteran
Posts: 2466
Joined: Mon Aug 21, 2006 12:40 am
Location: Pittsburgh, PA

Post by burger2227 »

Also, why would I need chr$(0) when I have SELECT CASE RIGHT$(in$, 1)?
You don't. That's why K would work too, like I said...
Please acknowledge and thank members who answer your questions!
QB64 is a FREE QBasic compiler for WIN, MAC(OSX) and LINUX : https://www.qb64.org/forum/index.php
Get my Q-Basics demonstrator: https://www.dropbox.com/s/fdmgp91d6h8ps ... s.zip?dl=0
User avatar
bongomeno
Veteran
Posts: 266
Joined: Wed Dec 10, 2008 9:08 am
Location: Arizona
Contact:

Post by bongomeno »

ahh I misread your post.

and Qbasic +inkey$+circles + Dosbox = slow

Try using QB64. It will run super fast!
Post Reply