Mr.KoK

خلاص حليتها بنفسي

المود تمام بس وقت تسجيل الدخول توقف الاغنية

السلام عليكم ورحمة الله وبركاته شباب محتاج مساعد بخصوص الـ قيم مود ابي الاغنية توقف لما يختار الشخصية وانا حاولت وماعرفت local Anims = {"DAN_UP_A", "dnce_M_b", "DAN_Left_A", "DAN_Down_A", "DAN_Loop_A", "dance_loop"} x, y = guiGetScreenSize() font="default-bold" fontTam=5 spcGam=dxGetTextWidth ("حرب جدة",fontTam,font) function intro() ahora = getTickCount() count=ahora-start dxDrawImage(0, 0, x, y, 'fondo.png',0,0,0,tocolor(255,255,255),false) sizeX=64*1.21 sizeY=64*1.21 varX,varY,varZ = anim(start,1000,spcGam,0,0,0,spcGam,150,"OutBack") dxDrawText("حرب جدة",0+x/2-varY/2,y/2-100,varY+x/2-varY/2,y,tocolor(38,205,0,255),fontTam,font,nil,nil,true) dxDrawText("",1+x/-varY/6-dxGetTextWidth ("i",fontTam,font),y/2-100,varY+x/2-varY/2,y,tocolor(255,255,255,255),fontTam,font,nil,nil,false,false,false,true) dxDrawText("♥",x/2+varY/2,y/2-100,varY+x/2-varY/2,y,tocolor(255,255,255,255),fontTam,font,nil,nil,false,false,false,true) if (count>1500) then varX2,varY2,varZ2 = anim(start+1500,1000,0,0,0,200,250,360,"OutBack") dxDrawText("اهلا و سهلا بكم في سيرفر حرب جدة ",0+x/2-varY/2,y/2-100+dxGetFontHeight(fontTam,font),varY+x/2-varY/2,y,tocolor(255,255,255,varX2),1.5,font,"center",nil,false,false,false,true) dxDrawText("نتمنا ان ينال السيرفر اعجابكم",0+x/2-varY/2,y/2-80+dxGetFontHeight(fontTam,font),varY+x/2-varY/2,y,tocolor(255,255,255,varX2),1.5,font,"center",nil,false,false,false,true) dxDrawText("Welcome to sever War Jeddah ..",0+x/2-varY/2,y/2-60+dxGetFontHeight(fontTam,font),varY+x/2-varY/2,y,tocolor(255,255,255,varX2),1.5,font,"center",nil,false,false,false,true) end if (count>2000) then varX2,varY3,varZ3 = anim(start+2000,1000*10,0,0,0,200,250,360*5,"Linear") dxDrawImage ( x/2-sizeX/2, y/2+50, sizeX, sizeY, 'img/cargando2.png',180+varZ3) dxDrawText("Loading..",12,y/2+60+sizeY+1,x,y,tocolor(0,0,0,85),1.5,font,"center",nil,false,false,false,true) dxDrawText("Loading..",10,y/2+60+sizeY,x,y,tocolor(255,255,255,255),1.5,font,"center",nil,false,false,false,true) end end function anim(tag,animTime,de1,de2,de3,hasta1,hasta2,hasta3,typeAnim) local now = getTickCount() local endTime = tag + animTime local elapsedTime = now - tag local duration = endTime - tag local progress = elapsedTime / duration local a, b, c = interpolateBetween ( de1,de2,de3,hasta1,hasta2,hasta3, progress, typeAnim) return a, b, c end fileDelete("intro_c.lua") local sx, sy = guiGetScreenSize() alpha = 250 MP = "files/1.png" MX = sx MY = sy function adjIntro(adj) _, times = getTimerDetails(IntroTimer) if adj == "M1" then MX = (MX*0.95)+5 MY = (MY*0.95) if times == 1 then setTimer(function() if (alpha <= 250) and not (alpha <= 0) then alpha = alpha - 10 else IntroTimer = setTimer(adjIntro, 50, 26, "M2") end end, 50, 26) end elseif adj == "M2" then if (alpha < 250) and (alpha >= 0) then alpha = alpha + 10 end MX = (MX/0.95)-5 MY = (MY/0.95) MP = "files/2.png" if times == 1 then setTimer(function() MP = "files/3.png" setTimer(function() IntroTimer = setTimer(adjIntro, 50, 26, "M3") end, 3500, 1) end, 4000, 1) end elseif adj == "M3" then MX = (MX*0.95)+5 MY = (MY*0.95) if times == 1 then MP = "files/4.png" MX = (MX/0.95)-5 MY = (MY/0.95) setTimer(function() setTimer(function() if (alpha <= 250) and not (alpha <= 0) then alpha = alpha - 10 else removeEventHandler("onClientRender", root, drawIntro) fadeCamera(true, 6, 0, 0, 0) setCameraMatrix(-1475.5, 831.18, 65.5, -1487.5, 800.18, 65.5) showCursor(true) guiSetVisible(GUIEditor.window[1], true) destroyElement(IntroSong) end end, 50, 26) end, 3500, 1) end end end function drawIntro() dxDrawImage(sx/2-(MX/2), sy/2-(MY/2), MX, MY, MP, 0, 0, 0, tocolor(255, 255, 255, alpha)) end function main() fadeCamera(false, 0) showChat(false) IntroSong = playSound("files/Intro.mp3") showPlayerHudComponent("all", false) start = getTickCount() addEventHandler("onClientRender",getRootElement(),intro) setTimer ( function() removeEventHandler("onClientRender",getRootElement(),intro) IntroTimer = setTimer(adjIntro, 50, 26, "M1") addEventHandler("onClientRender", root, drawIntro) triggerEvent("onFinishIntro",getRootElement()) setCameraMatrix(-1475.5, 831.18, 65.5, -1487.5, 800.18, 65.5) end, 5000, 1 ) end addEventHandler("onClientResourceStart",getResourceRootElement(getThisResource()),main) GUIEditor = { tab = {}, tabpanel = {}, edit = {}, button = {}, window = {}, label = {}, memo = {} } GUIEditor.window[1] = guiCreateWindow(sx/2-(601/2), sy/2-(344/2), 601, 344, "", false) guiSetVisible(GUIEditor.window[1], false) guiWindowSetSizable(GUIEditor.window[1], false) guiSetAlpha(GUIEditor.window[1], 1.00) guiSetInputMode("no_binds_when_editing") GUIEditor.tabpanel[1] = guiCreateTabPanel(10, 21, 579, 313, false, GUIEditor.window[1]) -----------------------------|Login|----------------------------- GUIEditor.tab[1] = guiCreateTab("الدخول", GUIEditor.tabpanel[1]) local MainText = xmlNodeGetValue(xmlLoadFile("Main.xml")) or "" GUIEditor.memo[1] = guiCreateMemo(7, 8, 271, 270, MainText, false, GUIEditor.tab[1]) guiMemoSetReadOnly(GUIEditor.memo[1], true) GUIEditor.label[1] = guiCreateLabel(395, 28, 65, 18, "الاسم", false, GUIEditor.tab[1]) guiSetFont(GUIEditor.label[1], "default-bold-small") GUIEditor.edit[1] = guiCreateEdit(322, 50, 210, 30, "", false, GUIEditor.tab[1]) GUIEditor.label[2] = guiCreateLabel(395, 107, 65, 18, "كلمة المرور", false, GUIEditor.tab[1]) guiSetFont(GUIEditor.label[2], "default-bold-small") GUIEditor.edit[2] = guiCreateEdit(322, 130, 210, 30, "", false, GUIEditor.tab[1]) guiEditSetMasked(GUIEditor.edit[2], true) GUIEditor.button[1] = guiCreateButton(313, 207, 235, 34, "تسجيل دخول", false, GUIEditor.tab[1]) -----------------------------|Register|----------------------------- GUIEditor.tab[2] = guiCreateTab("التسجيل", GUIEditor.tabpanel[1]) GUIEditor.label[3] = guiCreateLabel(273, 26, 60, 19, "الاسم", false, GUIEditor.tab[2]) guiSetFont(GUIEditor.label[3], "default-bold-small") GUIEditor.edit[3] = guiCreateEdit(198, 49, 212, 27, "", false, GUIEditor.tab[2]) GUIEditor.label[4] = guiCreateLabel(273, 90, 60, 19, "كلمة المرور", false, GUIEditor.tab[2]) guiSetFont(GUIEditor.label[4], "default-bold-small") GUIEditor.edit[4] = guiCreateEdit(198, 119, 212, 27, "", false, GUIEditor.tab[2]) GUIEditor.label[5] = guiCreateLabel(256, 162, 107, 16, "اعادة كلمة المرور", false, GUIEditor.tab[2]) guiSetFont(GUIEditor.label[5], "default-bold-small") GUIEditor.edit[5] = guiCreateEdit(198, 188, 212, 27, "", false, GUIEditor.tab[2]) GUIEditor.button[2] = guiCreateButton(153, 233, 312, 36, "تسجيل", false, GUIEditor.tab[2]) -----------------------------|Rules|----------------------------- GUIEditor.tab[3] = guiCreateTab("القوانين", GUIEditor.tabpanel[1]) local RulesText = xmlNodeGetValue(xmlLoadFile("Rules.xml")) or "" GUIEditor.memo[2] = guiCreateMemo(10, 8, 559, 271, RulesText, false, GUIEditor.tab[3]) guiMemoSetReadOnly(GUIEditor.memo[2], true) addEventHandler("onClientGUIClick", root, function() if source == GUIEditor.button[1] then local userName = guiGetText(GUIEditor.edit[1]) local passWord = guiGetText(GUIEditor.edit[2]) if userName ~= "" and passWord ~= "" then triggerServerEvent("Login-Register", localPlayer, "Login", userName, passWord) guiSetEnabled(GUIEditor.button[1], false) setTimer(function() guiSetEnabled(GUIEditor.button[1], true) end, 3000, 1) end elseif source == GUIEditor.button[2] then local userName = guiGetText(GUIEditor.edit[3]) local passWord1 = guiGetText(GUIEditor.edit[4]) local passWord2 = guiGetText(GUIEditor.edit[5]) if userName ~= "" and passWord1 ~= "" and passWord2 ~= "" then if #passWord1 < 4 then outputChatBox("The Password should be at least 4 characters long.", 255, 100, 0) elseif passWord1 ~= passWord2 then outputChatBox("The password does not match.", 255, 0, 0) else guiSetEnabled(GUIEditor.button[2], false) setTimer(function() guiSetEnabled(GUIEditor.button[2], true) end, 3000, 1) triggerServerEvent("Login-Register", localPlayer, "Register", userName, passWord1) end end end end) addEvent("onLoginSuccess", true) addEventHandler("onLoginSuccess", root, function() guiSetVisible(GUIEditor.window[1], false) showCursor(false) local ped = createPed ( 0,737.40912 ,-1276.15332 ,13.554, 90) setPedAnimation( ped, "ped", "WALK_civi") local cam = setCameraMatrix ( 739.41571044922, -1276.4376220703, 13.415299797058, 738.42529296875, -1276.4196777344, 13.378232955933 ) setElementDimension( localPlayer, 20 ) setElementDimension( ped, 20 ) setTimer (function () setPedAnimation(ped,false) end, 6500, 1) setTimer (function () skinCount = 0 sPed = createPed(105, -2682.7624511719,1148.40100 ,19.59490) addEventHandler("onClientPedDamage",sPed,cancelEvent) sRight() bindKey("arrow_l", "down", sLeft) bindKey("arrow_r", "down", sRight) bindKey("enter", "down", EnterSpawn) addEventHandler("onClientPreRender", root, drawTeamName) destroyElement( ped ) setElementDimension( localPlayer, 0 ) setTime( 12, 0 )

حتلقيه في ملف اسمو handling اخر صطر امكتوب bindKey ( "F3", "down", show ) مكان F3 حط الزر الى تبيه

طيب انت حط ملف settings.lua عشان اقدر احل لك

اذا مانفع حط المود وانا ازبطو لك

function bindTheKeys () bindKey ( "F1" بالتوفيق

حطيت الكود و سويت restart للمود برضو مازبط

سويت زي ما قلت مازبط ممكن تعدلي وخلاص هذا ملف الـClient ----------------------- -- ** Buy Admin's Script -- Created By Mr.Pres[T]ege -- Ver 1.0.0 -- Mail : [email protected] -- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] ---------------------- ---------------------- -- Setting ---------------------- local Key = "F7" local Admin = { {"V.I.P","15"}, {"King.Dirft","20"}, {"King.Of.Time","25"}, {"Police","35"}, {"Moderator1","45"}, {"Moderator2","55"}, {"SuperModerator1","75"}, {"SuperModerator2","100"}, {"Admin1","150"}, {"Head.Admin","250"}, } ---------------------- -- Setting ---------------------- GiveAdmin = { Window = {}, gridlist = {}, button = {}, label = {}, } function centerWindow(center_window) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false); local x,y = (screenW-windowW)/2,(screenH-windowH)/2 guiSetPosition(center_window,x,y,false); end GiveAdmin.Window[1] = guiCreateWindow(343, 157, 427, 290, "ساعات الرتب #", false); centerWindow(GiveAdmin.Window[1]); guiSetVisible(GiveAdmin.Window[1],false); guiWindowSetSizable(GiveAdmin.Window[1], false); guiSetAlpha(GiveAdmin.Window[1], 1.00); guiSetProperty(GiveAdmin.Window[1], "CaptionColour", "FFFF00FF"); GiveAdmin.gridlist[1] = guiCreateGridList(9, 21, 409, 200, false, GiveAdmin.Window[1]); guiGridListAddColumn(GiveAdmin.gridlist[1], "الرتبة #", 0.6); guiGridListAddColumn(GiveAdmin.gridlist[1], "الساعات #", 0.2); GiveAdmin.button[1] = guiCreateButton(120,228,177,519, "اختيار الرتبة #", false, GiveAdmin.Window[1]); guiSetFont(GiveAdmin.button[1], "default-bold-small"); guiSetProperty(GiveAdmin.button[1], "NormalTextColour", "FF00FFFF"); for k,v in ipairs ( Admin ) do row = guiGridListAddRow(GiveAdmin.gridlist[1]); guiGridListSetItemText(GiveAdmin.gridlist[1],row,1,v[1],false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,2,v[2],false,false); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,255); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,2,0,255,2550); guiSetFont(GiveAdmin.gridlist[1],"default-bold-small"); end xMainFunctions_ = function ( ) local row, col = guiGridListGetSelectedItem ( GiveAdmin.gridlist[1] ) local Group = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,1 )); local Price = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,2 )); local Name = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,3 )); if ( row and col and row ~= -1 and col ~= -1 ) then triggerServerEvent("Accept:the:request",localPlayer,Group,Price,Name); else outputChatBox("# الرجاء اختيار رتبة",255,0,255,true); end end addEventHandler("onClientGUIClick",GiveAdmin.button[1],xMainFunctions_,false); xBindFunction_ = function () guiSetVisible(GiveAdmin.Window[1],not guiGetVisible(GiveAdmin.Window[1])); showCursor(guiGetVisible(GiveAdmin.Window[1])); end bindKey(Key,"down",xBindFunction_); وهذا ملف الـServer ----------------------- -- ** Buy Admin's Script -- Created By Mr.Pres[T]ege -- Ver 1.0.0 -- Mail : [email protected] -- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] ---------------------- xAddToGroupFunction_ = function ( Group,Price,Name ) local account = aclGroupGetName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("# الرجاء التسجيل اولا",source,255,0,255,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("# لديك هذيه الرتبه الرجاء اختيار رتبه اخرا",source,255,0,255,true); end local sValue = getElementData( source,'PlayTime' ) if not sValue then sValue = '0:0:0' end local data = split(sValue,':') local hour = tonumber( data[1] ) if hour == nil or not tonumber(hour) then hour = 0 end if ( hour >= tonumber(Price)) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("# تهانينا تمت الترقيه بنجاح "..Name,source,255,0,255,true); else outputChatBox("# الرجاء اكمال التواجد",source,255,0,255,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_)

مشكووووور

اخي ممكن تفهمني على الكود

السلام عليكم شباب ابي اطلب منكم طلب صغير ابي كود ماحد يقدر يفتح اف1 في الديربي وزي كذا لأنه تخبيص

كل شي تمام لكن اسم الرتبه مايطلع بل شات حق الرتب تمام انا اذا اشتريت اول شي مشرف 2 يجي بل شات مشرف 2 لكن لو بديت مثل كبار الشخصيات بعدين ابي ارقي نفسي لل كنق الدرفت مايتغير يجلس كبار الشخصيات لكن اذا شفتو من لوحة الادمن الرتبه موجوده لكن اسم الرتبه مايطلع بل شات

شكرا لكن ماعندك حل للمود

السلام عليكم ورحمة الله وبركاته كيفكم شباب انشاء الله بخير عندي مشكلة في مود شراء الرتب لما اشتري رتبه مثل مشرف1 يجيني في الشات مشرف1 تمام لكن لما اشتري مشرف2 مايتغير وانا ابي كود يحذف الرتبه الى قبلها انشاء الله فهمتوني ----------------------- -- ** Buy Admin's Script -- Created By Mr.Pres[T]ege -- Ver 1.0.0 -- Mail : [email protected] -- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] ---------------------- ---------------------- -- Setting ---------------------- local Key = "F7" local Admin = { {"V.I.P","15"}, {"King.Dirft","20"}, {"King.Of.Time","25"}, {"Police","35"}, {"Moderator1","45"}, {"Moderator2","55"}, {"SuperModerator1","75"}, {"SuperModerator2","100"}, {"Admin1","150"}, {"Head.Admin","250"}, } ---------------------- -- Setting ---------------------- GiveAdmin = { Window = {}, gridlist = {}, button = {}, label = {}, } function centerWindow(center_window) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false); local x,y = (screenW-windowW)/2,(screenH-windowH)/2 guiSetPosition(center_window,x,y,false); end GiveAdmin.Window[1] = guiCreateWindow(343, 157, 427, 290, "ساعات الرتب #", false); centerWindow(GiveAdmin.Window[1]); guiSetVisible(GiveAdmin.Window[1],false); guiWindowSetSizable(GiveAdmin.Window[1], false); guiSetAlpha(GiveAdmin.Window[1], 1.00); guiSetProperty(GiveAdmin.Window[1], "CaptionColour", "FFFF00FF"); GiveAdmin.gridlist[1] = guiCreateGridList(9, 21, 409, 200, false, GiveAdmin.Window[1]); guiGridListAddColumn(GiveAdmin.gridlist[1], "الرتبة #", 0.6); guiGridListAddColumn(GiveAdmin.gridlist[1], "الساعات #", 0.2); GiveAdmin.button[1] = guiCreateButton(120,228,177,519, "اختيار الرتبة #", false, GiveAdmin.Window[1]); guiSetFont(GiveAdmin.button[1], "default-bold-small"); guiSetProperty(GiveAdmin.button[1], "NormalTextColour", "FF00FFFF"); for k,v in ipairs ( Admin ) do row = guiGridListAddRow(GiveAdmin.gridlist[1]); guiGridListSetItemText(GiveAdmin.gridlist[1],row,1,v[1],false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,2,v[2],false,false); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,255); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,2,0,255,2550); guiSetFont(GiveAdmin.gridlist[1],"default-bold-small"); end xMainFunctions_ = function ( ) local row, col = guiGridListGetSelectedItem ( GiveAdmin.gridlist[1] ) local Group = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,1 )); local Price = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,2 )); local Name = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,3 )); if ( row and col and row ~= -1 and col ~= -1 ) then triggerServerEvent("Accept:the:request",localPlayer,Group,Price,Name); else outputChatBox("# الرجاء اختيار رتبة",255,0,255,true); end end addEventHandler("onClientGUIClick",GiveAdmin.button[1],xMainFunctions_,false); xBindFunction_ = function () guiSetVisible(GiveAdmin.Window[1],not guiGetVisible(GiveAdmin.Window[1])); showCursor(guiGetVisible(GiveAdmin.Window[1])); end bindKey(Key,"down",xBindFunction_);

اول شي سويته مود اخذ سيارة من الماركر على قد حالي