I need help with this shotgun

ID:143025
 
Jan 9 2008, 11:45 am
Code:
obj/shotgun
   icon = 'shotgun.dmi'
   verb
      Fire() //also a verb for Shoot
         shoot()
obj
   proc
      shoot()
         if(!src.fired) 
            src.fired = 1 
            spawn(15) 
               src.fired = 0 
            var/obj/H = new/obj/bullet 
            H.dir = src.dir 
            H.loc = src.loc 
            while(H) 
               var nextLocation = get_step(H,H.dir) 
               var/turf/T = nextLocation 
               for(var/mob/M as mob in T)
                  if(M == src)              
                  var/damage = rand(1,5) 
                  if(prob(70)
                     src<<"You shot [M] for [damage] damage!" 
                     M<<"[src] shot you for [damage] damage!" 
                     M.hp -= damage 
                     if(M.hp <= 0) 
                        M.Deathcheck(usr)
                  del(H)
               if(T.density == 1)
                  del(H)
               if(H) 
                  step(H,H.dir)
               sleep(1)
obj/var
   fired = 0


Problem description:
Whenever I use the Fire verb, the bullet just goes straight down... I can be facing up but the bullet still goes down..
Jan 9 2008, 11:51 am
That's because the shotgun is in your contents and does not share your direction. What you'll want to do is:

var/mob/M = loc
if(!istype(M)) return


Then, use M instead of src when you have to deal with directions and locations and whatnot.
Jan 9 2008, 12:02 pm
In response to Garthor
whenever i put this code in, an error comes up
where do i put it?
and thx for helping
Jan 9 2008, 12:05 pm
In response to Biggyneo88
At the start of the shoot() proc.
Jan 9 2008, 12:14 pm
In response to Garthor
The same error comes up...
"error: obj: expected end of statement"
wherever i put it, the line under it becomes an error
Jan 9 2008, 12:24 pm
In response to Biggyneo88
Then you've messed something up. Post what you have now.
Jan 9 2008, 12:29 pm
In response to Garthor
obj/shotgun
icon = 'shotgun.dmi'
verb
Fire() //also a verb for Shoot
shoot()

var/mob/M = loc
if(!istype(M))
return
obj
proc
shoot()
if(!src.fired)
src.fired = 1
spawn(15)
src.fired = 0
var/obj/H = new/obj/bullet
H.dir = src.dir
H.loc = src.loc
while(H)
var nextLocation = get_step(H,H.dir)
var/turf/T = nextLocation
for(var/mob/M as mob in T)
if(M == src)
var/damage = rand(1,5)
if(prob(70)
src<<"You shot [M] for [damage] damage!"
M<<"[src] shot you for [damage] damage!"
M.hp -= damage
if(M.hp <= 0)
M.Deathcheck(usr)
del(H)
if(T.density == 1)
del(H)
if(H)
step(H,H.dir)
sleep(1)
obj/var
fired = 0

and i also changed all the src to M
Jan 9 2008, 12:44 pm
In response to Biggyneo88
Once again, you put those two lines INSIDE the shoot() proc, at the start of it.
Jan 9 2008, 12:52 pm
In response to Garthor
thx.. i got it now, and it works