[Pedido] scrip pistola

amm nesesito mucho este scrip porfabor lo nesesito
amm y gracias
amm nesesito que al darle ctrl+clik a un moustro le dispares asi como el ot de cs porfa lo nesesito

Lol Admin y ni escribir saves-.-.
Skanet favor de correjir tu estructura de leta.!

Y explica mas el tema! :S

Ot/data/actions

Código:


function isWalkable(pos, creature, proj, pz)-- by Nord
        if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
        if getTopCreature(pos).uid > 0 and creature then return false end
        if getTileInfo(pos).protection and pz then return false, true end
        local n = not proj and 3 or 2
        for i = 0, 255 do
                pos.stackpos = i
                local tile = getTileThingByPos(pos)
                if tile.itemid ~= 0 and not isCreature(tile.uid) then
                        if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
                                return false
                        end
                end
        end
        return true
end
function doShootEffect(distancetotarget, effect, l, y) -- l = localpos(lookdirpos), y = dirvalue
    for i = 0, distancetotarget-1 do
        if isInArray({0,3}, y) then
            local _J = y == 0 and {x = l.x, y = l.y-i, z = l.z} or y == 3 and {x = l.x-i, y = l.y, z = l.z}
            doSendMagicEffect(_J, effect)
        else
            _J = y == 1 and {x = l.x+i, y = l.y, z = l.z} or y == 2 and {x = l.x, y = l.y+i, z = l.z}
            doSendMagicEffect(_J, effect)                             
        end
    end
    return true
end
local items = {
[2534] = {
    balaid = 2545,
    level = 1,  ---Level To Use
    skillup = 5, ---Skill UP [5] SHIELDING
    mindamage = -1,  --- MINDAMAGE
    maxdamage = -5255,  ---- MAX DAMAGE
    damagetype = COMBAT_HOLYDAMAGE,  ---COMBATDAMAGE
}
}
local _MIT = {}
local shootmode = "shooteffect mode" -- "effect mode" or "shooteffect mode"
function onUse(cid, item, fromPosition, itemEx, toPosition)
    local function getFirstThingInArea(pos)
            for areax = pos.x, pos.x do
                for areay = pos.y, pos.y do
                    local area = {x = areax, y = areay, z = pos.z}
                    if isCreature(getTopCreature(area).uid) or not isWalkable(area) then
                        table.insert(_MIT, getThingFromPos(area).uid)
                        for s = 1, #_MIT-1 do
                            table.remove(_MIT, s+1)
                        end
                    end
                end
            end
        return true
    end
    local l = getPlayerLookPos(cid)
    local y = getCreatureLookDirection(cid)
    local g = items[item.itemid]
    if g then
        if getPlayerLevel(cid) < g.level then
            return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need level ".. g.level .." or higher.")
        end
        if getTilePzInfo(getCreaturePosition(cid)) then
            return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You cannot use a gun in a protection zone.")
        end
        if item.uid ~= getPlayerSlotItem(cid, 5).uid then
            return doPlayerSendCancel(cid, "Equip your gun on gun slot.")
        end
        if getPlayerSlotItem(cid, 10).itemid == g.balaid then
            doRemoveItem(getPlayerSlotItem(cid, 10).uid, 1)
            doPlayerAddSkillTry(cid, g.skillup, 1)
            for T = 0, 20 do
                local _g = y == 0 and {x = l.x, y = l.y-T, z = l.z} or y == 3 and {x = l.x-T, y = l.y, z = l.z} or y == 1 and {x = l.x+T, y = l.y, z = l.z} or y == 2 and {x = l.x, y = l.y+T, z = l.z}
                getFirstThingInArea(_g)
            end
            if #_MIT >= 1 then
                local mpos = getThingPos(_MIT[1])
                local ppos = getDistanceBetween(mpos, l)
                local ft = y == 0 and {x = l.x, y = l.y-ppos, z = l.z} or y == 1 and {x = l.x+ppos, y = l.y, z = l.z} or y == 2 and {x = l.x, y = l.y+ppos, z = l.z}  or y == 3 and {x = l.x-ppos, y = l.y, z = l.z}
                if isCreature(getTopCreature(mpos).uid) then
                    doAreaCombatHealth(0, g.damagetype, ft, 0, g.mindamage, g.maxdamage, 0)
                else
                    doSendMagicEffect(ft, 3)
                end
                if shootmode == "shooteffect mode" then
                    doShootEffect(ppos, 12, l, y)
                elseif shootmode == "effect mode" then
                    doSendDistanceShoot(l, mpos, 40)
                end
                table.remove(_MIT, 1)
            end
        else
            doPlayerSendCancel(cid, "You do not have munition.")
        end
    end
    return true
end

actions.xml

Código:

<action itemid="2534" event="script" value="disparo.lua"/>

grax te amo O.o

edit :
oyes men no me jalo caminas y tira solo no yo quiero que le des ctrl+clik a un moustro y le dispares porfabor lo nesesito asi como el ot de cs que le das ctr + clik a un player y lo atakas

u