max-mohammed

وين ردكم شباب

الكود اشتغل مشكوووووور بس ممكن تقول لي وش كان الخطأ عشان ما أقع في ثاني edit #1: بس في شيء ما اشتغل لما اضغط اطفاء ما يبي يطفي السيارة ولما اضغط تشغيل ما يبي يشغل السيارة addEventHandler("onClientGUIClick",root, function () local id = guiGridListGetItemData (grid, guiGridListGetSelectedItem (grid), 2) if source == btn_stop then if ( guiGridListGetSelectedItem(grid) == -1 ) then return outputChatBox("* من فضلك اختر سياره لااطفائها",255,0,0) end if swtch == true then engineRestoreModel(id) swtch = false elseif swtch == false then engineLoadTXD(id".txd") engineImportTXD(id".txd",id1) engineLoadDFF(id".dff") engineReplaceModel(id".dff",id1) swtch = true end end end )

الدي بق ما يقول شيء وكمان ما اشتغل وهذا الكود كااامل w = guiCreateWindow(360, 95, 229, 393, "TEXT", false) guiWindowSetSizable(w, false) grid = guiCreateGridList(9, 21, 210, 275, false, w) guiGridListAddColumn(grid, "#", 0.2) guiGridListAddColumn(grid, "السيارات", 0.9) btn_stop = guiCreateButton(20, 308, 189, 35, "اطفاء / تشغيل السياره", false, w) guiSetFont(btn_stop, "default-bold-small") guiSetProperty(btn_stop, "NormalTextColour", "FFFF0000") --------------------- cars = { {"Camry",406}, } for i,v in ipairs(cars) do local row = guiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,''..i..'-',false,false) guiGridListSetItemText(grid,row,2,v[1],false,false) guiGridListSetItemData(grid,row,2,v[2]) guiGridListSetItemColor(grid,row,1,255,0,0) guiGridListSetItemColor(grid,row,2,0,255,0) end -------- addEventHandler("onClientGUIClick",root, function () if source == btn_stop then if (guiGridListGetSelectedItem(grid)) then if swtch = true then local id = guiGridListGetItemData (grid, guiGridListGetSelectedItem (grid), 2) engineRestoreModel(id) swtch = false elseif swtch = false local id1 = guiGridListGetItemData (grid, guiGridListGetSelectedItem (grid), 2) engineLoadTXD(id1".txd") engineImportTXD(id1".txd",id1) engineLoadDFF(id1".dff") engineReplaceModel(id1".dff",id1) swtch = true end else outputChatBox("* من فضلك اختر سياره لااطفائها",255,0,0) end end end ) قول لي وش الخطأ لو سمحت + صححه

سلام عليكم كيفكم ان سويت مود تشغيل واطفاء سيارات عشان اللاق للزوار يخف المهم سويت لوحة وازرار بس اللوحة ماتبي تظهر swtch = true cars = { {"Camry",411} } for i,v in ipairs(cars) do local row = guiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,''..i..'-',false,false) guiGridListSetItemText(grid,row,2,v[1],false,false) guiGridListSetItemData(grid,row,2,v[2]) guiGridListSetItemColor(grid,row,1,255,0,0) guiGridListSetItemColor(grid,row,2,0,255,0) end --- addEventHandler("onClientGUIClick",root, function () if source == btn_stop then if (guiGridListGetSelectedItem(grid)) then if swtch = true then local id = guiGridListGetItemData (grid, guiGridListGetSelectedItem (grid), 2) engineRestoreModel(id) swtch = false elseif swtch = false local id1 = guiGridListGetItemData (grid, guiGridListGetSelectedItem (grid), 2) engineLoadTXD(id1".txd") engineImportTXD(id1".txd",id1) engineLoadDFF(id1".dff") engineReplaceModel(id1".dff",id1) swtch = true end else outputChatBox("* من فضلك اختر سياره لااطفائها",255,0,0) end end end ) اتمنى تصلحون المشكلة + قولو لي مكانها عشان ما اقع في نفس الخطأ مرة ثانية

وين رحتو

اولا:مشكوور ياتابل على تصحيح الاخطاء ثانيا:انا عندي زر واحد للتسجيل الي اسمه reg والي اسمه login لتسجيل الدخول وكل واحد له ترايقر غير عن الثاني ثالثا:نفس المشكلة السابقة الازرار لما اضغط عليها ما تسوي شيء واتمنى انه تجيبو حل

مشكور انك ورتني ذا الخطأ ولكن ماتغيير شيء لما اضغط اي زر ميصير شيء

اضفته لكن نفس المشكلة المشكلة : النافذة تجي بس لما اكتب الاسم والباس واضغط login مايسجل دخول ولما اضغط Register ما يتغيير شيء تأاكد من الكود

وييييييييينكم ليه محد يرد؟؟؟؟؟؟؟؟؟؟؟؟؟

اكتشفت ان اللوحة ظهرت لما ادخلت الكومند في اف8 انا ابيك تعدل الارتباط+النافذة تعمل لكن الازرار لا تعمل مثلا ابي اسجل دخول احط الاسم والباس ولما اضغط الزر ما يصير شيء تكفى صلحو الخطأ

للأسف نفس الخطأ الكود مشتغل

سلام عليكم ورحمة الله انا سويت نافذة تجسيل دخول واضفت فيه زر لحفظ الاسم والباس وخليتها تفت بإرتباط من مود ثاني executeCommandHandler("openLoginwndserver",getLocalPlayer()) ولكن لما يسوي الارتباط مايبي يطلع الوحة انا بعطيتك الملفين كاملين ابيكم تصلحو الاخطاء الي فيه بس سيرفر وكلنت client wnd = guiCreateStaticImage(204, 151, 612, 444, "window.png", false) guiSetVisible(wnd,false) GUIEditor.label[1] = guiCreateLabel(108, 145, 104, 48, "Username:", false, wnd) guiSetFont(GUIEditor.label[1], "default-bold-small") GUIEditor.label[2] = guiCreateLabel(113, 203, 215, 48, "Password:", false, wnd) guiSetFont(GUIEditor.label[2], "default-bold-small") name = guiCreateEdit(202, 140, 203, 28, "", false, wnd) pass = guiCreateEdit(202, 198, 203, 28, "", false, wnd) log_err = guiCreateLabel(178, 236, 253, 26, "", false, wnd) guiSetFont(log_err, "default-bold-small") guiLabelSetHorizontalAlign(log_err, "center", false) guiLabelSetColor(log_err,255,0,0) login = guiCreateButton(202, 272, 99, 45, "Login", false, wnd) goreg = guiCreateButton(311, 272, 99, 45, "Register", false, wnd) chekbox = guiCreateCheckBox(415, 180, 95, 18, "(save)", false, false, wnd) -------------||Register||---------------------- GUIEditor.label[3] = guiCreateLabel(108, 145, 104, 48, "Username:", false, wnd) guiSetFont(GUIEditor.label[3], "default-bold-small") REGname = guiCreateEdit(202, 140, 203, 28, "", false, wnd) REGpass = guiCreateEdit(202, 188, 203, 28, "", false, wnd) GUIEditor.label[4] = guiCreateLabel(112, 193, 104, 48, "Password:", false, wnd) guiSetFont(GUIEditor.label[4], "default-bold-small") Rpass = guiCreateEdit(202, 227, 203, 28, "", false, wnd) GUIEditor.label[5] = guiCreateLabel(70, 231, 104, 48, "Repeat Password:", false, wnd) guiSetFont(GUIEditor.label[5], "default-bold-small") back = guiCreateButton(317, 289, 88, 43, "Back", false, wnd) reg = guiCreateButton(206, 289, 88, 43, "Register", false, wnd) reg_err = guiCreateLabel(192, 258, 229, 31, "", false, wnd) guiSetFont(reg_err, "default-bold-small") guiLabelSetHorizontalAlign(reg_err, "center", false) guiSetVisible(GUIEditor.label[3], false) guiSetVisible(GUIEditor.label[4], false) guiSetVisible(GUIEditor.label[5], false) guiSetVisible(REGname, false) guiSetVisible(REGpass, false) guiSetVisible(Rpass, false) guiSetVisible(reg_err, false) guiSetVisible(back, false) guiSetVisible(reg, false) -------------- addEventHandler("onClientResourceStart",resourceRoot, function () local xmlFile = xmlLoadFile ("files/xml/userdata.xml") if not xmlFile then xmlFile = xmlCreateFile("files/xml/userdata.xml", "login") end local userN = xmlFindChild (xmlFile, "username", 0) local passN = xmlFindChild (xmlFile, "password", 0) if usernameNode and passwordNode then user = xmlNodeGetValue(userN) pas = xmlNodeGetValue(passN) getSetText(name,user) getSetText(pass,pas) else getSetText(name,"") getSetText(pass,"") end xmlSaveFile ( xmlFile ) xmlUnloadFile ( xmlFile ) end ) function saveLoginToXML(username, password) local xmlSFile = xmlLoadFile ("files/xml/userdata.xml") if not xmlSFile then xmlSFile = xmlCreateFile("files/xml/userdata.xml", "login") end if (username ~= "") then local usernameNode = xmlFindChild (xmlSFile, "username", 0) if not usernameNode then usernameNode = xmlCreateChild(xmlSFile, "username") end xmlNodeSetValue (usernameNode, tostring(username)) end if (password ~= "") then local passwordNode = xmlFindChild (xmlSFile, "password", 0) if not passwordNode then passwordNode = xmlCreateChild(xmlSFile, "password") end xmlNodeSetValue (passwordNode, tostring(password)) end xmlSaveFile(xmlSFile) xmlUnloadFile (xmlSFile) end addEvent("saveLoginToXML", true) addEventHandler("saveLoginToXML", getRootElement(), saveLoginToXML) addEventHandler("onClientGUIclick", root, function () if (source == goreg) then guiSetVisible(GUIEditor.label[1], false) guiSetVisible(GUIEditor.label[2], false) guiSetVisible(name, false) guiSetVisible(pass, false) guiSetVisible(log_err, false) guiSetVisible(goreg, false) guiSetVisible(login, false) guiSetVisible(GUIEditor.label[3], true) guiSetVisible(GUIEditor.label[4], true) guiSetVisible(GUIEditor.label[5], true) guiSetVisible(REGname, true) guiSetVisible(REGpass, true) guiSetVisible(Rpass, true) guiSetVisible(reg_err, true) guiSetVisible(back, true) guiSetVisible(reg, true) elseif (source == back) then guiSetVisible(GUIEditor.label[1], true) guiSetVisible(GUIEditor.label[2], true) guiSetVisible(name, true) guiSetVisible(pass, true) guiSetVisible(log_err, true) guiSetVisible(goreg, true) guiSetVisible(login, true) guiSetVisible(GUIEditor.label[3], false) guiSetVisible(GUIEditor.label[4], false) guiSetVisible(GUIEditor.label[5], false) guiSetVisible(REGname, false) guiSetVisible(REGpass, false) guiSetVisible(Rpass, false) guiSetVisible(reg_err, false) guiSetVisible(back, false) guiSetVisible(reg, false) elseif (source == reg) then local user = guiGetText(REGname) local pass = guiGetText(REGpass) local Rpass = guiGetText(Rpass) TriggerServerEvent("reg", getLocalPlayer(),user,pass,Rpass) elseif (source == log) then local username = guiGetText(name) local password = guiGetText(pass) local checksave = guiCheckBoxGetSelected(chekbox) TriggerServerEvent("log", getLocalPlayer(),username,password,checksave) end end ) addEvent("set_warning_text", true) addEventHandler("set_warning_text", getRootElement(), function (type, text) if (type == "Login") then guiSetText(log_err,text) setTimer(guiSetText,2000,1,log_err,"") elseif (type == "Register") then guiLabelSetColor(reg_err,255,0,0) guiSetText(reg_err,text) setTimer(guiSetText,2000,1,reg_err,"") end end ) addEvent("ww", true) addEventHandler("ww", getRootElement(), function (type, text) if (type == "Register") then guiLabelSetColor(reg_err,0,255,0) guiSetText(reg_err,text) setTimer(guiSetText,2000,1,reg_err,"") elseif (type == "login") then return end end ) addEvent("ss", true) addEventHandler("ss", getRootElement(), function () guiSetVisible(wnd,false) showCursor (false) fadeCamera(true) end ) addCommandHandler("openLoginwndserver" , function () guiSetVisible(wnd,true) showCursor (false) fadeCamera(true) showChat(true) end )

مشكوور + يعطيك العافية

سلام عليكم شباب انا عندي ماركر عشان محد يطلع سيارة في البداية بس المود مو شغال marker = createMarker(x,y,z "cylinder",40,255,0,0,255) الماركر محطي الظهور حقه كامل عشان اعرف اذا المراكر شغال ولا لا addEventHandler("onMarkerHit", root, function(element) if not isElement(element) and getElementType(element) == "Vehicle" then return end if (source == marker) then destroyElement(element) end end) اتمنى تصلحو الكود منتظر الردووود

event : "onPlayerDamage" getElementHealth setElementHealth setPedAnimation

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

مشكور يعطيك العافية

الكود ما اشتغل نفس المشكلة

السلام عليكم ورحمة الله شباب عندي نافذة بس ماتبي تفتح ممكن تجيبو الخطأ local win = guiCreateWindow(155, 151, 690, 439, "N/A", false) guiSetVisible(win , false) guiSetAlpha(win, 1.00) guiSetProperty(win, "CaptionColour", "FF0000FE") GUIEditor.label[1] = guiCreateLabel(16, 23, 664, 163, "N/A", false, win) guiLabelSetColor(GUIEditor.label[1], 77, 253, 0) guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiCreateLabel(451, 122, 162, 35, "N/A", false, win) guiCreateLabel(451, 176, 162, 35, "N/A", false, win) guiCreateLabel(451, 231, 162, 35, "N/A", false, win) local esm = guiCreateEdit(207, 119, 240, 28, "", false, win) local pass = guiCreateEdit(207, 173, 240, 28, "", false, win) local rkm = guiCreateEdit(207, 228, 240, 28, "", false, win) local ersl = guiCreateButton(295, 276, 63, 45, "N/A", false, win) guiSetProperty(ersl, "NormalTextColour", "FF35FD00") local hala = guiCreateLabel(26, 351, 550, 51, "", false, win) guiLabelSetHorizontalAlign(hala, "right", false) bindKey('F10','down',function() guiSetVisible(win , not guiGetVisible(win)) showCursor(not isCursorShowing()) end ) N/Aماعليكم منها والسلام عليكم ورحمة الله

الله يعطيك الف عافية بس متى الكود يخفي النافذة تدرجيا ومتى يظهرها تدرجيا؟ وش اعدل في وكيف؟

+ setTimer killTimer -- (إختياري (مستحسن ممكن تعطوني مثال لو سمحتو +مشكور يا تابل على تصحيح الاخطاء

وينكم

السلام عليكم انا سويت لوحة ترحيبية بشرح لكم كيف ابيها اولا من يوم مايدخل سويت فنكشن عشان يخلي fadeCamera(false) ويطلع صورة ترحيب وبعد ثانيتين تختفي واتجي صورتين ثانية بعدها بس يمكن تعطوني كود يخلي صورة الترحيب يوم تختفي تختفي تدرجيا والصورتين الي بعدها تظهر تدرجيا وكمان الكود فيه اخطاء addEventHandler("onClientResourceStart",getElementRoot(), function () loc = getLocalPlayer() win = guiCreateStaticImage(84, 86, 831, 604, "imgs/wel.png", false) ha = guiCreateStaticImage(580, 187, 279, 359, "imgs/ha.png", false) guiSetVisible(ha, false) wa = guiCreateStaticImage(153, 187, 279, 359, "imgs/wa.png", false) guiSetVisible(wa, false) showCursor (true) fadeCamera(loc,false) setTimer(guiSetVisible,2000,1,win,false) setTimer(guiSetVisible,3000,1,ha,true) setTimer(guiSetVisible,3000,1,wa,true) end ) والسلام خير الختام

مشكورين على الاكواد بس لما المس اي ماركر يقول الديبق RA\marker.lua:96: Bad 'vehicle' pointer @ 'getVehicleOccupant'(1) الكود addEventHandler ("onMarkerHit",getRootElement(), function (hitPlayer) if (source == los) then local vh = getVehicleOccupant(hitPlayer) destroyElement(vh) setElementPosition(hitPlayer, x, y, z) setElementDimension(hitPlayer,0) elseif (source == winr) then local vh = getVehicleOccupant(hitPlayer) local acc = getPlayerAccount(hitPlayer) if acc and not isGuestAccount(acc) then setAccountData (acc, "ro5sa","yes") destroyElement(vh) setElementPosition(hitPlayer, x, y, z) setElementDimension(hitPlayer,0) end elseif (source == win1) then local vh = getVehicleOccupant(hitPlayer) local Speed = getElementSpeed(hitPlayer, "kph") if (Speed >= 90) then destroyElement(vh) setElementPosition(hitPlayer, x, y, z) setElementDimension(hitPlayer ,0) end end end ) اما كود السرعة جبته من الويكي ولازم اضيفه في سيرفر function getElementSpeed(element,unit) if (unit == nil) then unit = 0 end if (isElement(element)) then local x,y,z = getElementVelocity(element) if (unit=="mph" or unit==1 or unit =='1') then return (x^2 + y^2 + z^2) ^ 0.5 * 100 else return (x^2 + y^2 + z^2) ^ 0.5 * 1.8 * 100 end else outputDebugString("Not an element. Can't get speed") return false end end

شباب عرفت المشكلة وحليتها المهم الحين في خطأ ثاني هو addEventHandler ("onMarkerHit",getRootElement(), function (hitPlayer, unit) if (source == los) and vh then local vh = getVehicleOccupant(hitPlayer) destroyElement(vh) setElementPosition(hitPlayer, x, y, z) setElementDimension(hitPlayer,766) elseif (source == winr) and vh then local vh = getVehicleOccupant(hitPlayer) local acc = getPlayerAccount(hitPlayer) if acc and not isGuestAccount(acc) then setAccountData (acc, "ro5sa","yes") destroyElement(vh) setElementPosition(hitPlayer, x, y, z) setElementDimension(hitPlayer,766) end elseif (source == win1) and vh then local vh = getVehicleOccupant(hitPlayer) if (unit == nil) then unit = 0 end if (unit == "kbh") then local Speed = getElementSpeed(hitPlayer, unit) if (Speed >= 90) then destroyElement(vh) setElementPosition(hitPlayer, x, y, z) setElementDimension(hitPlayer ,766) end end end end ) هذا هو وممكن طلب آخر انه لو ضغط انتر او حرف ب مايقدر ينزل من السيارة لو كان في العالم الوهمي 766