Jump to content

momar5600

Members
  • Posts

    266
  • Joined

  • Last visited

Everything posted by momar5600

  1. انا اشتريت خادم بالموصفات ده 16 GB Memory / 160 GB Disk / NYC1 - Ubuntu 16.04.1 x64 الحين كيف اثبت لوحة عليها لان حاولت اثبتها ولما ادخل هنا دphpmyadmin يقول لي صفحةو غير متوفر وانا مثبتها ومش اسوي ماهو حل
  2. سلام عليكم ورحمة الله وبركاته انا عنبدي خادم ويندوز بس فيه مشكله انا طيقت شرح ده بس فيه مشكله عن تكتب اسوم مستخدم وكلمة مرور تبع يوزر يشتغل بس مشكله في قواعد بيانات ممعرف لها كلمة سر كيف اضلع كلمة سر قواعد بيانات انا كتبت كلمة من راسي تجي عند start server مفروض يدي قواعد ببيانات موقعد يشتغل لا مايعضني غير كلام ومعه كلمة ايرو و ثواعد بيانات ويقعد يتكررر وش حلها يعني يجي كذا كما بالصور
  3. اوفففف مود مو شغال انا ركبت علي الماب وركبت الاحداثيات سيارات انا لما اكتب سباق ينقلني ويعضيني سييارة بس مفروض اني ماقدر اتحرك غير لما يبدا سباق بس اول مادخل اقدر امشي وبعدين ماركات تختفي ولما اوصل لخط النهاية مش بفوز واضل في سباق سباق ماينتهي انت خد وجرب مود بنفسك http://up.top4top.net/downloadf-196dn101-zip.html
  4. اوك شكرا لك والله انك كفو بس ابي منك طلب اخير لو ماتبي براحتك ابي يلي يفوز يجي بشات للجميع اسم يلي فاز وربح 5000
  5. اخويا انا اسف تعبتك معي بس باقي اخر شي انا ابية لما يشتغل سباق يجي بشات لدخول لسباق سيارات اكتبب سباق و ويحصل فائز علي فلوس ويجي بشات مني يلي فاز واخذ كام فلوس وماتقدر تكتب سباق غير لما يشتغل سباق يعني مثل كود ده تبع ديربي spawns = {} setElementData(resourceRoot,"map","no") setElementData(resourceRoot,"winMoney","0") addEventHandler("onPlayerChat",getRootElement(),function(message) if tostring(message) == "ديربي" and checkDuel(source) == "prestart" and ( not checkExistPlrOnDuel(source) ) then online = countPlayersOnDerby() if tonumber(online)+1 < 32 then setData(source,"onCrossMap","yes") outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD} :الرجاء الانتظار ..",source,255,255,0,true) setD(source) spawnOnMap(source) else outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD) : لم يبق مكان بالديـربي الرجآء, الانتظآر الديربي القآدم,",source,0,255,0,true) end end end) function checkDuel(p) if tostring(getElementData(resourceRoot,"map")) == "yes" then outputChatBox("* #ff0000≈ #ffffff[#ff0000 DerbySystem #ffffff ] #00BCCD≈",p,255,255,0,true) elseif tostring(getElementData(resourceRoot,"map")) == "no" then outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD) : الرجآء الانتظآر,حتى يبدء الديربي",p,255,255,0,true) end return tostring(getElementData(resourceRoot,"map")) end function checkExistPlrOnDuel(p) per = getElementData(p,"onCrossMap") if tostring(per) == "yes" then return true else return false end end function setData(element,key,vlr) setElementData(element,key,vlr) end function setD(element) setElementDimension(element,30) end function spawnOnMap(p) count = countPlayersOnDerby() spawned = "no" for i,data in pairs(spawns)do if tonumber(data.id) == tonumber(count) then spawned = "yes" v = createVehicle(411,data.x,data.y,data.z,data.rx,data.ry,data.rz) setElementDimension(v,30) setElementFrozen(v,true) setElementData(v,"creatorDerby","yes") break end end if spawned == "no" then randomS = math.random("1","32") for i,data in pairs(spawns)do if tonumber(data.id) == tonumber(randomS) then v = createVehicle(411,data.x,data.y,data.z,data.rx,data.ry,data.rz) setElementDimension(v,30) setElementFrozen(v,true) setElementData(v,"creatorDerby","yes") break end end end toggleControl(p,"enter_exit", false ) warpPedIntoVehicle(p,v) setCameraTarget(p,p) end function countPlayersOnDerby() c = -1 for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then c = c+1 end end return tonumber(c) end function eventCheck () if checkExistPlrOnDuel(source) then toggleControl(source,"enter_exit",true ) setData(source,"onCrossMap","no") checkEnd() end end addEventHandler("onPlayerWasted",getRootElement(),eventCheck) addEventHandler("onPlayerQuit",getRootElement(),eventCheck) addEventHandler("onPlayerJoin",getRootElement(),function() outputChatBox("",source,255,255,0,true) setData(source,"onCrossMap","no") end) for i,p in pairs(getElementsByType("player"))do setData(p,"onCrossMap","no") end function checkEnd() c = 0 for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then c = c+1 winner = p end end if tonumber(c) == 1 then givePlayerMoney(winner,tonumber(getElementData(resourceRoot,"winMoney"))) n = string.gsub(getPlayerName(winner), "#%x%x%x%x%x%x", "") outputChatBox("* #ff0000≈[ #ff0000 " .. n .. " #FF9700 Won the Derby and win#00FF00 " .. tonumber(getElementData(resourceRoot,"winMoney")) .. "$ ##ff0000]≈",getRootElement(),255,255,0,true) setElementData(resourceRoot,"map","no") endDerby() setTimer(newDuel,30000,1) end end function newDuel() for i,p in pairs(getElementsByType("player"))do setData(p,"onCrossMap","no") end setElementData(resourceRoot,"map","prestart") outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD) : لدخول الديربي,اكتب في الشـآت ديربي.",getRootElement(),255,255,0,true) RMoney = math.random("50000","300000") setElementData(resourceRoot,"winMoney",tonumber(RMoney)) outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD) : سيحصل الفآئز في الديربي على #00FF00|" .. RMoney .. "|$",getRootElement(),0,255,0,true) setTimer(checkPlrs,30000,1) end function checkPlrs () c = 0 for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then c = c+1 end end if tonumber(c) > 1 then setElementData(resourceRoot,"map","yes") for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then setElementCollisionsEnabled(getPedOccupiedVehicle(p),true) outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD) : لقد بدآء الديربي , يمكنك الانطلاق",p,0,255,0,true) setElementFrozen(getPedOccupiedVehicle(p),false) end end else endDerby() setElementData(resourceRoot,"map","no") outputChatBox("* #00BCCD≈ - ( #555555Derby #00BCCD) : لم يبدآء الديربي, لعدم توفر الاعبين",getRootElement(),255,255,0,true) setTimer(newDuel,60000,1) end end setTimer(newDuel,3000,1) function onStartLoadSpawns () file = fileOpen("map.map") localFile = fileOpen("map.xml") fileWrite(localFile,"") data = fileRead(file,999999) fileWrite(localFile,data) fileClose(localFile) xml = xmlLoadFile("map.xml") c = 0 for i,data in pairs(xmlNodeGetChildren(xml)) do if xmlNodeGetName(data) == "spawnpoint" then c = c+1 v,xx,yy,zz,rxx,ryy,rzz = xmlNodeGetAttribute(data,"vehicle"),xmlNodeGetAttribute(data,"posX"),xmlNodeGetAttribute(data,"posY"),xmlNodeGetAttribute(data,"posZ"),xmlNodeGetAttribute(data,"rotX"),xmlNodeGetAttribute(data,"rotY"),xmlNodeGetAttribute(data,"rotZ") table.insert(spawns,{id = c,model = v,x = xx,y = yy,z = zz,rx = rxx,ry = ryy,rz = rzz}) end end for i,data in pairs(xmlNodeGetChildren(xml)) do if xmlNodeGetName(data) == "object" then m,xx,yy,zz,rxx,ryy,rzz = xmlNodeGetAttribute(data,"model"),xmlNodeGetAttribute(data,"posX"),xmlNodeGetAttribute(data,"posY"),xmlNodeGetAttribute(data,"posZ"),xmlNodeGetAttribute(data,"rotX"),xmlNodeGetAttribute(data,"rotY"),xmlNodeGetAttribute(data,"rotZ") object = createObject(m,xx,yy,zz,rxx,ryy,rzz) setElementDimension(object,30) end end end setTimer(onStartLoadSpawns,3000,1) function endDerby() for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then killPed(p) end end for i,v in pairs(getElementsByType("vehicle"))do if getElementData(v,"creatorDerby") then destroyElement(v) end end end setTimer(function() for i,p in pairs(getElementsByType("player"))do sea(p) resetHan(p) checkVeh(p) checkModel(p) end end,1000,0) outputChatBox("",getRootElement(),255,255,0,true) function sea(p) if checkExistPlrOnDuel(p) then x,y,z = getElementPosition(p) if tonumber(z) <= 0 then killPed(p) end end end function checkVeh(p) if (tonumber(getElementDimension(p)) == 30) and not (isPedInVehicle(p))then killPed(p) end end function resetHan(p) if checkExistPlrOnDuel(p) then setVehicleHandling (getPedOccupiedVehicle(p), true ) end end function checkModel(p) if checkExistPlrOnDuel(p) and isPedInVehicle(p) then if tonumber(getElementModel(getPedOccupiedVehicle(p))) ~= 411 then killPed(p) end end end انا حاولت ابدل ماب سباق بدل ماب ديربي وحطيت اسم ماب سباق كذا map.map بس حصلت مشكلة انه لما تكتب ديربي ينقلك للماب بس لما تروح للماب مابركبك سيارة وتموت وتطلع برا ديربي تكتب مرة ثانية يدخلك ويحصل نفس شي والخ الحين لو تقدر تضيق بكود تبعك كلام يلي يظهر بشات مثل ديربي ضيف لو تقدر تعدليي علي كود ديربي تشوف ايش مشكلت انك تننتقل للماب بس تموت شوف سوي اي شي انا ابي اسوي سباق سيارات وشكرا لكم جميعا علي مساعدتي
  6. ايه يروحون بس انا ابي اسوي مود سباق سيارات يعني مثل ديربي لما تكتب ديربي يعضيك سيارة وينقلك للمكان بداية والي يوصل للنهاية هو يلي فاز ويحصل علي مال فاهمني ابيه كذا بس ده يلي ابية انا
  7. انا حملت من نت ماب ريسي تبع سباق سيارات الحين لما افتح اشغل عمل ماب وافتح ماب يظهر لي ماركات متصلين بي بعض مثل ده الحين وش مطلوب مني لكي اسوي مود سباق سيارات
  8. اخويا زومبي مايطلع مش شايف زومبي انا شغلت مود بس مو لاقي زومبي زومبي مايطلع وفي تحت يخبرني عدد زومبي يلي يضلع بس ديما 0 وحد لما ماسويت تعديل بالمود الاصلي بردو ماضلع ليه مايبي يضلع
  9. رابط تحميل مود https://community.multitheftauto.com/index.php?p ... ils&id=347 انا حملت اخر اصدار 3.0.1 هاد ملف سيرفر ZombieLimit = get("zombies.MaxZombies")-- HOW MANY ZOMBIES SHOULD EXIST AT MAXIMUM? ZombieStreaming = get("zombies.StreamMethod") -- 1 to constantly stream zombies, 0 to only allow zombies to spawn via createZombie function, 2 to only allow spawning at set spawnpoints ZombiePedSkins = {13,22,56,67,68,69,70,92,97,105,107,108,126,127,128,152,162,167,188,195,206,209,212,229,230,258,264,277,280,287 } --ALTERNATE SKIN LISTS FOR ZOMBIES (SHORTER LIST IS TEXTURED ZOMBIES ONLY) --ZombiePedSkins = {7,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,43,44,45,36,37,38,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,66,67,68,69,70,71,72,73,75,76,77,78,79,80,81,82,83,85,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,112,113,114,115,116,117,118,120,121,122,123,124,125,126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148,150,151,152,153,154,155,156,157,158,159,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,209,210,211,212,213,214,215,216,217,218,219,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255,256,257,258,259,260,261,262,263,264,275,276,277,278,279,280,281,282,283,284,285,286,287,288 } ZombieSpeed = get("zombies.Speed") if ZombieSpeed == 0 then --super slow zombies (goofy looking) chaseanim = "WALK_drunk" checkspeed = 2000 elseif ZombieSpeed == 1 then -- normal speed chaseanim = "run_old" checkspeed = 1000 elseif ZombieSpeed == 2 then -- rocket zombies (possibly stressful on server) chaseanim = "Run_Wuzi" checkspeed = 680 else -- defaults back to normal chaseanim = "run_old" checkspeed = 1000 end resourceRoot = getResourceRootElement() moancount =0 moanlimit = 10 everyZombie = { } --IDLE BEHAVIOUR OF A ZOMBIE function Zomb_Idle (ped) if isElement(ped) then if ( getElementData ( ped, "status" ) == "idle" ) and ( isPedDead ( ped ) == false ) and (getElementData (ped, "zombie") == true) then local action = math.random( 1, 6 ) if action < 4 then -- walk a random direction local rdmangle = math.random( 1, 359 ) setPedRotation( ped, rdmangle ) setPedAnimation ( ped, "PED", "Player_Sneak", -1, true, true, true) setTimer ( Zomb_Idle, 7000, 1, ped ) elseif action == 4 then -- get on the ground setPedAnimation ( ped, "MEDIC", "cpr", -1, false, true, true) setTimer ( Zomb_Idle, 4000, 1, ped ) elseif action == 5 then -- stand still doing nothing setPedAnimation ( ped ) setTimer ( Zomb_Idle, 4000, 1, ped ) end end end end --BEHAVIOUR WHILE CHASING PLAYERS function Zomb_chase (ped, Zx, Zy, Zz ) if isElement(ped) then if (getElementData ( ped, "status" ) == "chasing") and (getElementData (ped, "zombie") == true) then local x, y, z = getElementPosition( ped ) if (getElementData ( ped, "target" ) == nil) and getElementData ( ped, "Tx" ) ~= false then local Px = getElementData ( ped, "Tx" ) local Py = getElementData ( ped, "Ty" ) local Pz = getElementData ( ped, "Tz" ) local Pdistance = (getDistanceBetweenPoints3D( Px, Py, Pz, x, y, z )) if (Pdistance < 1.5 ) then setTimer ( function (ped) if ( isElement ( ped ) ) then setElementData ( ped, "status", "idle" ) end end, 2000, 1, ped ) end end local distance = (getDistanceBetweenPoints3D( x, y, z, Zx, Zy, Zz )) if (distance < 1 ) then -- IF THE PED HASNT MOVED if (getElementData ( ped, "target" ) == nil) then local giveup = math.random( 1, 15 ) if giveup == 1 then setElementData ( ped, "status", "idle" ) else local action = math.random( 1, 2 ) if action == 1 then setPedAnimation ( ped ) triggerClientEvent ( "Zomb_Punch", getRootElement(), ped ) setTimer ( function (ped) if ( isElement ( ped ) ) then setPedAnimation ( ped, "ped", chaseanim, -1, true, true, true ) end end, 800, 1, ped ) setTimer ( Zomb_chase, 2000, 1, ped, x, y, z ) elseif action == 2 then setPedAnimation ( ped ) triggerClientEvent ( "Zomb_Jump", getRootElement(), ped ) setTimer ( Zomb_chase, 3500, 1, ped, x, y, z ) end end else local Ptarget = (getElementData ( ped, "target" )) if isElement(Ptarget) then local Px, Py, Pz = getElementPosition( Ptarget ) local Pdistance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz )) if (Pdistance < 1.2 ) then -- ATTACK A PLAYER IF THEY ARE CLOSE if ( isPedDead ( Ptarget ) ) then --EAT A DEAD PLAYER setPedAnimation ( ped ) setPedAnimation ( ped, "MEDIC", "cpr", -1, false, true, false) setTimer ( function (ped) if ( isElement ( ped ) ) then setElementData ( ped, "status", "idle" ) end end, 10000, 1, ped ) setTimer ( function (ped) if ( isElement ( ped ) ) then setPedRotation ( ped, getPedRotation(ped)-180) end end, 10000, 1, ped ) zmoan(ped) else local action = math.random( 1, 6 ) if action == 1 then setPedAnimation ( ped) triggerClientEvent ( "Zomb_Jump", getRootElement(), ped ) setTimer ( Zomb_chase, 2000, 1, ped, x, y, z ) else setPedAnimation ( ped) triggerClientEvent ( "Zomb_Punch", getRootElement(), ped ) setTimer ( function (ped) if ( isElement ( ped ) ) then setPedAnimation ( ped, "ped", chaseanim, -1, true, true, true ) end end, 800, 1, ped ) setTimer ( Zomb_chase, 2000, 1, ped, x, y, z ) end end else if ( isPedDead (Ptarget) ) then setTimer ( function (ped) if ( isElement ( ped ) ) then setElementData ( ped, "status", "idle" ) end end, 2000, 1, ped ) setTimer ( function (ped) if ( isElement ( ped ) ) then setPedRotation ( ped, getPedRotation(ped)-180) end end, 1800, 1, ped ) else local action = math.random( 1, 2 ) if action == 1 then setPedAnimation ( ped) triggerClientEvent ( "Zomb_Punch", getRootElement(), ped ) setTimer ( function (ped) if ( isElement ( ped ) ) then setPedAnimation ( ped, "ped", chaseanim, -1, true, true, true ) end end, 800, 1, ped ) setTimer ( Zomb_chase, 2000, 1, ped, x, y, z ) elseif action == 2 then setPedAnimation ( ped) triggerClientEvent ( "Zomb_Jump", getRootElement(), ped ) setTimer ( Zomb_chase, 2000, 1, ped, x, y, z ) end end end else setElementData ( ped, "status", "idle" ) end end else setPedAnimation ( ped, "ped", chaseanim, -1, true, true, true) --KEEP WALKING setTimer ( Zomb_chase, checkspeed, 1, ped, x, y, z ) --CHECK AGAIN end end end end --SET THE DIRECTION OF THE ZOMBIE function setangle () for theKey,ped in ipairs(everyZombie) do if isElement(ped) then if ( getElementData ( ped, "status" ) == "chasing" ) then local x local y local z local px local py local pz if ( getElementData ( ped, "target" ) ~= nil ) then local ptarget = getElementData ( ped, "target" ) if isElement(ptarget) then x, y, z = getElementPosition( ptarget ) px, py, pz = getElementPosition( ped ) else setElementData ( ped, "status", "idle" ) x, y, z = getElementPosition( ped ) px, py, pz = getElementPosition( ped ) end zombangle = ( 360 - math.deg ( math.atan2 ( ( x - px ), ( y - py ) ) ) ) % 360 --MAGIC SPELL TO MAKE PEDS LOOK AT YOU setPedRotation( ped, zombangle ) elseif ( getElementData ( ped, "target" ) == nil ) and (getElementData ( ped, "Tx" ) ~= false) then --IF THE PED IS AFTER THE PLAYERS LAST KNOWN WHEREABOUTS x = getElementData ( ped, "Tx" ) y = getElementData ( ped, "Ty" ) z = getElementData ( ped, "Tz" ) px, py, pz = getElementPosition( ped ) zombangle = ( 360 - math.deg ( math.atan2 ( ( x - px ), ( y - py ) ) ) ) % 360 --MAGIC SPELL TO MAKE PEDS LOOK AT YOU setPedRotation( ped, zombangle ) end end end end end --SETS THE ZOMBIE ACTIVITY WHEN STATUS CHANGES addEventHandler ( "onElementDataChange", getRootElement(), function ( dataName ) if getElementType ( source ) == "ped" and dataName == "status" then if (getElementData (source, "zombie") == true) then if ( isPedDead ( source ) == false ) then if (getElementData ( source, "status" ) == "chasing" ) then local Zx, Zy, Zz = getElementPosition( source ) setTimer ( Zomb_chase, 1000, 1, source, Zx, Zy, Zz ) local newtarget = (getElementData ( source, "target" )) if isElement (newtarget) then if getElementType ( newtarget ) == "player" then setElementSyncer ( source, newtarget ) end end zmoan(source) elseif (getElementData ( source, "status" ) == "idle" ) then setTimer ( Zomb_Idle, 1000, 1, source) elseif (getElementData ( source, "status" ) == "throatslashing" ) then local tx,ty,tz = getElementPosition( source ) local ptarget = getElementData ( source, "target" ) if isElement(ptarget) then local vx,vy,vz = getElementPosition( ptarget ) local zombdistance = (getDistanceBetweenPoints3D (tx, ty, tz, vx, vy, vz)) if (zombdistance < .-- s8) --> then zmoan(source) setPedAnimation ( source, "knife", "KILL_Knife_Player", -1, false, false, true) setPedAnimation ( ptarget, "knife", "KILL_Knife_Ped_Damage", -1, false, false, true) setTimer ( Playerthroatbitten, 2300, 1, ptarget, source) setTimer ( function (source) if ( isElement ( source ) ) then setElementData ( source, "status", "idle" ) end end, 5000, 1, source ) else setElementData ( source, "status", "idle" ) end else setElementData ( source, "status", "idle" ) end end elseif (getElementData ( source, "status" ) == "dead" ) then setTimer ( Zomb_delete, 10000, 1, source) end end end end) --RESOURCE START/INITIAL SETUP function outbreak(startedResource) newZombieLimit = get("" .. getResourceName(startedResource) .. ".Zlimit") if newZombieLimit ~= false then if newZombieLimit > ZombieLimit then newZombieLimit = ZombieLimit end else newZombieLimit = ZombieLimit end WoodTimer = setTimer ( WoodSetup, 2000, 1) -- CHECKS FOR BARRIERS if startedResource == getThisResource() then -- call(getResourceFromName("scoreboard"), "scoreboardAddColumn", "Zombie kills") --ADDS TO SCOREBOARD local allplayers = getElementsByType ( "player" ) for pKey,thep in ipairs(allplayers) do setElementData ( thep, "dangercount", 0 ) end local alivePlayers = getAlivePlayers () for playerKey, playerValue in ipairs(alivePlayers) do setElementData ( playerValue, "alreadyspawned", true ) end if ZombieSpeed == 2 then MainTimer1 = setTimer ( setangle, 200, 0) -- KEEPS ZOMBIES FACING THE RIGHT DIRECTION (fast) else MainTimer1 = setTimer ( setangle, 400, 0) -- KEEPS ZOMBIES FACING THE RIGHT DIRECTION end MainTimer3 = setTimer ( clearFarZombies, 3000, 0) --KEEPS ALL THE ZOMBIES CLOSE TO PLAYERS if ZombieStreaming == 1 then MainTimer2 = setTimer ( SpawnZombie, 2500, 0 ) --Spawns zombies in random locations elseif ZombieStreaming == 2 then MainTimer2 = setTimer ( SpawnpointZombie, 2500, 0 ) --spawns zombies in zombie spawnpoints end end end addEventHandler("onResourceStart", getRootElement(), outbreak) function player_Connect() setElementData ( source, "dangercount", 0 ) end
  10. سلام عليكم ورحمة الله وبركاتة تعديل كل الاتي زومي سباون في عالم وهمي يعني مايضلع غير في العالم الوهمي بس كذا اتمنا تفدوني
  11. وعندي كمان مشكلة ببالاف تي بي كان يعمل ممتاز في خادم ماردي يفتح علشان اركب مودات ftp بس بعد تثبيت ابي حل كلمة يلي يجبها في اف تي بي Error: Critical error: Could not connect to server وابي حل في مشاكل ده الوووو ليه مافي رد
  12. سلام عليكم ورحمة الله وبركاتة انا ركبت لوحة اوبن جيم بانل علي استضافة مجانية koding.com كل شي يعمل تمام http://umkk973722fa.momar456.koding.io/ وسويت ريموت بس مشكلة كل ماسوي سيرفر اول مرة اسوي استارت بعد عمل تحديث يجي لي Failed to start the remote server. Error code: واسوي رستارت يديني كذا Unable to get log, retval -2. Server is running, but its not responding, there might be a some kind of problem and you might want to Stop server.. << Back Retry #9. Starting server, please wait... سويت استوب واستارت ماصار شي سيرفر مايبي يشتغل يجي كذا * Failed querying the server. سويت تحديث بالرابط مانجح وش اسوي؟
  13. اخيرا واحد يفهم انا اصلا ما اعرف افهم احد بس انت سبحان الله فهمتني الان كيف تتحل مشكلة الان كيف تتحل
  14. سلام عليكم ورحمة الله وبركاتة انا سويت ماب بداية بس البعيد ماقدر اشوفة الا لما اكون قريب منه جدا يعني البعيد يختفي والقريب ماختفي ماقدر اشوف يلي بعد مني بي 10 امتار ليش مالفروض اشوف ماب كامل ماقدر اشوف ماب الا لما اكون قريب من ماب اتمني تكونو فهمت بسوي لكم صور علشان تفهمون اكثر
  15. الووووو في خطاء بالكود انا لما كن حاطة كود ده addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[1] then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق local name = guiGetText ( GUIEditor.edit[2] ) local target = getPlayerFromName(name) triggerServerEvent("Adminex", getLocalPlayer(), target) playSound("sec.wav",false) end -- نهاية end -- .. ) -- اقفال الحدث كان يقول لي لم يتم كتابة اسم لاعب ولما ضفت كودك يلي هو دة addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[1] then local name = guiGetText ( GUIEditor.edit[2] ) triggerServerEvent ("Adminex", getLocalPlayer(), name) end end) جيت اجرب اضغط اعضاء مخالفة لحسابي راح سكني مخالفة لحسابي الحين ماصرت اعرف افتح الوحة ايش مشكلة المفروض انا معايا رتبت كونسل مايقدر حد يصكني مخالف وفي الحين اخطاء كثيرة حصلتتتتتتتتتت 1- لو انا ضغط علي اضعاء رتبة يحذف رتب كلها وانا حاضت اربع رتب مايسحبهم ليش 2- لو فتحت لوحة ادمن وضغط فيها اي شيء تظهر لوحة مخالفات حتي لو انت مش معاك رتبت المانجرس 3- ماقدر اضغط علي اغلاق لوحة لما اضغط عليها كاني مش بضغط ابي حللل من ساعد معدلت علي الكواد وظهرت هادي الاخطاء كلنت GUIEditor = { progressbar = {}, edit = {}, button = {}, window = {}, label = {}, gridlist = {} } local screenW, screenH = guiGetScreenSize() Window2 = guiCreateWindow(189, 144, 446, 336, "لوحة معلومات مانجرس", false) guiWindowSetSizable(Window2, false) guiSetAlpha(Window2, 1.00) guiSetVisible(Window2,false) GUIEditor.progressbar[1] = guiCreateProgressBar(9, 19, 428, 308, false, Window2) GUIEditor.label[1] = guiCreateLabel(7, 8, 417, 33, "Admin-EX", false, GUIEditor.progressbar[1]) guiSetFont(GUIEditor.label[1], "sa-gothic") guiLabelSetColor(GUIEditor.label[1], 25, 245, 9) guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[1], "center") GUIEditor.label[2] = guiCreateLabel(6, 55, 416, 32, "قبل عمل اي شيء يجب اولاتحديد لاعب", false, GUIEditor.progressbar[1]) guiLabelSetColor(GUIEditor.label[2], 243, 81, 10) guiLabelSetHorizontalAlign(GUIEditor.label[2], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[2], "center") GUIEditor.label[3] = guiCreateLabel(6, 103, 416, 32, "عند سحب مخالفة تاكد ان لاعب ليس عنده مخالفة", false, GUIEditor.progressbar[1]) guiLabelSetColor(GUIEditor.label[3], 243, 81, 10) guiLabelSetHorizontalAlign(GUIEditor.label[3], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[3], "center") GUIEditor.label[4] = guiCreateLabel(6, 159, 416, 32, "عندما تريد ان تضع للاعب مخالفة يجب عليك تجديد لاعب ثم دوس علي اعطاء مخالفة", false, GUIEditor.progressbar[1]) guiLabelSetColor(GUIEditor.label[4], 243, 81, 10) guiLabelSetHorizontalAlign(GUIEditor.label[4], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[4], "center") GUIEditor.label[5] = guiCreateLabel(5, 205, 416, 32, "قوانين: عدم اعطاء الاعبين اكثر من عشر مخالفات باليوم", false, GUIEditor.progressbar[1]) guiLabelSetColor(GUIEditor.label[5], 243, 81, 10) guiLabelSetHorizontalAlign(GUIEditor.label[5], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[5], "center") GUIEditor.button[4] = guiCreateButton(242, 253, 181, 39, "عوده لي لوحة مخالفات", false, GUIEditor.progressbar[1]) guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FFFA019F") BTN3_close2 = guiCreateButton(18, 255, 170, 39, "اغلاق الوحة تعليمات", false, GUIEditor.progressbar[1]) guiSetProperty(BTN3_close2, "NormalTextColour", "FFFA0000") GppWindow = guiCreateWindow(191, 156, 427, 290, "=[ لوحة مانجرس لاعطاء مخالفات وسحبها ]=", false) guiWindowSetSizable(GppWindow, false) guiSetVisible(GppWindow,false) guiSetProperty(GppWindow, "CaptionColour", "FFFF00CC") GUIEditor.edit[2] = guiCreateEdit(9, 22, 195, 31, "", false, GppWindow) GUIEditor.button[1] = guiCreateButton(225, 64, 176, 51, "=[اعطاء مخالفة]=", false, GppWindow) guiSetFont(GUIEditor.button[1], "default-bold-small") guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFFF0000") GUIEditor.button[2] = guiCreateButton(212, 236, 203, 44, "✖ اغلاق لوحة", false, GppWindow) guiSetFont(GUIEditor.button[2], "default-bold-small") guiSetProperty(GUIEditor.button[2], "HoverTextColour", "FF990909") guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFFF2929") GUIEditor.button[3] = guiCreateButton(225, 120, 176, 51, "=[سحب مخالفة]=", false, GppWindow) guiSetFont(GUIEditor.button[3], "default-bold-small") guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FF01FD60") GUIEditor.button[5] = guiCreateButton(209, 179, 209, 45, "=[ تعليمات ]=", false, GppWindow) guiSetFont(GUIEditor.button[5], "default-bold-small") guiSetProperty(GUIEditor.button[5], "NormalTextColour", "FF01FD60") GUIEditor.label[1] = guiCreateLabel(390, 24, 31, 28, "رتبه:", false, GppWindow) guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[1], "center") GUIEditor.progressbar[2] = guiCreateProgressBar(221, 20, 169, 38, false, GppWindow) GUIEditor.label[2] = guiCreateLabel(11, 4, 147, 28, "Admin-EX", false, GUIEditor.progressbar[2]) guiLabelSetColor(GUIEditor.label[2], 254, 0, 0) guiLabelSetHorizontalAlign(GUIEditor.label[2], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[2], "center") -------------------------- ---Grid list ------------------------- addEventHandler("onClientResourceStart",resourceRoot, function() GUIEditor.gridlist[1] = guiCreateGridList(9, 55, 197, 226, false, GppWindow) guiGridListSetSelectionMode(GUIEditor.gridlist[1],2) local column = guiGridListAddColumn( GUIEditor.gridlist[1], "Player Name", 0.89 ) if ( column ) then for id, player in ipairs(getElementsByType("player")) do local row = guiGridListAddRow ( GUIEditor.gridlist[1] ) guiGridListSetItemText ( GUIEditor.gridlist[1], row, column, getPlayerName(player), false, false ) guiGridListSetItemColor ( GUIEditor.gridlist[1], row, column, 0, 250, 154, 255 ) end addEventHandler ( "onClientGUIClick", GUIEditor.gridlist[1], click ) end end) function click () local playerName = guiGridListGetItemText ( GUIEditor.gridlist[1], guiGridListGetSelectedItem ( GUIEditor.gridlist[1] ), 1 ) guiSetText ( GUIEditor.edit[2], playerName ) end ---------------------------- --Show panel from command -------------------------- function showPanel () guiSetVisible (GppWindow, true) showCursor (true) playSound("open.mp3",false) end addEvent( "showPanel", true ) addEventHandler ( "showPanel", getRootElement(), showPanel) ------------------------ --Event to bindKey ------------------------ function bnts() if guiGetVisible(GppWindow) == true then guiSetVisible(GppWindow,false) showCursor(false) end end function show() if guiGetVisible(GppWindow) == true then guiSetVisible(GppWindow,false) showCursor(false) else guiSetVisible(GppWindow,true) showCursor(true) end end addEvent("show",true) addEventHandler("show",root,show) addEventHandler ("onClientGUIClick", getRootElement(), onGuiClick) ----------------------- --GetPermission --------------------- function GetPermission() triggerServerEvent ("OpenPanel", getLocalPlayer(), OpenPanel) end addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[2] then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق guiSetVisible(GppWindow,false) showCursor(false) -- هنا يغلق اللوحة ويشيل المؤشر بعد مايتحقق من الشرط end -- نهاية end -- .. ) -- اقفال الحدث addEventHandler('onClientGUIClick',root, function() if source == GUIEditor.button[5] then -- هنا يتحقق بأن الشيء اللي نبي الحدث يتطبق عليه هو الزر حق فتح لوحة رقم 2 guiSetVisible(Window2,true) showCursor(true) -- هنا يفتح لنا اللوحة guiSetVisible(GppWindow,false) -- إغلاق نافذة 1 end -- نهاية end -- .. ) -- إقفال addEventHandler('onClientGUIClick',root, function() if source == GUIEditor.button[4] then -- هنا يتحقق بأن الشيء اللي نبي الحدث يتطبق عليه هو الزر حق فتح لوحة guiSetVisible(Window2,false) -- إغلاق نافذة 1 end -- نهاية رقم 2 guiSetVisible(GppWindow,true) showCursor(true) -- هنا يفتح لنا اللوحة end -- .. ) -- إقفال addEventHandler("onClientGUIClick",root, function() if source == BTN3_close2 then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق guiSetVisible(Window2,false) showCursor(false) -- هنا يغلق اللوحة ويشيل المؤشر بعد مايتحقق من الشرط end -- نهاية end -- .. ) -- اقفال الحدث addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[1] then local name = guiGetText ( GUIEditor.edit[2] ) triggerServerEvent ("Adminex", getLocalPlayer(), name) playSound("sec.wav",false) end end) addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[3] then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق local name = guiGetText ( GUIEditor.edit[2] ) local target = getPlayerFromName(name) triggerServerEvent ("remove", getLocalPlayer(), target) end -- نهاية end -- .. ) -- اقفال الحدث function nopsound () playSound("np.mp3",false) end addEvent( "nopsound", true ) addEventHandler ( "nopsound", getRootElement(), nopsound) function removedsound () playSound("removed.wav",false) end addEvent( "removedsound", true ) addEventHandler ( "removedsound", getRootElement(), removedsound) function list() guiGridListClear(GUIEditor.gridlist[1]) for id, players in ipairs (getElementsByType("player")) do local row = guiGridListAddRow(GUIEditor.gridlist[1]) guiGridListSetItemText(GUIEditor.gridlist[1], row, 1, getPlayerName(players), false, false) guiGridListSetItemColor ( GUIEditor.gridlist[1], row, 1, 0, 250, 154, 255 ) end end addEventHandler("onClientPlayerJoin", getRootElement(), list) addEventHandler("onClientPlayerQuit", getRootElement(), list) addEventHandler("onClientPlayerChangeNick", getRootElement(), list) سيرفر -- * scripted by |S.s|SoRa -- * please don't remove my Copyrights -- * thanks to MR.S3D for helping me local rootElement = getRootElement() outputChatBox ("* مود مخلفات اعطاء وسحب مخالفت لاعب ", shource, 255, 0, 0, true) -------------------- ---bindKey i to open panel --only who in Console group can open this panel ------------------- addEventHandler("onPlayerJoin",root, function () bindKey(source,"i","down",show) ----- Change "i" to the key you want end) addEventHandler("onResourceStart",resourceRoot, function () for index, player in ipairs(getElementsByType("player")) do bindKey(player,"i","down",show) ----Change "i" to the key you want end end) function show(thePlayer) if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(thePlayer)),aclGetGroup("Managers")) then triggerClientEvent(thePlayer,"showPanel",thePlayer) else outputChatBox ("* انت الان مرشح مانجرس وليس لديك رتبت مانجرس ", source, 255, 0, 0, true) triggerClientEvent ( thePlayer,"nopsound", thePlayer ) end end ----------------------- -- give admin-ex ----------------------- local ForbiddenGroup = "Console" addEvent("Adminex",true) function Adminex(name) if (name and name ~= '' and name ~= ' ') then local player = getPlayerFromName(name) if (player) then local account = getPlayerAccount( player ) if account and not isGuestAccount(account) then local group = aclGetGroup ( "Admin-EX" ) if (group) then removeGroups ( source ) if isObjectInACLGroup("user."..getAccountName ( account ), aclGetGroup(ForbiddenGroup)) then return outputChatBox("لايمكنك اعطاء مخالف لهذا الحساب",source,255,0,0,true); end aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "ASL: '"..getAccountName(getPlayerAccount(player)).."تم اعطاء مخالفة للحساب '", source, 0, 255 ,0 ) else outputChatBox ( 'غـير مـوجود (Admin-EX) القروب', source, 255, 100 ,100 ) end else outputChatBox ( 'هذا اللاعب لـيس لديـه حسـاب', source, 255, 100 ,100 ) end else outputChatBox ( 'ليـس هنـالك أي لاعـب بهذا الاسم', source, 255, 100 ,100 ) end else outputChatBox ( 'الرجاء كتابـة الاسم', source, 255, 100 ,100 ) end end addEventHandler("Adminex", getRootElement(), Adminex) ---------------------- -- remove admin-ex ---------------------- addEvent("remove",true) function removee(target) local account = getPlayerAccount ( target ) if ( account ) then aclGroupRemoveObject (aclGetGroup("Admin-EX"), "user."..getAccountName ( account ) ) outputChatBox ( "GPP: all permissons of '"..getAccountName(getPlayerAccount(target)).."' has been removed !", source, 255, 0 ,0 ) triggerClientEvent ( source,"removedsound", source ) else outputChatBox ( "No account name specified", source, 255, 100 ,100 ) end end addEventHandler("remove", getRootElement(), removee) ---------------------- --removeGroups ---------------------- grps = { {"Control"}, {"Console"}, {"Console-SuperModerator"}, {"Console-Home"}, {"Console-Moderator"}, {"Managers-Console"}, {"Managers-ACl"}, {"Managers"}, {"Maps"} } function removeGroups ( element ) if ( element and isElement ( element ) ) then if ( getPlayerAccount ( element ) and not isGuestAccount ( getPlayerAccount ( element ) ) ) then for _, v in ipairs ( aclGroupList ( ) ) do for k, g in ipairs ( grps ) do if aclGroupGetName ( v ) ~= g[1] then if ( isObjectInACLGroup ( "user." .. getAccountName ( getPlayerAccount ( element ) ), v ) ) then aclGroupRemoveObject ( v, "user." .. getAccountName ( getPlayerAccount ( element ) ) ) end end end end end end end ---------------------- --Command ---------------------- function OpenPanel ( player ) local player = player or source local accountname = getAccountName( getPlayerAccount( player ) ) if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "Managers-ACl" )) then triggerClientEvent ( player,"showPanel", player ) else outputChatBox ("ليس معك رتبه المطلوبه", player, 255, 0, 0, true) triggerClientEvent ( player,"nopsound", player ) end end addEvent( "OpenPanel", true ) addEventHandler ( "OpenPanel", getRootElement(), OpenPanel) addCommandHandler ( "gpp", OpenPanel ) function check() local accountname = getAccountName(getPlayerAccount(source)) if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "Managers" )) then outputChatBox ("i انت معك رتبت مانجرس تقدر تفتح لوحة بطغط عل زر ", player, 255, 0, 0, true) end end addEventHandler("onPlayerLogin",getRootElement(),check ) -- * scripted by |S.s|SoRa -- * please don't remove my Copyrights شباب ابي حل سريع علشان احط مود بالسيرفر صار لي 3 ايام بهذة مشكلة
  16. شكرا لك كانت مشكلة من عندي لانه كنت مخلي قروب كذا admiin-ex زيادة i كان خطاء بال
  17. لا انا ابي احط لو هو ماحدد علي الاسم او كتبة بالاديت يظهر له بشات يرجاء كتابة الاسم اسوية كذا addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[1] then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق local name = guiGetText ( GUIEditor.edit[2] ) local target = getPlayerFromName(name) triggerServerEvent("Adminex", getLocalPlayer(), target) playSound("sec.wav",false) else outputChatBox ( "لم يتم كتابة او تحديد علي الاسم", source, 255, 100 ,100 ) end -- نهاية end -- .. ) -- اقفال الحدث
  18. ماشتغل يقول لي لم يتم كتابة او تحديد علي الاسم مع اني محدد علي اسم وكاتبة لماذا لا يعمل
  19. انا ضايفة والله وهاد يلي انا مخليه بالكلنت addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[1] then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق local name = guiGetText ( GUIEditor.edit[2] ) local target = getPlayerFromName(name) triggerServerEvent ("Adminex", getLocalPlayer(), target) end -- نهاية end -- .. ) -- اقفال الحدث وفي نقطة وهي لما تضغط علي اسم لاعب في جريد ليس ينتقل الي اديت
  20. والله اني مسوي كذااا في كلنت كاتبة اسم زر والخخ تريفر سيرفر نفس يلي انت حضيته انا هادا يلي انا مركبة addEventHandler("onClientGUIClick",root, function() if source == GUIEditor.button[1] then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق local name = guiGetText ( GUIEditor.edit[2] ) local target = getPlayerFromName(name) triggerServerEvent ("Adminex", getLocalPlayer(), target) end -- نهاية end -- .. ) -- اقفال الحدث
  21. ههههههههههههههههههههههههههه رجال مسكين
  22. سلام عليكم ورحمة الله وبركاتة انا اليوم اضفت بس تعديل بس مانجح مشكلة هي اني لما اضغط علي زر اعضاء مخالفة يقول لي اكتب اسم لاعم مع العلم انا كاتبة ولما اضغط سحب مخالفه بيسحبها طيب مشكلة في ايه انا حاولت فيها بس مانجحت ودي بق مايظهر شيء فية غير بلون اصفر كود قبل تعديل addEvent("Adminex",true) function Adminex(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "Admin-EX" ) if ( group ) then removeGroups ( source ) aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "ASL: '"..getAccountName(getPlayerAccount(target)).."تم اعطاء مخالفة للحساب '", source, 0, 255 ,0 ) else outputChatBox ( "لم يتم كتابة او تحديد علي الاسم", source, 255, 100 ,100 ) end end addEventHandler("Adminex", getRootElement(), Adminex) كود بعد تعديل local ForbiddenGroup = "Console" addEvent("Adminex",true) function Adminex(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "Admin-EX" ) if ( group ) then removeGroups ( source ) if isObjectInACLGroup("user."..account, aclGetGroup(ForbiddenGroup)) then return outputChatBox("لايمكنك اعطاء مخالف لهذا الحساب",source,255,0,0,true); end aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "ASL: '"..getAccountName(getPlayerAccount(target)).."تم اعطاء مخالفة للحساب '", source, 0, 255 ,0 ) else outputChatBox ( "لم يتم كتابة او تحديد علي الاسم", source, 255, 100 ,100 ) end end addEventHandler("Adminex", getRootElement(), Adminex)
  23. سلام عليكم ورحمة الله وبركاتة يلي ابية تصويب سريع يعني اول ماتيجي تمسك سلاح تبي تضرب يوديك لاعب علطول يعني مثل يلي في gta v لما تجي تضرب بدون اي تعب بتضضرب
×
×
  • Create New...