Jump to content

z24d

Members
  • Posts

    570
  • Joined

  • Last visited

Everything posted by z24d

  1. local Superman = {} -- Settings local ZERO_TOLERANCE = 0.00001 local MAX_ANGLE_SPEED = 6 -- In degrees per frame local MAX_SPEED = 1.0 local EXTRA_SPEED_FACTOR = 1.85 local LOW_SPEED_FACTOR = 0.40 local ACCELERATION = 0.025 local EXTRA_ACCELERATION_FACTOR = 1.8 local LOW_ACCELERATION_FACTOR = 0.85 local TAKEOFF_VELOCITY = 1.75 local TAKEOFF_FLIGHT_DELAY = 750 local SMOKING_SPEED = 1.25 local GROUND_ZERO_TOLERANCE = 0.18 local LANDING_DISTANCE = 3.2 local FLIGHT_ANIMLIB = "swim" local FLIGHT_ANIMATION = "Swim_Dive_Under" local FLIGHT_ANIM_LOOP = false local IDLE_ANIMLIB = "cop_ambient" local IDLE_ANIMATION = "Coplook_loop" local IDLE_ANIM_LOOP = true local MAX_Y_ROTATION = 55 local ROTATION_Y_SPEED = 3.8 -- Static global variables local thisResource = getThisResource() local rootElement = getRootElement() local localPlayer = getLocalPlayer() local serverGravity = getGravity() -- -- Utility functions -- local function isPlayerFlying(player) local data = getElementData(player, "superman:flying") if not data or data == false then return false else return true end end local function setPlayerFlying(player, state) if state == true then state = true else state = false end setElementData(player, "superman:flying", state) end local function iterateFlyingPlayers() local current = 1 local allPlayers = getElementsByType("player") return function() local player repeat player = allPlayers[current] current = current + 1 until not player or (isPlayerFlying(player) and isElementStreamedIn(player)) return player end end function Superman:restorePlayer(player) setPlayerFlying(player, false) setPedAnimation(player, false) setElementVelocity(player, 0, 0, 0) setElementRotation(player, 0, 0, 0) setPedRotation(player, getPedRotation(player)) setElementCollisionsEnabled(player, true) self:destroySmokeGenerators(player) self.rotations[player] = nil self.previousVelocity[player] = nil end function Superman:createSmokeGenerator(player) local generator = createObject(2780, getElementPosition(player)) setElementCollisionsEnabled(generator, false) setObjectScale(generator, 0) return generator end function Superman:createSmokeGenerators(player) if not self.smokeGenerators[player] then local smokeGenerators = {} smokeGenerators[1] = self:createSmokeGenerator(player) attachElementToElement(smokeGenerators[1], player, 0.75, -0.2, -0.4, -40, 0, 60) smokeGenerators[2] = self:createSmokeGenerator(player) attachElementToElement(smokeGenerators[2], player, -0.75, -0.2, -0.4, -40, 0, -60) self.smokeGenerators[player] = smokeGenerators end end function Superman:destroySmokeGenerators(player) if self.smokeGenerators[player] then for k, v in ipairs(self.smokeGenerators[player]) do destroyElement(v) end self.smokeGenerators[player] = nil end end function angleDiff(angle1, angle2) angle1, angle2 = angle1 % 360, angle2 % 360 local diff = (angle1 - angle2) % 360 if diff <= 180 then return diff else return -(360 - diff) end end local function isPedInWater(ped) local pedPosition = Vector3D:new(getElementPosition(ped)) if pedPosition.z <= 0 then return true end local waterLevel = getWaterLevel(pedPosition.x, pedPosition.y, pedPosition.z) if not isElementStreamedIn(ped) or not waterLevel or waterLevel < pedPosition.z then return false else return true end end local function isnan(x) math.inf = 1/0 if x == math.inf or x == -math.inf or x ~= x then return true end return false end local function getVector2DAngle(vec) if vec.x == 0 and vec.y == 0 then return 0 end local angle = math.deg(math.atan(vec.x / vec.y)) + 90 if vec.y < 0 then angle = angle + 180 end return angle end -- -- Initialization and shutdown functions -- function Superman.Start() local self = Superman -- Register events addEventHandler("onClientResourceStop", getResourceRootElement(thisResource), Superman.Stop, false) addEventHandler("onPlayerJoin", rootElement, Superman.onJoin) addEventHandler("onPlayerQuit", rootElement, Superman.onQuit) addEventHandler("onClientRender", rootElement, Superman.processControls) addEventHandler("onClientRender", rootElement, Superman.processFlight) addEventHandler("onClientPlayerDamage", localPlayer, Superman.onDamage, false) addEventHandler("onClientElementDataChange", rootElement, Superman.onDataChange) addEventHandler("onClientElementStreamIn", rootElement, Superman.onStreamIn) addEventHandler("onClientElementStreamOut", rootElement, Superman.onStreamOut) -- Bind keys bindKey("jump", "down", Superman.onJump) -- Register commands addCommandHandler("superman", Superman.cmdSuperman) -- Initializate attributes self.smokeGenerators = {} self.rotations = {} self.previousVelocity = {} end addEventHandler("onClientResourceStart", getResourceRootElement(thisResource), Superman.Start, false) function Superman.Stop() local self = Superman setGravity(serverGravity) -- Restore all players animations, collisions, etc for player in iterateFlyingPlayers() do self:restorePlayer(player) end end -- -- Join/Quit -- function Superman.onJoin(player) local self = Superman local player = player or source setPlayerFlying(player, false) end function Superman.onQuit(reason, player) local self = Superman local player = player or source if isPlayerFlying(player) then self:restorePlayer(player) end end -- -- onDamage: superman is invulnerable -- function Superman.onDamage() local self = Superman if isPlayerFlying(localPlayer) then cancelEvent() end end -- -- onStreamIn: Reset rotation attribute for player -- function Superman.onStreamIn() local self = Superman end function Superman.onStreamOut() local self = Superman if source and isElement(source) and getElementType(source) == "player" and isPlayerFlying(source) then self.rotations[source] = nil self.previousVelocity[source] = nil end end -- -- onDataChange: Check if somebody who is out of stream stops being superman -- function Superman.onDataChange(dataName, oldValue) local self = Superman if dataName == "superman:flying" and isElement(source) and getElementType(source) == "player" and oldValue ~= getElementData(source, dataName) and oldValue == true and getElementData(source, dataName) == false then self:restorePlayer(source) end end -- -- onJump: Combo to start flight without any command --
  2. أبيه للكونسل بس ماضبط ! local Superman = {} -- Static global values local rootElement = getRootElement() local thisResource = getThisResource() -- Resource events addEvent("superman:start", true) addEvent("superman:stop", true) -- -- Start/stop functions -- function Superman.Start() if ( isObjectInACLGroup('user.'..getAccountName(getPlayerAccount(source)),aclGetGroup('Console')) ) then local self = Superman end addEventHandler("superman:start", rootElement, self.clientStart) addEventHandler("superman:stop", rootElement, self.clientStop) end addEventHandler("onResourceStart", getResourceRootElement(thisResource), Superman.Start, false) function Superman.clientStart() if ( isObjectInACLGroup('user.'..getAccountName(getPlayerAccount(source)),aclGetGroup('Console')) ) then setElementData(client, "superman:flying", true) end end function Superman.clientStop() if ( isObjectInACLGroup('user.'..getAccountName(getPlayerAccount(source)),aclGetGroup('Console')) ) then setElementData(client, "superman:flying", false) end end
  3. z24d

    سؤال

    ألله يعطيك الف عافية لكن شلون أظيف صورة للكل مسج؟
  4. z24d

    سؤال

    att2 = att2 or 0 att3 = att3 or 0 att4 = att4 or 0 att5 = att5 or self.tColor[4] dxDrawText(self.strText, l + shadowDist, t + shadowDist, r + shadowDist, b + shadowDist, tocolor(att2, att3, att4, att5), self.fScale, self.strFont, self.bHorizontalAlign, self.bVerticalAlign, self.bClip, self.bWordWrap, self.bPostGUI ) end dxDrawText ( self.strText, l, t, r, b, tocolor(unpack(self.tColor)), self.fScale, self.strFont, self.bHorizontalAlign, self.bVerticalAlign, self.bClip, self.bWordWrap, self.bPostGUI ) أتوقع هنا التعديل وش أحط ؟
  5. z24d

    سؤال

    آوك شكراً بس ياعيال للحين ماجاوبتو أنا ابي الكلمسج يطلع فيه ألوان يعني #x%x%x%x%x%x%
  6. z24d

    سؤال

    * Deleted !! كنت أفكر بس أبدلها بكود التوب بار والله ياهي لحسه ماعلينا منها الحين شلون أخلي الكل مسج ملون يعني يصلح كذا #FF00FF يطلع الون فهمت كيف؟
  7. z24d

    سؤال

    ياهلا والله أخوي أقصد مثلا صكيت واحد سلاب يطلع بالشات nil Has been Slapped z24d (100) فهمت ؟ وطلبي الثاني أبي أخلي الكيل مسج colorCoded=true
  8. z24d

    سؤال

    السلام عليكم وين ألقا الكلام حق الي اذا انصك ألاعب ؟ من الوحة حقتت الأدمنية بأي ملف لني دورت ومالقيت
  9. طيب مافي مشكله لكن وين أحصل أذا انصك الاعب ميوت أو سلاب أو اي شيء وين أحصل الملف بمود أدمن ؟
  10. والله انا مسوي مودات بالهبل تشتغل كلها خاص لاكن عالمي مره ماتشتغل
  11. معليش ماأبي أسوي موضوع ثاني لكن المود ذا يشتغل بالسيرفر العادي لكن بالاستضافة مشغله بالسيرفر لاكن مايصير به شيء ! --Server side local Font = dxCreateFont( "Font.ttf", 20 ) bindKey("u", "down", "chatbox","AM") function msg(message, thePlayer) newMSG = message if ( isRender == true ) then removeEventHandler ( "onClientRender", getRootElement(), dx ) end function dx() dxDrawText( "#FF0000Admin : #FFFFFF"..newMSG, 22, 202, 180, 250, tocolor( 150, 0, 0 ), 0.8, Font, "left", "top", false, false, true, true, false ) dxDrawText( getPlayerName( thePlayer ), 24, 222, 160, 235, tocolor( 255, 255, 255, 255 ), 1, "default-bold", "left", "top", false, false, true, true, false ) isRender = true end addEventHandler("onClientRender", getRootElement(), dx) end addEvent( "admin", true ) addEventHandler( "admin", root, msg ) addEvent("Delet",true) addEventHandler( "Delet", root , function() if ( isRender == true ) then removeEventHandler ( "onClientRender", root, dx ) isRender = false end end) addEventHandler ( "onClientResourceStart", resourceRoot, function ( ) triggerServerEvent ( "SetMessage", localPlayer ) end ) function check(thePlayer, commandName,...) local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "oneradmin" ) ) or isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Head.Admin" ) ) or isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Console" ) ) or isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "big.Admin" ) ) then setElementData ( resourceRoot, "MessageAdmin", message ) triggerClientEvent ( "sora", root, message ) local veve = {...} local message = table.concat(veve, " ") triggerClientEvent("admin", getRootElement(),message,thePlayer) end end addCommandHandler("AM", check) function maxv(thePlayer) triggerClientEvent("Delet", getRootElement(),thePlayer) end addCommandHandler("угЭ",maxv) addEvent ( "SetMessage", true ) addEventHandler ( "SetMessage", root, function ( ) triggerClientEvent ( source, "sora", resourceRoot, ( getElementData ( resourceRoot, "MessageAdmin" ) or "" ) ) end )
  12. addEventHandler ( "onPlayerLogin", root, function ( _,acc ) local Masters = createTeam( "Admins", 255, 2, 0) if ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Master" ) ) ) or ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Moafek" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Console" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Sozr" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "msol" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Moderator1" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Moderator2" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "SuperModerator1" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "SuperModerator2" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "Super.Admin" ) ) ) ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "msol.beot" ) ) ) then setPlayerTeam ( source, Masters ) setTeamFriendlyFire ( theTeam, false ) end end ) ,وين المشكله بالكود ابي الأدمنية يكونون بتيم Masters وأبيهم مايذبحون بعض
  13. z24d

    GUIMESSAGES ?

    addEventHandler('onPlayerJoin', getRootElement(), function(server) local joinedPlayerName = getPlayerName ( source ) exports["topbarchat"]:sendClientMessage ( "#58ACFA*" .. joinedPlayerName .. "#58ACFA Has been joined" , root, 0, 255, 0 ,10 ) end ) addEventHandler('onPlayerChangeNick', getRootElement(), function(oldNick, newNick, server) local joinedPlayerName = getPlayerName ( source ) exports["topbarchat"]:sendClientMessage ( "#FF6464*" .. oldNick .. "'#FF6464 Has changed his nick to ##FF6464'" .. newNick .. "'##FF6464", root, 0, 255, 0, 10 ) end ) addEventHandler('onPlayerQuit', getRootElement(), function(reason) local QuitPlayerName = getPlayerName ( source, server ) exports["topbarchat"]:sendClientMessage ( "#FF6464*" .. getPlayerName(source) .. ' Has been left the server'"" .. reason .. "", root, 255, 255, 255, 8 ) end ) addEventHandler('onPlayerLogin', getRootElement(), function() local LoginedPlayerName = getPlayerName ( source, server ) exports["topbarchat"]:sendClientMessage ( "#00FF00*#0000FF" .. LoginedPlayerName .. "#00FF00 has been succesfuly logined in" , root, true, 0, 255, 0, 8 ) end ) أسم المود الي مسوين له عكسبورت topbarchat
  14. z24d

    GUIMESSAGES ?

    exports["topbarchat"]:sendClientMessage ( "#00FF00*#0000FF" .. LoginedPlayerName .. "#00FF00 has been succesfuly logined in" , root, true, 0, 255, 0, 8 ) كذآ يعني؟
  15. z24d

    GUIMESSAGES ?

    طيب يعطيك العافية سويت كود علا المود الثآني ولا زبط g_Root = getRootElement() addEventHandler('onPlayerJoin', g_Root, function() local joinedPlayerName = getPlayerName ( source ) exports["topbarchat"]:sendClientMessage ( "#58ACFA*" .. joinedPlayerName .. "#58ACFA Has been joined" , g_Root, 0, 255, 0 ,10 ) end ) addEventHandler('onPlayerChangeNick', g_Root, function(oldNick, newNick) local joinedPlayerName = getPlayerName ( source ) exports["topbarchat"]:sendClientMessage ( "#FF6464*" .. oldNick .. "'#FF6464 Has changed his nick to ##FF6464'" .. newNick .. "'##FF6464", g_Root, 0, 255, 0, 10 ) end ) addEventHandler('onPlayerQuit', g_Root, function(reason) local QuitPlayerName = getPlayerName ( source ) exports["topbarchat"]:sendClientMessage ( "#FF6464*" .. getPlayerName(source) .. ' Has been left the server'"" .. reason .. "", g_Root, 255, 255, 255, 8 ) end ) addEventHandler('onPlayerLogin', g_Root, function() local LoginedPlayerName = getPlayerName ( source ) exports["topbarchat"]:sendClientMessage ( "#00FF00*#0000FF" .. LoginedPlayerName .. "#00FF00 has been succesfuly logined in" , g_Root, 0, 255, 0, 8 ) end )
  16. z24d

    GUIMESSAGES ?

    يعطيك العآفية لكن ياسفاح وش الأفضل هو ولا TopBarMessages من ناحية الإستعمال ؟
  17. آلسلام عليكم ورحمة الله وبركاتة معي هلكود أبيه يطلع للكل اذا خش احد أو طلع من السيرفر أو ماشابه وأبي رآبط رسايل الجيو مسج الي تطلع فوق لأن عندي المود بس يطلع تشويش مايطلع HD g_Root = getRootElement() addEventHandler('onPlayerJoin', g_Root, function() local joinedPlayerName = getPlayerName ( source ) exports ["guimessages"] : outputServer ( "#58ACFA*" .. joinedPlayerName .. "#58ACFA Has been joined" , 0, 255, 0 ) end ) addEventHandler('onPlayerChangeNick', g_Root, function(oldNick, newNick) local joinedPlayerName = getPlayerName ( source ) exports ["guimessages"] : outputServer ( "#FF6464*" .. oldNick .. "'#FF6464 Has changed his nick to ##FF6464'" .. newNick .. "'##FF6464", 0, 255, 0 ) end ) addEventHandler('onPlayerQuit', g_Root, function(reason) local QuitPlayerName = getPlayerName ( source ) exports ["guimessages"] : outputServer ( "#FF6464*" .. getPlayerName(source) .. ' Has been left the server'"" .. reason .. "" , 255, 255, 255 ) end ) addEventHandler('onPlayerLogin', g_Root, function() local LoginedPlayerName = getPlayerName ( source ) exports ["guimessages"] : outputServer ( "#00FF00*#0000FF" .. LoginedPlayerName .. "#00FF00 has been succesfuly logined in" , 0, 255, 0 ) end )
  18. z24d

    PRPLM

    يعطيكم العآفية يغلقق#
  19. z24d

    PRPLM

    ابي فنكشات العد التنازلي وابي فنكشات تحميل يمشي شوي ويروح
  20. z24d

    PRPLM

    أبي فنكش اذا خش الماركر يرسبنه بمكان عشوآئي وما يرسبن 2 بنفس المكان
  21. z24d

    PRPLM

    وضح ؟ = )) نفاثة غير سيارته ؟ بالنسبة للـ باند حق الديربي أنت ما تبيه يخش الماركر حق الديربي ؟ طيب استعمل سو قريد ليست وحط فيه اسم الاعب وسيرياله ويوم يختار الاعب واحد جيب السيريال ولاضغط الزر سو عليه داتا سيريال وقيمة ترو اذا فكيت الباند عنه حط القيمة نيل لا شيء = )) وبعدها بالديربي يوم يلمس الماركر سوي تحقق أن معاه الداتا وسو له كيل بيد = / guiGridListAddRow guiGridListGetItemText guiGridListGetSelectedItem getElementsByType -- player getPlayerName getPlayerSerial "onClientGUIClick" setSerialData -- Useful Functions getSerialData -- Useful Functions killPed الله يعطيك آلف عافيه ماقصرت
  22. z24d

    PRPLM

    لآ يعطيك العافيه بغيته لاخش الماركر حق المهمه يتحقق اذا هو مصكوك بان لمدة معينة او شيء كذآ فهمت كيف وشكرآ
×
×
  • Create New...