Jump to content

مشكلة باخد احداثيات اقرب لاعب


Recommended Posts

سلام عليكم

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

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

**( getNearestVehicle مستخدم يوزفل فكشن )**

 

addCommandHandler ("takeM",
function (source,cmd,name,amount)
		local playerStealFromHimMoney = getPlayerFromPartialName (name)
					 local gplayer = getNearestVehicle ( playerStealFromHimMoney , 1 )
						 if gplayer then
					 takePlayerMoney ( playerStealFromHimMoney, tonumber(amount) )	
		givePlayerMoney ( source, tonumber(amount) )
		else
		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",source,255,0,0,true)
		end
	)
	
	
	function getNearestVehicle(player,distance)
	local tempTable = {}
	local lastMinDis = distance-0.0001
	local nearestVeh = false
	local px,py,pz = getElementPosition(player)
	local pint = getElementInterior(player)
	local pdim = getElementDimension(player)

	for _,v in pairs(getElementsByType("player")) do
		local vint,vdim = getElementInterior(v),getElementDimension(v)
		if vint == pint and vdim == pdim then
			local vx,vy,vz = getElementPosition(v)
			local dis = getDistanceBetweenPoints3D(px,py,pz,vx,vy,vz)
			if dis < distance then
				if dis < lastMinDis then 
					lastMinDis = dis
					nearestVeh = v
				end
			end
		end
	end
	return nearestVeh
end

 

Link to comment

ناقصك اند بالكوماند

addCommandHandler ("takeM",
function (source,cmd,name,amount)
		local playerStealFromHimMoney = getPlayerFromPartialName (name)
					 local gplayer = getNearestVehicle ( playerStealFromHimMoney , 1 )
						 if gplayer then
					 takePlayerMoney ( playerStealFromHimMoney, tonumber(amount) )	
		givePlayerMoney ( source, tonumber(amount) )
		else
		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",source,255,0,0,true)
		end
		end
	)

 

Link to comment
27 minutes ago, Trefeor said:

ناقصك اند بالكوماند


addCommandHandler ("takeM",
function (source,cmd,name,amount)
		local playerStealFromHimMoney = getPlayerFromPartialName (name)
					 local gplayer = getNearestVehicle ( playerStealFromHimMoney , 1 )
						 if gplayer then
					 takePlayerMoney ( playerStealFromHimMoney, tonumber(amount) )	
		givePlayerMoney ( source, tonumber(amount) )
		else
		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",source,255,0,0,true)
		end
		end
	)

 

المشكلة مب بالاند والكلام دا - انا مسوي كود علي السريع

لكن اليوزفل فكشن ابي احد يظبطه لي

Link to comment

#Deleted

 

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

وبعدين هو م يرجع لك قيمة true

يرجع لك الاعب الي قريب

    addCommandHandler ("takeM",
    function (plr,cmd,name,amount)
    					 local gplayer = getNearestVehicle ( plr , 1 )
    						 if gplayer then
    					 takePlayerMoney ( gplayer, tonumber(amount) )	
    		givePlayerMoney ( plr, tonumber(amount) )
    		else
    		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",plr,255,0,0,true)
    		end
			end
    	)

جرب

Edited by *RayaN-Alharbi.
Link to comment
1 hour ago, *RayaN-Alharbi. said:

#Deleted

 

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

وبعدين هو م يرجع لك قيمة true

يرجع لك الاعب الي قريب


    addCommandHandler ("takeM",
    function (plr,cmd,name,amount)
    					 local gplayer = getNearestVehicle ( plr , 1 )
    						 if gplayer then
    					 takePlayerMoney ( gplayer, tonumber(amount) )	
    		givePlayerMoney ( plr, tonumber(amount) )
    		else
    		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",plr,255,0,0,true)
    		end
			end
    	)

جرب

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

Link to comment
6 minutes ago, N3xT said:

@*RayaN-Alharbi.

المعذرة, دوبني انتبهت للكود حقه انه يجيب اقرب لاعب كودك صحيح حالياً

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

لاني اشوفك مبرمج كبييييييييييييير اوي :lol:

 

Link to comment
55 minutes ago, *RayaN-Alharbi. said:

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

لاني اشوفك مبرمج كبييييييييييييير اوي :lol:

 

انا ماقريت الفنكشن اللي فوق, قريته من الويكي

لكن بعدين انتبهت له انه معدل للاعبين

Link to comment
3 hours ago, N3xT said:

اليوزفل فنكشن يجيب لك اقرب سيارة مو لاعب

عدلت اليوزفل فكشن حطيت

for _,v in pairs(getElementsByType("player")) do

3 hours ago, *RayaN-Alharbi. said:

#Deleted

 

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

وبعدين هو م يرجع لك قيمة true

يرجع لك الاعب الي قريب


    addCommandHandler ("takeM",
    function (plr,cmd,name,amount)
    					 local gplayer = getNearestVehicle ( plr , 1 )
    						 if gplayer then
    					 takePlayerMoney ( gplayer, tonumber(amount) )	
    		givePlayerMoney ( plr, tonumber(amount) )
    		else
    		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",plr,255,0,0,true)
    		end
			end
    	)

جرب

طيب بس كودك انت مسويه

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

انا ابي احدد الاعب

Link to comment
    addCommandHandler ("takeM",
    function (plr,cmd,name,amount)
						if name then
    					 local gplayer = getNearestVehicle ( plr , 1, name )
    						 if gplayer then
    					 takePlayerMoney ( gplayer, tonumber(amount) )	
    		givePlayerMoney ( plr, tonumber(amount) )
    		else
    		outputChatBox ("* Error :#ffffff يجب ان تقترب من الاعب لاخد منه فلوس !",plr,255,0,0,true)
    		end
			end
			end
    	)
    	
    	
    	function getNearestVehicle(player,distance,name)
    	local tempTable = {}
    	local lastMinDis = distance-0.0001
    	local nearestVeh = false
    	local px,py,pz = getElementPosition(player)
    	local pint = getElementInterior(player)
    	local pdim = getElementDimension(player)

    	for _,v in pairs(getElementsByType("player")) do
    		local vint,vdim = getElementInterior(v),getElementDimension(v)
    		if vint == pint and vdim == pdim then
    			local vx,vy,vz = getElementPosition(v)
    			local dis = getDistanceBetweenPoints3D(px,py,pz,vx,vy,vz)
    			if dis < distance then
    				if dis < lastMinDis then
						if ( name == getPlayerName(v) ) then
    					lastMinDis = dis
    					nearestVeh = v
    				end
    			end
    		end
    	end
	end
    	return nearestVeh
 end

جرب

Link to comment

غير المسافة بينك وبين اللاعب

local distance = 5 -- المسافة بينك وبين اللي تبي تسرق منه

addCommandHandler ("takeM",
	function ( source, cmd, name, amount )
		if ( name and amount ) then
			local wantedPlayer = getPlayerFromPartialName ( name )
			if ( wantedPlayer ) then
				local amount = tonumber ( amount )
				local px,py,pz = getElementPosition ( source )
				local pint = getElementInterior ( source )
				local pdim = getElementDimension ( source )		
				local wx,wy,wz = getElementPosition ( wantedPlayer )
				local wint = getElementInterior ( wantedPlayer )
				local wdim = getElementDimension ( wantedPlayer )		
				if ( pint == wint and pdim == wdim ) then
					local dis = getDistanceBetweenPoints3D ( px, py, pz, wx, wy, wz )
					if ( dis <= distance ) then
						takePlayerMoney ( wantedPlayer, amount )	
						givePlayerMoney ( source, amount )
						outputChatBox("لقد قمت بسرقة اللاعب بنجاح", source)
					else
						outputChatBox("لايوجد لاعب قريب منك", source)
					end
				else
					outputChatBox("اللاعب بعالم اخر", source)
				end
			else
				outputChatBox("هنالك خطأ بايجاد اللاعب", source)
			end
		else
			outputChatBox("/takeM player amount", source)
		end
	end
)

 

Link to comment
2 minutes ago, N3xT said:

غير المسافة بينك وبين اللاعب


local distance = 5 -- المسافة بينك وبين اللي تبي تسرق منه

addCommandHandler ("takeM",
	function ( source, cmd, name, amount )
		if ( name and amount ) then
			local wantedPlayer = getPlayerFromPartialName ( name )
			if ( wantedPlayer ) then
				local amount = tonumber ( amount )
				local px,py,pz = getElementPosition ( source )
				local pint = getElementInterior ( source )
				local pdim = getElementDimension ( source )		
				local wx,wy,wz = getElementPosition ( wantedPlayer )
				local wint = getElementInterior ( wantedPlayer )
				local wdim = getElementDimension ( wantedPlayer )		
				if ( pint == wint and pdim == wdim ) then
					local dis = getDistanceBetweenPoints3D ( px, py, pz, wx, wy, wz )
					if ( dis <= distance ) then
						takePlayerMoney ( wantedPlayer, amount )	
						givePlayerMoney ( source, amount )
						outputChatBox("لقد قمت بسرقة اللاعب بنجاح", source)
					else
						outputChatBox("لايوجد لاعب قريب منك", source)
					end
				else
					outputChatBox("اللاعب بعالم اخر", source)
				end
			else
				outputChatBox("هنالك خطأ بايجاد اللاعب", source)
			end
		else
			outputChatBox("/takeM player amount", source)
		end
	end
)

 

تسلم + جاري تجربته

طيب شوف مثلا لو ابي اسوي

لما اكتب الامر ينتظر 5 ثواني عشان ينفذ ويبلع الي باخد منه فلوس - انه يهرب عشان ما اخد منه فلوس

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

addCommandHandler ("steal",
	function ( source, cmd, name )
		if ( name ) then
			local wantedPlayer = getPlayerFromPartialName ( name )
			if ( wantedPlayer ) then
				local amount = tonumber ( amount )
				local px,py,pz = getElementPosition ( source )
				local pint = getElementInterior ( source )
				local pdim = getElementDimension ( source )		
				local wx,wy,wz = getElementPosition ( wantedPlayer )
				local wint = getElementInterior ( wantedPlayer )
				local wdim = getElementDimension ( wantedPlayer )	
				local amount = math.random(1000,15000)
				if ( pint == wint and pdim == wdim ) then
					local dis = getDistanceBetweenPoints3D ( px, py, pz, wx, wy, wz )
					if ( dis <= distance ) then
		    outputChatBox ("* Player "..getPlayerName(source).." tried to take money from you !!",wantedPlayer,255,0,0,true)
			setTimer(function()
					if ( dis <= distance ) then
						takePlayerMoney ( wantedPlayer, amount )	
						givePlayerMoney ( source, amount )
			outputChatBox ("Player "..getPlayerName(source).." Steal "..amount.." from "..getPlayerName(wantedPlayer).."",root,255,0,0,true)
end
			end, 1000*5, 1 )

					else
						outputChatBox("لايوجد لاعب قريب منك", source)
					end
				else
					outputChatBox("اللاعب بعالم اخر", source)
				end
			else
				outputChatBox("هنالك خطأ بايجاد اللاعب", source)
			end
		else
			outputChatBox("/"..cmd.." player", source)
		end
	end
)

 

Link to comment
7 minutes ago, Mr.Mostafa said:

ابي ان الاعب الي باخد منه الفلوس ما يكون انا


    local distance = 5 -- المسافة بينك وبين اللي تبي تسرق منه

    addCommandHandler ("takeM",
    	function ( source, cmd, name, amount )
    		if ( name and amount ) then
    			local wantedPlayer = getPlayerFromPartialName ( name )
    			if ( wantedPlayer and wantedPlayer ~= source ) then
    				local amount = tonumber ( amount )
    				local px,py,pz = getElementPosition ( source )
    				local pint = getElementInterior ( source )
    				local pdim = getElementDimension ( source )		
    				local wx,wy,wz = getElementPosition ( wantedPlayer )
    				local wint = getElementInterior ( wantedPlayer )
    				local wdim = getElementDimension ( wantedPlayer )		
    				if ( pint == wint and pdim == wdim ) then
    					local dis = getDistanceBetweenPoints3D ( px, py, pz, wx, wy, wz )
    					if ( dis <= distance ) then
    						takePlayerMoney ( wantedPlayer, amount )	
    						givePlayerMoney ( source, amount )
    						outputChatBox("لقد قمت بسرقة اللاعب بنجاح", source)
    					else
    						outputChatBox("لايوجد لاعب قريب منك", source)
    					end
    				else
    					outputChatBox("اللاعب بعالم اخر", source)
    				end
    			else
    				outputChatBox("هنالك خطأ بايجاد اللاعب", source)
    			end
    		else
    			outputChatBox("/takeM player amount", source)
    		end
    	end
    )

 

Link to comment
4 minutes ago, *RayaN-Alharbi. said:

    local distance = 5 -- المسافة بينك وبين اللي تبي تسرق منه

    addCommandHandler ("takeM",
    	function ( source, cmd, name, amount )
    		if ( name and amount ) then
    			local wantedPlayer = getPlayerFromPartialName ( name )
    			if ( wantedPlayer and wantedPlayer ~= source ) then
    				local amount = tonumber ( amount )
    				local px,py,pz = getElementPosition ( source )
    				local pint = getElementInterior ( source )
    				local pdim = getElementDimension ( source )		
    				local wx,wy,wz = getElementPosition ( wantedPlayer )
    				local wint = getElementInterior ( wantedPlayer )
    				local wdim = getElementDimension ( wantedPlayer )		
    				if ( pint == wint and pdim == wdim ) then
    					local dis = getDistanceBetweenPoints3D ( px, py, pz, wx, wy, wz )
    					if ( dis <= distance ) then
    						takePlayerMoney ( wantedPlayer, amount )	
    						givePlayerMoney ( source, amount )
    						outputChatBox("لقد قمت بسرقة اللاعب بنجاح", source)
    					else
    						outputChatBox("لايوجد لاعب قريب منك", source)
    					end
    				else
    					outputChatBox("اللاعب بعالم اخر", source)
    				end
    			else
    				outputChatBox("هنالك خطأ بايجاد اللاعب", source)
    			end
    		else
    			outputChatBox("/takeM player amount", source)
    		end
    	end
    )

 

تمام شكرا

+ طيب طلب الـ التايمر؟

Link to comment
1 minute ago, *RayaN-Alharbi. said:

التايمر ع نكست لان يبيلها تحققات وشغل والكوود حقه خخ <>

التايمر على صاحب الموضوع, يحاول يسوي كوده بنفسه ماقصرت معه وعدلت له الكود حقه

Link to comment

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...