Jump to content

استفسار في كود بسيط


MA[S]RIY

Recommended Posts

السلام عليكم

انا ابي استفسر عن شئ  بسيط

شوفو

انا سويت مود الشرطي

لوحة بها جريد ليست

وبها زران

زر سلاب وزر سحب سيارة

وفي فوق السلاب والسحب

ايديت بوكس

الايديت بوكس المفروض يتكتب فيه سبب السلاب او السحب

طيب الكود حق اليديت كلينت

--كلينت
GUIEditor_Edit[1] = guiCreateEdit(9,55,283,21,"",false,GUIEditor_Window[1])

وكود الي يخرج السبب في الشات 

كود سرفر

------سرفر
addEvent("slap", true)
function slap( PlayerNick )
	local toWho = getPlayerFromName ( PlayerNick )
	local name = getPlayerName ( source )
    local reason = GUIEditor_Edit[1] ( source )
	data = 100
	if ( getElementHealth ( toWho ) > 0 ) and ( not isPedDead ( toWho ) ) then
	if ( tonumber ( data ) > getElementHealth ( toWho ) ) then setTimer ( killPed, 50, 1, toWho )
	else setElementHealth ( toWho, getElementHealth ( toWho ) - data ) end
		local x, y, z = getElementVelocity ( toWho )
		setElementVelocity ( toWho, x , y, z + 0.2 )	
		outputChatBox("* [ #ffff00".. PlayerNick .."#ff0000 ] #999999 has been slapped by#ff0000 [ #ffff00" .. name .."#ff0000 ] by reason #000000(..
      reason ..)", root, 255, 0, 0, true )
	  end
end
addEventHandler("slap", getRootElement(),slap)


طيب كيف اربط الكودين وواحد كلينت والثاني سرفر

Edited by MA[S]RIY
Link to comment

خد لك مثال

لما يضعط علي زر ويكتب في الايديت يعطيه دم الكتبو بالايديت ويظهر بالشات رقم الكتبو بالايديت

addEventHandler ( "onClientGUIClick", root,
function ( )
if source == button then
local text = guiGetText ( edit )
if text == "" then return end
triggerServerEvent ( "onClient", localPlayer,text )
end
end
) ;

-- Server

addEvent ( "onClient", true )
addEventHandler ( "onClient",root,
function ( text )
setElementHealth ( source,tonumber(text) )
outputChatBox ( " Health : "..text.." ",source,255,255,255,true )
end
)
    

 

Link to comment

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

addEventHandler ( "onClientGUIClick", root,
function ( )
if source == GUIEditor_Button[1] then
local text = guiGetText ( edit )
if text == "" then return end
triggerServerEvent ( "onClient", localPlayer,text )
end
end
) ;

 

Link to comment

http://www.mtaarabs.com/vb/showthread.php?t=1157

تعلم منها ما اشفر سكربتاتي انا

17 minutes ago, MARIY said:

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


addEventHandler ( "onClientGUIClick", root,
function ( )
if source == GUIEditor_Button[1] then
local text = guiGetText ( edit )
if text == "" then return end
triggerServerEvent ( "onClient", localPlayer,text )
end
end
) ;

 

local text = guiGetText ( edit )

بدال

edit

Link to comment
2 hours ago, MARIY said:

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


addEventHandler ( "onClientGUIClick", root,
function ( )
if source == GUIEditor_Button[1] then
local text = guiGetText ( edit )
if text == "" then return end
triggerServerEvent ( "onClient", localPlayer,text )
end
end
) ;

 

م رح يضبط ، خله كذا 

addEventHandler ( "onClientGUIClick", root,
function ( )
if source == GUIEditor_Button[1] then
triggerServerEvent ( "onClient", localPlayer,tonumber(guiGetText(edit)) )
end
end
) ;

 

وعندك اند ناقصة

 

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