|
City Simulator - partial
|
Email
|
| Submitted on: |
9/3/2000 4:51:26 AM |
| By: |
Dave Katrowski
|
| Level: |
Intermediate |
| User Rating: |
By 23 Users |
| Compatibility: |
VB 4.0 (32-bit), VB 5.0, VB 6.0 |
| Views: |
27011 |
|
(About the author) |
|
|
|
I wanted to emulate one of my favorite games the best i could. It has a few unique features like birds freely flying around the city(animated), sometimes they seem to flock (but the biod system isn't too advanced, they see other birds and objective-points but not buildings). IF ANYONE CAN COME UP WITH A GOOD CITY GROWTH MODEL PLEASE HELP. The current city growth is based on a crappy crime equation i came up with. (Crime = (PopCount / 4) - (2 * SafetyCount))
|
 |
| |
|
 Download code
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.
|
Other 31 submission(s) by this author
|
|
Report Bad Submission
|
Your Vote
|
| |
Other User Comments
|
 9/3/2000 9:15:46 AM: Paul
Thats great code!
I looove the birds, and i cant wait for the next version!
(If this comment was disrespectful, please report it.)
|
9/3/2000 9:15:52 AM: Dave
in the doBird sub:
replace
If Not LII = LI Then
with
If Not LII = LI And Not B(LII).Flag = FOLLOW Then
Now the birds wont fly in circles...
(If this comment was disrespectful, please report it.)
|
9/3/2000 12:28:04 PM: Simon Price
This isn't a bug, just a file problem - when I start up it says the birds.bas is missing. I just added the bird.bas (no "s") and it worked though. So if you download it and it don't work, try what I did because it worked for me. I hope you make another version of this, with enough things to do it could become a cool game.
(If this comment was disrespectful, please report it.)
|
9/3/2000 1:37:04 PM: Tiago
Greeeeeeeeeaaaat code.... thanks!!!!!!
(If this comment was disrespectful, please report it.)
|
9/3/2000 5:15:27 PM: nhlgame
Really nice peace of code. Good work.
(If this comment was disrespectful, please report it.)
|
9/5/2000 8:33:25 AM: Michael Firsikov
Great code !! How about adding cars and animated buildings or / and construction sites !!!
(If this comment was disrespectful, please report it.)
|
9/26/2000 6:49:40 PM: Jimmy
Hi, I started VB5 this year, well, there isn't much to say here, It is fantastic.
Good work,
(If this comment was disrespectful, please report it.)
|
10/6/2000 7:52:03 AM: Digital Paradigm
Outstanding work!
(If this comment was disrespectful, please report it.)
|
10/14/2000 12:01:05 PM: !!!
Exelanté!
I'm sure that's how the french say it...
(If this comment was disrespectful, please report it.)
|
10/18/2000 6:55:17 PM: Batman
Batman's back! You may have seen me in other code feedbacks. I'm like that annoying green little bug that keeps coming back for more... awwww... nice job man!!! Batman thanks you!
(If this comment was disrespectful, please report it.)
|
10/19/2000 8:59:55 PM: PhoenixX_2
If we had to grade the person on what he did, I'd give you a Good. But since this is planet SOURCE CODE and we have to grade on the code's helpfulness/quality, I can't give you Good. There's NO TABS, NO COMMENTS and NO STRUCTURE. Everything is all on one level, and you even forgot to get rid of the extra enters in between the subs/functions. The game itself is nice, nice birds, but I'd suggest putting more safety like Medical and such. And make more features. Plus make more 'differenceation' between all the types of things you can buy. Adding tooltips would be great too, really great. Making it resizible, or at least make it a bit bigger. Good luck on further projects though. Bye.
(If this comment was disrespectful, please report it.)
|
11/19/2000 6:25:03 PM: Mike
Downloaded the citysim code and although it states VB4 (32bit) compatible, I can't seem to get VB4-32 to recognize it. Get an error that the file is corrupt and cannot be loaded. Have downloaded three times and that isn't the problem so I expect that it isn't VB4-32 compatible. Too bad, I was itching to see it :) If have a workaround for this please let me know.
Thanks
Mike fspah@bellsouth.net
(If this comment was disrespectful, please report it.)
|
12/1/2000 2:30:20 AM: andrew
I love playing this nice little sim, although I never lose :) And I'm hungrily waiting for the next version!!! (Don't add too much)
(If this comment was disrespectful, please report it.)
|
12/5/2000 6:56:19 AM: R.v.Etten
I think it is very good. Only you should figure out how to use only one icon for building roads.
I'll give you a hint.
Read the above left right and below a square and you'll get a code. Make your graphics using this code and roads will auto match.
(If this comment was disrespectful, please report it.)
|
12/9/2000 8:45:40 AM: Helped
K David I have updated your version with Save, Load, Tips, Desasters, Active X Music and new buildings. Hopefully I shall have the roads to auto match as well. But what I need to know is how do I add extra buildings I have tryed but it just dont work. I have added them as the Freebees and there codes are 37 and 38 I just need coad so that they are placed in the city instead of empty squares which you hvae to deleate if you want to build over them. I have set up gfx and everything.
David please e-mail me so I can send you the updated version.
(If this comment was disrespectful, please report it.)
|
12/7/2001 9:36:36 PM: Samrat
Realy its a good work!!
(If this comment was disrespectful, please report it.)
|
1/24/2002 11:39:05 AM: SImon Dann
I added save and load games functions and music, cheats, better equations, and more buildings. That was a few months ago. Then I added it to my Site and now its avaluble on loads of toher sites! And Ive seen some fan sites dedecated to this CITY SIM. One of the best site is:http://plnehry.cz/strategie/citysimulator.html
I dont know what labguages its in, but it provides help, screen shots, and credit to you :) Which is the best thing. Im going to update it some more, have you any ideas?
(If this comment was disrespectful, please report it.)
|
2/27/2002 12:46:23 AM: Jamie Lindgren
w00t, thats pretty good... i'll give it a 5.
(If this comment was disrespectful, please report it.)
|
6/7/2002 8:37:17 AM: marko-slovenija
COOL GAME! Where can I get 3d car racing game?
(If this comment was disrespectful, please report it.)
|
7/4/2002 9:18:07 AM: Andrew Murphy
Can you post the code for the updated program?
(If this comment was disrespectful, please report it.)
|
4/24/2003 1:26:24 PM:
Weeddee!Cooool!!!!
Its like Sim City 1
How long did you program this ?!
(If this comment was disrespectful, please report it.)
|
4/27/2003 4:19:37 AM: 80 SpitFire 08
Nice
(If this comment was disrespectful, please report it.)
|
6/14/2003 2:00:23 AM: Sehab
has anyone noticed that when you add a freebee and then delete it you get money
(If this comment was disrespectful, please report it.)
|
12/22/2003 3:13:12 PM:
Cool Game! Its almost like SimCity. Nice work.
(If this comment was disrespectful, please report it.)
|
6/1/2004 10:09:50 PM:
You also need a semaphore in the Form_Load() sub to keep the TURF from continually changing colors when Me.Show happens. I used something like this:
Dim TURFAlready As Integer
TURFAlready = 0
If TURFAlready = 0 Then
GenerateTURF
TURFAlready = 1
Else
End If
(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.)
To post feedback, first please login.
|
