SaedAmer

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

ثانكس معلومة جديدة

لانك مصور فاشل

المود يتنشر مشفر !! يوصلي اول واحد سكاي

ده كود سيرفر حق مود الكونسول يعطي التاج 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 ) ده كود سيرفر حق العب يعطي نفسه تاج في الرنت 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 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 )

طيب ما في ماكشنات اسوي منها ؟

السلام عليكم نرجو منك مراجعة هالموضوع https://forum.multitheftauto.com/viewtopic.php?f ... 90#p897490 وشكراً

i Not understand

سؤال ازاي اخليه ما يكرر مع مود التاجات و مع مود التجات الي في الرنت الي انا صنعو ؟

addEventHandler("onClientGUIClick",root, function() if(source == GUIEditor.button[1]) then if guiGetText (GUIEditor.edit[1]) ~= '' then guiGridListGetSelectedItem ( gridList ) guiGridListGetItemText ( gridList, rowIndex, Playrs ) setElementData (localPlayer,'tag',guiGetText (GUIEditor.edit[1])) end elseif(source == GUIEditor.button[2]) then setElementData (localPlayer,'tag',false) end end)

كلنت function getPlayerFromPartName(name) local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil if name then for _, player in ipairs(getElementsByType("player")) do local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower() if name_:find(name, 1, true) then return player end end end end GUIEditor = { gridlist = {}, window = {}, button = {} } addEventHandler("onClientResourceStart", resourceRoot, function() GUIEditor.window[1] = guiCreateWindow(283, 158, 198, 327, "Solder Panel", false) guiWindowSetSizable(GUIEditor.window[1], false) GUIEditor.gridlist[1] = guiCreateGridList(14, 27, 170, 219, false, GUIEditor.window[1]) guiGridListAddColumn(GUIEditor.gridlist[1], "Name", 0.9) guiGridListAddRow(GUIEditor.gridlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], 0, 1, "-", false, false) GUIEditor.button[1] = guiCreateButton(14, 270, 76, 35, "Slap", false, GUIEditor.window[1]) guiSetFont(GUIEditor.button[1], "default-bold-small") guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") GUIEditor.button[2] = guiCreateButton(108, 270, 76, 35, "Destory", false, GUIEditor.window[1]) guiSetFont(GUIEditor.button[2], "default-bold-small") guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") grid = GUIEditor.gridlist[1] end ) bindKey("m","down", function ( ) guiSetVisible(GUIEditor_Window[1], not guiGetVisible ( GUIEditor_Window[1] ) ) showCursor ( guiGetVisible ( GUIEditor_Window[1] ) ) end ) if ( source == GUIEditor_Button[2] ) then destroy = guiGridListGetItemText ( GUIEditor_Grid[1], guiGridListGetSelectedItem ( GUIEditor_Grid[1] ), 1 ) if destroy then triggerServerEvent ("destroy", getLocalPlayer(), tostring(destroy)) end guiSetInputEnabled(false) elseif ( source == GUIEditor_Button[1] ) then slap = guiGridListGetItemText ( GUIEditor_Grid[1], guiGridListGetSelectedItem ( GUIEditor_Grid[1] ), 1 ) if slap then triggerServerEvent ("slap", getLocalPlayer(), tostring(slap)) guiSetInputEnabled(false) end function update () guiGridListClear(GUIEditor.gridlist[1]) for i,v in ipairs (getElementsByType("player")) do local rp = guiGridListAddRow (GUIEditor.gridlist[1]) guiGridListSetItemText (GUIEditor.gridlist[1],rp,1,getPlayerName(v):gsub("#%x%x%x%x%x%x", ""),false,false) end end addEventHandler ("onClientResourceStart",resourceRoot,update) addEventHandler ("onClientPlayerJoin",root,update) addEventHandler ("onClientPlayerChangeNick",root,update) addEventHandler ("onClientPlayerQuit",root,update) سيرفر addEvent( "destroy", true) ----destroy car addEventHandler( "destroy", getRootElement(), function ( PlayerNick ) local toWho = getPlayerFromName ( PlayerNick ) local name = getPlayerName ( source ) local theVehicle = getPedOccupiedVehicle ( toWho ) if ( isElement(theVehicle) ) then destroyElement ( theVehicle ) outputChatBox("* Your vehicle has been destroyed by ".. name .."", toWho, 255, 0, 0, true ) else outputChatBox("* he don't have a car !!", source, 255, 0, 0, true ) end end ) --------------- addEvent("slap", true) function slap( PlayerNick ) local toWho = getPlayerFromName ( PlayerNick ) local name = getPlayerName ( source ) data = 100 if ( getElementHealth ( toWho ) > 0 ) and ( not isPedDead ( toWho ) ) then if ( tonumber ( data ) > getElementHealth ( toWho ) ) then setTimer ( killPed, 50, 1, toWho ) else setElementHealth ( toWho, getElementHealth ( toWho ) - data ) end local x, y, z = getElementVelocity ( toWho ) setElementVelocity ( toWho, x , y, z + 0.2 ) outputChatBox("* [ #ffff00".. PlayerNick .."#ff0000 ] #999999 has been slapped by#ff0000 [ #ffff00" .. name .."#ff0000 ]", root, 255, 0, 0, true ) end end addEventHandler("slap", getRootElement(),slap)

كده ؟ guiGridListGetSelectedItem ( gridList ) guiGridListGetItemText ( gridList, rowIndex, Playrs )

كده ؟ + فين الكود الي هو يعرف ان انا مختار لاعب من الجريد لست وكيف اخليها كده *[ التاج ]x اسم الاعب كلنت addEventHandler("onClientGUIClick",root, function() if(source == GUIEditor.button[1]) then if guiGetText (GUIEditor.edit[1]) ~= '' then setElementData (localPlayer,'tag',guiGetText (GUIEditor.edit[1])) end elseif(source == GUIEditor.button[2]) then setElementData (localPlayer,'tag',false) end end) سيرفر addEventHandler("onPlayerChat",root,function (msg) local tag = getElementData(source,"tag") outputChatBox(tag ..' '.. getPlayerName(source) .. ' : '.. msg,root, r, g, b, true) return cancelEvent() end)

if ( source == GUIEditor_Button[2] ) then destroy = guiGridListGetItemText ( GUIEditor_Grid[1], guiGridListGetSelectedItem ( GUIEditor_Grid[1] ), 1 ) if destroy then triggerServerEvent ("destroy", getLocalPlayer(), tostring(destroy)) end guiSetInputEnabled(false) elseif ( source == GUIEditor_Button[1] ) then slap = guiGridListGetItemText ( GUIEditor_Grid[1], guiGridListGetSelectedItem ( GUIEditor_Grid[1] ), 1 ) if slap then triggerServerEvent ("slap", getLocalPlayer(), tostring(slap)) guiSetInputEnabled(false) end سيرفر addEvent( "destroy", true) ----destroy car addEventHandler( "destroy", getRootElement(), function ( PlayerNick ) local toWho = getPlayerFromName ( PlayerNick ) local name = getPlayerName ( source ) local theVehicle = getPedOccupiedVehicle ( toWho ) if ( isElement(theVehicle) ) then destroyElement ( theVehicle ) outputChatBox("* Your vehicle has been destroyed by ".. name .."", toWho, 255, 0, 0, true ) else outputChatBox("* he don't have a car !!", source, 255, 0, 0, true ) end end ) --------------- addEvent("slap", true) function slap( PlayerNick ) local toWho = getPlayerFromName ( PlayerNick ) local name = getPlayerName ( source ) data = 100 if ( getElementHealth ( toWho ) > 0 ) and ( not isPedDead ( toWho ) ) then if ( tonumber ( data ) > getElementHealth ( toWho ) ) then setTimer ( killPed, 50, 1, toWho ) else setElementHealth ( toWho, getElementHealth ( toWho ) - data ) end local x, y, z = getElementVelocity ( toWho ) setElementVelocity ( toWho, x , y, z + 0.2 ) outputChatBox("* [ #ffff00".. PlayerNick .."#ff0000 ] #999999 has been slapped by#ff0000 [ #ffff00" .. name .."#ff0000 ]", root, 255, 0, 0, true ) end end addEventHandler("slap", getRootElement(),slap)

السلام عليكم انا معي جريد لست فيها اسماء الاعبين و بطن عاوز لما احدد علي حد في الجريد لست و اكتب في الادت اي شئ و اضغط بطن يعطيلو التاج مثلا انا اخترت نفسي و كتبت في الايدت كده Owner و ضغط بطن يطلع في الشات كده *[ Owner ]x |xSaedAmer |xSaedAmer ده اسمي

برا كيلر <3

يوصخ علي اساس ما تعرف تفتح خخخخخخخخخخخخخ كلمني سكاي يوصخ

-- مشكور --

الكلام يتكرر ياكفو ربما بسبب وجود اللاعب في اكثر من قروب الكلام يكرر حتي لو معي رتبة واحده + ما يعمل مسافات بين الكلام مثلا انا كتبت اهلا بك يظهره بالشات كده اهلابك

الكلام يتكرر ياكفو ربما بسبب وجود اللاعب في اكثر من قروب كلامك صحيح

الكلام يتكرر ياكفو

saedamer0 سعد انت عندي

سعد كودك فيه اخطأ unexpected symbol near ',' 339 '' expected near 'end' 340 '' expected near 'end' 341 '' expected near 'end' 342 '' expected near 'end' 345 '' expected near 'end' 346 no loop to break near 'end' 344 unexpected symbol near ')' 347 ')' expected near '}' 333

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

شوف تعرف العالم العادي انا عاوز اعمل بيت يكون عالم تاني ما فيه ولا نبي ادم واحد