Scripts

[macm]

@Milandrag

[SELECT ALL] Code:

//type "/hitmsg = 0" to stop spam


bind MOUSE1 [
hits; attack; onrelease [sleep 100 [hits_]]
]

hitmsg = 1

alias hits [
if (= $hitmsg 0) [] [
if (= (curweapon) (currentprimary)) [
hit1 = (at (pstat_weap (findcn $curname)) (* (currentprimary) 2))
hit2 = (at (pstat_weap (findcn $curname)) (+ (* (currentprimary) 2) 1))
hitecho = 1
]]]

alias hits_ [
if (= $hitmsg 0) [] [
shotsf = (- (at (pstat_weap (findcn $curname)) (* (currentprimary) 2)) $hit1)
damagem = (- (at (pstat_weap (findcn $curname)) (+ (* (currentprimary) 2) 1)) $hit2)
if (&& (= $hitecho 1) (> $shotsf 0)) [
echo (concat "1shots fired:" $shotsf "0Damage made:" $damagem)
hitecho = 0
]]]