iMrKaZaNoFa

خلاص اوك معذور يغالي بس كيف احول زر البوتن الى دي كس زيك يوم غيرت زر بوتن الى رسباون ذاك ؟

ومود بسيط مره الي هو بوري الشرطه : قاق قاق اهم شي قاق قاق هههههههههههه

how can change Serin Police - كيف اغير البراقات حق الشرطة لاهنتم

لاهنت راكان شوف اخر موضوع منزلة انا _ اذا مافية ازعاج

wReportMain, bClose, lStatus, lVehTheft, lPropBreak, lPapForgery, lVehTheftStatus, lPropBreakStatus, lPapForgeryStatus, bVehTheft, bPropBreak, bPapForgery, bHelp, lPlayerName, tPlayerName, lNameCheck, lReport, tReport, lLengthCheck, bSubmitReport = nil function resourceStop() guiSetInputEnabled(false) showCursor(false) end addEventHandler("onClientResourceStop", getResourceRootElement(), resourceStop) function resourceStart() bindKey("F2", "down", toggleReport) end addEventHandler("onClientResourceStart", getResourceRootElement(), resourceStart) function toggleReport() executeCommandHandler("report") if wHelp then guiSetInputEnabled(false) showCursor(false) destroyElement(wHelp) wHelp = nil end end function checkBinds() if ( exports.integration:isPlayerTrialAdmin(getLocalPlayer()) or getElementData( getLocalPlayer(), "account:gmlevel" ) ) then if getBoundKeys("ar") or getBoundKeys("acceptreport") then --outputChatBox("You had keys bound to accept reports. Please delete these binds.", 255, 0, 0) triggerServerEvent("arBind", getLocalPlayer()) end end end setTimer(checkBinds, 60000, 0) local function scale(w) local width, height = guiGetSize(w, false) local screenx, screeny = guiGetScreenSize() local minwidth = math.min(700, screenx) if width < minwidth then guiSetSize(w, minwidth, height / width * minwidth, false) local width, height = guiGetSize(w, false) guiSetPosition(w, (screenx - width) / 2, (screeny - height) / 2, false) end end function toggleVehTheft() if exports.integration:isPlayerTrialAdmin(getLocalPlayer()) then local status = getElementData(resourceRoot, "vehtheft") local numPdMembers = #getPlayersInTeam(exports.factions:getTeamFromFactionID(1)) + #getPlayersInTeam(exports.factions:getTeamFromFactionID(59)) --PD and HP if numPdMembers < 3 then return outputChatBox("You can not not toggle this when there's less than 3 PD or HP members online.") end -- Automaticly to 'on hold' is less than 3 pd members if status == "Opened" then guiSetText(lVehTheftStatus, "On hold") guiLabelSetColor(lVehTheftStatus, 255, 0, 0) setElementData(resourceRoot, "vehtheft", "On hold") triggerServerEvent("toggleStatus", localPlayer, localPlayer, "Vehicle Theft", tostring(status)) elseif status == "On hold" then guiSetText(lVehTheftStatus, "Opened") guiLabelSetColor(lVehTheftStatus, 0, 255, 0) setElementData(resourceRoot, "vehtheft", "Opened") triggerServerEvent("toggleStatus", localPlayer, localPlayer, "Vehicle Theft", tostring(status)) end end end function togglePropBreak() if exports.integration:isPlayerTrialAdmin(getLocalPlayer()) then local status = getElementData(resourceRoot, "propbreak") local numPdMembers = #getPlayersInTeam(exports.factions:getTeamFromFactionID(1)) + #getPlayersInTeam(exports.factions:getTeamFromFactionID(59)) --PD and HP if numPdMembers < 3 then return outputChatBox("You can not not toggle this when there's less than 3 PD or HP members online.") end -- Automaticly to 'on hold' is less than 3 pd members if status == "Opened" then guiSetText(lPropBreakStatus, "On hold") guiLabelSetColor(lPropBreakStatus, 255, 0, 0) setElementData(resourceRoot, "propbreak", "On hold") triggerServerEvent("toggleStatus", localPlayer, localPlayer, "Property Break-in", tostring(status)) elseif status == "On hold" then guiSetText(lPropBreakStatus, "Opened") guiLabelSetColor(lPropBreakStatus, 0, 255, 0) setElementData(resourceRoot, "propbreak", "Opened") triggerServerEvent("toggleStatus", localPlayer, localPlayer, "Property Break-in", tostring(status)) end end end function togglePaperForg() if exports.integration:isPlayerTrialAdmin(getLocalPlayer()) then local status = getElementData(resourceRoot, "papforg") local numPdMembers = #getPlayersInTeam(exports.factions:getTeamFromFactionID(1)) + #getPlayersInTeam(exports.factions:getTeamFromFactionID(59)) --PD and HP if numPdMembers < 3 then return outputChatBox("You can not not toggle this when there's less than 3 PD or HP members online.") end -- Automaticly to 'on hold' is less than 3 pd members if status == "Opened" then guiSetText(lPapForgeryStatus, "On hold") guiLabelSetColor(lPapForgeryStatus, 255, 0, 0) setElementData(resourceRoot, "papforg", "On hold") triggerServerEvent("toggleStatus", localPlayer, localPlayer, "Paper Forgery", tostring(status)) elseif status == "On hold" then guiSetText(lPapForgeryStatus, "Opened") guiLabelSetColor(lPapForgeryStatus, 0, 255, 0) setElementData(resourceRoot, "papforg", "Opened") triggerServerEvent("toggleStatus", localPlayer, localPlayer, "Paper Forgery", tostring(status)) end end end -- //Chaos function showReportMainUI() local logged = getElementData(getLocalPlayer(), "loggedin") --outputDebugString(logged) if (logged==1) then if (wReportMain==nil) then reportedPlayer = nil wReportMain = guiCreateStaticImage(0.2, 0.2, 0.2, 0.25, "اسم الصوره", true) scale(wReportMain) -- Controls within the window bClose = guiCreateButton(0.85, 0.9, 0.2, 0.1, "Close", true, wReportMain) addEventHandler("onClientGUIClick", bClose, clickCloseButton) -- Status lStatus = guiCreateLabel(0.48, 0.05, 1.0, 0.5, "Status", true, wReportMain) guiSetFont(lStatus, "default-bold-small") lVehTheft = guiCreateLabel(0.125, 0.1, 1.0, 0.5, "Vehicle Theft", true, wReportMain) lPropBreak = guiCreateLabel(0.44, 0.1, 1.0, 0.5, "Property Break-in", true, wReportMain) lPapForgery = guiCreateLabel(0.75, 0.1, 1.0, 0.5, "Paper Forgery", true, wReportMain) local vehTheftStatus = getElementData(resourceRoot, "vehtheft") local propBreakStatus = getElementData(resourceRoot, "propbreak") local papForgeStatus = getElementData(resourceRoot, "papforg") lVehTheftStatus = guiCreateLabel(0.145, 0.15, 1.0, 0.5, vehTheftStatus, true, wReportMain) lPropBreakStatus = guiCreateLabel(0.47, 0.15, 1.0, 0.5, propBreakStatus, true, wReportMain) lPapForgeryStatus = guiCreateLabel(0.77, 0.15, 1.0, 0.5, papForgeStatus, true, wReportMain) if vehTheftStatus == "Opened" then guiLabelSetColor(lVehTheftStatus, 0, 255, 0) end if vehTheftStatus == "On hold" then guiLabelSetColor(lVehTheftStatus, 255, 0, 0) end if propBreakStatus == "Opened" then guiLabelSetColor(lPropBreakStatus, 0, 255, 0) end if propBreakStatus == "On hold" then guiLabelSetColor(lPropBreakStatus, 255, 0, 0) end if papForgeStatus == "Opened" then guiLabelSetColor(lPapForgeryStatus, 0, 255, 0) end if papForgeStatus == "On hold" then guiLabelSetColor(lPapForgeryStatus, 255, 0, 0) end local canEditStatus = exports.integration:isPlayerTrialAdmin(getLocalPlayer()) if canEditStatus then bVehTheft = guiCreateButton(0.130, 0.2, 0.10, 0.05, "Toggle", true, wReportMain) bPropBreak = guiCreateButton(0.45, 0.2, 0.10, 0.05, "Toggle", true, wReportMain) bPapForgery = guiCreateButton(0.75, 0.2, 0.10, 0.05, "Toggle", true, wReportMain) addEventHandler("onClientGUIClick", bVehTheft, toggleVehTheft, false) addEventHandler("onClientGUIClick", bPropBreak, togglePropBreak, false) addEventHandler("onClientGUIClick", bPapForgery, togglePaperForg, false) end guiSetInputEnabled(true) bHelp = guiCreateButton(0.025, 0.9, 0.2, 0.1, "View Help/Commands", true, wReportMain) guiSetEnabled(bHelp, true) addEventHandler("onClientGUIClick", bHelp, clickCloseButton) lPlayerName = guiCreateLabel(0.025, 0.28, 1.0, 0.3, "Player you wish to report (Optional):", true, wReportMain) guiSetFont(lPlayerName, "default-bold-small") tPlayerName = guiCreateEdit(0.025, 0.32, 0.25, 0.08, "Player Partial Name / ID", true, wReportMain) addEventHandler("onClientGUIClick", tPlayerName, function() guiSetText(tPlayerName,"") end, false) lNameCheck = guiCreateLabel(0.025, 0.4, 1.0, 0.3, "You're reporting yourself.", true, wReportMain) guiSetFont(lNameCheck, "default-bold-small") guiLabelSetColor(lNameCheck, 0, 255, 0) addEventHandler("onClientGUIChanged", tPlayerName, checkNameExists) lReportType = guiCreateLabel(0.4, 0.28, 0.23, 0.3, "Select the option that best\nsuites your report.\n\nThis will send your report\nto the proper staff member.", true, wReportMain) cReportType = guiCreateComboBox(0.65, 0.32, 0.3, 0.34, "Report Type", true, wReportMain) for key, value in ipairs(reportTypes) do guiComboBoxAddItem(cReportType, value[1]) end addEventHandler("onClientGUIComboBoxAccepted", cReportType, canISubmit) addEventHandler("onClientGUIComboBoxAccepted", cReportType, function() local selected = guiComboBoxGetSelected(cReportType)+1 guiLabelSetHorizontalAlign( lReportType, "center", true) guiSetText(lReportType, reportTypes[selected][7]) end) lReport = guiCreateLabel(0, 0.46, 1.0, 0.3, "~==Report Information==~", true, wReportMain) guiLabelSetHorizontalAlign(lReport, "center") guiSetFont(lReport, "default-bold-small") guiSetFont(lPlayerName, "default-bold-small") tReport = guiCreateMemo(0.025, 0.49, 6, 0.3, "", true, wReportMain) addEventHandler("onClientGUIChanged", tReport, canISubmit) lLengthCheck = guiCreateLabel(0.4, 0.81, 0.4, 0.3, "Length: " .. string.len(tostring(guiGetText(tReport)))-1 .. "/150 Characters.", true, wReportMain) guiLabelSetColor(lLengthCheck, 0, 255, 0) guiSetFont(lLengthCheck, "default-bold-small") bSubmitReport = guiCreateButton(0.4, 0.875, 0.2, 0.1, "Submit Report", true, wReportMain) addEventHandler("onClientGUIClick", bSubmitReport, submitReport) guiSetEnabled(bSubmitReport, false) guiWindowSetSizable(wReportMain, false) showCursor(true) elseif (wReportMain~=nil) then guiSetVisible(wReportMain, false) destroyElement(wReportMain) wReportMain, bClose, lStatus, lVehTheft, lPropBreak, lPapForgery, lVehTheftStatus, lPropBreakStatus, lPapForgeryStatus, bVehTheft, bPropBreak, bPapForgery, bHelp, lPlayerName, tPlayerName, lNameCheck, lReport, tReport, lLengthCheck, bSubmitReport = nil guiSetInputEnabled(false) showCursor(false) end end end addCommandHandler("report", showReportMainUI) function submitReport(button, state) if (source==bSubmitReport) and (button=="left") and (state=="up") then triggerServerEvent("clientSendReport", getLocalPlayer(), reportedPlayer or getLocalPlayer(), tostring(guiGetText(tReport)), (guiComboBoxGetSelected(cReportType)+1)) if (wReportMain~=nil) then destroyElement(wReportMain) end if (wHelp) then destroyElement(wHelp) end wReportMain, bClose, lStatus, lVehTheft, lPropBreak, lPapForgery, lVehTheftStatus, lPropBreakStatus, lPapForgeryStatus, bVehTheft, bPropBreak, bPapForgery, bHelp, lPlayerName, tPlayerName, lNameCheck, lReport, tReport, lLengthCheck, bSubmitReport = nil guiSetInputEnabled(false) showCursor(false) end end function checkReportLength(theEditBox) guiSetText(lLengthCheck, "Length: " .. string.len(tostring(guiGetText(tReport)))-1 .. "/150 Characters.") if (tonumber(string.len(tostring(guiGetText(tReport))))-1>150) then guiLabelSetColor(lLengthCheck, 255, 0, 0) return false elseif (tonumber(string.len(tostring(guiGetText(tReport))))-1<3) then guiLabelSetColor(lLengthCheck, 255, 0, 0) return false elseif (tonumber(string.len(tostring(guiGetText(tReport))))-1>130) then guiLabelSetColor(lLengthCheck, 255, 255, 0) return true else guiLabelSetColor(lLengthCheck,0, 255, 0) return true end end function checkType(theGUI) local selected = guiComboBoxGetSelected(cReportType)+1 -- +1 to relate to the table for later if not selected or selected == 0 then return false else return true end end function canISubmit() local rType = checkType() local rReportLength = checkReportLength() --[[local adminreport = getElementData(getLocalPlayer(), "adminreport") local gmreport = getElementData(getLocalPlayer(), "gmreport")]] local reportnum = getElementData(getLocalPlayer(), "reportNum") if rType and rReportLength then if reportnum then guiSetText(wReportMain, "Your report ID #" .. (reportnum).. " is still pending. Please wait or /er before submitting another.") else guiSetEnabled(bSubmitReport, true) end else guiSetEnabled(bSubmitReport, false) end end function checkNameExists(theEditBox) local found = nil local count = 0 local text = guiGetText(theEditBox) if text and #text > 0 then local players = getElementsByType("player") if tonumber(text) then local id = tonumber(text) for key, value in ipairs(players) do if getElementData(value, "playerid") == id then found = value count = 1 break end end else for key, value in ipairs(players) do local username = string.lower(tostring(getPlayerName(value))) if string.find(username, string.lower(text)) then count = count + 1 found = value break end end end end if (count>1) then guiSetText(lNameCheck, "Multiple Found - Will take yourself to submit.") guiLabelSetColor(lNameCheck, 255, 255, 0) elseif (count==1) then guiSetText(lNameCheck, "Player Found: " .. getPlayerName(found) .. " (ID #" .. getElementData(found, "playerid") .. ")") guiLabelSetColor(lNameCheck, 0, 255, 0) reportedPlayer = found elseif (count==0) then guiSetText(lNameCheck, "Player not found - Will take yourself to submit.") guiLabelSetColor(lNameCheck, 255, 0, 0) end end -- Close button function clickCloseButton(button, state) if (source==bClose) and (button=="left") and (state=="up") then if (wReportMain~=nil) then destroyElement(wReportMain) end if (wHelp) then destroyElement(wHelp) end wReportMain, bClose, lStatus, lVehTheft, lPropBreak, lPapForgery, lVehTheftStatus, lPropBreakStatus, lPapForgeryStatus, bVehTheft, bPropBreak, bPapForgery, bHelp, lPlayerName, tPlayerName, lNameCheck, lReport, tReport, lLengthCheck, bSubmitReport = nil guiSetInputEnabled(false) showCursor(false) elseif (source==bHelp) and (button=="left") and (state=="up") then if (wReportMain~=nil) then destroyElement(wReportMain) end wReportMain, bClose, lStatus, lVehTheft, lPropBreak, lPapForgery, lVehTheftStatus, lPropBreakStatus, lPapForgeryStatus, bVehTheft, bPropBreak, bPapForgery, bHelp, lPlayerName, tPlayerName, lNameCheck, lReport, tReport, lLengthCheck, bSubmitReport = nil guiSetInputEnabled(false) showCursor(false) triggerEvent("viewF1Help", getLocalPlayer()) end end function onOpenCheck(playerID) executeCommandHandler ( "check", tostring(playerID) ) end addEvent("report:onOpenCheck", true) addEventHandler("report:onOpenCheck", getRootElement(), onOpenCheck) ---------------------------------- الكودات الي فوق اختصارها ابي اعرف لذا الكود هل هو صحيح ادخلته ام غلط function showReportMainUI() local logged = getElementData(getLocalPlayer(), "loggedin") --outputDebugString(logged) if (logged==1) then if (wReportMain==nil) then reportedPlayer = nil wReportMain = guiCreateStaticImage(0.2, 0.2, 0.2, 0.25, "اسم الصوره", true) scale(wReportMain) هاذا بعد التعديل الي فوق لمين اشغل المود ماتطلع الوحة نهائيآ اسم الصورة ماني عارف ويش احط يا رجال الي يجي يقول : حط صورة بالمود وبعدين حطها بالميتا طيب كيف اعرف مقاس الصورة كم وكم حجمها بالضبط اول شي حبيت اهني سيرفر وناسة تايم على شغلهم الجميل ما شاء الله المقصد مو التقليد | فقط التعليم البرمجة _ ابي يكون زي كذا لاهنتم https://a.top4top.net/p_805v9vqo1.png

reportedPlayer = nil wReportMain = guiCreateStaticImage(9, 98, 371, 98, "bug", true)) scale(wReportMain) _ ماضبطت يغالي انا سويت كذا بس ماطلعت لي الوحة ماضهرت لو سمحت ويش المشكلة هاذي الاحدثيات ؟

طيب الصورة اضيفها وين + كيف اضيفها بملف ميتا لاهنت اكتب لي الصيغة

مو كأنكم سحبتو على موضوعي ههههه

يا ابو وطن معليش امس حصل لي ضرف وماقدرت اكمل معك - مثلآ الكود ذا local tlBackButton = guiCreateButton(0.8, 0.04, 0.2, 0.06, "Close", true, myCommandsWindow) -- close button اخلية زي كذا Save_a = guiCreateStaticImage(9, 98, 371, 98, "اسم الصوره", false) اسم الصورة احط بدالها اسم الصورة اوك والصورة احطها بملف المود + ملف ميتا صح ؟

- اهلا, اخ كازوفا ** ان شاءالله مااخطئنا بالاسم ** حاب اقولك اذا تحتاج برمجة من ناس محترفه و لها سمعة كبيرة بالعبة -نقدر نفيدك ببرمجة واسعة - سكربتات وايضا مودات اخرى, سيقوم طاقم نيوكتروس بمساعدتك ببرمجة سكربتات سيرفرك وحل مشاكله الى ساعة الصفر - تواصل معنا عبر الايميل حتى نقدر نتفاهم معك جيدآ [email protected] حاب اشكرك جدآ على اهتمامك فينا وجدآ شاكر لطاقم : نوكتروس ولاكن افضل المساعدة على الموقع ليستفيد البعض - وانا دوم هالضحكة يرجال انت اكثر وااحد ساعدني

برسلك المود كامل عادي ؟ يب شكل الوحة ابيها زي شكل حق الرسباون ارسلك المود كامل عشان مأعرف وين الكود حق الوحة كاملة ذي

شوف المود ذا ابي اخلي شكلة زي زر الرسباون عرفت كيف ماعرف اشرح يعني شكلة زي dx

ياخي اول مرة اتعرف على موقع ذا وربي اول مرة اشوف ناس زي كذا زي ماتلاحض العنوان انا حاطة بفلوس لان الاغلب يبي فلوس قلت مابي احط مجاني محد يجي خلني ادفع الي ادفعه مايهمني اهم شي اخرج بنتيجة

طيب مثلآ لو اعطيك مود تغيرة لي ؟ والله ماعرف بذي الاشياء يعلم الله الفنكشن ذا ماني فاهمة ابدآ اذا مافية ازعاج او خلاص

سلام عليكم ورحمة الله وبركاتة __________ لاهنتم يا شباب ابي احد يعلمني شلون اغير شكل زر البوتن واخلية زي الصورة مثلآ الي مافهم قصدي يقلي