السلام عليكم ورحمة الله وبركاته
انا عندي مود تاجات خاصه بسريال>
بس المشكله
يوم احط تاج للرتب العاديه الى في اسل واضيف تاج خاص تتكرر التاجات
مثل :
جيت لرتبت كونسول وانا معي كونسول التاج راح يكون كونسول
واذا ضفت تاج خاص من نفس المود الى عندي راح يتكرر التاج ابي حل
الاكواد
Client :
local screenW, screenH = guiGetScreenSize()
GUIEditor = { label = {} }
T_WND = guiCreateWindow((screenW - 454) / 2, (screenH - 364) / 2, 454, 364, "~.* Player TAG - Panel *.~", false)
guiWindowSetSizable(T_WND, false)
guiSetProperty(T_WND, "CaptionColour", "FF29FF00")
guiSetVisible(T_WND,false)
GUIEditor.label[1] = guiCreateLabel(10, 29, 429, 17, "* Note : You can put Player serial and TAG Text for can show it in CHAT box", false, T_WND)
guiSetFont(GUIEditor.label[1], "default-bold-small")
guiLabelSetColor(GUIEditor.label[1], 255, 0, 0)
GUIEditor.label[2] = guiCreateLabel(10, 67, 98, 16, "* Player serial :-", false, T_WND)
guiSetFont(GUIEditor.label[2], "default-bold-small")
guiLabelSetColor(GUIEditor.label[2], 47, 255, 0)
T_Serial = guiCreateEdit(110, 67, 329, 18, "", false, T_WND)
GUIEditor.label[3] = guiCreateLabel(10, 93, 98, 16, "* Player TAG :-", false, T_WND)
guiSetFont(GUIEditor.label[3], "default-bold-small")
guiLabelSetColor(GUIEditor.label[3], 5, 0, 255)
T_TAG = guiCreateEdit(110, 91, 329, 18, "", false, T_WND)
T_Enable = guiCreateButton(193, 123, 163, 28, "", false, T_WND)
guiSetFont(T_Enable, "default-bold-small")
guiSetProperty(T_Enable, "NormalTextColour", "FFF6FF00")
T_Close = guiCreateButton(356, 334, 88, 20, "Close", false, T_WND)
guiSetFont(T_Close, "default-bold-small")
guiSetProperty(T_Close, "NormalTextColour", "FFFF0000")
GUIEditor.label[4] = guiCreateLabel(9, 334, 257, 20, "#.~ Created by MR.GRAND", false, T_WND)
guiSetFont(GUIEditor.label[4], "default-bold-small")
guiLabelSetColor(GUIEditor.label[4], 0, 234, 255)
GUIEditor.label[5] = guiCreateLabel(434, 151, 15, 177, "||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||", false, T_WND)
guiSetFont(GUIEditor.label[5], "default-bold-small")
guiLabelSetColor(GUIEditor.label[5], 38, 38, 38)
GUIEditor.label[6] = guiCreateLabel(10, 147, 15, 177, "||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||", false, T_WND)
guiSetFont(GUIEditor.label[6], "default-bold-small")
guiLabelSetColor(GUIEditor.label[6], 38, 38, 38)
serial_p = "FFFFFF"
function Show_Hide()
if guiGetVisible(T_WND) == false then
if (getPlayerSerial (source) == serial_p) then
guiSetVisible(T_WND, true)
showCursor(true)
end
else guiSetVisible(T_WND, false) showCursor(false)
end end
addCommandHandler("TAGS",Show_Hide)
addEventHandler ( "onClientGUIClick", resourceRoot, function ( )
if ( source == T_Close ) then
guiSetVisible ( T_WND, false )
showCursor ( false )
elseif ( source == T_Enable ) then
if ( string.len ( guiGetText ( T_Serial ) ) == 32 and string.len ( guiGetText ( T_TAG ) ) >= 3 ) then
local player_ = getPlayerFromSerial ( guiGetText ( T_Serial ) )
if ( player_ ) then
if ( guiGetText ( T_Enable ) == "Enable TAG for Player" ) then
setSerialData ( guiGetText ( T_Serial ), "TagState", "Enable" )
setSerialData ( guiGetText ( T_Serial ), "playerTag", guiGetText ( T_TAG ) )
guiSetText ( T_Enable, "Disable TAG for Player" )
guiSetEnabled(source, false)
setTimer(guiSetEnabled, 3000, 1, T_Enable, true)
triggerServerEvent("MSG1",localPlayer)
else
guiSetText ( T_Enable, "Enable TAG for Player" )
setSerialData ( guiGetText ( T_Serial ), "TagState", "Disable" )
guiSetEnabled(source, false)
setTimer(guiSetEnabled, 3000, 1, T_Enable, true)
triggerServerEvent("MSG2",localPlayer)
end
end
end
end
end )
addEventHandler ( "onClientGUIChanged", T_Serial, function ( )
local player_ = getPlayerFromSerial ( guiGetText ( source ) )
if ( player_ ) then
if ( getSerialData ( guiGetText ( source ), "TagState" ) == "Enable" ) then
guiSetText ( T_Enable, "Disable TAG for player" )
else
guiSetText ( T_Enable, "Enable TAG for Player" )
end
end
end )
function getPlayerFromSerial ( serial )
assert ( type ( serial ) == "string" and #serial == 32, "getPlayerFromSerial - invalid serial" )
for index, player in ipairs ( getElementsByType ( "player" ) ) do
if ( getPlayerSerial ( player ) == serial ) then
return player
end
end
return false
end
function setSerialData(serial,key,value)
if( value and type(serial) == "string") then
setElementData(root,serial.."&"..key,value)
end
end
function getSerialData(serial,key)
if ( key and type(serial) == "string") then
value = getElementData(root,serial.."&"..key)
end
return value
end
addEventHandler("onClientResourceStart",resourceRoot,
function()
triggerServerEvent("MSG3",localPlayer)
end
)
Server :
addEventHandler ( "onPlayerChat", root, function ( msg )
if ( getSerialData ( getPlayerSerial ( source ), "TagState" ) ~= "Enable" ) then
return
end
cancelEvent ( )
outputChatBox (""..getSerialData ( getPlayerSerial ( source ), "playerTag" ).."#FFFFFF"..msg, root, 255, 255, 255, true )
end )
function getSerialData(serial,key)
if ( key and type(serial) == "string") then
value = getElementData(root,serial.."&"..key)
end
return value
end
addEvent("MSG1",true)
addEventHandler("MSG1",root,
function ()
OutPut( "Player Tag Enabled Successfully !",source,0,255,0)
end
)
addEvent("MSG2",true)
addEventHandler("MSG2",root,
function ()
OutPut( "Player Tag Disabled Successfully !",source,0,255,0)
end
)
addEvent("MSG3",true)
addEventHandler("MSG3",root,
function ()
OutPut( "=[ *Player TAGS panel* | *Created by MR.GRAND* ]",source,0,255,255)
end
)
output_server :
function OutPut(message, player, r, g, b)
triggerClientEvent(player, "client:dxOutputMessage", player, message, r, g, b)
end
addEvent("server:outputMessage", true)
addEventHandler("server:outputMessage", root,
function(message, r, g, b)
OutPut(message, source, r, g, b)
end
)
وفي مشكله ثانيه انا اقدر اعطي نفسي تاج واسحبه من نفس لوحة التاجات الخاصه لكن يوم اجي اسحب تاج احد ماينسحب لزم الى ركب التاج هو يسحبه يعني ماقدر اركب تاج انا لزم الى يبي تاج هو يقدر وانا مابغاء كذا ابغا الى معه خاصية هو يقدر يركب ويسحب تاج اي مين
اتمناء المساعده