Jump to content

SaedAmer

Members
  • Posts

    906
  • Joined

  • Last visited

Everything posted by SaedAmer

  1. يا اخ اوسكار انت ليه دمجت المود الاول مع المود التاني كده لما العب يحط اسم التاج و يضغط البطن كيف يتفعل بدون تريفر للسيرفر ؟ نفس الشئ يكرر
  2. السلام عليكم دلوقتي ده كود العب يقدر يعطي نفسه تاج بس يكرر مع التاج الاصلي مغ اني حاتط تحقق addEventHandler("onPlayerChat",root,function (msg,Colour) local tag = getElementData(source,"tag") or '#FF0000[#005588Player#FF0000]' local colour = getElementData(source,"colour") or '#FFFFFF' outputChatBox(tag ..' '.. getPlayerName(source) .. ''..colour..' : '.. msg,root, r, g, b, true) return cancelEvent() end) addEventHandler("onPlayerChat", root, playerChat) addEvent("onPlayeropenChat",true) addEventHandler("onPlayeropenChat",root,function () removeElementData(resourceRoot,"chat") end) addEvent("onPlayerCloseChat",true) addEventHandler("onPlayerCloseChat",root,function () setElementData (resourceRoot, "chat",true) end) ------ addEventHandler("onPlayerChat",root, function( text, type) if getElementData(source,"Data_Tag") then return cancelEvent() end if getElementData(source,"tag") == true then return cancelEvent() end if type == 1 or type == 2 then return end if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Console")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) return outputChatBox("#FF0000* [ Console ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) else end if getElementData ( resourceRoot, "chat" ) == true then cancelEvent() return outputChatBox ("[C.Console]: Chat has been locked by Console ",source,255,0,0,true) end if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 1")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#0099DC* [ Lv.1 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 2")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#2554C7* [ Lv.2 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 3")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#00cc11* [ Lv.3 ] " .. getPlayerName ( source ) ..": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 4")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#007700* [ Lv.4 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 5")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#cc0000* [ Lv.5 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 6")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#FF0000* [ Lv.6 ] " .. getPlayerName ( source ) ..": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Head.Admin")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#C11B17* [ Head.Admin ] " .. getPlayerName ( source ) ..": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("V.I.P")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#DCD800* [ VIP ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("SaedAmer")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#cd0000* [ VIP ]#ffff00 سعيد : #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("mosp")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#02AB2F* [ AL-MLOok Event's] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Manager")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#347235* [ T-Developer ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Admin - Ex")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#777777* [ Admin - EX ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Police")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#007F7F* [ Soldier ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Everyone")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#5494A7* [ AL-MLOoK ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) end end )
  3. طيب عاوز شرح لدول اول مرة استخدمهم !
  4. ترا ما طلبت جاهز هات الفنكشنات !
  5. السلام عليكم دلوقتي انا عاوز لما زائر يسب او يهين ما تظهر تظهر كلام outbotchat و في جريد لست خاصة بكل حساب يكتبلو لقد حصلت علي مخالفة و تتحفظ مع الحساب و الكونسول الي يقدر يحذفها و يقدر يشوف اي زائر كم مخالفاته بواسطه يكتب باليدت اسم حساب الشخص
  6. exports.killmessages:outputMessage
  7. ما في شئ بالدي بق لو في كنت جبت !
  8. السلام عليكم اولا عاوز لما العب يكون في تيم تيمه يتحفظ عشان لو خرج او دخل ثانيا معي مود اقدر اسوي تيم من ف8 عاوز لما يسوي التيم يدخل فيه تلقائي
  9. تمت الافاده شكرا اوسكار
  10. السلام عليكم دلوقتي انا عامل لما يكتب باليدت و يضغط علي بتن ترسل الرسالة ل جريد لست بس لازم يكون محدد علي شيك بوكس و يكون في رتبة اسمها chat ما شتغلت كنلت GUIEditor.gridlist[1] = guiCreateGridList(9, 28, 480, 358, false, wnd) guiGridListAddColumn(GUIEditor.gridlist[1], "Name", 0.5) guiGridListAddColumn(GUIEditor.gridlist[1], "Message", 0.5) GUIEditor.button[3] = guiCreateButton(505, 400, 98, 24, "ارسال", false, wnd) guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFFFFFFF") addEvent("sendmessage2",true) addEventHandler("sendmessage2",root, function(Name,Text) local gg = guiGridListAddRow(GUIEditor.gridlist[1]) if (guiRadioButtonGetSelected(GUIEditor.checkbox[1]) == true)then guiGridListSetItemText(GUIEditor.gridlist[1],gg, 1,"**[ Console ] :", false, false) guiGridListSetItemText(GUIEditor.gridlist[1],gg, 2,Name, false, false) guiGridListSetItemText(GUIEditor.gridlist[1],gg, 3,tostring(Text), false, false) guiGridListSetItemColor(GUIEditor.gridlist[1],gg, 2, 255, 0, 0, 255) guiGridListSetItemColor(GUIEditor.gridlist[1],gg, 3, 255, 0, 0, 255) guiGridListSetItemColor(GUIEditor.gridlist[1],gg, 1,255, 0, 0, 255) end end ) function getFixedName(player) if isElement(player) then local hisName = getPlayerName(player) if hisName then result = string.gsub(hisName, '#%x%x%x%x%x%x', '') if result then return result end end end end function Rg3AsmkL3bh( button ) if button == "enter" then if source == GUIEditor.button[3] then if guiGetText(GUIEditor.edit[2]) ~= '' then triggerServerEvent("chat",localPlayer,guiGetText(GUIEditor.edit[2])) guiSetText (GUIEditor.edit[2], "" ) else guiSetEnabled(GUIEditor.button[3], false) setTimer(guiSetEnabled, 3000, 1, GUIEditor.button[3], true) end end end addEventHandler("onClientGUIClick",root,Rg3AsmkL3bh) addEventHandler("onClientKey",root,Rg3AsmkL3bh) end سيرفر addEventHandler("onPlayerLogin",root,function () if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("chat")) ) then triggerClientEvent(source,"onAddPlayers",source,getPlayerName(source):gsub("#%x%x%x%x%x%x","")) end end) addEvent("onGetPlayers",true) addEventHandler("onGetPlayers",root,function () for i,v in ipairs (getElementsByType("player")) do if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(v)),aclGetGroup("chat")) ) then triggerClientEvent(client,"onAddPlayers",client,getPlayerName(v):gsub("#%x%x%x%x%x%x","")) end end end) addEvent("chat",true) addEventHandler("chat",root,function (text) if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("chat")) ) then triggerClientEvent("sendmessage2",source,getPlayerName(source),text) else triggerClientEvent("sendmessage212",source,getPlayerName(source),text) end end)
  11. االمفروض اعمل بيه ايه بقلك هات واحد انا الي معي و يجيب لاق هو من نفس الموقع
  12. السلام عليكم معي مود كيل مسج لما اشغله يخلي السيرفر لاق لازم ارستر السيرفر عشان الاق يروح في حل ؟ لو ما في حد يجيب كيل مسج ما يجيب لاق
  13. مساعده انا ضفت بوتن يحذف التاج ما شتغل كلنت function guiGridListGetSelectedItemText ( gridList, column ) local item = guiGridListGetSelectedItem ( gridList ) local text = guiGridListGetItemText ( gridList, item, column or 1 ) if ( text ~= '' ) then return text else return false end end 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 function SetWindowVisible ( Panel , StatsP , StatsC ) guiSetVisible( Panel , StatsP) showCursor( StatsC ) centerWindow( Panel ) end local screenW, screenH = guiGetScreenSize() Tag_Window = guiCreateWindow((screenW - 353) / 2, (screenH - 285) / 2, 353, 285, "Tags System", false) guiWindowSetSizable(Tag_Window, false) guiSetVisible(Tag_Window,false) Tag_GridList = guiCreateGridList(10, 24, 332, 207, false, Tag_Window) Tag_Column = guiGridListAddColumn(Tag_GridList, "Players", 0.9) Tag_Edit = guiCreateEdit(9, 240, 260, 24, "", false, Tag_Window) Tag_Buuton_G = guiCreateButton(273, 240, 69, 24, "Give Tag", false, Tag_Window) guiSetFont(Tag_Buuton_G, "default-bold-small") guiSetFont(Tag_GridList, "default-bold-small") back = guiCreateButton(160, 265, 109, 9, "تراجع", false, Tag_Window) guiSetProperty(back, "NormalTextColour", "FFFFFFFF") addCommandHandler('TagPanel', function ( ) guiGridListClear ( Tag_GridList ) for _,Value in next, getElementsByType ( "player" ) do local Row = guiGridListAddRow ( Tag_GridList ) guiGridListSetItemText ( Tag_GridList, Row, Tag_Column, getPlayerName ( Value ), false, false ) guiGridListSetItemColor(Tag_GridList,Row,1,math.random(0,255),math.random(0,255),math.random(0,255)) SetWindowVisible ( Tag_Window , not guiGetVisible(Tag_Window) , not guiGetVisible(Tag_Window) ) end end ) addEventHandler('onClientGUIClick',Tag_Buuton_G, function ( ) local Selected , Tag_Name = guiGridListGetSelectedItemText ( Tag_GridList, Tag_Column ) , guiGetText(Tag_Edit) if ( Tag_Name ~= ' ' ) or ( Tag_Name ~= '' ) and ( guiGridListGetSelectedItem (Tag_GridList) ~= -1 ) then local Plr = getPlayerFromName(Selected) setElementData(Plr,'Data_Tag',Tag_Name) outputChatBox("#FFFFFF[Tag System] #53CE41 ", root , 255 , 255 ,255 ,true) elseif(source == back) then setElementData(Plr,'Data_Tag',Tag_Name, false) end end , false ) سيرفر addEventHandler('onPlayerChat',root, function ( msg ) cancelEvent ( ) local Player_Name , Data = getPlayerName ( source ) , getElementData(source,'Data_Tag') outputChatBox("#FF0000 * #FFFFFF[ #CD0000"..Data.."#FFFFFF ]x #A5A5A5"..Player_Name..":#CD0000 "..msg.."", root , 255 , 255 ,255 ,true) end ) executeSQLQuery( ' CREATE TABLE IF NOT EXISTS `Data_S` (Serial, Data) ' ) function onSave( ) local checkData = executeSQLQuery( ' SELECT * FROM `Data_S` WHERE Serial = ? ', getPlayerSerial(source) ) local Data = getElementData(source,'Data_Tag') if ( type ( checkData ) == 'table' and #checkData == 0 or not checkData ) then executeSQLQuery( ' INSERT INTO `Data_S` (Serial, Data) VALUES(?, ?) ', getPlayerSerial(source), Data) else local Data = getElementData(source,'Data_Tag') executeSQLQuery( ' UPDATE`Data_S` SET Serial = ?, Data = ? ', getPlayerSerial(source), Data) end end addEventHandler('onPlayerQuit',getRootElement(),onSave) addEventHandler('onPlayerLogout',getRootElement(),onSave) addEventHandler( 'onPlayerJoin', root, function( ) local Save = executeSQLQuery( ' SELECT * FROM `Data_S` WHERE Serial = ? ', getPlayerSerial(source) ) if ( type ( Save ) == 'table' and #Save == 0 or not Save ) then return end setElementData(source,'Data_Tag',Save[1]['Data']) end )
  14. ماشتغل كلنت function guiGridListGetSelectedItemText ( gridList, column ) local item = guiGridListGetSelectedItem ( gridList ) local text = guiGridListGetItemText ( gridList, item, column or 1 ) if ( text ~= '' ) then return text else return false end end 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 function SetWindowVisible ( Panel , StatsP , StatsC ) guiSetVisible( Panel , StatsP) showCursor( StatsC ) centerWindow( Panel ) end local screenW, screenH = guiGetScreenSize() Tag_Window = guiCreateWindow((screenW - 353) / 2, (screenH - 285) / 2, 353, 285, "Tags System", false) guiWindowSetSizable(Tag_Window, false) guiSetVisible(Tag_Window,false) Tag_GridList = guiCreateGridList(10, 24, 332, 207, false, Tag_Window) Tag_Column = guiGridListAddColumn(Tag_GridList, "Players", 0.9) Tag_Edit = guiCreateEdit(9, 240, 260, 24, "", false, Tag_Window) Tag_Buuton_G = guiCreateButton(273, 240, 69, 24, "Give Tag", false, Tag_Window) guiSetFont(Tag_Buuton_G, "default-bold-small") guiSetFont(Tag_GridList, "default-bold-small") back = guiCreateButton(160, 265, 109, 9, "تراجع", false, Tag_Window) guiSetProperty(back, "NormalTextColour", "FFFFFFFF") addCommandHandler('TagPanel', function ( ) guiGridListClear ( Tag_GridList ) for _,Value in next, getElementsByType ( "player" ) do local Row = guiGridListAddRow ( Tag_GridList ) guiGridListSetItemText ( Tag_GridList, Row, Tag_Column, getPlayerName ( Value ), false, false ) guiGridListSetItemColor(Tag_GridList,Row,1,math.random(0,255),math.random(0,255),math.random(0,255)) SetWindowVisible ( Tag_Window , not guiGetVisible(Tag_Window) , not guiGetVisible(Tag_Window) ) end end ) addEventHandler('onClientGUIClick',Tag_Buuton_G, function ( ) local Selected , Tag_Name = guiGridListGetSelectedItemText ( Tag_GridList, Tag_Column ) , guiGetText(Tag_Edit) if ( Tag_Name ~= ' ' ) or ( Tag_Name ~= '' ) and ( guiGridListGetSelectedItem (Tag_GridList) ~= -1 ) then local Plr = getPlayerFromName(Selected) setElementData(Plr,'Data_Tag',Tag_Name) outputChatBox("#FFFFFF[Tag System] #53CE41 ", root , 255 , 255 ,255 ,true) elseif(source == back) then setElementData(Plr,'Data_Tag',Tag_Name, false) end end , false ) سيرفر addEventHandler('onPlayerChat',root, function ( msg ) cancelEvent ( ) local Player_Name , Data = getPlayerName ( source ) , getElementData(source,'Data_Tag') outputChatBox("#FF0000 * #FFFFFF[ #CD0000"..Data.."#FFFFFF ]x #A5A5A5"..Player_Name..":#CD0000 "..msg.."", root , 255 , 255 ,255 ,true) end ) executeSQLQuery( ' CREATE TABLE IF NOT EXISTS `Data_S` (Serial, Data) ' ) function onSave( ) local checkData = executeSQLQuery( ' SELECT * FROM `Data_S` WHERE Serial = ? ', getPlayerSerial(source) ) local Data = getElementData(source,'Data_Tag') if ( type ( checkData ) == 'table' and #checkData == 0 or not checkData ) then executeSQLQuery( ' INSERT INTO `Data_S` (Serial, Data) VALUES(?, ?) ', getPlayerSerial(source), Data) else local Data = getElementData(source,'Data_Tag') executeSQLQuery( ' UPDATE`Data_S` SET Serial = ?, Data = ? ', getPlayerSerial(source), Data) end end addEventHandler('onPlayerQuit',getRootElement(),onSave) addEventHandler('onPlayerLogout',getRootElement(),onSave) addEventHandler( 'onPlayerJoin', root, function( ) local Save = executeSQLQuery( ' SELECT * FROM `Data_S` WHERE Serial = ? ', getPlayerSerial(source) ) if ( type ( Save ) == 'table' and #Save == 0 or not Save ) then return end setElementData(source,'Data_Tag',Save[1]['Data']) end )
  15. ما فهمت خلاص خلها ما تظهر للكل انت عايزها نجوم تظهر بالشات ولا يجيب له رساله ان دا كلام ممنوع . تجيب له رساله انه كلام ممنوع
  16. ما فهمت خلاص خلها ما تظهر للكل
  17. يب للادمنه فقط من لفل 1 الي كوسنول
  18. السلام عليكم ده كود التاجات انا ضفت علي زر يرجع التاج بس ما شتغل back = guiCreateButton(160, 265, 109, 9, "تراجع", false, Tag_Window) guiSetProperty(back, "NormalTextColour", "FFFFFFFF") addEventHandler('onClientGUIClick',Tag_Buuton_G, function ( ) local Selected , Tag_Name = guiGridListGetSelectedItemText ( Tag_GridList, Tag_Column ) , guiGetText(Tag_Edit) if ( Tag_Name ~= ' ' ) or ( Tag_Name ~= '' ) and ( guiGridListGetSelectedItem (Tag_GridList) ~= -1 ) then local Plr = getPlayerFromName(Selected) setElementData(Plr,'Data_Tag',Tag_Name) outputChatBox("#FFFFFF[Tag System] #53CE41 ", root , 255 , 255 ,255 ,true) elseif(source == back) then setElementData (localPlayer,'Data_Tag',false) end end , false )
  19. السبه او الاهانه الي بالجدول فوق
×
×
  • Create New...