yazan
Members-
Posts
1,452 -
Joined
-
Last visited
Everything posted by yazan
-
بالنسبه للسكايب ما في مشكله بس للمساعده اسئل هنا لو ما عرفت اجوبك في ناس اكثر خبره ترد عليك li_yazan_il
-
ما بحبطك بس هذي الحقيق ما عرفت تعمل مود تحميل سسيارات مخفي معتقد بتقدر تصمم تحميل guiCreateProgressBar guiProgressBarGetProgress guiProgressBarSetProgress onClientFileDownloadComplete isTimer killTimer setTimer
-
#client addEventHandler("onClientGUIClick",root, function () if source == GUIEditor.button[1] then triggerServerEvent ( "dd1", localPlayer) end end) #server local VehicleID = { 560,} local car = { } addEvent( "dd1", true ) addEventHandler( "dd1", root, function () if isElement ( car [ source ] ) then destroyElement ( car [ source ] ) end local ID = VehicleID[ math.random( #VehicleID ) ] local x,y,z = getElementPosition (source) car [ source ] = createVehicle ( ID, x, y +2, z ) if car [ source ] then warpPedIntoVehicle ( source, car [ source ] ) end end )
-
اربــــــــــــــح دولارات ,, ادخـــــــــــل بــــــــــس
yazan replied to [DONE]*'s topic in القسم العام
تنبيه بسيط : هذه قسم عام ,, ومكتوب بوصفه هذا القسم لا يتعلق بالام تي اي , فاذا كان لديك شيء تريد ان تشاركه مثل صور فيديوهات الخ .. فشاركه هنا يعني بإختصار ,, لا تتفلسف -
شوف القسم الاجنبي لهم خبره اكثر في دعم لعبه
-
اذا ما تعرف ليش ترد !! ياخي بعدين انا قصدت ما اعرف كيف يشتغل شو الطريقه انا عارف انه يزيد نقاط للقروبات القويه بس ابي اعرف يزيد النقاط عالاحتلال ولا الدفاع ولا الي يحتل الماب كله مره ثانيه ما تعرف شي لا ترد لا هنت ابي الناس تفهم ترد مو ناس شغل تعليق بس وانا شو دراني مين الي صنعوه اكيد الي صنعه رح يجاوب هنا واتمنى ما حد يجاوب بردود مالا معنى موضوعك يلي ما له معنى مع احترامي لك اطلب كود اطلب وشش تستخدم اكتب فكره المود مو حنى نقدر المود على وش يشتغل
-
خخخخخخخخخخخ اقول اسكت الحين اغلاق لي ساعه اعمل فيه ترا امزح و # مشكور تابل فهمني كم شي كلنت # addEventHandler("onClientGUIClick", resourceRoot, function() if source == DekToR.gridlist[1] then local Selected = guiGridListGetItemText(DekToR.gridlist[1], guiGridListGetSelectedItem(DekToR.gridlist[1]), 1) if Selected and Selected ~= "" then triggerServerEvent("e1", localPlayer, tonumber(Selected)) end end end) addEventHandler ("onClientGUIClick",resourceRoot, function () if (source == dd) then triggerServerEvent("e2", localPlayer) end end) #سيرفر addEvent("e1",true) addEventHandler("e1", root, function(skin) if not getElementData(source, "skin") then local id = getElementModel(source) setElementData(source, "skin", id) setElementModel(source, skin) end end) addEvent("e2",true) addEventHandler("e2", root, function() local j = getElementData(source, "skin") if j then setElementModel(source, j) setElementData(source, "skin", false) end end)
-
يب حطه ب مود و شغله طبيعيي يوم تسجل دخول توقف الصوت
-
شكرا العفو
-
local List = اسم القريد ليست addEventHandler("onClientResourceStart", resourceRoot, function ( ) local players = getElementsByType("player") for _ , player in ipairs ( players ) do local name = string.gsub( getPlayerName( player ), "#%x%x%x%x%x%x", "" ) local row = guiGridListAddRow( List ) guiGridListSetItemText( List, row, 1, name ) end end ) nike
-
أعمل قرييد ليست اعمل لوب للاعبين الموجدين
-
server# addEventHandler("onPlayerLogin", root, function() triggerClientEvent( source, "b1", source ) end ) Client# addEventHandler("onClientResourceStart", resourceRoot, function() f = playSound("sounds.mp3") end) addEvent("b1",true) addEventHandler("b1",root, function () if isElement ( f ) then destroyElement ( f ) end end)
-
--[[********************************** * * Multi Theft Auto - Admin Panel * * admin_server.lua * * Original File by lil_Toady * **************************************]] _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 xmlNodeSetValue ( xmlCreateChild ( subnode, key ), tostring ( value ) ) end end end xmlSaveFile ( node ) xmlUnloadFile ( node ) -- Unmute anybody muted by admin for i, player in ipairs(getElementsByType("player")) do local serial = getPlayerSerial( player ) if (aUnmuteTimerList[serial]) then aUnmuteTimerList[serial] = nil setPlayerMuted(player, false) end end end aclSave () end ) function aGetSetting ( setting ) local result = xmlFindChild ( _settings, tostring ( setting ), 0 ) if ( result ) then result = xmlNodeGetValue ( result ) if ( result == "true" ) then return true elseif ( result == "false" ) then return false else return result end end return false end function aSetSetting ( setting, value ) local node = xmlFindChild ( _settings, tostring ( setting ), 0 ) if ( not node ) then node = xmlCreateChild ( _settings, tostring ( setting ) ) end xmlNodeSetValue ( node, tostring ( value ) ) xmlSaveFile ( _settings ) end function aRemoveSetting ( setting )
-
الاكواد تتفرع منها اكثر من مشكله مو ضروري اسم لوحه لو وده احد يسعده يطرح الكود من اجل نحل المشكله اكيد ما بنسسرق الكود و بننشره للافاده فقظ و خلص لا نخرج عن مسار الموضوع
-
وين قال ما يبي يطرح الكود ! + شلون بتحلها و انت ما تدري وين الغلط في 100 غلط ممكن يبله جدول للماركر يمكن تغير اسم النافذه يمكن تغير اسم الفنكشن
-
by Khaled Abdullah on Wed Aug 14, 2013 3:07 pm الموضوع مفتوح لحين اغلاقه من قبل الاستضافه او الاداره
-
ادخل على ستضافه و شوف حسب الموصفات
-
يلي معك مساحه + دومين لزم تشتري خادم لينوكس و تركب عليه
-
addEventHandler ( "onClientGUIClick", x, function () setWeather ( 9 ) end)
-
مجرب و شغال انسخه من جديد لو عدلت عليه اطرح التعديل
-
GUIEditor = { button = {}, window = {} } GUIEditor.window[1] = guiCreateWindow(540, 229, 167, 199, "", false) guiWindowSetSizable(GUIEditor.window[1], false) guiSetVisible(GUIEditor.window[1], true) showCursor ( true ) GUIEditor.button[1] = guiCreateButton(23, 47, 118, 44, "car 1 d", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") GUIEditor.button[2] = guiCreateButton(23, 109, 118, 47, "x", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") addEventHandler ( "onClientGUIClick", GUIEditor.button[1], function () downloadFile ( "c1.dff" ) downloadFile ( "c1.txd" ) end) addEventHandler ( "onClientGUIClick", GUIEditor.button[2], function () guiSetVisible(GUIEditor.window[1], false) showCursor ( false ) end) function onDownloadFinish ( file, success ) if ( source == resourceRoot ) then if ( success ) then if ( file == "c1.txd" ) and ( file == "c1.dff" ) then txd = engineLoadTXD("c1.txd") engineImportTXD(txd, 429) dff = engineLoadDFF("c1.dff", 0) engineReplaceModel(dff, 429) end end end end addEventHandler ( "onClientFileDownloadComplete", getRootElement(), onDownloadFinish ) مع العلم عيوني كذا
-
استخدم هذي بالميتا downloadFile("f.txd") حمل الملف عن طريق OnClientFileDownloadComplete لمعرفة اذا اكتمل تحميل اعمل قريد لسته جيب الملفات حقت سياره اعمل حدث اذا ضغط الزر و كان محدد على قريد لسته يحمل سياره + هذه مثال على الفكره عمتله قبل كم يوم لواحدد الحين اظيفك Client GUIEditor = { button = {}, window = {} } GUIEditor.window[1] = guiCreateWindow(540, 229, 167, 199, "", false) guiWindowSetSizable(GUIEditor.window[1], false) guiSetVisible(GUIEditor.window[1], true) showCursor ( true ) GUIEditor.button[1] = guiCreateButton(23, 47, 118, 44, "car 1 d", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") GUIEditor.button[2] = guiCreateButton(23, 109, 118, 47, "x", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") addEventHandler ( "onClientGUIClick", GUIEditor.button[1], function () downloadFile ( "c1.dff" ) downloadFile ( "c1.txd" ) txd = engineLoadTXD("c1.txd") engineImportTXD(txd, 429) dff = engineLoadDFF("c1.dff", 0) engineReplaceModel(dff, 429) end) addEventHandler ( "onClientGUIClick", GUIEditor.button[2], function () guiSetVisible(GUIEditor.window[1], false) showCursor ( false ) end) + meta "c1.txd" download="false" /> "c1.dff" download="false" /> + c1.txd - dff
