Jump to content

Recommended Posts

Posted

سلام عليكم ابي تعديل مود شراء رتب ابيه لما الشخص يشتري رتبة جديدة تنسحب القديمة منه + حاولت في الدمن مخالف صار بس بس لما يكون معه سعر الرتبة يقله صسابك محظور بس لما مايكون معه سعرها يقله ليس لديك ساعات 

الكواد

 

---------------- ملف سيرفر  --------


xAddToGroupFunction_ = function ( Group,Price,Name )

    local account = getAccountName(getPlayerAccount(source));

    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,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

    if isObjectInACLGroup ("user."..account, aclGetGroup ( "Admin_x" ) ) then -- تأكدت من ان اللاعب مب محظور
-------------------------------------------------------------------------------------------------
if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
aclGroupRemoveObject (aclGetGroup( tostring(Group)), "user."..account)

aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);

else

aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);

end
-------------------------------------------------------------------------------------------------
    else
        outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true);
    end
    else
        outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);

    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)

 

Posted (edited)
	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	 
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
	
				end
			end
		end
	end
	

xAddToGroupFunction_ = function ( Group,Price,Name )

    local account = getAccountName(getPlayerAccount(source));

    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end

    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end
 
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )
	
	if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
	
	aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);

	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);

		end
	else
	
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);

    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

سويته لك اذا كان الاعب بقروب ادمن اكس مايقدر يترقى 

واذا الاعب عنده الساعات المطلوبة يحذف كل القروبات الي عنده قبل ويعطيه رتبة جديدة

بالتوفيق ولاتنسانا من الدعاء

Edited by Abdul KariM
  • Like 1
Posted
28 minutes ago, Abdul KariM said:

	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	 
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
	
				end
			end
		end
	end
	

xAddToGroupFunction_ = function ( Group,Price,Name )

    local account = getAccountName(getPlayerAccount(source));

    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end

    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end
 
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )
	
	if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
	
	aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);

	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);

		end
	else
	
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);

    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

سويته لك اذا كان الاعب بقروب ادمن اكس مايقدر يترقى 

واذا الاعب عنده الساعات المطلوبة يحذف كل القروبات الي عنده قبل ويعطيه رتبة جديدة

بالتوفيق ولاتنسانا من الدعاء



 

Abdul KariM

 


الله يعطيك الف عافية يارب ونشالله يتحقق حلمك يارب ويرزقك الجنة

  • Like 1
Posted
2 hours ago, Abdul KariM said:

الله يعافيك , اجمعين ان شاء الله 


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

Posted
local aGroups = { 

	["Console"] = true ,
	
	["Admin"] = true ,
	
	["SuperModerator"] = true ,
	
	};
	

	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	
	if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then
		
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
					end
				end
			end
		end
	end

عدل ع القروبات في اول الاسطر

  • Like 1
Posted
19 hours ago, Abdul KariM said:

	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	 
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
	
				end
			end
		end
	end
	

xAddToGroupFunction_ = function ( Group,Price,Name )

    local account = getAccountName(getPlayerAccount(source));

    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end

    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end
 
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )
	
	if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
	
	aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);

	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);

		end
	else
	
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);

    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

سويته لك اذا كان الاعب بقروب ادمن اكس مايقدر يترقى 

واذا الاعب عنده الساعات المطلوبة يحذف كل القروبات الي عنده قبل ويعطيه رتبة جديدة

بالتوفيق ولاتنسانا من الدعاء



 

Abdul KariM

 


اخي ركبته بس ماعاد يشتري  ولا يقول شيء في شات  يعني بس لوحة+ تكفا ممكن توصل الكودات الولا في 2 لاني معرف  وانا اغير اسامي الرتب

 

Posted
10 minutes ago, MR_Mahmoud said:



 

Abdul KariM

 


اخي ركبته بس ماعاد يشتري  ولا يقول شيء في شات  يعني بس لوحة+ تكفا ممكن توصل الكودات الولا في 2 لاني معرف  وانا اغير اسامي الرتب

 

اكتب في اف 8 

debugscript 3

وشغل المود من جديد

وقول وش يطلعلك او صوره

Posted
Just now, Abu-Solo said:

اكتب في اف 8 

debugscript 3

وشغل المود من جديد

وقول وش يطلعلك او صوره

ابشر

2 minutes ago, Abu-Solo said:

اكتب في اف 8 

debugscript 3

وشغل المود من جديد

وقول وش يطلعلك او صوره


يالغالي العبة ماتفتح ممكن شي ساعة ؟ 

  • Like 1
Posted
3 minutes ago, Abdul KariM said:

اطرحلي الكود كامل بعد تعديلك 

	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	 
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
	
				end
			end
		end
	end
	

xAddToGroupFunction_ = function ( Group,Price,Name )

    local account = getAccountName(getPlayerAccount(source));

    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end

    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end
 
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )
	
	if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
	
	aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);

	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);

		end
	else
	
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);

    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	


--------------- الرتب الي ماتنسحب حين يشتري رتبة من الوحة


local aGroups = { 

	["3GL"] = true ,
	
	["FFO"] = true ,
	
	["Adminmsg"] = true ,
	
	};
	

	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	
	if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then
		
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
					end
				end
			end
		end
	end

 

Posted
local aGroups = { 
	["3GL"] = true ,
	
	["FFO"] = true ,
	
	["Adminmsg"] = true ,
	
	};
	
	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	
	if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then
		
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
					end
				end
			end
		end
	end
	
xAddToGroupFunction_ = function ( Group,Price,Name )
    local account = getAccountName(getPlayerAccount(source));
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end
 
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )
	
	if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
	
	aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);
		end
	else
	
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);
    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

 

Posted
59 minutes ago, Abdul KariM said:

local aGroups = { 	["3GL"] = true ,		["FFO"] = true ,		["Adminmsg"] = true ,		};		function removeGroups ( player )		if ( player ) and ( getElementType ( player ) == "player" ) then		if isGuestAccount ( getPlayerAccount ( player ) ) then			return 	end		local Acc = getAccountName ( getPlayerAccount ( player ) )		if ( #aclGroupList (	) == 0 ) then			return	end			for _,Groups_ in ipairs( aclGroupList ( ) ) do		if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then			if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then		aclGroupRemoveObject ( Groups_ ,"user."..Acc )					end				end			end		end	end	xAddToGroupFunction_ = function ( Group,Price,Name )    local account = getAccountName(getPlayerAccount(source));    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end 	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )		if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then		aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);		end	else		outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);    endendaddEvent("Accept:the:request",true)addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

 

 

p_4368o9yv1.png

 

Posted
1 hour ago, MR_Mahmoud said:

 

p_4368o9yv1.png

 

ذول مافيهم مشاكل عادي,

الاول حق الخط ,

يمكن انت نسيت تحط اسم الخط بـ شكل صحيح

والثانية دليل علي ان الملف منحذف اصلآ ,

Posted
13 minutes ago, Abu-Solo said:

ذول مافيهم مشاكل عادي,

الاول حق الخط ,

يمكن انت نسيت تحط اسم الخط بـ شكل صحيح

والثانية دليل علي ان الملف منحذف اصلآ ,



اسف غلطت هادي الأصلية

 

 

p_436dltvv1.png

 

 

 

Abu-Solo

Posted (edited)
2 minutes ago, Abu-Solo said:

أرسل السطر رقم 14

  

	if isGuestAccount ( getPlayerAccount ( player ) ) then

 

Edited by MR_Mahmoud
Posted
Just now, MR_Mahmoud said:

    if isGuestAccount ( getPlayerAccount ( player ) ) then

معليش قصدي رقم 44

اللي فيه الغلط,

معليش توني صاحي من النوم خخ

Posted
1 minute ago, Abu-Solo said:

معليش قصدي رقم 44

اللي فيه الغلط,

معليش توني صاحي من النوم خخ

 

:lol:

	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true);; end

 

 

 

Posted
local aGroups = { 
	["3GL"] = true ,
	
	["FFO"] = true ,
	
	["Adminmsg"] = true ,
	
	};
	
	function removeGroups ( player )
	
	if ( player ) and ( getElementType ( player ) == "player" ) then
	
	if isGuestAccount ( getPlayerAccount ( player ) ) then
	
		return 
	end
	
	local Acc = getAccountName ( getPlayerAccount ( player ) )
	
	if ( #aclGroupList (	) == 0 ) then
	
		return
	end
		
	for _,Groups_ in ipairs( aclGroupList ( ) ) do
	
	if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then
		
	if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then
	
	aclGroupRemoveObject ( Groups_ ,"user."..Acc )
					end
				end
			end
		end
	end
	
xAddToGroupFunction_ = function ( Group,Price,Name )
    local account = getAccountName(getPlayerAccount(source));
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end
 
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )
	
	if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then
	
	aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);

	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);
		end
	else
	
	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);
    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

 

Posted
	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true); end

 

Posted
26 minutes ago, Abdul KariM said:

local aGroups = { 	["3GL"] = true ,		["FFO"] = true ,		["Adminmsg"] = true ,		};		function removeGroups ( player )		if ( player ) and ( getElementType ( player ) == "player" ) then		if isGuestAccount ( getPlayerAccount ( player ) ) then			return 	end		local Acc = getAccountName ( getPlayerAccount ( player ) )		if ( #aclGroupList (	) == 0 ) then			return	end			for _,Groups_ in ipairs( aclGroupList ( ) ) do		if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then			if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then		aclGroupRemoveObject ( Groups_ ,"user."..Acc )					end				end			end		end	end	xAddToGroupFunction_ = function ( Group,Price,Name )    local account = getAccountName(getPlayerAccount(source));    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا  ! ",source,255,0,0,true); end 	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 )		if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then		aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);	outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);		end	else		outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true);    endendaddEvent("Accept:the:request",true)addEventHandler("Accept:the:request",root,xAddToGroupFunction_)	

 

 عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات:/

44 minutes ago, Abdul KariM said:
43 minutes ago, Abu-Solo said:

عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات:/

45 minutes ago, Abu-Solo said:

	if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true); end

 

%عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات:/

Posted
28 minutes ago, MR_Mahmoud said:

 عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات:/

%عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات:/

دي بق :| ؟

Posted
1 minute ago, Abu-Solo said:

دي بق :| ؟

 

ولله مدري بس مايشتري ولا يقول شيء في الشات يعني  بس عبارة عن لوحة صار مايفعل شيء

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...