#,Dr.To[sh]iBa

تظهر للجميعmoney money خلاص تمام بس الكلمه حقت

يا غالي انت هي ما ظبطت 100% الحين لو احد فاز بالمسابقه وجه احد ثاني فاز بالمسابقه وسويت مسابقه ثاني الشخص الاول ما يقدر يفوز اللي انا ابي اسويه ان الشخص ما يفوز مرتين متتالتين لكن يقدر يفوز مره اخري عادي المهم لا تكون مرتين متتالتين #تعديل كيلر اللي سواه function onPlayerWin(player) local playeraccount = getPlayerAccount ( player ) if ( playeraccount ) and not isGuestAccount ( playeraccount ) then accname = getAccountName ( playeraccount ) if getAccountData ( playeraccount, "killerProjectData" ) == accname then outputChatBox ( "wait...", player ) else for id, players in ipairs(getElementsByType("player")) do local playeraccountall = getPlayerAccount ( players ) if ( playeraccountall ) and not isGuestAccount ( playeraccountall ) then setAccountData ( playeraccountall , "killerProjectData", "noaccname" ) end end removeCode() givePlayerMoney ( player, thePrize ) outputChatBox ( "money money money...", root ) setTimer ( setAccountData , 1000, 1 , playeraccount, "killerProjectData", accname ) end end end الصراحه ما قصر كيلر بس هو فهم خطا اللي يقدر يعدلها علي انا ابيه شكرا

تسلم يا غالي ما قصرت وربي + ابيك بالخاص

function onPlayerWin(player) outputChatBox("* "..getPlayerName(player).." #FFFF00Has won the Prize #00FF00$"..thePrize,root,255,255,0,true) givePlayerMoney(player,thePrize) removeCode() end استبدله بهذا الكود ؟

يعني اضيف ذا الكود فقط ؟

طيب كيف اسويها انا حاولت كذا بس ما نفعت

ما احد افادني ؟ كله يسولف بموضوعي

لا مو حقك حق العقرب اكواد السيرفر --***********************************-- --***********************************-- -- Random Words -- -- By Al3grab -- --***********************************-- --***********************************-- ---- Changeable captchaNums = 5 -- captcha letters length wordTimeInSec = 25 --- the time before the word disappear in seconds [ default 11 seconds ] prizefrom,prizeto = 500,800 -- the prize random num timerfrom,timerto = 1.5,5.5 -- the random timer that shows the word [ default from 3 to 15 minutes ] ---- unChangeable wordOn = false theWord = nil thePrize = nil wordTime = wordTimeInSec * 1000 -- outputDebugString("Random Words By Al3grab | Started") -- function createCode(code,prize) for k,v in ipairs( getElementsByType("player") ) do exports.easytext:displayMessageForPlayer(v,1, "=========", wordTime, 0.07, 0.5, 0, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,2, "Word : "..code.."", wordTime, 0.07, 0.533, 255, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,3, "Prize : "..prize.."$", wordTime, 0.07, 0.563, 255, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,4, "=========", wordTime, 0.07, 0.593, 0, 255, 0, 255, 1.6) end outputChatBox("- Random Words : #FFFF00Enter the word shown below to win the prize.",root,0,255,0,true) outputChatBox("=========",root,0,255,0,true) outputChatBox("Word : "..code.."",root,255,255,0,true) outputChatBox("Prize : "..prize.."$",root,255,255,0,true) outputChatBox("=========",root,0,255,0,true) outputChatBox("- #FFFF00You can see the word down on your screen.",root,0,255,0,true) -- startCodeTimer() wordOn = true end function makeRandomCode(Word,Prize) if ( Word and Prize ) then theWord = Word thePrize = Prize else theWord = makeCaptcha(captchaNums) thePrize = math.random(prizefrom,prizeto) end if ( tostring(theWord) and tonumber(thePrize) ) then createCode(theWord,thePrize) end end function startCodeTimer() codeTimer = setTimer( function () removeCode() outputChatBox("- #FFFF00No one won the prize",root,0,255,0,true) end , wordTime , 1 ) end function removeCode() for k,v in ipairs( getElementsByType("player") ) do exports.easytext:clearMessageForPlayer(v,1) exports.easytext:clearMessageForPlayer(v,2) exports.easytext:clearMessageForPlayer(v,3) exports.easytext:clearMessageForPlayer(v,4) end if isTimer ( codeTimer ) then killTimer(codeTimer) end theWord = nil thePrize = nil wordOn = false end function makeCaptcha(capNumz) theC = "" tCode = { "a","A", "b","B", "c","C", "d","D", "e","E", "f","F", "g","G", "h","H", "j","J", "k","K", "l","L", "m","L", "n","N", "o","O", "p","P", "q","Q", "r","R", "s","S", "t","T", "u","U", "v","V", "x","X", "y","Y", "z","Z", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", "!", "@", "#", "?" } for k=1,capNumz or 5 do randomCode = math.random (#tCode ) theC = ""..theC..""..tCode[randomCode].."" end return theC end function onPlayerWin(player) outputChatBox("* "..getPlayerName(player).." #FFFF00Has won the Prize #00FF00$"..thePrize,root,255,255,0,true) givePlayerMoney(player,thePrize) removeCode() end function detcetChatMessage(msg,msgtype) if ( wordOn == true and msg and msgtype == 0 ) then if msg == theWord then onPlayerWin(source) end end end addEventHandler("onPlayerChat",root,detcetChatMessage) addEventHandler("onResourceStop",resourceRoot,function() removeCode() end ) function setRandomTimer() setTimer(function() if not wordOn then makeRandomCode() end setRandomTimer() end , math.random(timerfrom,timerto) * 60 * 1000 , 1 ) end addEventHandler("onResourceStart",resourceRoot,function() setRandomTimer() easytext = getResourceFromName("easytext") if ( easytext ) then if getResourceState(easytext) == "loaded" then startResource(easytext) end else outputChatBox("* Error , need for easytext resource to start") cancelEvent() end end ) for k,v in ipairs ( {"randomcode","randomword","rw","rd"} ) do addCommandHandler(v,function(plr,cmd,prize,...) if plr and hasObjectPermissionTo(plr,"function.kickPlayer") then if ( not prize ) then makeRandomCode() else word = table.concat({...}, " ") if ( word ) then makeRandomCode(word,prize) end end end end ) end

السلام عليكم ورحمة الله وبركاته عندي مود مسابقات حق اول من يكتب يعني اناااحدد كلمه والكلمه تظهر علي الشاشه واول من يكتب ذي الكلمه ياخد فلوس انا ابي اسوي انا اللاعب ما يقدر يفوز مرتين متتالتين وشكرا

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

ما فهتم يا غالي لو امكن تجيبلي مثال

كيف ؟

طلب بسيط مرره ابي اسوي ان الديربي يكون له اكثر من ماب واحد يعني اول ديربي يكون ماب وثاني ديربي يكون ماب ثاني وشكرراً

احد يرد علي

افضل رد elseif ( source == aTab1.Mute ) then if player == localPlayer then return end if not aPlayers[player]["mute"] then aMuteInputBox ( player ) else aMessageBox ( "question", "Are you sure to unmute "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"mute\" )" ) end ما عرفت اسويها ض4 #Edit: تمت الافاده يغلق ~

ابي اسوي تايمر للسلاب بحيث ان اللاعب ما يقدر يصك شخص اخر سلابين ورا بعض لازم ينتظر 5 ثواني علي الاقل وشكرا

مود ثاني وش ؟

طيب هو لوش الكود ذا

لا مب لي بس واحد يقلي ركب ذا المود وانا شااكك اي صح للوحش

يا غالي انا ممكن افتح لوحة الادمن عن طريق كتابة الكوماند في اف8 في طريقه للاكواد ؟

ابي افهم ذي الاكواد كلنت addEventHandler("onClientResourceStart",resourceRoot, function() triggerServerEvent("A7:getResources",localPlayer) end ) addEvent("onClientModelDownloaded_ABLoader",true) addEventHandler("onClientModelDownloaded_ABLoader",root, function(name) exports[name]:toggleModel(true) end ) addEvent("A7:callBack",true) addEventHandler("A7:callBack",root, function(res) for k,v in ipairs(res) do if exports[v]:isModelDownloaded() then outputChatBox("test") exports[v]:toggleModel(true,true) else exports[v]:downloadModel() end end end ) سيرفر local resources = {} addEventHandler("onResourceStart",resourceRoot, function() for k,v in ipairs(getResources()) do if getResourceState(v) == "running" and getResourceName(v):find("iM7SoD") then table.insert(resources,getResourceName(v)) end end end ) addEventHandler("onResourceStart",root, function(res) if getResourceName(res):find("iM7SoD") then restartResource(getThisResource()) end end ) addEvent("A7:getResources",true) addEventHandler("A7:getResources",root, function() triggerClientEvent(client,"A7:callBack",client,resources) end )

شوف لخاص

تسلم يا غالي ما قصرت يغلق

كيف وش التكمله ؟

ابي ان الاسل يفتح للكونسل فقط وبرمز يعني انا الحين كونسل ودخلت رمز في اف8 يفتح ولو كنت ادمن ودخلت نفس الرمز في اف8 ما يفتح