Mr.OppS

السلام عليكم كيف الحال ؟ admin مشكلة في لـوحـة الادمـن * أستخدام لوحة الادمنية الافتراضية(التى مع مودات ) ض Set Dimension الـعـالـم اذا شخص سـوى لنفـسـة او سـوى الى شخص اخـر تغير للعالم عن طريقة لوحة الادمنية , يلطع فى شات من غير العالم الخاص بك لـكـن Set Interior الأماكن اذا شخص سـوى لنفـسـة او سـوى الى شخص اخـر تغير للمكان عن طريقة لوحة الادمنية , لا يلطع فى شات من غير مكانك رجاء احد ساعدونى على حل هذه مشكلة

ألـمحـاولـة :-

مـســاعـــدة أريـد اسـوي آضـافـة بـحـث في قائـمـة اسمـاء اعضاء عصابتـي

رجاء اعطني الكـود !! انا جـرب ولكن الاكواد فاشلة

روح أنــت شوف أكـوادك !! وشوف أكـوآدي !! ,و راح تفـهـم

كـود نـاقـص - الان هو يشغل مود الازرار ماراح تظهر في وجهة !! يضغط اف6 = راح تشتغل لوحة بس اذا ضغط اف6 مرة اخري حتي يخفي الوحة = الازرار ماتختفي ,,هههههههههـ جــــرب هـذا ,, ضـفـت علـيـة تختفي الازرار ^____^ GUIEditor = { button = {} } GUIEditor.button[1] = guiCreateButton(296, 217, 189, 63, "", false) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") guiSetVisible( GUIEditor.button[1],false) GUIEditor.button[2] = guiCreateButton(583, 221, 189, 63, "", false) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") guiSetVisible( GUIEditor.button[2],false) GUIEditor.button[3] = guiCreateButton(301, 338, 189, 63, "", false) guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFAAAAAA") guiSetVisible( GUIEditor.button[3],false) GUIEditor.button[4] = guiCreateButton(302, 463, 189, 63, "", false) guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FFAAAAAA") guiSetVisible( GUIEditor.button[4],false) GUIEditor.button[5] = guiCreateButton(584, 463, 189, 63, "", false) guiSetProperty(GUIEditor.button[5], "NormalTextColour", "FFAAAAAA") guiSetVisible( GUIEditor.button[5],false) GUIEditor.button[6] = guiCreateButton(584, 338, 189, 63, "", false) guiSetProperty(GUIEditor.button[6], "NormalTextColour", "FFAAAAAA") guiSetVisible( GUIEditor.button[6],false) local screenW, screenH = guiGetScreenSize() function dx() dxDrawRectangle(245, 140, 573, 459, tocolor(255, 0, 0, 159), false) dxDrawRectangle(292, 211, 208, 79, tocolor(33, 9, 255, 190), false) dxDrawRectangle(574, 211, 208, 79, tocolor(0, 48, 255, 190), false) dxDrawRectangle(292, 328, 208, 79, tocolor(0, 48, 255, 190), false) dxDrawRectangle(292, 453, 208, 79, tocolor(0, 48, 255, 190), false) dxDrawRectangle(574, 328, 208, 79, tocolor(0, 48, 255, 190), false) dxDrawRectangle(574, 453, 208, 79, tocolor(0, 48, 255, 190), false) dxDrawRectangle(245, 140, 573, 61, tocolor(65, 255, 0, 190), false) dxDrawText("Veh System |Salh", 249, 143, 814, 196, tocolor(0, 0, 0, 190), 2.40, "default", "center", "center", false, false, false, false, false) end function Open() if removeEventHandler("onClientRender", root, dx) then showCursor(false) guiSetInputEnabled(false) guiSetVisible( GUIEditor.button[1],false) guiSetVisible( GUIEditor.button[2],false) guiSetVisible( GUIEditor.button[3],false) guiSetVisible( GUIEditor.button[4],false) guiSetVisible( GUIEditor.button[5],false) guiSetVisible( GUIEditor.button[6],false) else addEventHandler("onClientRender", root, dx) showCursor(true) guiSetInputEnabled(true) guiSetVisible( GUIEditor.button[1],true) guiSetVisible( GUIEditor.button[2],true) guiSetVisible( GUIEditor.button[3],true) guiSetVisible( GUIEditor.button[4],true) guiSetVisible( GUIEditor.button[5],true) guiSetVisible( GUIEditor.button[6],true) end end bindKey("F6", "down", Open)

مـســاعـــدة أريـد اسـوي آضـافـة بـحـث في قائـمـة اسمـاء اعضاء عصابتـي

ههههههههههههه,,,اوك ! الان شو اسوي علي الاكواد خاص بي؟ --Client SerchPlace = guiCreateEdit(250, 490, 254, 23, "", false, MyGroup_Members_Window) addEvent("Acconts",true ) addEventHandler("Acconts",root, function (T) guiGridListClear(MyGroup_Members_Grid) for i, aAccount in ipairs (T) do Row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid, Row, 1, aAccount, false, false ) end Accounts = T end ) addEventHandler("onClientGUIChanged",resourceRoot,function () guiGridListClear(MyGroup_Members_Grid) local Accs = guiGetText (SerchPlace) if ( Accs == "" ) then for k,v in ipairs(Accounts) do Row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid, Row, 1, v, false, false ) end else guiGridListClear(MyGroup_Members_Grid) for k1,v1 in ipairs(Accounts) do if string.find(v1,guiGetText(SerchPlace)) then local Row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid,Row,1,v1,false,false) end end end end ) addEventHandler( 'onClientResourceStart', resourceRoot, function() triggerServerEvent( 'aAdminEx', localPlayer) end ) -- Server addEvent ( 'aAdminEx',true ) addEventHandler( 'aAdminEx',root, function ( ) local T = {} for i,aAcc in ipairs ( getAccounts ( ) ) do local Acc1 = getAccountName( aAcc ) table.insert ( T, Acc1 ) end triggerClientEvent( source,"Acconts",source, T) end ) شو اضيف عليهم؟ أنـا اريد فقط اضيف بـحـث عـن اللاعـب ,باستخدام الحساب,,حتي قائد عصابة يعرف من يتفاعل وكذا

السلام عليكم , كيف الحال؟ مـود العصابـات أف5 ,!! سـويـت أضـافـة عـلـيـة ,, اذا انت قائد العصابة وتريد تشوف الأعضاء متفاعلين او لا تـبـحـث عـن اسـم حـسـابـة,, ! اضغط اف5 وبعد تختار أسماء أعضاء عصابتي = يظهر لك الناس اللي معاك في عصابة وتشـوف مكان مخصص للكتابـة حتي تـبـحـث عـن اسـم الحـسـاب سويت ولكن صارت مشكلة ! مشكلة هي : يطلع أسماء الحسابات الموجودة في سيرفر !! ضض هذه الاكواد !! ماقدر اضيف كود لوحة العصابات اف5 !! سبب المـتـصـفـح يـعـطـل ويصير لآق --Client SerchPlace = guiCreateEdit(250, 490, 254, 23, "", false, MyGroup_Members_Window) addEvent("Acconts",true ) addEventHandler("Acconts",root, function (T) guiGridListClear(MyGroup_Members_Grid) for i, aAccount in ipairs (T) do Row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid, Row, 1, aAccount, false, false ) end Accounts = T end ) addEventHandler("onClientGUIChanged",resourceRoot,function () guiGridListClear(MyGroup_Members_Grid) local Accs = guiGetText (SerchPlace) if ( Accs == "" ) then for k,v in ipairs(Accounts) do Row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid, Row, 1, v, false, false ) end else guiGridListClear(MyGroup_Members_Grid) for k1,v1 in ipairs(Accounts) do if string.find(v1,guiGetText(SerchPlace)) then local Row = guiGridListAddRow(MyGroup_Members_Grid) guiGridListSetItemText(MyGroup_Members_Grid,Row,1,v1,false,false) end end end end ) addEventHandler( 'onClientResourceStart', resourceRoot, function() triggerServerEvent( 'aAdminEx', localPlayer) end ) -- Server addEvent ( 'aAdminEx',true ) addEventHandler( 'aAdminEx',root, function ( ) local T = {} for i,aAcc in ipairs ( getAccounts ( ) ) do local Acc1 = getAccountName( aAcc ) table.insert ( T, Acc1 ) end triggerClientEvent( source,"Acconts",source, T) end ) أريـد من قائد عصابة يشـوف أعضاء العصابـة , يكتب اسم حساب الشخص يطلع لـة الاسم و اسم حساب واليوم واخر ظهور لة ورتـبـة و تحذيرات انا سويت ولكن مشكلة يطلع أسماء حسابات الموجودة في سيرفر كلها ! ضض مساعـدة

توضيح ,أكثير ؛ رجاء

?????????

,, ياخي مو حل هذا !! F1.F2.F...انا هكذآ راح اضيـف كل الحروف و كل الـ مشكلة T,Yاذا انت اسم حسابك بة حرف تكتب اسم حسابك تشوف نفسك تكتب في شات اذا انت مسوي كلمة سر ارقام ! و مسوي الارقام بيها اختصار !! = من تكتب كلمة السر >> الاختصارات تطلع في شات ويصير تخريب

سـويـتـة !!ولكن هناك مشكلة ؛ كود ضعـيـف مشكلة ترجع مرة اخري اذا تكتب اسم حسابك تشوف حالك تكتب في شات Bواذا كلمة سر يوجود بة حرف تشوف لوحة الوزنيات طلعت ^^ حتي تـنـحـل مشكلة = لازم اسوي إعادة تشغيل للمود*ريسترت* !! ارجو الحل

السلام عليكم, كيف الحال؟ شباب اريد اسوي إضافة في مود ديربي اذا انت في ديربي وشخص اخر أنــتــقــال إلـيـك = يأخذ سلآب ؛؛ أريـد اسـوي 2 سـريال اذا انـتـقـالو اإلـيـك = لا ياخذون سلاب ولا يصير لهم شي سيـرفر 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("المرجو الانتظار...",source,255,255,0,true) setD(source) spawnOnMap(source) else outputChatBox("لم يبق مكان لك بالديربي انتظر حتى الديربي القادم ",source,0,255,0,true) end end end) function checkDuel(p) if tostring(getElementData(resourceRoot,"map")) == "yes" then outputChatBox("انتظر ريثما ينتهي الديربي الحالي",p,255,255,0,true) elseif tostring(getElementData(resourceRoot,"map")) == "no" then outputChatBox("انتظر ريثما يبدأ الديربي",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() 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("#00FF00[" .. n .. "]#FFFF00 Won the Derby and win#00FF00[" .. tonumber(getElementData(resourceRoot,"winMoney")) .. "$]",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("للدخول الى الدريبي اكتب في الشات , ديربي ",getRootElement(),255,255,0,true) RMoney = math.random("50000","300000") setElementData(resourceRoot,"winMoney",tonumber(RMoney)) outputChatBox("سيحصل الفائز في الديربي على " .. 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("لقد بدأ الديربي , يمكنك الانطلاق",p,0,255,0,true) setElementFrozen(getPedOccupiedVehicle(p),false) end end else endDerby() setElementData(resourceRoot,"map","no") outputChatBox("! لم يبدأ الديربي لعدم توفر الاعبين",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("#FFFF00*******Derby mod Start#00FF00}*******",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 شكراً

نـفـس الـشئ !!ضفت اكودك , ومشكلة موجودة & Debug Script WARNING: LOGIN\loginC.lua:12: Bad argument @'guiSetInputEnbled' [Expected bool at argument 1,got gui-window]

السلام عليكم , كيف الحال؟ #عيد_سعيد شباب اريد مساعدةة في لوحة تسجيل الدخول لوحة تشتغل تمام ! مشكلة T,Yاذا انت اسم حسابك بة حرف تكتب اسم حسابك تشوف نفسك تكتب في شات اذا انت مسوي كلمة سر ارقام ! و مسوي الارقام بيها اختصار !! = من تكتب كلمة السر >> الاختصارات تطلع في شات ويصير تخريب سـيـرفـر -- My Login Panel :D function interfaz( ) local components = { "weapon", "ammo", "health", "clock", "money", "breath", "armour", "wanted", "radar" } for _, component in ipairs( components ) do setPlayerHudComponentVisible( component, false ) end local x, y = guiGetScreenSize( ) showCursor( true ) main = guiCreateWindow( x/3.8, y/3.8, x/2.02, y/2, "Login Panel", false ) guiWindowSetMovable( main, false) guiWindowSetSizable( main, false) guiCreateLabel( x/10, y/8, x/4, y/4, "Username:", false, main) guiCreateLabel( x/10, y/5, x/4, y/4, "Password:", false, main) loginU = guiCreateEdit( x/8, y/6.8, x/5, y/24, "", false, main) loginP = guiCreateEdit( x/8, y/4.5, x/5, y/24, "", false, main) guiEditSetMasked( loginP, true ) guiEditSetMaxLength( loginU, 10 ) guiEditSetMaxLength( loginP, 10 ) btnL = guiCreateButton( x/8, y/3.5, x/10, x/20, "Login", false, main) btnR = guiCreateButton( x/4, y/3.5, x/10, x/20, "Register", false, main) addEventHandler ("onClientGUIClick", btnL, function (us, pa) local us = guiGetText (loginU) local pa = guiGetText (loginP) triggerServerEvent ("loggin", getRootElement(), getLocalPlayer(), us, pa) end, false ) addEventHandler ("onClientGUIClick", btnR, function (us, pa) local us = guiGetText (loginU) local pa = guiGetText (loginP) triggerServerEvent ("register", getRootElement(), getLocalPlayer(), us, pa) end, false ) end addEventHandler ( "onClientResourceStart", getResourceRootElement(getThisResource()), interfaz ) function hideW () local components = { "weapon", "ammo", "health", "clock", "money", "breath", "armour", "wanted", "radar" } for _, component in ipairs( components ) do setPlayerHudComponentVisible( component, true ) end showCursor (false) guiSetVisible (main, false) end addEvent ("Succes", true) addEventHandler ("Succes", getRootElement(), hideW) كـلـيـنـت function submitLogin (source, user, pass) if (user ~= "") then if (pass ~= "") then local acc = getAccount (user, pass) if (acc ~= false) then logIn (source, acc, pass) outputChatBox ("You logged in successfully.") triggerClientEvent (source, "Succes", source) else outputChatBox ("Wrong username or password, please try again!", getRootElement(), 255, 255, 255, false) end else outputChatBox ("Password can not be blank.", getRootElement(), 255, 255, 255, false) end else outputChatBox ("Username can not be blank.", getRootElement(), 255, 255, 255, false) end end addEvent ("loggin", true) addEventHandler ("loggin", getRootElement(), submitLogin) addEvent ("register", true) addEventHandler ("register", getRootElement(), function (source, Nuser, Npass) if (Nuser ~= "" and Nuser ~= nil and Npass ~= "" and Npass ~= nil) then local Nacc = addAccount (Nuser, Npass) if Nacc then outputChatBox ("You have successfully registered, now try logging in.", getRootElement(), 255, 255, 255) else outputChatBox ("this account already has been created.", getRootElement(), 255, 255, 255) end end end ) سـاعـدوني في حل هذة مشكلة رجاء رجاء شكراً

خخخخ, أعـرف ان اروح الاسل و اغير اسم رتبـة !! ومشكلة رآح يـتـم حالـهـا بس انا لا اريد هذا الحل !! انا اريد يتحقق من رتـب حتي اذا 2 كلمة عربي ويوجود مسـافـة

اذا اسوي مراقب.سيرفر = لازم تكون في الاسل نفس الاسم !!! انا مسوي في الاسل مراقب السيرفر ومن ضفت في الكود بنفس الاسم= مثل موجود بالاسل مايسوي التحقق!! فقط يسوي تحقق اذا اسم عربي 1 كلمة اذا عربي 2 كلمة لا يتحقق

السلآم عليكم كـود فك ميوت فقط بعض رتـب تقدر تفك ميوت ألـكـود local allowedGroups = { ["Console"] = true, ["مشرف"] = true, ["مراقب السيرفر"] = true, } function hasNoPermissionToUnmute() local groups_s = aPlayers[localPlayer]["groups"] local groups_t = (type(groups_s) == "string" and groups_s ~= "None") and split(groups_s, ", ") if groups_t then for k, v in ipairs(groups_t) do if disallowedGroups[v] then return true end end end return false end مشكلة الان في هذا الكود ^^ رتـبـة مشـرف تـقـدر تفـك ميـوت ! رتـبـة مـراقـب السيـرفر ! لا تقدر تفك ميوت !؟ كيف احل هذه مشكلة؟؟ اذا اسم رتبة عربي ! اذا كلمة 1 يقدر يفك اذا 2 اسم عربي لا يقدر يفك أتمني تساعدوني شكراً

???????????????؟؟؟؟؟؟؟؟؟؟؟؟

مساعدة , شباب