I have tried several times to print variouse things to the screen in my game, but nothing happens. Here is the code....
`Vital project stats
`Name: Worlds at war
`Started: wednesday, December 22, 2004
`Genre: Strategy
`Author: Jerad Laxson
`Programmer: Jerad Laxson
`Artist: Jerad Laxson
set display mode 1024,768,16
Set camera range 1,10000
`creates a space image for the backdrop
load image "space.jpg",1
backdrop on
texture backdrop 1
autocam off
`PLANETARY ARRAYS
dim earth(0)
dim venus(0)
dim mercury(0)
dim jupider(0)
dim mars(0)
dim saturn(0)
dim neptune(0)
dim uranus(0)
dim pluto(0)
dim planetx(0)
`Other ARRAYS
dim victorytimer(0)
`resource arrays.
dim money(0)
dim jeradium(0)
dim energy(0)
`camera variables!
x#=0
y#=0
z#=-200
`Planetary variabes 0=neutral, 1=player, 2=enemy
earth(0)=1
venus(0)=0
mercury(0)=0
jupider(0)=0
mars(0)=1
saturn(0)=0
neptune(0)=0
uranus(0)=2
pluto(0)=2
planetx(0)=2
`resources
money(0)=1000
jeradium(0)=1000
energy(0)=1000
`VICTORY TIMER
victorytimer(0)=1000
`make planets
mercury=1
load object "mercury.x",mercury
load bitmap "mercuryuv.bmp",2
get image 2,0,0,512,512
texture object mercury,2
set object collision on mercury
position object mercury,-400,0,0
rotate object mercury,300,0,0
venus=2
load object "venus.x",venus
load bitmap "venus.bmp",3
get image 3,0,0,512,512
texture object venus,3
set object collision on venus
position object venus, -200,0,0
rotate object venus,300,0,0
earth=3
load object "earth.x",earth
set object collision on earth
position object earth,0,0,0
rotate object earth,300,0,0
load bitmap "earthuv.bmp",4
get image 4,0,0,512,512
texture object earth,4
scale object earth,100,100,100
mars=4
load object "MARS.x",mars
load bitmap "marsuv.bmp",5
get image 5,0,0,512,512
texture object mars,5
set object collision on mars
position object mars,200,0,0
rotate object mars,300,0,0
scale object mars,100,100,100
jupider=5
load object "jupider.x", jupider
set object collision on jupider
load bitmap "jupideruv.bmp",6
get image 6,0,0,512,512
texture object jupider,6
position object jupider, 400,0,0
rotate object jupider, 300,0,0
saturn=6
load object "saturn.x",saturn
load bitmap "saturnuv.bmp", 7
get image 7,0,0,512,512
texture object saturn,7
set object collision on saturn
position object saturn, 600, 0,0
rotate object saturn,300,0,0
neptune=7
load object "neptune.x",neptune
load bitmap "neptuneuv.bmp",8
get image 8,0,0,512,512
texture object neptune,8
set object collision on neptune
position object neptune,800,0,0
rotate object neptune,300,0,0
uranus=8
load object "uranus.x",uranus
load bitmap "uranusuv.bmp",9
get image 9,0,0,512,512
texture object uranus,9
set object collision on uranus
position object uranus, 1000, 0,0
rotate object uranus,300,0,0
pluto=9
make object sphere pluto, 15
color object pluto,RGb(0,0,255)
set object collision on pluto
position object pluto, 1200, 0,0
`planet x
planetx=10
load object "planetx.x",planetx
load bitmap "planetxuv.bmp",11
get image 11,0,0,512,512
texture object planetx,11
set object collision on planetx
position object planetx, 1300,0,0
rotate object planetx,300,0,0
`make asteroids
load bitmap "asteroiduv.bmp",12
get image 12,0,0,512,512
for asteroids=11 to 50
load object "asteroid.x",asteroids
texture object asteroids,12
position object asteroids, 250+rnd(20),-500+rnd(900),0
rotate object asteroids,0,rnd(50),rnd(50)
next asteroids
`main loop!
sync on
sync rate 30
do
`PAUSE BUTTON!
if inkey$()="p"
repeat
until inkey$()=""
repeat
center text screen width()/2,screen height()/2,"PAUSED"
sync
until inkey$()="p"
repeat
until inkey$()=""
endif
`Camera stuff!
position camera 0+x#,0+y#,0+z#
`moves camera right
if rightkey()=1 and x#<1300
x#=x#+5
endif
`moves camera left
if leftkey()=1 and x#>-500
x#=x#-5
endif
`moves camera up
if upkey()=1 and y#<200
y#=y#+5
endif
`moves camera down
if downkey()=1 and y#>-200
y#=y#-5
endif
sync
loop
I used quite a bit of media, so you won't be able to run it right now, but you can still look it over, and see if something is wrong.
Guns arn't the problem, people are the problem, shoot all the people and guns arn't a problem anymore.