iMr5YaLeY
-
Posts
39 -
Joined
-
Last visited
Posts posted by iMr5YaLeY
-
-
السلام عليكم ورحمة الله وبركاته اما بعد
يا ليت لو تزينولي ها الكود
ابي اخليه لقروب محدد
+
يوم ياخذ سياره يقوله انك خذيت سياره بس المشكله تطلع لكل الي في السيرفر ابي تطلع له لحاله
server.lua
markers = { {220.6918182373,1919.1173095703,17.640625}, {190.79113769531,1919.2520751953,17.640625}, --{ x, y, z }, } for i,v in ipairs (markers) do marker = createMarker(v[1], v[2], v[3], "cylinder", get("markerSize"), get("markerColorR"), get("markerColorG"), get("markerColorB"), get("markerAlpha")) blip = createBlip ( v[1] , v[2] , v[3] , get("blipIconID") ) end veh = {} addEvent ("getCar", true) addEventHandler ("getCar", getRootElement(), function(car) if veh[source] and isElement( veh[source] ) then destroyElement( veh[source] ) veh[source] = nil end local carID = getVehicleModelFromName (car) local x,y,z = getElementPosition(source) local carName = getVehicleNameFromModel (carID) veh[source] = createVehicle(carID, x,y,z) setVehicleColor(veh[source], 255, 255, 255) warpPedIntoVehicle(source, veh[source]) outputChatBox ( "* #FF5A5ACreated #ffffff"..carName.." #FF5A5Awas successful!",player,255,90,90,true) end ) addEventHandler ( "onPlayerQuit", getRootElement(), function () if veh[source] and isElement( veh[source] ) then destroyElement( veh[source] ) veh[source] = nil end end) function markerHit (hitPlayer, matchingDimension) if isPedInVehicle (hitPlayer) then return end if getElementType(hitPlayer) == "player" then triggerClientEvent ("openMean", hitPlayer) end end addEventHandler ("onMarkerHit", resourceRoot, markerHit) function markerLeave (hitPlayer, matchingDimension) if getElementType(hitPlayer) == "player" then triggerClientEvent ("closeOpenMean", hitPlayer) end end addEventHandler ("onMarkerLeave", resourceRoot, markerLeave)
Window.lua
GUIEditor = { gridlist = {}, window = {}, button = {} } cars = { {523}, {463}, {509}, {481}, {510}, {470}, --{carID}, } local l, w = guiGetScreenSize() GUIEditor.window[1] = guiCreateWindow((l - 144) / 2, (w - 353) / 2, 144, 353, "Window", false) guiWindowSetSizable(GUIEditor.window[1], false) guiSetVisible(GUIEditor.window[1],false) guiSetAlpha(GUIEditor.window[1], 1.00) guiSetProperty(GUIEditor.window[1], "CaptionColour", "FFFF5A5A") GUIEditor.gridlist[1] = guiCreateGridList(9, 24, 126, 265, false, GUIEditor.window[1]) guiGridListAddColumn(GUIEditor.gridlist[1], "#", 0.3) guiGridListAddColumn(GUIEditor.gridlist[1], "Vehicle", 0.9) GUIEditor.button[1] = guiCreateButton(9, 295, 126, 22, "get", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFFF5A5A") guiSetFont(GUIEditor.button[1], "default-bold-small") GUIEditor.button[2] = guiCreateButton(9, 321, 126, 22, "close", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFB50000") guiSetFont(GUIEditor.button[2], "default-bold-small") for i,v in ipairs (cars) do local carName = getVehicleNameFromModel (v[1]) local row = guiGridListAddRow (GUIEditor.gridlist[1]) guiGridListSetItemText (GUIEditor.gridlist[1], row, 1, i.."-", false, true) guiGridListSetItemText (GUIEditor.gridlist[1], row, 2, carName, false, true) guiGridListSetItemColor(GUIEditor.gridlist[1], row, 1, 255, 90, 90, 255) end addEvent ("openMean", true) function openMean () if (getLocalPlayer() == source) then guiSetVisible(GUIEditor.window[1],true) showCursor(true) end end addEventHandler ("openMean", getRootElement(), openMean) addEvent ("closeOpenMean", true) function closeOpenMean () if (getLocalPlayer() == source) then guiSetVisible(GUIEditor.window[1],false) showCursor(false) end end addEventHandler ("closeOpenMean", getRootElement(), closeOpenMean) addEventHandler ("onClientGUIClick", GUIEditor.button[2], function (button, state, absoluteX, absoluteYe) guiSetVisible(GUIEditor.window[1],false) showCursor(false) end) function trigger () if (guiGridListGetSelectedItem (GUIEditor.gridlist[1])) then local car = guiGridListGetItemText (GUIEditor.gridlist[1], guiGridListGetSelectedItem (GUIEditor.gridlist[1]), 2) if car == "" or car == nil then outputChatBox( "please selected car from list.",255,90,90,true ) return end triggerServerEvent ("getCar", getLocalPlayer(), car) guiSetVisible(GUIEditor.window[1],false) showCursor(false) end end addEventHandler ("onClientGUIClick", GUIEditor.button[1], function (button, state, absoluteX, absoluteYe) trigger(getLocalPlayer()) end) addEventHandler ("onClientGUIDoubleClick", GUIEditor.gridlist[1], function (button, state, absoluteX, absoluteYe) trigger(getLocalPlayer()) end)
-
فيه مواضيع كثيره مرة شوفها وخذ منها
-
(5,9), 13.140625, 180, 287, 0, 0) الشخصية
انا حذفت
287,
وسويت انتر وضفت
local Skins = { 287, 285 , 283 }
rs = Skins [math.random(#Skins)]
صح ولا خطا ؟
واذا خطا عدلي على الكود لو ما عليك امر
-
addEventHandler("onResourceStart", resourceRoot, function() resetMapInfo() for i,player in ipairs(getElementsByType("player")) do spawn(player) end end ) function spawn(player) if not isElement(player) then return end repeat until spawnPlayer ( player, 214.24290466309+math.random(1,5), 1866.6018066406+math.random(5,9), 13.140625, 180, 0, 0) local Skins = { 287, 285 , 283 } rs = Skins [math.random(#Skins)] fadeCamera(player, true) setCameraTarget(player, player) showChat(player, true) end addEventHandler("onPlayerJoin", root, function() spawn(source) end ) addEventHandler("onPlayerWasted", root, function() setTimer(spawn, 1800, 1, source) end )
كذا ؟
-
السلام عليكم ورحمة الله وبركاته
حاولت اني اخلي ملف البلاي عندما اثبت الشخصية يكون الشخصية عشوائيه مثلا
انا ثبتت البلاي على شخصية
287
راح تتثبت على الشخصيه هذي بس انا حاولت اني اخليها تثبت الشخصية على اكثر من 1
مثلا
اثبت الشخصية على
287
و
285
بس ما قدرت دورت بلويكي وتعبت وقل انشاء الله يفرجة المنتدى
مود البلاي حقي القديم الي يدعم تثبيت الشخصية
play:
addEventHandler("onResourceStart", resourceRoot, function() resetMapInfo() for i,player in ipairs(getElementsByType("player")) do spawn(player) end end ) function spawn(player) if not isElement(player) then return end repeat until spawnPlayer ( player, 214.24290466309+math.random(1,5), 1866.6018066406+math.random(5,9), 13.140625, 180, 287, 0, 0) الشخصية fadeCamera(player, true) setCameraTarget(player, player) showChat(player, true) end addEventHandler("onPlayerJoin", root, function() spawn(source) end ) addEventHandler("onPlayerWasted", root, function() setTimer(spawn, 1800, 1, source) end )
-
السلام عليكم ورحمة الله وبركاته اما بعد
يا شباب
تكفون ابي لوحه ادمن محميه + في الاسل رمز
لا احد يقول خلها على سريالك و مدري وش و اتمنى ان تجي
لو ممكن
-
-
-
local myMarker = createMarker(-2596.625, 579.358, 15.626, 'cylinder', 2.0, 255, 0, 0, 150) function MarkerHit( hitElement, matchingDimension ) local elementType = getElementType( hitElement ) -- outputChatBox( elementType.." inside myMarker", getRootElement(), 255, 255, 0 ) end addEventHandler( "onMarkerHit", myMarker, MarkerHit ) function onPlayerTarget ( targetElem ) if getElementType ( targetElem ) == "object" and getElementModel ( targetElem ) == 3374 then destroyElement ( targetElem ) end end addEventHandler ( "onPlayerTarget", getRootElement(), onPlayerTarget ) function consoleSetPlayerPosition ( source, commandName, posX, posY, posZ ) setElementPosition ( source, posX, posY, posZ ) end addCommandHandler ( "setpos", consoleSetPlayerPosition )
كذا صح
واذا غلط با لله صلحولي
-
-
-
اضيفه عليه و لا استبدله ؟
-
السلامم عليكم ورحمةة الله
لو ممكن تخلونلي هال الكود
ما يركب السياره الاا الي لفلة 5
مود الافل
setTimer(flucht_stop_func,5000,-1) function enterVeh ( player,seat) if seat == 0 then local lvl = getElementData(player,"Level") if lvl >= 5 then else removePedFromVehicle(player) outputChatBox("You can only level 5 driving",player,125,0,0) end end end addEventHandler("onVehicleEnter",getRootElement(),enterVeh) function onDeathmatchStart () local time = getRealTime() local hours = time.hour local minutes = time.minute setTime(hours,minutes) end addEventHandler("onResourceStart",getResourceRootElement(getThisResource()),onDeathmatchStart) function setData_func ( player, data, value ) if player then setElementData(player,data,value) local acc = getPlayerAccount(player) if not isGuestAccount(acc) then setElementData(acc,data,value) end end end addEvent("setData",true) addEventHandler("setData",getRootElement(),setData_func)
-
-
مشكور و اقدر تعبككك
لاكن كلهم ماقدر اخليه يعني يكرب السياره يكون لفله 5
اتمنى انكم تساعدوني
-
طيب
اسف ولكن
انشا الله اخر مره
اعطوني مود الفل الشغال مود العقرب جربته ما يشتغل
با الله
ضبطوه و ارسلوه لي اذا معليكم امر
-
طيب هو نزل باك اب يعني عادي
لو ما يبي كان ما نزل
افف
-
اصلن انا ركبه لي سيرفري الزومبي ذذ
صاحب الباك اب صيقي وقالي خذه استاذنت منه
-
انا قلت
انا صنعته ؟ ؟ ؟
ادري انه باك اب من اليويتوب بعد
--------------------------------------------
الفكنشات الي عطيتوني اياها استخدمتها كلها ما ضبطت
لو ممكن تعطوني الكود المعدل عليهه
-
-
السلامم عليكم
ورحمة الله وبركاته
الزبده
انا عندي مود الفل
و ابي اخليه يعني
الي يبي يركب سياره يكون لفله
5
لو ممكن
الكود
حق الفل الي معي
الكود الاول
level_server
local ExpRewardForKill = {1, 8} local levels = {} addEventHandler ( "onResourceStart", resourceRoot, function ( ) connection = dbConnect( "sqlite", "levels.db" ) --exports["scoreboard"]:scoreboardAddColumn ( "level", root, 90, "Player's Level") if ( connection )then dbExec ( connection, "CREATE TABLE IF NOT EXISTS levels (levelID INTEGER PRIMARY KEY NOT NULL, accountName TEXT, level INT, experience INT)" ) outputDebugString ( "Successfully connected to levels.db" ) else outputDebugString ( "Failed to connect to levels.db", 3 ) end local LivelsFile = xmlLoadFile ( "levels.xml" ) if ( LivelsFile ) then outputDebugString ( "levels.xml successfully open") for index, levelData in ipairs ( xmlNodeGetChildren ( LivelsFile ) ) do local levelAttributes = xmlNodeGetAttributes ( levelData ) table.insert(levels, { ["levelName"] = levelAttributes.levelName, ["experienceRequired"] = tonumber(levelAttributes.experienceRequired), ["moneyReward"] = tonumber(levelAttributes.moneyReward)}) end else outputDebugString ( "Failed to open to levels.xml", 1 ) end end ) --[[ addCommandHandler ( "level", function ( thePlayer ) removeElementData(thePlayer,"experience") removeElementData(thePlayer,"level") end ) ]] addEventHandler("onResourceStop",resourceRoot, function ( ) if isElement ( connection ) then setTimer(destroyElement, 1000, 1, connection ) end end ) addEventHandler("onResourceStop",resourceRoot, function () for index, player in ipairs(getElementsByType("player")) do local experience = tonumber(getElementData(player,"experience")) or 0 setPlayerExperience(player, experience) local PlayerLevel = tonumber(getElementData(player,"level")) or 1 setPlayerLevel(player, PlayerLevel) end end) function saveExpOnQuitOrLogout(account) local experience = tonumber(getElementData(source,"experience")) or 0 local PlayerLevel = tonumber(getElementData(source,"level")) or 1 if (experience) then if (account and account == "userdata") then setPlayerExperience(account, experience) setPlayerLevel(account, PlayerLevel) else setPlayerExperience(source, experience) setPlayerLevel(source, PlayerLevel) end end setElementData(source,"experience",0) end addEventHandler("onPlayerLogout",root,saveExpOnQuitOrLogout) addEventHandler("onPlayerQuit",root,saveExpOnQuitOrLogout) function CheckLevelFromExp(dataName) if (source and getElementType(source) == "player" and dataName == "experience") then local SourceLevel = tonumber( getElementData(source,"level") ) local SourceExp = tonumber( getElementData(source,"experience") ) local NewLvl = SourceLevel+1 if ( levels[sourceLevel] ) then if ( levels[NewLvl]) then local RequiredExp = tonumber( levels[sourceLevel]["experienceRequired"] ) if ( SourceExp >= RequiredExp ) then setElementData(source,"experience_n", tonumber(levels[NewLvl]["experienceRequired"])) setElementData(source,"level",NewLvl) setTimer(setElementData, 50, 1, source,"experience",0) givePlayerMoney(source,tonumber(levels[NewLvl].moneyReward)) triggerClientEvent ( source, "LevelUpEffect", source ) outputChatBox("*LEVEL UP* You're now level ".. tostring(NewLvl) .."! Congratulations.",source,0,255,0) end end end end end addEventHandler("onElementDataChange",root,CheckLevelFromExp) function OnZombieKill (killer) if (killer and killer ~= source) then if getPlayerAccount(killer) then local experience = tonumber(getElementData(killer,"experience")) local SourceLevel = getElementData(killer,"level") if ( not SourceLevel ) then SourceLevel = 1 setElementData(killer,"level",1) end if ( levels[sourceLevel+1] ) then local randomExperience = math.random(unpack(ExpRewardForKill)) if (experience) then setElementData(killer,"experience",experience+tonumber(randomExperience)) else setElementData(killer,"experience",randomExperience) end else setElementData(killer,"experience",tonumber(levels[sourceLevel]["experienceRequired"])) end end end end addEvent("onZombieWasted",true) addEventHandler ("onZombieWasted", root, OnZombieKill) addEventHandler("onPlayerLogin",root, function (_,account) local accountName = getAccountName(account) local handler = connection local query = dbQuery( handler, "SELECT accountName FROM levels WHERE accountName=?", tostring(accountName) ) local result, numrows, errmsg = dbPoll ( query, -1 ) if ( type( result ) == "table" and #result == 0 or not result ) then if dbExec( handler, "INSERT INTO `levels` (`levelID`, `accountName`, `level`, `experience`) VALUES (NULL, '".. accountName .."', '1', '0');") then setElementData(source, "experience", 0) setElementData(source, "experience_n", tonumber(levels[1].experienceRequired)) setElementData(source, "level", 1) end else local level = getPlayerLevel(source) setElementData(source, "experience", getPlayerExperience(source)) if (levels[level]) then setElementData(source, "experience_n", tonumber(levels[level].experienceRequired)) else setElementData(source, "experience_n", tonumber(levels[level -1].experienceRequired)) end setElementData(source, "level", level) end end) function getPlayerLevel(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT level FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["level"]) end end function setPlayerLevel(thePlayer, theLevel) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `level` = '" .. tonumber(theLevel) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end function getPlayerExperience(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT experience FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["experience"]) end end function setPlayerExperience(thePlayer, theExperience) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `experience` = '" .. tonumber(theExperience) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end
الكود الثاني
level_client
local sx, sy = guiGetScreenSize() function drawExperience() dxDrawRectangle((310/1024)*sx,(698/768)*sy,(481/1024)*sx,(36/768)*sy,tocolor(255,255,255,35),false) dxDrawRectangle((315/1024)*sx,(703/768)*sy,(472/1024)*sx,(26/768)*sy,tocolor(0,0,0,255),false) local experience = getElementData(localPlayer,"experience") or 0 local experience_n = getElementData(localPlayer,"experience_n") or 0 local level = getElementData(localPlayer,"level") or 1 local percent = (experience / experience_n * 100) if (percent >= 100) then percent = 100 elseif (experience_n < 1) then percent = 0 end dxDrawRectangle((320/1024)*sx,(706/768)*sy,(tonumber(percent)*4.64/1024)*sx,(20/768)*sy,tocolor(255,255,255,75),false) dxDrawBorderedText("Level: ".. tostring(level) .." | Experience Points: ".. tostring(experience) .." > ".. tostring(experience_n),(430/1024)*sx,(707/768)*sy,(667/1024)*sx,(724/768)*sy,tocolor(0,0,0,255),(sx/1024)*0.6,"bankgothic","center","center",false,false,false) end addEventHandler("onClientRender",root,drawExperience) function dxDrawBorderedText( text, x, y, w, h, color, scale, font, alignX, alignY, clip, wordBreak, postGUI ) dxDrawText ( text, x - 1, y - 1, w - 1, h - 1, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) -- black dxDrawText ( text, x + 1, y - 1, w + 1, h - 1, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x - 1, y + 1, w - 1, h + 1, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x + 1, y + 1, w + 1, h + 1, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x - 1, y, w - 1, h, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x + 1, y, w + 1, h, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x, y - 1, w, h - 1, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x, y + 1, w, h + 1, tocolor ( 255, 255, 255, 255 ), scale, font, alignX, alignY, clip, wordBreak, false ) dxDrawText ( text, x, y, w, h, color, scale, font, alignX, alignY, clip, wordBreak, postGUI ) end addEvent ( "LevelUpEffect", true ) addEventHandler ( "LevelUpEffect", root, function ( ) PlayerLevelUpSound() addEventHandler("onClientRender",root,DrawLevelUp) setTimer(function() removeEventHandler("onClientRender",root,DrawLevelUp) end, 4000, 1) end ) function PlayerLevelUpSound() local sound = playSound("levelup.mp3") setSoundVolume(sound, 1) end function DrawLevelUp() dxDrawBorderedText( "LEVEL UP!!!", sx/2, sy/15, sx/2, sx/2, tocolor(255,144,0,255),(sx/1024)*2.5,"bankgothic","center","center",false,false,false ) end
-
هههههههههه
لا خويي
-
هلا لو ممك نحتى انا ابيه للاو ممكن يكون جاهز
ما ابي اسويه لي انه اتوقع صعب
لوو ممكن يعني تتعطينى اياها كامل
-
طيب جيبو لي الرجال طلبه
محل الاسلحة [Masry]
in المساهمات
Posted
اولا يعطيك العافية ع المود ثآنيآ تآكذ من الرابط جزاك الله خير