Jump to content

فزعتكم ضروري

PeTer.NexT

By PeTer.NexT
in البرمجة

Recommended Posts

PeTer.NexT Transformer

PeTer.NexT

Posted
Posted

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

ام بعد

اقدم لكم هاذهي الاذاعه الصباحيه

بطلب من بيتر الى مبرمجين MTA

لو عندي لوحة وفيه اديت بوكس اثنين وزرين

اديت بوكس :-

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

زرين : -

زر لتفعيل التاج وزر لتعطيل التاج عشان لو يبغا تبديل اعطله تاجه واركبله جديد واضغط تفعيل

وبس ذا الى كان عندي اتمن تدزون كوداتكم

وسلمولي

Link to comment
PeTer.NexT Transformer

PeTer.NexT

Posted
  • Author
Posted
الموضوع ذا فيه نفس طلبك

وش الفرق بين طلبك وطلبه ؟؟ !!

ووش الأخطاء الي فيه ؟؟

الاخطاء التاج يتكرر

يعني التاج العادي يتكرر والتاج الى بسريال يتكرر

ويوم اقوله جيب المود عشان اعطي واحد يضبط يقول نو

Link to comment
PeTer.NexT Transformer

PeTer.NexT

Posted
  • Author
Posted

طيب يبيلك تربط التاج حقك بالإيفينت حق الشات الي موجود بالسكربت

أربط التاج وحطه بنفس الفنكششن ونفس الإيفينت

مو راضي يعطني وش اسويله

اطرح الكود الى احتاجه بلمود لو عندك

Link to comment
iMr.SFA7 Jacker

iMr.SFA7

Posted
Posted (edited)

مو راضي يعطني وش اسويله

اطرح الكود الى احتاجه بلمود لو عندك

من هو الي موب راضي ؟؟ !!

يبيلك بس تربط التاج حقك مع الإيفينت

أطرح التاج

Edited by Guest
Link to comment
PeTer.NexT Transformer

PeTer.NexT

Posted
  • Author
Posted

مو راضي يعطني وش اسويله

اطرح الكود الى احتاجه بلمود لو عندك

من هو الي موب راضي ؟؟ !!

يبيلك بس تربط التا حقك مع الإيفينت

أطرح التاج

تاج وش وايفنت وش

اذا مافي مود كيف احط التاج على قولك

Link to comment
iMr.SFA7 Jacker

iMr.SFA7

Posted
Posted

هذا هو طلبك !!

viewtopic.php?f=160&t=90579

وانت قلت ما تبي تستخدمه لانه راح يكرر ! ذذ

أكيد راح يكرر لان الأيفينت مكرر !

فـ أربط التاج الي عندك بالأيفينت حق سكربت التاج الي بالسريال !

ولا موب مركب تاج أدمن ويكرر ؟

Link to comment
PeTer.NexT Transformer

PeTer.NexT

Posted
  • Author
Posted
هذا هو طلبك !!

viewtopic.php?f=160&t=90579

وانت قلت ما تبي تستخدمه لانه راح يكرر ! ذذ

أكيد راح يكرر لان الأيفينت مكرر !

فـ أربط التاج الي عندك بالأيفينت حق سكربت التاج الي بالسريال !

ولا موب مركب تاج أدمن ويكرر ؟

انا فاهم عليك بس ذا

viewtopic.php?f=160&t=90579

في اشياء ناقصه يعني هوا طرح الاشياء الى يبيله تصليح ماطرح الكود كامل

Link to comment
iMr.SFA7 Jacker

iMr.SFA7

Posted
Posted

هذا هو الكود كآمل !! ذذ

-- Client Side  
  
local key = "F5" 
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, "2015", 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) 
  
  
bindKey ( key, "down", function(  ) 
     guiSetVisible ( T_WND, not guiGetVisible ( T_WND ) ) 
     showCursor ( guiGetVisible ( T_WND ) ) 
end ) 
  
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" ) 
    else 
           guiSetText ( T_Enable, "Enable TAG for Player" ) 
           setSerialData ( guiGetText ( T_Serial ), "TagState", "Disable" ) 
      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 


-- Server Side 
  
addEventHandler ( "onPlayerChat", root, function ( msg ) 
   if ( getSerialData ( getPlayerSerial ( source ), "TagState" ) ~= "Enable" ) then 
       return 
   end 
   cancelEvent (   ) 
   outputChatBox (" ( "..getSerialData ( getPlayerSerial ( source ), "playerTag" ).." ) "..getPlayerName ( source )..": #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
Link to comment
Professional Banger

Professional

Posted
Posted
هذا هو الكود كآمل !! ذذ

-- Client Side  
  
local key = "F5" 
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, "2015", 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) 
  
  
bindKey ( key, "down", function(  ) 
     guiSetVisible ( T_WND, not guiGetVisible ( T_WND ) ) 
     showCursor ( guiGetVisible ( T_WND ) ) 
end ) 
  
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" ) 
    else 
           guiSetText ( T_Enable, "Enable TAG for Player" ) 
           setSerialData ( guiGetText ( T_Serial ), "TagState", "Disable" ) 
      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 


-- Server Side 
  
addEventHandler ( "onPlayerChat", root, function ( msg ) 
   if ( getSerialData ( getPlayerSerial ( source ), "TagState" ) ~= "Enable" ) then 
       return 
   end 
   cancelEvent (   ) 
   outputChatBox (" ( "..getSerialData ( getPlayerSerial ( source ), "playerTag" ).." ) "..getPlayerName ( source )..": #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

Thank you

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