Jump to content

iMr.SFA7

Members
  • Posts

    2,013
  • Joined

  • Last visited

Everything posted by iMr.SFA7

  1. CPY الداتا تستخدم الـ فالأفـضل اذا كان التحقق من الداتا والداتا بنفس الملف تستخدم المتغـيرات! local marker = createMarker ( 2490.96240, -1684.29456, 13.50838, 'cylinder', 1, 255, 255, 255, 255 ) isMoney = false bindKey ('K','down', function() if isElementWithinMarker(localPlayer,marker) then if not isMoney then triggerServerEvent( 'Money', localPlayer) setHaveMoney(true) setTimer(setHaveMoney, 60000, 1, false) else outputChatBox("يجب عليك الإنتظار") end end end) function setHaveMoney(state) if state == true or state == false then isMoney = state end end !وعندي سؤال: ليه الكود كلنت وسيرفر دامك تقدر تحطه سيرفر فقط
  2. العـفو, بالخدمـة
  3. وبدلهـا warpInit آمم دور وظيفـة اسمها function warpInit() guiGridListClear(getControl(wndWarp, "playerlist")) for id,player in ipairs(getElementsByType("player")) do local row = guiGridListAddRow(getControl(wndWarp, "playerlist")) guiGridListSetItemText(getControl(wndWarp, "playerlist"), row, 1, getPlayerName(player), false, false) end end
  4. function warpTo() if guiGridListGetSelectedItem ( getControl(wndWarp, "playerlist") ) == -1 then return end local playerName = guiGridListGetItemText ( getControl(wndWarp, "playerlist"), guiGridListGetSelectedItem ( getControl(wndWarp, "playerlist") ), 1 ) local player = getPlayerFromName(playerName) if player then server.warpMe(g_Me, player) end closeWindow(wndWarp) end function Search(Edit, gridlist) guiGridListClear(gridlist) local text = guiGetText(Edit) if text == "" then for id,player in ipairs(getElementsByType("player")) do local row = guiGridListAddRow(gridlist) guiGridListSetItemText(gridlist, row, 1, getPlayerName(player), false, false) end else for id,player in ipairs(getElementsByType("player")) do if string.find(string.upper(getPlayerName(player)), string.upper(text), 1, true) then local row = guiGridListAddRow(gridlist) guiGridListSetItemText(gridlist, row, 1, getPlayerName(player), false, false) end end end end addEventHandler ("onClientGUIChanged", resourceRoot, function() if source == getControl(wndWarp,'search') then Search( getControl(wndWarp,'search'), getControl(wndWarp,"playerlist") ) end end) wndWarp = { 'wnd', text = 'انتقال الى لاعب', width = 300, controls = { {'lbl', id='البحث', text='البحث عن اللاعبين', width=96}, {'txt', id='search', text='', width=280}, { 'lst', id='playerlist', width=280, height=310, columns={ {text='الاعبين', attr='name'} }, onitemdoubleclick=warpTo }, {'btn', id='انتقال', onclick=warpTo}, {'btn', id='اغلاق', closeswindow=true} }, oncreate = warpInit } function warpToCommand(cmd, player) if player then player = getPlayerFromNick(player) if player then server.warpMe(player) end else createWindow(wndWarp) showCursor(true) end end addCommandHandler('warpto', warpToCommand) addCommandHandler('wt', warpToCommand)
  5. أخوي وش ذا؟ GUIEditor.window is delete !الي بسطر 59 الكلنت
  6. addEventHandler ( "onResourceStart", resourceRoot, function() createTeam ( "Red", 255, 0, 0 ) createTeam ( "Blue", 0, 0, 255 ) end) --============================================================================================= function setDimension () setElementDimension ( source, 1 ) end addEvent( "setDimension", true ) addEventHandler( "setDimension", root, setDimension ) --============================================================================================= function SelectTeam ( PlayerTeam ) if ( getElementDimension ( source ) == 1 ) then local TheTeam = getTeamFromName(PlayerTeam) setPlayerTeam(source, TheTeam) spawn(source) setElementDimension ( source, 1 ) end end addEvent( "SelectTeam", true ) addEventHandler( "SelectTeam", root, SelectTeam ) --================================================================================================ function spawn(player) if ( getElementDimension ( player ) == 1 and getPlayerTeam ( player ) ) then TeamName = getTeamName ( getPlayerTeam ( player ) ) if (TeamName) == "Red" then fadeCamera(player,true) setCameraTarget(player,player) spawnPlayer (player, 2462.13135, -1713.80273, 13.51884, math.random (0,288), 46, 0,1) triggerClientEvent ( player, "closee", player ) end ---===================================================================================== if (TeamName) == "Blue" then fadeCamera(player,true) setCameraTarget(player,player) spawnPlayer (player, 2514.08179 ,-1663.66248 ,13.59749, math.random (0,288), 45, 0,1) triggerClientEvent ( player, "closee", player ) end else outputChatBox("خطأ", player) end end --=============================================================================================== function player_Wasted() if ( getElementDimension ( source ) == 1 ) then setTimer(spawn, 1800, 1, source) end end addEventHandler ( "onPlayerWasted", root, player_Wasted )
  7. addEventHandler ( "onResourceStart", resourceRoot, function() createTeam ( "Red", 255, 0, 0 ) createTeam ( "Blue", 0, 0, 255 ) end) --============================================================================================= function setDimension () setElementDimension ( source, 1 ) end addEvent( "setDimension", true ) addEventHandler( "setDimension", root, setDimension ) --============================================================================================= function SelectTeam ( PlayerTeam ) if ( getElementDimension ( source ) == 1 ) then local TheTeam = getTeamFromName(PlayerTeam) setPlayerTeam(source, TheTeam) spawn(source) setElementDimension ( source, 1 ) end end addEvent( "SelectTeam", true ) addEventHandler( "SelectTeam", root, SelectTeam ) --================================================================================================ function spawn(player) if ( getElementDimension ( player ) == 1 and getPlayerTeam ( player ) ) then TeamName = getTeamName ( getPlayerTeam ( player ) ) if (TeamName) == "Red" then fadeCamera(player,true) setCameraTarget(player,player) spawnPlayer (player, 2462.13135, -1713.80273, 13.51884, math.random (0,288), 46, 0,1) triggerClientEvent ("closee", root ) end ---===================================================================================== if (TeamName) == "Blue" then fadeCamera(player,true) setCameraTarget(player,player) spawnPlayer (player, 2514.08179 ,-1663.66248 ,13.59749, math.random (0,288), 45, 0,1) triggerClientEvent ("closee", root ) end else outputChatBox("خطأ", player) end end --=============================================================================================== function player_Wasted() if ( getElementDimension ( source ) == 1 ) then setTimer(spawn, 1800, 1, source) end end addEventHandler ( "onPlayerWasted", root, player_Wasted ) !هذا ايش يسوي؟ لأنه لو أرسبن لاعب الحدث بيصير لكل اللاعبين closee الحدث
  8. في التايمر vehicle عـرف متغـير الـ
  9. -- لم يتم التجربة -- -- Server Side / tdma_core.lua -- function setDimension() setElementDimension ( source, 1 ) setupBases(name) startGame() addEventHandler( "onGamemodeMapStart", root, setDimension) triggerClientEvent ( "ShowChangeTeamWindow", Player, Player ) end addEvent ( "setDimension", true ) addEventHandler ( "setDimension", root,setDimension) function nn() mapResource = getResourceRootElement(name) if xDebug then outputDebugString ( "Starting TDMA Main Control Suite" ) end if xDebug then outputDebugString ( "STARTED... Proceeding to load gamemode... WAIT!" ) end versionDisplay = textCreateDisplay () if ( tonumber(gameMaxKills) > 0 ) then local teamText = textCreateTextItem ( "Scores", 0.80, 0.96 + textBoost, "medium", 255,255,255, 255, 1.2 ) textDisplayAddText ( versionDisplay, teamText ) textBoost = textBoost + 0.01 for k,v in ipairs(gameTeams) do if xDebug2 then outputDebugString ( "**MAKING TEAM KILL TEXTS***" ) end if xDebug2 then outputDebugString ( "**GOT: " .. v.name .. " R:" .. v.red .. " G:" .. v.green .. " B:" .. v.blue ) end local teamName = v.name local teamKills = v.kills teamText = textCreateTextItem ( teamName .. ": " .. teamKills .. "/" .. gameMaxKills .. "kills",0.00+ textBoost, 0.96, "medium", tonumber(v.red), tonumber(v.green), tonumber(v.blue), 255, 1.2) --setElementParent ( teamText, tdma ) v.teamText = teamText textDisplayAddText ( versionDisplay, teamText ) textBoost = textBoost + 0.25 end end for k,v in ipairs(gameTeams) do if ( gameFF == "on" ) then setTeamFriendlyFire ( v.team, true ) setTeamFriendlyFire ( v.team, true ) else setTeamFriendlyFire ( v.team, false ) setTeamFriendlyFire ( v.team, false ) end end --Start the pickup system from Included\pickup_system.lua initPickupSystem() --Start the vehicle system from Included\vehicle_system.lua initVehicleSystem() ----outputDebugString ( "Starting The Game" ) if xDebug then outputDebugString ( "[[[[[/*****STARTING GAME*****\]]]]]" ) end end --+----------------------------+ --| Team Death Match Game Mode | --| Created By AlienX | --+----------------------------+ debugEnabled = true --Game mode variables gameInterior = 0 gameRespawnTime = 3000 gameTeams = {} gameVehicles = {} gameMaxKills = 40 gameFF = "off" gameTimeHour = 0 gameTimeMin = 0 gameTimeLocked = false versionDisplay = nil xDebug = false xDebug2 = false textBoost = 0 xonPlayerWasted_Enabled = true mapResource = nil local tdma = nil function onMapUnload ( name ) --outputChatBox ( "UNLOADING LEVEL... PLEASE WAIT" ) for k = 1,#gameTeams do destroyElement ( gameTeams[k].team ) end textDestroyDisplay ( versionDisplay ) --Game mode variables gameInterior = 0 gameRespawnTime = 3000 gameTeams = {} gameVehicles = {} gameMaxKills = 40 gameFF = "off" gameTimeHour = 0 gameTimeMin = 0 gameTimeLocked = false versionDisplay = nil textBoost = 0 xonPlayerWasted_Enabled = true mapResource = nil destroyElement ( tdma ) for k,v in ipairs(getElementsByType("player")) do if getElementDimension ( v ) == 1 then setPlayerTeam ( v, nil ) setElementData ( v, "tdma.teamid", false ) setElementData ( v, "tdma.playerHasSpawned", false ) end end end addEventHandler( "onGamemodeMapStop", root, onMapUnload) function shuffleTable(inputData) local newTable = {} local i_RndTblPos = 0 while #inputData > 0 do i_RndTblPos = math.random(1,#inputData) table.insert ( newTable, inputData[i_RndTblPos] ) table.remove ( inputData, i_RndTblPos ) end return newTable end function startGame() nn() if xDebug then outputDebugString ( "... DONE" ) end local playerElementTree = getElementsByType ( "player" ) playerElementTree = shuffleTable(playerElementTree) for k,v in ipairs(playerElementTree) do if getElementDimension ( v ) == 1 then local teamOne = gameTeams[1] local teamTwo = gameTeams[2] local randSkinPickerOne = math.random(1,#teamOne.skins) local randSkinOne = tonumber(teamOne.skins[randSkinPickerOne].id) local randSkinPickerTwo = math.random(1,#teamTwo.skins) local randSkinTwo = tonumber(teamTwo.skins[randSkinPickerTwo].id) setElementData ( v, "tdma.teamid", 1 ) setElementData(v,"TeamOneR",teamOne.red) setElementData(v,"TeamOneG",teamOne.green) setElementData(v,"TeamOneB",teamOne.blue) setElementData(v,"TeamOneSkin",randSkinOne) setElementData(v,"TeamTwoR",teamTwo.red) setElementData(v,"TeamTwoG",teamTwo.green) setElementData(v,"TeamTwoB",teamTwo.blue) setElementData(v,"TeamTwoSkin",randSkinTwo) setElementData(v,"TeamOneName", getTeamName(teamOne.team)) setElementData(v,"TeamTwoName", getTeamName(teamTwo.team)) setElementData ( v, "tdma.sp", "n" ) setElementData ( source, "tdma.playerHasSpawned", false ) --setElementInterior ( v, 10 ) --setTimer ( fadeCamera, 1000, 1, v, true, 1 ) setPedStat ( v, 69, 1000 ) setPedStat ( v, 70, 1000 ) setPedStat ( v, 71, 1000 ) setPedStat ( v, 72, 1000 ) setPedStat ( v, 73, 1000 ) setPedStat ( v, 74, 1000 ) setPedStat ( v, 75, 1000 ) setPedStat ( v, 76, 1000 ) setPedStat ( v, 77, 1000 ) setPedStat ( v, 78, 1000 ) setPedStat ( v, 79, 1000 ) showPlayerHudComponent ( v, "ammo", true ) showPlayerHudComponent ( v, "area_name", true ) showPlayerHudComponent ( v, "armour", true ) showPlayerHudComponent ( v, "breath", true ) showPlayerHudComponent ( v, "health", true ) showPlayerHudComponent ( v, "money", true ) showPlayerHudComponent ( v, "radar", true ) showPlayerHudComponent ( v, "vehicle_name", true ) showPlayerHudComponent ( v, "weapon", true ) --Setup the status bar for the player! statusTextDisplay = textCreateDisplay () local statusTextItem = textCreateTextItem ( "", 0.5, 0.95, "high", 255, 255, 255, 255, 1.5 ) textDisplayAddText ( statusTextDisplay, statusTextItem ) textDisplayAddObserver ( statusTextDisplay, v ) textDisplayAddObserver ( versionDisplay, v ) setElementData ( v, "tdma.status", statusTextItem ) triggerClientEvent ( "ShowChangeTeamWindow", v, v ) end end end function restartGame() for k,v in ipairs(getElementsByType ( "player" )) do if getElementDimension ( v ) == 1 then setElementData ( v, "tdma.sp", "n" ) fadeCamera ( v, false, 1.0, 0, 0, 0 ) --setElementInterior ( v, 10 ) --setTimer ( fadeCamera, 1000, 1, v, true, 1 ) setPedStat ( v, 69, 1000 ) setPedStat ( v, 70, 1000 ) setPedStat ( v, 71, 1000 ) setPedStat ( v, 72, 1000 ) setPedStat ( v, 73, 1000 ) setPedStat ( v, 74, 1000 ) setPedStat ( v, 75, 1000 ) setPedStat ( v, 76, 1000 ) setPedStat ( v, 77, 1000 ) setPedStat ( v, 78, 1000 ) setPedStat ( v, 79, 1000 ) showPlayerHudComponent ( v, "ammo", true ) showPlayerHudComponent ( v, "area_name", true ) showPlayerHudComponent ( v, "armour", true ) showPlayerHudComponent ( v, "breath", true ) showPlayerHudComponent ( v, "health", true ) showPlayerHudComponent ( v, "money", true ) showPlayerHudComponent ( v, "radar", true ) showPlayerHudComponent ( v, "vehicle_name", true ) showPlayerHudComponent ( v, "weapon", true ) local theTeamID = getElementData( v, "tdma.teamid" ) local theTeam = gameTeams[theTeamID] if ( theTeam ) then respawnThePlayer ( v, theTeam ) else firstSpawn ( v ) end end end end function onMapFinish ( name ) if
  10. ؟tdma_core_client.lua اللوحة ذي ماهي الموجودة في ملف قصدي أنت تبي اللوحة الي طرحتها لي للدخول للديث ماتش واللوحة الي بالملف لتغيير التيم؟
  11. الي سويتها الي فيها زر الديث ماتش GUI أطرحلي أكواد الـ
  12. عدل ع القيم اذا ما كان مشفر أعتقد ان في وظيفة في القيم مود ترسبن اللاعب بالماب انت سو تحقق للعالم الوهمي قبل لايرسبنه باستخدام الوظيفة
  13. لا تنسخ اي شيء شف السينتاكس حق الوظيفة والارقمنتات حقتها وحاول
  14. استخدم العوالم الوهمية يعني لما يضغط زر الديث ماتش يحطه بعالم وهمي وعدل ع السكربت وسو تحقق من العالم الوهمي اذا كان يساوي العالم الوهمي الي حطيته للديث ماتش سو له الوظيفة
  15. هاذي كلمات عادية بشوارعهم يعني عادي واحد منهم يقول لخويه اي سبة من الالقاب ذي ** وكمثال حنا بشوارعنا عادي جدا واحد يقول لخويه كل والالقاب ذي مهيب كلها سب بعضها كلام غير مفهوم
  16. وليه ماتحاول تسويه؟ 'onClientGUIClick' guiGetText triggerServerEvent getAccount logIn addAccount
  17. هـذي ألقـاب للاعـضاء علـى حسـب عـدد مشاركـاتك بعضهـا يجي سب وهـذي هي الألقاب والمشاركات حقتها Playa-Hater 0-3 Vic 4-10 Square 11-19 Civilian 20-29 Rat 30-49 Snitch 50-69 Transformer 70-89 Punk-@ss B*tch 90-109 Sucka 110-125 Poot-butt 126-145 Busta 146-169 Mark 170-189 Chump 199-215 Trick 216-239 Red-Headed Stepchild 240-259 Peon 260-279 Pee-Wee 280-299 Prankster 300-329 Fool 330-359 Street Cat 360-389 Thug 390-435 Hustler 436-499 Playa Partner 500-559 Mack 560-599 Pimp 600-639 Crime Partner 640-689 Homeboy 690-739 Homie 740-799 Road Dawg 800-879 Hoodsta 880-969 Hard-@ss 970-1089 Banger 1090-1199 Lil' G 1200-1399 Loc 1400-1799 Jacker 1800-2249 Shooter 2250-2749 Foot Soldier 2750-3199 Hoo-Rider 3200-3599 Soldier 3600-4299 Hawg 4300-5599 Gangsta 5600-6999 Ghetto Star 7000-7999 Monster 8000-8999 Big Homie 9000-9999 Boss Hawg 10000-11999 Shot Caller 12000-14999 OG 15000-19999 High Roller 20000-29999 Four-Star General 30000-39999 King of San Andreas 40000+
  18. -- Server Side -- xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end local sValue = getElementData( source,'Zombie kills' ) if not sValue then sValue = '0' end local kills = tonumber( sValue ) if kills == nil or not kills then kills = 0 end if (kills >= tonumber(Price)) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); else outputChatBox("**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_)
  19. iMr.SFA7

    ...

    الصراحـة ما فهـمتك زين أعتقـد قصـدك أنك تبي تجيب احداثيات من سكربت ثاني؟ عندك أكثر من طريقـة ومنـها الاكسـبورت سوي وظيفة جديدة بالسكربت الي فيه الاحداثيات function getThePosition() return x, y, z end x, y, z = احداثياتك وطبعاً لازم نضيف بملف الميتا الوظيفة الي نبي نسوي لها اكسبورت من السكربت حقك function="getThePosition" type="server"/> type="server" = "client" اذا كانت الوظيفـة بجـانب سيرفر اما اذا كانت كلنت فـيصير ونروح للسكربت حقك ونسوي اكسبورت عشان نجيب الاحداثيات x, y, z = exports.resourceName:getThePosition() resourceName = اسم السكربت الي سوينا فيه وظيفة إحضار الاحداثيات
  20. iMr.SFA7

    ...

    احذف سطر 15 سيرفر
  21. !تجيب تيم اللاعب فقط المفروض تجيب اسم التيم getPlayerTeam الوظيـفة local team = getPlayerTeam( localPlayer ) if ( getTeamName(team ) ~= "اسم تيم الشرطه" ) then guiSetVisible(windowGUI,state) end
  22. كودك بـيجيب فـلوس اللاعـب عند تحميل الكلنت 'عند تشغيـل السكربت' يعني الفلوس ما راح تتحدث الا بعد ما يغير اللاعب اسمه أو يغلـق اللوحة ويفـتحها وهو يبيها تتحدث؟
  23. function Player_information ( label ) guiSetText(GUIEditor.label[3], "serial ( "..getPlayerSerial().." )" ,0,255,0) end addEventHandler("onClientResourceStart", root, Player_information) addEventHandler('onClientRender', root, function() guiSetText(GUIEditor.label[1], "name ( "..getPlayerName(localPlayer).." )" ,0,255,0) guiSetText(GUIEditor.label[2], "money ( "..getPlayerMoney(localPlayer).." )" ,0,255,0) end)
  24. function Player_information ( button ) guiSetText(GUIEditor.label[1], " name ( "..getPlayerName(localPlayer).." )" ,0,255,0) end addEventHandler("onClientResourceStart", local, Player_information)
×
×
  • Create New...