Jump to content

Ahmed Ly

Members
  • Posts

    1,282
  • Joined

  • Last visited

  • Days Won

    5

Everything posted by Ahmed Ly

  1. وفي برنامج اونلاين ثاني اسمهEFLC-MP من ناحية برمجه افضل و احسن،و احلا من هاذا ولكن ح توجهك مشاكل شويا لكن مشكله انه مطورين يطورو ررنامج شويا وبعدين يوقفو مهم هوا رابط http://iv-mp.eu/ ويكي https://bitbucket.org/Suge/eflc-mp-Lua/wiki/Home وهاذا سويته فيها ? local Passworld = "Passworld" -- you must change the passworld to your passworld local list = false diag = createDialogList(20, "Players List", 1, "kick!", "Cancel") function addallplayers () if list == false then players = getPlayers() for k, v in ipairs(players) do addDialogRow(20,""..getPlayerName(v).."") list = true end else clearDialogRows(20) for k, v in ipairs(players) do addDialogRow(20,""..getPlayerName(v).."") end end end addCommand("/systemkick", function(playerid,params) if params[1] == Passworld then showDialogList(playerid,20) addallplayers () else sendPlayerMsg(playerid,"Password is wrong", 0xFFF00000) end end , nil) function onclik(playerid, dialogId, buttonId, dialogRow) if(dialogId == 20 and buttonId == 1 and players[dialogRow + 1] ~= nil) then if players[dialogRow + 1] ~= playerid then if isPlayerOnline(players[dialogRow + 1]) ~= false then sendMsgToAll("the player "..getPlayerName(players[dialogRow + 1]).." kicked by "..getPlayerName(playerid).."",0xFFFF0000) disconnectPlayer(players[dialogRow + 1]) else sendPlayerMsg(playerid,"the player is not at server", 0xFFF00000) end else sendPlayerMsg(playerid,"you cant kick youself", 0xFFF00000) end end end registerEvent("onclik", "onPlayerDialogResponse")
  2. شي ممتاز واكثر شي عجبني جرافيك ? شي خورافي استمر ياحبيبي
  3. اثار في الحجر الصحي ههه مود خورافي صراحه و مشاء الله و افضل تستخدام dgs وتغير شكل و كذا و استمر
  4. ائا بدك بتحفظ الحساب راح تستخدام executeSQLQuery وائا تبي تسوي اديت بوكس دي اكس بدون (dgs) guiSetAlpha -- عشان تخفي Edit guiGetText -- عشان تاخد النص موجود بال Edit ----------- بالنسبه password مخفي بدون مايشوف رمز السري الاعب string.rep --- ونفس شي فوق ^ -- لو تبي تسهل عليك افضل شي dgsCreateEdit كل شي عن Dgs https://wiki.multitheftauto.com/wiki/Resource:Dgs
  5. لما تصمم لوحه gui وتبي تحول لوحه من gui الي dgs استخدام الامر dgs g2d وبعدين g2d -add اسم مودك بعدين g2d -e اسم مودك وقبل كل هاذا يجب عليك تدخل ع ملف G2dManger_s.Lua وتغير acc ل اسم حسابك وبس هاذا هوا عشان ماتعب نفسك ....
  6. عادي مع تطوير و برمجه فيها يقدرو مبرمجين يصنعو مود سي بق #Edit: UP Moderators: يرجي منك عدم رفع الموضوع ووضع مشاركات مزدوجة..!
  7. سلام عليكم طبعا كلكم تعرفو gta iv احسن شي انه تشتغل ع اجهزه ضعيفه شوي في برنامج اونلاين اسمه CitizenMP IV Reloaded وهاذا برنامج يستخدام لgta iv عشان تلعب اونلاين طبعا لغة برمجه فيها بال Lua بعض صور ع برنامج اونلاين مثال ع مود يطرد الاعبين عن طريق لوحه كود function splits(self, delimiter) local a = self:Split(delimiter) local t = {} for i = 0, #a - 1 do table.insert(t, a[i]) end return t end local system = {} RegisterServerEvent('commandEntered') AddEventHandler('commandEntered', function(playerid,texts) if system[playerid] == true then TriggerClientEvent('chatMessage',playerid,"Server", { 0, 0x99, 0 },"^1 eorr"); return end command = splits(texts, ' ') if(command[1] == "/kicks") then system[playerid] = true players = GetPlayers() for k, v in ipairs(players) do name_players = GetPlayerName(v) TriggerClientEvent('showDialog',playerid,"DIALOG_TEST", "DIALOG_STYLE_LIST", "Server Dragon",""..name_players.."<br>", "kick", "close",false) end system[playerid] = false plrs = playerid end end ) AddEventHandler('onDialogResponse', function(dialogID, dialogResponse, dialogListitem, dialogInputtext) if(dialogID=="DIALOG_TEST") then if(dialogResponse==1) then if players[dialogListitem + 1] ~= plrs then if(players[dialogListitem + 1] ~= nil ) then DropPlayer(players[dialogListitem + 1], "Your kicked from the server") TriggerClientEvent('chatMessage',-1,"Server", { 0, 0x99, 255 },"^1 the player "..GetPlayerName(players[dialogListitem + 1]).." kick by "..GetPlayerName(plrs)..""); end else TriggerClientEvent('chatMessage',plrs,"Server", { 0, 0x99, 0 },"^1 you cant kick youself"); end end end end) نتيجه وحلوه لعبه صراحه و نفس وقت مظلومه لانه مافيش عدد كفي من الاعبين فا انا هنا نشرت عشان ناس تغير شوي و انا متاكد ماسمعت عن CitizenMP IV Reloaded رابط موقع https://citizeniv.net/ ويكي https://citizeniv.net/wiki/index.php/Main_Page
  8. UPDATE تمت اضافة فكشن restart و ريرفش وتم اصلاح بعض تحقيقات function getinfos () local open2 = fileOpen("config.ini") texts = fileRead(open2,100) fileClose(open2) text = string.sub(""..texts.."", 7, 10) return text end function typeinlog (str) tr = getinfos () if tr == "true" then local open = fileOpen("log.log") fileRead(open,1500000) fileWrite(open,"["..os.date("%H:%M:%S").."]:"..str.."\n") fileFlush(open) fileClose(open) else outputServerLog("Note:log.log dont work you must set true in file config.ini") end end function getnames() names = "" local Table = getResources() for k, v in ipairs(Table) do if v then names = names .. " " .. getResourceName(v) .. " " else names = "false" end end return names end function start (res) local name = getResourceFromName(res) if name then if getResourceState (name) == "stopping" then startResource(name) outputChatBox("[Resource Manager] Has Been Start Resource "..getResourceName(name).."",root,0,255,0,true) typeinlog("Has Been Start Resource "..getResourceName(name).."") return "Has Been Start Resource "..getResourceName(name).."" else return "that is running aready" end end end function stop (ress) local name = getResourceFromName(ress) if name then if getResourceState (name) == "running" then stopResource(name) outputChatBox("[Resource Manager] Has Been Stop Resource "..getResourceName(name).."",root,0,255,0,true) typeinlog("Has Been Start Resource "..getResourceName(name).."") return "Has Been Stop Resource "..getResourceName(name).."" else return "that resource dont running to stoping it" end end end function restart (sss) local nameresource = getResourceFromName(sss) if nameresource then if getResourceState (nameresource) == "running" then restartResource(nameresource) outputChatBox("[Resource Manager] Has Been Stop Resource "..getResourceName(nameresource).."",root,0,255,0,true) typeinlog("Has Been Start Resource "..getResourceName(nameresource).."") return "Has Been Restart Resource" else return "that resource dont running" end end end مثال ع C# using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Threading.Tasks; using System.Windows.Forms; using MTA_SDK; namespace WindowsFormsApp2 { public partial class Form1 : Form { public Form1() { InitializeComponent(); MTA server = new MTA("localhost",22005, "username","passworld"); MTA_LuaArgs luaArgs = new MTA_LuaArgs(); string returned = server.CallFunction("cshare","getnames", luaArgs); foreach (string ppr in returned.ToString().Split(' ')) { if (ppr != "") listBox1.Items.Add(ppr); } } private void button1_Click(object sender, EventArgs e) { MTA server = new MTA("localhost",22005, "username", "passworld"); MTA_LuaArgs luaArgs = new MTA_LuaArgs("" + listBox1.Text + ""); string returned = server.CallFunction("cshare", "restart", luaArgs); MessageBox.Show("" + returned + ""); } private void button2_Click(object sender, EventArgs e) { listBox1.Items.Clear(); MTA server = new MTA("localhost", 22005, "username", "passworld"); MTA_LuaArgs luaArgs = new MTA_LuaArgs(); string returned = server.CallFunction("cshare", "getnames", luaArgs); foreach (string ppr in returned.ToString().Split(' ')) { if (ppr != "") listBox1.Items.Add(ppr); } } } } config.ini log = true شرح خاص ب C# SDK
  9. شيتتت صحح لي فتره مععتزل علي لعبه و نسيتت كل شي
  10. اول شي كود سيرفر او كلنت ثاني شي انت وش تبغي تسوي واخر شي حط كودك الميتا وكودك مفروض كذا لو كلنت outputChatBox("hello world",localPlayer,255,0,0)
  11. سلام عليكم بعد اعتززززلطووويل جيت ب مود وهوا انه لوحه وفيها دول اللي مصابين بالفايروس وعدد مود مش مشفر رابط [Link removed by moderator / تمت إزالة رابط التنزيل بواسطة المشرف ، انظر الرسالة الأخيرة لسبب] صوره لـــ مود
  12. ?شكله اول مره يشوف لابتوب اذا بيشوف لابتوب قيمنق كيف بصير فيها
  13. احسه فكره جديده و حلوه بس ياليت توضح اكثر عشان نفهمك ؟.....
  14. مود رئع من شخص اروع استمر اخي
  15. ضيفني ع ديسكورد ♔ Ahmed ?? ❥#6818
  16. مدري غريبه انا حملتها عادي بدون اي مشاكل
×
×
  • Create New...