Jump to content

iyaad

Members
  • Posts

    236
  • Joined

  • Last visited

  • Days Won

    4

Everything posted by iyaad

  1. يا اخوتي بلله مو عاجبتكم طريقة طلبي للمساعدة لا تساعدوني
  2. @#BrosS شوف الي بفهمو بالبرمجة يا بروس انت كفو وشنب يا @#Kara
  3. خلاص يا اخوان وجدت مبرمج رائع اشكركم على تعاونكم حبيبي والله ما تقصر
  4. ب Luaبلله , يعني ماركر سيارات ما تعرف ايش مشكلتو يا متخصص لغة ال
  5. السلام عليكم لدي ماركر سيارات للقروب يشتغل وكل شي بس في مشكلة انو لما اجي اخذ سيارة او طيارة ما يرسبن ليش ممكن تصلحولي اياه السيرفر addEvent("spawningVehicle", true) local groupName = '[ARMY]' local activeVehicles = {} local playersVehicles = {} local occupiedVehicles = {} local activeTimers = {} local Intruders = {} local function addVehicleToDestroyList(vehicleNumber) activeTimers[vehicleNumber] = setTimer( function(vehicleNumber) destroyElement(activeVehicles[vehicleNumber]) activeVehicles[vehicleNumber] = nil activeTimers[vehicleNumber] = nil for i,v in pairs(playersVehicles) do if v == vehicleNumber then playersVehicles[i] = nil break end end end, 30000, 1, vehicleNumber ) end local function removeVehicleFromDestroyList(vehicleNumber) if isTimer(activeTimers[vehicleNumber]) then killTimer(activeTimers[vehicleNumber]) activeTimers[vehicleNumber] = nil end end addEventHandler("spawningVehicle", root, function(model, planes) local poo = { {1529.85669, 25.99903, 42.6171}, {1529.85669, 25.99903, 42.6171} } local x, y, z = 0, 0, 0 local rx, ry, rz = 0, 0, 0 if planes then x, y, z = unpack(poo[math.random(#poo)]) rx, ry, rz = 0.3275146484375, 359.78839111328, 271.46984863281 else x, y, z = 1598.17749, -262.16455, 51.722 rx, ry, rz = 359.54382324219, 359.99975585938, 3.48193359375 end if playersVehicles[client] then destroyElement(activeVehicles[playersVehicles[client]]) removeVehicleFromDestroyList(playersVehicles[client]) playersVehicles[client] = nil end local vehicle = #activeVehicles + 1 activeVehicles[vehicle] = createVehicle(model, x, y, z, rx, ry, rz) setVehicleColor(activeVehicles[vehicle], 0, 0, 255) warpPedIntoVehicle(client, activeVehicles[vehicle]) addVehicleUpgrade(activeVehicles[vehicle], 1010) playersVehicles[client] = vehicle occupiedVehicles[vehicle] = nil end ) addEventHandler("onVehicleExit", root, function(player, seat) if seat == 0 then if playersVehicles[player] then addVehicleToDestroyList(playersVehicles[player]) occupiedVehicles[playersVehicles[player]] = nil else for i,v in pairs(activeVehicles) do if v == source then addVehicleToDestroyList(i) occupiedVehicles[i] = nil end end end end end ) addEventHandler("onVehicleEnter", root, function(player, seat) if seat == 0 then if playersVehicles[player] then removeVehicleFromDestroyList(playersVehicles[player]) occupiedVehicles[playersVehicles[player]] = true else for i,v in pairs(activeVehicles) do if v == source then removeVehicleFromDestroyList(i) occupiedVehicles[i] = true break end end end end end ) addEventHandler("onVehicleStartEnter", root, function(player, seat) for i,v in pairs(activeVehicles) do if v == source then if getElementData(player, "Group") ~= "[ARMY]" then outputChatBox("This vehicle is only for "..[ARMY].." group!", player, 0, 0, 255) cancelEvent() else if seat == 0 and occupiedVehicles[i] then outputChatBox("You cannot take this vehicle as someone in it already!", player, 255, 0, 0) cancelEvent() end end break end end end ) addEventHandler("onVehicleExplode", root, function() for i,v in pairs(activeVehicles) do if v == source then removeVehicleFromDestroyList(i) activeVehicles[i] = nil occupiedVehicles[i] = nil setTimer(destroyElement, 2000, 1, source) for k,s in pairs(playersVehicles) do if i == s then playersVehicles[k] = nil break end end break end end end ) الكلنت local groupName = '[ARMY]' local sx, sy = guiGetScreenSize() mainWindow = guiCreateWindow((sx-438)/2, (sy-487)/2, 438, 487, " Vehicles", false) guiWindowSetSizable(mainWindow, false) guiSetAlpha(mainWindow, 1.00) guiSetVisible(mainWindow, false) mainTab = guiCreateTabPanel(0.02, 0.04, 0.96, 0.90, true, mainWindow) local vehicles = { cars = { tab = guiCreateTab("Cars", mainTab), list = { {"Patriot", 470}, {"Enforcer", 433}, {"Cheetah", 415}, {"Bullet", 541}, {"Infernus", 411}, {"Sultan", 560}, {"Turismo", 451}, {"Comet", 480}, {"Huntley", 579}, {"Flash", 565}, } }, bikes = { tab = guiCreateTab("Bikes", mainTab), list = { {"NRG-511", 522}, {"PCJ-600", 461}, {"Sanchez", 468} } }, planes = { tab = guiCreateTab("Planes", mainTab), list = { {"Sparrow", 488}, {"Maverick", 487} ,{"Leviathan", 417} } } }vehicles.cars.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.cars.tab) table.insert(vehicles.cars, guiGridListAddColumn(vehicles.cars.gridlist, "Cars", 0.9)) vehicles.bikes.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.bikes.tab) table.insert(vehicles.bikes, guiGridListAddColumn(vehicles.bikes.gridlist, "Bikes", 0.9)) vehicles.planes.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.planes.tab) table.insert(vehicles.planes, guiGridListAddColumn(vehicles.planes.gridlist, "Planes", 0.9)) notice = guiCreateLabel(0.02, 0.94, 0.96, 0.03, "Press (Enter) to take your vehicle", true, mainWindow) guiLabelSetColor(notice, 0, 255, 0) guiLabelSetHorizontalAlign(notice, "center", false) guiLabelSetVerticalAlign(notice, "center") for i,v in pairs(vehicles) do for _,k in ipairs(v.list) do local row = guiGridListAddRow(v.gridlist) guiGridListSetItemText(v.gridlist, row, v[1], k[1], false, false) end end local vehiclesMarker = createColSphere(1599.05750,-276.72305,50.7229, 2) createMarker(1599.05750,-276.72305,50.7229,"cylinder",2,0,255,255,255) addEventHandler("onClientColShapeHit", vehiclesMarker, function(hitElement) if hitElement == localPlayer and getElementData(hitElement, "Group") == "[ARMY]" and not isPedInVehicle(hitElement) then guiSetVisible(mainWindow, true) showCursor(true) bindKey("enter", "down", selectVehicle) end end,false ) addEventHandler("onClientColShapeLeave", vehiclesMarker, function(leaveElement) if leaveElement == localPlayer and getElementData(leaveElement, "Group") == "[ARMY]" and not isPedInVehicle(leaveElement) then guiSetVisible(mainWindow, false) showCursor(false) unbindKey("enter", "down", selectVehicle) end end, false ) function selectVehicle() for i,v in pairs(vehicles) do local tab = v.tab if guiGetSelectedTab(mainTab) == tab then local gridlist = v.gridlist if guiGridListGetSelectedItem(gridlist) ~= -1 then local row = guiGridListGetSelectedItem(gridlist) local vehName = guiGridListGetItemText(gridlist, row, v[1]) for _,k in ipairs(v.list) do if k[1] == vehName then if i == "planes" then triggerServerEvent("spawningVehicle", localPlayer, k[2], true) else triggerServerEvent("spawningVehicle", localPlayer, k[2], false) end unbindKey("enter", "down", selectVehicle) break end end guiSetVisible(mainWindow, false) showCursor(false) break end end end end والسلام عليكم ورحمة الله وبركاتو يعني بأختصار انو اخذ السيارة او طيارةة او الدباب ما بس ما تظهر او تبين
  6. شوف انا بعطيكو مقابل محترم ( مادي) بيوصل ل35 دولار على القيم مود والمهمات بس انا خايف يتم نشر المودات من قبل الي يبرمجلي وصعب اثق فيو
  7. السلام عليكم بدي كود انو لوحة تسجيل الدخول ما تضهر غير بعد انتهاء الانترو في القيم مود
  8. لو بدك مصمم مابات انا محترف مابات وتي اكس دي , بس برمجتي ضعيفه #مشارك
  9. السلام عليكم ورحمة الله محتاج مبرمج معي في سيرفري نوع السيرفر :- حرب العصابات (مدته :- كل شهر نقوم بتجدديد (لمدة الحياه مهارات المبرمج :- ا قادر على برمجة المقرات× قادر على برمجة المهمات× قادر على برمجة الوظائف× وقادر على برمجة أومور اخرأ بسيطه × ^_^للتواصل تعال خاص
  10. اللوحة معهوله على القيم ايدتور X D واللوحة الي بدي احطها
  11. X D لوحة تسجيل الدخول X D لوحة تسجيل الحساب كمان بدي اسويها بس لازم احذف اللوحة الموجوده بالملف الموجود فوووق
  12. السلام عليكم انا عندي لوحة تسجيل دخول واللوحة تسجيل حساب اوكي؟ اسه انا عامل لوحة تسجيل دخول الحين انا بدي اعمل لوحة تسجيل حساب بس المشكلة هنا هي اانا مو عارف اشيل لوحة التسجيل حساب الموججوده هنا + مو عارف زر كود ربط الزر ممكن يا اخوان مساعدة المطلوب بأختصار :- ا . أزاله لوحة تسجيل حساب من الملف × Panel Register . اضهار اي كود مسؤول عن ربط زر تسجيل حساب في لوحة تسجيل الدخول × . والله يعطيكو العافية× الملف طبعاً هو موجود بالكلينت -------------------------- --------Login Panel------- -------------------------- -- Login handling function loginPlayer(username,password,enableKickPlayer,attemptedLogins,maxLoginAttempts) if isGuestAccount(getPlayerAccount(source)) then if not (username == "") then if not (password == "") then local account = getAccount ( username, password ) if ( account ~= false ) then --[[for k,v in ipairs(getAccounts()) do if getAccountData(v, "Serial") == getPlayerSerial(source) then noa = noa+1 end end if noa < 2 and not getAccountData(account, "Serial") or getAccountData(account, "Serial") == getPlayerSerial(source) then noa = 0]] logIn (source, account, password) exports["guimessages"]:outputServer(source,"* You have sucessfully logged in!", 255, 255, 255) setTimer(outputChatBox,700,1,"#ff0000Welcome To Server .:[Gta-Ua]:.",source,255,255,255,true) triggerClientEvent (source,"hideLoginWindow",getRootElement()) loadacc(source) --[[else noa = 0 outputChatBox("You're allowed to own 2 accounts only!يحق لك أن تملك حسابين فقط", source, 255, 0, 0) end]] else if enableKickPlayer == true then if (attemptedLogins >= maxLoginAttempts-1) then exports["guimessages"]:outputServer(source, "*#FFF000Error! Wrong username and/or password!", 255, 255, 255) setTimer(outputChatBox,500,1,"#0000FF* #FFFFFFWarning! Maximum login attempts reached! [#008AFF"..attemptedLogins+1 .."/"..maxLoginAttempts.."#FFFFFF]",source,255,255,255,true) setTimer(outputChatBox,1000,1,"#0000FF* #FFFFFFYou will be kicked in #008AFF5 seconds#FFFFFF!",source,255,255,255,true) setTimer(kickPlayer,5000,1,source,"Failed to login") else exports["guimessages"]:outputServer(source, "* Error! Wrong username and/or password!", 255, 255, 255) setTimer(outputChatBox,500,1,"#0000FF* #FFFFFFLogin attempts: [#008AFF"..attemptedLogins+1 .."/"..maxLoginAttempts.."#FFFFFF]",source,255,255,255,true) triggerClientEvent(source,"onRequestIncreaseAttempts",source) end else exports["guimessages"]:outputServer(source, "* Error! Wrong username and/or password!", 255, 255, 255) end end else exports["guimessages"]:outputServer(source,"* Error! Please enter your password!",255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Error! Please enter your username!", 255, 255, 255) end else logIn (source, account, password) exports["guimessages"]:outputServer(source, "* You have sucessfully logged in!", 0 , 255, 0) setTimer(outputChatBox,700,1,"#0000FF* #ff0000Welcome To Server .:[Gta-Ua]:.",source,255,255,255,true) triggerClientEvent (source,"hideLoginWindow",getRootElement()) loadacc(source) end end dbb = dbConnect("sqlite", "link/internal.db") -- Registration here function registerPlayer(username,password,passwordConfirm) --[[for k,v in ipairs(getAccounts()) do if getAccountData(v, "Serial") == getPlayerSerial(source) then noa = noa+1 end end]] local noa = dbPoll(dbQuery(dbb, "SELECT value FROM userdata WHERE value = ? AND key= ?", getPlayerSerial(source), "Serial"), -1) if #noa < 2 then if not (username == "") then if not (password == "") then if not (passwordConfirm == "") then if password == passwordConfirm then local account = getAccount (username,password) if (account == false) then local accountAdded = addAccount(tostring(username),tostring(password)) if (accountAdded) then setAccountData(accountAdded, "Serial", getPlayerSerial(source)) triggerClientEvent(source,"hideRegisterWindow",getRootElement()) exports["guimessages"]:outputServer(source, "* You have sucessfuly registered! [Username: " .. username .. " #| Password: " .. password .. "]", 255, 255, 255) setTimer(outputChatBox,800,1,"#0000FF* #FFFFFFYou can now login with your new account.",source,255,255,255,true ) else exports["guimessages"]:outputServer(source,"* An unknown error has occured! Please choose a different username/password and try again.", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Error! An account with this username already exists!", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Error! Passwords do not match!", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Error! Please confirm your password!", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Error! Please enter a password!", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Error! Please enter a username you would like to register with!", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "You're allowed to own 2 account only! يحق لك ان تملك حسابان فقط !", 255, 0, 0) end --noa = 0 end -- Auto-login handling function autologinPlayer(username,password) if not (username == "") then if not (password == "") then local account = getAccount ( username, password ) if not (account == false) then logIn (source, account, password) exports["guimessages"]:outputServer(source, "* You have been automatically logged in.", 255, 255, 255) setTimer(outputChatBox,1000,1,"#0000FF* #FFFFFFTo disable auto-login, use #ABCDEF/disableauto.",source,255,255,255,true) --triggerClientEvent(source, "hideLoginWindow", getRootElement()) loadacc(source) else exports["guimessages"]:outputServer(source, "* Auto-login error - Username & password do not match", 255, 255, 255) end else exports["guimessages"]:outputServer(source, "* Auto-login error - Failed to retrieve password", 255, 255, 255) end else exports["guimessages"]:outputServer(source,"* Auto-login error - Failed to retrieve username", 255, 255, 255) end end login = {} function loadacc() if not login[source] then login[source] = true plang = getAccountData(getPlayerAccount(source), "ALanguage") if not plang then plang = 0 end setElementData(source, "Language", plang) triggerClientEvent("SSS", source, source) triggerClientEvent("TLANG", source, source) triggerClientEvent("onLI", source, source, bag, rul) --triggerClientEvent("COAJT", source) if not rbp then x, y, z = getElementPosition(bag) triggerClientEvent("DropB", source, x, y, z) end end end addEventHandler("onPlayerQuit", root, function() login[source] = nil end) -- You forgot to add this (by TAPL) --[[ When the player logs out, trigger the client event to check if the login panel will request them to login again function logoutHandler() triggerClientEvent(source,"onRequestDisplayPanel",source) end addEventHandler("onPlayerLogout",getRootElement(),logoutHandler) ]] -- Get the server's name function getData() local sName = md5(getServerName()) local sName = string.sub(sName,0,15) triggerClientEvent(source,"onGetServerData",getRootElement(),sName) end addEvent("onRequestLogin",true) addEvent("onRequestRegister",true) addEvent("onRequestAutologin",true) addEvent("onClientLoginLoaded",true) addEventHandler("onRequestLogin",getRootElement(),loginPlayer) addEventHandler("onRequestRegister",getRootElement(),registerPlayer) addEventHandler("onRequestAutologin",getRootElement(),autologinPlayer) addEventHandler("onClientLoginLoaded",getRootElement(),getData) -------------------------------------------------------------------------------------
  13. كفوووو انتا اجدع واحد ساعدني مشكور والله
  14. انا نوع استضافتي ستار هوست بدي اعمل سوفت وير للأستضافة مشان خربت كثير من المودات ومثل هيك كيف بدي اعمل سوفت وير للأستضافة يعني ترجع مثل اول
  15. في غلط ايش هو اللوحة التوزيع ما تشتغل غير لما احط سيريال حساب واحد الكلينت local sx, sy = guiGetScreenSize() local Values = { } local maxB = 500 local size = 45 guiSetInputMode("no_binds_when_editing") function dxDrawFramedText(message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, frameColor) color = color or tocolor(255, 255, 255, 255) frameColor = frameColor or tocolor(0, 0, 0, 255) scale = scale or 1.1 font = font or "default" alignX = alignX or "left" alignY = alignY or "top" clip = clip or false wordBreak = wordBreak or false postGUI = postGUI or false dxDrawText(message, left + 1, top + 1, width + 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI) dxDrawText(message, left + 1, top - 1, width + 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI) dxDrawText(message, left - 1, top + 1, width - 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI) dxDrawText(message, left - 1, top - 1, width - 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI) dxDrawText(message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI) end addEvent("OnPauseBoom", true) addEventHandler("OnPauseBoom",root, function() addEventHandler("onClientRender", root,startBoomb) fadeCamera(false) end ) addEvent("OnOffPauseBoom", true) addEventHandler("OnOffPauseBoom",root, function() removeEventHandler("onClientRender",root,startBoomb) fadeCamera(true) end ) function startBoomb( ) dxDrawFramedText("Pause",sx*0.43, sy*0.450, sx*0.99, sy*0.97, tocolor(255, 255, 255, 255),5, "default-bold", "left", "top", false, false, true, false, false) local now = getTickCount( ) for k=1,maxB do if not Values[k] then Values[k] = {start = getTickCount( ),x = math.random(sx), y = math.random(sy),r = math.random(155), g = math.random(155), b = math.random(155),} end local values = Values[k] alpha = math.abs(math.sin(now / (500+k*10500/500)) * 100) dxDrawImage(values.x, values.y, size, size, "bokeh.png", 0, 0, 0, tocolor(values.r, values.g, values.b, alpha)) if now >= values.start + 500 + (500+k*10500/500) then Values[k].start = getTickCount( ) end end end function centerWindow ( center_window ) local sx, sy = guiGetScreenSize ( ) local windowW, windowH = guiGetSize ( center_window, false ) local x, y = ( sx - windowW ) / 2, ( sy - windowH ) / 2 guiSetPosition ( center_window, x, y, false ) end local WeaponeID = "ID" local WeaponeAmmo = "Ammo" Home = guiCreateWindow(218, 135, 353, 500, "Stats Player", false) centerWindow(Home) guiSetVisible(Home, false) guiWindowSetSizable(Home,false) L_lbl = guiCreateLabel(14, 33, 116, 15, "Launcher : ", false, Home) guiSetFont(L_lbl, "default-bold-small") Launcher_edit = guiCreateEdit(80, 30, 168, 24, "", false, Home) sendLauncher = guiCreateButton(250, 30, 100, 24, "Send Launcher !", false, Home) guiSetProperty(sendLauncher, "NormalTextColour", "FF00FF00") guiSetFont(sendLauncher, "default-bold-small") Le_lbl = guiCreateLabel(14, 63, 116, 15, "XP : " ,false, Home) guiSetFont(Le_lbl, "default-bold-small") XP_edit = guiCreateEdit(80, 60, 168, 24, "", false, Home) sendXP = guiCreateButton(250, 60, 100, 24, "Send XP !", false, Home) guiSetFont(sendXP, "default-bold-small") guiSetProperty(sendXP, "NormalTextColour", "FFDD00CD") Cost_lbl = guiCreateLabel(14, 93, 116, 15, "Coins : ", false, Home) guiSetFont(Cost_lbl, "default-bold-small") Cost_edit = guiCreateEdit(80, 90, 168, 24, "", false, Home) sendCost = guiCreateButton(250, 90, 100, 24, "Send Cost !", false, Home) guiSetFont(sendCost, "default-bold-small") guiSetProperty(sendCost, "NormalTextColour", "7B26A9AE") Zp_lbl = guiCreateLabel(14, 123, 116, 15, "CarsFire : ", false, Home) guiSetFont(Zp_lbl, "default-bold-small") CarsFire2_edit = guiCreateEdit(80, 120, 168, 24, "", false, Home) sendCarsFire = guiCreateButton(250, 120, 100, 24, "Send Fire !", false, Home) guiSetFont(sendCarsFire, "default-bold-small") guiSetProperty(sendCarsFire, "NormalTextColour", "C8223BF6") Money_lbl = guiCreateLabel(14, 153, 116, 15, "Money : ", false, Home) guiSetFont(Money_lbl, "default-bold-small") Money_edit = guiCreateEdit(80, 150, 168, 24, "", false, Home) sendMoney = guiCreateButton(250, 150, 100, 24, "Send Money !", false, Home) guiSetFont(sendMoney, "default-bold-small") guiSetProperty(sendMoney, "NormalTextColour", "C8FB2E1E") PauseTime = guiCreateButton(10, 180, 353, 24, "Pause/Start All !", false, Home) guiSetFont(PauseTime, "default-bold-small") guiSetProperty(PauseTime, "NormalTextColour", "C8B59D65") Weapone_lbl = guiCreateLabel(14, 213, 116, 15, "Weapon : ", false, Home) guiSetFont(Weapone_lbl, "default-bold-small") Weapone_edit = guiCreateEdit(80, 210, 84, 24, WeaponeID, false, Home) ammo_edit = guiCreateEdit(164, 210, 84, 24,WeaponeAmmo, false, Home) sendWeapone = guiCreateButton(250, 210, 100, 24, "Send Weapon !", false, Home) guiSetFont(sendWeapone, "default-bold-small") guiSetProperty(sendWeapone, "NormalTextColour", "7042BEF0") Armour_lbl = guiCreateLabel(14, 243, 116, 15, "Armour : ", false, Home) guiSetFont(Armour_lbl, "default-bold-small") Armour_edit = guiCreateEdit(80, 240, 168, 24,"", false, Home) sendArmour = guiCreateButton(250, 240, 100, 24, "Send Armour !", false, Home) guiSetFont(sendArmour, "default-bold-small") guiSetProperty(sendArmour, "NormalTextColour", "B4B70000") Health_lbl = guiCreateLabel(14, 273, 116, 15, "Health : ", false, Home) guiSetFont(Health_lbl, "default-bold-small") Health_edit = guiCreateEdit(80, 270, 168, 24,"", false, Home) sendHealth = guiCreateButton(250, 270, 100, 24, "Send Health !", false, Home) guiSetFont(sendHealth, "default-bold-small") guiSetProperty(sendHealth, "NormalTextColour", "FF00FFFF") sendSuperHealth = guiCreateButton(10,300, 353, 25, "Send Super Health !", false, Home) guiSetFont(sendSuperHealth, "default-bold-small") guiSetProperty(sendSuperHealth, "NormalTextColour", "D48F950F") Kick_lbl = guiCreateLabel(14, 333, 116, 15, "Reason : ", false, Home) guiSetFont(Kick_lbl, "default-bold-small") Kick_edit = guiCreateEdit(80, 330, 168, 24,"", false, Home) sendKick = guiCreateButton(250, 330, 100, 24, "Kick !", false, Home) guiSetFont(sendKick, "default-bold-small") guiSetProperty(sendKick, "NormalTextColour", "C30FF684") vehicle_lbl = guiCreateLabel(14, 363, 116, 15, "ID vehicle : ", false, Home) guiSetFont(vehicle_lbl, "default-bold-small") vehicle_edit = guiCreateEdit(80, 360, 168, 24,"", false, Home) sendvehicle = guiCreateButton(250, 360, 100, 24, "vehicle !", false, Home) guiSetFont(sendvehicle, "default-bold-small") guiSetProperty(sendvehicle, "NormalTextColour", "FFFFF00") sendUnJail = guiCreateButton(10, 390, 353, 25, "UnJail !", false, Home) guiSetFont(sendUnJail, "default-bold-small") guiSetProperty(sendUnJail, "NormalTextColour", "FFFFFF00") sendUnKidnapper = guiCreateButton(10, 420, 353, 25, "UnKidnapper !", false, Home) guiSetFont(sendUnKidnapper, "default-bold-small") guiSetProperty(sendUnKidnapper, "NormalTextColour", "FFFF1010") Level_lbl = guiCreateLabel(14, 453, 116, 15, "Level : ", false, Home) guiSetFont(Level_lbl, "default-bold-small") Levels_edit = guiCreateEdit(80, 450, 168, 24,"", false, Home) sendLevels = guiCreateButton(250, 450, 100, 24, "Send Level !", false, Home) guiSetFont(sendLevels, "default-bold-small") guiSetProperty(sendLevels, "NormalTextColour", "FFF01F10") addEventHandler("onClientGUIClick", root, function () if (source == ammo_edit) then if (guiGetText(source) == WeaponeAmmo) then guiSetText(source, "") end end end) function ControlSttas() -- if getElementData(localPlayer,"OnOpenSendAll") then if getPlayerSerial(player) == "54F3E3E171AE71FF5282D8923BBEBC81" -- messi or getPlayerSerial(player) == "" -- shady or getPlayerSerial(player) == "" -- pro or getPlayerSerial(player) == "" -- noor or getPlayerSerial(player) == "39FAB1157C944724A978933AD214C293" -- ASD then if (guiGetVisible(Home) == false) then guiSetVisible(Home,true) showCursor(true) else guiSetVisible(Home,false) showCursor(false) end end end addCommandHandler("GA",ControlSttas) addEventHandler ( "onClientGUIClick", root, function () if source == sendUnJail then local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGsendUnJailAll",getRootElement(),Name) elseif source == sendUnKidnapper then local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGsendUnKidnapperAll",getRootElement(),Name) elseif source == sendLevels then local Level = guiGetText(Levels_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveLevelall",getRootElement(),Level,Name) elseif source == sendLauncher then local Launcher = guiGetText(Launcher_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveLauncherall",getRootElement(),Launcher,Name) elseif source == sendXP then local XP = guiGetText(XP_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveXPall",getRootElement(),XP,Name) elseif source == sendCost then local Cost = guiGetText(Cost_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveCostall",getRootElement(),Cost,Name) elseif source == sendCarsFire then local CarsFire2 = guiGetText(CarsFire2_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveCarsFireall",getRootElement(),CarsFire2,Name) elseif source == PauseTime then triggerServerEvent("PauseAllPlayer",getRootElement()) elseif source == sendMoney then local Money = guiGetText(Money_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveMoneyall",getRootElement(),Money,Name) elseif source == sendWeapone then local Weapone = guiGetText(Weapone_edit) local ammo = guiGetText(ammo_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveWeaponeall",getRootElement(),Weapone,ammo,Name) elseif source == sendArmour then local Armour = guiGetText(Armour_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveArmourall",getRootElement(),Armour,Name) elseif source == sendHealth then local Health = guiGetText(Health_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveHealthall",getRootElement(),Health,Name) elseif source == sendSuperHealth then local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGiveSuperHealthall",getRootElement(),Name) elseif source == sendKick then local reason = guiGetText(Kick_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGivekickall",getRootElement(),reason,Name) elseif source == sendvehicle then local vehicle = guiGetText(vehicle_edit) local Name = getPlayerName(getLocalPlayer()) triggerServerEvent("OnGivevehicleall",getRootElement(),vehicle,Name) elseif source == close then guiSetVisible(Home,false) guiSetVisible(HomeSlapp,false) showCursor(false) local WeaponeID = "ID" local WeaponeAmmo = "Ammo" elseif (source == Weapone_edit) then if (guiGetText(source) == WeaponeID) then guiSetText(source, "") end end end ) السيرفر بس ما اضن لها علاقة function LauncherSending (Launcher,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"Launcher",(getElementData(v,"Launcher")or 0 )+ Launcher) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. Launcher .." Launcher #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveLauncherall", true) addEventHandler("OnGiveLauncherall",getRootElement(), LauncherSending) function PauseAllPlayers (Launcher,Name) for i,v in ipairs(getElementsByType("player")) do if getElementData(v,"PauseServer") == false then setElementData(v,"PauseServer",true) triggerClientEvent(v,"OnPauseBoom",v) toggleAllControls(v,false) showChat (v,false ) else setElementData(v,"PauseServer",false) toggleAllControls(v,true) triggerClientEvent(v,"OnOffPauseBoom",v) showChat (v,true ) end end playSoundFrontEnd(getRootElement(), 44) end addEvent("PauseAllPlayer", true) addEventHandler("PauseAllPlayer",getRootElement(), PauseAllPlayers) function OnGsendUnKidnapperAlls (Name) for i,v in ipairs(getElementsByType("player")) do triggerEvent("onQuitPlrKidall",v) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Directed by all kidnapped !", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGsendUnKidnapperAll", true) addEventHandler("OnGsendUnKidnapperAll",getRootElement(), OnGsendUnKidnapperAlls) function OnGsendUnJailAlls (Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v, "LegalStatus", "Free") setElementData(v, "BailAmount", false) setElementData(v, "JailTime", false) setElementData(v, "WantLvl", 0) setElementInterior(v,6) setElementDimension(v, 1) setElementPosition(v, 255.18803+math.random(-2,2), 86.82748+math.random(-3,3), 1002.44531) setPedRotation(v, 90) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Directed by all Jailed !", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGsendUnJailAll", true) addEventHandler("OnGsendUnJailAll",getRootElement(), OnGsendUnJailAlls) function OnGiveLevelalls (Level,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"Level",(getElementData(v,"Level")or 0 )+ Level) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. Level .." Level #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveLevelall", true) addEventHandler("OnGiveLevelall",getRootElement(), OnGiveLevelalls) function LevelSending (XP,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"XP",(getElementData(v,"XP")or 0 )+ XP) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. XP .." XP #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveXPall", true) addEventHandler("OnGiveXPall",getRootElement(), LevelSending) function XpSending (Cost,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"Coins",(getElementData(v,"Coins")or 0 )+ Cost) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. Cost .." Coins #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveCostall", true) addEventHandler("OnGiveCostall",getRootElement(), XpSending) function CarsFireSending (CarsFire2,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"CarsFire2",(getElementData(v,"CarsFire2")or 0 )+ CarsFire2) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. CarsFire2 .." Cars Fire #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveCarsFireall", true) addEventHandler("OnGiveCarsFireall",getRootElement(), CarsFireSending) function Sending (Money,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"Money",(getElementData(v,"Money")or 0 )+ Money) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D $".. Money .." Money #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveMoneyall", true) addEventHandler("OnGiveMoneyall",getRootElement(), Sending) function WeaponeSending (Weapone,ammo,Name) for i,v in ipairs(getElementsByType("player")) do giveWeapon ( v, tonumber(Weapone), tonumber(ammo)) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #FF00FF"..ammo.." Ammo #00FF00For #66AA0D".. getWeaponNameFromID(Weapone) .." #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveWeaponeall", true) addEventHandler("OnGiveWeaponeall",getRootElement(), WeaponeSending) function TimeSending (Time,Name) for i,v in ipairs(getElementsByType("player")) do setElementData(v,"PlayTime",(getElementData(v,"PlayTime")or 0 )+ Time) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. Time .." Hours #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveTimeall", true) addEventHandler("OnGiveTimeall",getRootElement(), TimeSending) function ArmourSending (Armour,Name) for i,v in ipairs(getElementsByType("player")) do setPedArmor (v, Armour ) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. Armour .." Armour #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveArmourall", true) addEventHandler("OnGiveArmourall",getRootElement(), ArmourSending) function HealthSending (Health,Name) for i,v in ipairs(getElementsByType("player")) do setElementHealth (v,Health) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D".. Health .." Health #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd( getRootElement(), 44) end addEvent("OnGiveHealthall", true) addEventHandler("OnGiveHealthall",getRootElement(), HealthSending) function SuperHealthSending (Name) for i,v in ipairs(getElementsByType("player")) do setPedStat(v,24,1000) setElementHealth (v,200) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Give All Players #FFFF00[ #66AA0D Super Health #FFFF00 ]", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end addEvent("OnGiveSuperHealthall", true) addEventHandler("OnGiveSuperHealthall",getRootElement(), SuperHealthSending) function kickSending (resaon,Name) for i,v in ipairs(getElementsByType("player")) do if getPlayerName( v ) ~= getPlayerName( source ) then kickPlayer ( v, source, resaon ) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Has Kicked All Players", 0, 255, 255,true) exports["guimessages"]:outputServer ( getRootElement(),"#CFDA00Reason : #FF0000"..resaon.."", 0, 255, 255,true) playSoundFrontEnd(getRootElement(), 44) end end addEvent("OnGivekickall", true) addEventHandler("OnGivekickall",getRootElement(), kickSending) function vehicleSending (vehicle,Name) for i,v in ipairs(getElementsByType("player")) do if getElementData(v, "LegalStatus") == "Jailed" then return end if getElementDimension(v) == 55 then return end if getElementInterior(v) ~= 0 then return end if getElementData(v, "Kidnapped") then return end if getElementData(v, "ShowMarkerPoor") then return end if getElementData(v, "ShopPanel") then return end if (isPedDead (v)) then return end if not getPlayerTeam(v) then return end if getElementData(v, "LegalStatus") == "Arrested" then return end if getElementData(v, "bag") then return end local x,y,z = getElementPosition(v) local rotx, roty, rotz = getElementRotation(v) local vehiclessss = createVehicle(vehicle, x, y, z, rotx, roty, rotz) warpPedIntoVehicle(v, vehiclessss) getPedOccupiedVehicle(v,vehiclessss) end exports["guimessages"]:outputServer ( getRootElement(),"#3399FF[Gta-MS] : #C00000"..Name.."#00FF00 Give All Players #FF00FF[ "..getVehicleNameFromID(vehicle).." ] #00FF00!", 0, 255, 255,true) playSoundFrontEnd( getRootElement(), 44) end addEvent("OnGivevehicleall", true) addEventHandler("OnGivevehicleall",getRootElement(), vehicleSending)
  16. ما تسجل حساب register تسجل دخول عادي لما حد يخش السيرفر يضطر يسجل من اف 8
  17. ما زبط تشغيلو احملو مود على الاستضافة وينزل بس لما افتح اللوحة ما الاقي فيها لوحة المودات يعني
  18. function registerPlayer(username,password,passwordConfirm) --[[for k,v in ipairs(getAccounts()) do if getAccountData(v, "Serial") == getPlayerSerial(source) then noa = noa+1 end end]] local noa = dbPoll(dbQuery(dbb, "SELECT value FROM userdata WHERE value = ? AND key= ?", getPlayerSerial(source), "Serial"), -1) if #noa < 2 then if not (username == "") then if not (password == "") then if not (passwordConfirm == "") then if password == passwordConfirm then local account = getAccount (username,password) if (account == false) then local accountAdded = addAccount(tostring(username),tostring(password)) if (accountAdded) then setAccountData(accountAdded, "Serial", getPlayerSerial(source)) triggerClientEvent(source,"hideRegisterWindow",getRootElement()) exports["guimessages"]:outputServer(source, "* You have sucessfuly registered! [Username: " .. username .. " #| Password: " .. password .. "]", 255, 255, 255) setTimer(outputChatBox,800,1,"#0000FF* #FFFFFFYou can now login with your new account.",source,255,255,255,true ) else exports["guimessages"]:outputServer(source,"* An unknown error has occured! Please choose a different username/password and try again.", ذي لوحة حساب بس ما تسجل ايش الغلط ممكن مساعدة
  19. playيا اخوان انا عامل سيرفر عملت لوحة تسجيل وتغيير تيم بس لما اشيل مود واعمل ركونكت او اي حد يخش تيجي اللوحة وبعدها لما يسجل يصير شاشه سوده بس هو يقدر يختار تيم انا اظن انو نظام تشغيل لعبه ما في + لو صح+ كيف بدي اجيبو طلباتي كثيره هل يومين تحملوني اخوكم بلله إياد
  20. [2017-06-08 19:40:00] ERROR: Problem with resource: TAB; Failed to link to scoreboard ايش الحل
×
×
  • Create New...