ممكن حل لى شوب الاسلحة

[darbka2002]

سلام عليكم انا تعبت والله

احاول اخلى الشوب يفتح فى

Interior 4

المود بصنع مارك فى Interior 4

لكن ما يفتح لوحة الشوب ممكن مساعدة

server

addEvent("Weapons",true) 
addEventHandler("Weapons",root, 
    function (GetItem ,ammo ,price) 
        pm = getPlayerMoney(source) 
            if ( pm >= tonumber(price) ) then 
                giveWeapon ( source, tonumber(GetItem), tonumber(ammo)) 
                    takePlayerMoney(source , tonumber(price)) 
                        Name = getWeaponNameFromID(tonumber(GetItem)) 
                    outputChatBox("#a00000*#ffffff[#a00000You#ffffff] ##2E2E2EHave New Weapon#ffffff : [#ff0000"..Name.."#ffffff]" ,source, 0, 255, 0 ,true) 
                else 
        outputChatBox("#a00000*#ffffff[#a00000You#ffffff] ##2E2E2EDon't Have Enough#ffffff Money" ,source, 0, 255, 0 ,true) 
    end 
end) 
  
  
addEventHandler ( "onClientMarkerHit", root, 
function (hitElement) 
if source == source 
if hitElement == localPlayer then 
guiSetVisible(win, true) 
showCursor(true) 
  end 
 end 
end) 
addEventHandler ( "onClientMarkerLeave", root, 
function (hitElement) 
if source == source 
if hitElement == localPlayer then 
guiSetVisible(win, false) 
showCursor(false) 
  end 
 end 
end 
  
  
  
addEvent("SendWe",true) 
addEventHandler("SendWe",root, 
    function (GetItem1 ,ammo1 ,price1 ,Player) 
        play = getPlayerFromName(Player) 
            money = getPlayerMoney(source) 
                if money >= tonumber(price1) then 
                    giveWeapon ( play, tonumber(GetItem1), tonumber(ammo1)) 
                            takePlayerMoney(source , tonumber(price1)) 
                        Name1 = getWeaponNameFromID(tonumber(GetItem1)) 
                    outputChatBox("#a00000*#ffffff[#a00000You#ffffff] ##2E2E2ESend This Weapon#ffffff : [#ff0000"..Name1.."#ffffff]" ,source, 0, 255, 0 ,true) 
                outputChatBox("#a00000*#ffffff[#a00000You#ffffff] ##2E2E2EReceived new weapon #ffffff : [#ff0000"..Name1.."#ffffff]" ,play, 0, 255, 0 ,true) 
            else 
        outputChatBox("#a00000*#ffffff[#a00000You#ffffff] ##2E2E2EDon't Have Enough#ffffff Money" ,source, 0, 255, 0 ,true) 
    end 
end) 
  

client

Weapons = { 
-- {"WeaponName" ,"WeaponID","WeaponAmmo" ,"WeaponPrice"}, 
{"Brass Knuckles" ,"1","1" ,"500"}, 
{"Golf Club" ,"2","1" ,"500"}, 
{"Nightstick" ,"3" , "1" ,"5000"}, 
{"Knife" ,"4" , "1" ,"4000"}, 
{"Baseball Bat" ,"5","1" ,"600"} , 
{"Shovel" ,"6","1" ,"400"}, 
{"Pool Cue" ,"7","1" ,"300"}, 
{"Katana" ,"8","1" ,"4500"}, 
{"Chainsaw" ,"9","1000" ,"15000"}, 
{"Long Purple Dildo" ,"10","1" ,"500"}, 
{"Short tan Dildo" ,"11","1" ,"100"}, 
{"Vibrator" ,"12","1" ,"200"}, 
{"Flowers" ,"14","1" ,"300"}, 
{"Cane" ,"15","1" ,"500"}, 
{"Grenade" ,"16" , "20" ,"10000"}, 
{"Tear Gas" ,"17" , "10" ,"5000"}, 
{"Molotov Cocktails" ,"18","10" ,"6000"} , 
{"Pistol" ,"22","2000" ,"1000"}, 
{"Silenced Pistol" ,"23","2000" ,"1000"}, 
{"Desert Eagle" ,"24","2000" ,"1000"}, 
{"Shotgun" ,"25","1500" ,"2000"}, 
{"Sawn-Off Shotgun" ,"26","1500" ,"5000"}, 
{"SPAZ-12 Combat Shotgun" ,"27","1500" ,"2000"}, 
{"Uzi" ,"28" , "4000" ,"5000"}, 
{"MP5" ,"29" , "4000" ,"5000"}, 
{"AK-47" ,"30","4000" ,"6000"} , 
{"M4" ,"31","4000" ,"7000"}, 
{"TEC-9" ,"32","4000" ,"4500"}, 
{"Country Rifle" ,"33","800" ,"8000"}, 
{"Sniper Rifle" ,"34","800" ,"10000"}, 
{"Rocket Launcher" ,"35","10" ,"50000"}, 
{"Heat-Seeking RPG" ,"36","10" ,"100000"}, 
{"Flamethrower" ,"37","500" ,"40000"}, 
{"Minigun" ,"38","500" ,"100000"}, 
{"Satchel Charges" ,"39" , "20" ,"30000"}, 
{"Spraycan" ,"41","1" ,"50"}, 
{"Fire Extinguisher " ,"42","500" ,"3000"}, 
{"Camera" ,"43","1" ,"80"}, 
{"Night-Vision Goggles" ,"44","1" ,"90"}, 
{"Infrared Goggles" ,"45","1" ,"50"}, 
{"Parachute" ,"46","1" ,"50"} 
} 
source = createMarker(298.04071,-80.79839,1001.51563,"cylinder",1.5,0,255,0,170) 
setElementInterior ( source, interior, 2233.91, 1714.73, 1011.38 ) 
setElementInterior ( source, 4 ) 
  
GUIEditor = { 
    gridlist = {}, 
    staticimage = {} 
} 
addEventHandler("onClientResourceStart", resourceRoot, 
    function () 
local screenW, screenH = guiGetScreenSize() 
        win = guiCreateStaticImage((screenW - 554) / 2, (screenH - 477) / 2, 554, 477, "s/panel.png", false) 
         
        guiSetVisible(win,false) 
        local screenW2, screenH2 = guiGetScreenSize() 
        PlayerList = guiCreateStaticImage((screenW2 - 342) / 2, (screenH2 - 415) / 2, 342, 415, "s/PlayerList.png", false) 
        guiSetVisible(PlayerList,false) 
        GridPlayer = guiCreateGridList(23, 59, 188, 346, false, PlayerList) 
        c = guiGridListAddColumn(GridPlayer, "Player", 0.9) 
        SendWe = guiCreateStaticImage(215, 59, 101, 32, "s/SendWe.png", false, PlayerList) 
        Close = guiCreateStaticImage(215, 117, 101, 32, "s/Close.png", false, PlayerList) 
        GUIEditor.staticimage[1] = guiCreateStaticImage(216, 315, 104, 90, "s/logo.png", false, PlayerList)  
                for _,player in ipairs ( getElementsByType("player") ) do  
                local row = guiGridListAddRow(GridPlayer)  
                guiGridListSetItemText(GridPlayer,row,1,getPlayerName(player),false,false) 
                end 
        Grid = guiCreateGridList(16, 71, 277, 400, false, win) 
        guiGridListAddColumn(Grid, "name", 0.2) 
        guiGridListAddColumn(Grid, "id", 0.2) 
        guiGridListAddColumn(Grid, "ammo", 0.2) 
        guiGridListAddColumn(Grid, "price", 0.2) 
        for k,v in ipairs(Weapons) do 
        local row = guiGridListAddRow(Grid) 
        guiGridListSetItemText(Grid,row,1, v[1],false,false) 
        guiGridListSetItemText(Grid,row,2, v[2],false,false) 
        guiGridListSetItemText(Grid,row,3, v[3],false,false) 
        guiGridListSetItemText(Grid,row,4, v[4],false,false) 
        guiGridListSetItemText(Grid,row,5, v[5],false,false) 
        guiGridListSetItemText(Grid,row,6, v[6],false,false) 
        guiGridListSetItemText(Grid,row,7, v[7],false,false) 
        guiGridListSetItemText(Grid,row,8, v[8],false,false) 
        guiGridListSetItemText(Grid,row,9, v[9],false,false) 
        guiGridListSetItemText(Grid,row,10, v[10],false,false) 
        guiGridListSetItemText(Grid,row,11, v[11],false,false) 
        guiGridListSetItemText(Grid,row,12, v[12],false,false) 
        guiGridListSetItemText(Grid,row,13, v[13],false,false) 
        Buy = guiCreateStaticImage(320, 95, 200, 60, "s/Buy.png", false, win) 
        Send = guiCreateStaticImage(320, 224, 200, 60, "s/Send.png", false, win) 
        GUIEditor.staticimage[4] = guiCreateStaticImage(352, 339, 170, 132, "s/logo.png", false, win)     
    end 
end) 
  
  
  
localPlayer = getLocalPlayer() 
  
addEventHandler("onClientGUIClick", root , 
function() 
    if source == Buy then 
        GetItem = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 2 ) 
            ammo = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 3 ) 
                price = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 4 ) 
                    triggerServerEvent("Weapons", localPlayer , GetItem ,ammo ,price) 
    elseif source == SendWe then 
        GetItem1 = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 2 ) 
            ammo1 = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 3 ) 
                price1 = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 4 ) 
                    Player = guiGridListGetItemText ( GridPlayer, guiGridListGetSelectedItem ( GridPlayer ), 1 ) 
                        triggerServerEvent("SendWe", localPlayer , GetItem1 ,ammo1 ,price1 ,Player) 
    elseif source == Send then 
        guiSetVisible(PlayerList, true) 
            guiBringToFront(PlayerList) 
                updateList_DABL() 
    elseif source == Close then 
        guiSetVisible(PlayerList ,false) 
            showCursor(false) 
    end 
end) 
  
  
function updateList_DABL() 
    guiGridListClear(GridPlayer) 
        for _,player in ipairs ( getElementsByType("player") ) do  
            local row = guiGridListAddRow(GridPlayer)  
                guiGridListSetItemText(GridPlayer,row,1,getPlayerName(player),false,false) 
    end 
end 
  
function updateList_TAPL(old, new) 
    if eventName == "onClientPlayerJoin"  then 
        local row = guiGridListAddRow(GridPlayer) 
            guiGridListSetItemText(GridPlayer, row, c, getPlayerName(source), false, false) 
    elseif eventName == "onClientPlayerQuit"  then 
        for i=0, guiGridListGetRowCount(GridPlayer) -1 do 
            if guiGridListGetItemText(GridPlayer, i, c) == getPlayerName(source) then 
                guiGridListRemoveRow(GridPlayer, i) 
            end 
        end 
    elseif eventName == "onClientPlayerChangeNick"  then 
        for i=0, guiGridListGetRowCount(GridPlayer) -1 do 
            if guiGridListGetItemText(GridPlayer, i, c) == old then 
                guiGridListSetItemText(GridPlayer, i, c, new, false, false) 
            end 
        end 
    end 
end 
addEventHandler("onClientPlayerJoin", root, updateList) 
addEventHandler("onClientPlayerQuit", root, updateList) 
addEventHandler("onClientPlayerChangeNick", root, updateList) 

[Jupi]

getElementInterior 

استعمله عند ضرب الماركر و تحقق ان الاعب فيه

+ ليه مسمي متغير الماركر source

>.<

[darbka2002]

اخى انا خليت السكربت هيك

source = createMarker(298.04071,-80.79839,1001.51563,"cylinder",1.5,0,255,0,170) 
setElementInterior ( source, interior, 2233.91, 1714.73, 1011.38 ) 
setElementInterior ( source, 4 ) 
addEventHandler ( "onClientMarkerHit", root, 
function (getElementInterior) 
if source == source 
if getElementInterior == localPlayer then 
guiSetVisible(win, true) 
showCursor(true) 
  end 
 end 
end) 
addEventHandler ( "onClientMarkerLeave", root, 
function (getElementInterior) 
if source == source 
if getElementInterior == localPlayer then 
guiSetVisible(win, false) 
showCursor(false) 
  end 
 end 

و باردو ماظبتش ممكن حل

[#Mr.Rajo~,<]

انت جالست تحط افنت فنكشن و كلاينت في سيرفر كيف ؟

--Client side

Weapons = { 
-- {"WeaponName" ,"WeaponID","WeaponAmmo" ,"WeaponPrice"}, 
{"Brass Knuckles" ,"1","1" ,"500"}, 
{"Golf Club" ,"2","1" ,"500"}, 
{"Nightstick" ,"3" , "1" ,"5000"}, 
{"Knife" ,"4" , "1" ,"4000"}, 
{"Baseball Bat" ,"5","1" ,"600"} , 
{"Shovel" ,"6","1" ,"400"}, 
{"Pool Cue" ,"7","1" ,"300"}, 
{"Katana" ,"8","1" ,"4500"}, 
{"Chainsaw" ,"9","1000" ,"15000"}, 
{"Long Purple Dildo" ,"10","1" ,"500"}, 
{"Short tan Dildo" ,"11","1" ,"100"}, 
{"Vibrator" ,"12","1" ,"200"}, 
{"Flowers" ,"14","1" ,"300"}, 
{"Cane" ,"15","1" ,"500"}, 
{"Grenade" ,"16" , "20" ,"10000"}, 
{"Tear Gas" ,"17" , "10" ,"5000"}, 
{"Molotov Cocktails" ,"18","10" ,"6000"} , 
{"Pistol" ,"22","2000" ,"1000"}, 
{"Silenced Pistol" ,"23","2000" ,"1000"}, 
{"Desert Eagle" ,"24","2000" ,"1000"}, 
{"Shotgun" ,"25","1500" ,"2000"}, 
{"Sawn-Off Shotgun" ,"26","1500" ,"5000"}, 
{"SPAZ-12 Combat Shotgun" ,"27","1500" ,"2000"}, 
{"Uzi" ,"28" , "4000" ,"5000"}, 
{"MP5" ,"29" , "4000" ,"5000"}, 
{"AK-47" ,"30","4000" ,"6000"} , 
{"M4" ,"31","4000" ,"7000"}, 
{"TEC-9" ,"32","4000" ,"4500"}, 
{"Country Rifle" ,"33","800" ,"8000"}, 
{"Sniper Rifle" ,"34","800" ,"10000"}, 
{"Rocket Launcher" ,"35","10" ,"50000"}, 
{"Heat-Seeking RPG" ,"36","10" ,"100000"}, 
{"Flamethrower" ,"37","500" ,"40000"}, 
{"Minigun" ,"38","500" ,"100000"}, 
{"Satchel Charges" ,"39" , "20" ,"30000"}, 
{"Spraycan" ,"41","1" ,"50"}, 
{"Fire Extinguisher " ,"42","500" ,"3000"}, 
{"Camera" ,"43","1" ,"80"}, 
{"Night-Vision Goggles" ,"44","1" ,"90"}, 
{"Infrared Goggles" ,"45","1" ,"50"}, 
{"Parachute" ,"46","1" ,"50"} 
} 
Marker = createMarker(298.04071,-80.79839,1001.51563,"cylinder",1.5,0,255,0,170) 
setElementInterior ( Marker, interior, 2233.91, 1714.73, 1011.38 ) 
setElementInterior ( Marker, 4 ) 
  
GUIEditor = { 
    gridlist = {}, 
    staticimage = {} 
} 
addEventHandler("onClientResourceStart", resourceRoot, 
    function () 
local screenW, screenH = guiGetScreenSize() 
        win = guiCreateStaticImage((screenW - 554) / 2, (screenH - 477) / 2, 554, 477, "s/panel.png", false) 
        
        guiSetVisible(win,false) 
        local screenW2, screenH2 = guiGetScreenSize() 
        PlayerList = guiCreateStaticImage((screenW2 - 342) / 2, (screenH2 - 415) / 2, 342, 415, "s/PlayerList.png", false) 
        guiSetVisible(PlayerList,false) 
        GridPlayer = guiCreateGridList(23, 59, 188, 346, false, PlayerList) 
        c = guiGridListAddColumn(GridPlayer, "Player", 0.9) 
        SendWe = guiCreateStaticImage(215, 59, 101, 32, "s/SendWe.png", false, PlayerList) 
        Close = guiCreateStaticImage(215, 117, 101, 32, "s/Close.png", false, PlayerList) 
        GUIEditor.staticimage[1] = guiCreateStaticImage(216, 315, 104, 90, "s/logo.png", false, PlayerList) 
                for _,player in ipairs ( getElementsByType("player") ) do 
                local row = guiGridListAddRow(GridPlayer) 
                guiGridListSetItemText(GridPlayer,row,1,getPlayerName(player),false,false) 
                end 
        Grid = guiCreateGridList(16, 71, 277, 400, false, win) 
        guiGridListAddColumn(Grid, "name", 0.2) 
        guiGridListAddColumn(Grid, "id", 0.2) 
        guiGridListAddColumn(Grid, "ammo", 0.2) 
        guiGridListAddColumn(Grid, "price", 0.2) 
        for k,v in ipairs(Weapons) do 
        local row = guiGridListAddRow(Grid) 
        guiGridListSetItemText(Grid,row,1, v[1],false,false) 
        guiGridListSetItemText(Grid,row,2, v[2],false,false) 
        guiGridListSetItemText(Grid,row,3, v[3],false,false) 
        guiGridListSetItemText(Grid,row,4, v[4],false,false) 
        guiGridListSetItemText(Grid,row,5, v[5],false,false) 
        guiGridListSetItemText(Grid,row,6, v[6],false,false) 
        guiGridListSetItemText(Grid,row,7, v[7],false,false) 
        guiGridListSetItemText(Grid,row,8, v[8],false,false) 
        guiGridListSetItemText(Grid,row,9, v[9],false,false) 
        guiGridListSetItemText(Grid,row,10, v[10],false,false) 
        guiGridListSetItemText(Grid,row,11, v[11],false,false) 
        guiGridListSetItemText(Grid,row,12, v[12],false,false) 
        guiGridListSetItemText(Grid,row,13, v[13],false,false) 
        Buy = guiCreateStaticImage(320, 95, 200, 60, "s/Buy.png", false, win) 
        Send = guiCreateStaticImage(320, 224, 200, 60, "s/Send.png", false, win) 
        GUIEditor.staticimage[4] = guiCreateStaticImage(352, 339, 170, 132, "s/logo.png", false, win)     
    end 
end) 
  
  
addEventHandler ( "onClientMarkerHit", root, 
    function (hitElement) 
        if source == Marker then 
            if getElementInterior(hitElement) == 4 then 
                if hitElement == localPlayer then 
                    guiSetVisible(win, true) 
                    showCursor(true) 
                end 
            end 
        end 
    end 
) 
addEventHandler ( "onClientMarkerLeave", root, 
function (hitElement) 
if source == Marker then 
if hitElement == localPlayer then 
guiSetVisible(win, false) 
showCursor(false) 
  end 
 end 
end 
) 
  
localPlayer = getLocalPlayer() 
  
addEventHandler("onClientGUIClick", root , 
function() 
    if source == Buy then 
        GetItem = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 2 ) 
            ammo = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 3 ) 
                price = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 4 ) 
                    triggerServerEvent("Weapons", localPlayer , GetItem ,ammo ,price) 
    elseif source == SendWe then 
        GetItem1 = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 2 ) 
            ammo1 = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 3 ) 
                price1 = guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 4 ) 
                    Player = guiGridListGetItemText ( GridPlayer, guiGridListGetSelectedItem ( GridPlayer ), 1 ) 
                        triggerServerEvent("SendWe", localPlayer , GetItem1 ,ammo1 ,price1 ,Player) 
    elseif source == Send then 
        guiSetVisible(PlayerList, true) 
            guiBringToFront(PlayerList) 
                updateList_DABL() 
    elseif source == Close then 
        guiSetVisible(PlayerList ,false) 
            showCursor(false) 
    end 
end) 
  
  
function updateList_DABL() 
    guiGridListClear(GridPlayer) 
        for _,player in ipairs ( getElementsByType("player") ) do 
            local row = guiGridListAddRow(GridPlayer) 
                guiGridListSetItemText(GridPlayer,row,1,getPlayerName(player),false,false) 
    end 
end