Jump to content

إطرح كود واللي بعدك يشرحه

N3xT

By N3xT
in البرمجة

Recommended Posts

N3xT Shooter

N3xT

Posted
Posted (edited)

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

 

فكرة الموضوع أنك تحط كود واللي بعدك يحاول يشرحه وكذا, وإذا الشرح كان خطأ 

اللي بعدك يصحح شرحك ويحط كود جديد وزي كذا, ويلا أنا ببدأ بأول كود 

ملاحظة: تكرار الردود غير مسموح, يعني تنتظر واحد يرد بعدين ترد انت

  

addCommandHandler("p4ss",
function ( cmd , number )
	if ( number ) then
		if number == "5050" then
			outputChatBox("Great",0,255,0,true)
		else
			outputChatBox("Error",255,0,0,true)
		end
	end
end	)

 

Edited by N3xT
  • Like 3
Link to comment
#BrosS Jacker

#BrosS

Posted
Posted (edited)

اظن اذا  تكتب

p4ss 5050 

تجيك صحيح واذا لا تجي ايرور 

واذا كنت غلط مو عيب ذذ

Edit : 

كود للشرح  ::: 


setTimer(function()    
st = not st     

setControlState("aim_weapon", true)    
setControlState("enter_exit", st) 
end, 250, 0)

وحدهم القُدم اللي يفهموه ههه

Edited by #BrosS
Link to comment
N3xT Shooter

N3xT

Posted
  • Author
Posted (edited)
Just now, #BrosS said:

اظن اذا  تكتب

p4ss 5050 

تجيك صحيح واذا لا تجي ايرور 

واذا كنت غلط مو عيب ذذ

 
 

لا بالعكس كلامك صحيح, حط كود عشان اللي بعدك يشرحه

لا تحط رد جديد, عدل على نفس ردك وحط الكود

Edited by N3xT
Link to comment
Vunili Thug

Vunili

Posted
Posted (edited)

@#BrosS 

يسوي حركة وما تقدر توقف الا اذا طفيت المود

-- 

function sizeFormat(size)
local size = tostring(size)
if size:len() >= 4 then 
if size:len() >= 7 then
if size:len() >= 9 then
local returning = size:sub(1, size:len()-9)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-7)
end
return returning.." GB";
else 
local returning = size:sub(1, size:len()-6)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-4)
end
return returning.." MB";
end
else 
local returning = size:sub(1, size:len()-3)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-1)
end
return returning.." KB";
end
else
return size.." B";
end
end

 

Edited by ~#[N]exT
Link to comment
N3xT Shooter

N3xT

Posted
  • Author
Posted

^ يقيس حجم الملف, وغالباً يستعمل لإنشاء بار تحميل

عموماً, الكود لازم يكون حقك مو موجود مسبقاً, يعني تسوي كود بنفسك وحنا نشرحه 

addCommandHandler("myNick",
	function ( player )
		outputChatBox(getPlayerName(player),player,255,0,0,true)
	end
)

addEventHandler("onPlayerChat",root,
	function ( msg )
		if ( msg == "nick" ) then
			executeCommandHandler ( "myNick", source )
		end
	end
)

 

Link to comment
  • Popular Post
iPrestege Boss Hawg

iPrestege

Posted
  • Popular Post
Posted

ي أخوان اشوف الطريقة اللي تجاوبون فيها غلط وماتستفيدون ولاتفيدون أحد فيها المفروض تشرح سطر سطر مثال :

  

addCommandHandler("myNick", -- اضافة كوماند myNick
	function ( player ) -- انشاء وظيفة + واضافة ارقمنت للاعب
		outputChatBox(getPlayerName(player),player,255,0,0,true) -- اخراج رسالة بالشات باسم الاعب اللي كتب الكوماند وتطلع للاعب فقط لانة محدد في الوظيفة
	end -- اغلاق 
) -- اغلاق

addEventHandler("onPlayerChat",root, -- اضافة الحدث عند التحدث بالشات
	function ( msg ) -- يجيب الرسالة اللي قالها الاعب بالشات
		if ( msg == "nick" ) then -- اذا كانت الرساله هي nick
			executeCommandHandler ( "myNick", source ) -- يستدعي الكوماند اللي تمت اضافتة سابقاً myNick
		end -- اغلاق
	end -- اغلاق
) -- اغلاق

 

 

 

  • Like 6
Link to comment
N3xT Shooter

N3xT

Posted
  • Author
Posted
11 hours ago, iPrestege said:

ي أخوان اشوف الطريقة اللي تجاوبون فيها غلط وماتستفيدون ولاتفيدون أحد فيها المفروض تشرح سطر سطر مثال :

  


addCommandHandler("myNick", -- اضافة كوماند myNick
	function ( player ) -- انشاء وظيفة + واضافة ارقمنت للاعب
		outputChatBox(getPlayerName(player),player,255,0,0,true) -- اخراج رسالة بالشات باسم الاعب اللي كتب الكوماند وتطلع للاعب فقط لانة محدد في الوظيفة
	end -- اغلاق 
) -- اغلاق

addEventHandler("onPlayerChat",root, -- اضافة الحدث عند التحدث بالشات
	function ( msg ) -- يجيب الرسالة اللي قالها الاعب بالشات
		if ( msg == "nick" ) then -- اذا كانت الرساله هي nick
			executeCommandHandler ( "myNick", source ) -- يستدعي الكوماند اللي تمت اضافتة سابقاً myNick
		end -- اغلاق
	end -- اغلاق
) -- اغلاق

 

 

 

 

فكرة ممتازة, وبأذن الله بنطبقها

بس المفروض أنك تحط كود عشان اللي بعدك يشرحه 

Link to comment
MR.GRAND Road Dawg

MR.GRAND

Posted
Posted 
addCommandHandler( 'timeformat', function( player )
	local time = getRealTime(  )
		local hour, minute, second = time.hour, time.minute, time.second
			local day, month, year = time.monthday, time.month, time.year
		local formatyear, formathour = '20'..string.sub( year, 2 ), time.hour % 12 and time.hour % 12
	outputChatBox( 'Current date : ['.. formathour.. ':'.. minute.. ':' ..second.. ']' .. ' - [' .. formatyear .. ':' ..month.. ':' ..day.. ']', player, 255, 255, 255 )
end )

8)

Link to comment
</Mr.Tn6eL> Foot Soldier

</Mr.Tn6eL>

Posted
Posted
57 minutes ago, MR.GRAND said: 

addCommandHandler( 'timeformat', function( player )
	local time = getRealTime(  )
		local hour, minute, second = time.hour, time.minute, time.second
			local day, month, year = time.monthday, time.month, time.year
		local formatyear, formathour = '20'..string.sub( year, 2 ), time.hour % 12 and time.hour % 12
	outputChatBox( 'Current date : ['.. formathour.. ':'.. minute.. ':' ..second.. ']' .. ' - [' .. formatyear .. ':' ..month.. ':' ..day.. ']', player, 255, 255, 255 )
end )

8)

امر اف 8 يجيب لك التاريخ

  • Like 1
Link to comment
N3xT Shooter

N3xT

Posted
  • Author
Posted

يا أخوان والله طفشت وأنا أقول إشرح كود وحط كودك اللي تبي اللي بعدك يشرحه

يعني مو بس تشرح الكود وخلاص, لا حط كود عشان اللي بعدك يشرحه

@</Mr.Tn6eL>: يفضل الشرح يكون سطر سطر يعني تحط -- بعد السطر وتشرحه, عشان يكون واضح كل شيء للجميع

 

عموماً ذا كودي  

local var = 0

addCommandHandler("var",
	function ( cmd , mark )
		if ( mark ) then
			if mark == "+" then
				var = var + 1
			elseif mark == "-" then
				var = var - 1
			elseif mark == "delete" then
				if var >= 1 then
					var = 0
				end
			end
		end
	end
)

addEventHandler("onClientRender",root,
	function ()
		dxDrawText(var, 553, 361, 811, 397, tocolor(255, 255, 255, 255), 1, "default-bold", "center", "center", false, false, true, false, false)
	end
)

 

Link to comment
Vunili Thug

Vunili

Posted
Posted (edited)

  

local var = 0

addCommandHandler("var", -- امر كوماند
	function ( cmd , mark )
		if ( mark ) then
			if mark == "+" then -- اذا كتبت الأمر فار وحطيت موجب راح تلاحظ ان الرقم انزاد واحد
				var = var + 1
			elseif mark == "-" then -- نفس الشي اذا حطيت سالب راح تلاحظ ان الرقم قل
				var = var - 1
			elseif mark == "delete" then -- اذا حطيت = بعد الأمر فار يرجع الرقم 0
				if var >= 1 then
					var = 0
				end
			end
		end
	end
)

addEventHandler("onClientRender",root,
	function ()
		dxDrawText(var, 553, 361, 811, 397, tocolor(255, 255, 255, 255), 1, "default-bold", "center", "center", false, false, true, false, false)
	end
)

edit : 


اشرحوا لي ذا الكود؟

  1.   
function sizeFormat(size)
local size = tostring(size)
if size:len() >= 4 then 
if size:len() >= 7 then
if size:len() >= 9 then
local returning = size:sub(1, size:len()-9)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-7)
end
return returning.." GB";
else 
local returning = size:sub(1, size:len()-6)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-4)
end
return returning.." MB";
end
else 
local returning = size:sub(1, size:len()-3)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-1)
end
return returning.." KB";
end
else
return size.." B";
end
end

 

Edited by ~#[N]exT
Link to comment
N3xT Shooter

N3xT

Posted
  • Author
Posted
8 minutes ago, ~#[N]exT said:

  


local var = 0

addCommandHandler("var", -- امر كوماند
	function ( cmd , mark )
		if ( mark ) then
			if mark == "+" then -- اذا كتبت الأمر فار وحطيت موجب راح تلاحظ ان الرقم انزاد واحد
				var = var + 1
			elseif mark == "-" then -- نفس الشي اذا حطيت سالب راح تلاحظ ان الرقم قل
				var = var - 1
			elseif mark == "delete" then -- اذا حطيت = بعد الأمر فار يرجع الرقم 0
				if var >= 1 then
					var = 0
				end
			end
		end
	end
)

addEventHandler("onClientRender",root,
	function ()
		dxDrawText(var, 553, 361, 811, 397, tocolor(255, 255, 255, 255), 1, "default-bold", "center", "center", false, false, true, false, false)
	end
)

 

 

 

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

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

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

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

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

  • Like 2
Link to comment
iMr.WiFi..! Shooter

iMr.WiFi..!

Posted
Posted

 

12 hours ago, ~#[N]exT said:
  1. - 

function sizeFormat(size)local size = tostring(size)if size:len() >= 4 then if size:len() >= 7 thenif size:len() >= 9 thenlocal returning = size:sub(1, size:len()-9)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-7)
end
return returning.." GB";
else 
local returning = size:sub(1, size:len()-6)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-4)
end
return returning.." MB";
end
else 
local returning = size:sub(1, size:len()-3)
if returning:len() <= 1 then
returning = returning.."."..size:sub(2, size:len()-1)
end
return returning.." KB";
end
else
return size.." B";
end
end

 

On ١٠‏/١١‏/٢٠١٦ at 2:42 AM, N3xT said:

^ يقيس حجم الملف, وغالباً يستعمل لإنشاء بار تحميل

-

 

 

ماعندي كود 

بس ابي مثال عن ,

  

string.lower

 

Link to comment
ميدوح Chump

ميدوح

Posted
Posted
1 hour ago, iMr.WiFi..! said:

 

 

ماعندي كود 

بس ابي مثال عن ,

  


string.lower -- تستخدم للتحويل حالةالاحرف من الاحرف الكبيره الى الاحرف الصغيره

 

https://wiki.multitheftauto.com/wiki/AR/String
  

addCommandHandler("444",
  function ( cmd , text )
   	if ( text ) then
    	outputChatBox(string.lower(text))
    	end
    end
)

F8 : 444 ABC

  • Like 1
Link to comment
ميدوح Chump

ميدوح

Posted
Posted
22 hours ago, N3xT said:

يا أخوان والله طفشت وأنا أقول إشرح كود وحط كودك اللي تبي اللي بعدك يشرحه

يعني مو بس تشرح الكود وخلاص, لا حط كود عشان اللي بعدك يشرحه

@</Mr.Tn6eL>: يفضل الشرح يكون سطر سطر يعني تحط -- بعد السطر وتشرحه, عشان يكون واضح كل شيء للجميع

 

عموماً ذا كودي  


local var = 0addCommandHandler("var",	function ( cmd , mark )		if ( mark ) then			if mark == "+" then				var = var + 1			elseif mark == "-" then				var = var - 1			elseif mark == "delete" then				if var >= 1 then					var = 0				end			end		end	end)addEventHandler("onClientRender",root,	function ()		dxDrawText(var, 553, 361, 811, 397, tocolor(255, 255, 255, 255), 1, "default-bold", "center", "center", false, false, true, false, false)	end)

 

امممم
xD
  

function isCursorOverRectangle(x,y,w,h)
	if isCursorShowing() then
	   local mx,my = getCursorPosition ()
	   local ScreenX,ScreenY = guiGetScreenSize()
	        cursorx,cursory = mx*ScreenX,my*ScreenY
      	if cursorx > x and cursorx < x + w and cursory > y and cursory < y + h then
		return true
	        else
		return false
	   end
	end
end

local var = 0
local visible = false
 bindKey ("f2", "down",function()
       addEventHandler("onClientRender",root,
           function ()
              if visible == true then
	          dxDrawRectangle (553, 361, 211, 100, tocolor ( 0, 255, 0, 150 ))
	          dxDrawRectangle (553, 400, 211, 100, tocolor ( 255, 0, 0, 150 ))
	         	if isCursorOverRectangle(533,361, 211, 100) then
                   var = var + 1
		    	   elseif isCursorOverRectangle(553, 400, 211, 100) then
                    var = var - 1
                end	 
             dxDrawText(var, 553, 361, 811, 397)
	    end
    end)
visible = not visible
showCursor(visible)
end)

 

Link to comment
' A F . Jacker

' A F .

Posted
Posted 
function isCursorOverRectangle(x,y,w,h) -- وظيفة تحقق ان الماوس على المستطيل بواسطة الاحداثيات
	if isCursorShowing() then -- تحقق ان الماوس موجود
	   local mx,my = getCursorPosition () -- يجيب لك احداثيات الماوس
	   local ScreenX,ScreenY = guiGetScreenSize() -- جلب مقاس شاشة اللاعب
	        cursorx,cursory = mx*ScreenX,my*ScreenY -- عملية حسابية ( يضرب احداثيات الماوس في مقاس الشاشة)
      	if cursorx > x and cursorx < x + w and cursory > y and cursory < y + h then -- تحقق 
		return true -- يرجع لك ترو ( صحيح )
	        else -- لو مايطابق الشرط
		return false -- يرجع لك فولس ( خطا )
	   end
	end
end

local var = 0 -- متغير = 0
local visible = false -- متغير قيمته فولس
 bindKey ("f2", "down",function() -- عندما يظغط اف 2
       addEventHandler("onClientRender",root,
           function ()
              if visible == true then -- تحقق ان المتغير visible صحيح ( true )
	          dxDrawRectangle (553, 361, 211, 100, tocolor ( 0, 255, 0, 150 )) -- إنشاء مستطيل
	          dxDrawRectangle (553, 400, 211, 100, tocolor ( 255, 0, 0, 150 )) -- ^^ ^^
	         	if isCursorOverRectangle(533,361, 211, 100) then -- يتحقق لو الماوس على احداثيات المستطيل
                   var = var + 1 -- يزيد لك المتغير
		    	   elseif isCursorOverRectangle(553, 400, 211, 100) then -- يتحقق لو الماوس على احداثيات المستطيل
                    var = var - 1 -- ينقص لك المتغير 
                end	 
             dxDrawText(var, 553, 361, 811, 397) -- إنشاء نص
	    end
    end)
visible = not visible -- يعكس لك القيمة مثلأ لو كانت القيمة true يخليها false والعكس
showCursor(visible) -- يظهر لك الماوس على حسب قيمة المتغير ( visible )
end)

  

lastNumber = nil


addCommandHandler ( "Hello" , function ( cmd , number )
lastNumber = tostring(number)
end );

addEventHandler("onClientRender", root,
    function()
        dxDrawText( lastNumber == nil and "None" or lastNumber , 241, 286, 566, 318, tocolor(255, 255, 255, 255), 1.50, "default-bold", "center", "center", false, false, false, false, false)
    end
)

 

  • Like 2
Link to comment
N3xT Shooter

N3xT

Posted
  • Author
Posted 
lastNumber = nil -- متغير فارغ


addCommandHandler ( "Hello" , -- إضافة أمر
function ( cmd , number ) -- وظيفة
lastNumber = tostring(number) -- تحويل المتغير الفارغ للقيمة اللي كتبناها
end ); 

-- مثال على الأمر
-- Hello 1234 

addEventHandler("onClientRender", root, -- إضافة حدث
    function() -- وظيفة
        dxDrawText( lastNumber == nil and "None" or lastNumber , 241, 286, 566, 318, tocolor(255, 255, 255, 255), 1.50, "default-bold", "center", "center", false, false, false, false, false) -- رسم نص على الشاشة يجيب لنا قيمة المتغير أو يجيب قيمة فاضية
    end -- نهاية للوظيفة
) -- نهاية للحدث

  

addCommandHandler("serverName",
	function ( player )
		local name = getServerName()
		outputChatBox(name,player,0,255,0,true)
	end
)

 

  • Like 1
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...