Need help with stretching sprites

Author

Message

sonec gaimr1

21

Years of Service

User Offline

Joined: 10th Feb 2003

Location: USA

Posted: 28th Nov 2003 22:08 Edited at: 28th Nov 2003 22:10

Link

Now first off, I like to say that I'm a newbie so don't start howling with laughter if I don't know this

. Right now I'm messing around with sprites. I've already figured out how to move a sprite(with my brother's help)and cycle several sprite frames and all that junk, but what I'm trying to do right now is to stretch the sprite and then cycle them. Any help is welcome! Here's my code.

sync on
sync rate 40
Load bitmap "tankbrigade.bmp",1
rem regular tank sprite
get image 1,662,301,690,325
rem tank frame 1
get image 2,728,103,756,127
rem tank frame 2
get image 3,728,136,756,160
rem tank frame 3
get image 4,728,169,756,193
rem tank frame 4
get image 5,728,202,756,226
rem tank frame 5
get image 6,728,235,756,259
rem tank frame 6
get image 7,728,268,756,292
rem tank frame 7
get image 8,728,301,756,325
rem bullet sprite
get image 15,210,47,217,51
cls
sprite 1, 0, 0, 1
sprite 2, 0, 0, 2
sprite 3, 0, 0, 3
sprite 4, 0, 0, 4
sprite 5, 0, 0, 5
sprite 6, 0, 0, 6
sprite 7, 0, 0, 7
sprite 8, 0, 0, 8
stretch sprite 1,150,150
stretch sprite 2,150,150
stretch sprite 3,150,150
stretch sprite 4,150,150
stretch sprite 5,150,150
stretch sprite 6,150,150
stretch sprite 7,150,150
stretch sprite 8,150,150

false = 0
bulletalive = 1
tankx = 320
tanky = 240
theplayerhasshotthegun = 0
width = 320
counter = 1
maxcounter = 10
image = 8
do
  inc counter
  rem Bullet code
  If rightkey() = 1 then width = width - 4
  If leftkey() = 1 then width = width + 4
  If spacekey() = 1 and theplayerhasshotthegun = 0
  theplayerhasshotthegun = 1
  bulletx = tankx + 13
  bullety = tanky + 11
  bulletalive = 1
  show sprite 15
  endif
  If theplayerhasshotthegun = 1 and bulletalive = 1
  bulletx = bulletx + 25
  If bulletx > tankx + width
   theplayerhasshotthegun = 0
   bulletalive = 0
   hide sprite 15
   endif
  endif
  rem Tank moving section
  If spacekey() = 0 and theplayerhasshotthegun = 0 and bulletalive = 0 then hide sprite 15
  If rightkey() = 1 Then tankx = tankx + 4
  If leftkey() = 1
  tankx = tankx - 4
  inc counter
  If counter > maxcounter
   counter = 1
   image = image + 1
   endif
  If image > 8 then image = 1
 endif
  If downkey() = 1 then tanky = tanky + 4
  If upkey() = 1 then tanky = tanky - 4
  if tankx < 0 then tankx = 0
  if tanky < 0 then tanky = 0
  if tankx > 600 then tankx = 600
  if tanky > 440 then tanky = 440
 sprite 1,tankx,tanky,image
 sprite 15,bulletx, bullety,15
 sync
loop

+ Code Snippet

sync on
sync rate 40
Load bitmap "tankbrigade.bmp",1
rem regular tank sprite
get image 1,662,301,690,325
rem tank frame 1
get image 2,728,103,756,127
rem tank frame 2
get image 3,728,136,756,160
rem tank frame 3
get image 4,728,169,756,193
rem tank frame 4
get image 5,728,202,756,226
rem tank frame 5
get image 6,728,235,756,259
rem tank frame 6
get image 7,728,268,756,292
rem tank frame 7
get image 8,728,301,756,325
rem bullet sprite
get image 15,210,47,217,51
cls
sprite 1, 0, 0, 1
sprite 2, 0, 0, 2
sprite 3, 0, 0, 3
sprite 4, 0, 0, 4
sprite 5, 0, 0, 5
sprite 6, 0, 0, 6
sprite 7, 0, 0, 7
sprite 8, 0, 0, 8
stretch sprite 1,150,150
stretch sprite 2,150,150
stretch sprite 3,150,150
stretch sprite 4,150,150
stretch sprite 5,150,150
stretch sprite 6,150,150
stretch sprite 7,150,150
stretch sprite 8,150,150

false = 0
bulletalive = 1
tankx = 320
tanky = 240
theplayerhasshotthegun = 0
width = 320
counter = 1
maxcounter = 10
image = 8
do
  inc counter
  rem Bullet code
  If rightkey() = 1 then width = width - 4
  If leftkey() = 1 then width = width + 4
  If spacekey() = 1 and theplayerhasshotthegun = 0
  theplayerhasshotthegun = 1
  bulletx = tankx + 13
  bullety = tanky + 11
  bulletalive = 1
  show sprite 15
  endif
  If theplayerhasshotthegun = 1 and bulletalive = 1
  bulletx = bulletx + 25
  If bulletx > tankx + width
   theplayerhasshotthegun = 0
   bulletalive = 0
   hide sprite 15
   endif
  endif
  rem Tank moving section
  If spacekey() = 0 and theplayerhasshotthegun = 0 and bulletalive = 0 then hide sprite 15
  If rightkey() = 1 Then tankx = tankx + 4
  If leftkey() = 1
  tankx = tankx - 4
  inc counter
  If counter > maxcounter
   counter = 1
   image = image + 1
   endif
  If image > 8 then image = 1
 endif
  If downkey() = 1 then tanky = tanky + 4
  If upkey() = 1 then tanky = tanky - 4
  if tankx < 0 then tankx = 0
  if tanky < 0 then tanky = 0
  if tankx > 600 then tankx = 600
  if tanky > 440 then tanky = 440
 sprite 1,tankx,tanky,image
 sprite 15,bulletx, bullety,15
 sync
loop

And here's the bitmap I'm using

Bert is evil, Barney is evil, and the Pillsbury Doughboy is evil. I knew it from the start.

Back to top

Profile PM

Pincho Paxton

21

Years of Service

User Offline

Joined: 8th Dec 2002

Location:

Posted: 28th Nov 2003 23:36

Link

That works already!

What do you need help with?

stretch sprite 1,150,150 works!

Change it to 500,500 and you will see the huge tank!

Pincho.

Back to top

Profile PM Email Website

sonec gaimr1

21

Years of Service

User Offline

Joined: 10th Feb 2003

Location: USA

Posted: 29th Nov 2003 01:42

Link

Well what I meant to say is that I'm try to get that sprite in the top left corner hidden.

Bert is evil, Barney is evil, and the Pillsbury Doughboy is evil. I knew it from the start.

Back to top

Profile PM

Pincho Paxton

21

Years of Service

User Offline

Joined: 8th Dec 2002

Location:

Posted: 29th Nov 2003 02:19

Link

You put a whole bunch of sprites up that corner in the beginning of your code.........Plus the bullet is there too!

sprite 2, 0, 0, 2
sprite 3, 0, 0, 3
sprite 4, 0, 0, 4
sprite 5, 0, 0, 5
sprite 6, 0, 0, 6
sprite 7, 0, 0, 7
sprite 8, 0, 0, 8

You could just hide them. You could put them offscreen.

Pincho.

Back to top

Profile PM Email Website

sonec gaimr1

21

Years of Service

User Offline

Joined: 10th Feb 2003

Location: USA

Posted: 1st Dec 2003 01:09

Link

Now, I've changed the code, and it still does it.

sync on
sync rate 40
Load bitmap "C:\unzipped\files\spritelib_gpl\spritelib_gpl\maze\tankbrigade.bmp",1
rem regular tank sprite
get image 1,662,301,690,325
rem tank frame 1
get image 2,728,103,756,127
rem tank frame 2
get image 3,728,136,756,160
rem tank frame 3
get image 4,728,169,756,193
rem tank frame 4
get image 5,728,202,756,226
rem tank frame 5
get image 6,728,235,756,259
rem tank frame 6
get image 7,728,268,756,292
rem tank frame 7
get image 8,728,301,756,325
rem bullet sprite
get image 15,210,47,217,51
cls
sprite 1, 0, 0, 1
sprite 2, 0, 0, 2
sprite 3, 0, 0, 3
sprite 4, 0, 0, 4
sprite 5, 0, 0, 5
sprite 6, 0, 0, 6
sprite 7, 0, 0, 7
sprite 8, 0, 0, 8
stretch sprite 1,150,150
stretch sprite 2,150,150
stretch sprite 3,150,150
stretch sprite 4,150,150
stretch sprite 5,150,150
stretch sprite 6,150,150
stretch sprite 7,150,150
stretch sprite 8,150,150
hide sprite 1
hide sprite 2
hide sprite 3
hide sprite 4
hide sprite 5
hide sprite 6
hide sprite 7
hide sprite 8
false = 0
bulletalive = 1
tankx = 320
tanky = 240
theplayerhasshotthegun = 0
width = 320
counter = 1
maxcounter = 10
image = 8
do
  inc counter
  rem Bullet code
  If rightkey() = 1 then width = width - 4
  If leftkey() = 1 then width = width + 4
  If spacekey() = 1 and theplayerhasshotthegun = 0
  theplayerhasshotthegun = 1
  bulletx = tankx + 13
  bullety = tanky + 11
  bulletalive = 1
  show sprite 15
  endif
  If theplayerhasshotthegun = 1 and bulletalive = 1
  bulletx = bulletx + 25
  If bulletx > tankx + width
   theplayerhasshotthegun = 0
   bulletalive = 0
   hide sprite 15
   endif
  endif
  rem Tank moving section
  If spacekey() = 0 and theplayerhasshotthegun = 0 and bulletalive = 0 then hide sprite 15
  If rightkey() = 1 Then tankx = tankx + 4
  If leftkey() = 1
  tankx = tankx - 4
  inc counter
  If counter > maxcounter
   counter = 1
   image = image + 1
   endif
  If image > 8 then image = 1
 endif
  If downkey() = 1 then tanky = tanky + 4
  If upkey() = 1 then tanky = tanky - 4
  if tankx < 0 then tankx = 0
  if tanky < 0 then tanky = 0
  if tankx > 600 then tankx = 600
  if tanky > 440 then tanky = 440
 show sprite image
 sprite 1,tankx,tanky,image
 sprite 15,bulletx, bullety,15
 sync
loop

+ Code Snippet

sync on
sync rate 40
Load bitmap "C:\unzipped\files\spritelib_gpl\spritelib_gpl\maze\tankbrigade.bmp",1
rem regular tank sprite
get image 1,662,301,690,325
rem tank frame 1
get image 2,728,103,756,127
rem tank frame 2
get image 3,728,136,756,160
rem tank frame 3
get image 4,728,169,756,193
rem tank frame 4
get image 5,728,202,756,226
rem tank frame 5
get image 6,728,235,756,259
rem tank frame 6
get image 7,728,268,756,292
rem tank frame 7
get image 8,728,301,756,325
rem bullet sprite
get image 15,210,47,217,51
cls
sprite 1, 0, 0, 1
sprite 2, 0, 0, 2
sprite 3, 0, 0, 3
sprite 4, 0, 0, 4
sprite 5, 0, 0, 5
sprite 6, 0, 0, 6
sprite 7, 0, 0, 7
sprite 8, 0, 0, 8
stretch sprite 1,150,150
stretch sprite 2,150,150
stretch sprite 3,150,150
stretch sprite 4,150,150
stretch sprite 5,150,150
stretch sprite 6,150,150
stretch sprite 7,150,150
stretch sprite 8,150,150
hide sprite 1
hide sprite 2
hide sprite 3
hide sprite 4
hide sprite 5
hide sprite 6
hide sprite 7
hide sprite 8
false = 0
bulletalive = 1
tankx = 320
tanky = 240
theplayerhasshotthegun = 0
width = 320
counter = 1
maxcounter = 10
image = 8
do
  inc counter
  rem Bullet code
  If rightkey() = 1 then width = width - 4
  If leftkey() = 1 then width = width + 4
  If spacekey() = 1 and theplayerhasshotthegun = 0
  theplayerhasshotthegun = 1
  bulletx = tankx + 13
  bullety = tanky + 11
  bulletalive = 1
  show sprite 15
  endif
  If theplayerhasshotthegun = 1 and bulletalive = 1
  bulletx = bulletx + 25
  If bulletx > tankx + width
   theplayerhasshotthegun = 0
   bulletalive = 0
   hide sprite 15
   endif
  endif
  rem Tank moving section
  If spacekey() = 0 and theplayerhasshotthegun = 0 and bulletalive = 0 then hide sprite 15
  If rightkey() = 1 Then tankx = tankx + 4
  If leftkey() = 1
  tankx = tankx - 4
  inc counter
  If counter > maxcounter
   counter = 1
   image = image + 1
   endif
  If image > 8 then image = 1
 endif
  If downkey() = 1 then tanky = tanky + 4
  If upkey() = 1 then tanky = tanky - 4
  if tankx < 0 then tankx = 0
  if tanky < 0 then tanky = 0
  if tankx > 600 then tankx = 600
  if tanky > 440 then tanky = 440
 show sprite image
 sprite 1,tankx,tanky,image
 sprite 15,bulletx, bullety,15
 sync
loop

Bert is evil, Barney is evil, and the Pillsbury Doughboy is evil. I knew it from the start.

Back to top

Profile PM

Pincho Paxton

21

Years of Service

User Offline

Joined: 8th Dec 2002

Location:

Posted: 1st Dec 2003 11:57 Edited at: 1st Dec 2003 12:01

Link

This line is showing them again!

Rem it out, and you will see.

show sprite image

Pincho.

Best to put them offscreen anyway, because I have heard that you can collide with hidden sprites.

Back to top

Profile PM Email Website

sonec gaimr1

21

Years of Service

User Offline

Joined: 10th Feb 2003

Location: USA

Posted: 1st Dec 2003 20:58 Edited at: 1st Dec 2003 21:01

Link

Ok, I'm sorry if I'm being a pain in the rear

, but what I'm trying to do is to cycle the sprite without those sprites in the top left corner showing. I could do all this without any help, but I want to stretch the sprite to a bigger size and I need to declare the sprite to stretch it.

Bert is evil, Barney is evil, and the Pillsbury Doughboy is evil. I knew it from the start.

Back to top

Profile PM

sonec gaimr1

21

Years of Service

User Offline

Joined: 10th Feb 2003

Location: USA

Posted: 1st Dec 2003 21:01

Link

Oh, and I tried what you said Pincho, and there wasn't a tank sprite at all besides the bullet sprite.

Bert is evil, Barney is evil, and the Pillsbury Doughboy is evil. I knew it from the start.

Back to top

Profile PM

Pincho Paxton

21

Years of Service

User Offline

Joined: 8th Dec 2002

Location:

Posted: 1st Dec 2003 23:21

Link

sync on
sync rate 40
Load bitmap "tankbrigade.bmp",1
rem regular tank sprite
get image 1,662,301,690,325
rem tank frame 1
get image 2,728,103,756,127
rem tank frame 2
get image 3,728,136,756,160
rem tank frame 3
get image 4,728,169,756,193
rem tank frame 4
get image 5,728,202,756,226
rem tank frame 5
get image 6,728,235,756,259
rem tank frame 6
get image 7,728,268,756,292
rem tank frame 7
get image 8,728,301,756,325
rem bullet sprite
get image 15,210,47,217,51
cls
sprite 1, 900, 0, 1
sprite 2, 900, 0, 2
sprite 3, 900, 0, 3
sprite 4, 900, 0, 4
sprite 5, 900, 0, 5
sprite 6, 900, 0, 6
sprite 7, 900, 0, 7
sprite 8, 900, 0, 8
stretch sprite 1,150,150
stretch sprite 2,150,150
stretch sprite 3,150,150
stretch sprite 4,150,150
stretch sprite 5,150,150
stretch sprite 6,150,150
stretch sprite 7,150,150
stretch sprite 8,150,150
bulletx = 900
bullety = 0
false = 0
bulletalive = 1
tankx = 320
tanky = 240
theplayerhasshotthegun = 0
width = 320
counter = 1
maxcounter = 10
image = 8
do
  inc counter
  rem Bullet code
  If rightkey() = 1 then width = width - 4
  If leftkey() = 1 then width = width + 4
  If spacekey() = 1 and theplayerhasshotthegun = 0
  theplayerhasshotthegun = 1
  bulletx = tankx + 13
  bullety = tanky + 11
  bulletalive = 1
  show sprite 15
  endif
  If theplayerhasshotthegun = 1 and bulletalive = 1
  bulletx = bulletx + 25
  If bulletx > tankx + width
   theplayerhasshotthegun = 0
   bulletalive = 0
   hide sprite 15
   endif
  endif
  rem Tank moving section
  If spacekey() = 0 and theplayerhasshotthegun = 0 and bulletalive = 0 then hide sprite 15
  If rightkey() = 1 Then tankx = tankx + 4
  If leftkey() = 1
  tankx = tankx - 4
  inc counter
  If counter > maxcounter
   counter = 1
   image = image + 1
   endif
  If image > 8 then image = 1
 endif
  If downkey() = 1 then tanky = tanky + 4
  If upkey() = 1 then tanky = tanky - 4
  if tankx < 0 then tankx = 0
  if tanky < 0 then tanky = 0
  if tankx > 600 then tankx = 600
  if tanky > 440 then tanky = 440
 show sprite image
 sprite 1,tankx,tanky,image
 sprite 15,bulletx, bullety,15
 sync
loop

+ Code Snippet

sync on
sync rate 40
Load bitmap "tankbrigade.bmp",1
rem regular tank sprite
get image 1,662,301,690,325
rem tank frame 1
get image 2,728,103,756,127
rem tank frame 2
get image 3,728,136,756,160
rem tank frame 3
get image 4,728,169,756,193
rem tank frame 4
get image 5,728,202,756,226
rem tank frame 5
get image 6,728,235,756,259
rem tank frame 6
get image 7,728,268,756,292
rem tank frame 7
get image 8,728,301,756,325
rem bullet sprite
get image 15,210,47,217,51
cls
sprite 1, 900, 0, 1
sprite 2, 900, 0, 2
sprite 3, 900, 0, 3
sprite 4, 900, 0, 4
sprite 5, 900, 0, 5
sprite 6, 900, 0, 6
sprite 7, 900, 0, 7
sprite 8, 900, 0, 8
stretch sprite 1,150,150
stretch sprite 2,150,150
stretch sprite 3,150,150
stretch sprite 4,150,150
stretch sprite 5,150,150
stretch sprite 6,150,150
stretch sprite 7,150,150
stretch sprite 8,150,150
bulletx = 900
bullety = 0
false = 0
bulletalive = 1
tankx = 320
tanky = 240
theplayerhasshotthegun = 0
width = 320
counter = 1
maxcounter = 10
image = 8
do
  inc counter
  rem Bullet code
  If rightkey() = 1 then width = width - 4
  If leftkey() = 1 then width = width + 4
  If spacekey() = 1 and theplayerhasshotthegun = 0
  theplayerhasshotthegun = 1
  bulletx = tankx + 13
  bullety = tanky + 11
  bulletalive = 1
  show sprite 15
  endif
  If theplayerhasshotthegun = 1 and bulletalive = 1
  bulletx = bulletx + 25
  If bulletx > tankx + width
   theplayerhasshotthegun = 0
   bulletalive = 0
   hide sprite 15
   endif
  endif
  rem Tank moving section
  If spacekey() = 0 and theplayerhasshotthegun = 0 and bulletalive = 0 then hide sprite 15
  If rightkey() = 1 Then tankx = tankx + 4
  If leftkey() = 1
  tankx = tankx - 4
  inc counter
  If counter > maxcounter
   counter = 1
   image = image + 1
   endif
  If image > 8 then image = 1
 endif
  If downkey() = 1 then tanky = tanky + 4
  If upkey() = 1 then tanky = tanky - 4
  if tankx < 0 then tankx = 0
  if tanky < 0 then tanky = 0
  if tankx > 600 then tankx = 600
  if tanky > 440 then tanky = 440
 show sprite image
 sprite 1,tankx,tanky,image
 sprite 15,bulletx, bullety,15
 sync
loop

This fixes it, but you should really understand that code. Otherwise you will get nowhere with this game.

Pincho.

Back to top

Profile PM Email Website

sonec gaimr1

21

Years of Service

User Offline

Joined: 10th Feb 2003

Location: USA

Posted: 2nd Dec 2003 05:35

Link

Your right Pincho, but as I said, I'm a newbie and just experimenting. Thanks for the help!

Bert is evil, Barney is evil, and the Pillsbury Doughboy is evil. I knew it from the start.

Back to top

Profile PM

Sorry your browser is not supported!

2D All the way! / Need help with stretching sprites