أرجو مساعدتي

mr.sony · August 16, 2017

السلام عليكم ورحمة الله ^^

يا اخواني عندي 4 مشاكل ابي احلها بليز ساعدوني

1- أبي أصنع لوحة أضيف فيها لوحات مودات مثل لوحة أف9 عشان اضيف فيها لوحة الليزر وحفظ الأماكن وحفظ الشخصية والقوانين وكذا

كما في الصورة

2- معي جيم مود شغال بس لما انتحر مايجيبني في المكان الي نزلت فيه أول

3- معي مود ترقيات شغال بس المشكلة انو اي واحد معه ساعات يقدر يرقي نفسه اكثر من رتبة وانا ابي لما يرقي نفسه رتبة تنحذف الرتبة السابقة لانه اشوف الناس تاخد كل الرتب الاصغر منها

4- أبي مود اسل للمانجرس مايقدر يرقي فيه رتبة أعلى منه

******************************

أرجو مساعدتي يا اخوان وشكراا

1337.Ibrahim · August 16, 2017

الطلب الأول

guiSetVisible -- true
guiSetVisible - false

الطلب الثاني

اذا جاء يختار مكان حط عليه داتا واذا مات يجيب الداتا ويحطه بالمكان اللي اختاره

setElementData
getElementData

الطلب الثالث :

اطرح اكوادك؟

بخصوص الطلب الرابع دور بالكومنتي تلقا كثير مودات زي كذا

Edited August 16, 2017 by Talis

|M.r|LooFe| · August 16, 2017

1 hour ago, mr.sony said:

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

بنسبة لمود شراء رتب

بعطيك ملف سيرفر كامل من برمجتي

هذا الكود حطه في ملف سيرفر ولا تعدل على شي

local aGroups = { 
	["3agl"] = true ,
	
	["gpp"] = true ,
	
	["apm"] = true ,
	
	["ADMIN[EX]"] = true ,	
	
	["serial"] = true ,	

	["suppor"] = true ,	

	["7sap"] = 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* ( #ffffffالادارة #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 not 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_)

هذا الكود لا تعدل عليه شي والا يخرب

اسم رتبة الادمن المخالف Admin-X

طبعا المود فيه ميزات

1- لو تعطيه مخالف ما يقدر يشتري

2- ما يكرر رتب

1 hour ago, mr.sony said:

4- أبي مود اسل للمانجرس مايقدر يرقي فيه رتبة أعلى منه

سبق ونزلت المود على قناتي

لا تنسى الاشتراك

mr.sony · August 16, 2017

1 hour ago, Talis said:
الطلب الأول
guiSetVisible -- true
guiSetVisible - false
الطلب الثاني

اذا جاء يختار مكان حط عليه داتا واذا مات يجيب الداتا ويحطه بالمكان اللي اختاره
setElementData
getElementData
الطلب الثالث :

اطرح اكوادك؟

بخصوص الطلب الرابع دور بالكومنتي تلقا كثير مودات زي كذا

معليش اخوك مبتدئ : بالنسبة للطلب الاول والثاني وين أحط الكود

هذي الاكواد حقت ملف ادمن سيرفر لمود الترقيات

xAddToGroupFunction_ = function ( Group,Price,Name )
	local account = getAccountName(getPlayerAccount(source));
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
	if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا  ! ",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
		aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
		outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);
	else
		outputChatBox("**ليس لديك ساعات كافية",source,255,0,0,true);
    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)

19 minutes ago, |M.r|LooFe| said:

بنسبة لمود شراء رتب

بعطيك ملف سيرفر كامل من برمجتي

هذا الكود حطه في ملف سيرفر ولا تعدل على شي


local aGroups = { 
	["3agl"] = true ,
	
	["gpp"] = true ,
	
	["apm"] = true ,
	
	["ADMIN[EX]"] = true ,	
	
	["serial"] = true ,	

	["suppor"] = true ,	

	["7sap"] = 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* ( #ffffffالادارة #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 not 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_)

هذا الكود لا تعدل عليه شي والا يخرب

اسم رتبة الادمن المخالف Admin-X

طبعا المود فيه ميزات

1- لو تعطيه مخالف ما يقدر يشتري

2- ما يكرر رتب

سبق ونزلت المود على قناتي

لا تنسى الاشتراك

اوكي حطيته بس ما اعرف وين بالظبط احط الكود

شوف وين احط الكود

xAddToGroupFunction_ = function ( Group,Price,Name )
	local account = getAccountName(getPlayerAccount(source));
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
	if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا  ! ",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
		aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
		outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);
	else
		outputChatBox("**ليس لديك ساعات كافية",source,255,0,0,true);
    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)

ذا ملف ادمن سيرفر حق مود الترقيات

شكرا على مود الاسل

|M.r|LooFe| · August 16, 2017

1 hour ago, mr.sony said:

معليش اخوك مبتدئ : بالنسبة للطلب الاول والثاني وين أحط الكود

هذي الاكواد حقت ملف ادمن سيرفر لمود الترقيات


xAddToGroupFunction_ = function ( Group,Price,Name )
	local account = getAccountName(getPlayerAccount(source));
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
	if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا  ! ",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
		aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
		outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);
	else
		outputChatBox("**ليس لديك ساعات كافية",source,255,0,0,true);
    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)

اوكي حطيته بس ما اعرف وين بالظبط احط الكود

شوف وين احط الكود


xAddToGroupFunction_ = function ( Group,Price,Name )
	local account = getAccountName(getPlayerAccount(source));
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,0,true); end
	if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا  ! ",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
		aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account);
		outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true);
	else
		outputChatBox("**ليس لديك ساعات كافية",source,255,0,0,true);
    end
end
addEvent("Accept:the:request",true)
addEventHandler("Accept:the:request",root,xAddToGroupFunction_)

ذا ملف ادمن سيرفر حق مود الترقيات

شكرا على مود الاسل

يخوي امسح كل اكواد ملف سيرفر

وحط الكود يلي عطيطك اياه

coNolel · August 16, 2017

local sValue = getElementData( source,'PlayTime' )

مو لازم يغير شي ؟

طيب لو كان عنده داتا التواجد غير ؟

|M.r|LooFe| · August 16, 2017

10 minutes ago, coNolel said:

local sValue = getElementData( source,'PlayTime' )

مو لازم يغير شي ؟

طيب لو كان عنده داتا التواجد غير ؟

لو عنده يغيره بس لو غير بأحد الاكواد رح يخرب

لانه اناا مجرب

Sign In

أرجو مساعدتي

Recommended Posts

mr.sony

Link to comment

1337.Ibrahim

Link to comment

|M.r|LooFe|

Link to comment

mr.sony

Link to comment

|M.r|LooFe|

Link to comment

coNolel

Link to comment

|M.r|LooFe|

Link to comment

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

Activity

MTA Network

Social Media