Jump to content

Adham

Members
  • Posts

    2,259
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by Adham

  1. Adham

    help

    سلام عليكم اليوم انا لقيت مود توزيع الفلوس لما بوزع فلوس بيجلي في الشات انا مش عاوز يجلي في الشات عاوز يجلي فوق الهوا مود TopBarChat العامل اسود فوق كدا يعني لما اوزع فلوس تيجي الكلام البشات متجيش ب الشات تيجي فوق كلنت --[[ Name: admin-send-money-hl Description: Script to send money to all players Created by: lLinux (HackerlLinux) Contact: Skype: HackerlLinux FB: [url=http://www.fb.com/lLinux]www.fb.com/lLinux[/url] ]]-- function centerWindow (center_window) local screenW, screenH = guiGetScreenSize() local windowW, windowH = guiGetSize(center_window, false) local x, y = (screenW - windowW) /2,(screenH - windowH) /2 guiSetPosition(center_window, x, y, false) end GUI = guiCreateWindow(530, 297, 281, 85, "Send money to all players", false) guiWindowSetSizable(GUI, false) guiSetVisible(GUI, false) centerWindow (GUI) Label = guiCreateLabel(10, 33, 58, 15, "Amount $::", false, GUI) Money_Edit = guiCreateEdit(78, 31, 82, 21, "", false, GUI) guiEditSetMaxLength(Money_Edit, -- s8) --> Boton_Send = guiCreateButton(170, 31, 47, 21, "Send", false, GUI) guiSetProperty(Boton_Send, "NormalTextColour", "FFAAAAAA") CopyRight = guiCreateLabel(10, 60, 261, 15, "Script by lLinux (HackerlLinux) ", false, GUI) guiSetFont(CopyRight, "default-bold-small") guiLabelSetColor(CopyRight, 254, 120, 21) guiLabelSetHorizontalAlign(CopyRight, "center", false) Boton_Cancelar = guiCreateButton(223, 31, 47, 21, "Cancel", false, GUI) guiSetProperty(Boton_Cancelar, "NormalTextColour", "FFAAAAAA") function Open () guiSetVisible(GUI, true) showCursor(true) end addEvent("Abrir", true) addEventHandler("Abrir", getLocalPlayer(), Open) function close () guiSetVisible(GUI, false) showCursor(false) end addEventHandler("onClientGUIClick", Boton_Cancelar, close, false) function sendm () name = getPlayerName(getLocalPlayer()) cantidad = guiGetText(Money_Edit) triggerServerEvent("SendMoney1",getRootElement(),cantidad,name) end addEventHandler("onClientGUIClick", Boton_Send, sendm, false) سرفر- function onAdmins ( thePlayer ) local cuenta = getAccountName( getPlayerAccount(thePlayer) ) if isObjectInACLGroup("user."..cuenta, aclGetGroup("Admin")) then triggerClientEvent ( "Abrir", thePlayer) else outputChatBox("ACCESO DENEGADO!", thePlayer, 255, 0, 0, true) end end addCommandHandler("sendmoney", onAdmins) function Enviar (cantidad, name) givePlayerMoney(getRootElement(), tonumber(cantidad)) outputChatBox("#ffff00نظام حافز : تم منح الجميع $ "..cantidad, getRootElement(), 255, 255, 255, true) end addEvent("SendMoney1", true) addEventHandler("SendMoney1", getRootElement(), Enviar)
  2. Adham

    edit

    سلام عليكم اليوم لقيت مود توب بار البيدخل او بيقفل بيبقا فوق بس دا لقيته تحت ؟ ابيه فوق كلنت ------------------------------------------ -- TopBarChat -- ------------------------------------------ -- Developer: Braydon Davis -- -- File: c.lua -- -- Copyright 2013 (C) Braydon Davis -- -- All rights reserved. -- ------------------------------------------ -- Script Version: 1.4 -- ------------------------------------------ local maxMessages = 5; -- The max messages that will show (on each bar) local DefaultTime = 8; -- The max time each message will show if time isn't defined. ------------------------------------------ -- For scripters only -- ------------------------------------------ local sx_, sy_ = guiGetScreenSize ( ) local sx, sy = sx_/1280, sy_/720 -- you got xXMADEXx's resolution :3 plz no hak mi local DefaultPos = true; local messages_top = { } local messages_btm = { } function sendClientMessage ( msg, r, g, b, pos, time ) -- Msg: String -- R: Int (0-255) -- G: Int (0-255) -- B: Int (0-255) -- Pos: Boolean -- Time: Int if ( not msg ) then return false end if ( pos == nil ) then pos = DefaultPos end local r, g, b = r or 255, g or 255, b or 255 local time = tonumber ( time ) or DefaultTime local data = { message = msg, r = r, g = g, b = b, alpha=0, locked=true, rTick = getTickCount ( ) + (time*1000) } --> Scripters note: --> The remove and intro fades are handled in the render event if ( pos == true or pos == "top" ) then table.insert ( messages_top, data ) return true elseif ( pos == false or pos == "bottom" ) then table.insert ( messages_btm, data ) return true end return false end addEvent ( getResourceName ( getThisResource ( ) )..":sendClientMessage", true ) addEventHandler ( getResourceName ( getThisResource ( ) )..":sendClientMessage", root, sendClientMessage ) function dxDrawNotificationBar ( ) local doRemove = { top = { }, bottom = { } } -- This is used so it prevents the next message from flashing -- Top Message Bar for i, v in pairs ( messages_top ) do local i = i - 1 if ( not v.locked ) then v.alpha = v.alpha - 3 if ( v.alpha <= 20 ) then table.insert ( doRemove.top, i+1 ) end messages_top[i+1].alpha = v.alpha else if ( v.alpha < 160 ) then v.alpha = v.alpha + 1 messages_top[i+1].alpha = v.alpha end if ( v.rTick <= getTickCount ( ) ) then v.locked = false messages_top[i+1].locked=false end end dxDrawRectangle ( (sx_/2-530/2), i*25, 530, 25, tocolor ( 0, 0, 0, v.alpha ) ) dxDrawText ( tostring ( v.message ), 0, i*25, sx_, (i+1)*25, tocolor ( v.r, v.g, v.b, v.alpha*1.59375 ), sy*1, "default-bold", "center", "center") end if ( #messages_top > maxMessages and messages_top[1].locked ) then messages_top[1].locked = false end -- Bottom Message Bar for i, v in pairs ( messages_btm ) do if ( not v.locked ) then v.alpha = v.alpha - 3 if ( v.alpha <= 20 ) then table.insert ( doRemove.bottom, i ) end messages_btm[i].alpha = v.alpha else if ( v.alpha < 160 ) then v.alpha = v.alpha + 1 messages_btm[i].alpha = v.alpha end if ( v.rTick <= getTickCount ( ) ) then v.locked = false messages_btm[i].locked=false end end dxDrawRectangle ( (sx_/2-530/2), sy_-(i*25), 530, 25, tocolor ( 0, 0, 0, v.alpha ) ) dxDrawText ( tostring ( v.message ), 0, sy_-(i*25), sx_, sy_-((i-1)*25), tocolor ( v.r, v.g, v.b, v.alpha*1.59375 ), sy*1, "default-bold", "center", "center") end if ( #messages_btm > maxMessages and messages_btm[1].locked ) then messages_btm[1].locked = false end -- handle message removes if ( #doRemove.top > 0 )then for i, v in pairs ( doRemove.top ) do table.remove ( messages_top, v ) end end if ( #doRemove.bottom > 0 ) then for i, v in pairs ( doRemove.bottom ) do table.remove ( messages_btm, v ) end end end addEventHandler ( "onClientRender", root, dxDrawNotificationBar ) ------------------------------ -- For development -- ------------------------------ addCommandHandler ( 'rt', function ( ) for i=1, 5 do sendClientMessage ( "Testing - Index ".. tostring ( i ), 255, 255, 255, false ) sendClientMessage ( "Testing - Index ".. tostring ( i ), 255, 255, 255, true ) end end ) سرفر- ------------------------------------------ -- TopBarChat -- ------------------------------------------ -- Developer: Braydon Davis -- -- File: s.lua -- -- Copyright 2013 (C) Braydon Davis -- -- All rights reserved. -- ------------------------------------------ local rName = getResourceName ( getThisResource ( ) ) function sendClientMessage ( msg, who, r, g, b, pos, time ) if ( msg and who ) then if ( isElement ( who ) ) then triggerClientEvent ( who, rName..":sendClientMessage", who, msg, r, g, b, pos, time ) return true else return false end else return false end end addEventHandler ( "onPlayerJoin", root, function ( ) sendClientMessage ( '* '..getPlayerName ( source )..' has joined!', root, 255, 100, 100, false ) end ) addEventHandler ( 'onPlayerQuit', root, function ( tp, reason, respons ) if ( tp == 'Kicked' or tp == 'Banned' ) then msg = '['..tp..' - '..respons..'] ('..reason..')' else msg = '['..tp..']' end sendClientMessage ( "* "..getPlayerName ( source ).." has quit. "..msg, root, 255, 100, 100, false ) end )
  3. Adham

    تعديل

    ما تفتح اللوحة قسم؟ الميتا - "[L]e3bA" name="Test" version="1.0" type="m.i" />
  4. السلام عليكم اليوم عملت لوحه ما تفتح وعمل كل شي كلنت local alzr = 'm' -- GUIEditor = { gridlist = {}, button = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() wnd = guiCreateWindow(551, 138, 249, 435, ":: Police Panel ::", false) guiWindowSetSizable(wnd, false) GUIEditor.button[1] = guiCreateButton(9, 327, 109, 45, "Kil / Slap", false, wnd) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FF04B0AA") GUIEditor.button[2] = guiCreateButton(130, 327, 109, 45, "Destroy Car", false, wnd) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FF04AE8C") GUIEditor.button[3] = guiCreateButton(10, 255, 230, 32, "Blow Car", false, wnd) guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFD9CC00") GUIEditor.button[4] = guiCreateButton(9, 290, 230, 32, "Spectate Car", false, wnd) guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FF4CD800") GUIEditor.button[5] = guiCreateButton(10, 377, 224, 31, "X", false, wnd) guiSetProperty(GUIEditor.button[5], "NormalTextColour", "FFAAAAAA") GUIEditor.label[1] = guiCreateLabel(10, 410, 216, 15, "غير أجباري | Not Requred", false, wnd) guiLabelSetColor(GUIEditor.label[1], 175, 0, 0) GUIEditor.gridlist[1] = guiCreateGridList(9, 21, 231, 230, false, wnd) guiGridListAddColumn(GUIEditor.gridlist[1], "Player", 0.9) end ) -- bindKey (alzr,'down', function () guiSetVisible (wnd,not guiGetVisible (wnd)) showCursor (guiGetVisible (wnd)) end)
  5. السلام عليكم اليوم عملت لوحه وما تفتخ وعامل كل شي . كلنت local alzr = 'm' -- GUIEditor = { gridlist = {}, button = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() wnd = guiCreateWindow(551, 138, 249, 435, ":: Police Panel ::", false) guiWindowSetSizable(wnd, false) GUIEditor.button[1] = guiCreateButton(9, 327, 109, 45, "Kil / Slap", false, wnd) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FF04B0AA") GUIEditor.button[2] = guiCreateButton(130, 327, 109, 45, "Destroy Car", false, wnd) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FF04AE8C") GUIEditor.button[3] = guiCreateButton(10, 255, 230, 32, "Blow Car", false, wnd) guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFD9CC00") GUIEditor.button[4] = guiCreateButton(9, 290, 230, 32, "Spectate Car", false, wnd) guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FF4CD800") GUIEditor.button[5] = guiCreateButton(10, 377, 224, 31, "X", false, wnd) guiSetProperty(GUIEditor.button[5], "NormalTextColour", "FFAAAAAA") GUIEditor.label[1] = guiCreateLabel(10, 410, 216, 15, "غير أجباري | Not Requred", false, wnd) guiLabelSetColor(GUIEditor.label[1], 175, 0, 0) GUIEditor.gridlist[1] = guiCreateGridList(9, 21, 231, 230, false, wnd) guiGridListAddColumn(GUIEditor.gridlist[1], "Player", 0.9) end ) -- bindKey (alzr,'down', function () guiSetVisible (wnd,not guiGetVisible (wnd)) showCursor (guiGetVisible (wnd)) end)
  6. Adham

    edit .

    ابي اليضعط حرف m يطلع له اشاره الهيا ( الماوس ) يشاور علي لاعب يطلع له لوحه #
  7. Adham

    edit .

    تعديل اكواد سلام عليكم اليوم عملت مود لوحه شرطي اول ما اخش السرفر ما تفتح وحاطط الاكواد صح كلنت ! wnd = guiCreateWindow(584, 117, 212, 446, "لوحة الشرطي", false) guiWindowSetSizable(wnd, false) guiWindowSetMovable(wnd, false) guiSetVisible(wnd, false) putRight(wnd) guiSetProperty(wnd, "CaptionColour", "ffffffff") grid = guiCreateGridList(12, 29, 190, 192, false, wnd) column = guiGridListAddColumn(grid, "اللاعبين", 0.9) Search = guiCreateEdit(15, 232, 177, 25, "", false, wnd) Spectate = guiCreateButton(15, 388, 177, 35, "مراقبه", false, wnd) guiSetFont(Spectate, "default-bold-small") guiSetProperty(Spectate, "NormalTextColour", "FFFFFF00") guiSetProperty(Spectate, "HoverTextColour", "FFFFFF00") Slap = guiCreateButton(15, 304, 177, 35, "سلاب", false, wnd) guiSetFont(Slap, "default-bold-small") guiSetProperty(Slap, "NormalTextColour", "FFFFFF00") guiSetProperty(Slap, "HoverTextColour", "FFFFFF00") Destroy = guiCreateButton(15, 343, 177, 35, "سحب المركبه", false, wnd) guiSetFont(Destroy, "default-bold-small") guiSetProperty(Destroy, "NormalTextColour", "FFFFFF00") guiSetProperty(Destroy, "HoverTextColour", "FFFFFF00") rButton = guiCreateButton(15, 263, 177, 35, "تحديث القائمه", false, wnd) guiSetFont(rButton, "default-small") guiSetProperty(rButton, "NormalTextColour", "FF00FF00") guiSetProperty(rButton, "HoverTextColour", "FF00FF00") function strong ( ) guiSetVisible (wnd, true) showCursor (true) end addEvent( "openGui", true ) addEventHandler( "openGui",root,strong) bindKey( "M", "down", function() triggerServerEvent ( "check", localPlayer ) guiSetVisible ( wnd, not guiGetVisible ( wndName ) ) showCursor ( guiGetVisible ( wnd ) ) end) -- addEventHandler("onClientGUIClick",root, function () local sel = guiGridListGetSelectedItem(grid) local text = guiGridListGetItemText(grid,sel,1) if ( source == Spectate ) then if ( sel ~= -1 ) then setPlayerSep(getPlayerFromName(text)) else show("Please Choose Player To Spectator it") end elseif ( source == Slap ) then if ( sel ~= -1 ) then triggerServerEvent("killPlayer",localPlayer,text) else show("Please Choose Player To Kill it") end elseif ( source == Destroy ) then if ( sel ~= -1 ) then local player = getPlayerFromName(text) if isPedInVehicle(player) then triggerServerEvent("onDes",localPlayer,text) else show("This Player Don't Have Vehicle") end else show("Please Choose Player To Destroy His Vehicle") end elseif ( source == GUIEditor_Button[4] ) then if ( sel ~= -1 ) then local player = getPlayerFromName(text) if isPedInVehicle(player) then triggerServerEvent("onBlow",localPlayer,text) else show("This Player Don't Have Vehicle") end else show("Please Choose Player To Blow His Vehicle") end end end ) سرفر - addEvent("check",true) addEventHandler("check",root, function() local account = getPlayerAccount(client) if(isObjectInACLGroup("user."..getAccountName(account),aclGetGroup("Police"))) then triggerClientEvent(client,"openre",client) end end ) addEventHandler( "onElementClicked",root, function ( x, y, z ) triggerClientEvent ( source, "openGui", source ) end -- addEvent("isPolice",true) addEventHandler("isPolice",root, function () if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Police")) then triggerClientEvent(source,"Yes",source) end end ) addEvent("killPlayer",true) addEventHandler("killPlayer",root, function (player) local player = getPlayerFromName(player) if ( player ) then killPed(player) outputChatBox("* [ Police ] : The Player Killed Successfuly",source,0,255,0) outputChatBox("* [ Police ] : You Are Killed By " .. getPlayerName(source),player,255,0,0) end end ) addEvent("onDes",true) addEventHandler("onDes",root, function (player) local player = getPlayerFromName(player) local veh = getPedOccupiedVehicle(player) destroyElement(veh) outputChatBox("* [ Police ] : The Player Vehicle Successfuly Destoryed",source,0,255,0) outputChatBox("* [ Police ] : Your Vehicle Destroy By " .. getPlayerName(source),player,255,0,0) end ) addEvent("onBlow",true) addEventHandler("onBlow",root, function (player) local player = getPlayerFromName(player) local veh = getPedOccupiedVehicle(player) blowVehicle(veh) outputChatBox("* [ Police ] : The Player Vehicle Successfuly Blowed",source,0,255,0) outputChatBox("* [ Police ] : Your Vehicle Blow By " .. getPlayerName(source),player,255,0,0) end ) addEventHandler("onPlayerLogin",root, function (_,acc) if isObjectInACLGroup("user." .. getAccountName(acc),aclGetGroup("Police")) then outputChatBox("* Welcome Police Man Press m To Open Police Panel",source,255,255,255,true) end end ) addEventHandler("onResourceStart",resourceRoot, function () if not aclGetGroup("Police") then outputChatBox("* Admin Please Add Group Name Police To Add Player in it To Be Police",root,255,0,0) end end )
  8. local places = { { "النخيل", 2123.62622, 1397.25793, 10.81252 }, } GUIEditor = { gridlist = {}, staticimage = {}, button = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() wnd = guiCreateStaticImage(0.00, 0.21, 0.16, 0.56, "11.png", true) guiSetProperty(wnd, "ImageColours", "tl:FF00FFFC tr:FF00FFFC bl:FF00FFFC br:FF00FFFC") guiSetVisible(wnd,false) label = guiCreateLabel(32, 16, 137, 71, "places", false, wnd) guiSetFont(label, "sa-gothic") guiLabelSetColor(label, 0, 255, 252) grid = guiCreateGridList(6, 87, 195, 289, false, wnd) guiGridListAddColumn(grid, "places", 0.-- s8) --> btn_warb = guiCreateButton(8, 380, 60, 32, "warb", false, wnd) guiSetFont(btn_warb, "default-bold-small") guiSetProperty(btn_warb, "NormalTextColour", "FF00FFFC") btn_close = guiCreateButton(155, 380, 40, 32, "✖", false, wnd) guiSetProperty(btn_close, "NormalTextColour", "FF00FFFC") label2 = guiCreateLabel(10, 418, 181, 16, "that mod made by :- 1XxCr[o]sS", false, wnd) guiSetFont(label2, "default-bold-small") guiLabelSetColor(label2, 0, 255, 252) end ) bindKey ( "F6", "down", function ( ) guiSetVisible ( wnd, not guiGetVisible ( wnd ) ) showCursor ( guiGetVisible ( wnd ) ) end ) addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == btn_close ) then guiSetVisible ( wnd, false ) showCursor ( false ) end end ) for k,v in ipairs(places) do local row = guiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,v[1],false,false) guiGridListSetItemData(grid,row,1,{v[2],v[3],v[4]}) end addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == btn_warb ) then if ( guiGridListGetSelectedItem ( grid ) ~= -1 ) then setElementPosition ( localPlayer, unpack ( guiGridListGetItemData ( grid, guiGridListGetSelectedItem ( grid ), 1 ) ) ) outputChatBox ( "* تم الإنتقال بنجاح", 0, 255, 0, true ) else outputChatBox ( "* الرجاء اختيار مكان للإنتقال إليه", 255, 0, 0, true ) end end end )
  9. سلام عليكم ابي فكشنات مود نظام الاستجار بس ابي يعني يعطيني الافشكنات ويفرق بينهم انهن احطهم سرفر وكلنت مثال -- client -- getPlayerMoney server addEvents ياريت تكونو فهموتني
  10. GUIEditor = { gridlist = {}, staticimage = {}, button = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() wnd = guiCreateStaticImage(0.00, 0.21, 0.16, 0.56, "11.png", true) guiSetProperty(wnd, "ImageColours", "tl:FF00FFFC tr:FF00FFFC bl:FF00FFFC br:FF00FFFC") guiSetVisible(wnd,false) label = guiCreateLabel(32, 16, 137, 71, "places", false, wnd) guiSetFont(label, "sa-gothic") guiLabelSetColor(label, 0, 255, 252) grid = guiCreateGridList(6, 87, 195, 289, false, wnd) guiGridListAddColumn(grid, "places", 0.-- s8) --> btn_warb = guiCreateButton(8, 380, 60, 32, "warb", false, wnd) guiSetFont(btn_warb, "default-bold-small") guiSetProperty(btn_warb, "NormalTextColour", "FF00FFFC") btn_close = guiCreateButton(155, 380, 40, 32, "✖", false, wnd) guiSetProperty(btn_close, "NormalTextColour", "FF00FFFC") label2 = guiCreateLabel(10, 418, 181, 16, "that mod made by :- 1XxCr[o]sS", false, wnd) guiSetFont(label2, "default-bold-small") guiLabelSetColor(label2, 0, 255, 252) end ) bindKey("F6","down", function () guiSetVisible(wnd,not guiGetVisible(wnd)) showCursor(guiSetVisible(wnd)) end ) addEventHandler('onClientGUIClick',root, function() if source = btn_close then guiSetVisible(wnd,false) showCursor(true) end end ) places = {"النخيل",2123.62622, 1397.25793, 10.81252} for k,v in paris (places) do local row = GuiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,v[1],false,false) guiGridListSetItemData(grid,row,1,{v[2],v[3],v[4]}) end addEventHandler('onClientGUIClick',root, function sel = guiGridListGetSelectedItem(grid) if source = btn_warb then if sel ~= -1 then local x,y,z = unpack (guiGridListSetItemData(grid,sel,1)) setElementPosition(localplayer,x,y,z) end end end ) في شي غلط عندك places = {"النخيل",2123.62622, 1397.25793, 10.81252} edit # places = { {"النخيل",2123.62622, 1397.25793, 10.81252} } + addEventHandler('onClientGUIClick',root, function sel = guiGridListGetSelectedItem(grid) if source = btn_warb then if sel ~= -1 then local x,y,z = unpack (guiGridListSetItemData(grid,sel,1)) setElementPosition(localplayer,x,y,z) end end end ) عندك 3 end edit # addEventHandler('onClientGUIClick',root, function sel = guiGridListGetSelectedItem(grid) if source = btn_warb then if sel ~= -1 then local x,y,z = unpack (guiGridListSetItemData(grid,sel,1)) setElementPosition(localplayer,x,y,z) end end )
  11. local bind = 'F6' GUIEditor = { gridlist = {}, staticimage = {}, button = {}, label = {} } -- places = { {"النخيل",2123.62622, 1397.25793, 10.81252} } -- local screenW, screenH = guiGetScreenSize() wnd = guiCreateStaticImage(0.00, 0.21, 0.16, 0.56, "11.png", true) guiSetProperty(wnd, "ImageColours", "tl:FF00FFFC tr:FF00FFFC bl:FF00FFFC br:FF00FFFC") guiSetVisible(wnd,false) label = guiCreateLabel(32, 16, 137, 71, "places", false, wnd) guiSetFont(label, "sa-gothic") guiLabelSetColor(label, 0, 255, 252) grid = guiCreateGridList(6, 87, 195, 289, false, wnd) guiGridListAddColumn(grid, "places", 0.-- s8) --> btn_warb = guiCreateButton(8, 380, 60, 32, "warb", false, wnd) guiSetFont(btn_warb, "default-bold-small") guiSetProperty(btn_warb, "NormalTextColour", "FF00FFFC") btn_close = guiCreateButton(155, 380, 40, 32, "✖", false, wnd) guiSetProperty(btn_close, "NormalTextColour", "FF00FFFC") label2 = guiCreateLabel(10, 418, 181, 16, "that mod made by :- 1XxCr[o]sS", false, wnd) guiSetFont(label2, "default-bold-small") guiLabelSetColor(label2, 0, 255, 252) end ) -- bindKey (bind,'down', function () guiSetVisible (wnd,not guiGetVisible (wnd)) showCursor (guiGetVisible (wnd)) end) for _, v in ipairs (places) do local Row = guiGridListAddRow(GUIEditor.gridlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], Row, 1, v[1], false, false) guiGridListSetItemText(GUIEditor.gridlist[1], Row, 2, v[2], false, false) end addEventHandler("onClientGUIClick",root, function() if (source = btn_close) then guiSetVisible(wnd,false) showCursor(false) end end) addEventHandler('onClientGUIClick',root, function sel = guiGridListGetSelectedItem(grid) if source = btn_warb then if sel ~= -1 then local x,y,z = unpack (guiGridListSetItemData(grid,sel,1)) setElementPosition(localplayer,x,y,z) end end )
  12. function aclGetGroupsName() local wifi = { } for i , g in ipairs (aclGroupList()) do local theName = aclGroupGetName (g) table.insert (wifi,theName) end return wifi end function IFFER1() if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Cosnole")) then end addEvent( "IFFER", true ) addEventHandler( "IFFER", Root, IFFER1 ) for i,ww in ipairs (aclGetGroupsName()) do triggerClientEvent("Groups", localPlayer) end ) function Wifi () triggerClientEvent ( "Groups", localPlayer ) end addCommandHandler ( "Test", Wifi)
  13. ليه حاط فاصلة ؟ triggerClientEvent ( source, "openGui", source,) !! كذا يصير triggerClientEvent ( source, "openGui", source) لاهنت اذا ما تعرف لا تكتب تعليقات مالها داعي فيه شي عندك خطا انت عامل قوس ( مب جنب بعض source والقوس التاني جبنو يصير كذا triggerClientEvent ( source, "openGui", source) edit# triggerClientEvent ( source, "openGui", source )
  14. طيب يخييييي شوف المشكله في الكودات تبعي وحلها ما تبي تعدل؟ -_-" client addEventHandler("onClientResourceStart", resourceRoot, function() wind = guiCreateWindow(82, 96, 632, 398, ":: Support Systeam ::", false) guiWindowSetSizable(wind, false) guiSetVisible(wnd,false) guiSetVisible(wnd ,false) -- عدم اظهار الوحة وقت تشغيل المود chatbox = guiCreateCheckBox(467, 325, 150, 15, "Show news in ChatBox", false, false, wind) guiSetProperty(chatbox, "NormalTextColour", "FFE36000") grid2 = guiCreateGridList(467, 22, 155, 299, false, wind) guiGridListAddColumn(grid2, "Support List", 0.9) grid = guiCreateGridList(10, 22, 447, 333, false, wind) guiGridListAddColumn(grid, "Message", 0.9) edit = guiCreateEdit(10, 359, 335, 29, "", false, wind) button_send = guiCreateButton(352, 360, 110, 28, "Send", false, wind) guiSetProperty(button_send, "NormalTextColour", "FFAAAAAA") X = guiCreateButton(598, 350, 19, 17, "X", false, wind) guiSetProperty(X, "NormalTextColour", "FFAAAAAA") created = guiCreateLabel(472, 370, 150, 16, "#Created By FawaD v1.3.4", false, wind) guiLabelSetColor(created, 226, 0, 0) end ) function re() guiGridListClear(grid2) triggerServerEvent("refresh",localPlayer) end bindKey("F5","down", function() guiSetVisible(wnd, not guiGetVisible(wnd) ) showCursor( guiGetVisible(wnd) ) end) addEvent("online",true) addEventHandler("online", root, function (name) local g = guiGridListAddRow(supportonline) guiGridListSetItemText(supportonline,g, 1,""..name.."", false, false) end) addEventHandler("onClientGUIClick",button1,function () if guiGetText(edit) ~= '' then triggerServerEvent("support",localPlayer,guiGetText(edit)) end end, false) addEvent("sendmessage",true) addEventHandler("sendmessage",root, function() local gg = guiGridListAddRow(supportchat) guiGridListSetItemText(supportchat,gg, 1,getPlayerName(localPlayer).." : "..guiGetText(edit), false, false) if ( guiCheckBoxGetSelected( chatbox ) == true ) then outputChatBox("[support-System]"..getPlayerName(localPlayer).." : "..guiGetText(edit),255,255,0) end end) addEvent("sendmessage2",true) addEventHandler("sendmessage2",root, function() local gg = guiGridListAddRow(supportchat) guiGridListSetItemText(supportchat,gg, 1,getPlayerName(localPlayer).." : "..guiGetText(edit), false, false) if ( guiCheckBoxGetSelected( chatbox ) == true ) then outputChatBox("[support-System]"..getPlayerName(localPlayer).." : "..guiGetText(edit),255,255,0) end end) سرفر addEvent("refresh",true) addEventHandler("refresh",root,function () for k,v in ipairs (getElementsByType("player")) do if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(v)),aclGetGroup("Support")) ) then triggerClientEvent("online",source,getPlayerName(v)) end end end) addEvent("support",true) addEventHandler("support",root,function () if isObjectInACLGroup ("user.*", aclGetGroup ( "Support" ) ) then triggerClientEvent("sendmessage",source) else triggerClientEvent("sendmessage2",source) end end)
  15. اعتقد ذا او ذا. triggerClientEvent ( source, "openGui", source,) - triggerClientEvent ( source, "openGui", source )
  16. انا جرب ذا + اشتغل تمام client side function strong ( ) guiSetVisible (WndName, true) showCursor (true) end addEvent( "openGui", true ) addEventHandler( "openGui",root,strong) bindKey( "M", "down", function() triggerServerEvent ( "check", localPlayer ) guiSetVisible ( WndName, not guiGetVisible ( wndName ) ) showCursor ( guiGetVisible ( WndName ) ) end) server side addEvent("check",true) addEventHandler("check",root, function() local account = getPlayerAccount(client) if(isObjectInACLGroup("user."..getAccountName(account),aclGetGroup("Police"))) then triggerClientEvent(client,"openre",client) end end ) addEventHandler( "onElementClicked",root, function ( x, y, z ) triggerClientEvent ( source, "openGui ,source") end
  17. -- -- Client Side -- bindKey( "M", "down", function() triggerServerEvent ( "check", localPlayer ) guiSetVisible ( WndName, not guiGetVisible ( wndName ) ) showCursor ( guiGetVisible ( WndName ) ) end) -- Server Side -- addEvent("check",true) addEventHandler("check",root, function() local acc=getPlayerAccount(client) if(isObjectInACLGroup("user."..getAccountName(acc),aclGetGroup("Police"))) then triggerClientEvent(client,"openre",client) end end ) addEventHandler( "onElementClicked",root, function ( x, y, z ) triggerClientEvent ( source, "openGui ,source") end )
  18. عملت كل شي بس ما يفتح ولا يبعت ولا شي
  19. المشكله انو مش بيبعت + انا حاطط كود البيعمل الما يجي اللوح في وجهي ما طلع ارجو تعديل عليه
  20. isObjectInACLGroup هاذا لتحط الميقدر يفتح غير الكونسل او اي شي تبيه مثال 0 Example if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("Cosnole")) then -- الطلبات التانيه guiGridListGetSelectedItem guiGridListGetItemText getPlayerFromName guiSetText اعتقد الكود ذا التبيه العامل انت لابل وتبيه يطلع اسم اللاعب وسريالو مثال -- addEventHandler("onClientGUIClick",root, function () if ( source == grid ) then local sel = guiGridListGetSelectedItem(grid) local text = guiGridListGetItemText(grid,sel,1) local player = getPlayerFromName(text) if ( player ) then guiSetText(GUIEditor_Label[1],"Name: " .. getPlayerName(player)) guiSetText(GUIEditor_Label[2],Serial: " .. getPlayerSerial(player)) else guiSetText(GUIEditor_Label[1],"Name: N/A") guiSetText(GUIEditor_Label[2],"Serial: N/A") end end end )
  21. طيب والوحه تبيعي؟
×
×
  • Create New...