Jw8.

زبطلك ياه , بنص الشاشه

حطه كلينت //

اعتقد ذه طلبك سويته لك ,

سلام عليكم ورحمة الله وبركاته , عندي مشكله بشوب الاسلاحه كل مااشتري يجيني بلديبق سطر 531 ملف سيرفر --ServerSide function(Cost, CompatAmmo, SawnOffAmmo, RiflesAmmo, ShoutgunAmmo, M4Ammo, SniperAmmo, AkAmmo, PistolAmmo, SilencedAmmo, DeagleAmmo, TecAmmo, UziAmmo, Mp5Ammo, GrenadaAmmo, TeargasAmmo, ParachuteAmmo, GrenadaAmmo, TeargasAmmo, ParachuteAmmo, LauncherAmmo, armsPlayer ) local ALLAmmo = tonumber(CompatAmmo[1] + SawnOffAmmo[1] + RiflesAmmo[1] + ShoutgunAmmo[1] + M4Ammo[1] + SniperAmmo[1] + AkAmmo[1] + PistolAmmo[1] + SilencedAmmo[1] + DeagleAmmo[1] + TecAmmo[1] + UziAmmo[1] + Mp5Ammo[1]) local AmmoG = tonumber(GrenadaAmmo[1] + TeargasAmmo[1] + LauncherAmmo[1]) if getElementData(source,"Money") >= tonumber(Cost) then انا محاطيته كامل , ملف كلينت , if source == BuyButton1 or source == BuyButton2 then refresh() local CompatAmmo = {tonumber(guiGetText(CompatEdit)) or 0, 27} local SawnOffAmmo = {tonumber(guiGetText(SawnOffEdit)) or 0, 26} local RiflesAmmo = {tonumber(guiGetText(RiflesEdit)) or 0, 33} local ShoutgunAmmo = {tonumber(guiGetText(ShoutgunEdit)) or 0, 25} local M4Ammo = {tonumber(guiGetText(M4Edit)) or 0, 31} local SniperAmmo = {tonumber(guiGetText(SniperEdit)) or 0, 34} local AkAmmo = {tonumber(guiGetText(AkEdit)) or 0, 30} local PistolAmmo = {tonumber(guiGetText(PistolEdit)) or 0, 22} local SilencedAmmo = {tonumber(guiGetText(SilencedEdit)) or 0, 23} local DeagleAmmo = {tonumber(guiGetText(DeagleEdit)) or 0, 24} local TecAmmo = {tonumber(guiGetText(TecEdit)) or 0, 32} local UziAmmo = {tonumber(guiGetText(UziEdit)) or 0, 28} local Mp5Ammo = {tonumber(guiGetText(Mp5Edit)) or 0, 29} local GrenadaAmmo = {tonumber(guiGetText(GrenadaEdit)) or 0, 16} local TeargasAmmo = {tonumber(guiGetText(TeargasEdit)) or 0, 17} local ParachuteAmmo = {tonumber(guiGetText(ParachuteEdit)) or 0, 46} local LauncherAmmo = {tonumber(guiGetText(LauncherEdit)) or 0, "Launcher"} local Cost = tonumber(string.sub(guiGetText(Total1), 1)) if Cost > 0 then if armsPlayer then if getElementData(armsPlayer, "GunsDealer") and getElementData(armsPlayer, "GunsDealer") >= Cost then triggerServerEvent("BuyWeapon", localPlayer, Cost, CompatAmmo, SawnOffAmmo, RiflesAmmo, ShoutgunAmmo, M4Ammo, SniperAmmo, AkAmmo, PistolAmmo, SilencedAmmo, DeagleAmmo, TecAmmo, UziAmmo, Mp5Ammo, GrenadaAmmo, TeargasAmmo, ParachuteAmmo, GrenadaAmmo, TeargasAmmo, ParachuteAmmo, LauncherAmmo, armsPlayer) else outputChatBox("This dealer doesn't have enough guns!", "البائع لا يملك عدد كافي من الرصاصات") end else triggerServerEvent("BuyWeapon", localPlayer, Cost, CompatAmmo, SawnOffAmmo, RiflesAmmo, ShoutgunAmmo, M4Ammo, SniperAmmo, AkAmmo, PistolAmmo, SilencedAmmo, DeagleAmmo, TecAmmo, UziAmmo, Mp5Ammo, GrenadaAmmo, TeargasAmmo, ParachuteAmmo, GrenadaAmmo, TeargasAmmo, ParachuteAmmo, LauncherAmmo) end في رد لوسمحتو

سلآم عليكم , دلحين ابغى انزل الكيل مسج لتحت , هو تحت الفلوس بشوي ابي انزله حاولت انزله يروح للجهة الثانية خخخ اكواد , local icon1_centerX, icon1_topY = 0.84, 0.3 local icon_width, icon_height = 24, 24 local icon_sideMargin, icon_bottomMargin = 10, 5 local label_width, label_height = 200, 20 local label_font, label_topMargin = "default-bold", 3 function renderClientKillPanel () for r = 1, rows do if killRow[r] then dxDrawText( killRow[r]["killerName"], killRow[r]["killerNamePos"]["leftX"] + 1, killRow[r]["killerNamePos"]["topY"] + 1, killRow[r]["killerNamePos"]["rightX"] + 1, killRow[r]["killerNamePos"]["bottomY"] + 1, label_shadowColor, 1, label_font, "right" ) dxDrawText( killRow[r]["killerName"], killRow[r]["killerNamePos"]["leftX"], killRow[r]["killerNamePos"]["topY"], killRow[r]["killerNamePos"]["rightX"], killRow[r]["killerNamePos"]["bottomY"], killRow[r]["killerNameColor"], 1, label_font, "right" ) dxDrawImage( killRow[r]["reasonIconPos"]["leftX"], killRow[r]["reasonIconPos"]["topY"], icon_width, icon_height, imagePath[ killRow[r]["deathReason"] ] ) dxDrawText( killRow[r]["victimName"], killRow[r]["victimNamePos"]["leftX"] + 1, killRow[r]["victimNamePos"]["topY"] + 1, killRow[r]["victimNamePos"]["rightX"] + 1, killRow[r]["victimNamePos"]["bottomY"] + 1, label_shadowColor, 1, label_font ) dxDrawText( killRow[r]["victimName"], killRow[r]["victimNamePos"]["leftX"], killRow[r]["victimNamePos"]["topY"], killRow[r]["victimNamePos"]["rightX"], killRow[r]["victimNamePos"]["bottomY"], killRow[r]["victimNameColor"], 1, label_font ) end end end addEventHandler ( "onClientRender", root, renderClientKillPanel ) طبعا الكيل مسج جبته من اجنبي بس ضفت له اسلاحه جديدة , ['AK-1'] = "icons/iconWeapons/AK-1.png", ['AK-50'] ="icons/iconWeapons/AK-50.png", ['AK-47'] = "icons/iconWeapons/AK-47.png"

? Points_EditBox = guiCreateEdit(49, 185, 169, 37, "", false, clanwarwnd) -- اذا عملت ذي بينعكس عند الاخرين ~ Points_Label = guiCreateLabel(0.46, 0.65, 0.08, 0.03, "Points :", false, clanwarwnd) -- الطول والعرض سويه مثل ذي !! guiSetFont(Points_Label, "default-bold-small") guiLabelSetHorizontalAlign(Points_Label, "center", false) تبي تزيد للبوتين ؟ onClientGUIClick وحط اكوادك ,

function WeatherAdd() local selectaData = DGS:dgsComboBoxGetSelected ( WeatherB ) if selectaData ~= -1 then local weather = DGS:dgsComboBoxGetItemText(WeatherB, selectaData) setWeather(weather) for index,value in pairs(Weather) do exports.dgs:dgsComboBoxAddItem(WeatherB,index) end else exports["guimessages"]:outputClient("#FFAA00[User Panel] :#FF0000 Error - Select a Weather", 255, 0, 0) end end addEventHandler("onDgsComboBoxSelect",getRootElement(),WeatherAdd) وش الخرب فيه :

شباب خلاص حليته , طيب دلحين ابي احول القريد ليست لـ dgs < الاكواد , addEventHandler ( 'onClientGUIClick', resourceRoot, function (button, state) if button == "left" and state == "up" then if _bug then return 'Stuuuuuupid :Pp' end if source == wnd.close then guiSetVisible ( wnd.main, false ) showCursor ( false ) elseif source == wnd.open then if ( guiGridListGetSelectedItem ( wnd.grid ) ~= -1 ) then local ammount = tonumber ( guiGridListGetItemText ( wnd.grid, guiGridListGetSelectedItem ( wnd.grid ), 2 ) ) if ammount > 1 then triggerServerEvent ( 'Package:openPack', localPlayer, guiGridListGetItemData ( wnd.grid, guiGridListGetSelectedItem ( wnd.grid ), 1 ) ) guiGridListSetItemText ( wnd.grid, guiGridListGetSelectedItem ( wnd.grid ), 2, tostring ( ammount - 1 ), false, false ) else triggerServerEvent ( 'Package:openPack', localPlayer, guiGridListGetItemData ( wnd.grid, guiGridListGetSelectedItem ( wnd.grid ), 1 ) ) guiGridListRemoveRow ( wnd.grid, guiGridListGetSelectedItem ( wnd.grid ) ) end guiSetEnabled ( wnd.open, false ) setTimer ( guiSetEnabled, 5000, 1, wnd.open, true ) end elseif source == wnd.grid then local id = guiGridListGetItemData ( wnd.grid, guiGridListGetSelectedItem ( wnd.grid ), 1 ) if id and (fileExists("img/lucky"..id..".png")) then guiStaticImageLoadImage(wnd.pack, "img/lucky"..id..".png") else guiStaticImageLoadImage(wnd.pack, "img/pack.png") end end end end)

سلآم عليكم في عندي كود مش عارف له addEvent ( 'Package:addPackagesToGridList', true ) addEventHandler ( 'Package:addPackagesToGridList', root, function ( packages ) if source == ButtonOpen then end if packages then guiGridListClear ( gridlist_window ) for i,v in ipairs ( packages ) do local row = guiGridListAddRow ( gridlist_window ) local type if v['number'] == 1 then type = 'Gold' elseif v['number'] == 2 then type = 'Silver' elseif v['number'] == 3 then type = 'Bronze' end guiGridListSetItemText ( gridlist_window, row, 1, tostring ( type ), false, false ) guiGridListSetItemText ( gridlist_window, row, 2, tostring ( v['ammount'] ), false, false ) guiGridListSetItemData ( gridlist_window, row, 1, tostring ( v['number'] ) ) end end end) انا مسوي له ترايقر سيرفر : addEvent ( 'Package:getMyPackages', true ) addEventHandler ( 'Package:getMyPackages', root, function (package, ammount) if package then if package == 4 then package = math.random ( 1, 3 ) end local _type if package == 1 then _type = 'Gold' elseif package == 2 then _type = 'Silver' elseif package == 3 then _type = 'Bronze' end local account = getAccountName ( getPlayerAccount ( source ) ) local result = dbPoll(dbQuery(db, "SELECT * FROM Packages WHERE account = ?", account), -1) if type(result) == "table" and #result ~= 0 and result[1]["account"] == account and tonumber ( result[1]["ammount"] ) > 0 then triggerClientEvent ( source, 'Package:addPackagesToGridList', source, result ) else dbExec ( db, "INSERT INTO Packages VALUES (?,?,?)", account, package, ammount) outPut ( ammount.." of Lucky ".._type.." package has been added to your inventory.", source ) end end end) وش المشكله فيه ؟ addEvent ( 'Package:Random', true ) addEventHandler ( 'Package:Random', root, function () if sound then return end img = "img/pack.png" addEventHandler("onClientRender", root, render) sound = playSound ( 'sound.mp3' ) setTimer ( function () local rnd = math.random ( 100 ) if rnd > 80 and rnd < 100 then if isElement ( sound ) then destroyElement ( sound ) end pack = 1 img = "img/lucky"..pack..".png" sound = playSound ( 'sound2.mp3' ) setTimer ( function () if isElement ( sound ) then destroyElement ( sound ) end end, 2000, 1 ) elseif rnd >= 1 and rnd <= 40 then if isElement ( sound ) then destroyElement ( sound ) end pack = 2 img = "img/lucky"..pack..".png" sound = playSound ( 'sound2.mp3' ) setTimer ( function () if isElement ( sound ) then destroyElement ( sound ) end end, 2000, 1 ) else if isElement ( sound ) then destroyElement ( sound ) end pack = 3 img = "img/lucky"..pack..".png" sound = playSound ( 'sound2.mp3' ) setTimer ( function () if isElement ( sound ) then destroyElement ( sound ) end end, 2000, 1 ) end setTimer(function() removeEventHandler("onClientRender", root, render) sound = nil end, 3000, 1) -- triggerServerEvent ( 'Package:givePlayerPackage', localPlayer, pack, 1 ) triggerServerEvent ( 'Package:getMyPackages', localPlayer, pack, 1 ) end ,6000, 1 ) end) ابي رد :] ليش ما ينضاف في قريد ليست ؟

ليش تنصحني بقريد ؟

أبي كل ما اضغط مثل "نهار" يتحول الطقس نهار فقط ع الكومبو بوكس dgs dgs تعلمتهأ من امس يعني ماكنت اعرف له كثير كنت بس dx

عيال دلحين اقدر اعمل function WeatherTime() Spawner = exports.dgs:dgsCreateComboBox(0.64, 0.31, 0.18, 0.04,"Select Spawn",false) exports.dgs:dgsComboBoxAddItem(Spawner, "Los Santos","Spawn1") exports.dgs:dgsComboBoxAddItem(Spawner, "Las Vegas","Spawn2") exports.dgs:dgsComboBoxAddItem(Spawner, "San Fiero","Spawn3") Luaguge = exports.dgs:dgsCreateComboBox(0.64, 0.46, 0.18, 0.04, "Select Luaguge", true) exports.dgs:dgsComboBoxAddItem(Luaguge, "AR","LAR") exports.dgs:dgsComboBoxAddItem(Luaguge, "ENG","LEN") Time = exports.dgs:dgsCreateComboBox(0.64, 0.57, 0.18, 0.04, "Select Time", true) exports.dgs:dgsComboBoxAddItem(Time, "نهار","12") exports.dgs:dgsComboBoxAddItem(Time, "ليل","24") exports.dgs:dgsComboBoxAddItem(Time, "نص نهار","14") exports.dgs:dgsComboBoxAddItem(Time, "نص ليل","16") exports.dgs:dgsComboBoxAddItem(Time, "صباح","6") Weather = exports.dgs:dgsCreateComboBox(0.64, 0.69, 0.18, 0.04, "Select Weather", true) exports.dgs:dgsComboBoxAddItem(Weather, "ماطر","1") exports.dgs:dgsComboBoxAddItem(Weather, "رعود وماطر","2") exports.dgs:dgsComboBoxAddItem(Weather, "برق","3") exports.dgs:dgsComboBoxAddItem(Weather, "غبار","4") end كل مايضغط الكومبو يتغير.؟ بس ابيه يكون عربي Language **

شكرا لكم تم حل المشكله :] وعرفت المشكله هي انا مسوي فاكشن function showWin() exports.dgs:dgsSetVisible( GridListFort, true ) end وضايفه في البوتين , وكمان حاط نفسه exports.dgs:dgsSetVisible( GridListFort, false ) خخخ منوبني

dgsCreateWindow ما ابغى استعمله لآني مسويه ع dx call : failled to call 'dgs:dgsSetVisible'

عبد الكريم خاص

منزله اسمو dgs من الموقع

Spawner = exports.dgs:dgsCreateComboBox(0.64, 0.31, 0.18, 0.04,"Select Spawn",false) exports.dgs:dgsComboBoxAddItem(Spawner, "Los Santos","Spawn1") exports.dgs:dgsComboBoxAddItem(Spawner, "Las Vegas","Spawn2") exports.dgs:dgsComboBoxAddItem(Spawner, "San Fiero","Spawn3") Luaguge = exports.dgs:dgsCreateComboBox(0.64, 0.46, 0.18, 0.04, "Select Luaguge", true) exports.dgs:dgsComboBoxAddItem(Luaguge, "AR","LAR") exports.dgs:dgsComboBoxAddItem(Luaguge, "ENG","LEN") Time = exports.dgs:dgsCreateComboBox(0.64, 0.57, 0.18, 0.04, "Select Time", true) exports.dgs:dgsComboBoxAddItem(Time, "نهار","12") exports.dgs:dgsComboBoxAddItem(Time, "ليل","24") exports.dgs:dgsComboBoxAddItem(Time, "نص نهار","14") exports.dgs:dgsComboBoxAddItem(Time, "نص ليل","16") exports.dgs:dgsComboBoxAddItem(Time, "صباح","6") Weather = exports.dgs:dgsCreateComboBox(0.64, 0.69, 0.18, 0.04, "Select Weather", true) exports.dgs:dgsComboBoxAddItem(Weather, "ماطر","1") exports.dgs:dgsComboBoxAddItem(Weather, "رعود وماطر","2") exports.dgs:dgsComboBoxAddItem(Weather, "برق","3") exports.dgs:dgsComboBoxAddItem(Weather, "غبار","4") طيب دلحين اقدر اعمل اسم فقط وعند اختيار الكومبو يضغط ؟ ويشتغل ؟ الايفينت صح !! هو يشتغل بس عند كبس كمان بوتين مايروح ! exports.dgs:dgsSetVisible( but, false ) طبعا ذه الكود حق الاخفاء

سلآم عليكم في عندي مشكلة في dgs < كل ما اضغط بوتن بيجيب لآق ويكتب لي exports failled انا مركب مود dgs اتمنى افادة

Thinks خلآص شكرا سويت واحد يرجى حذفه شكرا لك ي سمبل , تعبتك :]

مسوي سلآحين فقط مش 3 مثل قراند العرب , فكره جديدة من نحيتي انا , المهم شكرأ لك

عادي :] , قاعد احاول بس مش عارف خخخ شكرأأ للجميع حاولت وعرفت الكود : onElementDataChange

قصدك بتشيل التصويبة بتخلي حقت السلاح؟

يب :]

يخي يب ابي اسوي مثل كانو سلاح جديد كل مثال تشتري ديقل يكون عادي يكون ضرباته عادية , بتشتري ديقل قوي يكون قوي فهمت؟

ألسلام عليكم ورحمة الله وبركاته , انا هلحين طلعت فكرة هي سلاح جديد اعرف انو مانقدر نضيف بس نقدر نسويه جديد انا سويت بس في خطا عند ما يسوي function Weapons() if getElementData(source, "Weapon") == "Shortgun" then setWeaponProperty(25, "pro", "maximum_clip_ammo", 15) setWeaponProperty(25, "std", "maximum_clip_ammo", 15) setWeaponProperty(25, "poor", "maximum_clip_ammo", 15) -- setWeaponProperty(25, "pro", "damage", 15) setWeaponProperty(25, "std", "damage", 15) setWeaponProperty(25, "poor", "damage", 15) -- setWeaponProperty(25, "pro", "accuracy", 1) setWeaponProperty(25, "std", "accuracy", 1) setWeaponProperty(25, "poor", "accuracy", 1) -- setWeaponProperty(25, "pro", "flag_move_and_shoot", true) setWeaponProperty(25, "std", "flag_move_and_shoot", true) setWeaponProperty(25, "poor", "flag_move_and_shoot", true) -- setWeaponProperty(25, "pro", "target_range", 50) setWeaponProperty(25, "std", "target_range", 50) setWeaponProperty(25, "poor", "target_range", 50) setElementData ( source, "Weapon", "Shortgun" ) elseif getElementData(source, "Weapon") == "Shortgun 45" then setWeaponProperty(25, "pro", "maximum_clip_ammo", 20) setWeaponProperty(25, "std", "maximum_clip_ammo", 20) setWeaponProperty(25, "poor", "maximum_clip_ammo", 20) -- setWeaponProperty(25, "pro", "damage", 20) setWeaponProperty(25, "std", "damage", 20) setWeaponProperty(25, "poor", "damage", 20) -- setWeaponProperty(25, "pro", "accuracy", 2) setWeaponProperty(25, "std", "accuracy", 2) setWeaponProperty(25, "poor", "accuracy", 2) -- setWeaponProperty(25, "pro", "flag_move_and_shoot", true) setWeaponProperty(25, "std", "flag_move_and_shoot", true) setWeaponProperty(25, "poor", "flag_move_and_shoot", true) -- setWeaponProperty(25, "pro", "target_range", 60) setWeaponProperty(25, "std", "target_range", 60) setWeaponProperty(25, "poor", "target_range", 60) end وش الخطا ؟