السلام عليكم ورحمة الله وبرككاتهه ء
فيه مود حق اعطاء مخالف وكذاا, المهمم المود يعطي مخالف وما يسحب اي رتب ثانية يعني ما يفيدد بشيء
انا يوم جيت اعدل عليهه شايف الكود صحيح لكن ما يبي يحذف القروبات الثانيةة مادري شو السبب
الكود :
addEvent("aAdminEx1",true )
addEventHandler("aAdminEx1",root,
function ( player1,editdays,editsbab)
local acc = getAccount(player1)
if acc and not isGuestAccount(acc) then
local account = getAccountName(acc)
if account then
if isObjectInACLGroup ( "user."..account, aclGetGroup ( Group) ) then outputChatBox ( "#ff0000x[#2EFEF7 System Admin Ex #ff0000]x : #ffffff الرتبه موجوده مسبقاً #ff0000 : خطاً",source, 255, 255, 255, true ) return end
revmoeOtherGroups( player1 ) -- الكود حقت سحب الرتب الاخري
aclGroupAddObject (aclGetGroup( Group ), "user."..account)
outputChatBox ( "#ff0000x[#2EFEF7 System Admin Ex #ff0000]x : #ffffff يوم [ #ff0000"..editdays.." #ffffff] تم صك الاعب مخالفه لمدة ",source, 255, 255, 255, true )
local Mn = executeSQLQuery("SELECT * FROM aAdminSystem WHERE account=?", account )
if ( Mn ) then
executeSQLQuery ( "INSERT INTO aAdminSystem(account,editdays,editsbab) VALUES(?,?,?)",account,editdays,editsbab )
triggerClientEvent( root,"aGrid",root, account,editdays,editsbab)
setTimer ( function (account)
if not isObjectInACLGroup ( "user."..account, aclGetGroup ( Group ) ) then
executeSQLQuery("DELETE FROM aAdminSystem WHERE account=?", account)
triggerClientEvent(root,"datasCallBack",root)
outputChatBox ( "#ff0000x[#2EFEF7 System Admin Ex #ff0000]x : #ffffff الرتبه ليست موجوده #ff0000 : خطاً",source, 255, 255, 255, true ) return end
aclGroupRemoveObject ( aclGetGroup( Group ),"user."..account )
executeSQLQuery("DELETE FROM aAdminSystem WHERE account=?", account)
triggerClientEvent(root,"data",root)
end,editdays*1000*60*60*24,1,account)
end
end
end
end
)
ارجوا اصلاح الكود حقت سحب الرتب