Jump to content

مممكن مساعدتي يااصحابي بليزز hellp


momar5700

Recommended Posts

سلام عليكم ورحمة الله وبركاته

انا سويت مود حفظ المكان بس واجهتني مشاكل ممكن تساعدوني

اجي اسوي حفظ مايظهر بالقريد

GUIEditor = { 
    gridlist = {}, 
    window = {}, 
    button = {}, 
    edit = {} 
} 
  
GUIEditor.window[1] = guiCreateWindow(100, 120, 400, 510, "Bookmarks", false) 
guiWindowSetSizable(GUIEditor.window[1], false) 
text = guiCreateEdit(10, 451, 225, 24, "bookmarkname", false, GUIEditor.window[1]) 
guiEditSetMaxLength(GUIEditor.edit[1], false) 
saveLocation = guiCreateButton(240, 451, 150, 20, "save current location", false, GUIEditor.window[1]) 
deleteLocation = guiCreateButton(10, 480, 225, 20, "delete selected location", false, GUIEditor.window[1]) 
closeswindow = guiCreateButton(240, 480, 150, 20, "close", false, GUIEditor.window[1]) 
bookmarklist = guiCreateGridList(9, 21, 382, 421, false, GUIEditor.window[1]) 
local name = guiGridListAddColumn(bookmarklist, "Name", 0.3) 
local zone = guiGridListAddColumn(bookmarklist, "Zone", 0.6)     
  
  
addCommandHandler('cj', 
function () 
    guiSetVisible(GUIEditor.window[1],not guiGetVisible(GUIEditor.window[1])) 
    showCursor(guiGetVisible(GUIEditor.window[1])) 
     guiMoveRightToCenter(GUIEditor.window[1]) 
end) 
  
addEventHandler("onClientGUIClick",root, 
function() 
if source == closeswindow then -- هنا يتحققق بأن الشيء اللي نبيه يشتغل عليه الحدث هو الزر حق الاغلاق  
guiSetVisible(GUIEditor.window[1],false) showCursor(false) -- هنا يغلق اللوحة ويشيل المؤشر بعد مايتحقق من الشرط 
end -- نهاية  
end -- .. 
) -- اقفال الحدث 
  
  
  
    TimeGuiSetRightC = { } 
  
    function guiMoveRightToCenter(gui) 
    if getElementData(gui,"HelhGui") == false then 
        setElementData(gui,"HelhGui",true) 
        local s1,s2=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (s1-w1)/2,(s2-w2)/2 
        guiSetPosition(gui,-x,y,false) 
    TimeGuiSetRightC[gui] = setTimer(guiMoveRightToCenter,50,0,gui) 
    end 
        local a,b=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (a-w1)/2,(b-w2)/2 
        local x1,y1 = guiGetPosition ( gui, false) 
    if (x1 >= x) then 
        killTimer(TimeGuiSetRightC[gui]) 
        setElementData(gui,"HelhGui",false) 
        else 
        guiSetPosition(gui,x1+20,y,false) 
    end 
    end 
     
    --------------------------- 
-- Bookmarks window 
--------------------------- 
  
local bookmarkList 
local bookmarks 
  
function initBookmarks () 
    bookmarkList = wndBookmarks.controls[1].element 
    if bookmarks then return end 
    loadBookmarks () 
    addEventHandler("onClientGUIDoubleClick",bookmarkList,gotoBookmark) 
end 
  
function loadBookmarks () 
    bookmarks = {} 
    local xml = xmlLoadFile("bookmarks.xml") 
    if not xml then 
        xml = xmlCreateFile("bookmarks.xml","catalog") 
    end 
    guiGridListClear(bookmarkList) 
    for i,child in ipairs (xmlNodeGetChildren(xml) or {}) do 
        local row = guiGridListAddRow(bookmarkList) 
        guiGridListSetItemText(bookmarkList,row,1,tostring(xmlNodeGetAttribute(child,"name")),false,false) 
        guiGridListSetItemText(bookmarkList,row,2,tostring(xmlNodeGetAttribute(child,"zone")),false,false) 
        bookmarks[row+1] = {tonumber(xmlNodeGetAttribute(child,"x")),tonumber(xmlNodeGetAttribute(child,"y")),tonumber(xmlNodeGetAttribute(child,"z"))} 
    end 
end 
  
function saveBookmarks () 
    if fileExists("bookmarks.xml") then 
        fileDelete("bookmarks.xml") 
    end 
    local xml = xmlCreateFile("bookmarks.xml","catalog") 
    for row=0,(guiGridListGetRowCount(bookmarkList)-1) do 
        local child = xmlCreateChild(xml,"bookmark") 
        xmlNodeSetAttribute(child,"name",guiGridListGetItemText(bookmarkList,row,1)) 
        xmlNodeSetAttribute(child,"zone",guiGridListGetItemText(bookmarkList,row,2)) 
        xmlNodeSetAttribute(child,"x",tostring(bookmarks[row+1][1])) 
        xmlNodeSetAttribute(child,"y",tostring(bookmarks[row+1][2])) 
        xmlNodeSetAttribute(child,"z",tostring(bookmarks[row+1][3])) 
    end 
    xmlSaveFile(xml) 
    xmlUnloadFile(xml) 
end 
  
function saveLocation () 
    local name = getControlText(wndBookmarks,"bookmarkname") 
    if name ~= "" then 
        local x,y,z = getElementPosition(g_Me) 
        local zone = getZoneName(x,y,z,false) 
        if x and y and z then 
            local row = guiGridListAddRow(bookmarkList) 
            guiGridListSetItemText(bookmarkList,row,1,name,false,false) 
            guiGridListSetItemText(bookmarkList,row,2,zone,false,false) 
            bookmarks[row+1] = {x,y,z} 
            setControlText(wndBookmarks,"bookmarkname","") 
            saveBookmarks() 
        end 
    else 
        outputChatBox("Please enter a name for the bookmark") 
    end 
end 
  
function deleteLocation () 
    local row,column = guiGridListGetSelectedItem(bookmarkList) 
    if row and row ~= -1 then 
        table.remove(bookmarks,row+1) 
        guiGridListRemoveRow(bookmarkList,row) 
        saveBookmarks() 
    end 
end 
  
function gotoBookmark () 
    local row,column = guiGridListGetSelectedItem(bookmarkList) 
    if row and row ~= -1 then 
        fadeCamera(false) 
        if isPedDead(g_Me) then 
            setTimer(server.spawnMe,1000,1,unpack(bookmarks[row+1])) 
        else 
            setTimer(setElementPosition,1000,1,g_Me,unpack(bookmarks[row+1])) 
        end 
        setTimer(function () fadeCamera(true) setCameraTarget(g_Me) end,2000,1) 
    end 
end 
  
  

ممكن تساعدونا وش الخطاء لو سمحتم

Edited by Guest
Link to comment

شفت مود حفظ المكان الي في سيرفر وزارة لما تضغط اف 12 تفتح لوحة حفظ المكان هو نفسة بظبظ

تكتب اسم مكان وتضغط حفظ لما تبي ترجع للمكان تفتح لوحة زتضغط علي المكان وينقلك لعنده كدا يعني فهمت

Link to comment
هل كود الي حاطه لك في اخطاء

يب فيه اخطاء ,

ناسخة من الفري روم والفري روم له تعريفات مب موجودة بنفس اللعبة , +

مافيه ملف xml

باسم bookmark

فانت بس نسخت الكود وماتعرف شيء ذذ

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...