Jump to content

MR.GRAND

Members
  • Posts

    854
  • Joined

  • Last visited

  • Days Won

    6

Everything posted by MR.GRAND

  1. عطنا كود الداتا حق اللفل اللي انت حاطه
  2. كم انت ذكي يابني مافي خطأ بالكلنت يعني ؟ ولا بس السيرفر كل شوي تعدل فيه
  3. GUIEditor = { button = {}, label = {} } wnd = {} addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() wnd.give = guiCreateWindow((screenW - 373) / 2, (screenH - 189) / 2, 373, 189, "~# Give Level #~", false) guiWindowSetSizable(wnd.give, false) guiSetAlpha(wnd.give, 1.00) pList = guiCreateGridList(10, 22, 146, 157, false, wnd.give) guiGridListAddColumn(pList, "# Player Name", 0.9) GUIEditor.button[1] = guiCreateButton(251, 152, 112, 27, "~# Close #~", false, wnd.give) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") GUIEditor.label[1] = guiCreateLabel(161, 28, 202, 15, "Player Level :", false, wnd.give) GUIEditor.button[2] = guiCreateButton(163, 54, 88, 24, "Set Level", false, wnd.give) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") GUIEditor.button[3] = guiCreateButton(161, 83, 196, 30, "#Arabic", false, wnd.give) guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFAAAAAA") GUIEditor.button[4] = guiCreateButton(161, 118, 196, 30, "#English", false, wnd.give) guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FFAAAAAA") guiSetVisible(wnd.give,false) end ) --------------------------------------------------------------------------------------------------------------------------- edit = {} addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() SetLevelWnd = guiCreateWindow((screenW - 286) / 2, (screenH - 134) / 2, 286, 134, "# Set Level", false) guiWindowSetSizable(SetLevelWnd, false) guiSetAlpha(SetLevelWnd, 1.00) edit.gv = guiCreateEdit(11, 37, 265, 33, "", false, SetLevelWnd) guiEditSetMaxLength(edit.gv, 65535) SetLevel = guiCreateButton(23, 87, 94, 32, "Set Level", false, SetLevelWnd) guiSetProperty(SetLevel, "NormalTextColour", "FFAAAAAA") SLClose = guiCreateButton(166, 87, 94, 32, "Close", false, SetLevelWnd) guiSetProperty(SLClose, "NormalTextColour", "FFAAAAAA") guiSetVisible(SetLevelWnd,false) end ) ---------------------------------------------------------------------------------------------------------------------------- bindKey ("n","down", function () triggerServerEvent ("checkMido",localPlayer) end) addEvent ("mIDO",true) addEventHandler ("mIDO",root, function () guiSetVisible(wnd.give,not guiGetVisible(wnd.give)) showCursor(guiGetVisible(wnd.give)) guiSetInputEnabled (guiGetVisible(wnd.give)) end ) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == GUIEditor.button[2] ) then guiSetVisible(SetLevelWnd,true) guiSetVisible(wnd.give,false) end end ) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == GUIEditor.button[1] ) then guiSetVisible(wnd.give,false) showCursor(false) guiSetInputEnabled(false) end end ) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == SLClose ) then guiSetVisible(SetLevelWnd,false) showCursor(false) guiSetInputEnabled(false) end end ) ---------------------------------------------------------------------------------------------------------------------------- function update () guiGridListClear(pList) for i,v in ipairs (getElementsByType("player")) do local rp = guiGridListAddRow (pList) guiGridListSetItemText (pList,rp,1,getPlayerName(v),false,false) end end addEventHandler ("onClientResourceStart",resourceRoot,update) addEventHandler ("onClientPlayerJoin",root,update) addEventHandler ("onClientPlayerChangeNick",root,update) addEventHandler ("onClientPlayerQuit",root,update) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == SetLevel ) then sel = guiGridListGetSelectedItem( pList ) if sel ~= -1 then guiGetText(edit.gv) setElementData(localPlayer,"Level",getElementData(localPlayer,"Level") + amount(guiGridListGetItemText(pList ,sel,1))) end end,false) جرب GUIEditor = { button = {}, label = {} } wnd = {} addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() wnd.give = guiCreateWindow((screenW - 373) / 2, (screenH - 189) / 2, 373, 189, "~# Give Level #~", false) guiWindowSetSizable(wnd.give, false) guiSetAlpha(wnd.give, 1.00) pList = guiCreateGridList(10, 22, 146, 157, false, wnd.give) guiGridListAddColumn(pList, "# Player Name", 0.9) GUIEditor.button[1] = guiCreateButton(251, 152, 112, 27, "~# Close #~", false, wnd.give) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") GUIEditor.label[1] = guiCreateLabel(161, 28, 202, 15, "Player Level :", false, wnd.give) GUIEditor.button[2] = guiCreateButton(163, 54, 88, 24, "Set Level", false, wnd.give) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") GUIEditor.button[3] = guiCreateButton(161, 83, 196, 30, "#Arabic", false, wnd.give) guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFAAAAAA") GUIEditor.button[4] = guiCreateButton(161, 118, 196, 30, "#English", false, wnd.give) guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FFAAAAAA") guiSetVisible(wnd.give,false) end ) --------------------------------------------------------------------------------------------------------------------------- edit = {} addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() SetLevelWnd = guiCreateWindow((screenW - 286) / 2, (screenH - 134) / 2, 286, 134, "# Set Level", false) guiWindowSetSizable(SetLevelWnd, false) guiSetAlpha(SetLevelWnd, 1.00) edit.gv = guiCreateEdit(11, 37, 265, 33, "", false, SetLevelWnd) guiEditSetMaxLength(edit.gv, 65535) SetLevel = guiCreateButton(23, 87, 94, 32, "Set Level", false, SetLevelWnd) guiSetProperty(SetLevel, "NormalTextColour", "FFAAAAAA") SLClose = guiCreateButton(166, 87, 94, 32, "Close", false, SetLevelWnd) guiSetProperty(SLClose, "NormalTextColour", "FFAAAAAA") guiSetVisible(SetLevelWnd,false) end ) ---------------------------------------------------------------------------------------------------------------------------- bindKey ("n","down", function () triggerServerEvent ("checkMido",localPlayer) end) addEvent ("mIDO",true) addEventHandler ("mIDO",root, function () guiSetVisible(wnd.give,not guiGetVisible(wnd.give)) showCursor(guiGetVisible(wnd.give)) guiSetInputEnabled (guiGetVisible(wnd.give)) end ) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == GUIEditor.button[2] ) then guiSetVisible(SetLevelWnd,true) guiSetVisible(wnd.give,false) end end ) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == GUIEditor.button[1] ) then guiSetVisible(wnd.give,false) showCursor(false) guiSetInputEnabled(false) end end ) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == SLClose ) then guiSetVisible(SetLevelWnd,false) showCursor(false) guiSetInputEnabled(false) end end ) ---------------------------------------------------------------------------------------------------------------------------- function update () guiGridListClear(pList) for i,v in ipairs (getElementsByType("player")) do local rp = guiGridListAddRow (pList) guiGridListSetItemText (pList,rp,1,getPlayerName(v),false,false) end end addEventHandler ("onClientResourceStart",resourceRoot,update) addEventHandler ("onClientPlayerJoin",root,update) addEventHandler ("onClientPlayerChangeNick",root,update) addEventHandler ("onClientPlayerQuit",root,update) ---------------------------------------------------------------------------------------------------------------------------- addEventHandler("onClientGUIClick",resourceRoot, function ( ) if ( source == SetLevel ) then sel = guiGridListGetSelectedItem( pList ) if sel ~= -1 then guiGetText(edit.gv) setElementData(localPlayer,"Level",getElementData(localPlayer,"Level" + edit.gv) (guiGridListGetItemText(pList ,sel,1))) end end end )
  4. حطه كذا ! ولاتغير نوع الماركر لان ذاك النوع اللي فوق موراضي يغير الالفا --Police LS local marker = createMarker ( 1555.2763671875, -1675.646484375, 14.19 +.8, "cylinder", 2.5, 255, 255, 255, 0 ) --- Posicion del Marcador ( teleport ). function entrarGuard (hitPlayer, matchingDimension) local playerTeam = getPlayerTeam (hitPlayer) local Clann = getTeamFromName ( "Police LS" ) --Equipo que podra usar el marcador. if ( playerTeam ) == Clann then setElementPosition (hitPlayer, 246.8203125, 64.3037109375, 1003.640) -- Posicion del jugador donde aparecere cuando toque el marcador. setElementInterior ( hitPlayer, 6 ) -- Interior donde aparecera el jugador. setElementRotation ( hitPlayer, 0, 0, 0 ) --Rotacion del jugador ( donde aparecera ) else end end addEventHandler ( "onMarkerHit", marker, entrarGuard )
  5. Client : function dxDrawTextOnElement(TheElement,text,height,distance,R,G,B,alpha,size,font,checkBuildings,checkVehicles,checkPeds,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement) local x, y, z = getElementPosition(TheElement) local x2, y2, z2 = getElementPosition(localPlayer) local distance = distance or 20 local height = height or 1 local checkBuildings = checkBuildings or true local checkVehicles = checkVehicles or false local checkPeds = checkPeds or false local checkObjects = checkObjects or true local checkDummies = checkDummies or true local seeThroughStuff = seeThroughStuff or false local ignoreSomeObjectsForCamera = ignoreSomeObjectsForCamera or false local ignoredElement = ignoredElement or nil if (isLineOfSightClear(x, y, z, x2, y2, z2, checkBuildings, checkVehicles, checkPeds , checkObjects,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement)) then local sx, sy = getScreenFromWorldPosition(x, y, z+height) if(sx) and (sy) then local distanceBetweenPoints = getDistanceBetweenPoints3D(x, y, z, x2, y2, z2) if(distanceBetweenPoints < distance) then dxDrawText(text, sx+2, sy+2, sx, sy, tocolor(R or 255, G or 255, B or 255, alpha or 255), (size or 1)-(distanceBetweenPoints / distance), font or "arial", "center", "center") end end end end addEvent("Level1",true) addEventHandler("Level1", root, function ( ) dxDrawTextOnElement(source,"Level 1",1,20,0,0,255,255,1,"pricedown") end ) addEvent("Level2",true) addEventHandler("Level2", root, function ( ) dxDrawTextOnElement(source,"Level 2",1,20,0,0,255,255,1,"pricedown") end ) addEvent("Level3",true) addEventHandler("Level3", root, function ( ) dxDrawTextOnElement(source,"Level 3",1,20,0,0,255,255,1,"pricedown") end ) addEvent("Level4",true) addEventHandler("Level4", root, function ( ) dxDrawTextOnElement(source,"Level 4",1,20,0,0,255,255,1,"pricedown") end ) addEvent("Level5",true) addEventHandler("Level5", root, function ( ) dxDrawTextOnElement(source,"Level 5",1,20,0,0,255,255,1,"pricedown") end ) addEvent("Level6",true) addEventHandler("Level6", root, function ( ) dxDrawTextOnElement(source,"Level 6",1,20,0,0,255,255,1,"pricedown") end ) addEvent("HeadAdmin",true) addEventHandler("HeadAdmin", root, function ( ) dxDrawTextOnElement(source,"Head Admin",1,20,0,0,255,255,1,"pricedown") end ) addEvent("Console",true) addEventHandler("Console", root, function ( ) dxDrawTextOnElement(source,"Console",1,20,0,0,255,255,1,"pricedown") end ) Server : --سيرفر function HelpF ( player ) p = getPlayerFromName ( player ) local Acc = getAccountName( getPlayerAccount ( p ) ) if isObjectInACLGroup("user."..Acc, aclGetGroup( "Level 1" ) ) then triggerClientEvent( source, "Level1", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( "Level 2" ) ) then triggerClientEvent( source, "Level2", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( "Level 3" ) ) then triggerClientEvent( source, "Level3", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( "Level 4" ) ) then triggerClientEvent( source, "Level4", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( "Level 5" ) ) then triggerClientEvent( source, "Level5", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( "Level 6" ) ) then triggerClientEvent( source,"Level6", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( Head.Admin ) ) then triggerClientEvent( source,"HeadAdmin", source) elseif isObjectInACLGroup("user."..Acc, aclGetGroup( Console ) ) then triggerClientEvent( source,"Console", source) end end
  6. --Police LS local marker = createMarker ( 1555.2763671875, -1675.646484375, 16.19 +.8, "arrow", 2.5, 255, 255, 255, 0 ) --- Posicion del Marcador ( teleport ). function entrarGuard (hitPlayer, matchingDimension) local playerTeam = getPlayerTeam (hitPlayer) local Clann = getTeamFromName ( "Police LS" ) --Equipo que podra usar el marcador. if ( playerTeam ) == Clann then setElementPosition (hitPlayer, 246.8203125, 64.3037109375, 1003.640) -- Posicion del jugador donde aparecere cuando toque el marcador. setElementInterior ( hitPlayer, 6 ) -- Interior donde aparecera el jugador. setElementRotation ( hitPlayer, 0, 0, 0 ) --Rotacion del jugador ( donde aparecera ) else end end addEventHandler ( "onMarkerHit", marker, entrarGuard )
  7. السلام عليكم ورحمة الله وبركاته ... سويت اليوم شوب اسلحة بسيط وقلت بنشره ^^ صورة اللوحة : تقدر تغير أماكن الماركرات واضافة ماركرات جديدة + تغيير الأسلحة او اضافة اسلحة جديدة إلى السكربت من ملف : SettingeC.lua مجتمع MultiTheftAuto العربي | للمشاركة معنا | https://www.facebook.com/groups/luaprofessional/ لتحميل السكربت : https://community.multitheftauto.com/in ... s&id=12977 Skype : kamel1234128
  8. ابغى اعرف شغلة وش شعورك لما شفت اسم الحدث كيف رح يتعرف على اسم الاعب ؟ والسورس حقت الريسورس مو حقت الاعب ! هنا المصدر هو السكربت موب الاعب !!!
  9. addCommandHandler -- for all functions ! --1-- getPlayerTeam getTeamColor setVehicleColor --2-- getPlayersInTeam for -- loop players team getElementPorisiot -- for source setElementPosition -- for players in the team --3-- getPlayersInTeam for -- loop players team setElementModel -- set skin for the players
  10. اعمل نفسك ميت يــ ابني
  11. يبوي انا مجرب كودي وطالع من التيم ومتكلم بالشات مافي شي بالد\يبوق
  12. انت تكتب فلوس بالشات ولا في اف 8 ؟
  13. الكود شغال تأكد من السترنق اللي تكتبه
  14. لو اللاعب مو بالتيم راح يجي باد ارقمنت بالديبق جرب كودك وانت تعرف انت مسوي يجيب لون التيم وهو صاحب الموضوع مسوي يجيب لون تاج الاعب getPlayerNametagColor فــ كودك اللي يجي باد ارقمنت .. كودي جربته 100 مية
  15. function Chat(text) local playerTeam = getPlayerTeam(source) if playerTeam then -- تحقق اذا كان التيم مو موجود مايطلع اخطاء بالديبق local r, g, b = getTeamColor (playerTeam) outputChatBox("" ..getTeamName(playerTeam) .." [ Lv.3 ] " .. getPlayerName ( source ) .. ":#ffFFff " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: [ Lv.3 ] " .. getTeamName(playerTeam) .. ": " .. text) end end addEventHandler("onPlayerChat",root,Chat) تم تجربة الكود وبدون تحقق من التيم :\ لو الاعب مو بالتيم يجي اسمه فقط مايبيلها كل اللي فوق
  16. cancelEvent() ليش يكنسل الايفنت عشان مايكرر بالشات
  17. addEventHandler( 'onPlayerChat', root, function(text) cancelEvent() if tostring(text) then local r, g, b = getPlayerNametagColor(source) local Team = getTeamName(getPlayerTeam ( source )) local Name = getPlayerName ( source ) outputChatBox("" .. Team .." [ Lv.3 ] " .. Name .. ":#ffffff " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: [ Lv.3 ] " .. Team .. ": " .. text) end end) ; OK 100%
  18. مايبيلها دي بق سطر 2 كيف تجيبون التيم نفسه وتحطونه بالتاج ؟؟ local r, g, b = getPlayerNametagColor(source) local Team = getTeamName(getPlayerTeam ( source )) outputChatBox("" .. Team .." [ Lv.3 ] " .. getPlayerName ( source ) .. ":#ffffff " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: [ Lv.3 ] " .. Team .. ": " .. text) Debug - nothing .
  19. local r, g, b = getPlayerNametagColor(source) outputChatBox("" ..getPlayerTeam ( source ) .." [ Lv.3 ] " .. getPlayerName ( source ) .. ":#ffFFff " .. text, r, g, b, true ) outputServerLog("CHAT: [ Lv.3 ] " .. getPlayerName ( source ) .. ": " .. text)
  20. أول شي البق هذا مافي ^^ لان مسوي شرطية لو ضغط على تشيك بوكس واحد الثاني يروح .. الخ + التايمر وكل شغلآت الحفظ سويتها بــ SQLite
  21. كيف اوضح لك يعني كأنك تقول لوحة تفتح للكونسل وفيها ايديت بوكس يحط سيريال الاعب و يضغط زر تفعيل يسويله تفعيل للأملاك الخاصة
  22. هو يبي لوحة تفعيل يوزرات لــ الأملاك الخاصة او لوحة تحط سيريال الاعب وكذا وتسوي له تفعيل لــ الأملاك الخاصة مو مثل ما انت مسوي
  23. executeSQLQuery ( ' CREATE TABLE IF NOT EXISTS `saveteams` (playerSerial,playerTeam) ' ) outputDebugString( "Created Table [saveteams] seccessfully") addEventHandler( 'onPlayerQuit', root, function() local playerSerial = getPlayerSerial(source) local getTeam = getTeamName(getPlayerTeam(source)) outputDebugString(getTeam) if getTeam then local playerTeam = executeSQLQuery( ' SELECT * FROM `saveteams` WHERE playerSerial=? ', playerSerial ) if ( type (playerTeam) == "table" and #playerTeam == 0 or not playerTeam ) then return end executeSQLQuery( ' INSERT INTO `saveteams` (playerSerial,playerTeam) VALUES(?,?) ', playerSerial, getTeam ) else executeSQLQuery( ' UPDATE `saveteams` SET playerSerial=?, playerTeam=? ', playerSerial, getTeam ) end end ) addEventHandler( 'onPlayerJoin', root, function() local getResult = executeSQLQuery( ' SELECT * FROM `saveteams` WHERE playerSerial=? ', getPlayerSerial(source) ) if ( type (getResult) == "table" and #getResult == 0 or not getResult ) then return end for i, value in ipairs(getResult) do setPlayerTeam( source, getTeamFromName(value.playerTeam) ) end end )
  24. المثال يعني اسويلك السستم لان مايصير اسويلك مثال فاضي المفروض تفهم بقواعد البيانات عشان تعرف وظيفتها وكيف تستخدمها لفحص واضافة وتحديث وجلب الأشياء
×
×
  • Create New...