Jump to content

x[ ابي اسوي تايمر لشئ ]x

#,Dr.To[sh]iBa

By #,Dr.To[sh]iBa
in البرمجة

Recommended Posts

#,Dr.To[sh]iBa Mark

#,Dr.To[sh]iBa

Posted
Posted

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

عندي مود شوتر ( الرساله العامه علي شاشة الجميع ) ابي ان يكون بين كل شوت والاخر 8 ثواني : يعني الحين انا ارسلت رساله ولين اجي ارسل رساله ثانيه لازم انتظر 8 ثواني  عشان الرساله الاولي تختفي وشكرا 

كود السيرفر
  

local Groups = { "Sender" }

function isPlayerAdmin(player)
    for k,v in ipairs ( Groups ) do
        if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(player)), aclGetGroup(v)) ) then
		    return true
		end
	end
end

addCommandHandler("Sender", function ( player, cmd, ... )
    if not ( isGuestAccount ( getPlayerAccount ( player ) ) ) then
	    if ( isPlayerAdmin ( player ) ) then
		    local msg = {...}
		    local message = table.concat(msg, " ")
        outputChatBox("≈[ بارسـال رسـالة للجـميـع [ "..getPlayerName (player).." ֆ ] لـقـد قـام الاعـب ]≈", root,math.random(0,255),math.random(0,255),math.random(0,255), true)
			setElementData ( resourceRoot, "Have_", true )
			setElementData ( resourceRoot, "Msg_", message )
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_" , false )
        end , 1000*8 , 1 )
			if ( getElementData ( player, "Name" ) and getElementData ( player, "Name" ) ~= false ) then
				setElementData ( resourceRoot, "By_", getElementData ( player, "Name" ))
			else
				setElementData ( resourceRoot, "By_", getPlayerName ( player ))
			end
		else
		    outputChatBox("* لـيـس لديك خاصـيـة لارسال رسالة لجميع الاعبين علي شاشتهم !!", player, 255, 0, 0, true)
		end
	else
	    outputChatBox("* الرجـاء تسـجـيل الدخـول حتي يمكنك ارسال رسالة للجميع !!", player, 255, 0, 0, true)
		
		
	end
end)

 

Link to comment
#,Dr.To[sh]iBa Mark

#,Dr.To[sh]iBa

Posted
  • Author
Posted
2 minutes ago, iMr.WiFi..! said: 

	setElementData ( resourceRoot, "Msg_", message )
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_" , false )
        end , 1000*8 , 1 )

^ بدل السطرين ذول بـ 


	
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_", message )
        end , 1000*8 , 1 )


 

ما نفعت يالغالي

الحين الرساله تيجي بعد 8 ثواني

__________________
انا ابي : الحين ارسلت رساله , الرساله بتختفي بعد 8 ثواني علي حسب التايمر فا ابي ان ما اقدر ارسل رساله ثانيه لين تنتهي ال8 ثواني وتختفي الرساله الاولي

Link to comment
#,Dr.To[sh]iBa Mark

#,Dr.To[sh]iBa

Posted
  • Author
Posted
Just now, iMr.WiFi..! said: 

			if getElementData ( resourceRoot, "First_") == true then 
			setElementData ( resourceRoot, "Msg_", message )
			setElementData ( resourceRoot, "First_", false )
			else
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_", message )
        end , 1000*8 , 1 )
		end

 

ابد ذا بايش

Link to comment
iMr.WiFi..! Shooter

iMr.WiFi..!

Posted
Posted

حط ذا في أول سطر بسيرفر 

addEventHandler("onResourceStart",root,function ()
setElementData ( resourceRoot, "First_", true )
end)

وحط ذا بدال الكود الي عطيتك اياه قبل 

		setElementData ( resourceRoot, "Have_", true )
			if getElementData ( resourceRoot, "First_") == true then 
			setElementData ( resourceRoot, "Msg_", message )
			setElementData ( resourceRoot, "First_", false )
			else
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_", message )
        end , 1000*8 , 1 )
		end

 

  • Like 1
Link to comment
#,Dr.To[sh]iBa Mark

#,Dr.To[sh]iBa

Posted
  • Author
Posted 
addEventHandler("onResourceStart",root,function ()
setElementData ( resourceRoot, "First_", true )
end)

local Groups = { "Sender" }

function isPlayerAdmin(player)
    for k,v in ipairs ( Groups ) do
        if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(player)), aclGetGroup(v)) ) then
		    return true
		end
	end
end

addCommandHandler("Sender", function ( player, cmd, ... )
    if not ( isGuestAccount ( getPlayerAccount ( player ) ) ) then
	    if ( isPlayerAdmin ( player ) ) then
		    local msg = {...}
		    local message = table.concat(msg, " ")
        outputChatBox("≈[ بارسـال رسـالة للجـميـع [ "..getPlayerName (player).." ֆ ] لـقـد قـام الاعـب ]≈", root,math.random(0,255),math.random(0,255),math.random(0,255), true)
			setElementData ( resourceRoot, "Have_", true )
		setElementData ( resourceRoot, "Have_", true )
			if getElementData ( resourceRoot, "First_") == true then 
			setElementData ( resourceRoot, "Msg_", message )
			setElementData ( resourceRoot, "First_", false )
			else
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_", message )
        end , 1000*3 , 1 )
		end
			if ( getElementData ( player, "Name" ) and getElementData ( player, "Name" ) ~= false ) then
				setElementData ( resourceRoot, "By_", getElementData ( player, "Name" ))
			else
				setElementData ( resourceRoot, "By_", getPlayerName ( player ))
			end
		else
		    outputChatBox("* لـيـس لديك خاصـيـة لارسال رسالة لجميع الاعبين علي شاشتهم !!", player, 255, 0, 0, true)
		end
	else
	    outputChatBox("* الرجـاء تسـجـيل الدخـول حتي يمكنك ارسال رسالة للجميع !!", player, 255, 0, 0, true)
		
		
	end
end)

function outPutNewsMsg ( player , ... )
  local msg = {...}
  local message = table.concat(msg, " ")
			setElementData ( resourceRoot, "Have_", true )
			setElementData ( resourceRoot, "Msg_", message )
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_" , false )
        end , 1000*8 , 1 )
			if ( getElementData ( player, "Name" ) and getElementData ( player, "Name" ) ~= false ) then
				setElementData ( resourceRoot, "By_", getElementData ( player, "Name" ))
			else
				setElementData ( resourceRoot, "By_", getPlayerName ( player ))
			end
  end

الكلمه ظهرت بس  ما اختفت بعد التايمر

الحين بين كل كلمة والثانيه 8 ثواني ( حسب التايمر ) بس الكلام ما يختفي بعد التايمر

شف ببساطه : ابي ان ما اقدر ارسل رساله ثانيه الا ما الرساله الاولي تختفي ^_^ 

Link to comment
iMr.WiFi..! Shooter

iMr.WiFi..!

Posted
Posted 
			setElementData ( resourceRoot, "Msg_", message )
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_" , false )
        end , 1000*8 , 1 )

في سطر 51

و 52 و53

بدلهم بهذا 

			if getElementData ( resourceRoot, "First_") == true then 
			setElementData ( resourceRoot, "Msg_", message )
			setElementData ( resourceRoot, "First_", false )
			else
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_", message )
        end , 1000*3 , 1 )
		end

 

  • Like 1
Link to comment
#,Dr.To[sh]iBa Mark

#,Dr.To[sh]iBa

Posted
  • Author
Posted
1 minute ago, iMr.WiFi..! said: 

			setElementData ( resourceRoot, "Msg_", message )
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_" , false )
        end , 1000*8 , 1 )

في سطر 51

و 52 و53

بدلهم بهذا 


			if getElementData ( resourceRoot, "First_") == true then 
			setElementData ( resourceRoot, "Msg_", message )
			setElementData ( resourceRoot, "First_", false )
			else
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_", message )
        end , 1000*3 , 1 )
		end

 

سطر 52 و51و53 
للاكسبورت

Link to comment
#,Dr.To[sh]iBa Mark

#,Dr.To[sh]iBa

Posted
  • Author
Posted

الحين انا ارتبكت ترا برسل الاكواد كلنت وسيرفر من اول وجديد

  

-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
--------THIS MOD FOR Q.6-----------
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------



local sX, sY = guiGetScreenSize ()
local dxfont0_bien = dxCreateFont(":Sender1/font.ttf", 27)
addEventHandler("onClientRender", root, function ()
    if ( getElementData ( resourceRoot, "Have_" ) == true ) then
        local Lines = getChatboxLayout ()["chat_lines"]
	    if ( Lines <= 10 ) then
	        Lines = Lines + 1
	    elseif ( Lines >= 20 ) then
	        Lines = Lines - 1
	    else
	        Lines = Lines
	    end
		if ( getElementData ( resourceRoot, "Msg_" ) == "1" ) then	
		    setElementData ( resourceRoot, "Have_", false )
		else
--dxDrawText( "" .. getElementData ( resourceRoot, "Msg_" ),  26, 592, 1260, 679, tocolor(255, 255, 255, 255), 0.5, dxfont0_bien, "center", "center", false, false, false, true, false )
        dxDrawText( "" .. getElementData ( resourceRoot, "Msg_" ), 0 - 1, 405 - 1, 1366 - 1, 677 - 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_bien, "center", "center", false, false, false, false, false)
        dxDrawText( "" .. getElementData ( resourceRoot, "Msg_" ), 0 + 1, 405 - 1, 1366 + 1, 677 - 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_bien, "center", "center", false, false, false, false, false)
        dxDrawText( "" .. getElementData ( resourceRoot, "Msg_" ), 0 - 1, 405 + 1, 1366 - 1, 677 + 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_bien, "center", "center", false, false, false, false, false)
        dxDrawText( "" .. getElementData ( resourceRoot, "Msg_" ), 0 + 1, 405 + 1, 1366 + 1, 677 + 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_bien, "center", "center", false, false, false, false, false)
        dxDrawText( "" .. getElementData ( resourceRoot, "Msg_" ), 0, 405, 1366, 677, tocolor(255, 255, 255, 255), 1.00, dxfont0_bien, "center", "center", false, false, false, false, false)
		end
	end
end)
bindKey("Z", "down","chatbox","Sender")
local Groups = { "Sender" }

function isPlayerAdmin(player)
    for k,v in ipairs ( Groups ) do
        if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(player)), aclGetGroup(v)) ) then
		    return true
		end
	end
end

addCommandHandler("Sender", function ( player, cmd, ... )
    if not ( isGuestAccount ( getPlayerAccount ( player ) ) ) then
	    if ( isPlayerAdmin ( player ) ) then
		    local msg = {...}
		    local message = table.concat(msg, " ")
        outputChatBox("≈[ بارسـال رسـالة للجـميـع [ "..getPlayerName (player).." ֆ ] لـقـد قـام الاعـب ]≈", root,math.random(0,255),math.random(0,255),math.random(0,255), true)
			setElementData ( resourceRoot, "Have_", true )
			setElementData ( resourceRoot, "Msg_", message )
        setTimer ( function ( ) 
            setElementData ( resourceRoot, "Msg_" , false )
        end , 1000*8 , 1 )
			if ( getElementData ( player, "Name" ) and getElementData ( player, "Name" ) ~= false ) then
				setElementData ( resourceRoot, "By_", getElementData ( player, "Name" ))
			else
				setElementData ( resourceRoot, "By_", getPlayerName ( player ))
			end
		else
		    outputChatBox("* لـيـس لديك خاصـيـة لارسال رسالة لجميع الاعبين علي شاشتهم !!", player, 255, 0, 0, true)
		end
	else
	    outputChatBox("* الرجـاء تسـجـيل الدخـول حتي يمكنك ارسال رسالة للجميع !!", player, 255, 0, 0, true)
		
		
	end
end)

 

Link to comment
Abdul KariM Shooter

Abdul KariM

Posted
Posted

مثلا انت كتبت رسالة

وجا لاعب ثاني كتب رسالة

تبي التايمر للكل 

ولا تبي تايمر للي يكتب الرسالة فقط ؟

يعني انا كتبت رسالة وجا خويي يكتب لازم ينتظر 8 ثواني

ولا بس انت الي تنتظر 8 ثواني ؟

  • Like 1
Link to comment
Faraon, Trick

Faraon,

Posted
Posted
3 minutes ago, Abdul KariM said:

مثلا انت كتبت رسالة

وجا لاعب ثاني كتب رسالة

تبي التايمر للكل 

ولا تبي تايمر للي يكتب الرسالة فقط ؟

يعني انا كتبت رسالة وجا خويي يكتب لازم ينتظر 8 ثواني

ولا بس انت الي تنتظر 8 ثواني ؟

هو قصدة لما يرسل رسالة لجميع اللاعبين .. 

ولما يجي يرسل تاني ألرسالة مو هتظهر حتي الرسالة الاولي تخلص مدتها وتختفي والتانية تظهر عشوائي .. 

صح ؟

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