DmAr511

Members
  • Content Count

    334
  • Joined

  • Last visited

Community Reputation

16 Decent

3 Followers

About DmAr511

  • Rank
    Fool

Details

  • Gang
    ProGamer %30
  • Location
    DmAr
  • Occupation
    Saudi
  • Interests
    [MTA]

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. DmAr511

    # مساعدة

    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) وش الخرب فيه :
  2. DmAr511

    # مساعدة

    شباب خلاص حليته , طيب دلحين ابي احول القريد ليست لـ 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)
  3. DmAr511

    # مساعدة

    سلآم عليكم في عندي كود مش عارف له 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) ابي رد :] ليش ما ينضاف في قريد ليست ؟
  4. DmAr511

    Error < خطا

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

    Error < خطا

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

    Error < خطا

    عيال دلحين اقدر اعمل 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 **
  7. DmAr511

    Error < خطا

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

    Error < خطا

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

    سؤال

    عبد الكريم خاص
  10. DmAr511

    Error < خطا

    منزله اسمو dgs من الموقع
  11. DmAr511

    Error < خطا

    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 ) طبعا ذه الكود حق الاخفاء
  12. DmAr511

    Error < خطا

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

    موضوع انشاء #

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

    اضافة سلآح جديد

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

    اضافة سلآح جديد

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