x[=كود بسيط=]x

[Jw8.]

سلام عليكم ابي كود يضغط jgjoin

فقط يخشو 5 الحد لو عندك الكود وضحه لي

 

function dmarPosition ( source, commandName, x, y, z )
	setElementPosition ( source, x, y, z )
end
addCommandHandler ( jgjoin", dmarPosition  )

--لاهنتم

[Abdul KariM]

عليكم السلام 

انت تقول يضغط والي اشوفه كوماند

والطريقة استعمالك للفنكشن خطأ

وضح ايش تبغى

[Jw8.]

5 minutes ago, Abdul KariM said:

عليكم السلام 

انت تقول يضغط والي اشوفه كوماند

والطريقة استعمالك للفنكشن خطأ

وضح ايش تبغى

يعني انتقال فقط الي يخشونه 4 لاعبين

الي يخش ذه الكوومند  jgjoin

[Abdul KariM]

طيب خليه بجهة السيرفر وسوي متغير 

وكل مالاعب يخش زود قيمة المتغير لـ 1

return واذا المتغير يساوي 5 او 4 سوي  

وصلح السترنق حق الكوماند وافتح الدي بوق وحل مشاكلك

وماراح اساعدك الا بمحاولة 

[^iiEcoo'x_)]

-- Created By #_iMr,[E]coo ... Not Delete It 
local TableARaB = {  } 


addCommandHandler ( "Join_", 
  function ( ) 
	if #TableARaB >= 5 then return outputChatBox( "اكتمل العدد ... حاول مرة اخرى", root, 255, 170, 127,true) end 
	setElementPosition ( source, x, y, z )    
	tableinsert(source, TableARaB)
    end
 end
)


addCommandHandler ( "Out_", 
  function ( ) 
	setElementPosition ( source, x, y, z )    
	tableremove(source, TableARaB)
	outputChatBox( "افتتح المجال للدخول شخص اخر", root, 255, 170, 127,true)	
    end
 end
)
  
function tableinsert(player, Table)
    if not getPlayerTable(player, TableARaB) then
    table.insert(Table, player)
   end
end
  
function tableremove(player, Table)
	for i, v in ipairs (Table) do
	if (v == player) then
	table.remove(Table, i)
     end
  end
end 

function getPlayerTable(player, Table)
    for i, v in ipairs (Table) do
	if (v == player) then
	return true
	end
  end
end  


addEventHandler("onPlayerQuit", root,
 function()
    if getPlayerTable(source, TableARaB) then
	tableremove(source, TableARaB)
	outputChatBox( "افتتح المجال للدخول شخص اخر", root, 255, 170, 127,true)
    end
 end
)



addEventHandler("onPlayerWasted", root,
function()
	if getPlayerTable(source, TableARaB) then
    tableremove(source, TableARaB)
	outputChatBox( "افتتح المجال للدخول شخص اخر", root, 255, 170, 127,true)
	end
end );

 

سويت لك تكتب باف 8 Join_

يدخلك واذا فيه 5 اشخاص م يدخلك 

وتقدر تطلع من المكان لما تكتب Out_

ويقول يوجد مكان للدخول 

واذا طلع من السيرفر او مات الشخص يقول له يوجد مكان للدخول

ما سامحك اذا تمسح الحقوق

 

Edited January 28, 2017 by #_iMr.[E]coo

[Abu-Solo]

7 minutes ago, #_iMr.[E]coo said:

-- Created By #_iMr,[E]coo ... Not Delete It 
local TableARaB = {  } 


addCommandHandler ( "Join_", 
  function ( ) 
	if #TableARaB >= 5 then return outputChatBox( "اكتمل العدد ... حاول مرة اخرى", root, 255, 170, 127,true) end 
	setElementPosition ( source, x, y, z )    
	tableinsert(source, TableARaB)
    end
 end
)


addCommandHandler ( "Out_", 
  function ( ) 
	setElementPosition ( source, x, y, z )    
	tableremove(source, TableARaB)
	outputChatBox( "افتتح المجال للدخول شخص اخر", root, 255, 170, 127,true)	
    end
 end
)
  
function tableinsert(player, Table)
    if not getPlayerTable(player, TableARaB) then
    table.insert(Table, player)
   end
end
  
function tableremove(player, Table)
	for i, v in ipairs (Table) do
	if (v == player) then
	table.remove(Table, i)
     end
  end
end 

function getPlayerTable(player, Table)
    for i, v in ipairs (Table) do
	if (v == player) then
	return true
	end
  end
end  


addEventHandler("onPlayerQuit", root,
 function()
    if getPlayerTable(source, TableARaB) then
	tableremove(source, TableARaB)
	outputChatBox( "افتتح المجال للدخول شخص اخر", root, 255, 170, 127,true)
    end
 end
)



addEventHandler("onPlayerWasted", root,
function()
	if getPlayerTable(source, TableARaB) then
    tableremove(source, TableARaB)
	outputChatBox( "افتتح المجال للدخول شخص اخر", root, 255, 170, 127,true)
	end
end );

 

سويت لك تكتب باف 8 Join_

يدخلك واذا فيه 5 اشخاص م يدخلك 

وتقدر تطلع من المكان لما تكتب Out_

ويقول يوجد مكان للدخول 

واذا طلع من السيرفر او مات الشخص يقول له يوجد مكان للدخول

ما سامحك اذا تمسح الحقوق

 

وش حقوقه يابو حقوق 

[^iiEcoo'x_)]

Just now, Abu-Solo said:

وش حقوقه يابو حقوق 

 

[#BrosS]

^ tableinsert سطر 9 مكتوب 

في الحقيقة في اخطاء كثيرة

[' A F .]

^ طيب هو مسوي

Custom Function

شوف تحت ..

[^iiEcoo'x_)]

6 minutes ago, Default said:

^ طيب هو مسوي

Custom Function

شوف تحت ..

خخهخهخهخخخخخخخخخخخخخخخخخخخخخخخخخخخخ 

احب اعقد الكود ذذ

[N3xT]

مادري ليه الجداول والحويس ذا والكود بالكثير يبي له ١٠ سطور

 

[Abdul KariM]

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

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

وحقوق ؟ الله المستعان

[Master_MTA]

انا اللي اشوفه مثال زين الاخ عبد الكريم لخص ما يحتاج تيبل ولا شي

متغير يكفي

local Master=0
function dmarPosition ( thePlayer)
  if (thePlayer) then
    if not Master>=4 then
  local x,y,z=0,0,0--------------------بدلها بالاحداثيات حقتك
	setElementPosition ( thePlayer,x,y,z )
      Master=Master+1
      else
      outputChatBox("الحد المسموح به لدخول اللاعبين 4",thePlayer)
    end
    end
end
addCommandHandler (" jgjoin", dmarPosition  )

هذا ان لم اكن مخطا والله اعلم

@DmAr511

[N3xT]

maxPlayer = 0

function dmarPosition ( source, commandName, x, y, z )
	if ( maxPlayer <= 5 ) then
		setElementPosition ( source, x, y, z )
		maxPlayer = maxPlayer + 1
	end
end
addCommandHandler ( "jgjoin", dmarPosition  )

 

[Jw8.]

On ٢٩‏/١‏/٢٠١٧ at 20:18, N3xT said:

maxPlayer = 0

function dmarPosition ( source, commandName, x, y, z )
	if ( maxPlayer <= 5 ) then
		setElementPosition ( source, x, y, z )
		maxPlayer = maxPlayer + 1
	end
end
addCommandHandler ( "jgjoin", dmarPosition  )

 

بالله ابيه علا بوتين لوسمحت

[N3xT]

4 minutes ago, DmAr511 said:

بالله ابيه علا بوتين لوسمحت

تفضل

[Jw8.]

Just now, N3xT said:

تفضل

بدون مزح لو سمحت 

 

+ الكود نسيه وقسم ###

[N3xT]

عطيتك طلبك الأول ، طلبك الثاني سويه بنفسك

اتوقع مايبي لها ذكاء عشان تعدله من كوماند لبوتون

[Abdul KariM]

استخدم

executeCommandHandler

مع الكود الي فوق 

[Abu-Solo]

8 minutes ago, N3xT said:

تفضل

ههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههه