Game Over screen - GameCreators Forum

Author

Message

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 12th Jan 2007 23:13 Edited at: 13th Jan 2007 17:29

Link

I have finally made a game (it's sorta like Galega). Only problem is that I can't get Game Over to go on the screen when I die. I have the loading screen working but i can't get game over to show up when the conditions are right.

sry, forgot to mention i have DBPro

Back to top

Profile PM

Gil Galvanti

19

Years of Service

User Offline

Joined: 22nd Dec 2004

Location: Texas, United States

Posted: 12th Jan 2007 23:34

Link

code?

Pirates of Port Royale
Live the life of a pirate.

Back to top

Profile PM Website

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 12th Jan 2007 23:37 Edited at: 13th Jan 2007 01:48

Link

Edit: Gone!

Back to top

Profile PM

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 13th Jan 2007 00:19

Link

Oops. Code didn't work

Rem Project: Galactic Warfare
Rem Created: 1/10/2007 12:46:05 PM

Rem ***** Main Source File *****

rem basic settings
hide mouse
center text screen width()/2,screen height()/2,"Loading..." : wait 3000

rem loading media
load image "Metal_Plates_T.bmp",1 : load image "bunker.bmp",2
load sound "Blaster.wav",1 : load sound "Boom 1.wav",2

rem creating material for game
make object cone 1,100 : make object cube 2,50 : make object cube 3,50
make object cube 4,50 : make object cube 5,50 : make object cone 6,75
make object cone 7,75 : make object cone 8,75 : make object sphere 9,75
make object sphere 10,75 : make object sphere 11,75 : make object cylinder 12,75
make object cylinder 13,75 : make object cylinder 14,75 : make object cone 15,75
make object cone 16,75 : make object cone 17,75 : make object cone 18,75
make object cone 19,75 : make object cone 20,75 : make object cone 21,75
make object cone 22,75 : make object cone 23,75 : make object cone 24,75
make object cube 25,75 : make object sphere 26,12

rem positioning material
position object 1,0,-375,0 : position object 2,-400,-375,0 : position object 3,400,-375,0
position object 4,0,-550,0 : position object 5,0,525,0 : position object 6,-300,1200,0
position object 7,-200,1100,0 : position object 8,-100,1000,0 : position object 9,100,1800,0
position object 10,200,1900,0 : position object 11,300,2000,0 : position object 12,-300,3000,0
position object 13,0,3000,0 : position object 14,300,3000,0 : position object 15,300,4600,0
position object 16,200,4700,0 : position object 17,100,4800,0 : position object 18,0,4900,0
position object 19,-100,5000,0 : position object 20,-300,5600,0 : position object 21,-200,5700,0
position object 22,-100,5800,0 : position object 23,0,5900,0 : position object 24,100,6000,0
position object 25,0,7000,0 : position object 26,0,-525,100

rem adjusting size of ships
scale object 1,125,100,50 : scale object 4,1500,50,50 : scale object 5,1500,50,50
scale object 6,75,100,25 : scale object 7,75,100,25 : scale object 8,75,100,25
scale object 15,75,100,25 : scale object 16,75,100,25 : scale object 17,75,100,25
scale object 18,75,100,25 : scale object 19,75,100,25 : scale object 20,75,100,25
scale object 21,75,100,25 : scale object 22,75,100,25 : scale object 23,75,100,25
scale object 24,75,100,25

rem pointing enemy ships
zrotate object 6,180 : zrotate object 7,180 : zrotate object 8,180
zrotate object 15,180 : zrotate object 16,180 : zrotate object 17,180
zrotate object 18,180 : zrotate object 19,180 : zrotate object 20,180
zrotate object 21,180 : zrotate object 22,180 : zrotate object 23,180
zrotate object 24,180

rem texturing ships and coloring cannon
texture object 1,1 : texture object 6,2 : texture object 7,2
texture object 8,2 : texture object 9,2 : texture object 10,2
texture object 11,2 : texture object 12,2 : texture object 13,2
texture object 14,2 : texture object 15,2 : texture object 16,2
texture object 17,2 : texture object 18,2 : texture object 19,2
texture object 20,2 : texture object 21,2 : texture object 22,2
texture object 23,2 : texture object 24,2 : texture object 25,2
color object 26,rgb(255,0,0)

rem setting cannon transparency
ghost object on 26

rem hiding boundary lines
hide object 2 : hide object 3

rem making and editing the camera
make camera 1
position camera 1,0,0,-750
color backdrop 1,rgb(0,0,0)

rem game loop
do

rem setting player ship controls
if leftkey() then move object left 1,0.2
if rightkey() then move object right 1,0.2
if spacekey()
position object 26,object position x(1),object position y(1),object position z(1)
play sound 1
endif

rem setting boundaries
if object collision(1,2) then move object right 1,0.2
if object collision(1,3) then move object left 1,0.2
if object collision(26,5) then position object 26,0,-525,100

rem launching enemies
move object up 6,0.1 : move object up 7,0.1 : move object up 8,0.1
move object down 9,0.1 : move object down 10,0.1 : move object down 11,0.1
move object down 12,0.1 : move object down 13,0.1 : move object down 14,0.1
move object up 15,0.1 : move object up 16,0.1 : move object up 17,0.1
move object up 18,0.1 : move object up 19,0.1 : move object up 20,0.1
move object up 21,0.1 : move object up 22,0.1 : move object up 23,0.1
move object up 24,0.1 : move object down 25,0.1

rem enemy properties
if object collision(6,1) then end
if object collision(7,1) then end
if object collision(8,1) then end
if object collision(9,1) then end
if object collision(10,1) then end
if object collision(11,1) then end
if object collision(12,1) then end
if object collision(13,1) then end
if object collision(14,1) then end
if object collision(15,1) then end
if object collision(16,1) then end
if object collision(17,1) then end
if object collision(18,1) then end
if object collision(19,1) then end
if object collision(20,1) then end
if object collision(21,1) then end
if object collision(22,1) then end
if object collision(23,1) then end
if object collision(24,1) then end
if object collision(25,1) then end
if object collision(6,4) then end
if object collision(7,4) then end
if object collision(8,4) then end
if object collision(9,4) then end
if object collision(10,4) then end
if object collision(11,4) then end
if object collision(12,4) then end
if object collision(13,4) then end
if object collision(14,4) then end
if object collision(15,4) then end
if object collision(16,4) then end
if object collision(17,4) then end
if object collision(18,4) then end
if object collision(19,4) then end
if object collision(20,4) then end
if object collision(21,4) then end
if object collision(22,4) then end
if object collision(23,4) then end
if object collision(24,4) then end
if object collision(25,4) then end

rem cannon properties
if object position z(26)=object position z(1) then move object up 26,0.5
if object hit(26,6)
play sound 2
position object 6,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,7)
play sound 2
position object 7,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,8)
play sound 2
position object 8,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,9)
play sound 2
position object 9,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,10)
play sound 2
position object 10,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,11)
play sound 2
position object 11,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,12)
play sound 2
position object 12,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,13)
play sound 2
position object 13,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,14)
play sound 2
position object 14,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,15)
play sound 2
position object 15,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,16)
play sound 2
position object 16,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,17)
play sound 2
position object 17,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,18)
play sound 2
position object 18,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,19)
play sound 2
position object 19,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,20)
play sound 2
position object 20,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,21)
play sound 2
position object 21,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,22)
play sound 2
position object 22,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,23)
play sound 2
position object 23,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,24)
play sound 2
position object 24,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,25)
play sound 2
position object 25,0,-600,0
position object 26,0,-525,100
wait 1500
end
endif

rem end loop
loop

+ Code Snippet

Rem Project: Galactic Warfare
Rem Created: 1/10/2007 12:46:05 PM

Rem ***** Main Source File *****

rem basic settings
hide mouse
center text screen width()/2,screen height()/2,"Loading..." : wait 3000

rem loading media
load image "Metal_Plates_T.bmp",1 : load image "bunker.bmp",2
load sound "Blaster.wav",1 : load sound "Boom 1.wav",2

rem creating material for game
make object cone 1,100 : make object cube 2,50 : make object cube 3,50
make object cube 4,50 : make object cube 5,50 : make object cone 6,75
make object cone 7,75 : make object cone 8,75 : make object sphere 9,75
make object sphere 10,75 : make object sphere 11,75 : make object cylinder 12,75
make object cylinder 13,75 : make object cylinder 14,75 : make object cone 15,75
make object cone 16,75 : make object cone 17,75 : make object cone 18,75
make object cone 19,75 : make object cone 20,75 : make object cone 21,75
make object cone 22,75 : make object cone 23,75 : make object cone 24,75
make object cube 25,75 : make object sphere 26,12

rem positioning material
position object 1,0,-375,0 : position object 2,-400,-375,0 : position object 3,400,-375,0
position object 4,0,-550,0 : position object 5,0,525,0 : position object 6,-300,1200,0
position object 7,-200,1100,0 : position object 8,-100,1000,0 : position object 9,100,1800,0
position object 10,200,1900,0 : position object 11,300,2000,0 : position object 12,-300,3000,0
position object 13,0,3000,0 : position object 14,300,3000,0 : position object 15,300,4600,0
position object 16,200,4700,0 : position object 17,100,4800,0 : position object 18,0,4900,0
position object 19,-100,5000,0 : position object 20,-300,5600,0 : position object 21,-200,5700,0
position object 22,-100,5800,0 : position object 23,0,5900,0 : position object 24,100,6000,0
position object 25,0,7000,0 : position object 26,0,-525,100

rem adjusting size of ships
scale object 1,125,100,50 : scale object 4,1500,50,50 : scale object 5,1500,50,50
scale object 6,75,100,25 : scale object 7,75,100,25 : scale object 8,75,100,25
scale object 15,75,100,25 : scale object 16,75,100,25 : scale object 17,75,100,25
scale object 18,75,100,25 : scale object 19,75,100,25 : scale object 20,75,100,25
scale object 21,75,100,25 : scale object 22,75,100,25 : scale object 23,75,100,25
scale object 24,75,100,25

rem pointing enemy ships
zrotate object 6,180 : zrotate object 7,180 : zrotate object 8,180
zrotate object 15,180 : zrotate object 16,180 : zrotate object 17,180
zrotate object 18,180 : zrotate object 19,180 : zrotate object 20,180
zrotate object 21,180 : zrotate object 22,180 : zrotate object 23,180
zrotate object 24,180

rem texturing ships and coloring cannon
texture object 1,1 : texture object 6,2 : texture object 7,2
texture object 8,2 : texture object 9,2 : texture object 10,2
texture object 11,2 : texture object 12,2 : texture object 13,2
texture object 14,2 : texture object 15,2 : texture object 16,2
texture object 17,2 : texture object 18,2 : texture object 19,2
texture object 20,2 : texture object 21,2 : texture object 22,2
texture object 23,2 : texture object 24,2 : texture object 25,2
color object 26,rgb(255,0,0)

rem setting cannon transparency
ghost object on 26

rem hiding boundary lines
hide object 2 : hide object 3

rem making and editing the camera
make camera 1
position camera 1,0,0,-750
color backdrop 1,rgb(0,0,0)

rem game loop
do

rem setting player ship controls
if leftkey() then move object left 1,0.2
if rightkey() then move object right 1,0.2
if spacekey()
position object 26,object position x(1),object position y(1),object position z(1)
play sound 1
endif

rem setting boundaries
if object collision(1,2) then move object right 1,0.2
if object collision(1,3) then move object left 1,0.2
if object collision(26,5) then position object 26,0,-525,100

rem launching enemies
move object up 6,0.1 : move object up 7,0.1 : move object up 8,0.1
move object down 9,0.1 : move object down 10,0.1 : move object down 11,0.1
move object down 12,0.1 : move object down 13,0.1 : move object down 14,0.1
move object up 15,0.1 : move object up 16,0.1 : move object up 17,0.1
move object up 18,0.1 : move object up 19,0.1 : move object up 20,0.1
move object up 21,0.1 : move object up 22,0.1 : move object up 23,0.1
move object up 24,0.1 : move object down 25,0.1

rem enemy properties
if object collision(6,1) then end
if object collision(7,1) then end
if object collision(8,1) then end
if object collision(9,1) then end
if object collision(10,1) then end
if object collision(11,1) then end
if object collision(12,1) then end
if object collision(13,1) then end
if object collision(14,1) then end
if object collision(15,1) then end
if object collision(16,1) then end
if object collision(17,1) then end
if object collision(18,1) then end
if object collision(19,1) then end
if object collision(20,1) then end
if object collision(21,1) then end
if object collision(22,1) then end
if object collision(23,1) then end
if object collision(24,1) then end
if object collision(25,1) then end
if object collision(6,4) then end
if object collision(7,4) then end
if object collision(8,4) then end
if object collision(9,4) then end
if object collision(10,4) then end
if object collision(11,4) then end
if object collision(12,4) then end
if object collision(13,4) then end
if object collision(14,4) then end
if object collision(15,4) then end
if object collision(16,4) then end
if object collision(17,4) then end
if object collision(18,4) then end
if object collision(19,4) then end
if object collision(20,4) then end
if object collision(21,4) then end
if object collision(22,4) then end
if object collision(23,4) then end
if object collision(24,4) then end
if object collision(25,4) then end

rem cannon properties
if object position z(26)=object position z(1) then move object up 26,0.5
if object hit(26,6)
play sound 2
position object 6,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,7)
play sound 2
position object 7,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,8)
play sound 2
position object 8,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,9)
play sound 2
position object 9,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,10)
play sound 2
position object 10,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,11)
play sound 2
position object 11,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,12)
play sound 2
position object 12,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,13)
play sound 2
position object 13,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,14)
play sound 2
position object 14,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,15)
play sound 2
position object 15,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,16)
play sound 2
position object 16,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,17)
play sound 2
position object 17,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,18)
play sound 2
position object 18,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,19)
play sound 2
position object 19,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,20)
play sound 2
position object 20,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,21)
play sound 2
position object 21,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,22)
play sound 2
position object 22,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,23)
play sound 2
position object 23,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,24)
play sound 2
position object 24,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,25)
play sound 2
position object 25,0,-600,0
position object 26,0,-525,100
wait 1500
end
endif

rem end loop
loop

Back to top

Profile PM

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 13th Jan 2007 03:26

Link

anyone gonna help me?

Back to top

Profile PM

Kieran

18

Years of Service

User Offline

Joined: 6th Aug 2006

Location: Hamilton, New Zealand

Posted: 13th Jan 2007 03:54

Link

which part in that code sends you to game over? i don't see any game over coding in there

Back to top

Profile PM

Kieran

18

Years of Service

User Offline

Joined: 6th Aug 2006

Location: Hamilton, New Zealand

Posted: 13th Jan 2007 07:54

Link

ok well somewhere in your code you need it to "goto GameOver" when the character died which deletes all the 3D media then shows the words GAME OVER and does whatever afterwards (exits restarts game or restarts level whatever you want it to do)

but i guess if you need more help just ask

Back to top

Profile PM

Grog Grueslayer

Valued Member

19

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 13th Jan 2007 10:13

Link

One of the things you need to use are for/next loops. They are very helpful when you need to do the same command(s) many times.

Another useful command is "sync"... it allows you to take command of when the screen updates which gives you more speed (because it only updates the screen when you want it to) and allows you to do whatever you want to a screen before showing the player.

To show 2D on top of 3D you can use "draw to front" which allows you to create sprites or text (like the score) on top of any 3D objects.

Rem Project: Galactic Warfare
Rem Created: 1/10/2007 12:46:05 PM

Rem ***** Main Source File *****

` Turn on syncing  (everytime you want to update the
`  screen you "sync" it).
sync rate 0
sync on
` This is in case you're not at full screen
sync

` Make sure that all 2D is drawn over 3D
draw to front

rem basic settings
hide mouse
center text screen width()/2,screen height()/2,"Loading..." : wait 3000
` You want the text to show so you use "sync"
sync

rem loading media
load image "Metal_Plates_T.bmp",1 : load image "bunker.bmp",2
load sound "Blaster.wav",1 : load sound "Boom 1.wav",2

rem creating material for game
make object cone 1,100 : make object cube 2,50 : make object cube 3,50
make object cube 4,50 : make object cube 5,50 : make object cone 6,75
make object cone 7,75 : make object cone 8,75 : make object sphere 9,75
make object sphere 10,75 : make object sphere 11,75 : make object cylinder 12,75
make object cylinder 13,75 : make object cylinder 14,75 : make object cone 15,75
make object cone 16,75 : make object cone 17,75 : make object cone 18,75
make object cone 19,75 : make object cone 20,75 : make object cone 21,75
make object cone 22,75 : make object cone 23,75 : make object cone 24,75
make object cube 25,75 : make object sphere 26,12

rem positioning material
position object 1,0,-375,0 : position object 2,-400,-375,0 : position object 3,400,-375,0
position object 4,0,-550,0 : position object 5,0,525,0 : position object 6,-300,1200,0
position object 7,-200,1100,0 : position object 8,-100,1000,0 : position object 9,100,1800,0
position object 10,200,1900,0 : position object 11,300,2000,0 : position object 12,-300,3000,0
position object 13,0,3000,0 : position object 14,300,3000,0 : position object 15,300,4600,0
position object 16,200,4700,0 : position object 17,100,4800,0 : position object 18,0,4900,0
position object 19,-100,5000,0 : position object 20,-300,5600,0 : position object 21,-200,5700,0
position object 22,-100,5800,0 : position object 23,0,5900,0 : position object 24,100,6000,0
position object 25,0,7000,0 : position object 26,0,-525,100

rem adjusting size of ships
scale object 1,125,100,50 : scale object 4,1500,50,50 : scale object 5,1500,50,50
scale object 6,75,100,25 : scale object 7,75,100,25 : scale object 8,75,100,25
scale object 15,75,100,25 : scale object 16,75,100,25 : scale object 17,75,100,25
scale object 18,75,100,25 : scale object 19,75,100,25 : scale object 20,75,100,25
scale object 21,75,100,25 : scale object 22,75,100,25 : scale object 23,75,100,25
scale object 24,75,100,25

rem pointing enemy ships
zrotate object 6,180 : zrotate object 7,180 : zrotate object 8,180
zrotate object 15,180 : zrotate object 16,180 : zrotate object 17,180
zrotate object 18,180 : zrotate object 19,180 : zrotate object 20,180
zrotate object 21,180 : zrotate object 22,180 : zrotate object 23,180
zrotate object 24,180

rem texturing ships and coloring cannon
texture object 1,1
` Texture objects 6 to 25
for t=6 to 25
 texture object t,2
next t
color object 26,rgb(255,0,0)

rem setting cannon transparency
ghost object on 26

rem hiding boundary lines
hide object 2 : hide object 3

rem making and editing the camera
make camera 1
position camera 1,0,0,-750
color backdrop 1,rgb(0,0,0)

rem game loop
do

rem setting player ship controls
if leftkey() then move object left 1,0.2
if rightkey() then move object right 1,0.2
if spacekey()
position object 26,object position x(1),object position y(1),object position z(1)
play sound 1
endif

rem setting boundaries
if object collision(1,2) then move object right 1,0.2
if object collision(1,3) then move object left 1,0.2
if object collision(26,5) then position object 26,0,-525,100

rem launching enemies
move object up 6,0.1 : move object up 7,0.1 : move object up 8,0.1
move object down 9,0.1 : move object down 10,0.1 : move object down 11,0.1
move object down 12,0.1 : move object down 13,0.1 : move object down 14,0.1
move object up 15,0.1 : move object up 16,0.1 : move object up 17,0.1
move object up 18,0.1 : move object up 19,0.1 : move object up 20,0.1
move object up 21,0.1 : move object up 22,0.1 : move object up 23,0.1
move object up 24,0.1 : move object down 25,0.1

rem enemy properties
for t=6 to 25
 
 if object collision(t,1) or object collision(t,4)
  center text screen width()/2,screen height()/2,"Game Over"
  sync
  wait 3000
  end
 endif

next t

rem cannon properties
if object position z(26)=object position z(1) then move object up 26,0.5

` Check objects 6 to 26
for t=6 to 25
 if object hit(26,t)
  play sound 2
  position object t,0,-600,0
  position object 26,0,-525,100
 endif
next t

` Update the screen
sync
rem end loop
loop

+ Code Snippet

Rem Project: Galactic Warfare
Rem Created: 1/10/2007 12:46:05 PM

Rem ***** Main Source File *****

` Turn on syncing  (everytime you want to update the
`  screen you "sync" it).
sync rate 0
sync on
` This is in case you're not at full screen
sync

` Make sure that all 2D is drawn over 3D
draw to front

rem basic settings
hide mouse
center text screen width()/2,screen height()/2,"Loading..." : wait 3000
` You want the text to show so you use "sync"
sync

rem loading media
load image "Metal_Plates_T.bmp",1 : load image "bunker.bmp",2
load sound "Blaster.wav",1 : load sound "Boom 1.wav",2

rem creating material for game
make object cone 1,100 : make object cube 2,50 : make object cube 3,50
make object cube 4,50 : make object cube 5,50 : make object cone 6,75
make object cone 7,75 : make object cone 8,75 : make object sphere 9,75
make object sphere 10,75 : make object sphere 11,75 : make object cylinder 12,75
make object cylinder 13,75 : make object cylinder 14,75 : make object cone 15,75
make object cone 16,75 : make object cone 17,75 : make object cone 18,75
make object cone 19,75 : make object cone 20,75 : make object cone 21,75
make object cone 22,75 : make object cone 23,75 : make object cone 24,75
make object cube 25,75 : make object sphere 26,12

rem positioning material
position object 1,0,-375,0 : position object 2,-400,-375,0 : position object 3,400,-375,0
position object 4,0,-550,0 : position object 5,0,525,0 : position object 6,-300,1200,0
position object 7,-200,1100,0 : position object 8,-100,1000,0 : position object 9,100,1800,0
position object 10,200,1900,0 : position object 11,300,2000,0 : position object 12,-300,3000,0
position object 13,0,3000,0 : position object 14,300,3000,0 : position object 15,300,4600,0
position object 16,200,4700,0 : position object 17,100,4800,0 : position object 18,0,4900,0
position object 19,-100,5000,0 : position object 20,-300,5600,0 : position object 21,-200,5700,0
position object 22,-100,5800,0 : position object 23,0,5900,0 : position object 24,100,6000,0
position object 25,0,7000,0 : position object 26,0,-525,100

rem adjusting size of ships
scale object 1,125,100,50 : scale object 4,1500,50,50 : scale object 5,1500,50,50
scale object 6,75,100,25 : scale object 7,75,100,25 : scale object 8,75,100,25
scale object 15,75,100,25 : scale object 16,75,100,25 : scale object 17,75,100,25
scale object 18,75,100,25 : scale object 19,75,100,25 : scale object 20,75,100,25
scale object 21,75,100,25 : scale object 22,75,100,25 : scale object 23,75,100,25
scale object 24,75,100,25

rem pointing enemy ships
zrotate object 6,180 : zrotate object 7,180 : zrotate object 8,180
zrotate object 15,180 : zrotate object 16,180 : zrotate object 17,180
zrotate object 18,180 : zrotate object 19,180 : zrotate object 20,180
zrotate object 21,180 : zrotate object 22,180 : zrotate object 23,180
zrotate object 24,180

rem texturing ships and coloring cannon
texture object 1,1
` Texture objects 6 to 25
for t=6 to 25
 texture object t,2
next t
color object 26,rgb(255,0,0)

rem setting cannon transparency
ghost object on 26

rem hiding boundary lines
hide object 2 : hide object 3

rem making and editing the camera
make camera 1
position camera 1,0,0,-750
color backdrop 1,rgb(0,0,0)

rem game loop
do

rem setting player ship controls
if leftkey() then move object left 1,0.2
if rightkey() then move object right 1,0.2
if spacekey()
position object 26,object position x(1),object position y(1),object position z(1)
play sound 1
endif

rem setting boundaries
if object collision(1,2) then move object right 1,0.2
if object collision(1,3) then move object left 1,0.2
if object collision(26,5) then position object 26,0,-525,100

rem launching enemies
move object up 6,0.1 : move object up 7,0.1 : move object up 8,0.1
move object down 9,0.1 : move object down 10,0.1 : move object down 11,0.1
move object down 12,0.1 : move object down 13,0.1 : move object down 14,0.1
move object up 15,0.1 : move object up 16,0.1 : move object up 17,0.1
move object up 18,0.1 : move object up 19,0.1 : move object up 20,0.1
move object up 21,0.1 : move object up 22,0.1 : move object up 23,0.1
move object up 24,0.1 : move object down 25,0.1

rem enemy properties
for t=6 to 25
 
 if object collision(t,1) or object collision(t,4)
  center text screen width()/2,screen height()/2,"Game Over"
  sync
  wait 3000
  end
 endif

next t

rem cannon properties
if object position z(26)=object position z(1) then move object up 26,0.5

` Check objects 6 to 26
for t=6 to 25
 if object hit(26,t)
  play sound 2
  position object t,0,-600,0
  position object 26,0,-525,100
 endif
next t

` Update the screen
sync
rem end loop
loop

I changed some of your code to use for/next loops. There are several other places you can replace many lines with a for/next loop. I'll leave those to you to play with.

Note: The "t" in the for/next loops is just a variable. It can be anything you want... just make sure that you end the for/next loop with "next yourvariable".

+ Code Snippet

` Do this 100 times
for ThisIsCool=1 to 100
 print "Loop Number "+str$(ThisIsCool)
next ThisIsCool
wait key

Back to top

Profile PM Email

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 13th Jan 2007 17:28

Link

Rem Project: Galactic Warfare
Rem Created: 1/10/2007 12:46:05 PM

Rem ***** Main Source File *****

rem basic settings
hide mouse
center text screen width()/2,screen height()/2,"Loading..." : wait 3000

rem loading media
load image "Metal_Plates_T.bmp",1 : load image "bunker.bmp",2
load sound "Blaster.wav",1 : load sound "Boom 1.wav",2 : load sound "Large explosion 3.wav",3

rem creating material for game
make object cone 1,100 : make object cube 2,50 : make object cube 3,50
make object cube 4,50 : make object cube 5,50 : make object cone 6,75
make object cone 7,75 : make object cone 8,75 : make object sphere 9,75
make object sphere 10,75 : make object sphere 11,75 : make object cylinder 12,75
make object cylinder 13,75 : make object cylinder 14,75 : make object cone 15,75
make object cone 16,75 : make object cone 17,75 : make object cone 18,75
make object cone 19,75 : make object cone 20,75 : make object cone 21,75
make object cone 22,75 : make object cone 23,75 : make object cone 24,75
make object cube 25,75 : make object sphere 26,12

rem positioning material
position object 1,0,-375,0 : position object 2,-400,-375,0 : position object 3,400,-375,0
position object 4,0,-550,0 : position object 5,0,525,0 : position object 6,-300,1200,0
position object 7,-200,1100,0 : position object 8,-100,1000,0 : position object 9,100,1800,0
position object 10,200,1900,0 : position object 11,300,2000,0 : position object 12,-300,3000,0
position object 13,0,3000,0 : position object 14,300,3000,0 : position object 15,300,4600,0
position object 16,200,4700,0 : position object 17,100,4800,0 : position object 18,0,4900,0
position object 19,-100,5000,0 : position object 20,-300,5600,0 : position object 21,-200,5700,0
position object 22,-100,5800,0 : position object 23,0,5900,0 : position object 24,100,6000,0
position object 25,0,7000,0 : position object 26,0,-525,100

rem adjusting size of ships
scale object 1,125,100,50 : scale object 4,1500,50,50 : scale object 5,1500,50,50
scale object 6,75,100,25 : scale object 7,75,100,25 : scale object 8,75,100,25
scale object 15,75,100,25 : scale object 16,75,100,25 : scale object 17,75,100,25
scale object 18,75,100,25 : scale object 19,75,100,25 : scale object 20,75,100,25
scale object 21,75,100,25 : scale object 22,75,100,25 : scale object 23,75,100,25
scale object 24,75,100,25

rem pointing enemy ships
zrotate object 6,180 : zrotate object 7,180 : zrotate object 8,180
zrotate object 15,180 : zrotate object 16,180 : zrotate object 17,180
zrotate object 18,180 : zrotate object 19,180 : zrotate object 20,180
zrotate object 21,180 : zrotate object 22,180 : zrotate object 23,180
zrotate object 24,180

rem texturing ships and coloring cannon
texture object 1,1 : texture object 6,2 : texture object 7,2
texture object 8,2 : texture object 9,2 : texture object 10,2
texture object 11,2 : texture object 12,2 : texture object 13,2
texture object 14,2 : texture object 15,2 : texture object 16,2
texture object 17,2 : texture object 18,2 : texture object 19,2
texture object 20,2 : texture object 21,2 : texture object 22,2
texture object 23,2 : texture object 24,2 : texture object 25,2
color object 26,rgb(255,0,0)

rem setting cannon transparency
ghost object on 26

rem hiding boundary lines
hide object 2 : hide object 3

rem making and editing the camera
make camera 1
position camera 1,0,0,-750
color backdrop 1,rgb(0,0,0)

rem game loop
do

rem setting player ship controls
if leftkey() then move object left 1,0.2
if rightkey() then move object right 1,0.2
if spacekey()
position object 26,object position x(1),object position y(1),object position z(1)
play sound 1
endif

rem setting boundaries
if object collision(1,2) then move object right 1,0.2
if object collision(1,3) then move object left 1,0.2
if object collision(26,5) then position object 26,0,-525,100

rem launching enemies
move object up 6,0.1 : move object up 7,0.1 : move object up 8,0.1
move object down 9,0.1 : move object down 10,0.1 : move object down 11,0.1
move object down 12,0.1 : move object down 13,0.1 : move object down 14,0.1
move object up 15,0.1 : move object up 16,0.1 : move object up 17,0.1
move object up 18,0.1 : move object up 19,0.1 : move object up 20,0.1
move object up 21,0.1 : move object up 22,0.1 : move object up 23,0.1
move object up 24,0.1 : move object down 25,0.1

rem enemy properties
if object collision(6,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(7,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(8,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(9,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(10,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(11,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(12,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(13,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(14,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(15,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(16,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(17,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(18,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(19,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(20,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(21,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(22,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(23,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(24,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(25,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(6,4) then play sound 3 : wait 5000 : end
if object collision(7,4) then play sound 3 : wait 5000 : end
if object collision(8,4) then play sound 3 : wait 5000 : end
if object collision(9,4) then play sound 3 : wait 5000 : end
if object collision(10,4) then play sound 3 : wait 5000 : end
if object collision(11,4) then play sound 3 : wait 5000 : end
if object collision(12,4) then play sound 3 : wait 5000 : end
if object collision(13,4) then play sound 3 : wait 5000 : end
if object collision(14,4) then play sound 3 : wait 5000 : end
if object collision(15,4) then play sound 3 : wait 5000 : end
if object collision(16,4) then play sound 3 : wait 5000 : end
if object collision(17,4) then play sound 3 : wait 5000 : end
if object collision(18,4) then play sound 3 : wait 5000 : end
if object collision(19,4) then play sound 3 : wait 5000 : end
if object collision(20,4) then play sound 3 : wait 5000 : end
if object collision(21,4) then play sound 3 : wait 5000 : end
if object collision(22,4) then play sound 3 : wait 5000 : end
if object collision(23,4) then play sound 3 : wait 5000 : end
if object collision(24,4) then play sound 3 : wait 5000 : end
if object collision(25,4) then play sound 3 : wait 5000 : end

rem cannon properties
if object position z(26)=object position z(1) then move object up 26,0.5
if object hit(26,6)
play sound 2
position object 6,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,7)
play sound 2
position object 7,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,8)
play sound 2
position object 8,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,9)
play sound 2
position object 9,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,10)
play sound 2
position object 10,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,11)
play sound 2
position object 11,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,12)
play sound 2
position object 12,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,13)
play sound 2
position object 13,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,14)
play sound 2
position object 14,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,15)
play sound 2
position object 15,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,16)
play sound 2
position object 16,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,17)
play sound 2
position object 17,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,18)
play sound 2
position object 18,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,19)
play sound 2
position object 19,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,20)
play sound 2
position object 20,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,21)
play sound 2
position object 21,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,22)
play sound 2
position object 22,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,23)
play sound 2
position object 23,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,24)
play sound 2
position object 24,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,25)
play sound 2
position object 25,0,-600,0
position object 26,0,-525,100
wait 1000
center text screen width()/2,screen height()/2,"You Win!"
wait 3000
end
endif

rem end loop
loop

+ Code Snippet

Rem Project: Galactic Warfare
Rem Created: 1/10/2007 12:46:05 PM

Rem ***** Main Source File *****

rem basic settings
hide mouse
center text screen width()/2,screen height()/2,"Loading..." : wait 3000

rem loading media
load image "Metal_Plates_T.bmp",1 : load image "bunker.bmp",2
load sound "Blaster.wav",1 : load sound "Boom 1.wav",2 : load sound "Large explosion 3.wav",3

rem creating material for game
make object cone 1,100 : make object cube 2,50 : make object cube 3,50
make object cube 4,50 : make object cube 5,50 : make object cone 6,75
make object cone 7,75 : make object cone 8,75 : make object sphere 9,75
make object sphere 10,75 : make object sphere 11,75 : make object cylinder 12,75
make object cylinder 13,75 : make object cylinder 14,75 : make object cone 15,75
make object cone 16,75 : make object cone 17,75 : make object cone 18,75
make object cone 19,75 : make object cone 20,75 : make object cone 21,75
make object cone 22,75 : make object cone 23,75 : make object cone 24,75
make object cube 25,75 : make object sphere 26,12

rem positioning material
position object 1,0,-375,0 : position object 2,-400,-375,0 : position object 3,400,-375,0
position object 4,0,-550,0 : position object 5,0,525,0 : position object 6,-300,1200,0
position object 7,-200,1100,0 : position object 8,-100,1000,0 : position object 9,100,1800,0
position object 10,200,1900,0 : position object 11,300,2000,0 : position object 12,-300,3000,0
position object 13,0,3000,0 : position object 14,300,3000,0 : position object 15,300,4600,0
position object 16,200,4700,0 : position object 17,100,4800,0 : position object 18,0,4900,0
position object 19,-100,5000,0 : position object 20,-300,5600,0 : position object 21,-200,5700,0
position object 22,-100,5800,0 : position object 23,0,5900,0 : position object 24,100,6000,0
position object 25,0,7000,0 : position object 26,0,-525,100

rem adjusting size of ships
scale object 1,125,100,50 : scale object 4,1500,50,50 : scale object 5,1500,50,50
scale object 6,75,100,25 : scale object 7,75,100,25 : scale object 8,75,100,25
scale object 15,75,100,25 : scale object 16,75,100,25 : scale object 17,75,100,25
scale object 18,75,100,25 : scale object 19,75,100,25 : scale object 20,75,100,25
scale object 21,75,100,25 : scale object 22,75,100,25 : scale object 23,75,100,25
scale object 24,75,100,25

rem pointing enemy ships
zrotate object 6,180 : zrotate object 7,180 : zrotate object 8,180
zrotate object 15,180 : zrotate object 16,180 : zrotate object 17,180
zrotate object 18,180 : zrotate object 19,180 : zrotate object 20,180
zrotate object 21,180 : zrotate object 22,180 : zrotate object 23,180
zrotate object 24,180

rem texturing ships and coloring cannon
texture object 1,1 : texture object 6,2 : texture object 7,2
texture object 8,2 : texture object 9,2 : texture object 10,2
texture object 11,2 : texture object 12,2 : texture object 13,2
texture object 14,2 : texture object 15,2 : texture object 16,2
texture object 17,2 : texture object 18,2 : texture object 19,2
texture object 20,2 : texture object 21,2 : texture object 22,2
texture object 23,2 : texture object 24,2 : texture object 25,2
color object 26,rgb(255,0,0)

rem setting cannon transparency
ghost object on 26

rem hiding boundary lines
hide object 2 : hide object 3

rem making and editing the camera
make camera 1
position camera 1,0,0,-750
color backdrop 1,rgb(0,0,0)

rem game loop
do

rem setting player ship controls
if leftkey() then move object left 1,0.2
if rightkey() then move object right 1,0.2
if spacekey()
position object 26,object position x(1),object position y(1),object position z(1)
play sound 1
endif

rem setting boundaries
if object collision(1,2) then move object right 1,0.2
if object collision(1,3) then move object left 1,0.2
if object collision(26,5) then position object 26,0,-525,100

rem launching enemies
move object up 6,0.1 : move object up 7,0.1 : move object up 8,0.1
move object down 9,0.1 : move object down 10,0.1 : move object down 11,0.1
move object down 12,0.1 : move object down 13,0.1 : move object down 14,0.1
move object up 15,0.1 : move object up 16,0.1 : move object up 17,0.1
move object up 18,0.1 : move object up 19,0.1 : move object up 20,0.1
move object up 21,0.1 : move object up 22,0.1 : move object up 23,0.1
move object up 24,0.1 : move object down 25,0.1

rem enemy properties
if object collision(6,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(7,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(8,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(9,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(10,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(11,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(12,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(13,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(14,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(15,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(16,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(17,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(18,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(19,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(20,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(21,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(22,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(23,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(24,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(25,1) then play sound 3 : position object 1,0,-600,0 : wait 5000 : end
if object collision(6,4) then play sound 3 : wait 5000 : end
if object collision(7,4) then play sound 3 : wait 5000 : end
if object collision(8,4) then play sound 3 : wait 5000 : end
if object collision(9,4) then play sound 3 : wait 5000 : end
if object collision(10,4) then play sound 3 : wait 5000 : end
if object collision(11,4) then play sound 3 : wait 5000 : end
if object collision(12,4) then play sound 3 : wait 5000 : end
if object collision(13,4) then play sound 3 : wait 5000 : end
if object collision(14,4) then play sound 3 : wait 5000 : end
if object collision(15,4) then play sound 3 : wait 5000 : end
if object collision(16,4) then play sound 3 : wait 5000 : end
if object collision(17,4) then play sound 3 : wait 5000 : end
if object collision(18,4) then play sound 3 : wait 5000 : end
if object collision(19,4) then play sound 3 : wait 5000 : end
if object collision(20,4) then play sound 3 : wait 5000 : end
if object collision(21,4) then play sound 3 : wait 5000 : end
if object collision(22,4) then play sound 3 : wait 5000 : end
if object collision(23,4) then play sound 3 : wait 5000 : end
if object collision(24,4) then play sound 3 : wait 5000 : end
if object collision(25,4) then play sound 3 : wait 5000 : end

rem cannon properties
if object position z(26)=object position z(1) then move object up 26,0.5
if object hit(26,6)
play sound 2
position object 6,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,7)
play sound 2
position object 7,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,8)
play sound 2
position object 8,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,9)
play sound 2
position object 9,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,10)
play sound 2
position object 10,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,11)
play sound 2
position object 11,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,12)
play sound 2
position object 12,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,13)
play sound 2
position object 13,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,14)
play sound 2
position object 14,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,15)
play sound 2
position object 15,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,16)
play sound 2
position object 16,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,17)
play sound 2
position object 17,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,18)
play sound 2
position object 18,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,19)
play sound 2
position object 19,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,20)
play sound 2
position object 20,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,21)
play sound 2
position object 21,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,22)
play sound 2
position object 22,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,23)
play sound 2
position object 23,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,24)
play sound 2
position object 24,0,-600,0
position object 26,0,-525,100
endif
if object hit(26,25)
play sound 2
position object 25,0,-600,0
position object 26,0,-525,100
wait 1000
center text screen width()/2,screen height()/2,"You Win!"
wait 3000
end
endif

rem end loop
loop

look at the last area of the code. That's what I've been trying to get it to do (display You Win! for 3 seconds then end the program) but all it does is stop everything, wait 4 seconds then close the program without showing anything.

Back to top

Profile PM

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 13th Jan 2007 21:01 Edited at: 13th Jan 2007 21:02

Link

ty, it worked, but one last question
what does the next t command do?

Back to top

Profile PM

Code Dragon

18

Years of Service

User Offline

Joined: 21st Aug 2006

Location: Everywhere

Posted: 13th Jan 2007 21:10

Link

The next command means the end of the for loop. Like this:

+ Code Snippet

print "I am going to eat 100 slices of pizza."
print "I'll start when you press a key."
wait key

for slice = 1 to 100
  print "I am eating slice " + str$(slice) + ".  It is delicious."
  wait 10
next slice

print "Well, I'm done my pizza.  That was good, next time you should eat some."
wait key

The computer will execute everything between for and next 100 times, because I told the variable to start at 1 and keep going up until it reaches 100. Next means "make the variable go up by 1. If it's high enough, quit this loop. Otherwise, go back to the for and continue."

Quote: "Gimme teh code!"

Thank you for not flooding the forums with posts like this.

Back to top

Profile PM Email Website

Allanon Shadeslayer

17

Years of Service

User Offline

Joined: 28th Dec 2006

Location:

Posted: 13th Jan 2007 21:14

Link

Ty all! Now I know a whole lot more and should be able to use this info in other programs. Ty again!

Back to top

Profile PM

Grog Grueslayer

Valued Member

19

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 14th Jan 2007 10:58

Link

Quote: "look at the last area of the code. That's what I've been trying to get it to do (display You Win! for 3 seconds then end the program) but all it does is stop everything, wait 4 seconds then close the program without showing anything."

Oops... I guess I accidentally deleted that when I removed all the object collision checks.

It did work but because you didn't have "draw to front" you didn't see the text. It printed the text behind the 3D stuff.

@ Code Dragon

I'm sure you just didn't want to complicate it for him but he needs to know everything about for/next.

@ Allanon Shadeslayer

The default increment for "next" is 1 but if the for/next loop has a "step" in the command it increases by the number after "step".

+ Code Snippet

` Do this for/next loop in increments of 5
for t=0 to 100 step 5
 print "T = "+str$(t)
next t
wait key

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / Game Over screen