How to make sprite shoot in facing direction

Author

Message

sskethan

15

Years of Service

User Offline

Joined: 20th Sep 2008

Location: Oshawa, ON. Canada

Posted: 5th Nov 2011 17:44 Edited at: 6th Nov 2011 15:58

Link

Hello all,
I've been trying a number of different ways to get the character to shoot in the direction it's facing while walking. I don't know how to go about it, im stuck. Here is the code that i have so far along with the image. Any help would be great.

set display mode 1024,768,32
color backdrop rgb(0,0,0)
sync rate 0
sync on
sync rate 50

load image "media\player\skeleton_walk_001.png",1,1
create animated sprite 1, "media\player\skeleton_walk_001.png",24,3,1
sprite 1,0,0,1
offset sprite 1, sprite width(1) / 2, sprite height(1) / 2
sprite 1, screen width() / 2, screen height() / 2, 1

Rem Set the character sprite to always draw to the front
Set sprite priority 1,1

`********************************************************************************

do

Text 0,20,"FPS: "+STR$(Screen FPS())
handlemovement()

sync
LOOP

`*********************************************************************************

function handlemovement()
    
play sprite 1,25,48,100

if keystate(57)=1
        play sprite 1,49,72,60
        endif
        
    if keystate(30)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)-2
        endif
        
    if keystate(32)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)+2
        endif

if keystate(17)=1 
        play sprite 1,1,24,40
        move sprite 1,2
        endif
        
    if keystate(17) and keystate(42)=1 
        play sprite 1,1,24,80
        move sprite 1,2
        endif     
    
    if keystate(31)=1
        play sprite 1,1,24,40
        move sprite 1,-2
        endif
          
ENDFUNCTION

+ Code Snippet

set display mode 1024,768,32
color backdrop rgb(0,0,0)
sync rate 0
sync on
sync rate 50


load image "media\player\skeleton_walk_001.png",1,1
create animated sprite 1, "media\player\skeleton_walk_001.png",24,3,1
sprite 1,0,0,1
offset sprite 1, sprite width(1) / 2, sprite height(1) / 2
sprite 1, screen width() / 2, screen height() / 2, 1

Rem Set the character sprite to always draw to the front
Set sprite priority 1,1

`********************************************************************************

do

Text 0,20,"FPS: "+STR$(Screen FPS())
handlemovement()

    sync
LOOP

`*********************************************************************************

function handlemovement()
    
play sprite 1,25,48,100

    if keystate(57)=1
        play sprite 1,49,72,60
        endif
        
    if keystate(30)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)-2
        endif
        
    if keystate(32)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)+2
        endif

    if keystate(17)=1 
        play sprite 1,1,24,40
        move sprite 1,2
        endif
        
    if keystate(17) and keystate(42)=1 
        play sprite 1,1,24,80
        move sprite 1,2
        endif     
    
    if keystate(31)=1
        play sprite 1,1,24,40
        move sprite 1,-2
        endif
          
ENDFUNCTION

Ok.. I figured out the shooting but now the sprite takes one shot across the screen on startup. how do i stop this? here is what i have now. i'm working on making a gauntlet style game.

set display mode 1024,768,32
color backdrop rgb(0,0,0)
sync rate 0
sync on
sync rate 50

load image "media\player\skeleton_walk_001.png",1,1
load image "media\player\arrow_001.png",2,1

create animated sprite 1, "media\player\skeleton_walk_001.png",24,3,1
load image "media\player\arrow_001.png",2

sprite 1,0,0,1
sprite 2,0,0,2

offset sprite 1, sprite width(1) / 2, sprite height(1) / 2
offset sprite 2, sprite width(2) / 2, sprite height(2) / 2

sprite 1, screen width() / 2, screen height() / 2, 1
sprite 2, screen width() / 2, screen height() / 2, 2

Rem Set the character sprite to always draw to the front
Set sprite priority 1,1

`********************************************************************************

do

Text 0,20,"FPS: "+STR$(Screen FPS())
handlemovement()

sync
LOOP

`*********************************************************************************

function handlemovement()
    
play sprite 1,25,48,100

if keystate(57)=1
        play sprite 1,49,72,60
    endif
        
    if keystate(30)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)-2
    endif
        
    if keystate(32)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)+2
    endif

if keystate(17)=1 
        play sprite 1,1,24,40
        move sprite 1,2
    endif
        
    if keystate(17) and keystate(42)=1 
        play sprite 1,1,24,80
        move sprite 1,2
    endif     
    
    if keystate(31)=1
        play sprite 1,1,24,40
        move sprite 1,-2
    endif
        
    if keystate(57)=1
        sprite 2,sprite x(1),sprite y(1),2
        scale sprite 2,50
        rotate sprite 2,sprite angle(1)
    endif
        if sprite exist(2)
        move sprite 2,10
    endif
          
ENDFUNCTION

+ Code Snippet

set display mode 1024,768,32
color backdrop rgb(0,0,0)
sync rate 0
sync on
sync rate 50


load image "media\player\skeleton_walk_001.png",1,1
load image "media\player\arrow_001.png",2,1

create animated sprite 1, "media\player\skeleton_walk_001.png",24,3,1
load image "media\player\arrow_001.png",2

sprite 1,0,0,1
sprite 2,0,0,2

offset sprite 1, sprite width(1) / 2, sprite height(1) / 2
offset sprite 2, sprite width(2) / 2, sprite height(2) / 2

sprite 1, screen width() / 2, screen height() / 2, 1
sprite 2, screen width() / 2, screen height() / 2, 2

Rem Set the character sprite to always draw to the front
Set sprite priority 1,1

`********************************************************************************

do

Text 0,20,"FPS: "+STR$(Screen FPS())
handlemovement()

    sync
LOOP

`*********************************************************************************

function handlemovement()
    
play sprite 1,25,48,100

    if keystate(57)=1
        play sprite 1,49,72,60
    endif
        
    if keystate(30)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)-2
    endif
        
    if keystate(32)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)+2
    endif

    if keystate(17)=1 
        play sprite 1,1,24,40
        move sprite 1,2
    endif
        
    if keystate(17) and keystate(42)=1 
        play sprite 1,1,24,80
        move sprite 1,2
    endif     
    
    if keystate(31)=1
        play sprite 1,1,24,40
        move sprite 1,-2
    endif
        
    if keystate(57)=1
        sprite 2,sprite x(1),sprite y(1),2
        scale sprite 2,50
        rotate sprite 2,sprite angle(1)
    endif
        if sprite exist(2)
        move sprite 2,10
    endif
          
ENDFUNCTION

Attachments

Login to view attachments

Back to top

Profile PM Email

Grog Grueslayer

Valued Member

18

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 6th Nov 2011 17:06 Edited at: 6th Nov 2011 17:12

Link

It's because the last IF/THEN check. The sprite exists already so the first thing it does is move. To solve it you make it move based on a switch (like a light switch 0=Off 1=On). When the switch is off it doesn't move (player didn't shoot) and when it's on it does move (player shot). I made the Shoot switch as a GLOBAL to retain it's value inside/outside of functions.

With CREATE ANIMATED SPRITE there's no need to load the image first because it automatically loads it before it figures out the frames. Also I moved the PLAY SPRITE command from the first IF/THEN check to the second to last one. It's best to keep the same key checks in one check rather than many. And don't be afraid to add as many remarks as you can so if you stop this project and go back to it a month or even years later you can glance at it and instantly know what's going on.

Your code is looking good.

set display mode 1024,768,32
color backdrop rgb(0,0,0)
sync rate 0
sync on
sync rate 50

global Shoot=0    ` Player shoot switch

create animated sprite 1, "skeleton_walk_001.png",24,3,1
load image "media\player\arrow_001.png",2,1

sprite 1, screen width() / 2, screen height() / 2, 1
sprite 2, screen width() / 2, screen height() / 2, 2

offset sprite 1, sprite width(1) / 2, sprite height(1) / 2
offset sprite 2, sprite width(2) / 2, sprite height(2) / 2

Rem Set the character sprite to always draw to the front
Set sprite priority 1,1

`********************************************************************************

do

Text 0,20,"FPS: "+STR$(Screen FPS())
text 0,0,"Shoot: "+str$(Shoot)
handlemovement()

sync
LOOP

`*********************************************************************************

function handlemovement()
    
    play sprite 1,25,48,100

` Rotate Left (A)    
    if keystate(30)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)-2
    endif
    
    ` Rotate Right (D)    
    if keystate(32)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)+2
    endif

` Foward (W)
    if keystate(17)=1 
        play sprite 1,1,24,40
        move sprite 1,2
    endif
        
    ` Fast Forward (W and Left Shift)
    if keystate(17) and keystate(42)=1 
        play sprite 1,1,24,80
        move sprite 1,2
    endif     
    
    ` Backwards (S)
    if keystate(31)=1
        play sprite 1,1,24,40
        move sprite 1,-2
    endif
        
    ` Shoot (Spacebar)
    if keystate(57)=1
      play sprite 1,49,72,60
      sprite 2,sprite x(1),sprite y(1),2
      scale sprite 2,50
      rotate sprite 2,sprite angle(1)
      ` Turn on the Shoot switch
      Shoot=1
    endif
    
    ` Check if the player shot his weapon
    if Shoot=1
      move sprite 2,10
    	` Check if the bullet is off the screen
    	if sprite x(2)<-10 or sprite x(2)>screen width() or sprite y(2)<-10 or sprite y(2)>screen height()
    	 ` Turn off the Shoot switch
    	 Shoot=0
    	endif
    endif
          
ENDFUNCTION

+ Code Snippet

set display mode 1024,768,32
color backdrop rgb(0,0,0)
sync rate 0
sync on
sync rate 50

global Shoot=0    ` Player shoot switch

create animated sprite 1, "skeleton_walk_001.png",24,3,1
load image "media\player\arrow_001.png",2,1

sprite 1, screen width() / 2, screen height() / 2, 1
sprite 2, screen width() / 2, screen height() / 2, 2

offset sprite 1, sprite width(1) / 2, sprite height(1) / 2
offset sprite 2, sprite width(2) / 2, sprite height(2) / 2

Rem Set the character sprite to always draw to the front
Set sprite priority 1,1

`********************************************************************************

do

Text 0,20,"FPS: "+STR$(Screen FPS())
text 0,0,"Shoot: "+str$(Shoot)
handlemovement()

    sync
LOOP

`*********************************************************************************

function handlemovement()
    
    play sprite 1,25,48,100

    ` Rotate Left (A)    
    if keystate(30)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)-2
    endif
    
    ` Rotate Right (D)    
    if keystate(32)=1
        play sprite 1,1,24,100
        rotate sprite 1, sprite angle(1)+2
    endif

    ` Foward (W)
    if keystate(17)=1 
        play sprite 1,1,24,40
        move sprite 1,2
    endif
        
    ` Fast Forward (W and Left Shift)
    if keystate(17) and keystate(42)=1 
        play sprite 1,1,24,80
        move sprite 1,2
    endif     
    
    ` Backwards (S)
    if keystate(31)=1
        play sprite 1,1,24,40
        move sprite 1,-2
    endif
        
    ` Shoot (Spacebar)
    if keystate(57)=1
      play sprite 1,49,72,60
      sprite 2,sprite x(1),sprite y(1),2
      scale sprite 2,50
      rotate sprite 2,sprite angle(1)
      ` Turn on the Shoot switch
      Shoot=1
    endif
    
    ` Check if the player shot his weapon
    if Shoot=1
      move sprite 2,10
    	` Check if the bullet is off the screen
    	if sprite x(2)<-10 or sprite x(2)>screen width() or sprite y(2)<-10 or sprite y(2)>screen height()
    	 ` Turn off the Shoot switch
    	 Shoot=0
    	endif
    endif
          
ENDFUNCTION

Back to top

Profile PM Email

sskethan

15

Years of Service

User Offline

Joined: 20th Sep 2008

Location: Oshawa, ON. Canada

Posted: 7th Nov 2011 00:32

Link

Thank you for the great advice and your help. I'll post up my progress as i go.

Back to top

Profile PM Email

Sorry your browser is not supported!

2D All the way! / How to make sprite shoot in facing direction

Attachments