Hello all! So my former artist whom of which did buildings for my game (very important for a city simulator) had some things come up and quit. I did not want to post a team request, but him leaving left me no choice. The game is a basic city simulator related to that of SimCity 3000. There is really not much to explain for plot and etc. I would show my design document but I managed to lose it somehow. The idea of the game is simple. Build a city, collect the taxes on time, earn profit and be able to pay off expenses. You have to purchase power, water, and other services like garbage disposal and etc. If you have played SimCity at all, you will know what this game is like. This will soon after release be converted into AS3 and made into a Facebook game. Basically all I need is an artist who is willing to do stuff such as buildings, scenery, and terrain. Below, I have posted the buildings to show you the style. I would do them myself, I am just incapable of it.
Shadowtroid has gladly taken responsibility for HUDs, buttons, and UI. There are many other people on the team for this game as well.
Jordan Gibson (Zeus) - Main Programmer/Founder
Chris Hanna (flashing_snall) - Co-Programmer
Oli Burt (OBese87) - Co-Programmer
Brandon Caudell (That1SmartGuy) - Co-Programmer
Jake Ritter (ShadowTroid) - Artist
Max Ritter (Comorant5) - Sound FX/Music Producer
The game currently has 664 lines of code. I will post the first 200 to prove there is indeed a game.
Rem Project: eCity Prototype
Rem Created: Wednesday, June 30, 2010
Rem ***** Main Source File *****
sync on
sync rate 60
startBlue "---","-------"
global r
r = make vector2(1)
r = make vector2(2) : `Base vectors
r = make vector2(3) : `Temp vector
r = make vector2(4) : `Temp vector
`Initialize the base vectors
set vector2 1, 40, -20
set vector2 2, -40, -20
`Define origin
global oX
global oY
oX = screen width() / 2
oY = screen height() / 4 * 3 + 100
`Draw
global TilesX
global TilesY
TilesX = 10
TilesY = 9
global plotno
global plotx
global ploty
global plottilex
global plottiley
global plottype `Plot Types: (1) Residential | (2) Business | (3) Industry | (Other) Image number of special building.
global plotstage `Plot Stages: (1) Plotted | (2) Built (Make building number 2 soon.)
global plotpopulation
global plottaxes
global plotattraction `Does this bring in any tourist or residents?
global plotpowered `This variable and the three below do not matter until next version. ;)
global plotwatered
global plotnearstreet
global plotstreetdemand
plotno = 3
type CityType
tileX as float
tileY as float
plotNumber as float
plotType as float
occupied as float
endtype
StartTime=Timer()
Regular = (Timer()-T)/1000+10
AutosaveRegular = (Timer()-T)/1000+30
dim CityArray(10,10) as CityType
open to read 1,"files\setup.txt"
read string 1,experience$
read string 1,level$
read string 1,money$
read string 1,mayor$
read string 1,cityname$
global experience
global level
global money
global mname$
global cname$
experience = val(experience$)
level = val(level$)
money = val(money$)
mname$ = mayor$
cname$ = cityname$
close file 1
open to read 1,"files\cityStats.txt"
read string 1,population$
read string 1,taxcollection$
global population
global taxcollection
population = val(population$)
taxcollection = val(taxcollection$)
close file 1
if file exist("files\private\TownHall.xy") = 1
open to read 1,"files\private\TownHall.xy"
read string 1,thallx$
read string 1,thally$
thallx = val(thallx$)
thally = val(thally$)
global thallexist
thallexist = 1
close file 1
endif
load image "media\plot.png",1
`Find something to put here....
load image "media\road.png",3
load image "media\Government.png",4
`Space for residential...
load image "media\Houses_01.png",5
load image "media\Houses_02.png",6
load image "media\Houses_01_Flipped.png",7
load image "media\Houses_02_Flipped.png",8
load image "media\propforsale.png",9
`Space for businesses...
load image "media\GasStation.png",10
load image "media\RestaurantFast.png",11
load image "media\RestaurantNice.png",12
load image "media\Shop_01.png",13
load image "media\Shop_02.png",14
load image "media\GasStationFlipped.png",15
load image "media\RestaurantFastFlipped.png",16
load image "media\RestaurantNiceFlipped.png",17
load image "media\Shop_01Flipped.png",18
load image "media\Shop_02Flipped.png",19
load image "media\busforsale.png",20
`load image "media\hud.png",# `Use later!
backdrop off
set image colorkey 255,0,255
if file exist("files\private\largestplot.sts") = 1
open to read 1,"files\private\largestplot.sts"
read string 1,largeplot$
largestplot = val(largeplot$)
close file 1
for a = 3 to largestplot
if file exist("files\private\plot"+str$(a)+".xy") = 1
open to read 1,"files\private\plot"+str$(a)+".xy"
read string 1,plotno$
read string 1,plottype$
read string 1,plotx$
read string 1,ploty$
read string 1,plottilex$
read string 1,plottiley$
read string 1,plotstage$
plottilex = val(plottilex$)
plottiley = val(plottiley$)
if val(plottype$) = 1
sprite val(plotno$),val(plotx$),val(ploty$),9
endif
if val(plottype$) = 2
sprite val(plotno$),val(plotx$),val(ploty$),20
endif
cityArray(plottilex,plottiley).tileX = plotile
cityArray(plottilex,plottiley).tileY = plotiley
cityArray(plottilex,plottiley).plotNumber = val(plotno$)
cityArray(plottilex,plottiley).plotType = val(plottype$)
cityArray(plottilex,plottiley).occupied = 1
close file 1
endif
next a
for a = 3 to largestplot
if file exist("files\private\st1\plot"+str$(a)+".xy") = 1
open to read 1,"files\private\st1\plot"+str$(a)+".xy"
read string 1,plotno$
read string 1,plottype$
read string 1,plotx$
I have also posted a screenshot below.
This screenshot does not show all available buildings in the game due to building type being random.
The current game features the following.
Can place residential plots.
Can place business plots.
Residents will build homes on residential plots.
Businesses will build on business plots.
Plots are saved automatically.
City is saved every 30 seconds with autosave feature.
Your city is loaded by default.
All plots will be in same spot once loaded back.
You can not place a plot on a plot.
You can not place out of bounds.
So that is all I can think of to explain. My contact details,
jordangibson
h8spam[email protected]
(Remove h8spam).
If you are interested, please post and tell me and send me and email. I say this because I wont check my email unless someone reminds me.
Thanks!
Zeus
Please check out my blog.
