Jump to content

مساعده

Mostafa MohammeD

By Mostafa MohammeD
in البرمجة

Recommended Posts

Mostafa MohammeD Playa Partner

Mostafa MohammeD

Posted
Posted

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

كيفكم شباب عساكم بخير

المهم :-

اليوم حبيت اعدل علي فري روم عندي وحبيت اضيف كود بحث في الانتقالات

سويت الكود بس ما يسوي بحث والدي بق ما يقلي في مشكلة في الكود ياليت تساعدوني

الكود 

function warpInit() 
 local players = table.map(getElementsByType('player'), function(p) return { name = getPlayerName(p) } end) 
 table.sort(players, function(a, b) return a.name < b.name end) 
 bindGridListToTable(wndWarp, 'playerlist', players, true) 
end 
  
  
addEventHandler("onClientGUIChanged",root, 
function () 
guiGridListClear(playerlist) 
   for _,v in ipairs (getElementsByType("player")) do 
    if string.find(getPlayerName (v),guiGetText(search)) then 
     local row = guiGridListAddRow (playerlist) 
     guiGridListSetItemText (playerlist, row, 1, getPlayerName (v), false, false) 
    end 
   end 
  end 
) 
  
  
function warpTo(leaf) 
 if not leaf then 
  leaf = getSelectedGridListLeaf(wndWarp, 'playerlist') 
  if not leaf then 
   return 
  end 
 end 
 local player = getPlayerFromNick(leaf.name) 
 if player then 
  server.warpMe(player) 
 end 
 closeWindow(wndWarp) 
end 
  
wndWarp = { 
 'wnd', 
 text = 'انتقال الى لاعب', 
 width = 300, 
 controls = { 
     {'lbl', id='البحث', text='البحث عن اللاعبين', width=96}, 
     {'txt', id='search', text='', width=280}, 
  { 
   'lst', 
   id='playerlist', 
   width=280, 
   height=310, 
   columns={ 
    {text='الاعبين', attr='name'} 
   }, 
   onitemdoubleclick=warpTo 
  }, 
  {'btn', id='انتقال', onclick=warpTo}, 
  {'btn', id='اغلاق', closeswindow=true} 
 }, 
 oncreate = warpInit 
} 
  
function warpToCommand(cmd, player) 
 if player then 
  player = getPlayerFromNick(player) 
  if player then 
   server.warpMe(player) 
  end 
 else 
  createWindow(wndWarp) 
  showCursor(true) 
 end 
end 
  
addCommandHandler('warpto', warpToCommand) 
addCommandHandler('wt', warpToCommand)

Link to comment
MR.GRAND Road Dawg

MR.GRAND

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

كيفكم شباب عساكم بخير

المهم :-

اليوم حبيت اعدل علي فري روم عندي وحبيت اضيف كود بحث في الانتقالات

سويت الكود بس ما يسوي بحث والدي بق ما يقلي في مشكلة في الكود ياليت تساعدوني

الكود 

function warpInit() 
 local players = table.map(getElementsByType('player'), function(p) return { name = getPlayerName(p) } end) 
 table.sort(players, function(a, b) return a.name < b.name end) 
 bindGridListToTable(wndWarp, 'playerlist', players, true) 
end 
  
  
addEventHandler("onClientGUIChanged",root, 
function () 
guiGridListClear(playerlist) 
   for _,v in ipairs (getElementsByType("player")) do 
    if string.find(getPlayerName (v),guiGetText(search)) then 
     local row = guiGridListAddRow (playerlist) 
     guiGridListSetItemText (playerlist, row, 1, getPlayerName (v), false, false) 
    end 
   end 
  end 
) 
  
  
function warpTo(leaf) 
 if not leaf then 
  leaf = getSelectedGridListLeaf(wndWarp, 'playerlist') 
  if not leaf then 
   return 
  end 
 end 
 local player = getPlayerFromNick(leaf.name) 
 if player then 
  server.warpMe(player) 
 end 
 closeWindow(wndWarp) 
end 
  
wndWarp = { 
 'wnd', 
 text = 'انتقال الى لاعب', 
 width = 300, 
 controls = { 
     {'lbl', id='البحث', text='البحث عن اللاعبين', width=96}, 
     {'txt', id='search', text='', width=280}, 
  { 
   'lst', 
   id='playerlist', 
   width=280, 
   height=310, 
   columns={ 
    {text='الاعبين', attr='name'} 
   }, 
   onitemdoubleclick=warpTo 
  }, 
  {'btn', id='انتقال', onclick=warpTo}, 
  {'btn', id='اغلاق', closeswindow=true} 
 }, 
 oncreate = warpInit 
} 
  
function warpToCommand(cmd, player) 
 if player then 
  player = getPlayerFromNick(player) 
  if player then 
   server.warpMe(player) 
  end 
 else 
  createWindow(wndWarp) 
  showCursor(true) 
 end 
end 
  
addCommandHandler('warpto', warpToCommand) 
addCommandHandler('wt', warpToCommand)

أظن إنك لازم تحط السورس حق الحدث :wink:

Link to comment
Mostafa MohammeD Playa Partner

Mostafa MohammeD

Posted
  • Author
Posted
السلام عليكم رحمة الله وبركاته

كيفكم شباب عساكم بخير

المهم :-

اليوم حبيت اعدل علي فري روم عندي وحبيت اضيف كود بحث في الانتقالات

سويت الكود بس ما يسوي بحث والدي بق ما يقلي في مشكلة في الكود ياليت تساعدوني

الكود

function warpInit()
 local players = table.map(getElementsByType('player'), function(p) return { name = getPlayerName(p) } end)
 table.sort(players, function(a, b) return a.name < b.name end)
 bindGridListToTable(wndWarp, 'playerlist', players, true)
end
 
 
addEventHandler("onClientGUIChanged",root,
function ()
guiGridListClear(playerlist)
   for _,v in ipairs (getElementsByType("player")) do
    if string.find(getPlayerName (v),guiGetText(search)) then
     local row = guiGridListAddRow (playerlist)
     guiGridListSetItemText (playerlist, row, 1, getPlayerName (v), false, false)
    end
   end
  end
)
 
 
function warpTo(leaf)
 if not leaf then
  leaf = getSelectedGridListLeaf(wndWarp, 'playerlist')
  if not leaf then
   return
  end
 end
 local player = getPlayerFromNick(leaf.name)
 if player then
  server.warpMe(player)
 end
 closeWindow(wndWarp)
end
 
wndWarp = {
 'wnd',
 text = 'انتقال الى لاعب',
 width = 300,
 controls = {
     {'lbl', id='البحث', text='البحث عن اللاعبين', width=96},
     {'txt', id='search', text='', width=280},
  {
   'lst',
   id='playerlist',
   width=280,
   height=310,
   columns={
    {text='الاعبين', attr='name'}
   },
   onitemdoubleclick=warpTo
  },
  {'btn', id='انتقال', onclick=warpTo},
  {'btn', id='اغلاق', closeswindow=true}
 },
 oncreate = warpInit
}
 
function warpToCommand(cmd, player)
 if player then
  player = getPlayerFromNick(player)
  if player then
   server.warpMe(player)
  end
 else
  createWindow(wndWarp)
  showCursor(true)
 end
end
 
addCommandHandler('warpto', warpToCommand)
addCommandHandler('wt', warpToCommand) 








أظن إنك لازم تحط السورس حق الحدث  :wink:




addEventHandler("onClientGUIChanged",root, 
function () 
guiGridListClear(playerlist) 
   for _,v in ipairs (getElementsByType("player")) do 
   if source == search then 
    if string.find(getPlayerName (v),guiGetText(search)) then 
     local row = guiGridListAddRow (playerlist) 
     guiGridListSetItemText (playerlist, row, 1, getPlayerName (v), false, false) 
    end 
   end 
  end 
 end 
) 








ما اشتغل ;(




			
		


		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	





	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		MR.GRAND
	

				
				
					
						
Road Dawg
					
				
			

		

		

			

				


MR.GRAND
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			


addEventHandler("onClientGUIChanged",root, 
function () 
   if source == search then 
   if search == "" then return end 
   guiGridListClear(playerlist) 
   for _,v in ipairs (getElementsByType("player")) do 
    if string.find(getPlayerName (v),guiGetText(search)) then 
     local row = guiGridListAddRow (playerlist) 
     guiGridListSetItemText (playerlist, row, 1, getPlayerName (v), false, false) 
    end 
   end 
   end 
 end 
) 
  






			
		


		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	





	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		Mostafa MohammeD
	

				
				
					
						
Playa Partner
					
				
			

		

		

			

				


Mostafa MohammeD
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			









addEventHandler("onClientGUIChanged",root, 
function () 
   if source == search then 
   if search == "" then return end 
   guiGridListClear(playerlist) 
   for _,v in ipairs (getElementsByType("player")) do 
    if string.find(getPlayerName (v),guiGetText(search)) then 
     local row = guiGridListAddRow (playerlist) 
     guiGridListSetItemText (playerlist, row, 1, getPlayerName (v), false, false) 
    end 
   end 
   end 
 end 
) 
  






بردو ماا اشتغل 


والادي بق ما بيقول شئ




			
		


		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	





	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		iMr.SFA7
	

				
				
					
						
Jacker
					
				
			

		

		

			

				


iMr.SFA7
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			
function warpTo() 
 if guiGridListGetSelectedItem ( getControl(wndWarp, "playerlist") ) == -1 then return end 
  local playerName = guiGridListGetItemText ( getControl(wndWarp, "playerlist"), guiGridListGetSelectedItem ( getControl(wndWarp, "playerlist") ), 1 ) 
  local player = getPlayerFromName(playerName) 
  if player then 
    server.warpMe(g_Me, player) 
  end 
  closeWindow(wndWarp) 
end 
  
function Search(Edit, gridlist) 
    guiGridListClear(gridlist) 
    local text = guiGetText(Edit) 
    if text == "" then 
      for id,player in ipairs(getElementsByType("player")) do 
       local row = guiGridListAddRow(gridlist) 
            guiGridListSetItemText(gridlist, row, 1, getPlayerName(player), false, false) 
        end 
    else 
        for id,player in ipairs(getElementsByType("player")) do 
            if string.find(string.upper(getPlayerName(player)), string.upper(text), 1, true) then 
            local row = guiGridListAddRow(gridlist) 
                guiGridListSetItemText(gridlist, row, 1, getPlayerName(player), false, false) 
            end 
        end 
    end 
end 
  
addEventHandler ("onClientGUIChanged", resourceRoot, function() 
    if source == getControl(wndWarp,'search') then 
        Search( getControl(wndWarp,'search'), getControl(wndWarp,"playerlist") ) 
    end 
end) 
  
wndWarp = { 
 'wnd', 
 text = 'انتقال الى لاعب', 
 width = 300, 
 controls = { 
     {'lbl', id='البحث', text='البحث عن اللاعبين', width=96}, 
     {'txt', id='search', text='', width=280}, 
  { 
   'lst', 
   id='playerlist', 
   width=280, 
   height=310, 
   columns={ 
    {text='الاعبين', attr='name'} 
   }, 
   onitemdoubleclick=warpTo 
  }, 
  {'btn', id='انتقال', onclick=warpTo}, 
  {'btn', id='اغلاق', closeswindow=true} 
 }, 
 oncreate = warpInit 
} 
  
function warpToCommand(cmd, player) 
 if player then 
  player = getPlayerFromNick(player) 
  if player then 
   server.warpMe(player) 
  end 
 else 
  createWindow(wndWarp) 
  showCursor(true) 
 end 
end 
  
addCommandHandler('warpto', warpToCommand) 
addCommandHandler('wt', warpToCommand) 








			
		


		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	





	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		Mostafa MohammeD
	

				
				
					
						
Playa Partner
					
				
			

		

		

			

				


Mostafa MohammeD
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			
function warpTo() 
 if guiGridListGetSelectedItem ( getControl(wndWarp, "playerlist") ) == -1 then return end 
  local playerName = guiGridListGetItemText ( getControl(wndWarp, "playerlist"), guiGridListGetSelectedItem ( getControl(wndWarp, "playerlist") ), 1 ) 
  local player = getPlayerFromName(playerName) 
  if player then 
    server.warpMe(g_Me, player) 
  end 
  closeWindow(wndWarp) 
end 
  
function Search(Edit, gridlist) 
    guiGridListClear(gridlist) 
    local text = guiGetText(Edit) 
    if text == "" then 
      for id,player in ipairs(getElementsByType("player")) do 
       local row = guiGridListAddRow(gridlist) 
            guiGridListSetItemText(gridlist, row, 1, getPlayerName(player), false, false) 
        end 
    else 
        for id,player in ipairs(getElementsByType("player")) do 
            if string.find(string.upper(getPlayerName(player)), string.upper(text), 1, true) then 
            local row = guiGridListAddRow(gridlist) 
                guiGridListSetItemText(gridlist, row, 1, getPlayerName(player), false, false) 
            end 
        end 
    end 
end 
  
addEventHandler ("onClientGUIChanged", resourceRoot, function() 
    if source == getControl(wndWarp,'search') then 
        Search( getControl(wndWarp,'search'), getControl(wndWarp,"playerlist") ) 
    end 
end) 
  
wndWarp = { 
 'wnd', 
 text = 'انتقال الى لاعب', 
 width = 300, 
 controls = { 
     {'lbl', id='البحث', text='البحث عن اللاعبين', width=96}, 
     {'txt', id='search', text='', width=280}, 
  { 
   'lst', 
   id='playerlist', 
   width=280, 
   height=310, 
   columns={ 
    {text='الاعبين', attr='name'} 
   }, 
   onitemdoubleclick=warpTo 
  }, 
  {'btn', id='انتقال', onclick=warpTo}, 
  {'btn', id='اغلاق', closeswindow=true} 
 }, 
 oncreate = warpInit 
} 
  
function warpToCommand(cmd, player) 
 if player then 
  player = getPlayerFromNick(player) 
  if player then 
   server.warpMe(player) 
  end 
 else 
  createWindow(wndWarp) 
  showCursor(true) 
 end 
end 
  
addCommandHandler('warpto', warpToCommand) 
addCommandHandler('wt', warpToCommand) 









مشكور مستر سفاح  :D


ومشكور مستر جراند لانك حاولت تساعدني وافدتني بردو  :)


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


لازم مشان تظهر اسماء اللاعبين اكتب شئ بالايديت وامسحه ممكن اول ما يضغط الزر يفتح له اللوحة ويكون فيها اسمء اللاعبين من دون ما 


اكتب شئ بالايديت وامسحه



			
		


		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	





	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		iMr.SFA7
	

				
				
					
						
Jacker
					
				
			

		

		

			

				


iMr.SFA7
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			
وبدلهـا warpInit آمم دور وظيفـة اسمها



function warpInit() 
 guiGridListClear(getControl(wndWarp, "playerlist")) 
  for id,player in ipairs(getElementsByType("player")) do 
    local row = guiGridListAddRow(getControl(wndWarp, "playerlist")) 
      guiGridListSetItemText(getControl(wndWarp, "playerlist"), row, 1, getPlayerName(player), false, false) 
   end 
end 








			
		


		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	





	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		Mostafa MohammeD
	

				
				
					
						
Playa Partner
					
				
			

		

		

			

				


Mostafa MohammeD
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			
وبدلهـا warpInit آمم دور وظيفـة اسمها

function warpInit() 
 guiGridListClear(getControl(wndWarp, "playerlist")) 
  for id,player in ipairs(getElementsByType("player")) do 
    local row = guiGridListAddRow(getControl(wndWarp, "playerlist")) 
      guiGridListSetItemText(getControl(wndWarp, "playerlist"), row, 1, getPlayerName(player), false, false) 
   end 
end 









تمام مشكور تاني مستر سفاح  :mrgreen:



			
		


		

		
			

		
	


	

	





	
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
					

				

			

		

	


		        


			
		

	

	
		

			

				
					


				
                

                




				
			

		

	







	

		
			
				Go to topic listing
			
		
	

	




						


	

		
    
			
				
					
					
  • 

    
    
    
        
            Recently Browsing
        
        
          0 members
        
    
    
    
    
        
      
            
                
    • No registered users viewing this page.
      • 
            
        
    
        
    
    

    • 
				
			
		

	


					

					


					

				

			

			
		

		
		


	

		×
		

			
				

					
				

			

			

			

			
		

	






	

		×
		

			
    
				
  • Create New...
    •