D7mas

function CreateGroup(player, name) if not IsGroupExists(name) then local data = data() local playerName = getPlayerName(player) local accountName = getAccountName(getPlayerAccount(player)) local color = math.random(255)..", "..math.random(255)..", "..math.random(255) dbExec(db, "INSERT INTO groups VALUES(?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)", name, accountName, 1, 20, "The group leader has not made a message Yet", playerName.." ("..accountName..") created the group "..name, 0, color, 0, 45) for i, R in ipairs(Ranks_Table) do if R[1] == "Founder" then dbExec(db, "INSERT INTO group_ranks VALUES(?, ?, ?, ?)", name, R[1], R[2], 1) elseif R[1] == "Trial" then dbExec(db, "INSERT INTO group_ranks VALUES(?, ?, ?, ?)", name, R[1], R[2], 2) else dbExec(db, "INSERT INTO group_ranks VALUES(?, ?, ?, ?)", name, R[1], R[2], 3) end end dbExec(db, "INSERT INTO group_members VALUES(?, ?, ?, ?, ?, ?, ?, ?, ?)", name, accountName, playerName, "Yes", "Founder", data, 0, "false","false") setElementData(player, "Group", name) setElementData(player, "GroupRank", {getGroupRanks(name), getPlayerGroupRank(player)}) setElementData(player, "GroupAlliances", getGroupAlliances(name)) exports["guimessages"]:outputServer (player, "#33FFFF[Group System] #CC3333"..name.." #FF0000has been created successfully.", 0, 255, 0) setNewGrouplog ( name, playerName.." Gas Been Created "..name ) else exports["guimessages"]:outputServer (player, "#33FFFF[Group System] #CC3333The Group name #DF7401"..name.." #FF0000is already exists.", 255, 0, 0) end end قرروب ولكن مجرد خطأ املائي بسبب السرعة

زبطت اخي طريقتك مشكوررر , انا اراقب الموضوع من الصبح ضض شكلو تخصصك موودات قروبات ضض بس مساعدة اخرا انا بدي اللون اول ما ينعمل القروب يكون اصفر مثلاً مشان اول ما حد يعمل ثروب على السريع يكتب مو يصير يقولو في مشكلة ومدري وش

ينفع الدفع عن طرق بطاقات ال orange او Oereedoo ( بطاقات هاتفه )

موجوده بس ما نسختها الووووووو مستاعدة يا شباب ضروري يلا في مشكلة يعني من شي غير ذول

function getGroupChatColor(group) if group and IsGroupExists(group) then local h = dbQuery(db, "SELECT Chat_color FROM groups WHERE group_name = ?", group) local result = dbPoll(h, -1) return split(result[1]["Chat_color"], ',') end

ذا مود أخر function setButtonStat() if getElementData(localPlayer, "Group") then guiSetText(Name_Group_Label,"Group Name: "..getElementData(localPlayer, "Group")) guiSetEnabled(Leave_Group_Button, true) guiSetEnabled(Members_Group_Button, true) guiSetEnabled(InfoEdit_Group_Button, true) guiSetEnabled(Group_Rank_Button, true) guiSetEnabled(Group_Bank_Button, true) guiSetEnabled(Group_Alliance_Button, true) guiSetEnabled(Black_List_Button, true) guiSetEnabled(baseSpawnChk, true) guiSetEnabled(BlipGroup, true) bindKey("i","down","chatbox","GroupChat") guiSetVisible(Create_Group_Label, false) guiSetVisible(Create_Group_Button, false) guiSetVisible(Create_Group_Edit, false) guiSetVisible(NextRanke_Group_Label, true) guiSetVisible(Ranke_Group_Label, true) guiSetVisible(Online_Group_Label, true) else guiSetText(Name_Group_Label,"Group Name: false") guiSetEnabled(Create_Group_Button, true) guiSetEnabled(Leave_Group_Button, false) guiSetEnabled(Members_Group_Button, false) guiSetEnabled(InfoEdit_Group_Button, false) guiSetEnabled(Group_Rank_Button, false) guiSetEnabled(Group_Bank_Button, false) guiSetEnabled(Group_Alliance_Button, false) guiSetEnabled(Black_List_Button, false) guiSetEnabled(baseSpawnChk, false) guiSetEnabled(BlipGroup, false) guiSetVisible(NextRanke_Group_Label, false) guiSetVisible(Ranke_Group_Label, false) guiSetVisible(Online_Group_Label, false) guiSetVisible(Create_Group_Label, true) guiSetVisible(Create_Group_Button, true) guiSetVisible(Create_Group_Edit, true) unbindKey("i","down","chatbox","GroupChat") unbindKey("o","down","chatbox","GroupAllianceschat") end addEventHandler("onClientElementDataChange", root, function(dataName,oldData) if getElementType(source) == "player" and source == localPlayer then if dataName == "Group" then if getElementData(localPlayer, "Group") then guiSetText(Name_Group_Label,"Group Name: "..getElementData(localPlayer, "Group")) guiSetEnabled(Create_Group_Button, false) guiSetEnabled(Leave_Group_Button, true) guiSetEnabled(Members_Group_Button, true) guiSetEnabled(InfoEdit_Group_Button, true) guiSetEnabled(Group_Rank_Button, true) guiSetEnabled(Group_Bank_Button, true) guiSetEnabled(Group_Alliance_Button, true) guiSetEnabled(Black_List_Button, true) guiSetEnabled(baseSpawnChk, true) guiSetEnabled(BlipGroup, true) bindKey("i","down","chatbox","GroupChat") guiSetVisible(Create_Group_Label, false) guiSetVisible(Create_Group_Button, false) guiSetVisible(Create_Group_Edit, false) guiSetVisible(NextRanke_Group_Label, true) guiSetVisible(Ranke_Group_Label, true) guiSetVisible(Online_Group_Label, true) else guiSetText(Name_Group_Label,"Group Name: false") guiSetEnabled(Create_Group_Button, true) guiSetEnabled(Leave_Group_Button, false) guiSetEnabled(Members_Group_Button, false) guiSetEnabled(InfoEdit_Group_Button, false) guiSetEnabled(Group_Rank_Button, false) guiSetEnabled(Group_Bank_Button, false) guiSetEnabled(Group_Alliance_Button, false) guiSetEnabled(Black_List_Button, false) guiSetEnabled(baseSpawnChk, false) guiSetEnabled(BlipGroup, false) unbindKey("i","down","chatbox","GroupChat") unbindKey("o","down","chatbox","GroupAllianceschat") guiSetVisible(NextRanke_Group_Label, false) guiSetVisible(Ranke_Group_Label, false) guiSetVisible(Online_Group_Label, false) guiSetVisible(Create_Group_Label, true) guiSetVisible(Create_Group_Button, true) guiSetVisible(Create_Group_Edit, true) end

السلام عليكم ورحمة الله وبركاتة اخباركم يا شباب ان شاء الله بصحة والسلامه ما بطول عليكو انا كما لاحظتو في العنوان مشلكتي بشات القروب لما اكتب ما يظهر ويقولي المشكلة في ERROR: Group_System\server.lua:653: bad argument #2 to 'format' (number expected, got ail) الكود حق السطر 653 local color = string.format("#%02X%02X%02X", r, g, b) local chatColorTable = getGroupChatColor(group) local chatColor = string.format("#%02X%02X%02X", chatColorTable[1], chatColorTable[2], chatColorTable[3]) -- ذا هو السطر 653 for _,v in ipairs(getElementsByType("player")) do local account = getAccountName ( getPlayerAccount ( v ) ) if ( isObjectInACLGroup ( "user." .. account, aclGetGroup ( "Staff" ) ) ) and getElementData(v,"SeeGroupChat") and getElementData(v ,"Group") ~= group then outputChatBox("#FFFFFF("..group..")#FF00FF["..nisck.."]"..color..""..nick.." : #FFFF00"..msg, v, 255, 255, 255, true) -- outputDebugString("(Group) ("..group..") "..nick..": "..msg) -- outputServerLog("(Group) ("..group..") "..nick..": "..msg) end end for i, v in ipairs(getGroupOnlineMember(group)) do if doesPlayerHavePermission(player, 17) then playSoundFrontEnd(player, 101) outputChatBox( "(Group) : #CCCCCC["..nisck.."#CCCCCC] "..color..""..nick.." : #33CCCC"..msg,v, 0, 255, 255, true) else outputChatBox( "(Group) : #FF0000["..nisck.."#FF0000] "..color..""..nick.." : "..chatColor..""..msg,v, 0, 255, 255, true) end end end end end end المشكلة في السطر ال3 هنا

يب انا اعدل حجمها بس وجرب اسويها مرتين خفت اني معدل شي ثاني بس , ما غيرت غيرها

شباب انا غيرت حجم لوحة القارد ليست عن الحجم الاصلي يمكن هاي المشكلة ؟؟؟؟

ما زبط اختفو الازرار بس الكلام انتقل , حتى انتقل للمكان الخاطئ ابي مكانهم يمين الشاشة بس ذي كل الصة وأخلي لونهم اخضر غامق شوي

بوصل الكلنت 3الف سطر وال السيرفر400 الف اعطيكو لوحة القارد ليست ؟؟ هي كانت تشتغل بس انا غيرت حجمها

شوف يا بروس الزر كذا local MainMenu = { {"Enter",true,255,255,255}, {"Leave",false,255,255,255}, } -- وأعدادت الزر addEventHandler("onClientRender", root, function() if ShowMenu == true then for i , v in pairs (MainMenu) do if v[2] == true then if Anmation then local now = getTickCount() local elapsedTime = now - Anmation.startTime local duration = Anmation.endTime - Anmation.startTime local progress = elapsedTime / duration local x1, y1, z1 = unpack(Anmation.startPos) local x2, y2, z2 = unpack(Anmation.endPos) xss, y, z = interpolateBetween ( x1, y1, z1, x2, y2, z2, progress, "InOutBack") else xss = 0.0432 end else xss = 0.0432 end local Hight = (0.0472*i) local Hight2 = (0.0463*i) dxDrawRectangle(screenW * (xss or 0.0432), screenH * (0.4676+Hight), screenW * 0.1464, screenH * 0.0444, tocolor(0, 0, 0, 178), false) dxDrawText(v[1], screenW * (xss or 0.0432), screenH * (0.4657+Hight2), screenW * 0.1896, screenH * (0.5120+Hight2), tocolor(v[3],v[4],v[5], 200), screenW/960, "default-bold", "center", "center", false, false, false, false, false) end end -- صورة للأزرار , اظن انهن على شكل جدول ممكن الحين الطريقة

نفس المشكلة

نفس المشكلة ما زبط

ما زبط انت ايش غيرت بزبط؟

addEvent("Request_myGroup_MembersList", true) addEventHandler("Request_myGroup_MembersList", root, function(name) local data = data() local member = getGroupMembers(name) local Owner = getGroupOwner(name) local color1 = getGroupTurfColor(name) local color2 = getGroupChatColor(name) local result = dbPoll(dbQuery(db, "SELECT group_owner FROM groups"), -1) return triggerClientEvent(source, "myGroupList", source, Owner, member, data, color1, color2, result) end)

ترى الزر هو كذا بس , لو في زر يا بروس ما كنت محتاج مساعده اصلاً

مو فاهم

ERRROR :-Server triggered client event myGroupList, but event is not aded clientside

السلام عليكم ورحمة الله وبركاتة ,أخباركم يا شباب قلي السيرفر في مشكلة بالكلنت سيد حق ؟myGroupList ممكن تشوفوها addEvent("myGroupList", true) addEventHandler("myGroupList", root, function(Owner, members, data, color1, color2) guiGridListClear(MyGroup_Members_Grid) for i, group in pairs(members) do local row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid , row, 1, group["member_name"] or "N/A", false, false) guiGridListSetItemText(MyGroup_Members_Grid , row, 2, group["member_account"], false, false) guiGridListSetItemText(MyGroup_Members_Grid , row, 3, group["member_rank"], false, false) guiGridListSetItemText(MyGroup_Members_Grid , row, 5, group["WL"].."%", false, false) guiGridListSetItemText(MyGroup_Members_Grid , row, 6, group["mute"] or "false", false, false) if group["last_online"] == data then guiGridListSetItemText(MyGroup_Members_Grid , row, 4, "Today", false, false) else guiGridListSetItemText(MyGroup_Members_Grid , row, 4, group["last_online"], false, false) end if group["member_status"] == "Yes" and data == group["last_online"] then -- r, g, b = 0,255,0 if Owner == group["member_account"] then r, g, b = 255, 255, 0 else r, g, b = 0, 255 ,0 end else r, g, b = 255,0,0 end guiGridListSetItemColor(MyGroup_Members_Grid, row, 1, r, g, b) guiGridListSetItemColor(MyGroup_Members_Grid, row, 2, r, g, b) guiGridListSetItemColor(MyGroup_Members_Grid, row, 3, r, g, b) guiGridListSetItemColor(MyGroup_Members_Grid, row, 4, r, g, b) guiGridListSetItemColor(MyGroup_Members_Grid, row, 5, r, g, b) guiGridListSetItemColor(MyGroup_Members_Grid, row, 6, r, g, b) end end)

هل من مستجيب ؟؟

local MainMenu = { {"Enter Room"255,255,255}, {"Exit",255,255,255}, } ذول موجودات يسار الشاشة وحاولت اغير الاحداثيات مشان انقلهم يمين الشاشة ولكن محاولة فاشلة ,, حقت رومات العاب , مود غريب

يا رجل شوف هذا الاحداثيات الي قدامك لأزرار دي اكس لما اعدل عليهم ما يزبط بتخرب , بدي تقلي كيف اعدل عليهم بس

السلام عليكمم ورحمة الله وبركاتة اخباركم يا شباب ان شاء الله بخيرر انا يا شباب كما تعلمون سحبت على البرمجة من شهر تقريباً , واحس نفسي الحين افهم كل شي جاني شخص يقلي بالله مساعدة ابي اغير مكان الازرار بس انا قلت بسيط فلما فتحت على الكلينت حق المود تفاجأة بلازرار ممكن شرح كيف اعدل عليهم , انا رح افهم عليكو , غيرت الارقيمنت وما زبط addEventHandler("onClientRender", root, function() if ShowMenu == true then for i , v in pairs (MainMenu) do if v[2] == true then if Anmation then local now = getTickCount() local elapsedTime = now - Anmation.startTime local duration = Anmation.endTime - Anmation.startTime local progress = elapsedTime / duration local x1, y1, z1 = unpack(Anmation.startPos) local x2, y2, z2 = unpack(Anmation.endPos) xss, y, z = interpolateBetween ( x1, y1, z1, x2, y2, z2, progress, "InOutBack") else xss = 0.0433 end else xss = 0.0433 end local Hight = (0.0472*i) local Hight2 = (0.0463*i) dxDrawRectangle(screenW * (xss or 0.8463), screenH * (0.3307+Hight), screenW * 0.1464, screenH * 0.0443, tocolor(0, 0, 0, 178), false) dxDrawText(v[1], screenW * (xss or 0.8858), screenH * (0.3294+Hight2), screenW * 0.9788, screenH * (0.3750+Hight2), tocolor(v[3],v[4],v[5], 200), screenW/960, "default-bold", "center", "center", false, false, false, false, false) end ولها ازرار فوق ما في داعي اطرحهن حسب ظني

أخي قتصكطولة مرة ضض , انا شفت اللوحات بس ما لاحظت شي , عدلت على شي ثاني