Jump to content

w7sH

Members
  • Posts

    432
  • Joined

  • Last visited

Everything posted by w7sH

  1. طبعاً هذا الكود ماتقدر تفك ميوت اذا أنت مو ف قروب الكونسل أو الأدمن, بس وش المشكلة في الكود هذا groupsTable = {--القروبات الي تبيها ضيفها بهالطريقة "Console", "Admin" } addEventHandler("onPlayerUnmute", root, function (player) local account = getPlayerAccount(player) if account and not isGuestAccount(account) then local accName = getAccountName(account) for _, groupName in ipairs(groupsTable) do local group = aclGetGroup(groupName) if group then if isObjectInACLGroup("user."..accName, group) then outputChatBox(getPlayerName(player).." Has been unmuted.",player) else cancelEvent( ) outputChatBox("You are not admin :|.",player) end end end end end
  2.  Code = createMarker ( -3316.7551269531 , -3213.98046875, 7.2168769836426,"cylinder",100, 255, 0, 0, 0) addEventHandler ( "onMarkerHit", resourceRoot, function ( vehicle ) if ( source == Code ) then if ( getElementType ( vehicle ) == "vehicle" ) then destroyElement ( vehicle ) end end end ) addEventHandler ( "onMarkerHit", Code, function ( hitPlayer ) if getElementType ( hitPlayer ) == "player" then toggleControl ( hitPlayer, "fire", false ) toggleControl ( hitPlayer, "aim_weapon", false ) toggleControl ( hitPlayer, "fire", false) toggleControl (hitPlayer, "next_weapon", false) toggleControl (hitPlayer, "previous_weapon", false) toggleControl (hitPlayer, "sprint", false) toggleControl (hitPlayer, "aim_weapon", false) toggleControl (hitPlayer, "vehicle_fire", false) toggleControl (hitPlayer,"action", false) toggleControl (hitPlayer,"aim_weapon", false) elseif getElementType ( hitPlayer ) == "vehicle" then local Player = getVehicleController ( hitPlayer ) outputChatBox ( "* ممنوع دخول المواتر هنا !", Player, 255, 0, 0, true ) destroyElement ( hitPlayer ) end end ) نفس المشكله - ملاحظة كل شي شغال اذا نظام السلاح
  3.  Code = createMarker ( -3316.7551269531 , -3213.98046875, 7.2168769836426,"cylinder",100, 255, 0, 0, 0) addEventHandler ( "onMarkerHit", resourceRoot, function ( vehicle ) if ( source == SaaD ) then if ( getElementType ( vehicle ) == "vehicle" ) then destroyElement ( vehicle ) end end end ) addEventHandler ( "onMarkerHit", SafahM, function ( hitPlayer ) if getElementType ( hitPlayer ) == "player" then toggleControl ( hitPlayer, "fire", false ) toggleControl ( hitPlayer, "aim_weapon", false ) toggleControl ( hitPlayer, "fire", false) toggleControl (hitPlayer, "next_weapon", false) toggleControl (hitPlayer, "previous_weapon", false) toggleControl (hitPlayer, "sprint", false) toggleControl (hitPlayer, "aim_weapon", false) toggleControl (hitPlayer, "vehicle_fire", false) elseif getElementType ( hitPlayer ) == "vehicle" then local Player = getVehicleController ( hitPlayer ) outputChatBox ( "* ممنوع دخول المواتر هنا !", Player, 255, 0, 0, true ) destroyElement ( hitPlayer ) end end ) انا ضايف كود ممنوع يطلع السلاح اذا خش الماركر . لكن يقدر يطلع ويطلق وش المشكلة ^ ؟
  4. w7sH

    كود

    انا مامعي اكواد عشان احوال؟؟ انا طلبت مساعدة ليه لو عندي أكواد كان حليتها من زمان ولا جيت هنا..!
  5. w7sH

    كود

    ابيها على حسابه أو قروب معين .. يكون أفضل, وأتمنى مساعدتنا في هذا الشي
  6. w7sH

    كود

    السلام عليكم ورحمة الله وبركاتة .. ابي كود صورة بحجم صغير تكون فوق راس اللاعب بحجم صغير وتكون عن طريق حسابه أو سيرياله هو مايشوفها اذا كانت فوق راسه لكن بقية اللاعبين بالسيرفر يشوفونها
  7. ------------------------------------------
  8. مافهمت شي والله من أكواد عناد ؟ تقدر تعدلها لي أو تعطيني أكواد اضيفها
  9. انا مسوي شيك بوكس جديد ل Auto Login بس مايشتغل معي
  10. اللوحة شغاله لكن فيه مشاكل عديده وذكرتها فوق..
  11. مافهمتك ؟ ممكن تطرح لي أكواد تنصحني بها, لاني جربت كل الطرق وماضبط معي شي
  12. وبعض الاحيان يسجل تلقائي بس تطلع اللوحة ويختفي الماوس ..
  13. كل شي شغال لكن الـ Auto Login ماضبط معي مدري وش المشكلة؟ وبرضوا حفظ الحساب مايضبط يعني مره يحفظ ومره لا فيه مشكلة؟ .
  14. السلام عليكم ورحمة الله وبركاتة .. عندي مشكلة بسيطة في لوحة التسجيل وهي مشكلة في تسجيل الدخول التلقائي + حفظ الحساب يعني اذا حطيت صح على الشيك بوكس وطلعت ودخلت مايحفظ الحساب معك مع ان الاكواد صحيحة بس مدري وش المشكلة؟ والمشكلة الآخرى مسوي شيك بوكس ثاني لـ التسجيل التلقائي ولا ضبطت معي الأكواد كلنكت GUIEditor = { checkbox = {}, staticimage = {}, edit = {}, button = {}, window = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() triggerServerEvent ( "On", localPlayer ) local screenW, screenH = guiGetScreenSize() GUIEditor.window[1] = guiCreateWindow((screenW - 590) / 2, (screenH - 428) / 2, 590, 428, "Login System", false) guiWindowSetSizable(GUIEditor.window[1], false) GUIEditor.staticimage[1] = guiCreateStaticImage(9, 23, 571, 232, "Login.png", false, GUIEditor.window[1]) GUIEditor.edit[1] = guiCreateEdit(178, 283, 233, 23, "", false, GUIEditor.window[1]) GUIEditor.label[1] = guiCreateLabel(178, 259, 233, 24, "UserName:", false, GUIEditor.window[1]) guiSetFont(GUIEditor.label[1], "default-bold-small") guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[1], "center") GUIEditor.label[2] = guiCreateLabel(178, 306, 233, 24, "PassWord:", false, GUIEditor.window[1]) guiSetFont(GUIEditor.label[2], "default-bold-small") guiLabelSetHorizontalAlign(GUIEditor.label[2], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[2], "center") GUIEditor.edit[2] = guiCreateEdit(178, 330, 233, 23, "", false, GUIEditor.window[1]) GUIEditor.checkbox[1] = guiCreateCheckBox(178, 354, 107, 16, "Show Password", false, false, GUIEditor.window[1]) guiSetFont(GUIEditor.checkbox[1], "default-bold-small") GUIEditor.checkbox[2] = guiCreateCheckBox(326, 354, 85, 16, "Rember Me", false, false, GUIEditor.window[1]) guiSetFont(GUIEditor.checkbox[2], "default-bold-small") GUIEditor.checkbox[3] = guiCreateCheckBox(178, 312, 82, 12, "Auto Login", true, false, GUIEditor.window[1]) guiSetFont(GUIEditor.checkbox[3], "default-bold-small") GUIEditor.button[1] = guiCreateButton(178, 380, 113, 27, "Register", false, GUIEditor.window[1]) guiSetFont(GUIEditor.button[1], "default-bold-small") guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFFFFFFF") GUIEditor.button[2] = guiCreateButton(298, 380, 113, 27, "Login", false, GUIEditor.window[1]) guiSetFont(GUIEditor.button[2], "default-bold-small") guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFFFFFFF") guiEditSetMasked(GUIEditor.edit[2], true) showChat ( false ) setTimer ( function ( ) fadeCamera ( true ) local x, y, z, x1, y1, z1 = unpack ( TabelCamera [ math.random ( #TabelCamera ) ] ) setCameraMatrix ( x, y, z, x1, y1, z1 ) guiSetVisible ( GUIEditor.window[1], true ) end, 2500, 1 ) showCursor ( true ) end ) addEventHandler ( "onClientGUIClick", root, function ( ) if guiCheckBoxGetSelected ( GUIEditor.checkbox[1] ) then guiEditSetMasked ( GUIEditor.edit[2], false ) else guiEditSetMasked ( GUIEditor.edit[2], true ) end if source == GUIEditor.button[1] then if not guiGetText ( GUIEditor.edit[1] ) ~= "" and guiGetText ( GUIEditor.edit[2] ) ~= "" then triggerServerEvent ( "onRegister", localPlayer, guiGetText ( GUIEditor.edit[1] ), guiGetText ( GUIEditor.edit[2] ) ) else exports ["guimessages"] : outputClient ( "# - [ #ffffff * Worng Username Or Password#ff0000 ] - #" , 255, 0, 0, true ) end elseif source == GUIEditor.button[2] then if not guiGetText ( GUIEditor.edit[1] ) ~= "" and guiGetText ( GUIEditor.edit[2] ) ~= "" then if guiCheckBoxGetSelected ( GUIEditor.checkbox[2] ) then triggerServerEvent ( "onLogin", localPlayer, guiGetText ( GUIEditor.edit[1] ), guiGetText ( GUIEditor.edit[2] ), "True" ) else triggerServerEvent ( "onLogin", localPlayer, guiGetText ( GUIEditor.edit[1] ), guiGetText ( GUIEditor.edit[2] ), "False" ) end else exports ["guimessages"] : outputClient ( "# - [ #ffffff * Worng Username Or Password#ff0000 ] - #" , 255, 0, 0, true ) end end end ) addEvent ( "Yes", true ) addEventHandler ( "Yes", root, function ( ) showCursor ( false ) guiSetVisible ( GUIEditor.window[1], false ) showChat ( true ) setCameraTarget ( localPlayer ) end ) addEvent ( "setInfo", true ) addEventHandler ( "setInfo", root, function ( UserName, PassWord ) guiSetText ( GUIEditor.edit[1], UserName ) guiSetText ( GUIEditor.edit[2], PassWord ) end ) سيرفر local Table = { { x, y, z }, { x, y, z }, { x, y, z }, { x, y, z }, { x, y, z }, { x, y, z }, } addEventHandler( "onResourceStart", resourceRoot, function ( ) executeSQLQuery ( "CREATE TABLE IF NOT EXISTS SaveAccount ( PlayerSerial, UserName, PassWord )" ) executeSQLQuery ( "CREATE TABLE IF NOT EXISTS AutoLogin ( PlayerSerial, AutoLogin )" ) end ) addEvent( "onRegister", true ) addEventHandler ( "onRegister", root, function ( User, PassWord ) local Account = addAccount ( tostring ( User ), tostring ( PassWord ) ) if Account then exports ["guimessages"] : outputServer ( source, "UserName: ".. User , 0, 255, 0, true ) exports ["guimessages"] : outputServer ( source, "PassWord: ".. PassWord , 0, 255, 0, true ) else exports ["guimessages"] : outputServer ( source, "# - [ #ffffff * This account already exists#ff0000 ] - #" , 255, 0, 0, true ) end end ) addEvent( "onLogin", true ) addEventHandler ( "onLogin", root, function ( User, PassWord, Text ) local Account = getAccount ( tostring ( User ), tostring ( PassWord ) ) local SQL = executeSQLQuery ( "SELECT * FROM SaveAccount WHERE PlayerSerial = ? ", getPlayerSerial ( client ) ) local SQL1 = executeSQLQuery ( "SELECT * FROM AutoLogin WHERE PlayerSerial = ? ", getPlayerSerial ( client ) ) if Account then if Text == "True" then if #SQL == 0 then executeSQLQuery ( "INSERT INTO AutoLogin ( PlayerSerial, AutoLogin ) VALUES ( ?, ? ) ", getPlayerSerial ( client ), "1" ) executeSQLQuery ( "INSERT INTO SaveAccount ( PlayerSerial, UserName, PassWord ) VALUES ( ?, ?, ? ) ", getPlayerSerial ( client ), tostring ( User ), tostring ( PassWord ) ) else executeSQLQuery ( "UPDATE SaveAccount SET PlayerSerial = ?, UserName = ?, PassWord = ? ", getPlayerSerial ( client ), tostring ( User ), tostring ( PassWord ) ) executeSQLQuery ( "UPDATE AutoLogin SET PlayerSerial = ?, AutoLogin = ?", getPlayerSerial ( client ), "1" ) end else if #SQL1 == 0 then executeSQLQuery ( "INSERT INTO AutoLogin ( PlayerSerial, AutoLogin ) VALUES ( ?, ? ) ", getPlayerSerial ( client ), "1" ) else executeSQLQuery ( "UPDATE AutoLogin SET PlayerSerial = ?, AutoLogin = ?", getPlayerSerial ( client ), "1" ) end end logIn ( client, Account, PassWord ) triggerClientEvent ( source, "Yes", source ) exports ["guimessages"] : outputServer ( source, "# - [ #ffffff Welcome To Server#ff0000 ] - #" , 255, 0, 0, true ) local x, y, z = unpack ( Table [ math.random ( #Table ) ] ) setElementPosition ( source, x, y, z ) else exports ["guimessages"] : outputServer ( source, "# - [ #ffffff * Worng Username Or Password#ff0000 ] - #" , 255, 0, 0, true ) end end ) addEvent( "On", true ) addEventHandler ( "On", root, function ( ) local SQLListe = executeSQLQuery ( "SELECT * FROM SaveAccount WHERE PlayerSerial = ? ", getPlayerSerial ( client ) ) local SQLListe1 = executeSQLQuery ( "SELECT * FROM AutoLogin WHERE PlayerSerial = ? ", getPlayerSerial ( client ) ) if #SQLListe ~= 0 then if #SQLListe1 ~= 0 then triggerClientEvent ( client, "Yes", client ) local Account = getAccount ( tostring ( SQLListe [ 1 ] [ "UserName"] ), tostring ( SQLListe [ 1 ] [ "PassWord"] ) ) logIn ( client, Account, tostring ( SQLListe [ 1 ] [ "PassWord"] ) ) exports ["guimessages"] : outputServer ( client, "# - [ #ffffff Welcome To Server#ff0000 ] - #" , 255, 0, 0, true ) local x, y, z = unpack ( Table [ math.random ( #Table ) ] ) setElementPosition ( source, x, y, z ) else triggerClientEvent ( client, "setInfo", client, SQLListe [ 1 ] [ "UserName"], SQLListe [ 1 ] [ "PassWord"] ) end end end ) addCommandHandler ( "DELETE", function ( PlayerSource ) local SQL = executeSQLQuery ( "SELECT * FROM AutoLogin WHERE PlayerSerial = ? ", getPlayerSerial ( PlayerSource ) ) if #SQL == 0 then exports ["guimessages"] : outputServer ( PlayerSource, "# - [ #ffffff * لقد تم الحذف من قبل#ff0000 ] - #" , 255, 0, 0, true ) else executeSQLQuery ( "DELETE FROM `AutoLogin` WHERE playerSerial = ?", getPlayerSerial ( PlayerSource ) ) exports ["guimessages"] : outputServer ( PlayerSource, "# - [ #ffffff * تم الحذف بنجاح#ff0000 ] - #" , 255, 0, 0, true ) end end )
  15. السلام عليكم اليوم عندي مشكلة في كود بسيط حق الفيسات المشكلة: اذا حط فيس فالشات يعني يكتب " ض1 الفيس يكون نازل تحت ثم يرتفع فوق يعني مو موزون مع الشات هذا الكود وأتمنى المساعدة local root = getRootElement() local rroot = getResourceRootElement() --addEvent("Mensaje",true) local sx,sy = guiGetScreenSize() local chatbox = getChatboxLayout() local y = chatbox["chat_scale"][2] local lineas = chatbox["chat_lines"] local font = "default" if chatbox["chat_font"] == 1 then font = "clear" elseif chatbox["chat_font"] == 2 then font = "default-bold" elseif chatbox["chat_font"] == 3 then font = "arial" end addEventHandler("onClientChatMessage",root,function(txt) for k,v in ipairs(getElementsByType("gui-staticimage",rroot)) do local gx,gy = guiGetPosition(v,true) if string.len(txt) > 100 then guiSetPosition(v, gx,gy-0.025,true) else guiSetPosition(v, gx,gy-0.025,true) end if gy <= 0.01 then destroyElement(v) end end txt = string.gsub(txt,"#[%x][%x][%x][%x][%x][%x]","") local len = 0 if string.len(txt) > 48 then return end if string.find(txt,"ض1") then local text = string.gsub(txt,"ض1","") local len = dxGetTextWidth(text,chatbox["chat_scale"][1],font) local lfin = convertirRelativo(len) outputDebugString("LEN="..tostring(len).." LFIN="..tostring(lfin)) local img = guiCreateStaticImage(0.01875+lfin,0.02+(0.025*(lineas-1)),0.02,0.025,"imagenes/q1.png",true) elseif string.find(txt,"ض2") then local text = string.gsub(txt,"ض2","") local len = dxGetTextWidth(text,chatbox["chat_scale"][1],font) local lfin = convertirRelativo(len) outputDebugString("LEN="..tostring(len).." LFIN="..tostring(lfin)) local img = guiCreateStaticImage(0.01875+lfin,0.02+(0.025*(lineas-1)),0.02,0.025,"imagenes/q2.png",true) elseif string.find(txt,"ض3") then local text = string.gsub(txt,"ض3","") local len = dxGetTextWidth(text,chatbox["chat_scale"][1],font) local lfin = convertirRelativo(len) local img = guiCreateStaticImage(0.01875+lfin,0.02+(0.025*(lineas-1)),0.02,0.025,"imagenes/q3.png",true) elseif string.find(txt,"ض4") then local text = string.gsub(txt,"ض4","") local len = dxGetTextWidth(text,chatbox["chat_scale"][1],font) local lfin = convertirRelativo(len) local img = guiCreateStaticImage(0.01875+lfin,0.02+(0.025*(lineas-1)),0.02,0.025,"imagenes/q4.png",true) elseif string.find(txt,"ض5") then local text = string.gsub(txt,"ض5","") local len = dxGetTextWidth(text,chatbox["chat_scale"][1],font) local lfin = convertirRelativo(len) outputDebugString("LEN="..tostring(len).." LFIN="..tostring(lfin)) local img = guiCreateStaticImage(0.01875+lfin,0.02+(0.025*(lineas-1)),0.02,0.025,"imagenes/q5.png",true) end end) function convertirRelativo(x) local rx = x/sx return rx end
  16. w7sH

    طلب كود

    شكراً لكم جميعاً تمت الإفادة.
  17. جزاك الله خير يا أخ أحمد . تمت الإفادة
  18. function login() if hasObjectPermissionTo(source,"command.mute") then exports.xrkillmessages:outputMessage("[AdminSystem]: * The administration has logged in. " .. getPlayerName(source) .. "| لقد قام الأدمن بستجيل دخوله.",root, 255,255,0, true) playSoundFrontEnd (root, 45 ) end -- The End of " if " end -- The End of " function login " addEventHandler("onPlayerLogin",root, login)
  19. ابي احطها فالتوب بار شات مايضبط ليه؟
  20. function login() if hasObjectPermissionTo(player,"command.mute",true) then outputChatBox("[AdminSystem]: * The administration has logged in. " .. getPlayerName(source) .. "| لقد قام الأدمن بستجيل دخوله.", getRootElement(), 255,255,0, true) playSoundFrontEnd (root, 45 ) end -- The End of " if " end -- The End of " function login " addEventHandler("onPlayerLogin", getRootElement(), login) السلام عليكم .. وش المشكلة في هالكود
  21. تُشكرون تم إضافة كود قديم من عندي وضبط مشكورين لجهودكم.
  22. w7sH

    طلب كود

    الكود حقك تمام بس فيه مشكله وهي يخفي كل الازرار حتى مايقدر يتحرك ولا يسوي شي
  23. w7sH

    طلب كود

    ممكن احد يرفعه لي مود؟ اشوف وش المشكلة
  24. w7sH

    طلب كود

    فعلاً كود سوكينق ماضبط معي بس كود الرجال ضبط وأشتغل تمام . وش المشكلة؟ وتقدر تجرب بنفسك قبل ماتحكم
×
×
  • Create New...