Mr.Mostafa Posted June 24, 2018 Share Posted June 24, 2018 سلام عليكم ابي اسوي لو انا جمب لاعب اقدر اخد منه فلوس عادي لكن المشكلة لو بعيد عنه باخد برضوا **( 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
Trefeor Posted June 25, 2018 Share Posted June 25, 2018 ناقصك اند بالكوماند 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
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 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
N3xT Posted June 25, 2018 Share Posted June 25, 2018 اليوزفل فنكشن يجيب لك اقرب سيارة مو لاعب Link to comment
#Major . Posted June 25, 2018 Share Posted June 25, 2018 (edited) #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 June 25, 2018 by *RayaN-Alharbi. Link to comment
N3xT Posted June 25, 2018 Share Posted June 25, 2018 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
#Major . Posted June 25, 2018 Share Posted June 25, 2018 Just now, N3xT said: اليوزفل فنكشن يجيب لك أقرب سيارة مو أقرب لاعب, يعني كودك خطأ قاعد تاخذ فلوس من السيارة شكرا ع التصحيح Link to comment
N3xT Posted June 25, 2018 Share Posted June 25, 2018 (edited) @*RayaN-Alharbi. المعذرة, دوبني انتبهت للكود حقه انه يجيب اقرب لاعب كودك صحيح حالياً Edited June 25, 2018 by N3xT Link to comment
#Major . Posted June 25, 2018 Share Posted June 25, 2018 6 minutes ago, N3xT said: @*RayaN-Alharbi. المعذرة, دوبني انتبهت للكود حقه انه يجيب اقرب لاعب كودك صحيح حالياً انا قد استغربت لاني اشوف اليوزفل م فيه اي فنكشن خاص بالسيارات بس قلت معك حقق لاني اشوفك مبرمج كبييييييييييييير اوي Link to comment
N3xT Posted June 25, 2018 Share Posted June 25, 2018 55 minutes ago, *RayaN-Alharbi. said: انا قد استغربت لاني اشوف اليوزفل م فيه اي فنكشن خاص بالسيارات بس قلت معك حقق لاني اشوفك مبرمج كبييييييييييييير اوي انا ماقريت الفنكشن اللي فوق, قريته من الويكي لكن بعدين انتبهت له انه معدل للاعبين Link to comment
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 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
#Major . Posted June 25, 2018 Share Posted June 25, 2018 6 minutes ago, Mr.Mostafa said: عدلت اليوزفل فكشن حطيت for _,v in pairs(getElementsByType("player")) do طيب بس كودك انت مسويه انه ياخد فلوس من اقرب لاعب جمبي انا ابي احدد الاعب انت ايش تبي تسوي بالضبط؟ Link to comment
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 Just now, *RayaN-Alharbi. said: انت ايش تبي تسوي بالضبط؟ ابي اسوي لو انا قريب جداااااااا من الاعب الي بكتب اسمه اخد منه الفلوس الي بحدددها /take player amount ! Link to comment
#Major . Posted June 25, 2018 Share Posted June 25, 2018 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
N3xT Posted June 25, 2018 Share Posted June 25, 2018 غير المسافة بينك وبين اللاعب 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
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 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
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 + ابي ان الاعب الي باخد منه الفلوس ما يكون انا محاولتي: if ( name ) and not == source then Link to comment
#Major . Posted June 25, 2018 Share Posted June 25, 2018 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
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 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
#Major . Posted June 25, 2018 Share Posted June 25, 2018 1 minute ago, Mr.Mostafa said: تمام شكرا + طيب طلب الـ التايمر؟ التايمر ع نكست لان يبيلها تحققات وشغل والكوود حقه خخ <> Link to comment
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 1 minute ago, *RayaN-Alharbi. said: التايمر ع نكست لان يبيلها تحققات وشغل والكوود حقه خخ <> اوك Link to comment
N3xT Posted June 25, 2018 Share Posted June 25, 2018 1 minute ago, *RayaN-Alharbi. said: التايمر ع نكست لان يبيلها تحققات وشغل والكوود حقه خخ <> التايمر على صاحب الموضوع, يحاول يسوي كوده بنفسه ماقصرت معه وعدلت له الكود حقه Link to comment
#Major . Posted June 25, 2018 Share Posted June 25, 2018 Just now, N3xT said: التايمر على صاحب الموضوع, يحاول يسوي كوده بنفسه ماقصرت معه وعدلت له الكود حقه كل واحد يرميها ع الثاني لكن صح كلامك Link to comment
Mr.Mostafa Posted June 25, 2018 Author Share Posted June 25, 2018 2 minutes ago, N3xT said: التايمر على صاحب الموضوع, يحاول يسوي كوده بنفسه ماقصرت معه وعدلت له الكود حقه 'طيب انا سويت التايمر - لكن ابي تصحيح بس Link to comment
#Major . Posted June 25, 2018 Share Posted June 25, 2018 1 minute ago, Mr.Mostafa said: 'طيب انا سويت التايمر - لكن ابي تصحيح بس ورينا محاولتك Link to comment
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now