
momar5700
Members-
Posts
381 -
Joined
-
Last visited
Everything posted by momar5700
-
فاهمني انا ابي طريقة بدل ماني افتح المود واحط سيريال فيه اسوي لوحة تحط فيها سيريال وضغط اهطاء يحط سيريال في الفتح يعني كانك دخلت سويت اليي فوق بسرعا يعني مثلا ______________________ يكتب سيريال هنا GUIEditor.edit[2] وضغط على give2 وفي لوححة تانيه وهي لوحة المركبات الخاصة بس مشكله انها متشفرة فابي طريقة بدل مدخل استضافة وتفتح المودات وتفح مود وتكتب سيريال عن طريق الوحة تكتب سيريال وتضغط give2 يحط سيريالك هنا ---------السريالات------- Serial = { ["1D1EEF105D056B8A2F98F3F024E530E3"] = true, ["هنا سريال أي أحد ثاني تبيه تفتح له اللوحة"] = true,--- يحط سيريال هنا هل يوجد طريقة } -- بدي اي طريقة تخليني اخلي اي حد يقدر يفتح سيريرال يرب تساعدوني مممكن مساعدة مممكن مممكن مممكن مممكن مممكن مممكن مممكن مممكن مممكن مممكنمممكن
-
لا انا فاهم طريقة زي بس انا ابي بدل مانا كل شوي ادخل استضافة وافتح المود واكتب سيريال تاني واخليه يفتح لوحة فابي طريقة اسرع وهي اني افتح لوحة من سيرفر واحط سيريال واخليه يفتح لوحة المركبات الخاصصة فهمت اتمنا تفهم
-
تمت حل مشكلة
-
سلام عليكم ورحمة الله وبركاته كل الي ابيه كدا هادي الوحة ابي --[[------------------------------------------------- Notes: > This code is using a relative image filepath. This will only work as long as the location it is from always exists, and the resource it is part of is running. To ensure it does not break, it is highly encouraged to move images into your local resource and reference them there. --]]------------------------------------------------- function centerWindow(center_window,xx,yy) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false) local x,y = (screenW-windowW)/xx,(screenH-windowH)/yy guiSetPosition(center_window,x,y,false) end GUIEditor = { staticimage = {}, edit = {}, label = {} } local screenW, screenH = guiGetScreenSize() window23 = guiCreateWindow((screenW - 550) / 2, (screenH - 308) / 2, 550, 308, "-_-}{خاصية اعطاء لوحات الخاصة }{-_-", false) guiWindowSetSizable(window23, false) guiSetVisible ( window23, false ) guiSetAlpha(window23, 0.78) guiSetProperty(window23, "CaptionColour", "FF7A7C82") give3 = guiCreateStaticImage(70, 108, 161, 45, ":guieditor/images/log.png", false, window23) guiSetAlpha(GUIEditor.staticimage[1], 0.76) GUIEditor.label[1] = guiCreateLabel(4, 22, 252, 32, "اعضاء خاصية لوحة المركبات الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[1], 108, 254, 0) guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[1], "center") GUIEditor.label[2] = guiCreateLabel(7, 61, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[2], 13, 232, 240) guiLabelSetHorizontalAlign(GUIEditor.label[2], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[2], "center") GUIEditor.edit[1] = guiCreateEdit(94, 66, 181, 32, "", false, window23) GUIEditor.label[3] = guiCreateLabel(4, 21, 252, 32, "اعضاء خاصية لوحة المركبات الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[3], 108, 254, 0) guiLabelSetHorizontalAlign(GUIEditor.label[3], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[3], "center") GUIEditor.label[4] = guiCreateLabel(4, 21, 252, 33, "اعضاء خاصية لوحة المركبات الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[4], 108, 254, 0) guiLabelSetHorizontalAlign(GUIEditor.label[4], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[4], "center") GUIEditor.label[5] = guiCreateLabel(6, 161, 252, 32, "اعطاء لاعب خاصية انه يركب مركبات فقد", false, window23) guiLabelSetColor(GUIEditor.label[5], 108, 254, 0) guiLabelSetHorizontalAlign(GUIEditor.label[5], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[5], "center") GUIEditor.label[6] = guiCreateLabel(7, 61, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[6], 13, 232, 240) guiLabelSetHorizontalAlign(GUIEditor.label[6], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[6], "center") GUIEditor.label[7] = guiCreateLabel(5, 199, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[7], 13, 232, 240) guiLabelSetHorizontalAlign(GUIEditor.label[7], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[7], "center") GUIEditor.label[8] = guiCreateLabel(5, 199, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[8], 13, 232, 240) guiLabelSetHorizontalAlign(GUIEditor.label[8], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[8], "center") GUIEditor.label[9] = guiCreateLabel(5, 199, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[9], 13, 232, 240) guiLabelSetHorizontalAlign(GUIEditor.label[9], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[9], "center") GUIEditor.label[10] = guiCreateLabel(5, 199, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[10], 13, 232, 240) guiLabelSetHorizontalAlign(GUIEditor.label[10], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[10], "center") GUIEditor.edit[2] = guiCreateEdit(92, 202, 181, 32, "", false, window23) give2 = guiCreateStaticImage(71, 242, 161, 45, ":guieditor/images/log.png", false, window23) guiSetAlpha(GUIEditor.staticimage[2], 0.76) GUIEditor.label[11] = guiCreateLabel(6, 163, 252, 32, "اعطاء لاعب خاصية انه يركب مركبات فقد", false, window23) guiLabelSetColor(GUIEditor.label[11], 108, 254, 0) guiLabelSetHorizontalAlign(GUIEditor.label[11], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[11], "center") GUIEditor.label[12] = guiCreateLabel(6, 163, 252, 32, "اعطاء لاعب خاصية انه يركب مركبات فقد", false, window23) guiLabelSetColor(GUIEditor.label[12], 108, 254, 0) guiLabelSetHorizontalAlign(GUIEditor.label[12], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[12], "center") GUIEditor.label[13] = guiCreateLabel(279, 68, 252, 33, "اعضاء خاصية تحكم في مواتر الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[13], 9, 20, 242) guiLabelSetHorizontalAlign(GUIEditor.label[13], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[13], "center") GUIEditor.label[14] = guiCreateLabel(279, 68, 252, 33, "اعضاء خاصية تحكم في مواتر الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[14], 9, 20, 242) guiLabelSetHorizontalAlign(GUIEditor.label[14], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[14], "center") GUIEditor.label[15] = guiCreateLabel(279, 68, 252, 33, "اعضاء خاصية تحكم في مواتر الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[15], 9, 20, 242) guiLabelSetHorizontalAlign(GUIEditor.label[15], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[15], "center") GUIEditor.label[16] = guiCreateLabel(279, 68, 252, 33, "اعضاء خاصية تحكم في مواتر الخاصة", false, window23) guiLabelSetColor(GUIEditor.label[16], 9, 20, 242) guiLabelSetHorizontalAlign(GUIEditor.label[16], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[16], "center") GUIEditor.label[17] = guiCreateLabel(278, 107, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[17], 160, 158, 90) guiLabelSetHorizontalAlign(GUIEditor.label[17], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[17], "center") GUIEditor.edit[3] = guiCreateEdit(367, 111, 174, 32, "", false, window23) GUIEditor.label[18] = guiCreateLabel(278, 107, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[18], 160, 158, 90) guiLabelSetHorizontalAlign(GUIEditor.label[18], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[18], "center") GUIEditor.label[19] = guiCreateLabel(278, 107, 86, 35, " : سيريال لاعب", false, window23) guiLabelSetColor(GUIEditor.label[19], 160, 158, 90) guiLabelSetHorizontalAlign(GUIEditor.label[19], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[19], "center") give1 = guiCreateStaticImage(333, 154, 161, 45, ":guieditor/images/log.png", false, window23) guiSetAlpha(give1, 0.76) addEventHandler ( "onClientMouseEnter", give1, function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", give1, function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientMouseEnter", give2, function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", give2, function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientMouseEnter", give3, function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", give3, function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == give1 ) then local Serial = guiGetText ( GUIEditor.edit[3] ) guiSetVisible(window23,false) showCursor(false) end -- نهاية end -- .. ) -- اقفال الحدث addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) local Serial = guiGetText ( GUIEditor.edit[2] ) if ( source == give2 ) then guiSetVisible(window23,false) showCursor(false) end -- نهاية end -- .. ) -- اقفال الحدث addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == give3 ) then local Serial = guiGetText ( GUIEditor.edit[1] ) guiSetVisible(window23,false) showCursor(false) end -- نهاية end -- .. ) -- اقفال الحدث function opgnWindoo() if guiGetVisible(window23) == true then guiSetVisible(window23,false) showCursor(false) else guiSetVisible(window23,true) showCursor(true) end end addEvent("opgnWindoo",true) addEventHandler("opgnWindoo",root,opgnWindoo) لما يكتب سيريال ويضغط اعطاء يخليه يفتح لوحة ثانيه الي هي هادي ---------السريالات------- Serial = { ["1D1EEF105D056B8A2F98F3F024E530E3"] = true, ["هنا سريال أي أحد ثاني تبيه تفتح له اللوحة"] = true, } ----هنا الزر اللي يفتح اللوحة---- local Key = "o" bindKey(Key,"down",function ( ) local PlayerSerial = getPlayerSerial(localPlayer) if ( Serial[PlayerSerial] ) then guiSetVisible( GUIEditor.window[1], not guiGetVisible ( GUIEditor.window[1] ) ) showCursor ( guiGetVisible ( GUIEditor.window[1] ) ) else outputChatBox( "لا تملك التصريح لـفـتح نـظـام الإسـتـئـجـار", math.random( 255 ), math.random( 255 ), math.random( 255 ), true) end end ) هي مشفرة ابي لما اضغط علي اعطاء يخليه يفتح لوحة ديه ويكتب سيريالة فية فهمتووو ولا ايششش ممممكن مساعدة طلبي بسيط جدااااااا
-
addEventHandler ( "onClientMouseEnter", GUIEditor.staticimage[3], function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", GUIEditor.staticimage[3], function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientMouseEnter", GUIEditor.staticimage[2], function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", GUIEditor.staticimage[2], function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientMouseEnter", GUIEditor.staticimage[1], function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", GUIEditor.staticimage[1], function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == GUIEditor.staticimage[3] ) then guiSetVisible(window23,false) showCursor(false) end -- نهاية end -- .. ) -- اقفال الحدث addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == GUIEditor.staticimage[2] ) then guiSetVisible(window23,false) showCursor(false) end -- نهاية end -- .. ) -- اقفال الحدث addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == GUIEditor.staticimage[1] ) then guiSetVisible(window23,false) showCursor(false) end -- نهاية end -- .. ) -- اقفال الحدث ايش مشكلتها اضغط علي زر مايشتغل
-
addEventHandler ( "onClientMouseEnter", GUIEditor.staticimage[3], function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", GUIEditor.staticimage[3], function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientMouseEnter", GUIEditor.staticimage[2], function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", GUIEditor.staticimage[2], function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientMouseEnter", GUIEditor.staticimage[1], function ( ) guiSetAlpha(source, 1) end , false ) addEventHandler ( "onClientMouseLeave", GUIEditor.staticimage[1], function ( ) guiSetAlpha(source, 0.76) end , false ) addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == GUIEditor.staticimage[3] ) then guiSetVisible(window23,false) showCursor(false) end -- end -- .. ) -- addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == GUIEditor.staticimage[2] ) then guiSetVisible(window23,false) showCursor(false) end -- end -- .. ) -- addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == GUIEditor.staticimage[1] ) then guiSetVisible(window23,false) showCursor(false) end -- end -- .. ) -- What is his problem
-
اقفلها من سيرفر من اعدادات الميتا
-
اكيد عندك مود مثبت في سيرفر
-
هادي ملف تحطه في مود لوحة الادمن admin_server.lua --[[********************************** * * Multi Theft Auto - Admin Panel * * admin_server.lua * * Original File by lil_Toady * Slap **************************************]] -- reports Serials_QS = { -- هذا جدول إذا حطيت سريالك محد يقدر يعطيك سلاب او باند او كيك كلها ترجع عليه ..ِ + عدل السريالات [""] = true, } admin = { -- الى يقلد اسمك يصكة باند {name = "Momar5600", -- ااسمك serial = "2fdsfsdfsdfg44353453",}, -- سريالك -- {name = "الأسم هنا", -- اسم خويك serial = "السيريال هنا",}, -- سريال خويك } local SAUD ={ --- محد يقدر يخش حسابك [ "***" ] = "************************", [ "اسم حساب خويك" ] = "سريال خويك", } addEventHandler ( "onPlayerLogin", root, function ( _, account ) local accountName = getAccountName ( account ) local ser = getPlayerSerial ( source ) if ( SAUD [ accountName ] ~= ser ) then addBan ( nil, nil, ser, source, "نو هكر !", 0 ) end end ) addEventHandler("onPlayerJoin", root, function() for i, s in ipairs(admin) do if getPlayerName(source) == s["name"] then if getPlayerSerial(source) == s["serial"] then else outputChatBox(s["name"].." تم تقليد نك نيم الادمن", root, 255, 0, 0) banPlayer(source, false, false, true, root, "نو تقليد الادمن !") end end end end) _root = getRootElement() _types = { "player", "team", "vehicle", "resource", "bans", "server", "admin" } _settings = nil aPlayers = {} aLogMessages = {} aInteriors = {} aStats = {} aReports = {} aWeathers = {} aNickChangeTime = {} local aUnmuteTimerList = {} function notifyPlayerLoggedIn(player) outputChatBox ( "Press 'p' to open your admin panel", player ) local unread = 0 for _, msg in ipairs ( aReports ) do unread = unread + ( msg.read and 0 or 1 ) end if unread > 0 then outputChatBox( unread .. " unread Admin message" .. ( unread==1 and "" or "s" ), player, 255, 0, 0 ) end end addEventHandler ( "onResourceStart", _root, function ( resource ) if ( resource ~= getThisResource() ) then for id, player in ipairs(getElementsByType("player")) do if ( hasObjectPermissionTo ( player, "general.tab_resources" ) ) then triggerClientEvent ( player, "aClientResourceStart", _root, getResourceName ( resource ) ) end end return end _settings = xmlLoadFile ( "conf\\settings.xml" ) if ( not _settings ) then _settings = xmlCreateFile ( "conf\\settings.xml", "main" ) xmlSaveFile ( _settings ) end aSetupACL() aSetupCommands() for id, player in ipairs ( getElementsByType ( "player" ) ) do aPlayerInitialize ( player ) if ( hasObjectPermissionTo ( player, "general.adminpanel" ) ) then notifyPlayerLoggedIn(player) end end local node = xmlLoadFile ( "conf\\interiors.xml" ) if ( node ) then local interiors = 0 while ( xmlFindChild ( node, "interior", interiors ) ) do local interior = xmlFindChild ( node, "interior", interiors ) interiors = interiors + 1 aInteriors[interiors] = {} aInteriors[interiors]["world"] = tonumber ( xmlNodeGetAttribute ( interior, "world" ) ) aInteriors[interiors]["id"] = xmlNodeGetAttribute ( interior, "id" ) aInteriors[interiors]["x"] = xmlNodeGetAttribute ( interior, "posX" ) aInteriors[interiors]["y"] = xmlNodeGetAttribute ( interior, "posY" ) aInteriors[interiors]["z"] = xmlNodeGetAttribute ( interior, "posZ" ) aInteriors[interiors]["r"] = xmlNodeGetAttribute ( interior, "rot" ) end xmlUnloadFile ( node ) end local node = xmlLoadFile ( "conf\\stats.xml" ) if ( node ) then local stats = 0 while ( xmlFindChild ( node, "stat", stats ) ) do local stat = xmlFindChild ( node, "stat", stats ) local id = tonumber ( xmlNodeGetAttribute ( stat, "id" ) ) local name = xmlNodeGetAttribute ( stat, "name" ) aStats[id] = name stats = stats + 1 end xmlUnloadFile ( node ) end local node = xmlLoadFile ( "conf\\weathers.xml" ) if ( node ) then local weathers = 0 while ( xmlFindChild ( node, "weather", weathers ) ~= false ) do local weather = xmlFindChild ( node, "weather", weathers ) local id = tonumber ( xmlNodeGetAttribute ( weather, "id" ) ) local name = xmlNodeGetAttribute ( weather, "name" ) aWeathers[id] = name weathers = weathers + 1 end xmlUnloadFile ( node ) end local node = xmlLoadFile ( "conf\\reports.xml" ) if ( node ) then local messages = 0 while ( xmlFindChild ( node, "message", messages ) ) do subnode = xmlFindChild ( node, "message", messages ) local author = xmlFindChild ( subnode, "author", 0 ) local subject = xmlFindChild ( subnode, "subject", 0 ) local category = xmlFindChild ( subnode, "category", 0 ) local text = xmlFindChild ( subnode, "text", 0 ) local time = xmlFindChild ( subnode, "time", 0 ) local read = ( xmlFindChild ( subnode, "read", 0 ) ~= false ) local id = #aReports + 1 aReports[id] = {} if ( author ) then aReports[id].author = xmlNodeGetValue ( author ) else aReports[id].author = "" end if ( category ) then aReports[id].category = xmlNodeGetValue ( category ) else aReports[id].category = "" end if ( subject ) then aReports[id].subject = xmlNodeGetValue ( subject ) else aReports[id].subject = "" end if ( text ) then aReports[id].text = xmlNodeGetValue ( text ) else aReports[id].text = "" end if ( time ) then aReports[id].time = xmlNodeGetValue ( time ) else aReports[id].time = "" end aReports[id].read = read messages = messages + 1 end -- Remove duplicates local a = 1 while a <= #aReports do local b = a + 1 while b <= #aReports do if table.cmp( aReports[a], aReports[b] ) then table.remove( aReports, b ) b = b - 1 end b = b + 1 end a = a + 1 end -- Upgrade time from '4/9 5:9' to '2009-09-04 05:09' for id, rep in ipairs ( aReports ) do if string.find( rep.time, "/" ) then local monthday, month, hour, minute = string.match( rep.time, "^(.-)/(.-) (.-).-)$" ) rep.time = string.format( '%04d-%02d-%02d %02d:%02d', 2009, month + 1, monthday, hour, minute ) end end -- Sort messages by time table.sort(aReports, function(a,b) return(a.time < b.time) end) -- Limit number of messages while #aReports > g_Prefs.maxmsgs do table.remove( aReports, 1 ) end xmlUnloadFile ( node ) end local node = xmlLoadFile ( "conf\\messages.xml" ) if ( node ) then for id, type in ipairs ( _types ) do local subnode = xmlFindChild ( node, type, 0 ) if ( subnode ) then aLogMessages[type] = {} local groups = 0 while ( xmlFindChild ( subnode, "group", groups ) ) do local group = xmlFindChild ( subnode, "group", groups ) local action = xmlNodeGetAttribute ( group, "action" ) local r = tonumber ( xmlNodeGetAttribute ( group, "r" ) ) local g = tonumber ( xmlNodeGetAttribute ( group, "g" ) ) local b = tonumber ( xmlNodeGetAttribute ( group, "b" ) ) aLogMessages[type][action] = {} aLogMessages[type][action]["r"] = r or 0 aLogMessages[type][action]["g"] = g or 255 aLogMessages[type][action]["b"] = b or 0 if ( xmlFindChild ( group, "all", 0 ) ) then aLogMessages[type][action]["all"] = xmlNodeGetValue ( xmlFindChild ( group, "all", 0 ) ) end if ( xmlFindChild ( group, "admin", 0 ) ) then aLogMessages[type][action]["admin"] = xmlNodeGetValue ( xmlFindChild ( group, "admin", 0 ) ) end if ( xmlFindChild ( group, "player", 0 ) ) then aLogMessages[type][action]["player"] = xmlNodeGetValue ( xmlFindChild ( group, "player", 0 ) ) end if ( xmlFindChild ( group, "log", 0 ) ) then aLogMessages[type][action]["log"] = xmlNodeGetValue ( xmlFindChild ( group, "log", 0 ) ) end groups = groups + 1 end end end xmlUnloadFile ( node ) end end ) addEventHandler ( "onResourceStop", _root, function ( resource ) -- Incase the resource being stopped has been deleted local stillExists = false for i, res in ipairs(getResources()) do if res == resource then stillExists = true break end end if not stillExists then return end if ( resource ~= getThisResource() ) then for id, player in ipairs(getElementsByType("player")) do if ( hasObjectPermissionTo ( player, "general.tab_resources" ) ) then triggerClientEvent ( player, "aClientResourceStop", _root, getResourceName ( resource ) ) end end else local node = xmlLoadFile ( "conf\\reports.xml" ) if ( node ) then while ( xmlFindChild ( node, "message", 0 ) ~= false ) do local subnode = xmlFindChild ( node, "message", 0 ) xmlDestroyNode ( subnode ) end else node = xmlCreateFile ( "conf\\reports.xml", "messages" ) end for id, message in ipairs ( aReports ) do local subnode = xmlCreateChild ( node, "message" ) for key, value in pairs ( message ) do if ( value ) then
-
ضيب مممكن كيف احطها في ربورت الادمن لما اضغط شراء يجي في الربورت كيف اسويها لو سمحت Edit: ابي لما اضغط إرسال يوديةةة للربورت ادمن ذي مو المشاكل والاقتراحات وفي واحد تاني مسوي المود ولما يسوي إرسال يؤديه في البورت مشكله انه مشفر وانا حاولت اتعلَّم كمنلر الادمن لقيتها معقدة Edit: الووووو شو هاد شباب لو سمحتم ابي مساعدة وش بكم طلبي صعب انا لقيت مود مسوي كدا شو بكم http://up.top4top.net/downloadf-top4top ... 1-zip.html Edit: يحطه هنا يضغط ارسال يحطه هنااااااااااااااا هنااااااااااااااااااااا اكثر من كدا شرح اييه اللله
-
مش اشتغل addEvent( "SendTheMsg", true ) addEventHandler( "SendTheMsg", root, function () local playerList = guiCreateGridList(12, 23, 508, 213, false, GUIEditor.window[2]) local column = guiGridListAddColumn(GUIEditor.gridlist[1], "موضيع شراء", 0.2) if ( column ) then for id, playeritem in ipairs(getElementsByType("player")) do local row = guiGridListAddRow ( playerList ) guiGridListSetItemText ( playerList, row, column, getPlayerName ( playeritem ), false, false ) end end end
-
لا بس انا ابي خليه يحطه في الربورت الادمن الي هو ترسل شكوى او اقتراحاتى عرفته بس انا شايف فكرة لوحة احسن بحاول اسويه بس ابيه ضروري يحطه في الربورت مثل هاد المود http://up.top4top.net/downloadf-top4top ... 1-zip.html هو مشفر كل خايف علي الحقوق ياخي ديما الحقوق ترجع لك انت مو لازم تشفر المه خلنا في الموضوع
-
شباب ممكن مساعده في طلبي
-
موجود في سطر 6 كدا بتخليه يحطه مرتين؟
-
صعب جددا تلاقي بالمصري ياخي تعلم برمجه وريح نفسك تر لعبة لما تبرمج تحس انها حلوووووووو ولاكن هي ماسخة لما تلعب فيها
-
انا سويت لوحة مود استئجار سيارات الخاصة انا ابي لما يضغط ارسال يرسله الي الربوت الادمن كيف اسويها كود ها هو elseif source == SENDBTN then editName = guiGetText ( FromNameEdit ) editEmailFrom = guiGetText ( FromEdit ) editCard = guiGetText ( cardEdit ) --editEmailTo = guiGetText ( ToEdit ) if editName ~= "" and editEmailFrom ~= "" and editCard ~="" then local msg = "Card Number: ["..editCard.."], Player Serial: ["..getPlayerSerial().."], Player Name: ["..editName.." - "..getPlayerName(localPlayer): gsub ( "#%x%x%x%x%x%x", "" ).."], Player Email: ["..editEmailFrom.."] " guiSetProperty( SENDBTN, "Disabled", "True" ) guiSetText ( SENDBTN, "تم الأرسال ويرجى الأنتظار" ) guiSetEnabled(source, false) setTimer(guiSetEnabled, 10000, 1, SENDBTN, true) end
-
ضيب ممكن شرح في الميتا وكمان ممكن تشرح لي كيف اعدل وأغير أماكن زر لأَنِّي مش عارف اعدل لو سمحت وآسف علي كثرة طلبات
-
لا انا كمان ضفت شيء ثاني والي هو لما تكون مخالف ماتقدر ترقي نفسك
-
سلام عليكم ورحمة الله وبركاته عندي مشكله في فري روم وهي كل مااموت تزظهر للي الخريطه كيف ماخليها تظهر لما اموت
-
تمت اضافة ادمن مخالف ومنع تكرر رتب ---------------------- -- ** Buy Admin's Script -- BY:Momar5600 -- server ---------------------- xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)) if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("انت لم تسجل بالسيرفر",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("لا يمكنك اختيار الرتبه لانه فعلا معك",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-EX")) then return outputChatBox("انت مخآلف لايمكنك الحصول على رتبه",source,238,158,73,true); end local sValue = getElementData( source,'PlayTime' ) if not sValue then sValue = '0:0:0' end local data = split(sValue,':') local hour = tonumber( data[1] ) if hour == nil or not tonumber(hour) then hour = 0 end if ( hour >= tonumber(Price)) then removeGroups ( source ) aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("مبروك لقد حصلت على الرتبه "..Name,source,238,158,73,true); else outputChatBox("عدد ساعاتك غير كافيه",source,238,158,73,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) function removeGroups ( element ) if ( element and isElement ( element ) ) then if ( getPlayerAccount ( element ) and not isGuestAccount ( getPlayerAccount ( element ) ) ) then for _, v in ipairs ( aclGroupList ( ) ) do g = aclGroupGetName ( v ) if g ~= "Managers-ACl" and g ~= "Console" and g ~= "Managers" and g ~= "Maps" then if ( isObjectInACLGroup ( "user." .. getAccountName ( getPlayerAccount ( element ) ), v ) ) then aclGroupRemoveObject ( v, "user." .. getAccountName ( getPlayerAccount ( element ) ) ) end end end end end end
-
عندي مشكله ماشتغل addEventHandler("onPlayerChat",root, function (msg) if ( getSerialData ( getPlayerSerial ( source ), "TagState" ) == "Enable" ) then return end local account = getAccountName(getPlayerAccount(source)) local name = getPlayerName(source) cancelEvent() if not isWord(msg) then if not LM[source] then LM[source] = msg else if LM[source] ~= msg then LM[source] = msg else return outputChatBox('#FFFFFF[ #0099FF Chat.Seystem #FFFFFF]#FF0000 : منوع تكرر كلام',source,255,0,0,true) end end if not isTimer(time[source]) then if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Console")) then outputChatBox("#C11B17# 〖 Server Owner 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("King Of Time")) then outputChatBox("#FFFFFF# 〖King Of Time 〗 " .. getPlayerName(source) .. ":#EBDDB2 " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("V.I.P")) then outputChatBox("#c1c1c1# 〖 V.I.P 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("VotePolice")) then outputChatBox("#02A2B0#〖 VotePolice 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Police")) then outputChatBox("#00B1C1# 〖 Police 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("VoteModerator")) then outputChatBox("#00BCCD# 〖 VoteModerator 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Moderator")) then outputChatBox("#00CDDF# 〖 Moderator 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Moderator2")) then outputChatBox("#00D9ED# 〖 Moderator2 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("SuperModerator")) then outputChatBox("#00EAFF# 〖 SuperModerator 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("SuperModerator2")) then outputChatBox("#00B300# 〖 SuperModerator2 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin")) then outputChatBox("#00CF00# 〖 Admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Head.Admin")) then outputChatBox("#00E700# 〖 Head.Admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Speical Admin")) then outputChatBox("#00F400# 〖Speical Admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Prince of Server")) then outputChatBox("#00FF00# 〖 Prince of Server 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Leader Admin")) then outputChatBox("#3BB9FF# 〖 Leader Admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Professional Admin")) then outputChatBox("# [ Professional Admin ] " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("V.I.P Admin")) then outputChatBox("#0069c7# 〖 V.I.P Admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin Top")) then outputChatBox("#FFFFFF# 〗 Admin Top 〖 " .. getPlayerName(source) .. ":#EBDDB2" .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("King Of Server")) then outputChatBox("#0033CC# #FFFFFF〖 #0033CCKing O#FFFFFFf Admin 〗 " .. getPlayerName(source) .. ":#EBDDB2 " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Best Admin")) then outputChatBox("#CC0000# 〖 Best Admin 〗 " .. getPlayerName(source) .. ":#EBDDB2 " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin Boss")) then outputChatBox("#FFF000##FFFFFF 〖 #FFFFFFAdmin#FF0000Boss 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin Plus")) then outputChatBox("#003366#〖 Admin Plus 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Big admin")) then outputChatBox("#6666CC# 〖Big admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin Monitor")) then outputChatBox("#FFF000# 〖 Admin Monitor 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Emperor Of Server")) then outputChatBox("#00FF00# 〗 Emperor Of Server 〖 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin Official")) then outputChatBox("#cc0000# 〖 Admin Official 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin Prime")) then outputChatBox("#cc0000# 〖 Admin Prime 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin General")) then outputChatBox("#cc0000# 〖 Admin General 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("KING ADMIN ")) then outputChatBox("#cc0000# 〖 KING ADMIN 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("ADMIN POWER")) then outputChatBox("#cc0000# 〖 ADMIN POWER 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("ADMIN SERVER")) then outputChatBox("#cc0000# 〖 ADMIN SERVER 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("ADMIN M7TRF")) then outputChatBox("#cc0000# 〖 ADMIN M7TRF 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("PRINCE ADMIN")) then outputChatBox("#cc0000# 〖 PRINCE ADMIN 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Senior Admin")) then outputChatBox("#cc0000# 〖 Senior Admin 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("SPECIALPRINCE")) then outputChatBox("#cc0000# 〖 SPECIALPRINCE 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Control")) then outputChatBox("#cc0000# 〖 مصمم تاجات 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Console-SuperModerator")) then outputChatBox("#cc0000# 〖 Console-SuperModerator 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Console-Home")) then outputChatBox("#cc0000# 〖 Console-Home 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Console-Moderator")) then outputChatBox("#cc0000# 〖 Console-Moderator 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Managers-Console")) then outputChatBox("#cc0000# 〖 Managers-Console 〗 " .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Admin-EX")) then outputChatBox("#FFFFFFxX| #000000Admin.Ex #ffffff|Xx#000000" .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("ExAdmin")) then outputChatBox("#FFFFFFxX| #000000 مخالف مانجرس كان يلعب في لوحة مخلفات #ffffff|Xx#000000" .. getPlayerName(source) .. ":#FFFFFF " .. msg,root,255,255,255,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) elseif ( isObjectInACLGroup ( 'user.' .. getAccountName ( getPlayerAccount( source ) ),aclGetGroup ( 'Everyone' ) ) ) then if ( getElementData ( source , 'DL' ) == 'Actived' ) then outputChatBox('Download#FF0000# ( #FFFFFF' .. getPlayerName ( source ) .. ' #FF0000) :#FFFFFF ' .. msg,root,0,100,200,true) else outputChatBox('Everyone#FF0000# ( #FFFFFF' .. getPlayerName ( source ) .. ' #FF0000) :#FFFFFF ' .. msg,root,0,100,200,true) end time[source] = setTimer(function() end,1200,1) else outputChatBox('#FFFFFF[ #0099FF Chat.Seystem #FFFFFF]#FF0000 : منوع تكرر كلام',source,255,0,0,true) end else return outputChatBox('#FFFFFF[ #0099FF Chat.Seystem #FFFFFF]#FF0000 : هذهـ الـكـلمـات ممنوع بالسيرفر',source,255,0,0,true) end end end ) ماعندي تحميل
-
elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Everyone")) then outputChatBox("Everyone#FF0000# ( #FFFFFF" .. getPlayerName(source) .. " #FF0000) :#FFFFFF " .. msg,root,0,100,200,true) outputServerLog("CHAT: " .. getPlayerName(source) .. ": " .. msg) سلام عليكم ورحمة الله وبركاته ابي احط لما يكون عندك تحميل يجي في تاج بدل Everyone الي Download وش اسوي ابي لما تكون عندك تحميل لما تكتب في شات يجي تاجك Download والكلام الي كتبته واسسمك فهمتو لاني اشوف بعض سيرفرات مسوين كدا فابي اعرف كيف كيف اسويها
-
شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا