HelpGuys

شكرا اخوي على رد local sX, sY = guiGetScreenSize () addEventHandler("onClientRender", root, function () if ( getElementData ( resourceRoot, "Have_" ) == true ) then local Lines = getChatboxLayout ()["chat_lines"] if ( Lines <= 10 ) then Lines = Lines + 1 elseif ( Lines >= 20 ) then Lines = Lines - 1 else Lines = Lines end if ( getElementData ( resourceRoot, "Msg_" ) == "delete" ) then setElementData ( resourceRoot, "Have_", false ) else dxDrawBorderedText ( " Admin : #FFFFFF" .. getElementData ( resourceRoot, "Msg_" ).. "", 15, 240, 205, 242, tocolor(255, 255, 255, 255), 1.0,"default-bold", "left", "top", false, false, false, true, false ) end end end) bindKey("u", "down", "chatbox","IM") function dxDrawBorderedText ( text, x, y, w, h, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, color2 ) local wh = 1 local msg_gsub = text:gsub ( '#%x%x%x%x%x%x', '' ) dxDrawText ( msg_gsub, x - wh, y - wh, w - wh, h - wh, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) -- black dxDrawText ( msg_gsub, x + wh, y - wh, w + wh, h - wh, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( msg_gsub, x - wh, y + wh, w - wh, h + wh, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( msg_gsub, x + wh, y + wh, w + wh, h + wh, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( msg_gsub, x - wh, y, w - wh, h, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( msg_gsub, x + wh, y, w + wh, h, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( msg_gsub, x, y - wh, w, h - wh, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( msg_gsub, x, y + wh, w, h + wh, tocolor ( 0, 0, 0, 0 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x, y, w, h, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, color2 ) end هذا مااغيره فيه شيء حب

مافي رد ولا ايش

ه1 معك حق معك فيسبوك ؟

من تونس انت؟

وضحلي اخوي الغالي مش فاهم

Serials_nowarp = { -- admin_server.lua هذا سريلات لاعبين من حمايه من سحب يجي فوق في ملف ["123456789"] = true, -- سريال } elseif ( action == "warp" ) or ( action == "warpto" ) then if ( nowarp[getPlayerSerial(player)] ~= true ) then setTimer ( warpto, 100, 1, vehicle ) else local vehicle = getPedOccupiedVehicle ( source ) if ( vehicle ) then setTimer ( warpto, 100, 1, vehicle ) outputChatBox("!..لا تستطيع سحب هذا الاعب",source,0,255,255,true) else outputChatBox("!..لا تستطيع سحب هذا الاعب",source,0,255,255,true) if ( getElementHealth ( source ) > 0 ) and ( not isPedDead ( source ) ) then local slap = 100 if ( slap >= 0 ) then if ( slap > 0 ) then if ( slap > getElementHealth ( source ) ) then setTimer ( killPed, 50, 1, source ) else setElementHealth ( source, getElementHealth ( source ) - 100 ) end end function warpPlayer ( p, to ) function warp ( p, to ) local x, y, z = getElementPosition ( to ) local r = getPedRotation ( to ) x = x - math.sin ( math.rad ( r ) ) * 2 y = y + math.cos ( math.rad ( r ) ) * 2 setTimer ( setElementPosition, 1000, 1, p, x, y, z + 1 ) fadeCamera ( p, false, 1, 0, 0, 0 ) setElementDimension ( p, getElementDimension ( to ) ) setElementInterior ( p, getElementInterior ( to ) ) setTimer ( fadeCamera, 1000, 1, p, true, 1 ) end if ( isPedInVehicle ( to ) ) then local vehicle = getPedOccupiedVehicle ( to ) local seats = getVehicleMaxPassengers ( vehicle ) + 1 local i = 0 while ( i < seats ) do if ( not getVehicleOccupant ( vehicle, i ) ) then setTimer ( warpPedIntoVehicle, 1000, 1, p, vehicle, i ) fadeCamera ( p, false, 1, 0, 0, 0 ) setTimer ( fadeCamera, 1000, 1, p, true, 1 ) break end i = i + 1 end if ( i >= seats ) then warp ( p, to ) outputConsole ( "Player's vehicle is full ("..getVehicleName ( vehicle ).." - Seats: "..seats..")", p ) end else warp ( p, to ) end end if ( action == "warp" ) then warpPlayer ( source, player ) else warpPlayer ( player, data ) mdata = getPlayerName ( data ) end else action = nil end if ( action ~= nil ) then aAction ( "player", action, admin, player, mdata, more ) end return true end outputChatBox ( "Access denied for '"..tostring ( action ).."'", source, 255, 168, 0 ) return false end ) رجاء حد يخش يساعد مرح تخسر شيء

لا ياخوي حتى بدون سريال تقدر تكتب

حد يرد علينا

طيب يخوي وش اكتب في اف8 على شن الكتابة تبقى لى انا كتبتها واقفل العاجل على سبيل المثال انا كبست حرف ه وكتبت Admin: شـكرا لك عـلى المسـاعده بروح اف8 واكتب على سبيل المثال )قفل يطلع فشات : لقد قمة بقفل العاجل بضل فالعاجل الكتابة هيك Admin: شـكرا لك عـلى المسـاعده ميتغير كأني مكتبت شيء ولا عملت ولما ارجع اكتب فالعاجل يقولي هيك العاجل مغلق.. ولما ارجع اكتب في اف8 نفس الكلمة يطلع فشات : لقد قمة بفتح العاجل وشكرااااا local Groups = { "Console", "AL-3GeD" } local Serials = { ["سريالك1"] = true, ["سريالك2"] = true } function isPlayerAdmin(player) for k,v in ipairs ( Groups ) do if aclGetGroup(v) then if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(player)), aclGetGroup(v)) then return true end end end end addEventHandler("onResourceStart", resourceRoot, function() for _,player in ipairs(getElementsByType("player")) do if isPlayerAdmin(player) then bindKey(player, "u", "down", "chatbox", "IM") end end end ) addCommandHandler("IM", function(player,_,...) local data = getElementData(getResourceRootElement(getThisResource()), "AdminMessage") or {false, "", "opened"} if not isGuestAccount(getPlayerAccount(player)) then if isPlayerAdmin(player) then if data[2] ~= "closed" then local message = table.concat({...}, " ") setElementData(getResourceRootElement(getThisResource()), "AdminMessage", {true, message, "opened"}) else outputChatBox("العاجل مغلق", player, 255, 0, 0, true) end end end end ) addCommandHandler("قفل", function(player) if Serials[getPlayerSerial(player)] then local data = getElementData(getResourceRootElement(getThisResource()), "AdminMessage") or {false, "", "opened"} if data[3] ~= "closed" then setElementData(getResourceRootElement(getThisResource()), "AdminMessage", {true, data[2], "closed"}) outputChatBox("تم اغلاق العاجل", player, 255, 0, 0, true) else setElementData(getResourceRootElement(getThisResource()), "AdminMessage", {true, data[2], "opened"}) outputChatBox("تم فتح العاجل", player, 0, 255, 0, true) end end end ) زي كذا بس هاذي في مشكلة لما اكتب قفل يطلع لى فشات انو انقفل لكن اقدر اكتب فيه

الو

يـا اخوي شكرا على رد لكن لما ركبته صح بقي الكلام لى كتبته ولما قفلته العاجل بقدر اكتب فيه اخوي الغالي لو عندك فيسبوك لو سمحت تعال صمم لى المود يرحم ولديك

حد يعبرني

حد يعبرني

عليك نوور يخي بس انا لما ركبت هذا الكود حقت تاج الخاص صار ميشتغل المود معرفت كيف اركبه

حد يرد ليش هيك

مش فاهم اخي

ممكن رد ؟

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

22ساعه وماحد رد ردو الله ينجحكم

g_Root = getRootElement() local chatTime = {} local lastChatMessage = {} klamSB = {"كلمات سيئة بعدين احطها", "كلمات سيئة بعدين احطها"} klamNSHR = {"سيرفر", "البحث", "سيــرفر", "بسيرفر", "اكتب", "سـيـرفـر", "رتب", "آكتب", "حياكم", "حيااكم", "حيآكم", "لايفوتكم", "حصريات", "أكتب"} addEventHandler('onPlayerChat', g_Root, function(msg, type) if type == 0 then cancelEvent() if chatTime[source] and chatTime[source] + tonumber(get("*chat/mainChatDelay")) > getTickCount() then outputChatBox("لا تكرر نفس رسالة", source, 255, 0, 0 ) return else chatTime[source] = getTickCount() end if get("*chat/blockRepeatMessages") == "true" and lastChatMessage[source] and lastChatMessage[source] == msg then outputChatBox("لا تكرر وراء بعض", source, 255, 0, 0 ) return else lastChatMessage[source] = msg end for k,v in ipairs (klamSB) do if string.find(msg,v) then cancelEvent() return outputChatBox(" { مَا يَلْفِظُ مِن قَوْلٍ إِلَّا لَدَيْهِ رَقِيبٌ عَتِيدٌ } ..", source, 255, 0, 0 ) end end for k,v in ipairs (klamNSHR) do if string.find(msg,v) then cancelEvent() return outputChatBox("روح انشر بعيد ..", source, 255, 0, 0 ) end end if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Console")) then local r, g, b = getPlayerNametagColor(source) outputChatBox("#FF0000✖ ][ #FFFFFF Console #FF0000✖ ][ " .. getPlayerName ( source ) .."#cccccc : "..msg , g_Root, r, g, b, true ) outputServerLog("CHAT: #FF0000✖ ][ #FFFFFF Console #FF0000✖ ][" .. getPlayerName ( source ) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Time")) then local r, g, b = getPlayerNametagColor(source) outputChatBox("#FF9900* #ffffff[ #FF9900king of time #ffffff]" .. getPlayerName ( source ) .."#FFFFFF : " .. msg, g_Root, r, g, b, true ) outputServerLog("CHAT: [Head Admin] " .. getPlayerName ( source ) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("V.I.P")) then local r, g, b = getPlayerNametagColor(source) outputChatBox("#E6FF00* #ffffff[ #E6FF00V#000000.#E6FF00I#000000.#E6FF00P #ffffff] " .. getPlayerName ( source ) .."#FFFFFF : " .. msg, g_Root, r, g, b, true ) outputServerLog("CHAT: [Admin] " .. getPlayerName ( source ) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Admin.Genral")) then local r, g, b = getPlayerNametagColor(source) outputChatBox("#3D8BFF* #ffffff[ #3D8BFFAdmin.Genral #ffffff] " .. getPlayerName ( source ) .. "#FFFFFF : " .. msg, g_Root, r, g, b, true ) outputServerLog("CHAT: #3D8BFF* #ffffff[ #3D8BFFAdmin.Genral #ffffff] " .. getPlayerName ( source ) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Mangars")) then local r, g, b = getPlayerNametagColor(source) outputChatBox("#66FF00* #ffffff彡 #66FF00Managers #ffffff彡 " .. getPlayerName ( source ) .. "#FFFFFF : " .. msg, g_Root, r, g, b, true ) outputServerLog("CHAT: #66FF00* #ffffff彡 #66FF00Managers #ffffff彡 " .. getPlayerName ( source ) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Mangaer")) then local r, g, b = getPlayerNametagColor(source) outputChatBox("#000000* #ffffff[ #000000Manager Server #ffffff] " .. getPlayerName ( source ) .. "#FFFFFF : " .. msg, g_Root, r, g, b, true ) outputServerLog("CHAT: #000000* #ffffff[ #000000Manager Server #ffffff] " .. getPlayerName ( source ) .. ": " .. msg) elseif type == 0 then cancelEvent ( ) local r, g, b = getPlayerNametagColor(source) outputChatBox ( " " .. getPlayerName ( source ) .. ":#ffFFff " .. msg, g_Root, r, g, b, true ) outputServerLog( "CHAT: " .. getPlayerName ( source ) .. ": " .. msg ) end end end ) local root = getRootElement() function chatbox(text, msgtype) local systemDBconnect = dbConnect( 'sqlite', ':1xXTAGS/[TAGS system] Database.db' ) local checkTag = dbQuery( systemDBconnect, ' SELECT * FROM TagsSystemPro WHERE serial = ? ', getAccountName( getPlayerAccount( source ) ) ) local dbValues = dbPoll( checkTag, -1 ) if ( type( dbValues ) == 'table' and #dbValues ~= 0 ) then local state = dbValues[1]['state'] if ( state == 'Enabled' ) then return end end local account = getAccountName(getPlayerAccount(source)) local name = getPlayerName(source) cancelEvent() if isObjectInACLGroup("user." .. account, aclGetGroup("NO")) then outputChatBox("NO" .. text, root, 255, 255, 255, true) هذا الكود بدي اضيفه له لما ضفته صار ميشتغل ارجو الحل

function centerWindow (center_window) local screenW, screenH = guiGetScreenSize() local windowW, windowH = guiGetSize(center_window, false) local x, y = (screenW - windowW) /2,(screenH - windowH) /2 guiSetPosition(center_window, x, y, false) end GUI = guiCreateWindow(530, 297, 281, 85, "Hours All Chat", false) guiWindowSetSizable(GUI, false) guiSetVisible(GUI, false) centerWindow (GUI) Label = guiCreateLabel(10, 33, 58, 15, "Amount $::", false, GUI) Hours_Edit = guiCreateEdit(78, 31, 82, 21, "", false, GUI) guiEditSetMaxLength(Hours_Edit, 8) Boton_Send = guiCreateButton(170, 31, 47, 21, "Send", false, GUI) guiSetProperty(Boton_Send, "NormalTextColour", "FFAAAAAA") CopyRight = guiCreateLabel(10, 60, 261, 15, "Created By Ahmed", false, GUI) guiSetFont(CopyRight, "default-bold-small") guiLabelSetColor(CopyRight, 254, 120, 21) guiLabelSetHorizontalAlign(CopyRight, "center", false) Boton_Cancelar = guiCreateButton(223, 31, 47, 21, "Cancel", false, GUI) guiSetProperty(Boton_Cancelar, "NormalTextColour", "FFAAAAAA") function Open () guiSetVisible(GUI, true) showCursor(true) end addEvent("Abrir", true) addEventHandler("Abrir", getLocalPlayer(), Open) function close () guiSetVisible(GUI, false) showCursor(false) end addEventHandler("onClientGUIClick", Boton_Cancelar, close, false) function sendm () name = getPlayerName(getLocalPlayer()) cantidad = guiGetText(Hours_Edit) triggerServerEvent("SendHours1",getRootElement(),cantidad,name) end addEventHandler("onClientGUIClick", Boton_Send, sendm, false) حطيته فالكلينت ومااشتغل

--Server function Enviar (cantidad, name) for i,v in ipairs(getElementsByType("player")) do setElementData(v, "PlayTime", getElementData(v,"PlayTime") or 0 ) + cantidad end outputChatBox("ساعة ["..cantidad.."] قامت الادارة بأعطاء حميع اللاعبين",root,255,255,255,true) end addCommandHandler("توزيع", Enviar) addEvent("SendHours1", true) addEventHandler("SendHours1", getRootElement(), Enviar) حد يسوي لى الكلينت بدي لوحة توزيع ساعات عبر شات معندي الكلينت وجازكم الله خيرا

--Server function Enviar (cantidad, name) for i,v in ipairs(getElementsByType("player")) do setElementData(v, "PlayTime", getElementData(v,"PlayTime") or 0 ) + cantidad end outputChatBox("ساعة ["..cantidad.."] قامت الادارة بأعطاء حميع اللاعبين",root,255,255,255,true) end addCommandHandler("توزيع", Enviar) addEvent("SendHours1", true) addEventHandler("SendHours1", getRootElement(), Enviar) ممكن شخص يسوي الكلينت ؟ بدي لوحة توزيع ساعات لو سمحتو ي اخواتي الغلين

مزبطت اخي نقس المشكله يرحم ولدكيم سعدني اربح اجر لك