-:( مساعدة في كود بسيط ):-

[MrNAMOLA]

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

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

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

اتمني الافادة

[MoHaMeD_Dz]

انت معك المود وفيه ملف تضيف فيه السريال بس تبي تضيف من داخل السيرفر بدون ما تعدله وترفعه من جديد؟

 

[N3xT]

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

[MrNAMOLA]

1 hour ago, MoHaMeD_Dz said:

انت معك المود وفيه ملف تضيف فيه السريال بس تبي تضيف من داخل السيرفر بدون ما تعدله وترفعه من جديد؟

 

يب هاد الي ابية

1 hour ago, N3xT said:

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

ممكن مثال توضيحي

[#DesTroyeR]

executeSQLQuery

--or
dbConnect
dbQuery

 

[MoHaMeD_Dz]

On 09/11/2018 at 23:45, MrNAMOLA said:

يب هاد الي ابية

On 09/11/2018 at 22:39, N3xT said:

معي مود منه يمديك تعدل المودات وانت داخل السيرفر اذا تبيه تواصل معب خاص

[#Major .]

استعمل الجداول افضل واسهل

[#DesTroyeR]

44 minutes ago, *RayaN-Alharbi. said:

استعمل الجداول افضل واسهل

لو انه رستر المود الجدول بيفضي._.

[[T]|O|[P]George]

2 hours ago, #DesTroyeR said:

لو انه رستر المود الجدول بيفضي._.

setAccountData
getAccountData

 

[MrNAMOLA]

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

[#Major .]

On 10/11/2018 at 12:43, #DesTroyeR said:

لو انه رستر المود الجدول بيفضي._.

يحفظة بتوجوسن

[Mr.Mostafa]

19 hours ago, MrNAMOLA said:

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

دامك مبتدئ بالبرمجة .. شوف مودات مستر جراند حقت الاملاك الخاصة -- لها نفس الفكرة الي تقول عليها

تعلم من اكوادها ,, موداته مب مشفرة ..

[MrNAMOLA]

4 hours ago, Mr.Mostafa said:

دامك مبتدئ بالبرمجة .. شوف مودات مستر جراند حقت الاملاك الخاصة -- لها نفس الفكرة الي تقول عليها

تعلم من اكوادها ,, موداته مب مشفرة ..

اممم فكرة كويسة 
بس لو مفهمت شيء وش اسوي ؟

[N3xT]

On 11/11/2018 at 14:08, *RayaN-Alharbi. said:

يحفظة بتوجوسن

فاهمه غلط انت, التوجسون يحول الجدول الى سترنق فقط

[[T]|O|[P]George]

15 hours ago, MrNAMOLA said:

اممم فكرة كويسة 
بس لو مفهمت شيء وش اسوي ؟

table.insert

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

Edited November 12, 2018 by [T]|O|[P]George

[#Major .]

12 hours ago, N3xT said:

فاهمه غلط انت, التوجسون يحول الجدول الى سترنق فقط

يب اقصد يحفظ السريالات بقاعدة بيانات بصيغة جوسن

[MrNAMOLA]

On 12/11/2018 at 16:55, [T]|O|[P]George said:

table.insert

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

ابي مثال حتي لو صغير قدا لاني مب فاهم صراحة

[#Major .]

10 hours ago, MrNAMOLA said:

ابي مثال حتي لو صغير قدا لاني مب فاهم صراحة

 
table = {}
addCommandHandler("AddSerial",function (source,_,Serial)
 table.insert(table,Serial)
 end )
--Server

 

[MR.M1]

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

[+Source|>]

executeSQLQuery

 

[nxFairlywell]

Server side :

 

__aclAdminRank= "Admin" -- إسم رتبة الشخص اللي يقدر يضيف السريالات بدل كلمة أدمن


addEventHandler("onResourceStart", resourceRoot,
	function()
	
		__SQLQ=executeSQLQuery("CREATE TABLE IF NOT EXISTS `vipSerials` (`serial` TEXT )");
		
	end
	
)







checkList=function(loss)
	
	local __sql = executeSQLQuery("SELECT serial FROM vipSerials WHERE serial=?", getPlayerSerial(source));
		
	if #__sql == 0 or __sql == nil then
	
		setElementHealth(source, loss)
		
	else
		
		setElementHealth(source,getElementHealth(source)+loss)
		
		return
		
	end
	
end


addEvent("checkList", true)
addEventHandler("checkList", root, checkList)



addSerials=function( player, _command, serial )
	
	local pacc = getPlayerAccount(player);
	
	if not ( isGuestAccount(pacc) ) then
	
		local acc = getAccountName(pacc);
	
		if type(__aclAdminRank) == "string" then
		
			if isObjectInACLGroup ( "user." .. acc, aclGetGroup ( __aclAdminRank ) ) then
			
				if serial:len() == 32 then
				
					local __sql = executeSQLQuery("SELECT serial FROM vipSerials WHERE serial=?", serial)
					
					if #__sql == 0 then
						
						local __sqlInsert = executeSQLQuery("INSERT INTO vipSerials(serial) VALUES(?)", serial )
							
						if __sqlInsert then
							
							outputChatBox("تمت إضافة السيريال لقائمة الحماية بنجاح ورقم السريال هو :",player, 0,255,0)
							outputChatBox(serial, player, 0, 255, 0)
								
						else
							
							outputChatBox('فشل في إضافة السريال إلى قائمة الحماية', player, 255,0,0)
								
						end
							
					else
						
						return 
							
						outputChatBox('هذا السيريال موجود بالفعل في القائمة', player, 255, 0, 0)
						
					end
						
					
				else
					
					return 
					
					outputChatBox("يجب أن يحتوي السيريال على الأقل 32 حرفاً ورقماً", player, 255, 0 , 0)
	
				end
				
			else
			
				return
				
				outputChatBox("لا تمتلك الصلاحيات للقيام بالعملية", player, 255, 0, 0)
				
			end
			
		else
		
			return
			
			outputChatBox("خطاً برمجي !!", player, 255, 0, 0)
			
		end
		
	else
	
		return 
		
		outputChatBox("من فضلك قم بتسجيل الدخول !", player, 255, 0, 0)
		
	end
	
end


addCommandHandler("addSafetySerial", addSerials)

 

 

 

 

 

 

Client side :

 

addEventHandler('onClientPlayerDamage', root,

	function(_,_,_,loss)
	
		cancelEvent()
		
		triggerServerEvent("checkList", localPlayer, loss)
		
	end
	
)

 

[nxFairlywell]

SQL إستخدم الـ

أسهل وأسرع 

 

 

تعديل لكود السيرفر * 

صار بق بسيط

 

__aclAdminRank= "Admin"



addEventHandler("onResourceStart", resourceRoot,
	function()
	
		__SQLQ=executeSQLQuery("CREATE TABLE IF NOT EXISTS `vipsers` (`serial` TEXT )");
		
	end
	
)







checkList=function(loss)
	
	local __sql = executeSQLQuery("SELECT serial FROM vipsers WHERE serial=?", getPlayerSerial(source));
		
	if #__sql == 0 or __sql == nil then
	
		setElementHealth(source, getElementHealth(source)-loss)
		
	else
		
		setElementHealth(source,getElementHealth(source)+loss)
		
		return
		
	end
	
end


addEvent("checkList", true)
addEventHandler("checkList", root, checkList)



addSerials=function( player, _command, serial )
	
	local pacc = getPlayerAccount(player);
	
	if not ( isGuestAccount(pacc) ) then
	
		local acc = getAccountName(pacc);
	
		if type(__aclAdminRank) == "string" then
		
			if isObjectInACLGroup ( "user." .. acc, aclGetGroup ( __aclAdminRank ) ) then
			
				if serial:len() == 32 then
				
					local __sql = executeSQLQuery("SELECT serial FROM vipsers WHERE serial=?", serial)
					
					if #__sql == 0 then
						
						local __sqlInsert = executeSQLQuery("INSERT INTO vipsers(serial) VALUES(?)", serial )
							
						if __sqlInsert then
							
							outputChatBox("تمت إضافة السيريال لقائمة الحماية بنجاح ورقم السريال هو :",player, 0,255,0)
							outputChatBox(serial, player, 0, 255, 0)
								
						else
							
							outputChatBox('فشل في إضافة السريال إلى قائمة الحماية', player, 255,0,0)
								
						end
							
					else
						
						return 
							
						outputChatBox('هذا السيريال موجود بالفعل في القائمة', player, 255, 0, 0)
						
					end
						
					
				else
					
					return 
					
					outputChatBox("يجب أن يحتوي السيريال على الأقل 32 حرفاً ورقماً", player, 255, 0 , 0)
	
				end
				
			else
			
				return
				
				outputChatBox("لا تمتلك الصلاحيات للقيام بالعملية", player, 255, 0, 0)
				
			end
			
		else
		
			return
			
			outputChatBox("خطاً برمجي !!", player, 255, 0, 0)
			
		end
		
	else
	
		return 
		
		outputChatBox("من فضلك قم بتسجيل الدخول !", player, 255, 0, 0)
		
	end
	
end


addCommandHandler("addSafetySerial", addSerials)

 

Edited December 13, 2018 by NX_CI

[Guest]

On 13/12/2018 at 14:55, NX_CI said:

SQL إستخدم الـ

أسهل وأسرع 

 

 

تعديل لكود السيرفر * 

صار بق بسيط

 

__aclAdminRank= "Admin"



addEventHandler("onResourceStart", resourceRoot,
	function()
	
		__SQLQ=executeSQLQuery("CREATE TABLE IF NOT EXISTS `vipsers` (`serial` TEXT )");
		
	end
	
)







checkList=function(loss)
	
	local __sql = executeSQLQuery("SELECT serial FROM vipsers WHERE serial=?", getPlayerSerial(source));
		
	if #__sql == 0 or __sql == nil then
	
		setElementHealth(source, getElementHealth(source)-loss)
		
	else
		
		setElementHealth(source,getElementHealth(source)+loss)
		
		return
		
	end
	
end


addEvent("checkList", true)
addEventHandler("checkList", root, checkList)



addSerials=function( player, _command, serial )
	
	local pacc = getPlayerAccount(player);
	
	if not ( isGuestAccount(pacc) ) then
	
		local acc = getAccountName(pacc);
	
		if type(__aclAdminRank) == "string" then
		
			if isObjectInACLGroup ( "user." .. acc, aclGetGroup ( __aclAdminRank ) ) then
			
				if serial:len() == 32 then
				
					local __sql = executeSQLQuery("SELECT serial FROM vipsers WHERE serial=?", serial)
					
					if #__sql == 0 then
						
						local __sqlInsert = executeSQLQuery("INSERT INTO vipsers(serial) VALUES(?)", serial )
							
						if __sqlInsert then
							
							outputChatBox("تمت إضافة السيريال لقائمة الحماية بنجاح ورقم السريال هو :",player, 0,255,0)
							outputChatBox(serial, player, 0, 255, 0)
								
						else
							
							outputChatBox('فشل في إضافة السريال إلى قائمة الحماية', player, 255,0,0)
								
						end
							
					else
						
						return 
							
						outputChatBox('هذا السيريال موجود بالفعل في القائمة', player, 255, 0, 0)
						
					end
						
					
				else
					
					return 
					
					outputChatBox("يجب أن يحتوي السيريال على الأقل 32 حرفاً ورقماً", player, 255, 0 , 0)
	
				end
				
			else
			
				return
				
				outputChatBox("لا تمتلك الصلاحيات للقيام بالعملية", player, 255, 0, 0)
				
			end
			
		else
		
			return
			
			outputChatBox("خطاً برمجي !!", player, 255, 0, 0)
			
		end
		
	else
	
		return 
		
		outputChatBox("من فضلك قم بتسجيل الدخول !", player, 255, 0, 0)
		
	end
	
end


addCommandHandler("addSafetySerial", addSerials)

 

: ) لو تشرحله حبة حبة كان أحسن ..!

 

[#[K]iLLeR<3]

Just now, *AnGeL said:

: ) لو تشرحله حبة حبة كان أحسن ..!

 

اشوف الكود شارح نفسه للي يعرف الاكواد  

[nxFairlywell]

يب أنا ما حاولت أشرح الكود لأن الرجال يبي الطريقة وما قال انو مبتدئ , و إذا ما فهمت يا صاحب الموضوع رد هنا و أنا أشرحه