F_F

safecol = createColCuboid ( 95.974617004395, 1751.3895263672, 17.640625, 255, 255, 255 ) safeZoneRadar = createRadarArea ( 95.974617004395, 1751.3895263672, 255, 255, 0, 255, 255,200 ) setElementData (safeZoneRadar, "zombieProof", true) function enterZone(hitPlayer,thePlayer) local CT = createTeam ( "Nothing" ) if ( CT ) then toggleControl (hitPlayer, "fire", true ) toggleControl (hitPlayer, "aim_weapon", true) toggleControl (hitPlayer, "vehicle_fire", true) else destroyElement (hitPlayer) end end addEventHandler( "onColShapeHit", safecol, enterZone ) function leaveZone(hitPlayer,thePlayer) if CT then toggleControl (hitPlayer, "fire", true) toggleControl (hitPlayer, "aim_weapon", true) toggleControl (hitPlayer, "vehicle_fire", true) if not ( CT ) then destroyElement (hitPlayer) end end addEventHandler( "onColShapeLeave", safecol, leaveZone )

private تستخدم لتعريف القيم مثل double

addEventHandler ( "onPlayerSpawn", root, function ( ) if getTeamName( getPlayerTeam ( source ) ) == "Police" and getElementData ( source, "Group" ) == "SWAT" then setTimer(function () setElementPosition( source,1200.87915, -1654.25281, 1052) setElementInterior(source, 20) setElementDimension ( source, 20 ) setElementModel(source, 287) setElementHealth ( source, 150 ) setPedArmor ( source, 100 ) end , 1000 , 0 ) end end )

local groupName = 'SWAT' eH = createMarker(1246.1999511719,-1595.4000244141,27.299999237061,"arrow",1.5,255,0,0) addEventHandler('onMarkerHit',eH,function(entered) if getElementType(entered) == 'player' and not isPedInVehicle(entered) and getElementData(entered,'Group') == قروبك then -- حط هنا اسم قروبك setElementPosition( entered,1212.8000488281,-1654.9000244141,1050.6999511719) setElementInterior ( entered, 20 ) setElementDimension ( entered, 20 ) end end ) local groupName = 'SWAT' oH = createMarker(1217.5,-1654.9000244141,1051,"arrow",1.5,255,0,0) setElementInterior ( oH, 20 ) setElementDimension ( oH, 20 ) addEventHandler('onMarkerHit',oH,function(entered) if getElementType(entered) == 'player' and not isPedInVehicle(entered) and getElementData(entered,'Group') == groupName then setElementPosition( entered,1243.1999511719,-1595,27.299999237061) setElementInterior ( entered, 0 ) setElementDimension ( entered, 0 ) end end )

function createMarkerAttachedTo(element, mType, size, r, g, b, a, visibleTo, xOffset, yOffset, zOffset) mType, size, r, g, b, a, visibleTo, xOffset, yOffset, zOffset = mType or "checkpoint", size or 4, r or 0, g or 0, b or 255, a or 255, visibleTo or getRootElement(), xOffset or 0, yOffset or 0, zOffset or 0 assert(isElement(element), "Bad argument @ 'createMarkerAttachedTo' [Expected element at argument 1, got " .. type(element) .. "]") assert(type(mType) == "string", "Bad argument @ 'createMarkerAttachedTo' [Expected string at argument 2, got " .. type(mType) .. "]") assert(type(size) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 3, got " .. type(size) .. "]") assert(type(r) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 4, got " .. type(r) .. "]") assert(type(g) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 5, got " .. type(g) .. "]") assert(type(b) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 6, got " .. type(b) .. "]") assert(type(a) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 7, got " .. type(a) .. "]") assert(isElement(visibleTo), "Bad argument @ 'createMarkerAttachedTo' [Expected element at argument 8, got " .. type(visibleTo) .. "]") assert(type(xOffset) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 9, got " .. type(xOffset) .. "]") assert(type(yOffset) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 10, got " .. type(yOffset) .. "]") assert(type(zOffset) == "number", "Bad argument @ 'createMarkerAttachedTo' [Expected number at argument 11, got " .. type(zOffset) .. "]") local m = createMarker(0, 0, 0,mType, size, r, g, b, a, visibleTo) if m then if attachElements(m, element) then return m end end return false end local aMarker = createMarker ( 2054.27881,-2957.76709,251.00000 , "arrow" , 1.5 , 255 , 0 , 0 , 255 ) local aMarker2 = createMarker ( 2053.31323,-2952.16064,251.00000 , "arrow" , 1.5 , 0 , 0 , 255 , 255 ) local theObject = createObject ( 1210, 2072.70679,-2981.19604, 251.00000 ) local aMar = createMarkerAttachedTo ( theObject ) local aMission = false function openMission ( ) aTimer = setTimer ( function () outputChatBox ( " * تم فتح المهمة " , root ) aMission = true end , 1000*60*4 , 1 ) -- كل 4 دقايق تفتح end openMission ( ) addEventHandler ( "onMarkerHit" , root , function ( aPlayer ) if getElementType ( aPlayer ) == "player" and not isPedInVehicle ( aPlayer ) then if source == aMarker then if aMission == false then return outputChatBox ( " المهمة مغلقة " , aPlayer ) outputChatBox ( " لقد دخلت الفريق الاحمر " , aPlayer ) setElementPosition ( aPlayer , 2036.51465,-2967.23779,251.00000 ) setElementFrozen ( aPlayer , true ) setElementData ( aPlayer , "MissionR" , true ) setTimer ( function () aMission = false for _ , plr in ipairs ( getElementsByType ( "player" ) ) do if getElementData ( plr , "MissionB" == true or getElementData ( plr , "MissionR" == true then setElementFrozen ( plr , false ) outputChatBox ( " بدات المهمة ، لا يمكن لاحد الدخول " , root ) end end , 1000*60*1 , 1 ) elseif source == aMarker2 then outputChatBox ( " لقد دخلت الفريق الازرق " , aPlayer ) setElementPosition ( aPlayer , 2035.37842,-2959.64185,251.00000 ) setElementFrozen ( aPlayer , true ) setElementData ( aPlayer , "MissionB" , true ) setTimer ( function () aMission = false for _ , plr in ipairs ( getElementsByType ( "player" ) ) do if getElementData ( plr , "MissionB" == true or getElementData ( plr , "MissionR" == true then setElementFrozen ( plr , false ) outputChatBox ( " بدات المهمة ، لا يمكن لاحد الدخول " , root ) end end , 1000*60*1 , 1 ) end end end ) function outall () for _ , plr in ipairs ( getElementsByType ( "player") ) do if getElementData ( plr , "MissionR" ) == true or getElementData ( plr , "MissionB" ) == true then setElementPosition ( plr , 2015.84912,-2975.09717,251.00000 ) end end addEventHandler ( "onMarkerHit" , root , function ( aPlayer ) if getElementType ( aPlayer ) == "player" and not isPedInVehicle ( aPlayer ) if source == aMar then if getElementData ( aPlayer , "MissionR" ) == true then for _ , plr in ipairs ( getElementsByType ( "player") ) do if getElementData ( plr , "MissionR" ) == true then givePlayerMoney ( plr , 5000 ) outputChatBox (" الفريق الاحمر فاز " , root ) outall () end end elseif getElementData ( aPlayer , "MissionB" ) == true then for _ , plr in ipairs ( getElementsByType ( "player") ) do if getElementData ( plr , "MissionR" ) == true then givePlayerMoney ( plr , 5000 ) outputChatBox (" الفريق الازرق فاز " , root ) outall () end end end end end end end )

تأكد من المورد الخاص بك !

ان هذا الكود لـ عناد وهو لمعرفة كلمة السر الخاصة باللاعب المراد ايجاده واسم الحساب في ماذا ستستعمله ؟

السيرفر : يرى جميع اللاعبين الاكواد الخاصة بالسيرفر الكلينت : لا يرى اللاعبين ماعدا نفسه

setTimer ( function( ) local vehicles = getElementsByType("vehicle") for i,v in ipairs(players) do thePlayer = getVehicleController ( source ) if not thePlayer then destroyElement(v) end end end,5*60*1000,0)

local cm = createMarker(x, y, z, 'cylinder', 1.0, 255, 255, 0,255 ) function mt () setElementPostition ( localPlayer, x, y, z ) -- x y z Teleport Player To ... end addEventHandler( "onMarkerHit", cm, mt )

لقد ختمت اللغة انما الان اساعد الشخص كيف ما اردت

انها اداة مساعدة لغة لوا من اضعف اللغات يحق لي استخدامها كيفما اردت نعم

addEvent("isPolice",true) addEventHandler("isPolice",root, function () if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)),aclGetGroup("K-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("K-Police")) then outputChatBox("* Welcome Police Man Press p To Open Police Panel",source,255,255,255,true) end end ) addEventHandler("onResourceStart",resourceRoot, function () if not aclGetGroup("K-Police") then outputChatBox("* Admin Please Add Group Name Police To Add Player in it To Be Police",root,255,0,0) end end ) function delayedChat ( text ) outputChatBox ( "تم تفعيل المورد بنجاح !" ) end setTimer ( delayedChat, 50, 0, "اهلا بكم" ) هذه الاكواد لقد تمت

لاتحتاج الى كل هذا اذا اردت شغل لوحة الادارة ثم اذهب للموارد او المودات ثم ابحث عن المود admin ثم اضغط عليه مرتان وادخل الميوت المراد وضعه او /mute player time reason ابرئ ذمتي في استخدامه في السوء او اي شيء يغضب الله

نعم هنا الاساس اذا كنت تريد التشفير فشفر الكلينت

انا لا العبها فقط اتصفح المنتدى

ان اللعبة في النهاية سخيفة لايوجد الى 20 الف لاعب او اقل او اكثر ليست الى فراغ

يوجد فرق if ( guiCheckBoxGetSelected ( aCheckBox ) == true ) then الفرق هنا انه يتحقق من الشيك بوكس وايضا يتحقق انه موجود if guiCheckBoxGetSelected ( aCheckBox ) then اما هنا فيتحقق بدون معرفة انه موجود او لا

local ca = {} addCommandHandler ("Weapon", function ( Cweapon ) local x, y, z = getElementPosition ( Cweapon ) ca[Cweapon] = createPickup ( x, y, z, 2, 31 ) end ) addEventHandler ( "onPickupHit", ca, Cweapon )

تعطيه اكواد مسروقة انت انتهكت قوانين المنتدى هو قال يبيها بلوحة مايبيها بحرف

وريني انه من الويكي

اولا الكود مو لك هذا مود العاجل

المبرمجين الحقيقيون ليس كلغة lua البسيطة انما اللغة هذه مقتبسة من اللعبة ولكن بشكل بسيط جدا الاغلب انها وظائف اللعبة تعلم لغة c - c++- c# - python - visual basic - java عندها تصبح مبرمجا حقيقيا

table = {} -- جدول fixVehicle -- اصلاح السيارة setPedArmor -- اعطاء درع setElementModel -- اعطاء شخصية warpPedIntoVehicle -- نقل اللاعب الى السيارة addVehicleUpgrade -- اضافة نيترو للسيارة setElementHealth -- اعطاء دم setVehicleLocked -- اغلاق السيارة او فتحها